Skip to content

KVSKBALabelMgt#

Procedures#

CreateLabelFile(Record KVSKBAItemLabelRelation, Code[10], Code[50], Code[50], Date, Date, Integer, Integer, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Code[20], Boolean, Code[10], Code[10], Code[20], Code[50], Boolean) :#

procedure CreateLabelFile(itemLabelRelation: Record "KVSKBAItemLabelRelation"; itemUoM: Code[10]; serialNo: Code[50]; lotNo: Code[50]; expirationDate: Date; productionDate: Date; qtyToPrint: Integer; sourceType: Integer; sourceSubtype: Enum "KVSKBAIntegerAsEnum"; sourceID: Code[20]; sourceRefNo: Integer; documentNo: Code[20]; forceActiveVersion: Boolean; postingCode: Code[10]; locationCode: Code[10]; binCode: Code[20]; extLotNo: Code[50]; showFinishMessage: Boolean): 

CreateLabelFile(Record KVSKBAItemLabelRelation, Code[10], Code[50], Code[50], Date, Date, Integer, Integer, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Code[20], Boolean, Code[10], Code[10], Code[20], Code[50], Date, Boolean) :#

procedure CreateLabelFile(itemLabelRelation: Record "KVSKBAItemLabelRelation"; itemUoM: Code[10]; serialNo: Code[50]; lotNo: Code[50]; expirationDate: Date; productionDate: Date; qtyToPrint: Integer; sourceType: Integer; sourceSubtype: Enum "KVSKBAIntegerAsEnum"; sourceID: Code[20]; sourceRefNo: Integer; documentNo: Code[20]; forceActiveVersion: Boolean; postingCode: Code[10]; locationCode: Code[10]; binCode: Code[20]; extLotNo: Code[50]; printDate: Date; showFinishMessage: Boolean): 

CreateLabelFile(Record KVSKBAItemLabelRelation, Code[10], Code[50], Code[50], Date, Date, Integer, Integer, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Code[20], Boolean, Code[10], Code[10], Code[20], Code[50], Code[10], Text[30], Boolean) :#

procedure CreateLabelFile(itemLabelRelation: Record "KVSKBAItemLabelRelation"; itemUoM: Code[10]; serialNo: Code[50]; lotNo: Code[50]; expirationDate: Date; productionDate: Date; qtyToPrint: Integer; sourceType: Integer; sourceSubtype: Enum "KVSKBAIntegerAsEnum"; sourceID: Code[20]; sourceRefNo: Integer; documentNo: Code[20]; forceActiveVersion: Boolean; postingCode: Code[10]; locationCode: Code[10]; binCode: Code[20]; extLotNo: Code[50]; PharmacentralNo: Code[10]; ApplianceNo: Text[30]; showFinishMessage: Boolean): 

CreateLabelFile(Record KVSKBAItemLabelRelation, Code[10], Code[50], Code[50], Date, Date, Integer, Integer, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Code[20], Boolean, Code[10], Code[10], Code[20], Code[50], Date, Code[10], Text[30], Boolean) :#

procedure CreateLabelFile(itemLabelRelation: Record "KVSKBAItemLabelRelation"; itemUoM: Code[10]; serialNo: Code[50]; lotNo: Code[50]; expirationDate: Date; productionDate: Date; qtyToPrint: Integer; sourceType: Integer; sourceSubtype: Enum "KVSKBAIntegerAsEnum"; sourceID: Code[20]; sourceRefNo: Integer; documentNo: Code[20]; forceActiveVersion: Boolean; postingCode: Code[10]; locationCode: Code[10]; binCode: Code[20]; extLotNo: Code[50]; printDate: Date; PharmacentralNo: Code[10]; ApplianceNo: Text[30]; showFinishMessage: Boolean): 

CreateLabelForPurchRcptLine(Record Purch. Rcpt. Line) :#

procedure CreateLabelForPurchRcptLine(var purchRcptLine: Record "Purch. Rcpt. Line"): 

CreateLabelForWhseReceiptHeader(Record Warehouse Receipt Header) :#

procedure CreateLabelForWhseReceiptHeader(var whseRcptHeader: Record "Warehouse Receipt Header"): 

CreateLabelForWhseReceiptLine(Record Warehouse Receipt Line) :#

procedure CreateLabelForWhseReceiptLine(var whseRcptLine: Record "Warehouse Receipt Line"): 

