Codeunit 18122140 EOS DS Management

Codeunit 18122140 EOS DS Management

Methods

GetDSEnabled

procedure GetDSEnabled(RecRef: RecordRef): Boolean

Parameters / Return Value

  • RecRef RecordRef

  • Returns Boolean

SetFirstStatus

procedure SetFirstStatus(var RecRef: RecordRef): Boolean

Parameters / Return Value

  • RecRef RecordRef

  • Returns Boolean

SetRecordFields

procedure SetRecordFields(RecRef: RecordRef; var DataSecurityRecordStatus: Record "EOS003 Record Status")

Parameters / Return Value

  • RecRef RecordRef

  • DataSecurityRecordStatus Record "EOS003 Record Status"

UpdateStatusOnRecord

procedure UpdateStatusOnRecord(var RecRef: RecordRef; NewStatus: Code[10]): Boolean

Parameters / Return Value

  • RecRef RecordRef

  • NewStatus Code[10]

  • Returns Boolean

GetRecordStatus

procedure GetRecordStatus(RecRef: RecordRef): Code[10]

Parameters / Return Value

  • RecRef RecordRef

  • Returns Code[10]

GetRecordStatusMessage

procedure GetRecordStatusMessage(RecVariant: Variant): Text

Parameters / Return Value

  • RecVariant Variant

  • Returns Text

GetRecordPKOptionField

procedure GetRecordPKOptionField(RecordVariant: Variant; ShowError: Boolean) OptionFieldNo: Integer

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Integer

GetRecordPKOptionFieldCount

procedure GetRecordPKOptionFieldCount(RecordVariant: Variant) OptionFieldNo: Integer

Parameters / Return Value

  • RecordVariant Variant

  • Returns Integer

GetRecordPKOptionValue

procedure GetRecordPKOptionValue(RecRef: RecordRef): Integer

Parameters / Return Value

  • RecRef RecordRef

  • Returns Integer

GetRecordSystemId

procedure GetRecordSystemId(RecRef: RecordRef): Guid

Parameters / Return Value

  • RecRef RecordRef

  • Returns Guid

GetRecordPKNoField

procedure GetRecordPKNoField(RecordVariant: Variant; CodeFieldPosition: Integer): Integer

Parameters / Return Value

  • RecordVariant Variant

  • CodeFieldPosition Integer

  • Returns Integer

GetRecordPKLineNoField

procedure GetRecordPKLineNoField(RecordVariant: Variant): Integer

Parameters / Return Value

  • RecordVariant Variant

  • Returns Integer

GetValidDSTransactionStatus

procedure GetValidDSTransactionStatus(RecVar: Variant; TableID: Integer; OptionType: Integer; ChangePathCode: Code[10]; CurrentStatus: Code[10]; var TempDataSecurityStatus: Record "EOS DS Status")

Parameters / Return Value

  • RecVar Variant

  • TableID Integer

  • OptionType Integer

  • ChangePathCode Code[10]

  • CurrentStatus Code[10]

  • TempDataSecurityStatus Record "EOS DS Status"

GetValidDSTransactionStatus

procedure GetValidDSTransactionStatus(TableID: Integer; OptionType: Integer; ChangePathCode: Code[10]; CurrentStatus: Code[10]; var TempDataSecurityStatus: Record "EOS DS Status")

Parameters / Return Value

  • TableID Integer

  • OptionType Integer

  • ChangePathCode Code[10]

  • CurrentStatus Code[10]

  • TempDataSecurityStatus Record "EOS DS Status"

GetUserNewStatus

procedure GetUserNewStatus(RecRef: RecordRef; var NewStatusCount: Integer; var NewStatusCode: Code[10]; ChangePathCode: Code[10])

Parameters / Return Value

  • RecRef RecordRef

  • NewStatusCount Integer

  • NewStatusCode Code[10]

  • ChangePathCode Code[10]

ChangeDirectStatus

procedure ChangeDirectStatus(RecRef: RecordRef; OldStatus: Code[10]; NewStatus: Code[10]; PathCode: Code[10])

Parameters / Return Value

  • RecRef RecordRef

  • OldStatus Code[10]

  • NewStatus Code[10]

  • PathCode Code[10]

ChangeStatusRequest

procedure ChangeStatusRequest(RecRef: RecordRef): Boolean

Parameters / Return Value

  • RecRef RecordRef

  • Returns Boolean

NextStatus

procedure NextStatus(RecRef: RecordRef)

Parameters / Return Value

  • RecRef RecordRef

GetCurrentPathCode

procedure GetCurrentPathCode(RecRef: RecordRef) CurrentPathCode: Code[10]

Parameters / Return Value

  • RecRef RecordRef

  • Returns Code[10]

GetPossiblePathCodes

procedure GetPossiblePathCodes(RecRef: RecordRef; var Paths: Record "EOS DS Tables Change Path" temporary)

Parameters / Return Value

  • RecRef RecordRef

  • Paths Record "EOS DS Tables Change Path"

TestMandatoryFields

procedure TestMandatoryFields(RecRef: RecordRef; iCodOldStatus: Code[10]; iCodNewStatus: Code[10]; iCodPathCode: Code[10])

Parameters / Return Value

  • RecRef RecordRef

  • iCodOldStatus Code[10]

  • iCodNewStatus Code[10]

  • iCodPathCode Code[10]

TestPreconditionFields

procedure TestPreconditionFields(iRrfRecord: RecordRef; iCodChangePath: Code[20]; iCodFromStatus: Code[10]; iCodToStatus: Code[10]; iIntFieldNo: Integer; iIntFieldOccurence: Integer; iTxtIF_FieldName: Text[250]; iTxtIF_FieldValue1: Text[250]; iTxtIF_FieldValue2: Text[250]; iOptIF_Condition: Option " ",equal,maior,"maior or equal",minor,"minor or equal","between (extreme included)","between (extreme excluded)","not equal"): Boolean

