DSIYINP GET INV PT GET DATA

TITLEVALUE
NAMEDSIYINP GET INV PT GET DATA
DESCRIPTIONReturns Inventory Point data from file 445 for view/edit.
TAGGET
ROUTINEDSIYGNP
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERSTN
DESCRIPTIONStation Number
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH5

INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERTYPE
DESCRIPTIONThe Type of inventory point, W=Warehouse, P=Primary, S=Secondary.
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH1

INPUT PARAMETERSSEQUENCE NUMBER3
INPUT PARAMETERDSIYIEN
DESCRIPTIONPointer to file 445.
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH30

INPUT PARAMETERSSEQUENCE NUMBER4
INPUT PARAMETERFLAG
DESCRIPTIONFlag which indicates what information is returned.

FLG: "M"=Main, "T"=Total Items, "DP"=Distribution Points, "SB"=Stocked By
"IU"=Inventory Users, "FCP"=Fund Control Points, "PROS"=Prosthetics
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH4

INPUT PARAMETERSSEQUENCE NUMBER5
INPUT PARAMETERSIZE
DESCRIPTIONThe number of lines to return
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH

RETURN VALUE TYPEARRAY
RETURN PARAMETER DESCRIPTIONRET(1)=-1^error e.g. missing/invalid input param, no data
or RET(1-n)=Field#^Internal Data^External Data
Multiples are distinguished from file level data by "$$START ...$$" text.
e.g.:
RET(n)=.01^500-PHARMACY^500-PHARMACY
RET(n)=.5^Y^YES
RET(n)=.6^Y^YES
RET(n)= RET(4)=.7^P^PRIMARY
...etc...then special fields/multiples...multiples...
RET(n)=$$TOTAL ITEMS$$_total items for this inventory point
RET(n)=$$START DISTRIBUTION POINTS$$ (for Warehouse/Primary only)
RET(n)=23^500-DRUG CABINET^SECONDARY IEN^Name^TypeIEN^Name^Type
RET(n)=$$START INVENTORY USERS$$
RET(n)=10046^INVENTORY,MGR^MANAGER IEN^Name^has key (Manager)
RET(n)=$$START FUND CONTROL POINTS$$
RET(n)=5555^5555 SUPPLY FUND IEN^Name (from file 420)
RET(n)=$$START STOCKED BY$$ (for Primary/Secondary Only)
RET(n)=350^500-WAREHOUSE^SUPPLY WAREHOUSE IEN^Name^Type
RET(n)=$$START MIS COSTING$$ (for Primary/Secondary Only)
RET(n)=nnn^name IEN^Name
AVAILABILITY
INACTIVE
CLIENT MANAGER
WORD WRAP ON
VERSION
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED