Routine: APSPDSC1

Package	Total	Call Graph
IHS Changes To Pharmacy	2	EOJ^APSPDSC EP^APSPGMR
Kernel	1	^%ZISC
Outpatient Pharmacy	1	SIG^PSOHELP
VA Fileman	1	^DIR

Package	Total	Caller Graph
IHS Changes To Pharmacy	1	APSPDSC

Entry Points

Name	Comments	DBIA/ICR reference
HEADER	;
MEDS	;
EOJ	;
WARN3	;IHS/DSD/ENM 06/10/97 ENM MODIFIED WARN2 MODULE
WARN2	;IHS/DSD/ENM V5.06 WARN2 MODULE
RX	;
START	;
EMW
WARNING	;
SIG	;
WARN3X	;IHS/DSD/ENM END OF ENM WARN2 MODULE
SIGX	;
TRAILER	;
WARN2X	;

External References

Name	Field # of Occurrence
^%ZISC	APSPDSC1+7
EOJ^APSPDSC	EOJ+4
EP^APSPGMR	HEADER+4
^DIR	SIG+4, SIG+11, EMW+1, WARN2+4
SIG^PSOHELP	SIG+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: CONDITIONAL Line Location: APSPDSC1+2
Function Call: WRITE	Prompt: ?(IOM-20),"Date : ",APSPDSC("DATE") Line Location: HEADER+2
Function Call: WRITE	Prompt: !?(IOM-20),"Page: ",APSPAGE Line Location: HEADER+3
Function Call: WRITE	Prompt: ! Line Location: HEADER+5
Function Call: WRITE	Prompt: !?(IOM\2-12),"MEDICATION INSTRUCTIONS",! Line Location: HEADER+7
Function Call: WRITE	Prompt: APSS Line Location: HEADER+8
Function Call: WRITE	Prompt: !,@IOF Line Location: SIG+3
Function Call: WRITE	Prompt: @IOF Line Location: SIG+4
Function Call: WRITE	Prompt: !,APSS Line Location: SIG+5
Function Call: WRITE	Prompt: !!!,APSDNAME," - " Line Location: SIG+6
Function Call: WRITE	Prompt: ?30,$E(INS1,1,(IOM-1)) Line Location: SIG+7
Function Call: WRITE	Prompt: "-" Line Location: SIG+8
Function Call: WRITE	Prompt: !,@IOF Line Location: SIG+10
Function Call: WRITE	Prompt: @IOF Line Location: SIG+11
Function Call: WRITE	Prompt: "-" Condition for execution: $E(INS1,(APS2P+(IOM-31)))]" " Line Location: SIG+12
Function Call: WRITE	Prompt: !,@IOF Line Location: EMW+0
Function Call: WRITE	Prompt: @IOF Line Location: EMW+1
Function Call: WRITE	Prompt: !!?2,$E(APSPK,1,(IOM-1)) Line Location: EMW+2
Function Call: WRITE	Prompt: "-" Line Location: EMW+3
Function Call: WRITE	Prompt: !,$E(APSPK,APS2P+1,(APS2P+(IOM-1))) Line Location: EMW+5
Function Call: WRITE	Prompt: !,@IOF Line Location: WARN2+3
Function Call: WRITE	Prompt: @IOF Line Location: WARN2+4
Function Call: WRITE	Prompt: !!?10,$E(APSPK,1,(IOM-12)) Line Location: WARN2+5
Function Call: WRITE	Prompt: "-" Line Location: WARN2+6
Function Call: WRITE	Prompt: !?10,$E(APSPK,APS2P+1,(APS2P+(IOM-12))) Line Location: WARN2+8
Function Call: WRITE	Prompt: !,@IOF Line Location: TRAILER+1
Function Call: WRITE	Prompt: !,APSS Line Location: TRAILER+2
Function Call: WRITE	Prompt: !!!,"ADDITIONAL COMMENTS:",! Line Location: TRAILER+3
Function Call: WRITE	Prompt: !!,APSS Line Location: TRAILER+4
Function Call: WRITE	Prompt: !!?(IOM-28) Line Location: TRAILER+5
Function Call: WRITE	Prompt: APSS Line Location: TRAILER+5
Function Call: WRITE	Prompt: !?(IOM-20),"PHARMACIST" Line Location: TRAILER+6
Routine Call	DIR Line Location: SIG+4 SIG+11 EMW+1 WARN2+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("XY"	START+1
^DIC(54	WARN3+2, WARN2+2
^PSDRUG - [#50]	RX+2
^PSRX - [#52]	RX+1, RX+3, RX+4

Label References

Name	Line Occurrences
EMW	WARN3+2
EOJ	APSPDSC1+8
HEADER	START+3, SIG+3, SIG+10, EMW, WARN2+3, TRAILER+1
MEDS	START+4
RX	MEDS+2
SIG	RX+8
SIGX	SIG+4, SIG+11
START	APSPDSC1+6
TRAILER	START+5
WARN2	WARNING+4
WARN2X	EMW+1, WARN2+4
WARNING	RX+8

Naked Globals

Name	Field # of Occurrence
^("XY"	START+1
^(0	RX+1, RX+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APS2P	SIG+9, SIG+12, EMW+4, EMW+5, WARN2+7, WARN2+8, EOJ+1!
APSCNT	MEDS+1, MEDS+2, EOJ+1!
APSCNT2	WARNING+3, WARNING+4, EOJ+1!
APSDNAME	RX+7*, SIG+6, EOJ+1!
APSDRUG	RX+2*, RX+6, RX+7, WARNING+1, WARNING+2, EOJ+1!
APSI	TRAILER+4*, EOJ+1!
APSPAGE	START+2, HEADER+3, HEADER+4, HEADER+9, EOJ+1!
APSPDSC	EOJ+1!
APSPDSC("COPIES"	APSPDSC1+6, START+7*
APSPDSC("DATE"	HEADER+2
APSPDSC("FAC"	HEADER+6
APSPDSC("NAME"	HEADER+1
>> APSPDSC1("QUI	T FLG" , SIG+4, SIG+11, EMW+1, WARN2+4, EOJ+1!
APSPJ	WARN3+1, WARN3+2, WARN2+1, WARN2+2, EOJ+2!
APSPK	WARN3+1, WARN3+2, EMW, EMW+2, EMW+3, EMW+5, WARN2+1, WARN2+2, WARN2+3, WARN2+5 , WARN2+6, WARN2+8, EOJ+2!
APSRX	MEDS+1, MEDS+2, RX+1, RX+3, RX+4, EOJ+1!
APSRX0	RX+1*, RX+2, EOJ+2!
APSS	HEADER+8!, SIG+5, TRAILER+2, TRAILER+4, TRAILER+5, EOJ+2!
APSSIG	RX+3, RX+4, RX+5, RX+6, SIG+2, EOJ+2!
APSWL	WARNING+3, WARNING+4, WARN3+2, WARN2+2, EOJ+2!
APSWLS	WARNING+2*, WARNING+4, EOJ+2!
APSX	MEDS+2, EOJ+2!
DIR	SIG+4!, SIG+11!, EMW+1!, WARN2+4!
DIR(0	SIG+4, SIG+11, EMW+1, WARN2+4
DX	START+1*, EOJ+2!
DY	START+1*, EOJ+2!
I	APSPDSC1+6*, EOJ+2!
INS1	SIG+1~, SIG+3, SIG+7, SIG+8, SIG+12
IO	APSPDSC1+5, SIG+4, SIG+11, EMW+1, WARN2+4
IO(0	SIG+4, SIG+11, EMW+1, WARN2+4
IOF	START+6, SIG+3, SIG+4, SIG+10, SIG+11, EMW, EMW+1, WARN2+3, WARN2+4, TRAILER+1
IOM	HEADER+2, HEADER+3, HEADER+6, HEADER+7, HEADER+8, SIG+3, SIG+7, SIG+8, SIG+9, SIG+12 , EMW, EMW+2, EMW+3, EMW+4, EMW+5, WARN2+3, WARN2+5, WARN2+6, WARN2+7, WARN2+8 , TRAILER+5, TRAILER+6
IOSL	SIG+3, SIG+4, SIG+10, SIG+11, EMW, EMW+1, WARN2+3, WARN2+4, TRAILER+1
IOST	START+5, START+6, SIG+3, SIG+4, SIG+10, SIG+11, EMW, EMW+1, WARN2+3, WARN2+4
SIG	EOJ+2!
U	RX+2, RX+7, WARNING+1, WARNING+2
X	SIG+2*, EOJ+2!
Y	SIG+4!, SIG+11!, EMW+1!, WARN2+4!
ZTDESC	EOJ+3!
ZTIO	EOJ+3!
ZTRTN	EOJ+3!
ZTSAVE	EOJ+3!
ZTSK	EOJ+3!

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSPDSC1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: