Skip to content

KVSPSAPurchaseLine#

Extends #437dbf0e84ff417a965ded2bb9650972#Purchase Line

Fields#

Name Type Note
KVSPSAWork Package Code Code[20]
KVSPSAWBSCommitmentActive Boolean
KVSPSAJob Description Text[100] FlowField
KVSPSAInvoicing Type Enum (KVSPSAPspInvoicingType) FlowField
KVSPSAJob Invoicing Qty. Decimal
KVSPSAWork Type Code Code[10]
KVSPSAJob Account No. Code[20]
KVSPSABudget Line No. Integer
KVSPSATo-Do No. Code[20]
KVSPSAJobPurchWInventory Boolean
KVSPSAJob Split Exist Boolean FlowField
KVSPSAPhase Code Code[20]
KVSPSATask Code Code[20]
KVSPSAStep Code Code[20]
KVSPSARes. Job Led. Entry No. Integer
KVSPSAJob Inv. Currency Factor Decimal
KVSPSAJob Inv. Currency Code Code[20]
KVSPSAPurch. Inv. Led. Entries Boolean FlowField
KVSPSACorr. Job Qty. Decimal
KVSPSACorr. Job Amount (LCY) Decimal
KVSPSACorr. Job Manual Boolean
KVSPSACorr. Job Boolean
KVSPSAEfficiency Date Date
KVSPSAEfficiency Resource No. Code[20]
KVSPSAEfficiencyUnitOfMeasCode Code[10]
KVSPSAEfficiency Resource Name Text[100]
KVSPSANonDeductibleVATType Enum (KVSPSANonDeductibleVATType)
KVSPSANonDeductVATDimCode Code[20]
KVSPSANonDeductVATDimValueCode Code[20]
KVSPSAWorkPackageDescription Text[100] FlowField

Procedures#

KVSPSADeleteJobSplitLines() :#

Summary: Deletes all associated job split lines for the current purchase line.

procedure KVSPSADeleteJobSplitLines(): 

KVSPSAGetActivitySingleLine() :#

Summary: This procedure retrieves the activity for a single purchase line. It will open job psp line or job budget line page depend on setup field in job. After user selects the line, it will be assigned to the purchase line.

procedure KVSPSAGetActivitySingleLine(): 

KVSPSASuppressNonDeductVATNotification(Boolean) :#

Summary: This procedure set the value of GlobalSuppressNonDeductVATNotification.

procedure KVSPSASuppressNonDeductVATNotification(SuppressNonDeductVATNotification: Boolean): 

Parameters:

  • SuppressNonDeductVATNotification: New value of GlobalSuppressNonDeductVATNotification

Events#

KVSPSAOnAfterGetSingleLineActivity(Record Purchase Line, Code[20], Code[20], Code[20], Code[20], Code[20], Integer) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterGetSingleLineActivity(var PurchaseLine: Record "Purchase Line"; JobNo: Code[20]; WorkPackageCode: Code[20]; PhaseCode: Code[20]; TaskCode: Code[20]; StepCode: Code[20]; BudgetLineNo: Integer): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAPurchaseLine", 'KVSPSAOnAfterGetSingleLineActivity', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterGetSingleLineActivity(var PurchaseLine: Record "Purchase Line"; JobNo: Code[20]; WorkPackageCode: Code[20]; PhaseCode: Code[20]; TaskCode: Code[20]; StepCode: Code[20]; BudgetLineNo: Integer)
begin
end;

KVSPSAOnBeforeGetWBSCommitmentActive(Record Purchase Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeGetWBSCommitmentActive(var Rec: Record "Purchase Line"; var CommitmentActive: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAPurchaseLine", 'KVSPSAOnBeforeGetWBSCommitmentActive', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeGetWBSCommitmentActive(var Rec: Record "Purchase Line"; var CommitmentActive: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeKeepOldPrice(Record Purchase Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeKeepOldPrice(var PurchaseLine: Record "Purchase Line"; var KeepOldPrice: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAPurchaseLine", 'KVSPSAOnBeforeKeepOldPrice', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeKeepOldPrice(var PurchaseLine: Record "Purchase Line"; var KeepOldPrice: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeSetTableViewToDoNo(Record Purchase Line, Record KVSPSA Job Budget Line) :#

Summary: This event can be used to change the filter for the job budget lines shown in the field To-Do-No. before the SetTableView call is made

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeSetTableViewToDoNo(var PurchaseLine: Record "Purchase Line"; var JobBudgetLine: Record "KVSPSA Job Budget Line"): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAPurchaseLine", 'KVSPSAOnBeforeSetTableViewToDoNo', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeSetTableViewToDoNo(var PurchaseLine: Record "Purchase Line"; var JobBudgetLine: Record "KVSPSA Job Budget Line")
begin
end;

Parameters:

  • JobBudgetLine: JobBudgetLine that is changed
  • PurchaseLine: PurchaseLine for filtering

KVSPSAOnBeforeShouldLineTypeBeBold(Record Purchase Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeShouldLineTypeBeBold(PurchaseLine: Record "Purchase Line"; var Result: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::TableExtension, TableExtension::"KVSPSAPurchaseLine", 'KVSPSAOnBeforeShouldLineTypeBeBold', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeShouldLineTypeBeBold(PurchaseLine: Record "Purchase Line"; var Result: Boolean; var IsHandled: Boolean)
begin
end;