CreateLabelForWhseShipment(Code[20]) :#

procedure CreateLabelForWhseShipment(whseShpmtNo: Code[20]): 

CreateLabelForWhseShipmenttLine(Record Warehouse Shipment Line) :#

procedure CreateLabelForWhseShipmenttLine(var whseShpmtLine: Record "Warehouse Shipment Line"): 

CreateLabelForProductionOrder(Record Production Order) :#

procedure CreateLabelForProductionOrder(var prodOrder: Record "Production Order"): 

CreateLabelForProdOrderLine(Record Prod. Order Line) :#

procedure CreateLabelForProdOrderLine(var prodOrderLine: Record "Prod. Order Line"): 

CreateLabelLogEntryContent(Text, Record KVSKBALabelContentHeader) :#

procedure CreateLabelLogEntryContent(fileContent: Text; TempLabelContentHeader: Record "KVSKBALabelContentHeader" temporary): 

GetLabelVersion(Code[20], Date, Boolean) : Code[10]#

procedure GetLabelVersion(LabelStructureCodePar: Code[20]; datePar: Date; onlyCertified: Boolean): Code[10]

FormatUserName(Text) : Text#

procedure FormatUserName(userNamePar: Text): Text

CreateAndReturnLabelContentData(Record KVSKBALabelContentHeader, Record KVSKBALabelContentLine, Boolean) : Boolean#

procedure CreateAndReturnLabelContentData(var labelContentHeader: Record "KVSKBALabelContentHeader"; var labelContentLine: Record "KVSKBALabelContentLine"; isPreview: Boolean): Boolean

Events#

OnAfterCodeOnBeforePostWhseReceipt() :#

[IntegrationEvent(false, false)]
local procedure OnAfterCodeOnBeforePostWhseReceipt(): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnAfterCodeOnBeforePostWhseReceipt', '', false, false)]
local procedure DoSomethingOnAfterCodeOnBeforePostWhseReceipt()
begin
end;

