KVSPSAJob Forecast Functions#

Obsolete

This Element will be removed or changed with a future Version of the App.

Procedures#

CalcSubTotalsAndTotals(Record KVSPSAJob Forecast Line) :#

Summary: Calculates all subtotals and totals for the Job Forecast

Syntax

procedure CalcSubTotalsAndTotals(var JobForecastLine: Record "KVSPSAJob Forecast Line"):

Parameters:

JobForecastLine: Used to determine the target Job Forecast by its field "Job Forecast No."

CreateForecast(Record KVSPSAJob Forecast Header) :#

Syntax

procedure CreateForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header"):

ReleaseForecast(Record KVSPSAJob Forecast Header) :#

Summary: Releases the Job Forecast

Syntax

procedure ReleaseForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header"):

Parameters:

JobForecastHeader: Job Forecast Header to be released

ReopenForecast(Record KVSPSAJob Forecast Header) :#

Summary: Reopens the Job Forecast

Syntax

procedure ReopenForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header"):

Parameters:

JobForecastHeader: Job Forecast Header to be reopened

Events#

KVSPSAOnAfterCalculateJobForecastLineHoursBeforeSetZeroIfNegative(Record KVSPSAJob Forecast Line, Record KVSPSAJobPSPLine, Boolean) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterCalculateJobForecastLineHoursBeforeSetZeroIfNegative(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; var BudgetCalculation: Boolean):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterCalculateJobForecastLineHoursBeforeSetZeroIfNegative', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterCalculateJobForecastLineHoursBeforeSetZeroIfNegative(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; var BudgetCalculation: Boolean)
begin
end;

KVSPSAOnAfterCalculateJobForecastLineMCBeforeSetZeroIfNegative(Record KVSPSAJob Forecast Line, Record KVSPSAJobPSPLine, Boolean) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterCalculateJobForecastLineMCBeforeSetZeroIfNegative(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; var BudgetCalculation: Boolean):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterCalculateJobForecastLineMCBeforeSetZeroIfNegative', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterCalculateJobForecastLineMCBeforeSetZeroIfNegative(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; var BudgetCalculation: Boolean)
begin
end;

KVSPSAOnAfterCalculateJobForecastLinePCBeforeSetZeroIfNegative(Record KVSPSAJob Forecast Line, Record KVSPSAJobPSPLine, Boolean) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterCalculateJobForecastLinePCBeforeSetZeroIfNegative(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; var BudgetCalculation: Boolean):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterCalculateJobForecastLinePCBeforeSetZeroIfNegative', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterCalculateJobForecastLinePCBeforeSetZeroIfNegative(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; var BudgetCalculation: Boolean)
begin
end;

