Skip to content

KVSPSACalcJobAccWhereUsed#

Procedures#

AddTable(Record Integer, Integer) :#

Summary: Add the specified table ID to the IntegerBuffer if it does not already exist. This procedure is used to populate a buffer with table IDs that are relevant for job account analysis.

procedure AddTable(var IntegerBuffer: Record "Integer"; TableID: Integer):

Parameters:

  • IntegerBuffer: A buffer table to store the integer Values. The parameter is call by reference.
  • TableID: The ID of the table to be added.

CheckJobAcc(Code[20]) :#

Summary: Check the job account for usage in various tables and show where it is used. This procedure checks the specified job account number against various posting groups and displays where the job account is used.

procedure CheckJobAcc(JobAccNo: Code[20]):

Parameters:

  • JobAccNo: The No. of the Job Account which will be checked

CheckPostingGroups(Code[20]) :#

Summary: Check the posting groups for the specified job account number. This procedure retrieves the job account details and checks its usage in various tables.

procedure CheckPostingGroups(JobAccNo: Code[20]):

Parameters:

  • JobAccNo: The No. of the Job Account which will be checked

InsertGroupForRecord(Record KVSPSAJobAccountWhereUsed, Integer, Text[80], RecordId, Code[20], Code[20], Text[80]) :#

Summary: Insert a group for the specified record into the temporary job account where used table. This procedure is used to insert a new group entry for a job account in the temporary table.

procedure InsertGroupForRecord(var TempJobAccountWhereUsed: Record "KVSPSAJobAccountWhereUsed" temporary; TableID: Integer; TableCaption: Text[80]; YourRecordID: RecordId; JobAccNo: Code[20]; JobAccNo2: Code[20]; FieldCaption: Text[80]):

Parameters:

  • TempJobAccountWhereUsed: Temporary Table of the Used Job Accounts. The Parameter is call by reference
  • TableID: The ID of the table where the job account is used.
  • TableCaption: The caption of the table where the job account is used.
  • YourRecordID: The Record ID of the record where the job account is used.
  • JobAccNo: The No. of the Job Account which will be checked
  • JobAccNo2: The No. of the Job Account which will be checked (can be different from JobAccNo)
  • FieldCaption: The caption of the field where the job account is used.

ShowSetupPage(Record KVSPSAJobAccountWhereUsed) :#

Summary: Show the setup page for the specified job account where used record. This procedure opens the corresponding setup page based on the table ID of the job account where used record. It handles different table IDs and opens the appropriate page for analysis or setup. If the table ID does not match any predefined cases, it calls an extension event (KVSPSAOnShowExtensionPage) to handle the page opening.

procedure ShowSetupPage(var JobAccountWhereUsed: Record "KVSPSAJobAccountWhereUsed"):

Parameters:

  • JobAccountWhereUsed: Table of the Used Job Account. The Parameter is call by reference

Events#

KVSPSAOnAfterCheckPostingGroups(Record KVSPSAJobAccountWhereUsed, Code[20]) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterCheckPostingGroups(var TempJobAccountWhereUsed: Record "KVSPSAJobAccountWhereUsed" temporary; JobAccNo: Code[20]): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSACalcJobAccWhereUsed", 'KVSPSAOnAfterCheckPostingGroups', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterCheckPostingGroups(var TempJobAccountWhereUsed: Record "KVSPSAJobAccountWhereUsed" temporary; JobAccNo: Code[20])
begin
end;

KVSPSAOnAfterFillTableBuffer(Record Integer) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterFillTableBuffer(var IntegerTableBuffer: Record "Integer"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSACalcJobAccWhereUsed", 'KVSPSAOnAfterFillTableBuffer', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterFillTableBuffer(var IntegerTableBuffer: Record "Integer")
begin
end;

KVSPSAOnBeforeShowJobAccWhereUsed(Record KVSPSAJobAccountWhereUsed) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnBeforeShowJobAccWhereUsed(var JobAccountWhereUsed: Record "KVSPSAJobAccountWhereUsed"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSACalcJobAccWhereUsed", 'KVSPSAOnBeforeShowJobAccWhereUsed', '', false, false)]
local procedure DoSomethingKVSPSAOnBeforeShowJobAccWhereUsed(var JobAccountWhereUsed: Record "KVSPSAJobAccountWhereUsed")
begin
end;

KVSPSAOnShowExtensionPage(Record KVSPSAJobAccountWhereUsed) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnShowExtensionPage(JobAccountWhereUsed: Record "KVSPSAJobAccountWhereUsed"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSACalcJobAccWhereUsed", 'KVSPSAOnShowExtensionPage', '', false, false)]
local procedure DoSomethingKVSPSAOnShowExtensionPage(JobAccountWhereUsed: Record "KVSPSAJobAccountWhereUsed")
begin
end;