Skip to content

KVSPSAHR Cockpit#

Fields#

Name Type Note
Employee No. Code[20]
Type Option OptionMembers: New,Update
Salesperson Code Code[20]
Abbreviation Code[10]
County Text[30]
First Name Text[50]
Last Name Text[50]
Gender Enum Employee Gender
Address Text[100]
Post Code Code[20]
City Text[30]
E-Mail Business Text[80]
E-Mail Private Text[80]
Country/Region Code Code[10]
Address 2 Text[50]
Emplymt. Contract Code Code[10]
Phone No. Business Text[30]
Phone No. Private Text[30]
Mobile Phone No. Text[30]
Birth Date Date
Employment Date Date
Job Title Text[30]
Trainee Boolean
Project Manager Boolean
No. Series Code[20]
Show in Planning Board Boolean
Create Resource Boolean
Create SalesPerson Boolean
Last Collect User Code[50]
Last Collect Date Date
Last Update Code[50]
Last Update Date Date
Direct Unit Cost Decimal
Unit Price Decimal
Social Security No. Text[30]
Authentication Email O365 Text[250]
Base Calendar Code Code[10]
Base Calendar PSA Code Code[10]
Useable in Sales Boolean
Resource Group No. Code[20]
Record Creation Date Date
Record Creation UserID Code[50]
Employee Creation Date Date
Employee Creation UserID Code[50]
Status Enum Employee Status
Inactive Date Date
Cause of Inactivity Code Code[10]
Termination Date Date
Grounds for Term. Code Code[10]
Blocked Boolean
Gen. Prod. Posting Group Code[20]
Working Hour Template Code[10]
Create Capacity Boolean
Starting Date Capacity Date
Ending Date Capacity Date
Product Commission Code Code[10]
User ID Code[50]
Resource No. Code[20]
Time Inspector Code[20]
Substitute Time Inspector Code[20]
Create Invoice Suggestion Name Boolean

Procedures#

CheckField(Integer, Enum KVSPSAHRCockpitTypeOfFieldCheck) :#

procedure CheckField(FieldNo: Integer; TypeOfCheck: Enum "KVSPSAHRCockpitTypeOfFieldCheck"): 

ConfirmConnectionLoss() : Boolean#

procedure ConfirmConnectionLoss(): Boolean

CopyDefaultDim(Integer, Code[20], Integer, Code[20]) :#

procedure CopyDefaultDim(SourceTable: Integer; SourceNo: Code[20]; TargetTable: Integer; TargetNo: Code[20]): 

FillGlobalDims(Code[20], Code[20]) :#

procedure FillGlobalDims(var GlobDim1Code: Code[20]; var GlobDim2Code: Code[20]): 

GetFullName(Integer) : Text#

procedure GetFullName(MaxLength: Integer): Text

IsNameChangeValid(Text, Text, Text) : Boolean#

procedure IsNameChangeValid(ExistingNameText: Text; NewName: Text; ComparedToTableCaption: Text): Boolean

SetSkipConfirmationOnInsert(Boolean) :#

procedure SetSkipConfirmationOnInsert(NewSkipConfirmationOnInsert: Boolean): 

ShowShortcutDimCode(Code[20]) :#

procedure ShowShortcutDimCode(var ShortcutDimCode: Code[20]): 

TransferData() :#

procedure TransferData(): 

Events#

KVSPSAOnAfterCopyDefaultDim(Integer, Code[20], Integer, Code[20]) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterCopyDefaultDim(SourceTable: Integer; SourceNo: Code[20]; TargetTable: Integer; TargetNo: Code[20]): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnAfterCopyDefaultDim', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterCopyDefaultDim(SourceTable: Integer; SourceNo: Code[20]; TargetTable: Integer; TargetNo: Code[20])
begin
end;

