Sub-Field: 58.24

Parent File	Name	Number	Package
PHARMACY AOU INVENTORY(#58.19)	AREA OF USE	58.24	Auto Replenishment Ward Stock

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	AREA OF USE (AOU)	0;1	POINTER TO PHARMACY AOU STOCK FILE (#58.1)	**********************REQUIRED FIELD********************** PHARMACY AOU STOCK(#58.1) INPUT TRANSFORM: `S:$D(X) DINUM=X` LAST EDITED: `FEB 13, 1990` DESCRIPTION: `This contains the name of the Area of Use as defined in File 58.1 - Pharmacy AOU Stock File.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `58.24^B` `1)= S ^PSI(58.19,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^PSI(58.19,DA(1),1,"B",$E(X,1,30),DA)`
1	INVENTORY TYPE	1;0	POINTER Multiple #58.25	58.25
2	SORT KEY	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 31, 1989` HELP-PROMPT: `Type a Number between 0 and 999999999, 0 Decimal Digits` DESCRIPTION: `The sort key is used to place the AOUs within an Inventory Group in the order in which they are inventoried. This sort order is reflected in the inventory sheet.` CROSS-REFERENCE: `58.24^C` `1)= S ^PSI(58.19,DA(1),1,"C",$E(X,1,30),DA)=""` `2)= K ^PSI(58.19,DA(1),1,"C",$E(X,1,30),DA)`

AREA OF USE (AOU)

0;1

POINTER TO PHARMACY AOU STOCK FILE (#58.1)

************************REQUIRED FIELD************************

INPUT TRANSFORM: S:$D(X) DINUM=X
LAST EDITED: FEB 13, 1990
DESCRIPTION:
This contains the name of the Area of Use as defined in File 58.1 - Pharmacy AOU Stock File.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 58.24^B
1)= S ^PSI(58.19,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^PSI(58.19,DA(1),1,"B",$E(X,1,30),DA)

1 INVENTORY TYPE 1;0 POINTER Multiple #58.25 58.25

SORT KEY

0;2

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: OCT 31, 1989
HELP-PROMPT: Type a Number between 0 and 999999999, 0 Decimal Digits
DESCRIPTION:
The sort key is used to place the AOUs within an Inventory Group in the order in which they are inventoried. This sort order is reflected in the inventory sheet.
CROSS-REFERENCE: 58.24^C
1)= S ^PSI(58.19,DA(1),1,"C",$E(X,1,30),DA)=""
2)= K ^PSI(58.19,DA(1),1,"C",$E(X,1,30),DA)