Sub-Field: 53.401101

Parent File	Name	Number	Package
53.4011	DISPENSE DRUG	53.401101	Inpatient Medications

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DISPENSE DRUG	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `DEC 26, 1991` HELP-PROMPT: `Type a Number between 1 and 999, 0 Decimal Digits` DESCRIPTION: `This is the dispense drug for which pre-exchange needs has been entered.` TECHNICAL DESCR: `This is a 'pointer' to the dispense drug multiple of a Unit Dose order.` GROUP: `PSJU` CROSS-REFERENCE: `53.401101^B` `1)= S ^PS(53.4,DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^PS(53.4,DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)`
.02	PRE-EXCHANGE NEEDS	0;2	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>75)!(X<0)!(X?.E1"."1N.N) X` HELP-PROMPT: `Type a Number between 0 and 75, 0 Decimal Digits.` DESCRIPTION: `This is the number of units entered as pre-exchange needs for this order (medication).` GROUP: `PSJU`

DISPENSE DRUG

0;1

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: DEC 26, 1991
HELP-PROMPT: Type a Number between 1 and 999, 0 Decimal Digits
DESCRIPTION:
This is the dispense drug for which pre-exchange needs has been entered.
TECHNICAL DESCR:
This is a 'pointer' to the dispense drug multiple of a Unit Dose order.
GROUP: PSJU
CROSS-REFERENCE: 53.401101^B
1)= S ^PS(53.4,DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^PS(53.4,DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)

PRE-EXCHANGE NEEDS

0;2

NUMBER

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

INPUT TRANSFORM: K:+X'=X!(X>75)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 75, 0 Decimal Digits.
DESCRIPTION:
This is the number of units entered as pre-exchange needs for this order (medication).
GROUP: PSJU