Sub-Field: 59.52

Parent File	Name	Number	Package
IV ROOM(#59.5)	DELIVERY TIME	59.52	Inpatient Medications

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DELIVERY TIME	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<4)!(+X<1)!(+X>2400)!(X#100>59)!(X'?1N.N) X` LAST EDITED: `JUL 24, 1986` HELP-PROMPT: `Answer must be 4 characters in length.` DESCRIPTION: `Delivery times must be entered using a 24-hour clock (i.e., 9AM is entered as 0900). Delivery times are used as default start times for admixtures and hyperalimentations. Enter midnight as 2400.` GROUP: `PSJI` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `59.52^B` `1)= S ^PS(59.5,DA(1),3,"B",$E(X,1,30),DA)=""` `2)= K ^PS(59.5,DA(1),3,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `59.52^AT^MUMPS` `1)= S ^PS(59.5,DA(1),3,"AT",+("."_X),DA)=""` `2)= K ^PS(59.5,DA(1),3,"AT",+("."_X),DA)` `Used by Inpatient Package. S ^PS(59.5,IV ROOM NAME,3,"AT",DELIVERY TIME (minus trailing zeros),DELIVERY TIME IEN)=""`

DELIVERY TIME

0;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>4!($L(X)<4)!(+X<1)!(+X>2400)!(X#100>59)!(X'?1N.N) X
LAST EDITED: JUL 24, 1986
HELP-PROMPT: Answer must be 4 characters in length.
DESCRIPTION: Delivery times must be entered using a 24-hour clock (i.e., 9AM is entered as 0900). Delivery times are used as default start times for admixtures and hyperalimentations. Enter midnight as 2400.
GROUP: PSJI
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 59.52^B
1)= S ^PS(59.5,DA(1),3,"B",$E(X,1,30),DA)=""
2)= K ^PS(59.5,DA(1),3,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 59.52^AT^MUMPS
1)= S ^PS(59.5,DA(1),3,"AT",+("."_X),DA)=""
2)= K ^PS(59.5,DA(1),3,"AT",+("."_X),DA)
Used by Inpatient Package. S ^PS(59.5,IV ROOM NAME,3,"AT",DELIVERY TIME (minus trailing zeros),DELIVERY TIME IEN)=""