Skip to content

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#

KVSPSAOnAfterExistingSalesDocumentTextFilteredInTransferDocumentText(Record Sales Line, Record KVSKBASalesDocumentText, Enum KVSKBATextPosition) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterExistingSalesDocumentTextFilteredInTransferDocumentText(SalesLine: Record "Sales Line"; var KVSKBASalesDocumentText: Record "KVSKBASalesDocumentText"; CurrTextPosition: Enum "KVSKBATextPosition"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnAfterExistingSalesDocumentTextFilteredInTransferDocumentText', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterExistingSalesDocumentTextFilteredInTransferDocumentText(SalesLine: Record "Sales Line"; var KVSKBASalesDocumentText: Record "KVSKBASalesDocumentText"; CurrTextPosition: Enum "KVSKBATextPosition")
begin
end;

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;

KVSPSAOnBeforeConfirmTransferDocumentText(RecordId, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeConfirmTransferDocumentText(SourceRecordID: RecordId; var TransferDocumentText: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAGet Activity Management", 'KVSPSAOnBeforeConfirmTransferDocumentText', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeConfirmTransferDocumentText(SourceRecordID: RecordId; var TransferDocumentText: 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;