Routine: PSOBAIR2

Package	Total	Call Graph
VA Fileman	4	(,DD)^%DT C^%DTC $$GET1^DIQ ^DIR
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Registration	3	$$BADADR^DGUTL3 ADD^VADPT PID^VADPT6
Outpatient Pharmacy	2	$$CHKTEMP^PSOBAI ^PSOLSET

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSO BAI SUSPENDED

Entry Points

Name	Comments	DBIA/ICR reference
DETAIL	;
ALL	;
EN	;
END	;
NAME	;Set name(ssn)
MESS	;
SKIP	;
REP	;
PRALL	;Print data for all patients
CHKADDR	;
FOREIGN	;
CHKMAIL	;
DATE	;
CON	;
HD	;
PRONE	;Print data for one patient

External References

Name	Field # of Occurrence
^%DT	DATE+1
DD^%DT	DATE+2, ALL+19
C^%DTC	DATE+3
^%ZIS	SKIP+1
^%ZISC	END+8
^%ZTLOAD	SKIP+6
$$BADADR^DGUTL3	CHKADDR+2
$$GET1^DIQ	DETAIL+2, DETAIL+3, DETAIL+5, DETAIL+6
^DIR	EN+9, DATE+9, END+4, HD+2
$$CHKTEMP^PSOBAI	CHKADDR+4
^PSOLSET	DATE+4
ADD^VADPT	FOREIGN+2
PID^VADPT6	NAME+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This option shows unprinted suspended prescriptions for the following:",! Line Location: EN+2
Function Call: WRITE	Prompt: !,"- BAD ADDRESS INDICATOR set in the PATIENT file (#2) and no active temporary",!," address" Line Location: EN+3
Function Call: WRITE	Prompt: !,"- DO NOT MAIL set in the PHARMACY PATIENT file (#55)" Line Location: EN+4
Function Call: WRITE	Prompt: !,"- FOREIGN ADDRESS set in the PATIENT file (#2) and no active US temporary",!," address",! Line Location: EN+5
Function Call: WRITE	Prompt: ! Line Location: DATE+1
Function Call: WRITE	Prompt: !!?3,"You are logged in under the "_$P($G(^PS(59,+$G(PSOSITE),0)),"^")_" division.",! Line Location: DATE+7
Function Call: WRITE	Prompt: !!,"No data found to print for this date range.",! Line Location: ALL+13
Function Call: WRITE	Prompt: !!!,"NOTE: B=BAD ADDRESS INDICATOR D=NO NOT MAIL F=FOREIGN ADDRESS" Line Location: END+1
Function Call: WRITE	Prompt: !!,"End of Report." Line Location: END+4
Function Call: WRITE	Prompt: !!,"End of Report." Line Location: END+5
Function Call: WRITE	Prompt: ! Line Location: END+6
Function Call: WRITE	Prompt: @IOF Line Location: END+7
Function Call: WRITE	Prompt: ! Line Location: HD+3
Function Call: WRITE	Prompt: @IOF Line Location: HD+4
Function Call: WRITE	Prompt: ?67,"PAGE: "_PSOPAGE Line Location: HD+5
Function Call: WRITE	Prompt: !,"for suspense dates through "_$G(PSOEDTX) Line Location: HD+7
Function Call: WRITE	Prompt: ?70,"B/D/F" Condition for execution: PSOBDF="A" Line Location: HD+7
Function Call: WRITE	Prompt: !,PSOLINE Line Location: HD+8
Function Call: WRITE	Prompt: !!,"Nothing queued to print.",! Line Location: MESS+1
Function Call: WRITE	Prompt: !!,$G(PSONSSN) Line Location: PRALL+4
Function Call: WRITE	Prompt: ?30," ",PSOADDR Line Location: PRALL+4
Function Call: WRITE	Prompt: !,$G(PSOADATE),?15," Rx#: ",$P(SFN0,"^"),?30," ",$P($G(^PSDRUG($P(SFN0,"^",6),0)),"^") Line Location: PRONE+3
Function Call: WRITE	Prompt: !,$G(PSONSSN) Line Location: CON+1
Routine Call	DIR Line Location: EN+9 DATE+9 END+4 HD+2
Routine Call	%ZIS Line Location: SKIP+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSRX - [#52]	GET1^DIQ
^PS(52.5 - [#52.5]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	DETAIL+1, DETAIL+8
^PS(52.5 - [#52.5]	ALL+2, ALL+5, ALL+6, ALL+7, ALL+10, ALL+11, DETAIL+1
^PS(55 - [#55]	CHKMAIL+2
^PS(59 - [#59]	DATE+5, DATE+7, HD+6
^PSDRUG - [#50]	PRONE+3
^PSRX - [#52]	PRONE+2, DETAIL+7
^TMP("PSOBADL"	REP+1!, ALL+13, ALL+14, ALL+15, ALL+16, ALL+17, ALL+20, END+2!, DETAIL+9*

Label References

Name	Line Occurrences
CHKADDR	ALL+3, ALL+8, PRALL+4
CHKMAIL	ALL+3, ALL+8
CON	PRONE+3
DETAIL	ALL+6, ALL+11
END	ALL+13
FOREIGN	ALL+3, ALL+8
HD	ALL+12, ALL+18, PRALL+4, PRONE+5
MESS	EN+9, DATE+1, DATE+4, DATE+9, SKIP+1
NAME	ALL+15
PRALL	ALL+15
PRONE	ALL+20
SKIP	DATE+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DATE+1*!
%DT("A"	DATE+1*
%ZIS	SKIP+1!*, SKIP+6!
DFN	REP+2~, NAME+1, FOREIGN+2
DIR	EN+6!, EN+9!, DATE+8!, DATE+9!, END+4!, HD+2!
DIR("?"	EN+8, DATE+8
DIR("A"	EN+7, DATE+8, END+4, HD+2
DIR("B"	EN+6, DATE+8
DIR(0	EN+6, DATE+8, END+4, HD+2
>> DIRUT	DATE+9
DT	CHKMAIL+3
DTOUT	EN+9, DATE+1, END+3!, MESS+2!
DUOUT	EN+9, DATE+1, END+3!, MESS+2!
GG	SKIP+3~, SKIP+5*
IO	REP+3
IO("Q"	SKIP+2
IOF	END+7, HD+4
IOP	SKIP+1!
IOSL	ALL+18, PRALL+4, PRONE+5
IOST	REP+4
MAILEXP	CHKMAIL+1~, CHKMAIL+3*
PARTIAL	ALL+1~, DETAIL+6*, DETAIL+7
PII	EN+1~, DATE+5*
>> PNODE	ALL+20*, PRONE+4
POP	SKIP+1!
PRINTED	ALL+1~
PSOAALL	REP+2~
PSOADATE	REP+2~, ALL+19*, PRONE+3
PSOADDR	PRALL+1~, PRALL+2*, PRALL+4
PSOADF	REP+2~
PSOADFF	REP+2~
PSOADLP	REP+2~
PSOADND	REP+2~
PSOADX	REP+2~
PSOAFLAG	REP+2~, REP+4, HD+1, PRALL+3, CON+1
PSOANAME	REP+2~, DETAIL+8*, DETAIL+9
PSOANODE	REP+2~
PSOAOPT	REP+2~
PSOAOPTA	REP+2~
PSOAOPTB	REP+2~
PSOAOPTC	REP+2~
PSOAOPTZ	REP+2~
PSOAPAT	EN+1~
PSOASN	REP+2~
PSOBADR	CHKADDR+1~, CHKADDR+2*, CHKADDR+3, CHKADDR+5
PSOBAI	ALL+3, ALL+8, END+3!, CHKADDR+5*
PSOBDF	EN+1~, EN+10*, ALL+4, ALL+9, END+1, HD+6, HD+7, PRONE+4
PSOBDF(	ALL+4, ALL+9
PSOBDF("B"	REP+1, ALL+3, ALL+4, ALL+8, ALL+9, CHKADDR+5, DETAIL+9
PSOBDF("D"	REP+1, ALL+3, ALL+4, ALL+8, ALL+9, CHKMAIL+3, DETAIL+9
PSOBDF("F"	REP+1, ALL+3, ALL+4, ALL+8, ALL+9, FOREIGN+3, DETAIL+9
PSOC	REP+2~
PSOCNT	EN+1~, DATE+5*, DATE+6
PSODEV	REP+2~, REP+4*, END+4, END+5, END+6, HD+2, HD+3
PSODFN	REP+2~, ALL+1~, ALL+2, ALL+5, ALL+6, ALL+7, ALL+10, CHKADDR+2, CHKADDR+4, FOREIGN+2 , CHKMAIL+2, DETAIL+1, DETAIL+8, DETAIL+9
PSOEDT	EN+1~, DATE+2, DATE+3, ALL+5, ALL+11
PSOEDTX	EN+1~, DATE+2*, HD+7
PSOFORGN	FOREIGN+1~, FOREIGN+3*
PSOLBL	ALL+1~
PSOLINE	REP+2~, REP+5*, HD+8
PSONB	REP+2~, ALL+16*, ALL+17, ALL+19, ALL+20
PSONI	REP+2~, ALL+14*, ALL+15, ALL+16, ALL+17, ALL+20, NAME+2
PSONSSN	REP+2~, NAME+2*, PRALL+4, CON+1
PSONX	REP+2~, ALL+15*, ALL+16, ALL+17, ALL+20, NAME+1
PSOPAGE	REP+2~, REP+4, HD+2, HD+3, HD+5
>> PSOPAR	DATE+4
PSORD	ALL+1~, ALL+5, ALL+6, ALL+11, DETAIL+9
PSOSDT	EN+1~
PSOSDTX	EN+1~
>> PSOSITE	DATE+7, HD+6, DETAIL+4
PSOTEMP	CHKADDR+1~, CHKADDR+4, CHKADDR+5, CHKMAIL+1~, CHKMAIL+2, CHKMAIL+3
PSOUT	REP+2~, REP+4, ALL+14, ALL+15, ALL+16, ALL+17, ALL+18, END+4, HD+2, PRALL+4 , PRONE+5
PSOX	ALL+1~
PSUSDIV	EN+1~, DATE+10*, HD+6, DETAIL+4
RXIEN	ALL+1~, DETAIL+2*, DETAIL+5, DETAIL+7, DETAIL+9
RXSITE	ALL+1~, DETAIL+3*, DETAIL+4
RXSTS	ALL+1~, DETAIL+5*
SFN	REP+2~, ALL+1~, ALL+6, ALL+10, ALL+11, ALL+17*, ALL+20, PRONE+2, DETAIL+1, DETAIL+2 , DETAIL+3, DETAIL+6
SFN0	PRONE+1~, PRONE+2*, PRONE+3
VA	REP+2~, NAME+1!, NAME+3!
VA("PID"	NAME+2
>> VAPA(25	FOREIGN+3
X	EN+1~, DATE+3
X1	EN+1~, DATE+3*
X2	EN+1~, DATE+3*
Y	EN+1~, EN+10, DATE+1, DATE+2, DATE+9, DATE+10, ALL+19*, HD+2
>> ZTDESC	SKIP+4*
>> ZTQUEUED	END+8
>> ZTREQ	END+8*
>> ZTRTN	SKIP+4*
>> ZTSAVE(	SKIP+5*
>> ZTSAVE("PSOBDF*"	SKIP+6*

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOBAIR2

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: