Skip to content

KVSPSAJobJnlLinePriceHelper#

Procedures#

FindResCostForJobLedgerEntry(Record Job Ledger Entry) :#

Summary: This procedure create a temporary job journal line and assigning fields from job ledger entry. It then recalculates cost fields using the ApplyPrice in job journal line. Then it assigning cost fields back to the job ledger entry.

procedure FindResCostForJobLedgerEntry(var JobLedgerEntry: Record "Job Ledger Entry"): 

Parameters:

  • JobLedgerEntry: Record used for assigning fields

FindResCostForJobTimeLedgerEntry(Record KVSPSAJobTimeLedgerEntry) :#

Summary: This procedure creates a temporary job journal line and assigns fields from job time ledger entry. It then recalculates cost fields using the ApplyPrice in job journal line. Then it assigns cost fields back to the job time ledger entry.

procedure FindResCostForJobTimeLedgerEntry(var JobTimeLedgerEntry: Record "KVSPSAJobTimeLedgerEntry"): 

Parameters:

  • JobTimeLedgerEntry: Record used for assigning fields

GetJobCostCalculationMethod(Code[20]) : Enum#

Summary: This procedure check if job has Cost Calculation Method then return it. If not, it will return Price Calculation Method from Purchases and Payables Setup.

procedure GetJobCostCalculationMethod(JobNo: Code[20]): Enum Price Calculation Method

Parameters:

  • JobNo: Code used for get Job

Returns: Return Price Calculation Method from either places

GetJobPriceCalculationMethod(Code[20]) : Enum#

Summary: This procedure check if job has Price Calculation Method then return it. If not, it will return Price Calculation Method from Sales and Receivables Setup.

procedure GetJobPriceCalculationMethod(JobNo: Code[20]): Enum Price Calculation Method

Parameters:

  • JobNo: Code used for get Job

Returns: Return Price Calculation Method from either places

Events#

KVSPSAOnFindResCostForJobLedgerEntryOnBeforeTempJournalLineApplyPrice(Record Job Journal Line, Record Job Ledger Entry, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnFindResCostForJobLedgerEntryOnBeforeTempJournalLineApplyPrice(var TempJobJournalLine: Record "Job Journal Line" temporary; var JobLedgerEntry: Record "Job Ledger Entry"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJobJnlLinePriceHelper", 'KVSPSAOnFindResCostForJobLedgerEntryOnBeforeTempJournalLineApplyPrice', '', false, false)]
local procedure DoSomethingKVSPSAOnFindResCostForJobLedgerEntryOnBeforeTempJournalLineApplyPrice(var TempJobJournalLine: Record "Job Journal Line" temporary; var JobLedgerEntry: Record "Job Ledger Entry"; var IsHandled: Boolean)
begin
end;

KVSPSAOnFindResCostForJobTimeLedgerEntryOnBeforeTempJournalLineApplyPrice(Record Job Journal Line, Record KVSPSAJobTimeLedgerEntry, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnFindResCostForJobTimeLedgerEntryOnBeforeTempJournalLineApplyPrice(var TempJobJournalLine: Record "Job Journal Line" temporary; var JobTimeLedgerEntry: Record "KVSPSAJobTimeLedgerEntry"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJobJnlLinePriceHelper", 'KVSPSAOnFindResCostForJobTimeLedgerEntryOnBeforeTempJournalLineApplyPrice', '', false, false)]
local procedure DoSomethingKVSPSAOnFindResCostForJobTimeLedgerEntryOnBeforeTempJournalLineApplyPrice(var TempJobJournalLine: Record "Job Journal Line" temporary; var JobTimeLedgerEntry: Record "KVSPSAJobTimeLedgerEntry"; var IsHandled: Boolean)
begin
end;