KVSPSAOnAfterCreateHistData(Record KVSPSAJob Forecast Line) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterCreateHistData(JobForecastLine: Record "KVSPSAJob Forecast Line"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterCreateHistData', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterCreateHistData(JobForecastLine: Record "KVSPSAJob Forecast Line")
begin
end;

KVSPSAOnAfterJobBudgetLineSetFilterInGetExpectedValuesBudgetLines(Record KVSPSA Job Budget Line, Record KVSPSAJobPSPLine, Integer) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterJobBudgetLineSetFilterInGetExpectedValuesBudgetLines(var JobBudgetLine: Record "KVSPSA Job Budget Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; FieldNo: Integer):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterJobBudgetLineSetFilterInGetExpectedValuesBudgetLines', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterJobBudgetLineSetFilterInGetExpectedValuesBudgetLines(var JobBudgetLine: Record "KVSPSA Job Budget Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; FieldNo: Integer)
begin
end;

KVSPSAOnAfterJobBudgetLineSetFilterInGetTotalPriceExpectedBudget(Record KVSPSA Job Budget Line, Record KVSPSAJobPSPLine, Integer) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterJobBudgetLineSetFilterInGetTotalPriceExpectedBudget(var JobBudgetLine: Record "KVSPSA Job Budget Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; FieldNo: Integer):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterJobBudgetLineSetFilterInGetTotalPriceExpectedBudget', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterJobBudgetLineSetFilterInGetTotalPriceExpectedBudget(var JobBudgetLine: Record "KVSPSA Job Budget Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"; FieldNo: Integer)
begin
end;

KVSPSAOnAfterJobBudgetLineSetFilterInGetUnitCostLcyHForecast(Record KVSPSA Job Budget Line, Record KVSPSAJob Forecast Line) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterJobBudgetLineSetFilterInGetUnitCostLcyHForecast(var JobBudgetLine: Record "KVSPSA Job Budget Line"; var JobForecastLine: Record "KVSPSAJob Forecast Line"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterJobBudgetLineSetFilterInGetUnitCostLcyHForecast', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterJobBudgetLineSetFilterInGetUnitCostLcyHForecast(var JobBudgetLine: Record "KVSPSA Job Budget Line"; var JobForecastLine: Record "KVSPSAJob Forecast Line")
begin
end;

KVSPSAOnAfterJobBudgetLineSetFilterInLookupExpected(Record KVSPSA Job Budget Line, Record KVSPSAJob Forecast Line, Integer) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterJobBudgetLineSetFilterInLookupExpected(var JobBudgetLine: Record "KVSPSA Job Budget Line"; var JobForecastLine: Record "KVSPSAJob Forecast Line"; FieldNo: Integer):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterJobBudgetLineSetFilterInLookupExpected', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterJobBudgetLineSetFilterInLookupExpected(var JobBudgetLine: Record "KVSPSA Job Budget Line"; var JobForecastLine: Record "KVSPSAJob Forecast Line"; FieldNo: Integer)
begin
end;

KVSPSAOnAfterReleasedForecast(Record KVSPSAJob Forecast Header) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterReleasedForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterReleasedForecast', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterReleasedForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header")
begin
end;

KVSPSAOnAfterReOpenedForecast(Record KVSPSAJob Forecast Header) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterReOpenedForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterReOpenedForecast', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterReOpenedForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header")
begin
end;

KVSPSAOnAfterTransferedAllDataForJobForecastLineFromPSPLine(Record KVSPSAJob Forecast Line, Record KVSPSAJobPSPLine) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterTransferedAllDataForJobForecastLineFromPSPLine(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnAfterTransferedAllDataForJobForecastLineFromPSPLine', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterTransferedAllDataForJobForecastLineFromPSPLine(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine")
begin
end;

KVSPSAOnBeforeInsertFCHistDataFromItemLedgerEntry(Record KVSPSAFC Hist. Data, Record Item Ledger Entry) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeInsertFCHistDataFromItemLedgerEntry(var FCHistData: Record "KVSPSAFC Hist. Data"; var ItemLedgerEntry: Record "Item Ledger Entry"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnBeforeInsertFCHistDataFromItemLedgerEntry', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeInsertFCHistDataFromItemLedgerEntry(var FCHistData: Record "KVSPSAFC Hist. Data"; var ItemLedgerEntry: Record "Item Ledger Entry")
begin
end;

KVSPSAOnBeforeInsertFCHistDataFromJobLedgerEntry(Record KVSPSAFC Hist. Data, Record Job Ledger Entry) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeInsertFCHistDataFromJobLedgerEntry(var FCHistData: Record "KVSPSAFC Hist. Data"; var JobLedgerEntry: Record "Job Ledger Entry"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnBeforeInsertFCHistDataFromJobLedgerEntry', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeInsertFCHistDataFromJobLedgerEntry(var FCHistData: Record "KVSPSAFC Hist. Data"; var JobLedgerEntry: Record "Job Ledger Entry")
begin
end;

KVSPSAOnBeforeInsertFCHistDataFromJobTimeLedgerEntry(Record KVSPSAFC Hist. Data, Record KVSPSAJobTimeLedgerEntry) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeInsertFCHistDataFromJobTimeLedgerEntry(var FCHistData: Record "KVSPSAFC Hist. Data"; var JobTimeLedgerEntry: Record "KVSPSAJobTimeLedgerEntry"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnBeforeInsertFCHistDataFromJobTimeLedgerEntry', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeInsertFCHistDataFromJobTimeLedgerEntry(var FCHistData: Record "KVSPSAFC Hist. Data"; var JobTimeLedgerEntry: Record "KVSPSAJobTimeLedgerEntry")
begin
end;

KVSPSAOnBeforeInsertFCHistDataFromPurchLine(Record KVSPSAFC Hist. Data, Record Purchase Line) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeInsertFCHistDataFromPurchLine(var FCHistData: Record "KVSPSAFC Hist. Data"; var PurchaseLine: Record "Purchase Line"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnBeforeInsertFCHistDataFromPurchLine', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeInsertFCHistDataFromPurchLine(var FCHistData: Record "KVSPSAFC Hist. Data"; var PurchaseLine: Record "Purchase Line")
begin
end;

KVSPSAOnBeforeInsertJobForecastLineFromPSPLine(Record KVSPSAJob Forecast Line, Record KVSPSAJobPSPLine) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeInsertJobForecastLineFromPSPLine(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnBeforeInsertJobForecastLineFromPSPLine', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeInsertJobForecastLineFromPSPLine(var JobForecastLine: Record "KVSPSAJob Forecast Line"; var JobPSPLine: Record "KVSPSAJobPSPLine")
begin
end;

KVSPSAOnBeforeModifiedForecastHeaderInCreateForecast(Record KVSPSAJob Forecast Header) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeModifiedForecastHeaderInCreateForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnBeforeModifiedForecastHeaderInCreateForecast', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeModifiedForecastHeaderInCreateForecast(var JobForecastHeader: Record "KVSPSAJob Forecast Header")
begin
end;

KVSPSAOnBeforeTransferPSPLines(Record KVSPSAJobPSPLine, Code[20], Code[10], Code[20], Code[20]) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeTransferPSPLines(var JobPSPLine: Record "KVSPSAJobPSPLine"; JobNo: Code[20]; JobBudgetName: Code[10]; PSPVersionNo: Code[20]; ForecastNo: Code[20]):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnBeforeTransferPSPLines', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeTransferPSPLines(var JobPSPLine: Record "KVSPSAJobPSPLine"; JobNo: Code[20]; JobBudgetName: Code[10]; PSPVersionNo: Code[20]; ForecastNo: Code[20])
begin
end;

KVSPSAOnGetActualValuesJobLedgerEntryElse(Record KVSPSAJobPSPLine, Integer, Record Job Ledger Entry, Decimal) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnGetActualValuesJobLedgerEntryElse(JobPSPLine: Record "KVSPSAJobPSPLine"; FieldNo: Integer; var FilteredJobLedgerEntry: Record "Job Ledger Entry"; var ResultAmount: Decimal):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnGetActualValuesJobLedgerEntryElse', '', false, false)]
local procedure DoSomethingKVSPSAOnGetActualValuesJobLedgerEntryElse(JobPSPLine: Record "KVSPSAJobPSPLine"; FieldNo: Integer; var FilteredJobLedgerEntry: Record "Job Ledger Entry"; var ResultAmount: Decimal)
begin
end;

KVSPSAOnSetFilterHistData(Record KVSPSAFC Hist. Data) :#

SyntaxSubscriber

[IntegrationEvent(false, false)]
local procedure KVSPSAOnSetFilterHistData(var FCHistData: Record "KVSPSAFC Hist. Data"):

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJob Forecast Functions", 'KVSPSAOnSetFilterHistData', '', false, false)]
local procedure DoSomethingKVSPSAOnSetFilterHistData(var FCHistData: Record "KVSPSAFC Hist. Data")
begin
end;