BoCount Dynamics Approval

2/28/2023
6 minutes to read

Kopieer onderstaande syntax om een afhankelijkheid te nemen op deze extensie.

{  
    "id": "b035b213-58d0-4e1a-9ac6-dca6878ddf34",  
    "name": "BoCount Dynamics Approval",  
    "publisher": "Christiaens",  
    "version": "16.3.201202.0"  
}

Events

CFLOnAfterCheckApproval

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFLApproval Management", 'CFLOnAfterCheckApproval', '', false, false)]
local procedure CFLOnAfterCheckApproval(Approval: record "CFL Approval"; var IsHandled: boolean)
begin
end;

CFLOnAfterCheckPurchLine

Bij een goedkeurder kan ingesteld worden welke documenten dienen goedgekeurd worden. Indien de optie orders en afwijkende facturen wordt gekozen, dan gebeurt op moment van vrijgeven van een inkoopfactuur een controle tussen de factuur en het inkooporder. Indien van een regel de prijs of korting op de factuur niet overeenkomt met het order, of er een extra regel (geen tekstregel) op de factuur staat dan is deviation = true en wordt de goedkeuring getriggerd. Door in te grijpen op dit event is het mogelijk om extra voorwaarden te controleren en deviation aan te passen om desgewenst de goedkeuringsflow wel of niet te laten afgaan.

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFLApproval Management", 'CFLOnAfterCheckPurchLine', '', false, false)]
local procedure CFLOnAfterCheckPurchLine(var PurchLine: record "Purchase Line"; CFLApprover: record "CFL Approver"; var Deviation: boolean)
begin
end;

CFLOnAfterCheckPurchInvLine

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFLApproval Management", 'CFLOnAfterCheckPurchInvLine', '', false, false)]
local procedure CFLOnAfterCheckPurchInvLine(var PurchInvLine: record "Purch. Inv. Line"; CFLApprover: record "CFL Approver"; var Deviation: boolean)
begin
end;

CFLOnAfterCheckPurchCrMemoLine

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFLApproval Management", 'CFLOnAfterCheckPurchCrMemoLine', '', false, false)]
local procedure CFLOnAfterCheckPurchCrMemoLine(var PurchInvLine: record "Purch. Cr. Memo Line"; CFLApprover: record "CFL Approver"; var Deviation: boolean)
begin
end;

CFLOnBeforeAddApproval

Via de AddApproval parameter is het mogelijk om in te grijpen in het al dan niet toevoegen van de goedkeurder (CFLApprover parameter) in de goedkeuringen (CLF Approvals tabel) voor het document. Wanner de AddApproval false is wordt er geen goedkeuring gemaakt voor de goedkeurder.

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFLApproval Management", 'CFLOnBeforeAddApproval', '', false, false)]
local procedure CFLOnBeforeAddApproval(var PurchLine: record "Purchase Line"; CFLApprover: record "CFL Approver"; var AddApproval: boolean)
begin
end;

CFLOnBeforeAddApprovalInvoice

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFLApproval Management", 'CFLOnBeforeAddApprovalInvoice', '', false, false)]
local procedure CFLOnBeforeAddApprovalInvoice(var PurchInvLine: record "Purch. Inv. Line"; CFLApprover: record "CFL Approver"; var AddApproval: boolean)
begin
end;

CFLOnBeforeAddApprovalCrMemo

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFLApproval Management", 'CFLOnBeforeAddApprovalCrMemo', '', false, false)]
local procedure CFLOnBeforeAddApprovalCrMemo(var PurchInvLine: record "Purch. Cr. Memo Line"; CFLApprover: record "CFL Approver"; var AddApproval: boolean)
begin
end;

CFLOnBeforeCFLCheckApproversAdded

Na toevoegen van de goedkeuringen wordt gecontroleerd of er goedkeuringen zijn voor dit document en of er goedkeurders zijn ingesteld. Indien goedkeurders zijn ingesteld maar geen goedkeuringen zijn gemaakt voor dit document wordt gevraagd aan de gebruiker of die wil doorgaan. Indien de gebruiker bevestigt, wordt het veld afwachten ingevuld met X. Dit om aan te geven dat er goedkeuringen ontbreken omdat er waarschijnlijk vergeten is goedkeurders in te stellen op deze leverancier. Het is mogelijk deze logica te bypassen via dit event, door handled op true te zetten. dan wordt deze logica niet uitgevoerd.

local procedure CFLOnBeforeCFLCheckApproversAdded(var PurchaseHeader: record "Purchase Header"; var CFLApproval: record "CFL Approval"; var Handled: boolean)  
begin  
end;

CFLOnBeforeCFLCheckApproversAddedInvoice

local procedure CFLOnBeforeCFLCheckApproversAddedInvoice(var PurchInvHeader: record "Purch. Inv. Header"; var CFLApproval: record "CFL Approval"; var Handled: boolean)  
begin  
end;

CFLOnBeforeCFLCheckApproversAddedCrMemo

local procedure CFLOnBeforeCFLCheckApproversAddedCrMemo(var PurchCrMemoHeader: record "Purch. Cr. Memo Hdr."; var CFLApproval: record "CFL Approval"; var Handled: boolean)  
begin  
end;

CFLApprovalMgtOnAfterReleasePurchaseDocument

Gebruik dit event om in te grijpen in het proces na het toevoegen van alle goedkeurders.

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFLApproval Management", 'CFLOnAfterCheckPurchLine', '', false, false)]
local procedure CFLApprovalMgtOnAfterReleasePurchaseDocument(var PurchaseHeader: Record "Purchase Header"; PreviewMode: Boolean; var LinesWereModified: Boolean)
begin
end;

CFLApprovalMgtOnAfterSetFiltersOnApprover

Gebruik dit event om in te grijpen in het proces na het toevoegen van alle goedkeurders.

local procedure CFLApprovalMgtOnAfterSetFiltersOnApprover(PurchaseHeader: Record "Purchase Header"; var CFLApprover: record "CFL Approver")
begin
end;

CFLApprovalMgtOnAfterSetFiltersOnApproverInvoice

Gebruik dit event om in te grijpen in het proces na het toevoegen van alle goedkeurders.

local procedure CFLApprovalMgtOnAfterSetFiltersOnApproverInvoice(PurchInvHeader: Record "Purch. Inv. Header"; var CFLApprover: record "CFL Approver")
begin
end;

CFLApprovalMgtOnAfterSetFiltersOnApproverCrMemo

Gebruik dit event om in te grijpen in het proces na het toevoegen van alle goedkeurders.

local procedure CFLApprovalMgtOnAfterSetFiltersOnApproverCrMemo(PurchInvHeader: Record "Purch. Cr.Memo Hdr."; var CFLApprover: record "CFL Approver")
begin
end;

CFLOnBeforeResetManualApprovals

Gebruik dit event om in te grijpen in het resetten van manueel toegevoegde goedkeuringen.

local procedure CFLOnBeforeResetManualApprovals(var PurchaseHeader: Record "Purchase Header"; var IsHandled : boolean)
begin
end;

CFLOnBeforeResetManualApprovalsInvoice

Gebruik dit event om in te grijpen in het resetten van manueel toegevoegde goedkeuringen.

local procedure CFLOnBeforeResetManualApprovalsInvoice(var PurchInvHeader: Record "Purch. Inv. Header"; var IsHandled : boolean)
begin
end;

CFLOnBeforeResetManualApprovalsCrMemo

Gebruik dit event om in te grijpen in het resetten van manueel toegevoegde goedkeuringen.

local procedure CFLOnBeforeResetManualApprovalsCrMemo(var PurchCrMemoHeader: Record "Purch. Cr.Memo Hdr."; var IsHandled : boolean)
begin
end;

CFLOnBeforeApproveOtherJobTitles

Gebruik dit event om in te grijpen in het goedkeuren van de andere functies waartoe een gebruiker behoort.

local procedure CFLOnBeforeApproveOtherJobTitles(var CFLApproval: record "CFL Approval"; var IsHandled: boolean)
begin
end;

CFLOnBeforeInserttmpApprovalLineFromPurchLine

local procedure CFLOnBeforeInserttmpApprovalLineFromPurchLine(var tmpApprovalLine: record "CFL Approval Line"; PurchLine: record "Purchase Line");
begin
end;

CFLOnBeforeInserttmpApprovalLineFromPurchInvLine

local procedure CFLOnBeforeInserttmpApprovalLineFromPurchInvLine(var tmpApprovalLine: record "CFL Approval Line"; PurchInvLine: record "Purch. Inv. Line");
begin
end;

CFLOnBeforeInserttmpApprovalLineFromPurchCrMemoLine

 local procedure CFLOnBeforeInserttmpApprovalLineFromPurchCrMemoLine(var tmpApprovalLine: record "CFL Approval Line"; PurchCrMemoLine: record "Purch. Cr. Memo Line");
begin
end;

Enums

CFL Approval Status

extensible = true
values:

CFL None
CFL Approved
CFL Rejected Accounting
CFL Rejected Vendor

CFL Approver Documents

extensible = true
values:

CFL Purchase Orders
CFL Purchase Invoices
CFL Both
CFL Purchase Orders and Deviating Invoices

Tables

CFL Approval

procedure CFLSuspendAdminCheck

Gebruik deze functie om de check op admin rechten in of uit te schakelen.