Sub-Field: 53.703

Parent File	Name	Number	Package
53.702	DRUG	53.703	Barcode Medication Administration

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DRUG	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 06, 2003` HELP-PROMPT: `Type a Number between 1 and 9999999, 0 Decimal Digits` DESCRIPTION: `This .01 field contains a number that represents the record number of the drug in the VistA server's Drug file. It is used in the workstation file to prevent the possibility of filing duplicate drug names.` CROSS-REFERENCE: `53.703^B` `1)= S ^ALPB(53.7,DA(2),2,DA(1),7,"B",$E(X,1,30),DA)=""` `2)= K ^ALPB(53.7,DA(2),2,DA(1),7,"B",$E(X,1,30),DA)`
1	DRUG NAME	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>45!($L(X)<1) X` LAST EDITED: `JAN 07, 2003` HELP-PROMPT: `Answer must be 1-45 characters in length.` DESCRIPTION: `This field contains the descriptive name of the medication.`

DRUG

0;1

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JAN 06, 2003
HELP-PROMPT: Type a Number between 1 and 9999999, 0 Decimal Digits
DESCRIPTION:
This .01 field contains a number that represents the record number of the drug in the VistA server's Drug file. It is used in the workstation file to prevent the possibility of filing duplicate drug names.
CROSS-REFERENCE: 53.703^B
1)= S ^ALPB(53.7,DA(2),2,DA(1),7,"B",$E(X,1,30),DA)=""
2)= K ^ALPB(53.7,DA(2),2,DA(1),7,"B",$E(X,1,30),DA)

DRUG NAME

0;2

FREE TEXT