Codeunit 18122703 EOS 070 MES Management

Codeunit 18122703 EOS 070 MES Management

Codeunit MES Functions

Methods

CalcNextNo

procedure CalcNextNo(LocTemplateName: Code[10]; LocBatchName: Code[10]): Integer

Parameters / Return Value

  • LocTemplateName Code[10]

  • LocBatchName Code[10]

  • Returns Integer

CalcTime

procedure CalcTime(UnitofMeasureCode: Code[10]; WorkCenterNo: Code[20]; EOSMESEmployeeEntry: Record "EOS 070 MES Employee Entry"; var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par."): Decimal

Parameters / Return Value

  • UnitofMeasureCode Code[10]

  • WorkCenterNo Code[20]

  • EOSMESEmployeeEntry Record "EOS 070 MES Employee Entry"

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

  • Returns Decimal

TimeFactor

procedure TimeFactor(UnitOfMeasureCode: code[10]): Decimal

Parameters / Return Value

  • UnitOfMeasureCode code[10]

  • Returns Decimal

CheckBadge

procedure CheckBadge(Employee: Record Employee; xEmployee: Record Employee)

Parameters / Return Value

  • Employee Record "Employee"

  • xEmployee Record "Employee"

GenerateMD5Hash

procedure GenerateMD5Hash(InputText: Text) Hash: Text[32]

Parameters / Return Value

  • InputText Text

  • Returns Text[32]

CheckMachineOrWorkCenterCode

procedure CheckMachineOrWorkCenterCode(CapacityType: Enum "Capacity Type"; CenterNo: Code[20])

Parameters / Return Value

  • CapacityType Enum "Capacity Type"

  • CenterNo Code[20]

OnDeleteEmplEntries

procedure OnDeleteEmplEntries(var EOSMESEmployeeEntry: Record "EOS 070 MES Employee Entry")

Parameters / Return Value

  • EOSMESEmployeeEntry Record "EOS 070 MES Employee Entry"

CheckEmployeeVSWorkCenter

procedure CheckEmployeeVSWorkCenter(EmployeeNoo: Code[20]; WorkCenterNo: Code[20])

Parameters / Return Value

  • EmployeeNoo Code[20]

  • WorkCenterNo Code[20]

FindEmployeeFromBadge

procedure FindEmployeeFromBadge(BadgeNo: code[20]; var Employee: record Employee): Boolean

Parameters / Return Value

  • BadgeNo code[20]

  • Employee record "Employee"

  • Returns Boolean

CloseEntryTime

procedure CloseEntryTime(NrEntry: Integer)

Parameters / Return Value

  • NrEntry Integer

CloseUnsupervisedMachineEntryTime

procedure CloseUnsupervisedMachineEntryTime(EntryNo: Integer)

Parameters / Return Value

  • EntryNo Integer

GetEmployeeNoFromBadge

procedure GetEmployeeNoFromBadge(BadgeNo: code[20]): code[20]

Parameters / Return Value

  • BadgeNo code[20]

  • Returns code[20]

GetOperationDescFromEmplEntry

procedure GetOperationDescFromEmplEntry(EOSMESEmployeeEntry: Record "EOS 070 MES Employee Entry"): Text

Parameters / Return Value

  • EOSMESEmployeeEntry Record "EOS 070 MES Employee Entry"

  • Returns Text

GetEntryTypeStyleFromEmplEntry

procedure GetEntryTypeStyleFromEmplEntry(EOSMESEmployeeEntry: Record "EOS 070 MES Employee Entry"): Text

Parameters / Return Value

  • EOSMESEmployeeEntry Record "EOS 070 MES Employee Entry"

  • Returns Text

GetStatusStyleFromEmplEntry

procedure GetStatusStyleFromEmplEntry(EOSMESEmployeeEntry: Record "EOS 070 MES Employee Entry"): Text

Parameters / Return Value

  • EOSMESEmployeeEntry Record "EOS 070 MES Employee Entry"

  • Returns Text

GetPostingTypeStyleFromEmplEntry

procedure GetPostingTypeStyleFromEmplEntry(EOSMESEmployeeEntry: Record "EOS 070 MES Employee Entry"): Text

Parameters / Return Value

  • EOSMESEmployeeEntry Record "EOS 070 MES Employee Entry"

  • Returns Text

GetTableFilter

procedure GetTableFilter(var Employee: Record Employee) Value: Text

Parameters / Return Value

  • Employee Record "Employee"

  • Returns Text

GetStandardTaskFilter

procedure GetStandardTaskFilter(var Employee: Record Employee) Value: Text

Parameters / Return Value

  • Employee Record "Employee"

  • Returns Text

SetTableFilter

procedure SetTableFilter(var Employee: Record Employee; FilterText: text)

Parameters / Return Value

  • Employee Record "Employee"

  • FilterText text

SetStandardTaskFilter

procedure SetStandardTaskFilter(var Employee: Record Employee; FilterText: text)

Parameters / Return Value

  • Employee Record "Employee"

  • FilterText text

OnValidateFunction

procedure OnValidateFunction(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par."; EOS070MESTempReasonCode: Record "EOS 070 MES Temp. Reason Code")

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

  • EOS070MESTempReasonCode Record "EOS 070 MES Temp. Reason Code"

OnValidateFunctionByVar

procedure OnValidateFunctionByVar(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par."; var EOS070MESTempReasonCode: Record "EOS 070 MES Temp. Reason Code")

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

  • EOS070MESTempReasonCode Record "EOS 070 MES Temp. Reason Code"

OnLookupFunction

procedure OnLookupFunction(EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par."): Code[20]

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

  • Returns Code[20]

SetAsyncPosting

procedure SetAsyncPosting(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par." temporary; var EOS070MESEmployeeEntry: Record "EOS 070 MES Employee Entry")

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

  • EOS070MESEmployeeEntry Record "EOS 070 MES Employee Entry"

IsFamilyReleasedProdOrder

procedure IsFamilyReleasedProdOrder(ProdOrderNo: Code[20]): Boolean

IsFamilyReleasedProdOrder.

Parameters / Return Value

  • ProdOrderNo Code[20]

    Code[20].

  • Returns Boolean

    Return value of type Boolean.

SetBarcodeForFamily

procedure SetBarcodeForFamily(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par."; LineNo: Integer)

SetBarcodeForFamily.

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

    VAR Record “EOS 070 MES Barcode Par.".

  • LineNo Integer

    Integer.

CheckBarcode

procedure CheckBarcode(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par.")

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

GetTrackingLinesForProdOrderLine

procedure GetTrackingLinesForProdOrderLine(ProdOrderLine: Record "Prod. Order Line"; var TempTrackingSpecification: Record "Tracking Specification" temporary; TrackedQuantity: Decimal): Boolean

Parameters / Return Value

  • ProdOrderLine Record "Prod. Order Line"

  • TempTrackingSpecification Record "Tracking Specification"

  • TrackedQuantity Decimal

  • Returns Boolean

GetTrackingLinesForProdOrderLine

procedure GetTrackingLinesForProdOrderLine(ProdOrderLine: Record "Prod. Order Line"; var TempTrackingSpecification: Record "Tracking Specification" temporary): Boolean

Parameters / Return Value

  • ProdOrderLine Record "Prod. Order Line"

  • TempTrackingSpecification Record "Tracking Specification"

  • Returns Boolean

IsRework

procedure IsRework(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par."; CheckQuantity: Boolean): Boolean

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

  • CheckQuantity Boolean

  • Returns Boolean

CheckSomethinkToRework

procedure CheckSomethinkToRework(ProdOrderRoutingLine: Record "Prod. Order Routing Line"): Boolean

Parameters / Return Value

  • ProdOrderRoutingLine Record "Prod. Order Routing Line"

  • Returns Boolean

SetBarcodeTextIndicator

procedure SetBarcodeTextIndicator(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par.")

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

SetDataInsertCaption

procedure SetDataInsertCaption(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par.")

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

SetDefaultOutputType

procedure SetDefaultOutputType(var EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par."; ResetOption: Option Complete,Badge,"Reason Code","Output Reason",IndirectTime)

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

  • ResetOption Option

    Complete (0) , Badge (1) , "Reason Code" (2) , "Output Reason" (3) , IndirectTime (4)

SetTemplateAndBatchNames

procedure SetTemplateAndBatchNames(EmployeeNo: Code[20]; VAR ToTemplateName: Code[10]; VAR ToBatchName: Code[10])

Parameters / Return Value

  • EmployeeNo Code[20]

  • ToTemplateName Code[10]

  • ToBatchName Code[10]

GetReasonCodeDesc

procedure GetReasonCodeDesc(ReasonCode: Text): Text

Parameters / Return Value

  • ReasonCode Text

  • Returns Text

TeamOrMemberInsertEmployeeEntry

procedure TeamOrMemberInsertEmployeeEntry(var EOS070MESTeam: Record "EOS 070 MES Team")

Parameters / Return Value

  • EOS070MESTeam Record "EOS 070 MES Team"

TeamOrMemberCloseEmployeeEntry

procedure TeamOrMemberCloseEmployeeEntry(var EOS070MESTeam: Record "EOS 070 MES Team")

Parameters / Return Value

  • EOS070MESTeam Record "EOS 070 MES Team"

CheckTeamOrMemberHasOpenEntries

procedure CheckTeamOrMemberHasOpenEntries(SystemId: Guid): Boolean

Parameters / Return Value

  • SystemId Guid

  • Returns Boolean

LoadReasonCodes

procedure LoadReasonCodes(CurrentSession: Guid; var EOS070MESTempReasonCode: Record "EOS 070 MES Temp. Reason Code"; ThrowError: Boolean): Boolean

Parameters / Return Value

  • CurrentSession Guid

  • EOS070MESTempReasonCode Record "EOS 070 MES Temp. Reason Code"

  • ThrowError Boolean

  • Returns Boolean

GetMESSetupError

procedure GetMESSetupError(): Text

Parameters / Return Value

  • Returns Text

SendNotification

procedure SendNotification(Message: Text; ActionText: Text)

Displays an extension specific notification

Parameters / Return Value

  • Message Text

    The text to be displayes

  • ActionText Text

    The action text to be displayes

SendCustomNotification

procedure SendCustomNotification(EOS070MESBarcodePar: Record "EOS 070 MES Barcode Par."; NotifyCode: Code[20])

Displays an extension specific notification

Parameters / Return Value

  • EOS070MESBarcodePar Record "EOS 070 MES Barcode Par."

  • NotifyCode Code[20]

    Code of notification to be displayed


EOS Labs -