Global: ^PS(53.4

FileMan FileNo	FileMan Filename	Package
53.4	PRE-EXCHANGE NEEDS	Inpatient Medications

Directly Accessed By Routines, Total: 7

Package	Total	Routines
Inpatient Medications	7	DISPENSE DRUG ^PS(59.6 PSGPEN PSGPER0 PSGPER1 PSGPER2 ^PS(53.4

Accessed By FileMan Db Calls, Total: 1

Package	Total	Routines
Inpatient Medications	1	PSGPER1

Pointer To FileMan Files, Total: 2

Package	Total	FileMan Files
Kernel	1	NEW PERSON(#200)[.01]
Registration	1	PATIENT(#2)[#53.401(.01)]

Fields, Total: 3

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	USER	0;1	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) LAST EDITED: `JUL 08, 1991` DESCRIPTION: `This is the user (pharmacist) who entered the pre-exchange needs.` GROUP: `PSJU` CROSS-REFERENCE: `53.4^B` `1)= S ^PS(53.4,"B",$E(X,1,30),DA)=""` `2)= K ^PS(53.4,"B",$E(X,1,30),DA)`
1	DATE	0;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `This is the date and time the first pre-exchange needs was entered for a particular session of order entry or non-verified orders.` GROUP: `PSJU` CROSS-REFERENCE: `53.4^AUD^MUMPS` `1)= I ^PS(53.4,DA,0) S ^PS(53.4,"AUD",+^(0),+X,DA)=""` `2)= I ^PS(53.4,DA,0) K ^PS(53.4,"AUD",+^(0),+X,DA)` `3)= USED BY UNIT DOSE` `Used by Unit Dose to allow the data to be cleaned up in a timely manner, but not too soon! S ^PS(53.4,"AUD",USER,DATE,IEN)=""`
2	PATIENT	1;0	POINTER Multiple #53.401	53.401 DESCRIPTION: `This is the patient for whom the labels were created. This also contains the orders for which the labels were created.` GROUP: `PSJU`

.01

USER

0;1

POINTER TO NEW PERSON FILE (#200)

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

NEW PERSON(#200)

LAST EDITED: JUL 08, 1991
DESCRIPTION:
This is the user (pharmacist) who entered the pre-exchange needs.
GROUP: PSJU
CROSS-REFERENCE: 53.4^B
1)= S ^PS(53.4,"B",$E(X,1,30),DA)=""
2)= K ^PS(53.4,"B",$E(X,1,30),DA)

1

DATE

0;2

DATE

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

INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
DESCRIPTION:
This is the date and time the first pre-exchange needs was entered for a particular session of order entry or non-verified orders.
GROUP: PSJU
CROSS-REFERENCE: 53.4^AUD^MUMPS
1)= I ^PS(53.4,DA,0) S ^PS(53.4,"AUD",+^(0),+X,DA)=""
2)= I ^PS(53.4,DA,0) K ^PS(53.4,"AUD",+^(0),+X,DA)
3)= USED BY UNIT DOSE
Used by Unit Dose to allow the data to be cleaned up in a timely manner, but not too soon! S ^PS(53.4,"AUD",USER,DATE,IEN)=""

2

PATIENT

1;0

POINTER Multiple #53.401

53.401

DESCRIPTION:
This is the patient for whom the labels were created. This also contains the orders for which the labels were created.
GROUP: PSJU

External References

Name	Field # of Occurrence
^%DT	1+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.4 - [#53.4]	.01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)

Naked Globals

Name	Field # of Occurrence
^(0	1(XREF 1S), 1(XREF 1K)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	1+1*
>> DA	.01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)
X	.01(XREF 1S), .01(XREF 1K), 1+1*!, 1(XREF 1S), 1(XREF 1K)
>> Y	1+1

Customize PDF page

Package: Inpatient Medications