OnBeforeCreateLabelLogEntryContent(Record KVSKBALabelPrintJobArchive, Record KVSKBALabelContentHeader) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCreateLabelLogEntryContent(var KVSKBALabelPrintJobArchive: Record "KVSKBALabelPrintJobArchive"; KVSKBALabelContentHeader: Record "KVSKBALabelContentHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnBeforeCreateLabelLogEntryContent', '', false, false)]
local procedure DoSomethingOnBeforeCreateLabelLogEntryContent(var KVSKBALabelPrintJobArchive: Record "KVSKBALabelPrintJobArchive"; KVSKBALabelContentHeader: Record "KVSKBALabelContentHeader")
begin
end;

OnCreateLabelContentHeaderOnBeforeTempLabelContentHeaderInsert(Record KVSKBALabelContentHeader, Record KVSKBAItemLabelRelation, Code[10], Code[50], Code[50], Date, Date, Integer, Integer, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Code[20], Boolean, Code[10], Code[10], Code[20], Date) :#

[IntegrationEvent(false, false)]
local procedure OnCreateLabelContentHeaderOnBeforeTempLabelContentHeaderInsert(var TempKVSKBALabelContentHeader: Record "KVSKBALabelContentHeader" temporary; ItemLabelRelation: Record "KVSKBAItemLabelRelation"; ItemUoM: Code[10]; SerialNo: Code[50]; LotNo: Code[50]; ExpirationDate: Date; ProductionDate: Date; QtyToPrint: Integer; SourceType: Integer; SourceSubtype: Enum "KVSKBAIntegerAsEnum"; SourceID: Code[20]; SourceRefNor: Integer; DocumentNo: Code[20]; ForceActiveVersion: Boolean; PostingCode: Code[10]; LocationCode: Code[10]; BinCode: Code[20]; PrintDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnCreateLabelContentHeaderOnBeforeTempLabelContentHeaderInsert', '', false, false)]
local procedure DoSomethingOnCreateLabelContentHeaderOnBeforeTempLabelContentHeaderInsert(var TempKVSKBALabelContentHeader: Record "KVSKBALabelContentHeader" temporary; ItemLabelRelation: Record "KVSKBAItemLabelRelation"; ItemUoM: Code[10]; SerialNo: Code[50]; LotNo: Code[50]; ExpirationDate: Date; ProductionDate: Date; QtyToPrint: Integer; SourceType: Integer; SourceSubtype: Enum "KVSKBAIntegerAsEnum"; SourceID: Code[20]; SourceRefNor: Integer; DocumentNo: Code[20]; ForceActiveVersion: Boolean; PostingCode: Code[10]; LocationCode: Code[10]; BinCode: Code[20]; PrintDate: Date)
begin
end;

OnBeforeUseContentDialog(Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeUseContentDialog(var ShowContentDialog: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnBeforeUseContentDialog', '', false, false)]
local procedure DoSomethingOnBeforeUseContentDialog(var ShowContentDialog: Boolean; var IsHandled: Boolean)
begin
end;

OnBeforeSelectLabel(Boolean, Record KVSKBAItemLabelRelation, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeSelectLabel(var NotAborted: Boolean; var itemLabelRelation: Record "KVSKBAItemLabelRelation"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnBeforeSelectLabel', '', false, false)]
local procedure DoSomethingOnBeforeSelectLabel(var NotAborted: Boolean; var itemLabelRelation: Record "KVSKBAItemLabelRelation"; var IsHandled: Boolean)
begin
end;

OnCreatePurchLineLabelFilesOnAfterAssignPrintDate(Record Purch. Rcpt. Header, Record Purch. Rcpt. Line, Date) :#

[IntegrationEvent(false, false)]
local procedure OnCreatePurchLineLabelFilesOnAfterAssignPrintDate(PurchRcptHeader: Record "Purch. Rcpt. Header"; PurchRcptLine: Record "Purch. Rcpt. Line"; var PrintDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnCreatePurchLineLabelFilesOnAfterAssignPrintDate', '', false, false)]
local procedure DoSomethingOnCreatePurchLineLabelFilesOnAfterAssignPrintDate(PurchRcptHeader: Record "Purch. Rcpt. Header"; PurchRcptLine: Record "Purch. Rcpt. Line"; var PrintDate: Date)
begin
end;

OnCreateWhseRcptLineLabelFilesOnAfterAssignPrintDate(Record Warehouse Receipt Header, Record Warehouse Receipt Line, Date) :#

[IntegrationEvent(false, false)]
local procedure OnCreateWhseRcptLineLabelFilesOnAfterAssignPrintDate(WarehouseReceiptHeader: Record "Warehouse Receipt Header"; WarehouseReceiptLine: Record "Warehouse Receipt Line"; var PrintDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnCreateWhseRcptLineLabelFilesOnAfterAssignPrintDate', '', false, false)]
local procedure DoSomethingOnCreateWhseRcptLineLabelFilesOnAfterAssignPrintDate(WarehouseReceiptHeader: Record "Warehouse Receipt Header"; WarehouseReceiptLine: Record "Warehouse Receipt Line"; var PrintDate: Date)
begin
end;

OnCreateWhseShipmtLineLabelFilesOnAfterAssignPrintDate(Record Warehouse Shipment Header, Record Warehouse Shipment Line, Date) :#

[IntegrationEvent(false, false)]
local procedure OnCreateWhseShipmtLineLabelFilesOnAfterAssignPrintDate(WarehouseShipmentHeader: Record "Warehouse Shipment Header"; whseShpmtLine: Record "Warehouse Shipment Line"; var PrintDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnCreateWhseShipmtLineLabelFilesOnAfterAssignPrintDate', '', false, false)]
local procedure DoSomethingOnCreateWhseShipmtLineLabelFilesOnAfterAssignPrintDate(WarehouseShipmentHeader: Record "Warehouse Shipment Header"; whseShpmtLine: Record "Warehouse Shipment Line"; var PrintDate: Date)
begin
end;

OnCreateProdOrderLineLabelFilesOnAfterAssignPrintDate(Record Prod. Order Line, Date) :#

[IntegrationEvent(false, false)]
local procedure OnCreateProdOrderLineLabelFilesOnAfterAssignPrintDate(ProdOrderLine: Record "Prod. Order Line"; var PrintDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnCreateProdOrderLineLabelFilesOnAfterAssignPrintDate', '', false, false)]
local procedure DoSomethingOnCreateProdOrderLineLabelFilesOnAfterAssignPrintDate(ProdOrderLine: Record "Prod. Order Line"; var PrintDate: Date)
begin
end;

OnAfterSetFilterItemLedgerEntryforOther(Record Item Ledger Entry, Code[20], Integer, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Code[20], Code[10], Code[10], Decimal, Code[10], Code[20]) :#

[IntegrationEvent(false, false)]
local procedure OnAfterSetFilterItemLedgerEntryforOther(var ItemLedgerEntry: Record "Item Ledger Entry"; CalledFromDocNo: Code[20]; SourceType: Integer; SourceSubtype: Enum "KVSKBAIntegerAsEnum"; SourceDocNo: Code[20]; SourceDocLineNo: Integer; ItemNo: Code[20]; var VariantCode: Code[10]; UoM: Code[10]; Qty: Decimal; LocationCode: Code[10]; BinCode: Code[20]): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnAfterSetFilterItemLedgerEntryforOther', '', false, false)]
local procedure DoSomethingOnAfterSetFilterItemLedgerEntryforOther(var ItemLedgerEntry: Record "Item Ledger Entry"; CalledFromDocNo: Code[20]; SourceType: Integer; SourceSubtype: Enum "KVSKBAIntegerAsEnum"; SourceDocNo: Code[20]; SourceDocLineNo: Integer; ItemNo: Code[20]; var VariantCode: Code[10]; UoM: Code[10]; Qty: Decimal; LocationCode: Code[10]; BinCode: Code[20])
begin
end;

OnAfterSetFilterItemLedgerEntryforProductionLine(Record Item Ledger Entry, Code[20], Integer, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Code[20], Code[10], Code[10], Decimal, Code[10], Code[20]) :#

[IntegrationEvent(false, false)]
local procedure OnAfterSetFilterItemLedgerEntryforProductionLine(var ItemLedgerEntry: Record "Item Ledger Entry"; CalledFromDocNo: Code[20]; SourceType: Integer; SourceSubtype: Enum "KVSKBAIntegerAsEnum"; SourceDocNo: Code[20]; SourceDocLineNo: Integer; ItemNo: Code[20]; var VariantCode: Code[10]; UoM: Code[10]; Qty: Decimal; LocationCode: Code[10]; BinCode: Code[20]): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnAfterSetFilterItemLedgerEntryforProductionLine', '', false, false)]
local procedure DoSomethingOnAfterSetFilterItemLedgerEntryforProductionLine(var ItemLedgerEntry: Record "Item Ledger Entry"; CalledFromDocNo: Code[20]; SourceType: Integer; SourceSubtype: Enum "KVSKBAIntegerAsEnum"; SourceDocNo: Code[20]; SourceDocLineNo: Integer; ItemNo: Code[20]; var VariantCode: Code[10]; UoM: Code[10]; Qty: Decimal; LocationCode: Code[10]; BinCode: Code[20])
begin
end;

OnCollectLabelInfosOnAfterSetfilterItemLabelRelation(Record KVSKBAItemLabelRelation, Code[20], Integer, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Code[20], Code[10], Code[10], Decimal, Boolean, Code[10], Code[10], Code[20], Boolean, Date) :#

[IntegrationEvent(false, false)]
local procedure OnCollectLabelInfosOnAfterSetfilterItemLabelRelation(var ItemLabelRelation: Record "KVSKBAItemLabelRelation"; CalledFromDocNo: Code[20]; SourceType: Integer; SourceSubtype: Enum "KVSKBAIntegerAsEnum"; SourceDocNo: Code[20]; SourceDocLineNo: Integer; ItemNo: Code[20]; VariantCode: Code[10]; UoM: Code[10]; Qty: Decimal; UseReservEntries: Boolean; PostingCode: Code[10]; LocationCode: Code[10]; BinCode: Code[20]; UserAborted: Boolean; PrintDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBALabelMgt", 'OnCollectLabelInfosOnAfterSetfilterItemLabelRelation', '', false, false)]
local procedure DoSomethingOnCollectLabelInfosOnAfterSetfilterItemLabelRelation(var ItemLabelRelation: Record "KVSKBAItemLabelRelation"; CalledFromDocNo: Code[20]; SourceType: Integer; SourceSubtype: Enum "KVSKBAIntegerAsEnum"; SourceDocNo: Code[20]; SourceDocLineNo: Integer; ItemNo: Code[20]; VariantCode: Code[10]; UoM: Code[10]; Qty: Decimal; UseReservEntries: Boolean; PostingCode: Code[10]; LocationCode: Code[10]; BinCode: Code[20]; UserAborted: Boolean; PrintDate: Date)
begin
end;