Routine: APSPORXE

Package	Total	Call Graph
VA Fileman	3	DD^%DT ^DIE ^DIR
IHS Changes To Pharmacy	1	(GETDATE,GETPAT,INIT)^APSPORXA
IHS Patient	1	KILL^AUPNPAT
Kernel	1	ENDR^%ZISS
Patient Care Component	1	^APCDVDLT
Patient Care Component Reports	1	$$START1^APCLDF

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;display outside rx
BEGIN	;
E	;
HDR	;write header
TEXT	;
START	;EP - called from option
EXIT	;cleanup and exit
FIND	;find all rx's on that date
D	;delete

External References

Name	Field # of Occurrence
DD^%DT	FIND+6, DISP+1
ENDR^%ZISS	HDR+6
^APCDVDLT	D+17
$$START1^APCLDF	FIND+3
GETDATE^APSPORXA	BEGIN+7
GETPAT^APSPORXA	BEGIN+5
INIT^APSPORXA	BEGIN+3
KILL^AUPNPAT	EXIT+3
^DIE	E+8, E+11, E+12, D+12
^DIR	E+5, D+5, D+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?80-$L(X)\2,X Line Location: HDR+2
Function Call: WRITE	Prompt: !! Line Location: HDR+4
Function Call: WRITE	Prompt: ?80-$L(X)\2,IOBON,X,IOBOFF Line Location: HDR+8
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"TYPE OF ACTION MISSING" Line Location: BEGIN+1
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"TYPE OF ACTION MISSING" Line Location: BEGIN+2
Function Call: WRITE	Prompt: !!,"ERROR in finding outside rx's - data fetcher error!!" Line Location: FIND+4
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"No OUTSIDE Rx's recorded for ",$P(^DPT(DFN,0),U)," on " Line Location: FIND+6
Function Call: WRITE	Prompt: Y,".",! Line Location: FIND+6
Function Call: WRITE	Prompt: !,"Okay, not deleted." Line Location: D+11
Function Call: WRITE	Prompt: @IOF Condition for execution: $D(IOF) Line Location: DISP+1
Function Call: WRITE	Prompt: !,"Outside Rx's for ",$P(^DPT(DFN,0),U)," on " Line Location: DISP+1
Function Call: WRITE	Prompt: Y,":",! Line Location: DISP+1
Routine Call	DIE Line Location: E+8 E+11 E+12 D+12
Routine Call	DIR Line Location: E+5 D+5 D+9

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNVSIT - [#9000010]	Classic Fileman Calls
^AUPNVMED - [#9000010.14]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMED - [#9000010.14]	E+11, E+12, DISP+3, DISP+5
^AUPNVSIT - [#9000010]	FIND+5, D+17, DISP+4
^DPT - [#2]	FIND+6, DISP+1
^PSDRUG - [#50]	DISP+3

Label References

Name	Line Occurrences
@(	BEGIN+9
D	D+19
DISP	E+4, D+4
E	E+14
EXIT	BEGIN+1, BEGIN+2, BEGIN+4, BEGIN+6, BEGIN+8, BEGIN+10
FIND	E+1, D+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	EXIT+2!
A	EXIT+2!
APCDPAT	EXIT+3!
APCDVDLT	EXIT+2!, D+17*!
APCDVLDT	EXIT+2!
APSPC	EXIT+1!, E+3!, D+3!
APSPC(	E+3, E+8, D+3, D+8, DISP+2
APSPDATE	BEGIN+8, EXIT+1!, FIND+3, FIND+6, DISP+1
APSPDIEN	EXIT+1!
APSPDRUG	EXIT+1!
APSPER	EXIT+1!, FIND+3*, FIND+4
APSPHIGH	EXIT+1!, E+5, D+5, DISP+2*
APSPOIEN	EXIT+1!
APSPOL	EXIT+1!
APSPQUIT	BEGIN+4, EXIT+1!
APSPRX	EXIT+1!, FIND+3!, FIND+4!, FIND+6, E+2, D+2
APSPRX(	FIND+5!, E+3, E+8, E+11, D+3, D+12, D+17, DISP+2, DISP+4
APSPSEL	EXIT+1!, E+8, D+8
APSPTYPE	BEGIN+1, BEGIN+2, BEGIN+9, EXIT+1!
APSPX	EXIT+1!, E+8, E+11, D+8, D+12, D+17
APSPY	EXIT+1!, DISP+2*, DISP+3
APSQDRUG	E+12*!
B	EXIT+2!
C	EXIT+2!, E+3, D+3
D	EXIT+2!
D0	EXIT+2!
DA	EXIT+2!, E+8!, E+11, E+12, D+12*!
DD	EXIT+2!
DFN	BEGIN+6, EXIT+3!, FIND+3, FIND+6, DISP+1
DI	EXIT+2!
DIC	EXIT+2!
DIE	EXIT+2!, E+8!, E+11!, E+12!, D+12!
DIQ	EXIT+2!
DIR	EXIT+2!, E+5!, D+5!, D+9!
DIR("A"	E+5, D+5, D+9*
DIR("B"	D+9*
DIR(0	E+5, D+5, D+9*
DIRUT	EXIT+2!, E+5, E+6, D+5, D+6, D+9*, D+10
DIU	E+8!, E+11!, E+12!, D+12!
DIV	EXIT+2!, E+8!, E+11!, E+12!, D+12!
DIW	EXIT+2!, E+8!, E+11!, E+12!, D+12!
DIY	EXIT+2!, E+8!, E+11!, E+12!, D+12!
DQ	EXIT+2!
DR	EXIT+2!, E+8!, E+11!, E+12!, D+12!
DTOUT	EXIT+2!
DUOUT	EXIT+2!, E+5, D+5, D+9
>> IOBOFF	HDR+8
>> IOBON	HDR+8
IOF	HDR+1, DISP+1
J	HDR+2*, HDR+3!
M	EXIT+2!, FIND+5, DISP+2, DISP+3, DISP+5
P	EXIT+2!, DISP+2*, DISP+4
U	FIND+5, FIND+6, E+8, E+11, D+12, D+17, DISP+1, DISP+2, DISP+3, DISP+4 , DISP+5
V	EXIT+2!, FIND+5, D+17
X	HDR+2, HDR+3!, HDR+6, HDR+7, HDR+8, EXIT+2!, FIND+3, FIND+5, E+3, D+3* , DISP+2*
Y	EXIT+2!, FIND+3, FIND+6, E+7, E+8, D+7, D+8, D+11, DISP+1*

Marked Items

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSPORXE

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items