Routine: PSJCLOZ

Package	Total	Call Graph
VA FileMan	6	(C,NOW)^%DTC ($$FIND1,FIND,LIST)^DIC FILE^DICN ^DIE $$GET1^DIQ ^DIR
Kernel	3	($$FMTE,$$NOW)^XLFDT $$SETUP1^XQALERT $$DEA^XUSER
Inpatient Medications	1	($$ENDD,$$ENDTC)^PSGMI
List Manager	1	(INSTR,PAUSE)^VALM1
Outpatient Pharmacy	1	$$CLKEYWRN^PSOCLUTL
Uncategorized	1	^@(

Package	Total	Caller Graph
Inpatient Medications	21	PSGNE3 PSGOD PSGOE41 PSGOE42 PSGOE7 PSGOE8 PSGOE81 PSGOE82 PSGOE91 PSGOEC PSGOEE PSGOEF PSGOER PSGOERS PSGOEV PSGOT PSJCOM PSJCOM1 PSJLMPRU PSJOE PSJOE1
Outpatient Pharmacy	4	PSODIR1 PSOORED2 PSOORED6 PSOOREDT

Name	Comments	DBIA/ICR reference
CLOZ(DFN,DRUG)	; ; DFN is patient IEN, DRUG is drug file (#50) IEN
PROVCHK(PROV)	;
BEFQUIT	;
OVERRIDE	;
PSJFILE(DFN)	;
PSJFILE1	;
ALERT	; send an alert to the TWO approving team members
READ	;
TDD	; TOTAL DAILY DOSE INPUT
ORD	;
END	;
CMPLX	;COMPLEX THEN ORDER LOGIC
CMPLX2	;SECOND COMPLEX THEN ORDER LOGIC
CMPLX3	;SECOND COMPLEX THEN ORDER LOGIC
CLOZPAT	;VERIFY PATIENT IS A CLOZAPINE PATIENT
ANDTHEN	;COMPLEX AND/THEN ORDER
DISPCMP(PSGORD,PSSD)	;COMPLEX ORDER CHECK
EXTDT	;VERIFY EXTERNAL DATE
MSG1	;
MSG2	;
MSG3	;
MSG4	;
MSG5	;
MSG6	; MSG 6 added for new critically low ANC levels clozapine override requirements
MSG9	;
MSG10	;
COMPLEX	; Display Complex Order stop date warning message <<RJS
COMPLEX1	; Display Complex Order stop date warning message <<RJS
LASTCHLD(DFN,ON)	; Last child of Complex order or not
ISCLOZ(PSGORD,ORPSOI,DFN,PSGORDNM,PSGDRG)	; Define a clozapine order and associated drug ; PSGORD - Pending Order number (file 53.1) ; ORPSOI - ID containing Pharmacy Orderable Item number (file 50.7) ; DFN - Patient ID (file 2) ; PSGORDNM - Pharmacy order number (file 55) ; PSGDRG - Drug Code ; OROI - Orderable Item number (file 101.43)	ICR #7176 Status: Active Usage: Controlled Subscription
CLOZPSOI(ORPSOI)	; Define a clozapine order based on Pharmacy Orderable item

Name	Field # of Occurrence
C^%DTC	CMPLX2+11, CMPLX3+7, COMPLEX+6, COMPLEX1+6
NOW^%DTC	PSJFILE1+2
^@(	CLOZ+6
$$FIND1^DIC	PROVCHK+9, BEFQUIT+3, BEFQUIT+4, BEFQUIT+6, BEFQUIT+7, OVERRIDE+1, CLOZPAT+6, ANDTHEN+4
FIND^DIC	CLOZPSOI+1
LIST^DIC	LASTCHLD+5, LASTCHLD+11
FILE^DICN	PSJFILE1+9
^DIE	PSJFILE1+11
$$GET1^DIQ	CLOZ+5, BEFQUIT+5, BEFQUIT+8, ALERT+3, ALERT+6, ORD+2, CMPLX+1, CMPLX2+1, CMPLX3+1, CLOZPAT+2 , CLOZPAT+3, CLOZPAT+5, CLOZPAT+7, ANDTHEN+1, ANDTHEN+3, ANDTHEN+5, DISPCMP+1, DISPCMP+2, COMPLEX+2, COMPLEX1+2 , LASTCHLD+3, LASTCHLD+9, ISCLOZ+9, ISCLOZ+10, ISCLOZ+11, ISCLOZ+12, ISCLOZ+16, ISCLOZ+17, ISCLOZ+18, ISCLOZ+21 , CLOZPSOI+3
^DIR	OVERRIDE+4, READ+2, TDD+2
$$ENDD^PSGMI	CMPLX2+11, CMPLX3+3, CMPLX3+7
$$ENDTC^PSGMI	CMPLX2+11, CMPLX3+3, CMPLX3+7
$$CLKEYWRN^PSOCLUTL	PROVCHK+11
INSTR^VALM1	COMPLEX1+7, COMPLEX1+8, COMPLEX1+9, COMPLEX1+10, COMPLEX1+11, COMPLEX1+12, COMPLEX1+13, COMPLEX1+14, COMPLEX1+15
PAUSE^VALM1	COMPLEX+11, COMPLEX1+16
$$FMTE^XLFDT	ALERT+5
$$NOW^XLFDT	ALERT+5
$$SETUP1^XQALERT	ALERT+8
$$DEA^XUSER	PROVCHK+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: OVERRIDE+4
Function Call: WRITE	Prompt: !!,"OVERRIDE ALERTS HAVE BEEN SENT TO THE APPROVING TEAM MEMBERS",!! Line Location: ALERT+9
Function Call: WRITE	Prompt: !!,"Permission to dispense clozapine has been denied. The results of the latest",! Line Location: MSG1+1
Function Call: WRITE	Prompt: "Lab Test drawn in the past 7 days show ANC results but No Matching WBC.",! Line Location: MSG1+2
Function Call: WRITE	Prompt: "If you wish to dispense outside the FDA and VA protocol ANC limits,",! Line Location: MSG1+3
Function Call: WRITE	Prompt: "document your request to Request for Override of Pharmacy Lockout ",! Line Location: MSG1+4
Function Call: WRITE	Prompt: "(from VHA Handbook 1160.02) Director of the",! Line Location: MSG1+5
Function Call: WRITE	Prompt: "VA National Clozapine Coordinating Center",! Line Location: MSG1+6
Function Call: WRITE	Prompt: "(Phone: 214-857-0068 Fax: 214-857-0339) for a one-time override permission.",! Line Location: MSG1+7
Function Call: WRITE	Prompt: !,"No order entered!" Line Location: MSG1+8
Function Call: WRITE	Prompt: !!,"Permission to dispense clozapine has been denied. The results of the latest",! Line Location: MSG2+1
Function Call: WRITE	Prompt: "Lab Test drawn in the past 7 days show No ANC results. If you wish to dispense",! Line Location: MSG2+2
Function Call: WRITE	Prompt: "outside the FDA and VA protocol ANC limits, document your request to Request",! Line Location: MSG2+3
Function Call: WRITE	Prompt: "for Override of Pharmacy Lockout (from VHA Handbook 1160.02) Director of the",! Line Location: MSG2+4
Function Call: WRITE	Prompt: "VA National Clozapine Coordinating Center",! Line Location: MSG2+5
Function Call: WRITE	Prompt: "(Phone: 214-857-0068 Fax: 214-857-0339) for a one-time override permission.",! Line Location: MSG2+6
Function Call: WRITE	Prompt: !,"No order entered!" Line Location: MSG2+7
Function Call: WRITE	Prompt: !,"A CBC/Differential including ANC Must Be Ordered and Monitored on a",! Line Location: MSG3+1
Function Call: WRITE	Prompt: "Daily basis until the ANC above 1000/mm3 with no signs of infection.",! Line Location: MSG3+2
Function Call: WRITE	Prompt: "If ANC is between 1000-1499, therapy can be continued but physician must order",! Line Location: MSG3+3
Function Call: WRITE	Prompt: "lab test three times weekly." Line Location: MSG3+4
Function Call: WRITE	Prompt: !,"Permission to dispense clozapine has been denied. If the results of the latest" Line Location: MSG4+1
Function Call: WRITE	Prompt: !,"Lab Test drawn in the past 7 days show ANC below 1000/mm3 and you wish to" Line Location: MSG4+2
Function Call: WRITE	Prompt: !,"dispense outside the FDA and VA protocol ANC limits, document your request to" Line Location: MSG4+3
Function Call: WRITE	Prompt: !,"Request for Override of Pharmacy Lockout (from VHA Handbook 1160.02)" Line Location: MSG4+4
Function Call: WRITE	Prompt: !,"Director of the VA National Clozapine Coordinating Center" Line Location: MSG4+5
Function Call: WRITE	Prompt: !,"(Phone: 214-857-0068 Fax: 214-857-0339) for a one-time override permission.",! Line Location: MSG4+6
Function Call: WRITE	Prompt: !!,"Permission to dispense clozapine has been denied. Please contact the" Line Location: MSG5+1
Function Call: WRITE	Prompt: !,"Director of the VA National Clozapine Coordinating Center" Line Location: MSG5+2
Function Call: WRITE	Prompt: !!,"Request for Override of Pharmacy Lockout (from VHA Handbook 1160.02)" Line Location: MSG5+3
Function Call: WRITE	Prompt: !,"(Phone: 214-857-0068 Fax: 214-857-0339).",! Line Location: MSG5+4
Function Call: WRITE	Prompt: !!,"This clozapine drug may not be dispensed to the patient at this time based on the available lab tests related to the clozapine treatment program." Line Location: MSG6+1
Function Call: WRITE	Prompt: !!,"Please contact the NCCC to request an override in order to proceed with dispensing this drug. " Line Location: MSG6+2
Function Call: WRITE	Prompt: !!,"Request for Override of Pharmacy Lockout (from VHA Handbook 1160.02)" Line Location: MSG6+3
Function Call: WRITE	Prompt: !!,"The matching ANC counts which caused the lockout are of lab test results performed on " Line Location: MSG6+4
Function Call: WRITE	Prompt: $P(Y,"@") Line Location: MSG6+5
Function Call: WRITE	Prompt: !!,?5,"ANC: "_$P(PSOYS,"^",4),! Line Location: MSG6+6
Function Call: WRITE	Prompt: !,"*** Permission to dispense clozapine has been denied based on the available" Line Location: MSG9+1
Function Call: WRITE	Prompt: !," lab tests related to the clozapine treatment program. ***" Line Location: MSG9+2
Function Call: WRITE	Prompt: !!,"For a National Override to dispense at the patient's normal frequency," Line Location: MSG9+3
Function Call: WRITE	Prompt: !,"please contact the VA National Clozapine Coordinating Center to request" Line Location: MSG9+4
Function Call: WRITE	Prompt: !,"an Override of Pharmacy Lockout (from VHA Handbook 1160.02)" Line Location: MSG9+5
Function Call: WRITE	Prompt: !,"(Phone: 214-857-0068 Fax: 214-857-0339)." Line Location: MSG9+6
Function Call: WRITE	Prompt: !,"A Special Conditions Local Override can be approved for" Line Location: MSG9+7
Function Call: WRITE	Prompt: !,"(1) weather-related conditions, (2) mail order delays of clozapine, or" Line Location: MSG9+8
Function Call: WRITE	Prompt: !,"(3) inpatient going on leave. With Provider's documentation of approval," Line Location: MSG9+9
Function Call: WRITE	Prompt: !,"you may dispense a one-time supply not to exceed 4 days.",! Line Location: MSG9+10
Function Call: WRITE	Prompt: !,"*** Permission to dispense clozapine has been denied based on the available" Line Location: MSG10+1
Function Call: WRITE	Prompt: !," lab tests related to the clozapine treatment program. ***" Line Location: MSG10+2
Function Call: WRITE	Prompt: !!,"For a National Override to dispense at the patient's normal frequency," Line Location: MSG10+3
Function Call: WRITE	Prompt: !,"please contact the VA National Clozapine Coordinating Center to request an" Line Location: MSG10+4
Function Call: WRITE	Prompt: !,"Override of Pharmacy Lockout (from VHA Handbook 1160.02) (Phone: 214-857-0068" Line Location: MSG10+5
Function Call: WRITE	Prompt: !,"Fax: 214-857-0339)." Line Location: MSG10+6
Function Call: WRITE	Prompt: !,"A Special Conditions Local Override for Inpatients can be approved for an" Line Location: MSG10+7
Function Call: WRITE	Prompt: !,"IP Override Order with Outside Lab Results. With Provider's documentation of" Line Location: MSG10+8
Function Call: WRITE	Prompt: !,"approval, you may dispense a one-time IP supply not to exceed 4 days." Line Location: MSG10+9
Function Call: WRITE	Prompt: !,"The ANC from another facility must be recorded in the Progress note/comments" Line Location: MSG10+10
Function Call: WRITE	Prompt: !,"in pharmacy" Line Location: MSG10+11
Function Call: WRITE	Prompt: !!,?25,"* WARNING *",!!,?10,"This order contains a requested duration." Line Location: COMPLEX+7
Function Call: WRITE	Prompt: !,?8,"Please review the system calculated stop date",!,?5,"to confirm that it is within the allowable duration" Line Location: COMPLEX+8
Function Call: WRITE	Prompt: !,?13,"of the order based on the patient's",!,?11,"authorized clozapine dispense frequency.",! Line Location: COMPLEX+9
Function Call: WRITE	Prompt: !,?10,"Order stop date should not exceed ",PSGFDT,!,!,?1,"Review the entire profile to determine appropriate action(s).",! Line Location: COMPLEX+10
Routine Call	DIC Line Location: PROVCHK+9 BEFQUIT+3 BEFQUIT+4 BEFQUIT+6 BEFQUIT+7 OVERRIDE+1 CLOZPAT+6 ANDTHEN+4
Routine Call	DIC Line Location: CLOZPSOI+1
Routine Call	DIC Line Location: LASTCHLD+5 LASTCHLD+11
Routine Call	DIE Line Location: PSJFILE1+11
Routine Call	DIR Line Location: OVERRIDE+4 READ+2 TDD+2

FileNo	Call Tags
100.002	LIST^DIC
100.045	FIND1^DIC, GET1^DIQ
^ORD(101.41 - [#101.41]	FIND1^DIC
101.416	FIND1^DIC, GET1^DIQ
^DPT - [#2]	GET1^DIQ
200.051	FIND1^DIC
^PSDRUG - [#50]	FIND^DIC, GET1^DIQ
^PS(53.1 - [#53.1]	GET1^DIQ
53.11	GET1^DIQ
^PS(53.8 - [#53.8]	Classic Fileman Calls
^PS(55 - [#55]	GET1^DIQ
55.01	GET1^DIQ
55.06	GET1^DIQ
55.07	GET1^DIQ
^YSCL(603.01 - [#603.01]	FIND1^DIC, GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	MSG6+5
^PS(53.8 - [#53.8]	PSJFILE1+2
^TMP("PSGCPLX"	CMPLX+5*, CMPLX2+5, CMPLX2+6, CMPLX2+8
^TMP("PSJCOM"	PSJFILE+3, PSJFILE+5, PSJFILE+6, PSJFILE+7

Name	Line Occurrences
ALERT	PSJFILE1+15
ANDTHEN	CMPLX+3, CMPLX2+3, CMPLX3+4
CLOZ	ORD+2
CLOZPAT	CMPLX+3, CMPLX2+3, CMPLX3+4, COMPLEX+4, COMPLEX1+4
CLOZPSOI	ISCLOZ+13, ISCLOZ+14, ISCLOZ+19
DISPCMP	CMPLX3+2
END	READ+2
PROVCHK	CLOZ+3
PSJFILE1	PSJFILE+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PSJFILE1+2, PSJFILE1+13!
ANQDATA	PSJFILE+6*, PSJFILE1+1, PSJFILE1+3, PSJFILE1+4, PSJFILE1+13!
ANQREM	PSJFILE1+13!
>> ANQX	CLOZ+2, CLOZ+3, PROVCHK+3, PROVCHK+6, PROVCHK+10, TDD+2, ORD+2, MSG1+9, MSG2+8, MSG4+7 , MSG6+5*
ARR	CLOZPSOI+1~
ARR("DILIST"	CLOZPSOI+2
CLOZFLG	CLOZPSOI+1~
CLOZNUM	CLOZPAT+4~, CLOZPAT+5*, CLOZPAT+6
CLOZPAT	READ+1, READ+2, CMPLX2+10, CMPLX3+6, CLOZPAT+1!, CLOZPAT+3, CLOZPAT+7, CLOZPAT+8, COMPLEX+5, COMPLEX1+4 , COMPLEX1+5
CLOZUID	CLOZPAT+4~, CLOZPAT+6*, CLOZPAT+7
DA	PSJFILE1+9!, PSJFILE1+10*, PSJFILE1+11!
DD	PSJFILE1+8!, PSJFILE1+9!
DFN	CLOZ~, CLOZ+2, PSJFILE~, PSJFILE+1, CMPLX+5, CMPLX2+5, CMPLX2+6, CMPLX2+8, CLOZPAT+2, CLOZPAT+3 , CLOZPAT+5, LASTCHLD~, LASTCHLD+3, LASTCHLD+9, ISCLOZ~, ISCLOZ+15, ISCLOZ+16, ISCLOZ+18
DIC	PSJFILE1+8*, PSJFILE1+9!
DIC(0	PSJFILE1+8*
DIE	PSJFILE1+10*, PSJFILE1+11!
DIR	OVERRIDE+4!, READ+2!, TDD+2!, END+1!
DIR("A"	OVERRIDE+4, READ+2, TDD+2*
DIR("B"	READ+2*
DIR(0	OVERRIDE+4, READ+2, TDD+2*
DIROUT	END+1!
DIRUT	READ+2, TDD+2, END+1!
DLAYGO	PSJFILE1+8*, PSJFILE1+9!
DO	PSJFILE1+8!, PSJFILE1+9!
DR	PSJFILE1+9!, PSJFILE1+10*, PSJFILE1+11!
DRUG	CLOZ~, CLOZ+2, CLOZ+5
FL	LASTCHLD+1~
I	LASTCHLD+6, LASTCHLD+7, LASTCHLD+12, LASTCHLD+13, CLOZPSOI+2~*
IOF	OVERRIDE+4
ISCLOZ	ISCLOZ+7~, ISCLOZ+8, ISCLOZ+11, ISCLOZ+14, ISCLOZ+15, ISCLOZ+17, ISCLOZ+21, ISCLOZ+22, CLOZPSOI+2, CLOZPSOI+3*
LN	COMPLEX1+15~*
MAX	LASTCHLD+5~, LASTCHLD+7, LASTCHLD+11~, LASTCHLD+13
MSG	COMPLEX1+3~, COMPLEX1+7, COMPLEX1+8, COMPLEX1+9, COMPLEX1+10, COMPLEX1+11, COMPLEX1+12, COMPLEX1+13, COMPLEX1+14
>> NOW	PSJFILE1+2*, PSJFILE1+8
ON	LASTCHLD~, LASTCHLD+1, LASTCHLD+2, LASTCHLD+3, LASTCHLD+8, LASTCHLD+9
ORARR	LASTCHLD+5~, LASTCHLD+11~
ORARR("DILIST"	LASTCHLD+5, LASTCHLD+6, LASTCHLD+11, LASTCHLD+12
>> ORCLOZ	BEFQUIT+14, BEFQUIT+15
ORCLPAT	BEFQUIT+2~, BEFQUIT+10*, BEFQUIT+11
ORMAX	BEFQUIT+2~, BEFQUIT+11*, BEFQUIT+12, BEFQUIT+16
>> ORO	PSJFILE1+5, PSJFILE1+6
ORPSOI	ISCLOZ~, ISCLOZ+12~, ISCLOZ+13, ISCLOZ+14, ISCLOZ+18~, ISCLOZ+19, CLOZPSOI~, CLOZPSOI+1
>> ORX	BEFQUIT+4, BEFQUIT+5, BEFQUIT+7, BEFQUIT+8
ORY	BEFQUIT+13!, BEFQUIT+14*
>> ORYS	BEFQUIT+10
PROV	PROVCHK~, PROVCHK+4, PROVCHK+5, PROVCHK+9, OVERRIDE+1
PS538	PSJFILE1+10~*
>> PSCDATE	ALERT+5*, ALERT+6
>> PSCLPAT	ALERT+2, ALERT+3, ALERT+6, ALERT+7
PSGCOMP	CMPLX+5*, COMPLEX+11!, COMPLEX1+16!
>> PSGCOPY	TDD+4, CMPLX+2, CMPLX2+2, ANDTHEN+2
>> PSGCTDD	TDD+4*
PSGDRG	ORD+1, ORD+2, ISCLOZ~, ISCLOZ+10, ISCLOZ+11, ISCLOZ+16, ISCLOZ+17, ISCLOZ+21, CLOZPSOI+1~, CLOZPSOI+2 , CLOZPSOI+3
>> PSGETDD	TDD+3*
>> PSGFD	CMPLX2+11, CMPLX3+2, CMPLX3+3, CMPLX3+7*
>> PSGFDN	CMPLX2+11, CMPLX3+3, CMPLX3+7*
PSGFDT	COMPLEX+3~, COMPLEX+6, COMPLEX+10, COMPLEX1+3~, COMPLEX1+6, COMPLEX1+13
>> PSGFLG	COMPLEX+1, COMPLEX+11, COMPLEX1+1, COMPLEX1+16
PSGID	ANDTHEN+3~, ANDTHEN+4*, ANDTHEN+5
>> PSGODA	PSJFILE+3
PSGORD	CMPLX+1, CMPLX+5, CMPLX2+1, CMPLX2+7, CMPLX3+1, CMPLX3+2, ANDTHEN+1, ANDTHEN+3, DISPCMP~, DISPCMP+1 , DISPCMP+2, COMPLEX+2, COMPLEX1+2, ISCLOZ~, ISCLOZ+8, ISCLOZ+9, ISCLOZ+10, ISCLOZ+12
PSGORDNM	ISCLOZ~, ISCLOZ+15, ISCLOZ+16, ISCLOZ+18
>> PSGORQF	TDD+2, ORD+2
>> PSGP	ORD+2
>> PSGPR	CLOZ+3
>> PSGRDTX	CMPLX2+8*, CMPLX2+9, CMPLX2+10, CMPLX3+6
>> PSGRDTX(	CMPLX2+9
>> PSGSD	CMPLX+5, COMPLEX+5, COMPLEX1+5
>> PSGSTAT	CMPLX3+2
PSGTMP	CMPLX2+6, CMPLX2+7, CMPLX2+8, ANDTHEN+3~, ANDTHEN+4, ANDTHEN+5
>> PSGTYP	CMPLX+4, CMPLX+5, CMPLX2+4, CMPLX3+5, ANDTHEN+3, ANDTHEN+5
>> PSJ1PH	PSJFILE1+3*
>> PSJ2PH	PSJFILE1+3*, PSJFILE1+12, ALERT+5
>> PSJCLPAT	PSJFILE+1*
>> PSJCOM	PSJFILE+2
>> PSJDD	ORD+1
>> PSJEDITO	TDD+3
>> PSJORD	CMPLX2+9
PSJORD1	PSJFILE+4~, PSJFILE+5, PSJFILE+6, PSJFILE+7
PSJORDER	PSJFILE+2~
PSJORDER("PSJORN"	PSJFILE1+7*
PSJORN	PSJFILE+2~, PSJFILE+7, PSJFILE1+6, PSJFILE1+7
>> PSJPROV	PSJFILE1+3, PSJFILE1+5, PSJFILE1+12, ALERT+5
PSJQUIT	PROVCHK+1~, PROVCHK+3, PROVCHK+6, PROVCHK+8, PROVCHK+10*
>> PSJREASN	PSJFILE1+4*
>> PSJREMRK	PSJFILE1+4*
>> PSOLAST4	ALERT+3*, ALERT+6
PSORD1	LASTCHLD+1~, LASTCHLD+2, LASTCHLD+3, LASTCHLD+4, LASTCHLD+6, LASTCHLD+7, LASTCHLD+8, LASTCHLD+9, LASTCHLD+10, LASTCHLD+12 , LASTCHLD+13
PSORDA	LASTCHLD+1~, LASTCHLD+2, LASTCHLD+3, LASTCHLD+4, LASTCHLD+5, LASTCHLD+8, LASTCHLD+9, LASTCHLD+10, LASTCHLD+11
>> PSOSAND	TDD+5*
>> PSOYS	MSG6+5, MSG6+6
PSSD	CMPLX3+3!, DISPCMP~, DISPCMP+2*
>> QOAA	BEFQUIT+1
QODS	BEFQUIT+2~, BEFQUIT+3, BEFQUIT+4, BEFQUIT+5*, BEFQUIT+12
QORF	BEFQUIT+2~, BEFQUIT+6, BEFQUIT+7, BEFQUIT+8, BEFQUIT+9, BEFQUIT+12
RSLT	ALERT+1~, ALERT+8*
RTN	CLOZ+4~, CLOZ+5*, CLOZ+6
U	BEFQUIT+10, BEFQUIT+14, BEFQUIT+15, CMPLX2+8, ISCLOZ+11, ISCLOZ+17, ISCLOZ+21, CLOZPSOI+3
X	PSJFILE1+8*, PSJFILE1+13!, TDD+3, TDD+4, TDD+5, CMPLX2+10~, CMPLX2+11, CMPLX3+6~, CMPLX3+7, COMPLEX+6 , COMPLEX1+6
X1	CMPLX2+10~, CMPLX3+6~, COMPLEX+5, COMPLEX1+5
X2	CMPLX2+10~, CMPLX3+6~, COMPLEX+5, COMPLEX1+5
>> XMY(	PSJFILE1+12*
>> XQA(	ALERT+5*
>> XQAARCH	ALERT+4*
>> XQADATA	ALERT+2*
>> XQAFLG	ALERT+4*
>> XQAID	ALERT+7*
>> XQAMSG	ALERT+6*
>> XQX	READ+1
Y	OVERRIDE+2~, PSJFILE1+10, PSJFILE1+13!, READ+2, MSG6+5*

Customize PDF page

Package: Inpatient Medications

Routine: PSJCLOZ

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 25

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: