KVSPSAGet Activity Management#
Procedures#
OnRun#
procedure OnRun(Rec: Record "#437dbf0e84ff417a965ded2bb9650972#Purchase Line")
FilterTempBudgetLines(Record KVSPSA Job Budget Line, Boolean, Code[20], Code[20], Code[20], Code[20], Code[20], Code[20], Boolean) :#
procedure FilterTempBudgetLines(var JobBudgetLine: Record "KVSPSA Job Budget Line"; IsRes: Boolean; ResourceNo: Code[20]; ToDoNo: Code[20]; ActWorkPackageCode: Code[20]; ActPhaseCode: Code[20]; ActTaskCode: Code[20]; ActStepCode: Code[20]; JobDoc: Boolean):
GetActivity(Code[20], Code[20], Code[20], Code[20], Code[20], Code[20], Text[100], Enum KVSPSAActType, Code[10], Integer, Code[20], Option) :#
procedure GetActivity(ActJobNo: Code[20]; ActNo: Code[20]; var ActWorkPackage: Code[20]; var ActPhaseCode: Code[20]; var ActTaskCode: Code[20]; var ActStepCode: Code[20]; var ActDescription: Text[100]; ActType: Enum "KVSPSAActType"; var ActWorkTypeCode: Code[10]; var ActBudgetlineNo: Integer; var ActBudgetLineToDoNo: Code[20]; Source: Option):
GetActivity(Code[20], Code[20], Code[20], Code[20], Code[20], Code[20], Text[100], Enum KVSPSAActType, Enum KVSPSAPspInvoicingType, Code[10], Integer, Code[20], Option) :#
procedure GetActivity(ActJobNo: Code[20]; ActNo: Code[20]; var ActWorkPackage: Code[20]; var ActPhaseCode: Code[20]; var ActTaskCode: Code[20]; var ActStepCode: Code[20]; var ActDescription: Text[100]; ActType: Enum "KVSPSAActType"; var ActDeductible: Enum "KVSPSAPspInvoicingType"; var ActWorkTypeCode: Code[10]; var ActBudgetLineNo: Integer; var ActBudgetLineToDoNo: Code[20]; Source: Option):
GetChosenRecords(Record KVSPSAWork Package, Record KVSPSAJobPSPLine, Record KVSPSA Job Budget Line) :#
procedure GetChosenRecords(var NewWorkPackage: Record "KVSPSAWork Package"; var NewJobPSPLine: Record "KVSPSAJobPSPLine"; var NewJobBudgetLine: Record "KVSPSA Job Budget Line"):
GetTempBudgetLinesForJob(Record Job, Record KVSPSA Job Budget Line, Boolean) :#
procedure GetTempBudgetLinesForJob(Job: Record "Job"; var JobBudgetLine: Record "KVSPSA Job Budget Line"; IsResource: Boolean):
SetChosenRecords(Record KVSPSAWork Package, Record KVSPSAJobPSPLine, Record KVSPSA Job Budget Line) :#
procedure SetChosenRecords(var NewWorkPackage: Record "KVSPSAWork Package"; var NewJobPSPLine: Record "KVSPSAJobPSPLine"; var NewJobBudgetLine: Record "KVSPSA Job Budget Line"):
SetHideDialogConfirms(Boolean, Boolean, Boolean) :#
procedure SetHideDialogConfirms(NewHideDialogConfirms: Boolean; NewNewPricesInResLines: Boolean; NewDescription: Boolean):
SetHideDialogForms(Boolean) :#
procedure SetHideDialogForms(NewHideDialogForms: Boolean):
Events#
KVSPSAOnAfterFilterTempBudgetLines(Record KVSPSA Job Budget Line, Boolean, Code[20], Code[20], Code[20], Code[20], Code[20], Code[20], Boolean) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterFilterTempBudgetLines(var JobBudgetLine: Record "KVSPSA Job Budget Line"; IsResource: Boolean; ResourceNo: Code[20]; ToDoNo: Code[20]; WorkPackageCode: Code[20]; PhaseCode: Code[20]; TaskCode: Code[20]; StepCode: Code[20]; JobDocument: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnAfterFilterTempBudgetLines', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterFilterTempBudgetLines(var JobBudgetLine: Record "KVSPSA Job Budget Line"; IsResource: Boolean; ResourceNo: Code[20]; ToDoNo: Code[20]; WorkPackageCode: Code[20]; PhaseCode: Code[20]; TaskCode: Code[20]; StepCode: Code[20]; JobDocument: Boolean)
begin
end;
KVSPSAOnAfterSalesLineActivitySelected(Record Sales Header, Record Sales Line) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterSalesLineActivitySelected(SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnAfterSalesLineActivitySelected', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSalesLineActivitySelected(SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line")
begin
end;
KVSPSAOnAfterSetBudgetLineFilterInGetActivity(Record KVSPSA Job Budget Line, Option) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterSetBudgetLineFilterInGetActivity(var JobBudgetLine: Record "KVSPSA Job Budget Line"; Source: Option):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnAfterSetBudgetLineFilterInGetActivity', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSetBudgetLineFilterInGetActivity(var JobBudgetLine: Record "KVSPSA Job Budget Line"; Source: Option)
begin
end;
KVSPSAOnAfterSetPostingLevelBeforeGetActivity(Enum KVSPSAPostingLevel, Option) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterSetPostingLevelBeforeGetActivity(var PostingLevel: Enum "KVSPSAPostingLevel"; Source: Option):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnAfterSetPostingLevelBeforeGetActivity', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSetPostingLevelBeforeGetActivity(var PostingLevel: Enum "KVSPSAPostingLevel"; Source: Option)
begin
end;
KVSPSAOnAfterSetWBSLineFilterInGetActivity(Record KVSPSAJobPSPLine, Option) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterSetWBSLineFilterInGetActivity(var JobPSPLine: Record "KVSPSAJobPSPLine"; Source: Option):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnAfterSetWBSLineFilterInGetActivity', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSetWBSLineFilterInGetActivity(var JobPSPLine: Record "KVSPSAJobPSPLine"; Source: Option)
begin
end;
KVSPSAOnBeforeCheckJobTeamFilterOnTimePostInGetActivityTime(Boolean) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCheckJobTeamFilterOnTimePostInGetActivityTime(var SkipCheckJobTeamFilterOnTimePost: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnBeforeCheckJobTeamFilterOnTimePostInGetActivityTime', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCheckJobTeamFilterOnTimePostInGetActivityTime(var SkipCheckJobTeamFilterOnTimePost: Boolean)
begin
end;
KVSPSAOnBeforeConfirmTransferDescription(RecordId, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeConfirmTransferDescription(SourceRecordID: RecordId; var ConfirmedQuestion: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnBeforeConfirmTransferDescription', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeConfirmTransferDescription(SourceRecordID: RecordId; var ConfirmedQuestion: Boolean; var IsHandled: Boolean)
begin
end;
KVSPSAOnBeforePrepareActivities(Code[20], Enum KVSPSAActType, Code[20], Record KVSPSA Job Budget Line, Record Sales Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforePrepareActivities(JobNo: Code[20]; ActType: Enum "KVSPSAActType"; ActNo: Code[20]; var JobBudgetLine: Record "KVSPSA Job Budget Line"; SalesLine: Record "Sales Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnBeforePrepareActivities', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforePrepareActivities(JobNo: Code[20]; ActType: Enum "KVSPSAActType"; ActNo: Code[20]; var JobBudgetLine: Record "KVSPSA Job Budget Line"; SalesLine: Record "Sales Line"; var IsHandled: Boolean)
begin
end;
KVSPSAOnBeforeTransferJobBudgetLineFields(Record KVSPSA Job Budget Line, Code[20]) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeTransferJobBudgetLineFields(var JobBudgetLine: Record "KVSPSA Job Budget Line"; ResourceNo: Code[20]):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnBeforeTransferJobBudgetLineFields', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeTransferJobBudgetLineFields(var JobBudgetLine: Record "KVSPSA Job Budget Line"; ResourceNo: Code[20])
begin
end;
KVSPSAOnSetFilterOnBudgetLineOnPrepareActivities(Record Jobs Setup, Record KVSPSA Job Budget Line, Record Sales Line) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnSetFilterOnBudgetLineOnPrepareActivities(JobsSetup: Record "Jobs Setup"; var JobBudgetLine: Record "KVSPSA Job Budget Line"; SalesLine: Record "Sales Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnSetFilterOnBudgetLineOnPrepareActivities', '', false, false)]
local procedure DoSomethingKVSPSAOnSetFilterOnBudgetLineOnPrepareActivities(JobsSetup: Record "Jobs Setup"; var JobBudgetLine: Record "KVSPSA Job Budget Line"; SalesLine: Record "Sales Line")
begin
end;
KVSPSAOnSetFilterOnWBSLineOnPrepareActivities(Record KVSPSAJobPSPLine, Record Sales Line) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnSetFilterOnWBSLineOnPrepareActivities(var JobPSPLine: Record "KVSPSAJobPSPLine"; SalesLine: Record "Sales Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnSetFilterOnWBSLineOnPrepareActivities', '', false, false)]
local procedure DoSomethingKVSPSAOnSetFilterOnWBSLineOnPrepareActivities(var JobPSPLine: Record "KVSPSAJobPSPLine"; SalesLine: Record "Sales Line")
begin
end;