Skip to content

KVSPSACreateInvoiceSugLines#

Procedures#

SetGlobalHideDialogInGetInvoiceSuggestionLines(Boolean) :#

Summary: Allows to set the KVSPSAGetInvoiceSuggestiLines to silent. Used for automatic processes.

procedure SetGlobalHideDialogInGetInvoiceSuggestionLines(NewGlobalHideDialogInGetInvoiceSuggestionLines: Boolean):

Parameters:

  • NewGlobalHideDialogInGetInvoiceSuggestionLines: True if the dialog should be hidden

SetOptions(Enum KVSPSAJobJournalLineType, Text, Boolean, Enum KVSPSAInvSuggLiWBSStatusFilter) :#

Summary: Sets the 4 options available on the request page, for automatic calls

procedure SetOptions(NewJobLedgerEntryTypeFilter: Enum "KVSPSAJobJournalLineType"; NewJobLedgerEntryNoFilter: Text; NewDeleteInvEntryInOrders: Boolean; NewInvSuggLiWBSStatusFilter: Enum "KVSPSAInvSuggLiWBSStatusFilter"):

Parameters:

  • NewJobLedgerEntryTypeFilter: The type of the project ledger entry
  • NewJobLedgerEntryNoFilter: The number of the project ledger entry
  • NewDeleteInvEntryInOrders: True if the invoice entries should be deleted from the sales order
  • NewInvSuggLiWBSStatusFilter: The status of the WBS line

SetTemplateAndWorksheet(Code[10], Code[10]) :#

Summary: Set the template and worksheet for the invoice suggestion.

procedure SetTemplateAndWorksheet(TemplateName: Code[10]; WorksheetName: Code[10]):

Parameters:

  • TemplateName: Template name to use
  • WorksheetName: Worksheet name to use

Events#

KVSPSAOnGetFiltersFromInvSugLine(Record KVSPSAInvoice Suggestion Line, Text) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnGetFiltersFromInvSugLine(var InvoiceSuggestionLine: Record "KVSPSAInvoice Suggestion Line"; var OwnFilterTextArray: Text): 

[EventSubscriber(ObjectType::Report, Report::"KVSPSACreateInvoiceSugLines", 'KVSPSAOnGetFiltersFromInvSugLine', '', false, false)]
local procedure DoSomethingKVSPSAOnGetFiltersFromInvSugLine(var InvoiceSuggestionLine: Record "KVSPSAInvoice Suggestion Line"; var OwnFilterTextArray: Text)
begin
end;

KVSPSAOnSetOwnEmptyFilterErrorExist(Boolean, Text) :#

[IntegrationEvent(false, false)]
local procedure KVSPSAOnSetOwnEmptyFilterErrorExist(var OwnFilterShouldBefilled: Boolean; var OwnFilterTextArray: Text): 

[EventSubscriber(ObjectType::Report, Report::"KVSPSACreateInvoiceSugLines", 'KVSPSAOnSetOwnEmptyFilterErrorExist', '', false, false)]
local procedure DoSomethingKVSPSAOnSetOwnEmptyFilterErrorExist(var OwnFilterShouldBefilled: Boolean; var OwnFilterTextArray: Text)
begin
end;