Sub-Field: 58.21

Parent File	Name	Number	Package
AOU INVENTORY GROUP(#58.2)	AREA OF USE (AOU)	58.21	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 20, 1992` HELP-PROMPT: `Enter the AOU for this inventory group.` DESCRIPTION: `This contains the name of the AOU that is to be inventoried when selecting this inventory group. This points to File 58.1 - Pharmacy AOU Stock File.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `58.21^B` `1)= S ^PSI(58.2,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^PSI(58.2,DA(1),1,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `58.2^WS^MUMPS` `1)= S ^PSI(58.2,"WS",DA(1),$E(X,1,30))=""` `2)= K ^PSI(58.2,"WS",DA(1),$E(X,1,30))` `This cross-reference is used to distinguish between inventory groups that belong to the AR/WS module and those belonging to the CS module. This cross-reference will identify AR/WS inventory groups and will be used for` `lookup and sorting.`
1	INVENTORY TYPE	1;0	POINTER Multiple #58.22	58.22
2	SORT KEY	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."5N.N) X` LAST EDITED: `NOV 02, 1989` HELP-PROMPT: `Type a Number between 0 and 9999999999, 4 Decimal Digits` DESCRIPTION: `The sort key is used to define the sort order of AOUs within an inventory group.` CROSS-REFERENCE: `58.21^D` `1)= S ^PSI(58.2,DA(1),1,"D",$E(X,1,30),DA)=""` `2)= K ^PSI(58.2,DA(1),1,"D",$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 20, 1992
HELP-PROMPT: Enter the AOU for this inventory group.
DESCRIPTION:
This contains the name of the AOU that is to be inventoried when selecting this inventory group. This points to File 58.1 - Pharmacy AOU Stock File.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 58.21^B
1)= S ^PSI(58.2,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^PSI(58.2,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 58.2^WS^MUMPS
1)= S ^PSI(58.2,"WS",DA(1),$E(X,1,30))=""
2)= K ^PSI(58.2,"WS",DA(1),$E(X,1,30))
This cross-reference is used to distinguish between inventory groups that belong to the AR/WS module and those belonging to the CS module. This cross-reference will identify AR/WS inventory groups and will be used for
lookup and sorting.

1 INVENTORY TYPE 1;0 POINTER Multiple #58.22 58.22

SORT KEY

0;2

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."5N.N) X
LAST EDITED: NOV 02, 1989
HELP-PROMPT: Type a Number between 0 and 9999999999, 4 Decimal Digits
DESCRIPTION:
The sort key is used to define the sort order of AOUs within an inventory group.
CROSS-REFERENCE: 58.21^D
1)= S ^PSI(58.2,DA(1),1,"D",$E(X,1,30),DA)=""
2)= K ^PSI(58.2,DA(1),1,"D",$E(X,1,30),DA)