BoCount Dynamics Warehouse

  • 5 minutes to read

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

{  
    "id": "4202775a-e46d-48db-b738-dc57bb2f78ae",  
    "name": "BoCount Dynamics Warehouse",  
    "publisher": "Christiaens",  
    "version": "16.3.200914.0"  
}

Procedures

Page "CFL Scanner Whse. Rcpt. Input"

CFLGetCurrentLine

Deze procedure geeft de huidige ontvangstregel terug.

CFLGetExpirationDate

Deze procedure geeft de ingegeven vervaldatum terug.

CFLGetPackageNo

Deze procedure geeft het ingegeven pakketnummer terug.

Events

OnBeforeQtyAvailable (Codeunit "CFL Sales Availibity Mgt" en "CFL Purchase Availibity Mgt")

Gebruik dit event om in te grijpen in de berekening van het beschikbaar aantal. Indien QtyAvialable wordt aangepast wordt best Handled op true geplaatst zodat de standaard BoCount berekening niet meer wordt uitgevoerd.

De berekening van het beschikbaar aantal is als volgt:

  • voor artikelen van type service of niet-voorraad is er altijd beschikbaarheid
  • voor artikelen van type voorraad maar met voorkom negatieve voorraad = nee is er altijd beschikbaarheid
  • voor verkooporderlijnen met inkoopcode speciaal order wordt gekeken naar het ontvangen aantal van het bijhorende inkooporder
  • voor assemblage-artikelen wordt gekeken naar de mogelijk te assembleren
  • indien gereserveerd wordt gekeken naar het aantal reservaties dat op artikelposten ligt anders
  • is het beschikbaar aantal gelijk aan, rekening houdende met vestiging en variant van de orderlijn: voorraad - gereserveerd aantal - (aantal op picks - gereserveerd aantal op picks)
[EventSubscriber(ObjectType::Table, Database::"CFL Availibity Mgt", 'OnBeforeQtyAvailable', '', false, false)]
local procedure OnBeforeQtyAvailable(SalesLine: record "Sales Line"; var Handled: boolean; var QtyAvailable: decimal)
begin
end;

OnBeforeCreateWhseReceipt

Page "CFL Dispatch Board Receipts" en "CFL Dispatch Board ReturnRcpts"

Gebruik dit event om in te grijpen in het maken van de magazijnontvangst. Indien Handled op true wordt geplaatst dan wordt de standaard BoCount code voor aanmaak van een magazijnontvangst niet doorlopen.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Receipts", 'OnBeforeCreateWhseReceipt', '', false, false)]
local procedure OnBeforeCreateWhseReceipt(var PurchLine: record "Purchase Line"; Type: enum "CFL Whse. Receipt Type"; var Handled: boolean; var Show: boolean)
begin
end;

CFLOnBeforeShowWarehouseReceipt

Page "CFL Dispatch Board Receipts" en "CFL Dispatch Board ReturnRcpts" en "CFL Dispatch Board Transfer Receipt"

Gebruik dit event om in te grijpen in het maken van de magazijnontvangst.
Show parameter zal bepalen of de magazijnontvangst wordt weergegeven na aanmaak.

local procedure CFLOnBeforeShowWarehouseReceipt(var WhseRcptheader: record "Warehouse Receipt Header"; var Show: boolean)
begin
end;

CFLOnBeforeShowWarehouseShipment

Page "CFL Dispatch Board Shipments" en "CFL Dispatch Board ReturnShpmts" en "CFL Dispatch Board Transfer Receipt"

Gebruik dit event om in te grijpen in het maken van de magazijnverzending.
Show parameter zal bepalen of de magazijnverzending wordt weergegeven na aanmaak.

local procedure CFLOnBeforeShowWarehouseShipment(var WhseShptHeader: record "Warehouse Shipment Header"; var Show: boolean)
begin
end;

CFLOnBeforeGetSourceDocumentsOnAfterCreateRcptHeader

Codeunit "CFL Warehouse Mgt."

Gebruik dit event om in te grijpen bij het maken van een magazijnontvangst op de standaardmanier, dus zonder het planbord ontvangst. Dit event zit net voor het tonen van de ontvangstopslaglocaties, als die getoond moeten worden.

[EventSubscriber(ObjectType::Codeunit, Codeunit::"CFL Warehouse Mgt.", 'CFLOnBeforeGetSourceDocumentsOnAfterCreateRcptHeader', '', true, true)]
local procedure CFLOnBeforeGetSourceDocumentsOnAfterCreateRcptHeader"(var WarehouseReceiptHeader: Record "Warehouse Receipt Header"; WarehouseRequest: Record "Warehouse Request"; PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;

OnAfterGetCaption

Page "CFL Scanner Whse. Rcpt. Input", "CFL Scanner Whse. Pick Input", "CFL Scanner Whse. Put Input", "CFL Scanner Warehouse Movement" en "CFL Scanner Whse. Mov. Input"

Gebruik dit event de caption van de bovengenoemde pagina's aan te passen..

[EventSubscriber(ObjectType::Page, Page::"CFL Scanner Whse. Put Input", 'OnAfterGetCaption', '', false, false)]
local procedure OnAfterGetCaption(vvar Caption: text; WarehouseActivityLine: record "Warehouse Activity Line")
begin
end;
TIP

Maak een enumextensie op "CFL Whse. Shipment Type" om zowel de standaardfunctionaliteit als de custom te kunnen gebruiken.

OnAfterPurchLineSetFilters

Gebruik dit event om in te grijpen in de inkooporderregels waarvoor een magazijnontvangst wordt gemaakt.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Receipts", 'OnAfterPurchLineSetFilters', '', false, false)]
local procedure OnAfterPurchLineSetFilters(var PurchLine: record "Purchase Line"; SelectionType: enum "CFL Whse. Receipt Type"; var SelectedLines: Record "Purchase Line" temporary)
begin
end;

OnAfterSetFilters

Page "CFL Dispatch Board Receipts" en "CFL DispatchBoard ReturnShpmts"

Gebruik dit event om in te grijpen in de getoonde records op het planningsbord ontvangst en retourverzending.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Receipts", 'OnAfterSetFilters', '', false, false)]
local procedure OnAfterSetFilters(var PurchLine: record "Purchase Line")
begin
end;

OnAfterGetRecordStyle

Gebruik dit event om in te grijpen in kleurcodering van een inkooporderregel.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Receipts", 'OnAfterGetRecordStyle', '', false, false)]
local procedure OnAfterGetRecordStyle(var PurchLine: record "Purchase Line"; var Style: text; var ShowPickEnabled : boolean; var ShowWhseShptEnabled : Boolean;var CreateWhseShptEnabled :boolean)
begin
end;

Style: de stijl waarin de lijn wordt weergegeven.
ShowPickEnabled: bepaald de enabled property van de knop Pick weergeven.
ShowWhseShptEnabled: bepaald de enabled property van de knop Magazijnverzending weergeven.
CreateWhseShptEnabled: bepaald de enabled property van de knop Magazijnverzending maken.

TIP

Indien je hier ingrijpt om andere kleurcoderingen te gebruiker, vergeet dan niet om bij de BoCount Dynamics systeeminstellingen onder "kleuren" - "kleurcodering" de nieuwe kleurcoderingen op te nemen. Deze dienen als legende voor de gebruiker.

OnBeforeCreateWhseShipment

Gebruik dit event om in te grijpen in het maken van de magazijnverzending. Indien Handled op true wordt geplaatst dan wordt de standaard BoCount code voor aanmaak van een magazijnverzending niet doorlopen.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Shipments", 'OnBeforeCreateWhseShipment', '', false, false)]
local procedure OnBeforeCreateWhseShipment(var SalesLine: record "Sales Line"; Type: enum "CFL Whse. Shipment Type"; var Handled: boolean; var Show: Boolean; var Print: Boolean)
begin
end;
TIP

Maak een enumextensie op "CFL Whse. Receipt Type" om zowel de standaardfunctionaliteit als de custom te kunnen gebruiken.

OnAfterSalesLineSetFilters

Gebruik dit event om in te grijpen in de verkooporderregels waarvoor een magazijnverzending wordt gemaakt.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Shipments", 'OnAfterSalesLineSetFilters', '', false, false)]
local procedure OnAfterSalesLineSetFilters(var SalesLine: record "Sales Line"; SelectionType: enum "CFL Whse. Shipment Type"; var SelectedLines: Record "Sales Line" temporary)
begin
end;

OnAfterSetFilters

Page "CFL Dispatch Board Shipments" en "CFL Dispatch Board ReturnRcpts"

Gebruik dit event om in te grijpen in de getoonde records op het planningsbord verzending en retourontvangst.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Shipments", 'OnAfterSetFilters', '', false, false)]
local procedure OnAfterSetFilters(var SalesLine: record "Sales Line")
begin
end;

OnAfterGetRecordStyle

Gebruik dit event om in te grijpen in kleurcodering van een verkooporderregel.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Shipments", 'OnAfterGetRecordStyle', '', false, false)]
local procedure OnAfterGetRecordStyle(var SalesLine: record "Sales Line"; QtyAvailable: decimal; var Style: text)
begin
end;
TIP

Indien je hier ingrijpt om andere kleurcoderingen te gebruiker, vergeet dan niet om bij de BoCount Dynamics systeeminstellingen onder "kleuren" - "kleurcodering" de nieuwe kleurcoderingen op te nemen. Deze dienen als legende voor de gebruiker.

OnAfterSetFilters

Page "CFL DispatchBoardTransferShpmt" en "CFL DispatchBoardTransferRcpts"

Gebruik dit event om in te grijpen in de getoonde records op het planningsbord transferverzending en -ontvangst.

[EventSubscriber(ObjectType::Page, Page::"CFL Dispatch Board Shipments", 'OnAfterSetFilters', '', false, false)]
local procedure OnAfterSetFilters(var TransferLine: record "Transfer Line")
begin
end;

CFLOnAfterSetLocationCodeOpenPage

Gebruik dit event om in te grijpen in na het invullen van de filters in de OnOpenPage.

[EventSubscriber(ObjectType::Page, page::"CFL Dispatch Board Receipts", 'CFLOnAfterSetLocationCodeOpenPage', '', false, false)]
local procedure CFLOnAfterSetLocationCodeOpenPage(var LocationCode: code[10])
begin    
end;

Enums

CFL Whse. Shipment Type

extensible = true
values:

  • CFL Customer
  • CFL Order
  • CFL Selection

CFL Whse. Receipt Type

extensible = true
values:

  • CFL Vendor
  • CFL Order
  • CFL Selection