KVSPSAOnAfterCreatedButNotDeletedRecords(Record KVSPSAHR Cockpit) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterCreatedButNotDeletedRecords(var HRCockpit: Record "KVSPSAHR Cockpit"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnAfterCreatedButNotDeletedRecords', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterCreatedButNotDeletedRecords(var HRCockpit: Record "KVSPSAHR Cockpit")
begin
end;

KVSPSAOnAfterInsertDimensionValueRecord(Record KVSPSAHR Cockpit, Record Default Dimension) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterInsertDimensionValueRecord(var HRCockpit: Record "KVSPSAHR Cockpit"; DefaultDimension: Record "Default Dimension"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnAfterInsertDimensionValueRecord', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterInsertDimensionValueRecord(var HRCockpit: Record "KVSPSAHR Cockpit"; DefaultDimension: Record "Default Dimension")
begin
end;

KVSPSAOnBeforeCheckField(Record KVSPSAHR Cockpit, Integer, Enum KVSPSAHRCockpitTypeOfFieldCheck, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCheckField(HRCockpit: Record "KVSPSAHR Cockpit"; FieldNo: Integer; var HRCockpitTypeOfFieldCheck: Enum "KVSPSAHRCockpitTypeOfFieldCheck"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeCheckField', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCheckField(HRCockpit: Record "KVSPSAHR Cockpit"; FieldNo: Integer; var HRCockpitTypeOfFieldCheck: Enum "KVSPSAHRCockpitTypeOfFieldCheck"; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeCheckNecessaryFields(Record KVSPSAHR Cockpit, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCheckNecessaryFields(var HRCockpit: Record "KVSPSAHR Cockpit"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeCheckNecessaryFields', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCheckNecessaryFields(var HRCockpit: Record "KVSPSAHR Cockpit"; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeConfirmAfterSuccessfulTransfer(Record KVSPSAHR Cockpit, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeConfirmAfterSuccessfulTransfer(var HRCockpit: Record "KVSPSAHR Cockpit"; var Confirmed: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeConfirmAfterSuccessfulTransfer', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeConfirmAfterSuccessfulTransfer(var HRCockpit: Record "KVSPSAHR Cockpit"; var Confirmed: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeConfirmConnectionLos(Record KVSPSAHR Cockpit, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeConfirmConnectionLos(var HRCockpit: Record "KVSPSAHR Cockpit"; var Confirmed: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeConfirmConnectionLos', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeConfirmConnectionLos(var HRCockpit: Record "KVSPSAHR Cockpit"; var Confirmed: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeConfirmStartUpdate(Record KVSPSAHR Cockpit, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeConfirmStartUpdate(var HRCockpit: Record "KVSPSAHR Cockpit"; var StartUpdate: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeConfirmStartUpdate', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeConfirmStartUpdate(var HRCockpit: Record "KVSPSAHR Cockpit"; var StartUpdate: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeCreateSalesPersonOnUpsertSalesPerson(Record KVSPSAHR Cockpit, Record Salesperson/Purchaser) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeCreateSalesPersonOnUpsertSalesPerson(var HRCockpit: Record "KVSPSAHR Cockpit"; var SalespersonPurchaser: Record "Salesperson/Purchaser"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeCreateSalesPersonOnUpsertSalesPerson', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeCreateSalesPersonOnUpsertSalesPerson(var HRCockpit: Record "KVSPSAHR Cockpit"; var SalespersonPurchaser: Record "Salesperson/Purchaser")
begin
end;

KVSPSAOnBeforeHandleConfirm(Record KVSPSAHR Cockpit, Boolean, Boolean) :#

Obsolete

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

[IntegrationEvent(false, false)]
[Obsolete('Use KVSPSAOnBeforeConfirmAfterSuccessfulTransfer', '23.4')]
local procedure KVSPSAOnBeforeHandleConfirm(var HRCockpit: Record "KVSPSAHR Cockpit"; var Confirmed: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeHandleConfirm', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeHandleConfirm(var HRCockpit: Record "KVSPSAHR Cockpit"; var Confirmed: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeIsNameChangeValid(Record KVSPSAHR Cockpit, Text, Text, Text, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeIsNameChangeValid(var HRCockpit: Record "KVSPSAHR Cockpit"; ExistingNameText: Text; NewName: Text; ComparedToTableCaption: Text; var NameChangeOk: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeIsNameChangeValid', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeIsNameChangeValid(var HRCockpit: Record "KVSPSAHR Cockpit"; ExistingNameText: Text; NewName: Text; ComparedToTableCaption: Text; var NameChangeOk: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeTestResName(Record KVSPSAHR Cockpit, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeTestResName(var HRCockpit: Record "KVSPSAHR Cockpit"; var NameChangeOk: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeTestResName', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeTestResName(var HRCockpit: Record "KVSPSAHR Cockpit"; var NameChangeOk: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeTestSPName(Record KVSPSAHR Cockpit, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeTestSPName(var HRCockpit: Record "KVSPSAHR Cockpit"; var NameChangeOk: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeTestSPName', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeTestSPName(var HRCockpit: Record "KVSPSAHR Cockpit"; var NameChangeOk: Boolean; var IsHandled: Boolean)
begin
end;

KVSPSAOnBeforeUpsertTables(Record KVSPSAHR Cockpit, Record KVSPSAHR Cockpit Setup) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeUpsertTables(var HRCockpit: Record "KVSPSAHR Cockpit"; var HRCockpitSetup: Record "KVSPSAHR Cockpit Setup"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnBeforeUpsertTables', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeUpsertTables(var HRCockpit: Record "KVSPSAHR Cockpit"; var HRCockpitSetup: Record "KVSPSAHR Cockpit Setup")
begin
end;

KVSPSAOnCheckEmployeeDimension(Record KVSPSAHR Cockpit) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnCheckEmployeeDimension(var HRCockpit: Record "KVSPSAHR Cockpit"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnCheckEmployeeDimension', '', false, false)]
local procedure DoSomethingKVSPSAOnCheckEmployeeDimension(var HRCockpit: Record "KVSPSAHR Cockpit")
begin
end;

KVSPSAOnCheckNecessaryFields(Record KVSPSAHR Cockpit) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnCheckNecessaryFields(var HRCockpit: Record "KVSPSAHR Cockpit"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnCheckNecessaryFields', '', false, false)]
local procedure DoSomethingKVSPSAOnCheckNecessaryFields(var HRCockpit: Record "KVSPSAHR Cockpit")
begin
end;

KVSPSAOnFillFieldsFromEmployee(Record KVSPSAHR Cockpit, Record Employee) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnFillFieldsFromEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; Employee: Record "Employee"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnFillFieldsFromEmployee', '', false, false)]
local procedure DoSomethingKVSPSAOnFillFieldsFromEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; Employee: Record "Employee")
begin
end;

KVSPSAOnFillFieldsFromResource(Record KVSPSAHR Cockpit, Record Resource) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnFillFieldsFromResource(var HRCockpit: Record "KVSPSAHR Cockpit"; Resource: Record "Resource"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnFillFieldsFromResource', '', false, false)]
local procedure DoSomethingKVSPSAOnFillFieldsFromResource(var HRCockpit: Record "KVSPSAHR Cockpit"; Resource: Record "Resource")
begin
end;

KVSPSAOnInitExistingEmployee(Record KVSPSAHR Cockpit, Record KVSPSAHR Cockpit Setup) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnInitExistingEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; var HRCockpitSetup: Record "KVSPSAHR Cockpit Setup"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnInitExistingEmployee', '', false, false)]
local procedure DoSomethingKVSPSAOnInitExistingEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; var HRCockpitSetup: Record "KVSPSAHR Cockpit Setup")
begin
end;

KVSPSAOnInitNewEmployee(Record KVSPSAHR Cockpit, Record KVSPSAHR Cockpit Setup) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnInitNewEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; var HRCockpitSetup: Record "KVSPSAHR Cockpit Setup"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnInitNewEmployee', '', false, false)]
local procedure DoSomethingKVSPSAOnInitNewEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; var HRCockpitSetup: Record "KVSPSAHR Cockpit Setup")
begin
end;

KVSPSAOnUnhandledTypeOfCheck(Record KVSPSAHR Cockpit, Integer, Enum KVSPSAHRCockpitTypeOfFieldCheck) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUnhandledTypeOfCheck(HRCockpit: Record "KVSPSAHR Cockpit"; FieldNo: Integer; HRCockpitTypeOfFieldCheck: Enum "KVSPSAHRCockpitTypeOfFieldCheck"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUnhandledTypeOfCheck', '', false, false)]
local procedure DoSomethingKVSPSAOnUnhandledTypeOfCheck(HRCockpit: Record "KVSPSAHR Cockpit"; FieldNo: Integer; HRCockpitTypeOfFieldCheck: Enum "KVSPSAHRCockpitTypeOfFieldCheck")
begin
end;

KVSPSAOnUpsertData(Record KVSPSAHR Cockpit, Record Employee) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertData(var HRCockpit: Record "KVSPSAHR Cockpit"; Employee: Record "Employee"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertData', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertData(var HRCockpit: Record "KVSPSAHR Cockpit"; Employee: Record "Employee")
begin
end;

KVSPSAOnUpsertDataAfterCommit(Record KVSPSAHR Cockpit, Record Employee) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertDataAfterCommit(var HRCockpit: Record "KVSPSAHR Cockpit"; Employee: Record "Employee"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertDataAfterCommit', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertDataAfterCommit(var HRCockpit: Record "KVSPSAHR Cockpit"; Employee: Record "Employee")
begin
end;

KVSPSAOnUpsertEmployeeAfterModifyEmployee(Record KVSPSAHR Cockpit, Record Employee) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertEmployeeAfterModifyEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; var Employee: Record "Employee"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertEmployeeAfterModifyEmployee', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertEmployeeAfterModifyEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; var Employee: Record "Employee")
begin
end;

KVSPSAOnUpsertEmployeeBeforeModifyEmployee(Record KVSPSAHR Cockpit, Record Employee) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertEmployeeBeforeModifyEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; var Employee: Record "Employee"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertEmployeeBeforeModifyEmployee', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertEmployeeBeforeModifyEmployee(var HRCockpit: Record "KVSPSAHR Cockpit"; var Employee: Record "Employee")
begin
end;

KVSPSAOnUpsertResourceAfterModifyResource(Record KVSPSAHR Cockpit, Record Resource) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertResourceAfterModifyResource(var HRCockpit: Record "KVSPSAHR Cockpit"; var Resource: Record "Resource"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertResourceAfterModifyResource', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertResourceAfterModifyResource(var HRCockpit: Record "KVSPSAHR Cockpit"; var Resource: Record "Resource")
begin
end;

KVSPSAOnUpsertResourceBeforeModifyResource(Record KVSPSAHR Cockpit, Record Resource) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertResourceBeforeModifyResource(var HRCockpit: Record "KVSPSAHR Cockpit"; var Resource: Record "Resource"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertResourceBeforeModifyResource', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertResourceBeforeModifyResource(var HRCockpit: Record "KVSPSAHR Cockpit"; var Resource: Record "Resource")
begin
end;

KVSPSAOnUpsertSalesPersonAfterModifySalesPerson(Record KVSPSAHR Cockpit, Record Salesperson/Purchaser) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertSalesPersonAfterModifySalesPerson(var HRCockpit: Record "KVSPSAHR Cockpit"; var SalespersonPurchaser: Record "Salesperson/Purchaser"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertSalesPersonAfterModifySalesPerson', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertSalesPersonAfterModifySalesPerson(var HRCockpit: Record "KVSPSAHR Cockpit"; var SalespersonPurchaser: Record "Salesperson/Purchaser")
begin
end;

KVSPSAOnUpsertSalesPersonBeforeModifySalesPerson(Record KVSPSAHR Cockpit, Record Salesperson/Purchaser) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertSalesPersonBeforeModifySalesPerson(var HRCockpit: Record "KVSPSAHR Cockpit"; var SalespersonPurchaser: Record "Salesperson/Purchaser"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertSalesPersonBeforeModifySalesPerson', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertSalesPersonBeforeModifySalesPerson(var HRCockpit: Record "KVSPSAHR Cockpit"; var SalespersonPurchaser: Record "Salesperson/Purchaser")
begin
end;

KVSPSAOnUpsertUserSetupAfterModifySetup(Record KVSPSAHR Cockpit, Record User Setup) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertUserSetupAfterModifySetup(var HRCockpit: Record "KVSPSAHR Cockpit"; var UserSetup: Record "User Setup"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertUserSetupAfterModifySetup', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertUserSetupAfterModifySetup(var HRCockpit: Record "KVSPSAHR Cockpit"; var UserSetup: Record "User Setup")
begin
end;

KVSPSAOnUpsertUserSetupBeforeModifySetup(Record KVSPSAHR Cockpit, Record User Setup) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnUpsertUserSetupBeforeModifySetup(var HRCockpit: Record "KVSPSAHR Cockpit"; var UserSetup: Record "User Setup"): 
[EventSubscriber(ObjectType::Table, Table::"KVSPSAHR Cockpit", 'KVSPSAOnUpsertUserSetupBeforeModifySetup', '', false, false)]
local procedure DoSomethingKVSPSAOnUpsertUserSetupBeforeModifySetup(var HRCockpit: Record "KVSPSAHR Cockpit"; var UserSetup: Record "User Setup")
begin
end;