Parameters / Return Value

  • iRrfRecord RecordRef

  • iCodChangePath Code[20]

  • iCodFromStatus Code[10]

  • iCodToStatus Code[10]

  • iIntFieldNo Integer

  • iIntFieldOccurence Integer

  • iTxtIF_FieldName Text[250]

  • iTxtIF_FieldValue1 Text[250]

  • iTxtIF_FieldValue2 Text[250]

  • iOptIF_Condition Option

    " " (0) , equal (1) , maior (2) , "maior or equal" (3) , minor (4) , "minor or equal" (5) , "between (extreme included)" (6) , "between (extreme excluded)" (7) , "not equal" (8)

  • Returns Boolean

TestDSField

procedure TestDSField(iRrfRecord: RecordRef; iIntFieldNo: Integer; iCodCurrentStatus: Code[10]; iCodNewStatus: Code[10]; iTxtFieldValue1: Text[250]; iTxtFieldValue2: Text[250]; iOptCondition: Option " ",equal,maior,"maior or equal",minor,"minor or equal","between (extreme included)","between (extreme excluded)","not equal","filter"; iBlnShowError: Boolean; iTxtIF_FieldName: Text[250]; iTxtIF_FieldValue1: Text[250]; iTxtIF_FieldValue2: Text[250]; iOptIF_Condition: Option " ",equal,maior,"maior or equal",minor,"minor or equal","between (extreme included)","between (extreme excluded)","not equal","filter"): Boolean

Parameters / Return Value

  • iRrfRecord RecordRef

  • iIntFieldNo Integer

  • iCodCurrentStatus Code[10]

  • iCodNewStatus Code[10]

  • iTxtFieldValue1 Text[250]

  • iTxtFieldValue2 Text[250]

  • iOptCondition Option

    " " (0) , equal (1) , maior (2) , "maior or equal" (3) , minor (4) , "minor or equal" (5) , "between (extreme included)" (6) , "between (extreme excluded)" (7) , "not equal" (8) , "filter" (9)

  • iBlnShowError Boolean

  • iTxtIF_FieldName Text[250]

  • iTxtIF_FieldValue1 Text[250]

  • iTxtIF_FieldValue2 Text[250]

  • iOptIF_Condition Option

    " " (0) , equal (1) , maior (2) , "maior or equal" (3) , minor (4) , "minor or equal" (5) , "between (extreme included)" (6) , "between (extreme excluded)" (7) , "not equal" (8) , "filter" (9)

  • Returns Boolean

ValidateFieldValue

procedure ValidateFieldValue(iIntTableID: Integer; iIntFieldNo: Integer; iTxtValue: Text[250]): Text[250]

Parameters / Return Value

  • iIntTableID Integer

  • iIntFieldNo Integer

  • iTxtValue Text[250]

  • Returns Text[250]

IsFirstStatus

procedure IsFirstStatus(iRrfRecord: RecordRef): Boolean

Parameters / Return Value

  • iRrfRecord RecordRef

  • Returns Boolean

IsLastStatus

procedure IsLastStatus(iRrfRecord: RecordRef): Boolean

Parameters / Return Value

  • iRrfRecord RecordRef

  • Returns Boolean

TestCurrentRecordHasDSSetup

procedure TestCurrentRecordHasDSSetup(iRrfRecord: RecordRef)

Parameters / Return Value

  • iRrfRecord RecordRef

TestUserHasRights

procedure TestUserHasRights(RecRef: RecordRef)

Parameters / Return Value

  • RecRef RecordRef

ExecuteDirectDSFunctions

procedure ExecuteDirectDSFunctions(var RecRef: RecordRef; OldStatus: Code[10]; NewStatus: Code[10]; Before: Boolean)

Parameters / Return Value

  • RecRef RecordRef

  • OldStatus Code[10]

  • NewStatus Code[10]

  • Before Boolean

ExecuteEDSFunctions

procedure ExecuteEDSFunctions(var RecRef: RecordRef; OldStatus: Code[10]; NewStatus: Code[10]; Before: Boolean): Boolean

Parameters / Return Value

  • RecRef RecordRef

  • OldStatus Code[10]

  • NewStatus Code[10]

  • Before Boolean

  • Returns Boolean

GetDSFunctions

procedure GetDSFunctions(var TmpDSFunction: Record "EOS DS Functions")

Parameters / Return Value

  • TmpDSFunction Record "EOS DS Functions"

GetAllUserPermission

