IM_Warehouse

Inherits

IM_Constant, SY_Service

Properties

LOCAL cIsSysDB=isFALSE

LOCAL cMainTable$="IM_Warehouse"

Methods

FUNCTION CheckForSubAccounts()

FUNCTION ClearSubAccounts()

FUNCTION GetInactiveRestrictedWarehouses(className$, inactiveWhseList$, restrictedWhseList$)

FUNCTION GetInactiveRestrictedWarehouses(className$, inactiveWhseList$, restrictedWhseList$, includeEndDates)

Get a list of inactive warehouses and a list of restricted warehouses

Parameter	Description
className$	[input, string] The name of the class to check if warehouse is restricted
inactiveWhseList$	[output, string] A list of inactive warehouse codes
restrictedWhseList$	[output, string] A list of restricted warehouse codes for the specified class
includeEndDates	{optional} [input, boolean] if true, returns " " pairs in restrictedWhseList$

Returns

[boolean] SUCCESS

FUNCTION GetWarehouseStatus$(whse$, className$)

FUNCTION GetWarehouseStatus$(whse$, className$, startDate$, endDate$)

Get status of a warehouse

Parameter	Description
whse$	[input, string] Warehouse Code
className$	[input, string] The name of the class to check if warehouse is restricted
startDate$	{optional} [output, string] warehouse restricted start date
endDate$	{optional} [output, string] warehouse restricted end date

Returns

[string] "I", "R", "A", or "" if warehouse is not on file

FUNCTION SetBCTransactionCode(bcTransCode$)

Pass in B/C Transaction Code which detemines UI class to check for restricted warehouse

Parameter	Description
bcTransCode$	[input, string] B/C Import Transaction Code

Properties inherited from: IM_Constant

trnSALE$, trnISSUE$, trnTRANSFER$, trnADJUST$, trnRECEIPT$, trnCOUNTCARD$, segTWO$, segTHREE$, segFOUR$, segFIVE$, segSIX$, segSEVEN$, segEIGHT$, segNINE$, segTEN$, segNONE$, pcrPRICECODE$, pcrITEM$, pcrITEMCUSTOMER$

Properties inherited from: SY_Service

BOF, CurrentBrowseIndex$, CurrentIndex$, EOF, SecurityAccess

Methods inherited from: IM_Constant

GetTransactionType$()

Methods inherited from: SY_Service

BindVariable(), CheckMainTable(), Clear(), Find(), FindById(), GetChildHandle(), GetChildKeyReference$(), GetColumns$(), GetDataSources$(), GetDataSourcesAddl$(), GetJson$(), GetKey$(), GetKeyColumns$(), GetKeyPadded$(), GetPartialRecord(), GetRecord(), GetRecordCount(), GetRecordEx(), GetResultSets(), GetTable$(), GetTablePath$(), GetValue(), GetValues(), IsValid(), MoveFirst(), MoveLast(), MoveNext(), MovePrevious(), ReadAdditional(), SetBrowseFilter(), SetBrowseIndex(), SetCacheMode(), SetIndex(), SetKeyValue(), SetParentColumns(), SetParentHandle(), SetUIHandle(), PERFORM ClearEditRcd(), FormatJson$(), GetAddlDataSources(), GetDateColumns$(), InitChildCollection(), MoveFirstLast(), MoveNextPrevious(), OpenMainTable(), ParseKeyDef(), PrepareKeyDef(), ReadRec(), ResolveColumnList$(), SetControls(), SetCurrentKey(), UseKeyColl()