procedure GetAllUserPermission(iIntTableId: Integer; iOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19"; iCodChangePath: Code[10]; iCodFromStatus: Code[10]; iCodToStatus: Code[10])

Parameters / Return Value

  • iIntTableId Integer

  • iOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

  • iCodChangePath Code[10]

  • iCodFromStatus Code[10]

  • iCodToStatus Code[10]

InitFirstStatus

procedure InitFirstStatus(iIntTableNo: Integer; iOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19")

Parameters / Return Value

  • iIntTableNo Integer

  • iOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

ShowFirstStatusTransaction

procedure ShowFirstStatusTransaction(iIntTableNo: Integer; iOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19"; iBlnShowCard: Boolean)

Parameters / Return Value

  • iIntTableNo Integer

  • iOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

  • iBlnShowCard Boolean

GetDSTablesContext

procedure GetDSTablesContext(iIntTableID: Integer; iOptTableOptionType: Option) Result: Text[250]

Parameters / Return Value

  • iIntTableID Integer

  • iOptTableOptionType Option

  • Returns Text[250]

TestRowTypeHasDS

procedure TestRowTypeHasDS(iRrfRecord: RecordRef; DataSecurityTablesSetup: Record "EOS DS Tables Setup"): Boolean

Parameters / Return Value

  • iRrfRecord RecordRef

  • DataSecurityTablesSetup Record "EOS DS Tables Setup"

  • Returns Boolean

GetDSTableOptionCaption

procedure GetDSTableOptionCaption(iIntTableID: Integer; iIntTableOptionType: Integer): Text[30]

Parameters / Return Value

  • iIntTableID Integer

  • iIntTableOptionType Integer

  • Returns Text[30]

GetTableStatusColour

procedure GetTableStatusColour(iIntTableId: Integer; iOptTableOptionType: Integer; iCodDSStatus: Code[10]): Text

Parameters / Return Value

  • iIntTableId Integer

  • iOptTableOptionType Integer

  • iCodDSStatus Code[10]

  • Returns Text

TestTableIDAllowDSMgmt

procedure TestTableIDAllowDSMgmt(iIntTableID: Integer)

Parameters / Return Value

  • iIntTableID Integer

TableCertification

procedure TableCertification(DataSecurityTablesSetup: Record "EOS DS Tables Setup")

Parameters / Return Value

  • DataSecurityTablesSetup Record "EOS DS Tables Setup"

TestTableNotCertified

procedure TestTableNotCertified(TableNo: Integer; TableOptionType: Integer; AskForReopen: Boolean)

Parameters / Return Value

  • TableNo Integer

  • TableOptionType Integer

  • AskForReopen Boolean

TestDSTableStatus

procedure TestDSTableStatus(DataSecurityTablesSetup: Record "EOS DS Tables Setup")

Parameters / Return Value

  • DataSecurityTablesSetup Record "EOS DS Tables Setup"

TestDSStatusTransaction

procedure TestDSStatusTransaction(DataSecurityTablesSetup: Record "EOS DS Tables Setup")

Parameters / Return Value

  • DataSecurityTablesSetup Record "EOS DS Tables Setup"

TestDeleteDSTable

procedure TestDeleteDSTable(iIntTableId: Integer; iOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19"; StatusCode: Code[10]; ForceBlankStatusCode: Boolean)

Parameters / Return Value

  • iIntTableId Integer

  • iOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

  • StatusCode Code[10]

  • ForceBlankStatusCode Boolean

RaisePermissionError

procedure RaisePermissionError(DocVariant: Variant; PermissionType: Option; ErrorMsg: Text)

Parameters / Return Value

  • DocVariant Variant

  • PermissionType Option

  • ErrorMsg Text

GetRecordPKValues

procedure GetRecordPKValues(RecRef: RecordRef) Result: Text

Parameters / Return Value

  • RecRef RecordRef

  • Returns Text

HasPermission

procedure HasPermission(RecordVariant: Variant; xRecordVariant: Variant; PermissionType: Option) Allowed: Boolean

Parameters / Return Value

  • RecordVariant Variant

  • xRecordVariant Variant

  • PermissionType Option

  • Returns Boolean

HasManualPermission

procedure HasManualPermission(RecordVariant: Variant; xRecordVariant: Variant; PermissionType: Option) Allowed: Boolean

Parameters / Return Value

  • RecordVariant Variant

  • xRecordVariant Variant

  • PermissionType Option

  • Returns Boolean

GetInsertPermission

procedure GetInsertPermission(RecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetModifyPermission

procedure GetModifyPermission(RecordVariant: Variant; xRecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • xRecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetRenamePermission

procedure GetRenamePermission(RecordVariant: Variant; xRecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • xRecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetDeletePermission

procedure GetDeletePermission(RecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetReleasePermission

procedure GetReleasePermission(RecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetManualReleasePermission

procedure GetManualReleasePermission(RecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetReopenPermission

procedure GetReopenPermission(RecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetManualReopenPermission

procedure GetManualReopenPermission(RecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetPostPermission

procedure GetPostPermission(RecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

GetPrintPermission

procedure GetPrintPermission(RecordVariant: Variant; ShowError: Boolean): Boolean

Parameters / Return Value

  • RecordVariant Variant

  • ShowError Boolean

  • Returns Boolean

CalculateUserToNotify

procedure CalculateUserToNotify(iCodUserID: Code[65])

Parameters / Return Value

  • iCodUserID Code[65]

CalculateZeroLevelToNotify

procedure CalculateZeroLevelToNotify(iCodUserID: Code[65]; var vRecTmpDSRecordStatusInfo: Record "EOS003 Record Status Info" temporary): Boolean

Parameters / Return Value

  • iCodUserID Code[65]

  • vRecTmpDSRecordStatusInfo Record "EOS003 Record Status Info"

  • Returns Boolean

FilterDSRecordStatus

procedure FilterDSRecordStatus(iIntTableID: Integer; iOptTableOptionType: Option; iCodStatus: Code[10]; var vRecDSRecordStatus: Record "EOS003 Record Status"; var vIntCountRecordStatus: Integer)

Parameters / Return Value

  • iIntTableID Integer

  • iOptTableOptionType Option

  • iCodStatus Code[10]

  • vRecDSRecordStatus Record "EOS003 Record Status"

  • vIntCountRecordStatus Integer

InsertDSStatusInfoLevel

procedure InsertDSStatusInfoLevel(var vRecTmpDSRecordStatusInfo: Record "EOS003 Record Status Info" temporary; lRecDSRecordStatus: Record "EOS003 Record Status"; iIntLevel: Integer; iIntCount: Integer): Boolean

Parameters / Return Value

  • vRecTmpDSRecordStatusInfo Record "EOS003 Record Status Info"

  • lRecDSRecordStatus Record "EOS003 Record Status"

  • iIntLevel Integer

  • iIntCount Integer

  • Returns Boolean

ExpandDSRecordStatusInfo

procedure ExpandDSRecordStatusInfo(var vRecTmpDSRecordStatusInfo: Record "EOS003 Record Status Info" temporary; iRecCurrDSRecordStatusInfo: Record "EOS003 Record Status Info"; iCodUserID: Code[65])

Parameters / Return Value

  • vRecTmpDSRecordStatusInfo Record "EOS003 Record Status Info"

  • iRecCurrDSRecordStatusInfo Record "EOS003 Record Status Info"

  • iCodUserID Code[65]

ExpandAllDSRecordStatusInfo

procedure ExpandAllDSRecordStatusInfo(iCodUserID: Code[65]; var vRecTmpDSRecordStatusInfo: Record "EOS003 Record Status Info" temporary)

Parameters / Return Value

  • iCodUserID Code[65]

  • vRecTmpDSRecordStatusInfo Record "EOS003 Record Status Info"

CollapseAllDSRecordStatusInfo

procedure CollapseAllDSRecordStatusInfo(iCodUserID: Code[65]; var vRecTmpDSRecordStatusInfo: Record "EOS003 Record Status Info" temporary)

Parameters / Return Value

  • iCodUserID Code[65]

  • vRecTmpDSRecordStatusInfo Record "EOS003 Record Status Info"

ShowPage

procedure ShowPage(TableID: Integer; TableOptionPKField: Integer; RecSystemId: Guid)

Parameters / Return Value

  • TableID Integer

  • TableOptionPKField Integer

  • RecSystemId Guid

ShowPage

procedure ShowPage(TableID: Integer; TableOptionPKField: Integer; TablePosition: Text)

Parameters / Return Value

  • TableID Integer

  • TableOptionPKField Integer

  • TablePosition Text

GetCurrentRecordRef

procedure GetCurrentRecordRef(var DSFactboxBuffer: Record "EOS003 Factbox Buffer"; var RecRef: RecordRef): Boolean

Parameters / Return Value

  • DSFactboxBuffer Record "EOS003 Factbox Buffer"

  • RecRef RecordRef

  • Returns Boolean

GetCurrentRecordRef

procedure GetCurrentRecordRef(var DSFactboxBuffer: Record "EOS DS Factbox Buffer"; var RecRef: RecordRef): Boolean

Parameters / Return Value

  • DSFactboxBuffer Record "EOS DS Factbox Buffer"

  • RecRef RecordRef

  • Returns Boolean

CalculateZeroLevelRecordStatus

procedure CalculateZeroLevelRecordStatus(iIntTableID: Integer; iIntTableOptionType: Integer; var vRecTmpDSRecordStatus: Record "EOS003 Record Status" temporary): Boolean

Parameters / Return Value

  • iIntTableID Integer

  • iIntTableOptionType Integer

  • vRecTmpDSRecordStatus Record "EOS003 Record Status"

  • Returns Boolean

InsertDSStatusLevel

procedure InsertDSStatusLevel(var DataSecurityRecordStatus: Record "EOS003 Record Status"; FromDataSecurityRecordStatus: Record "EOS003 Record Status"; iIntLevel: Integer; iIntCount: Integer): Boolean

Parameters / Return Value

  • DataSecurityRecordStatus Record "EOS003 Record Status"

  • FromDataSecurityRecordStatus Record "EOS003 Record Status"

  • iIntLevel Integer

  • iIntCount Integer

  • Returns Boolean

ExpandDSRecordStatus

procedure ExpandDSRecordStatus(var vRecTmpDSRecordStatus: Record "EOS003 Record Status" temporary; iRecCurrDSRecordStatus: Record "EOS003 Record Status")

Parameters / Return Value

  • vRecTmpDSRecordStatus Record "EOS003 Record Status"

  • iRecCurrDSRecordStatus Record "EOS003 Record Status"

ExpandAllDSRecordStatus

procedure ExpandAllDSRecordStatus(var TempDataSecurityRecordStatus: Record "EOS003 Record Status" temporary)

Parameters / Return Value

  • TempDataSecurityRecordStatus Record "EOS003 Record Status"

CollapseAllDSRecordStatus

procedure CollapseAllDSRecordStatus(var TempDataSecurityRecordStatus: Record "EOS003 Record Status" temporary)

Parameters / Return Value

  • TempDataSecurityRecordStatus Record "EOS003 Record Status"

TestFilter

procedure TestFilter(iTableID: Integer; iIntFieldNo: Integer; iFrfField: FieldRef; iTxtFieldValue1: Text[250]): Boolean

Parameters / Return Value

  • iTableID Integer

  • iIntFieldNo Integer

  • iFrfField FieldRef

  • iTxtFieldValue1 Text[250]

  • Returns Boolean

TestFilterText

procedure TestFilterText(RecRef: RecordRef; FieldNo: Integer; iTxtFieldValue1: Text[250]): Boolean

Parameters / Return Value

  • RecRef RecordRef

  • FieldNo Integer

  • iTxtFieldValue1 Text[250]

  • Returns Boolean

GetRecordStatusRec

procedure GetRecordStatusRec(RecRef: RecordRef; var DataSecurityRecordStatus: Record "EOS003 Record Status"): Boolean

Parameters / Return Value

  • RecRef RecordRef

  • DataSecurityRecordStatus Record "EOS003 Record Status"

  • Returns Boolean

GetRecordPKNumber

procedure GetRecordPKNumber(iRrfRecord: RecordRef; var vIntKeyOptionFieldNo: Integer; var vIntKeyCodFieldNo: Integer; var vIntKeyIntFieldNo: Integer; var vIntKeyDecFieldNo: Integer)

Parameters / Return Value

  • iRrfRecord RecordRef

  • vIntKeyOptionFieldNo Integer

  • vIntKeyCodFieldNo Integer

  • vIntKeyIntFieldNo Integer

  • vIntKeyDecFieldNo Integer

GetRecordPKNumberAndValue

procedure GetRecordPKNumberAndValue(iRrfRecord: RecordRef; var vIntKeyOptionFieldNo: Integer; var vIntKeyOptionValue: Integer; var vIntKeyCodFieldNo: Integer; var vCodKeyCodValue: Code[20]; var vIntKeyIntFieldNo: Integer; var vIntKeyIntValue: Integer)

Parameters / Return Value

  • iRrfRecord RecordRef

  • vIntKeyOptionFieldNo Integer

  • vIntKeyOptionValue Integer

  • vIntKeyCodFieldNo Integer

  • vCodKeyCodValue Code[20]

  • vIntKeyIntFieldNo Integer

  • vIntKeyIntValue Integer

GetArchiveRecPKNumberAndValue

procedure GetArchiveRecPKNumberAndValue(iRrfRecord: RecordRef; var vIntKeyOptionFieldNo: Integer; var vIntKeyOptionValue: Integer; var vIntKeyCodFieldNo: Integer; var vCodKeyCodValue: Code[20]; var vIntKeyDocNoOccFieldNo: Integer; var vIntKeyDocNoOccValue: Integer; var vIntKeyVersionNoFieldNo: Integer; var vIntKeyVersionNoValue: Integer; var vIntKeyLineNoFieldNo: Integer; var vIntKeyLineNoValue: Integer)

Parameters / Return Value

  • iRrfRecord RecordRef

  • vIntKeyOptionFieldNo Integer

  • vIntKeyOptionValue Integer

  • vIntKeyCodFieldNo Integer

  • vCodKeyCodValue Code[20]

  • vIntKeyDocNoOccFieldNo Integer

  • vIntKeyDocNoOccValue Integer

  • vIntKeyVersionNoFieldNo Integer

  • vIntKeyVersionNoValue Integer

  • vIntKeyLineNoFieldNo Integer

  • vIntKeyLineNoValue Integer

SetRecordPKValueWithOption

procedure SetRecordPKValueWithOption(iRrfRecord: RecordRef;var vIntCurrentTable: Integer;var vGuiTableRecSysId: Guid;var vOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19")

Parameters / Return Value

  • iRrfRecord RecordRef

  • vIntCurrentTable Integer

  • vGuiTableRecSysId Guid

  • vOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

SetRecordPKValue

procedure SetRecordPKValue(iRrfRecord: RecordRef;var vIntCurrentTable: Integer;var vGuiTableRecSysId: Guid)

Parameters / Return Value

  • iRrfRecord RecordRef

  • vIntCurrentTable Integer

  • vGuiTableRecSysId Guid

SetRecordPKValue

procedure SetRecordPKValue(iRrfRecord: RecordRef; var vIntCurrentTable: Integer; var vOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19"; var vCodTableRecNo: Code[20]; var vIntTableRecLineNo: Integer)

Parameters / Return Value

  • iRrfRecord RecordRef

  • vIntCurrentTable Integer

  • vOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

  • vCodTableRecNo Code[20]

  • vIntTableRecLineNo Integer

WriteLog2

procedure WriteLog2(iRrfRecord: RecordRef; iCodOldStatus: Code[10]; iCodNewStatus: Code[10])

Parameters / Return Value

  • iRrfRecord RecordRef

  • iCodOldStatus Code[10]

  • iCodNewStatus Code[10]

ShowLog2

procedure ShowLog2(iRrfRecord: RecordRef; iOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19")

Parameters / Return Value

  • iRrfRecord RecordRef

  • iOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

DelLog2

procedure DelLog2(iRrfRecord: RecordRef; iOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19")

Parameters / Return Value

  • iRrfRecord RecordRef

  • iOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

WriteLog

procedure WriteLog(iRrfRecord: RecordRef; iCodOldStatus: Code[10]; iCodNewStatus: Code[10])

Parameters / Return Value

  • iRrfRecord RecordRef

  • iCodOldStatus Code[10]

  • iCodNewStatus Code[10]

ShowLog

procedure ShowLog(iRrfRecord: RecordRef; iOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19")

Parameters / Return Value

  • iRrfRecord RecordRef

  • iOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

DelLog

procedure DelLog(iRrfRecord: RecordRef; iOptTableOptionType: Option "0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19")

Parameters / Return Value

  • iRrfRecord RecordRef

  • iOptTableOptionType Option

    "0" (0) , "1" (1) , "2" (2) , "3" (3) , "4" (4) , "5" (5) , "6" (6) , "7" (7) , "8" (8) , "9" (9) , "10" (10) , "11" (11) , "12" (12) , "13" (13) , "14" (14) , "15" (15) , "16" (16) , "17" (17) , "18" (18) , "19" (19)

RunStatusChange

procedure RunStatusChange(DataSecurityTablesSetup: Record "EOS DS Tables Setup")

Parameters / Return Value

  • DataSecurityTablesSetup Record "EOS DS Tables Setup"

GetRecordStatusDescription

procedure GetRecordStatusDescription(TableID: Integer; TableOptionType: Integer; iCodDSStatus: Code[10]): Text[50]

Parameters / Return Value

  • TableID Integer

  • TableOptionType Integer

  • iCodDSStatus Code[10]

  • Returns Text[50]

ClearGlobals

procedure ClearGlobals()

SetBatchChangeStatus

procedure SetBatchChangeStatus(Value: Boolean)

Parameters / Return Value

  • Value Boolean

SetBatchRecordRef2Process

procedure SetBatchRecordRef2Process(var RecRef: RecordRef)

Parameters / Return Value

  • RecRef RecordRef

GetBatchResult

procedure GetBatchResult(): Boolean

Parameters / Return Value

  • Returns Boolean

SetRecordStatusOnModify

procedure SetRecordStatusOnModify(var RecRef: RecordRef)

Parameters / Return Value

  • RecRef RecordRef

SetRecordFieldsOnModify

procedure SetRecordFieldsOnModify(var RecRef: RecordRef; var DataSecurityRecordStatus: Record "EOS003 Record Status") Changed: Boolean

Parameters / Return Value

  • RecRef RecordRef

  • DataSecurityRecordStatus Record "EOS003 Record Status"

  • Returns Boolean

DeleteAllData

procedure DeleteAllData()

SkipSubcontractingPurchaseOrder

procedure SkipSubcontractingPurchaseOrder(RecRef: RecordRef): Boolean

Parameters / Return Value

  • RecRef RecordRef

  • Returns Boolean

CalcStatusCount

procedure CalcStatusCount(var Status1CountSystemId: Integer; var Status2CountSystemId: Integer; var Status3CountSystemId: Integer; CueSetup: Record "EOS DS Cue Setup")

Parameters / Return Value

  • Status1CountSystemId Integer

  • Status2CountSystemId Integer

  • Status3CountSystemId Integer

  • CueSetup Record "EOS DS Cue Setup"

UseSystemIdAsKey

procedure UseSystemIdAsKey()

SetGlobalNewPath

procedure SetGlobalNewPath(NewPathCode: Code[10])

Parameters / Return Value

  • NewPathCode Code[10]

OpenMandatoryFieldsList

procedure OpenMandatoryFieldsList(RecRef: RecordRef; OptionType: Integer; CurrentStatus: Code[10]; NewStatus: Code[10])

Parameters / Return Value

  • RecRef RecordRef

  • OptionType Integer

  • CurrentStatus Code[10]

  • NewStatus Code[10]

GetComments

procedure GetComments(TextCode: Code[20]): Text

Parameters / Return Value

  • TextCode Code[20]

  • Returns Text

LookupFieldValueFromConfigTemplateLine

procedure LookupFieldValueFromConfigTemplateLine(MandatoryFieldLine: Record "EOS003 Mandatory Field Line"; var FieldValue: Text): Boolean

Parameters / Return Value

  • MandatoryFieldLine Record "EOS003 Mandatory Field Line"

  • FieldValue Text

  • Returns Boolean

TransferRecordDefaultValues

procedure TransferRecordDefaultValues(var RecRef: RecordRef; CurFieldNo: Integer; CurDefaultValue: Text)

Parameters / Return Value

  • RecRef RecordRef

  • CurFieldNo Integer

  • CurDefaultValue Text

Events

OnDiscoverDSFunctions

procedure OnDiscoverDSFunctions(var DataSecurityFunctions: Record "EOS DS Functions")

Event to show a new Function as available. Use Codeunit “EOS DS Function”, Method CreateDSFunction to add as a DS function

Parameters / Return Value

  • DataSecurityFunctions Record "EOS DS Functions"

    Record to use as first parameter

OnExecuteDSFunction

local procedure OnExecuteDSFunction(var DataSecurityFunctions: Record "EOS DS Functions"; var RecRef: RecordRef; TableOptionType: Integer; UseOptionType: Boolean; var ContinueExecution: Boolean; DataSecurityStatusFunctions: Record "EOS DS Status Functions")

Event to run a DS function, subscribe to this, check if the functions that should be run is yours and run it.

Parameters / Return Value

  • DataSecurityFunctions Record "EOS DS Functions"

    Record “EOS DS Functions”.

  • RecRef RecordRef

    The RecRef of the record ther.

  • TableOptionType Integer

    The record option For example “Offer,Order,Invoice,…".

  • UseOptionType Boolean

    Define if the record use the Option value.

  • ContinueExecution Boolean

    Set to false to block execution of DS Functions in the current execution phase after the run of the function.

  • DataSecurityStatusFunctions Record "EOS DS Status Functions"

    The DataSecurityStatusFunction that will be run.

OnGetRecordPermission

local procedure OnGetRecordPermission(DocVariant: Variant; xDocVariant: Variant; PermissionType: Option; var IsAllowed: Option " ",No,Yes; var ErrorMessage: Text)

Raised before checking if the operation specified in the parameter PermissionType is allowed.

Parameters / Return Value

  • DocVariant Variant

    The document.

  • xDocVariant Variant

    The document before edits.

  • PermissionType Option

    The permission type.

  • IsAllowed Option

    " " (0) , No (1) , Yes (2)

    IsAllowed Option.

  • ErrorMessage Text

    The Error Message.

OnGetRecordManualPermission

local procedure OnGetRecordManualPermission(DocVariant: Variant; xDocVariant: Variant; PermissionType: Option; var IsAllowed: Option " ",No,Yes; var ErrorMessage: Text)

Raised before checking if the operation specified in the parameter PermissionType is allowed.

Parameters / Return Value

  • DocVariant Variant

    The document.

  • xDocVariant Variant

    The document before edits.

  • PermissionType Option

    The permission type.

  • IsAllowed Option

    " " (0) , No (1) , Yes (2)

    IsAllowed Option.

  • ErrorMessage Text

    The Error Message.

OnSkipFieldChangeComparison

local procedure OnSkipFieldChangeComparison(RecRef: RecordRef; xRecRef: RecordRef; FieldID: Integer; var Skip: Boolean)

Raised on permission check, when checking if a edit is allowed. Is used to allow the edit to a certain field.

Parameters / Return Value

  • RecRef RecordRef

    The RecRef.

  • xRecRef RecordRef

    The xRecRef.

  • FieldID Integer

    The FieldID edited.

  • Skip Boolean

    The skip.

OnBeforeCheckIfTableFirstStatusIsHandled

local procedure OnBeforeCheckIfTableFirstStatusIsHandled(TableID: Integer; var Handled: Boolean)

Event to subscribe to if you manage the first status of a table on record init, in order to let you set the status as certified without

Parameters / Return Value

  • TableID Integer

    Integer

  • Handled Boolean

    Boolean

OnBeforeSetRecordFields2

local procedure OnBeforeSetRecordFields2(var RecRef: RecordRef; var DataSecurityRecordStatus: Record "EOS003 Record Status"; var handled: Boolean)

Event to use when the “Change status” reports an error caused by a not managed protected table.

Parameters / Return Value

  • RecRef RecordRef

    The record that should be modified

  • DataSecurityRecordStatus Record "EOS003 Record Status"

    OBSOLETE The new status

  • handled Boolean

    Has to be set to true to avoid standard code to run

OnAfterChangeDataSecurityStatusPageClose

local procedure OnAfterChangeDataSecurityStatusPageClose(RecRef: RecordRef; var ChangeDataSecurityStatusPage: Page "EOS Change DS Status")

Event raised when the Change Status Page has been closed successfully and the Change Status has been already written in the log.

Parameters / Return Value

  • RecRef RecordRef

    Source Record

  • ChangeDataSecurityStatusPage Page "EOS Change DS Status"

    The Page to run custom functions.

OnBeforeEDSSetFirstStatus_OnGlobalInsert

local procedure OnBeforeEDSSetFirstStatus_OnGlobalInsert(TableID: Integer; var Handled: Boolean)

Event raised in the Global Insert event, used to manage the trigger of custom tables set first status. Use this event to block the standard cycle and manage the SetfirstStatus in a custom event subscriber.

Parameters / Return Value

  • TableID Integer

    The TableID that triggered the GlobalInsert

  • Handled Boolean

    Handled paramenter to avoid

OnBeforeEDSSetFirstStatus_OnDatabaseInsert

local procedure OnBeforeEDSSetFirstStatus_OnDatabaseInsert(TableID: Integer; var Handled: Boolean)

Event raised in the Database Insert event, used to manage the trigger of custom tables set first status. Use this event to block the standard cycle and manage the SetfirstStatus in a custom event subscriber.

Parameters / Return Value

  • TableID Integer

    The TableID that triggered the OnDatabaseInsert

  • Handled Boolean

    Handled paramenter to avoid

OnBeforeEDSSetFirstStatus_OnDatabaseRename

local procedure OnBeforeEDSSetFirstStatus_OnDatabaseRename(TableID: Integer; var Handled: Boolean)

Event raised in the Database Rename event, used to manage the trigger of custom tables set first status. Use this event to block the standard cycle and manage the SetfirstStatus in a custom event subscriber.

Parameters / Return Value

  • TableID Integer

    The TableID that triggered the OnDatabaseInsert

  • Handled Boolean

    Handled paramenter to avoid

OnAfterGetUserNewStatus

local procedure OnAfterGetUserNewStatus(RecRef: RecordRef; var TempDataSecurityStatus: Record "EOS DS Status" temporary; var NewStatusCode: Code[10]; ChangePathCode: Code[10])

Event executed when obtaining new status allowed transactions.

Parameters / Return Value

  • RecRef RecordRef

    The current record ref.

  • TempDataSecurityStatus Record "EOS DS Status"

    Allowed new DS statuses

  • NewStatusCode Code[10]

    The new DS Status, if empty all status in TempDataSecurityStatus are allowed, otherwise edit is disabled.

  • ChangePathCode Code[10]

    The record ChangePathCode selected.

OnAfterGetCurrentPathCode2

local procedure OnAfterGetCurrentPathCode2(RecRef: RecordRef; DataSecurityRecordStatus: Record "EOS003 Record Status"; var CurrentPathCode: Code[10])

Event executed before showing the “EOS DS Record Status FactBox”, allows to change the PathCode.

Parameters / Return Value

  • RecRef RecordRef

    The source RecRef.

  • DataSecurityRecordStatus Record "EOS003 Record Status"

    The DataSecurityRecordStatus for the RecRef.

  • CurrentPathCode Code[10]

    The PathCode related to the DataSecurityRecordStatus.

OnAfterSetRecordStatus

local procedure OnAfterSetRecordStatus(var RecRef: RecordRef; OldStatus: Code[10]; NewStatus: Code[10]; PathCode: Code[10])

Raised after the status for a given record has been updated. This is raised after the log has been writte, fields have been updated (but not modified) on the source record.

Parameters / Return Value

  • RecRef RecordRef

    The record for which the status is being changed.

  • OldStatus Code[10]

    The old status that the record had before it was changed.

  • NewStatus Code[10]

    The new status the has been set on the record.

  • PathCode Code[10]

    The status path code in use.

OnBeforeUpdateStatusOnRecord

local procedure OnBeforeUpdateStatusOnRecord(var RecRef: RecordRef; NewStatus: Code[10]; var FieldUpdated: Boolean; var Handled: Boolean)

Raised before the physical status-field on a given record is updated with the new status code. You can use this to customize how (and if) this field is updated.

Parameters / Return Value

  • RecRef RecordRef

    The record for which the status is being changed.

  • NewStatus Code[10]

    The new status code to be applied.

  • FieldUpdated Boolean

    Set this to true, if the physical status-field was found and has been updated. The value of this parameter only has effect if you also set Handled to true and therefore cause the function to exit early. If not, the default logic will continue to execute and this will be overwritten.

  • Handled Boolean

    Gets or sets if this event has been completely handled.

OnAfterUpdateStatusOnRecord

local procedure OnAfterUpdateStatusOnRecord(var RecRef: RecordRef; NewStatus: Code[10]; var FieldUpdated: Boolean)

Raised after the physical status-field on a given record is updated with the new status code.

Parameters / Return Value

  • RecRef RecordRef

    The record for which the status is being changed.

  • NewStatus Code[10]

    The new status code to be applied.

  • FieldUpdated Boolean

    Gets or sets if the physical status-field was found and updated. This value is pre-set with the outcome of the default hanlding logic and can be overwritten, if needed.

OnAfterGetAvailableStatusOnRecord

local procedure OnAfterGetAvailableStatusOnRecord(RecVar: Variant; var Allow: Boolean; TableID: Integer; OptionType: Integer; FromStatus: Code[10]; ToStatus: Code[10])

Raised after the list of new available EDS Status is calculated

Parameters / Return Value

  • RecVar Variant

    RecVariant of the current Record selected

  • Allow Boolean

    Boolean value indicating when the option is to be displayed and when not.

  • TableID Integer

    Table ID

  • OptionType Integer

    Table Option Type

  • FromStatus Code[10]

    Current EDS Status

  • ToStatus Code[10]

    New EDS Status

OnBeforeCalcStatusCount

local procedure OnBeforeCalcStatusCount(var DSRecordStatus: Record "EOS003 Record Status")

Raised after applying the filter to count records in the cues

Parameters / Return Value

  • DSRecordStatus Record "EOS003 Record Status"

OnBeforeSetFirstStatus

local procedure OnBeforeSetFirstStatus(var RecRef: RecordRef; IsHandled: Boolean)

Raised befor apply first EDS status

Parameters / Return Value

  • RecRef RecordRef

    The current record reference

  • IsHandled Boolean

    Skip the procedure

OnBeforeSetRecFirstStatus

local procedure OnBeforeSetRecFirstStatus(var RecRef: RecordRef; var IsHandled: Boolean)

Raised befor apply first EDS status

Parameters / Return Value

  • RecRef RecordRef

    The current record reference

  • IsHandled Boolean

    Skip the procedure

OnAfterChangeDirectStatus

local procedure OnAfterChangeDirectStatus(var RecRef: RecordRef; OldStatus: Code[10]; NewStatus: Code[10]; PathCode: Code[10]; ContinueExecution: Boolean)

Raised after ChangeDirectStatus procedure/after the procedure for changing state and executing functions called from the standard EDS factbox

Parameters / Return Value

  • RecRef RecordRef

    The current record reference

  • OldStatus Code[10]

    Current EDS Status

  • NewStatus Code[10]

    New EDS Status

  • PathCode Code[10]

    EDS Path

  • ContinueExecution Boolean

    ContinueExecution relating to the execution of the phase before the EDS functions

OnAfterExecuteEDSFunctionOnChangeDirectStatus

local procedure OnAfterExecuteEDSFunctionOnChangeDirectStatus(var RecRef: RecordRef; OldStatus: Code[10]; NewStatus: Code[10]; PathCode: Code[10]; ContinueExecution: Boolean; var IsHandled: Boolean)

Raised after ExecuteEDSFunctions of first phase

Parameters / Return Value

  • RecRef RecordRef

    The current record reference

  • OldStatus Code[10]

    Current EDS Status

  • NewStatus Code[10]

    New EDS Status

  • PathCode Code[10]

    EDS Path

  • ContinueExecution Boolean

    ContinueExecution relating to the execution of the phase before the EDS functions

  • IsHandled Boolean

    Skip the procedure SetRecordStatus and the execution of the function in after phase

OnBeforeSetFirstStatusOnRename

local procedure OnBeforeSetFirstStatusOnRename(var RecRef: RecordRef; xRecRef: RecordRef; isHandled: Boolean)

Raised before set first status on global rename

Parameters / Return Value

  • RecRef RecordRef

    The current record reference

  • xRecRef RecordRef

    The old record reference

  • isHandled Boolean

OnBeforeSetFirstStatusOnGlobalRename

local procedure OnBeforeSetFirstStatusOnGlobalRename(var RecRef: RecordRef; xRecRef: RecordRef; var isHandled: Boolean)

Raised before set first status on global rename

Parameters / Return Value

  • RecRef RecordRef

    The current record reference

  • xRecRef RecordRef

    The old record reference

  • isHandled Boolean

    Skip the procedure SetFirstStatus

OnUnexpectedFieldType

local procedure OnUnexpectedFieldType(TableField: Record Field; var IsHandled: Boolean)

Raised if an unexpected field type was retrieved

Parameters / Return Value

  • TableField Record "Field"

    The current field

  • IsHandled Boolean

    to skip error

OnBeforeSetRecordFields

local procedure OnBeforeSetRecordFields(var RecRef: RecordRef; var DataSecurityRecordStatus: Record "EOS DS Record Status"; var handled: Boolean)

Event to use when the “Change status” reports an error caused by a not managed protected table.

Parameters / Return Value

  • RecRef RecordRef

    The record that should be modified

  • DataSecurityRecordStatus Record "EOS DS Record Status"

    The new status

  • handled Boolean

    Has to be set to true to avoid standard code to run

OnAfterGetCurrentPathCode

local procedure OnAfterGetCurrentPathCode(RecRef: RecordRef; DataSecurityRecordStatus: Record "EOS DS Record Status"; var CurrentPathCode: Code[10])

Event executed before showing the “EOS DS Record Status FactBox”, allows to change the PathCode.

Parameters / Return Value

  • RecRef RecordRef

    The source RecRef.

  • DataSecurityRecordStatus Record "EOS DS Record Status"

    The DataSecurityRecordStatus for the RecRef.

  • CurrentPathCode Code[10]

    The PathCode related to the DataSecurityRecordStatus.


EOS Labs -