Routine: PSOSULOG

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Outpatient Pharmacy	3	$$CHKTEMP^PSOBAI ^PSOLSET WARN^PSOSUDCN
VA Fileman	3	(,DD)^%DT $$GET1^DIQ ^DIR
Registration	2	$$BADADR^DGUTL3 ADD^VADPT
IHS Patient	1	$$HRN^AUPNPAT

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSO PNDLOG

Entry Points

Name	Comments	DBIA/ICR reference
SKIPC	;
HEAD	;
LOG	;IHS/MSC/PLS - 04/30/2009
MESS
SKIP	;
REP	;
CHKADDR	;
FOREIGN	;
CHKMAIL	;
EXIT	;
HEADB	;
HEADND
BIG	;
DATE
CHKBAD	;
EDATE

External References

Name	Field # of Occurrence
^%DT	DATE, EDATE
DD^%DT	REP+22, BIG+4
^%ZIS	SKIPC+3
^%ZISC	REP+19, REP+49, BIG+2, BIG+31
^%ZTLOAD	SKIPC+6
$$HRN^AUPNPAT	REP+14
$$BADADR^DGUTL3	CHKADDR+2
$$GET1^DIQ	REP+13
^DIR	LOG+5, EDATE+2, EDATE+7, SKIP+2, SKIPC+1, REP+20, REP+46, HEAD+1, BIG+3, BIG+28 , HEADB+1
$$CHKTEMP^PSOBAI	CHKADDR+4
^PSOLSET	PSOSULOG+3
WARN^PSOSUDCN	PSOSULOG+3
ADD^VADPT	FOREIGN+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: LOG+2
Function Call: WRITE	Prompt: ! Line Location: EDATE+1
Function Call: WRITE	Prompt: ! Line Location: EDATE+2
Function Call: WRITE	Prompt: !!?3,"You are logged in under the "_$P($G(^PS(59,+$G(PSOSITE),0)),"^")_" division.",! Line Location: EDATE+5
Function Call: WRITE	Prompt: ! Line Location: SKIP+2
Function Call: WRITE	Prompt: ! Line Location: SKIPC+1
Function Call: WRITE	Prompt: ! Line Location: SKIPC+2
Function Call: WRITE	Prompt: !,"Task queued to print" Line Location: SKIPC+6
Function Call: WRITE	Prompt: !!,"No report printed!",!! Line Location: MESS+0
Function Call: WRITE	Prompt: !!,"NO RECORDS TO PRINT",! Line Location: REP+19
Function Call: WRITE	Prompt: !!?9,"Patient Name: "_$G(PATNAME) Line Location: REP+29
Function Call: WRITE	Prompt: ?62,PSOBAD Line Location: REP+43
Function Call: WRITE	Prompt: ! Line Location: REP+46
Function Call: WRITE	Prompt: !,"NOTE: B=BAD ADDRESS INDICATOR D=NO NOT MAIL F=FOREIGN ADDRESS" Line Location: REP+47
Function Call: WRITE	Prompt: !," END OF REPORT " Line Location: REP+48
Function Call: WRITE	Prompt: ?68,"PAGE: ",$G(PAGE) Line Location: HEAD+2
Function Call: WRITE	Prompt: !,"RX #",?13,"DRUG",?53,"MW",?56,"PRNT B/D/F",?66,$S($G(PSOSCMOP):"CMOP STATUS",1:"") Line Location: HEAD+2
Function Call: WRITE	Prompt: !,"RX #",?13,"DRUG",?53,"MW",?56,"PRNT B/D/F",?66,$S($G(PSOSCMOP):"CMOP STATUS",1:"") Line Location: HEAD+2
Function Call: WRITE	Prompt: !!,"NO RECORDS TO PRINT",! Line Location: BIG+2
Function Call: WRITE	Prompt: ?103,PSOBAD Line Location: BIG+25
Function Call: WRITE	Prompt: ! Line Location: BIG+28
Function Call: WRITE	Prompt: !,"NOTE: B=BAD ADDRESS INDICATOR D=NO NOT MAIL F=FOREIGN ADDRESS" Line Location: BIG+29
Function Call: WRITE	Prompt: !," END OF REPORT " Line Location: BIG+30
Function Call: WRITE	Prompt: @IOF Line Location: HEADB+2
Function Call: WRITE	Prompt: !,"RX #",?13,"PATIENT",?45,"DRUG",?88,"TYPE",?93,"PRINTED B/D/F",?108,$S($G(PSOSCMOP):"CMOP STATUS",1:""),?122,"PAGE ",$G(PAGE) Line Location: HEADB+3
Function Call: WRITE	Prompt: !,LINE Line Location: HEADB+3
Routine Call	DIR Line Location: LOG+5 EDATE+2 EDATE+7 SKIP+2 SKIPC+1 REP+20 REP+46 HEAD+1 BIG+3 BIG+28 HEADB+1
Routine Call	%ZIS Line Location: SKIPC+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PS(59 - [#59]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	REP+10, REP+17, REP+26, BIG+8
^PS(52.5 - [#52.5]	REP+5, REP+6, REP+7, REP+8, REP+9, REP+10, REP+13, REP+24, REP+27, REP+41 , BIG+6, BIG+9, BIG+23
^PS(55 - [#55]	CHKMAIL+2
^PS(59 - [#59]	EDATE+3, EDATE+5
^PSDRUG - [#50]	REP+33, BIG+15
^PSRX - [#52]	REP+32, REP+33, REP+35, REP+36, REP+37, REP+38, REP+39, BIG+13, BIG+15, BIG+17 , BIG+18, BIG+19, BIG+20, BIG+21, CHKBAD+10
^TMP($J	PSOSULOG+4!, EXIT+1!, REP+1!, REP+17*, REP+19, REP+22, REP+23, BIG+2, BIG+4, BIG+5

Label References

Name	Line Occurrences
BIG	REP+18
CHKADDR	CHKBAD+3
CHKBAD	REP+43, BIG+25
CHKMAIL	CHKBAD+4
DATE	DATE
EDATE	EDATE
EXIT	LOG+5, DATE, EDATE, EDATE+2, EDATE+7, SKIP+2, SKIPC+1, SKIPC+3, SKIPC+4, REP+19 , REP+49, BIG+2, BIG+31
FOREIGN	CHKBAD+5
HEAD	REP+19, REP+22, REP+30
HEADB	BIG+2, BIG+4, BIG+11
HEADND	BIG+4
MESS	LOG+5, DATE, EDATE, EDATE+2, EDATE+7, SKIP+2, SKIPC+1, SKIPC+3
REP	SKIPC+7
SKIP	EDATE+4
SKIPC	SKIP+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DATE!, EDATE!
%DT("A"	DATE, EDATE
%DT(0	EDATE*
%ZIS	SKIPC+3!*
BDATE	PSOSULOG+4~, EDATE, EXIT+2!, REP+4, REP+5
DFN	FOREIGN+1~, FOREIGN+2*
DIR	LOG+2!, LOG+5!, EDATE+2!, EDATE+6!, EDATE+7!, SKIP+2!, SKIPC+1!, REP+20!, REP+46!, HEAD+1! , BIG+3!, BIG+28!, HEADB+1!
DIR("?"	LOG+4, EDATE+6
DIR("A"	LOG+2, EDATE+2, EDATE+6, SKIP+2, SKIPC+1, HEAD+1, HEADB+1*
DIR("B"	LOG+2, EDATE+2, EDATE+6, SKIP+2, SKIPC+1*
DIR(0	LOG+2, EDATE+2, EDATE+6, SKIP+2, SKIPC+1, REP+20, REP+46, HEAD+1, BIG+3, BIG+28 , HEADB+1*
>> DIRUT	LOG+5, EDATE+2, EDATE+7, SKIP+2, SKIPC+1
DIVINS	REP+3~, REP+13*, REP+14
DT	CHKMAIL+3
>> DTOUT	DATE, EDATE
EDATE	PSOSULOG+4~, EDATE+1*, EXIT+2!, REP+5
FILL	CHKBAD+8~, CHKBAD+9*, CHKBAD+11
GG	PSOSULOG+4~, SKIPC+5*, EXIT+2!
HDAT	PSOSULOG+4~, EXIT+2!, REP+21*, REP+29
HPAT	PSOSULOG+4~, EXIT+2!, REP+21, REP+29
IO	REP+2
IO("Q"	SKIPC+4
IOF	HEAD+2, HEADB+2
IOP	SKIPC+3!
IOSL	REP+30, BIG+11
IOST	REP+19, REP+46, HEAD+1, BIG+2, BIG+28, HEADB+1
LINE	PSOSULOG+4~, EXIT+2!, REP+2*, HEAD+2, HEADB+3
MAILEXP	CHKMAIL+1~, CHKMAIL+3*
NODE	PSOSULOG+4~, EXIT+2!, REP+24, REP+28, REP+31, REP+32, REP+35, REP+36, REP+37, REP+38 , REP+39, REP+44, REP+45, BIG+6, BIG+10, BIG+12, BIG+13, BIG+17, BIG+18, BIG+19 , BIG+20, BIG+21, BIG+26, BIG+27, CHKBAD+9
PAGE	PSOSULOG+4~, EXIT+2!, REP+4, HEAD+1, HEAD+2, BIG+4, HEADB+1, HEADB+3*
PAT	PSOSULOG+4~, EXIT+2!, REP+10, REP+14, REP+17, REP+22, REP+23, REP+29, BIG+4*, BIG+5
PATNAME	PSOSULOG+4~, EXIT+2!, REP+26, REP+29, BIG+8, BIG+14
PATPTR	PSOSULOG+4~, EXIT+2!, REP+24, REP+25, REP+26, BIG+6, BIG+7, BIG+8, CHKBAD+2
PDAT	PSOSULOG+4~, EXIT+2!, REP+22, REP+29
PHRN	REP+3~, REP+14*, REP+15, REP+17
PII	PSOSULOG+4~, EDATE+3*, EXIT+2!
POP	SKIPC+3!
PP	PSOSULOG+4~, EXIT+2!, REP+38, BIG+20
PSOBAD	EXIT+2!, REP+43, BIG+25, CHKBAD+3, CHKBAD+4, CHKBAD+5, CHKBAD+12, CHKBAD+13, CHKBAD+14
PSOBADR	CHKADDR+1~, CHKADDR+2*, CHKADDR+3, CHKADDR+5
>> PSOBAI	CHKADDR+5*
PSOBDF	CHKBAD+1!, CHKBAD+3!, CHKBAD+4!, CHKBAD+5!
PSOBDF(""	CHKBAD+3, CHKBAD+4, CHKBAD+5
PSOBDF("B"	CHKADDR+5*
PSOBDF("D"	CHKMAIL+3*
PSOBDF("F"	FOREIGN+3*
PSOCNT	PSOSULOG+4~, EDATE+3*, EDATE+4, EXIT+2!
PSODATE	PSOSULOG+4~, EXIT+2!, REP+22, REP+23, BIG+4, BIG+5
PSODATEX	PSOSULOG+4~, EXIT+2!, REP+22, HEAD+2, BIG+4, HEADND
>> PSODFN	CHKADDR+2, CHKADDR+4, FOREIGN+2, CHKMAIL+2, CHKBAD+2*
PSOFORGN	FOREIGN+1~, FOREIGN+3*
PSOINRX	PSOSULOG+4~, EXIT+2!, REP+31, REP+33, BIG+12, BIG+15
PSOMW	REP+34!, REP+35, REP+37, REP+38, REP+39, REP+40, BIG+16!, BIG+17, BIG+19, BIG+20* , BIG+21*, BIG+22
PSOPRINT	REP+41, REP+42, REP+43, BIG+1~, BIG+23, BIG+24, BIG+25
PSORMZ	SKIPC+2*, EXIT+2!, REP+2, REP+18
PSORT	PSOSULOG+4~, LOG+5*, EXIT+2!, REP+15, REP+17
PSOSCMOP	PSOSULOG+4~, SKIP+3*, EXIT+2!, REP+8, REP+44, HEAD+2, BIG+26, HEADB+3
>> PSOSITE	PSOSULOG+3, EDATE+5, REP+9, REP+28, BIG+10
PSOTEMP	CHKADDR+1~, CHKADDR+4, CHKADDR+5, CHKMAIL+1~, CHKMAIL+2, CHKMAIL+3
PSPRINT	PSOSULOG+4~, EDATE+2*, EXIT+2!, REP+7, REP+27, BIG+9
PSUSDIV	PSOSULOG+4~, EDATE+8*, EXIT+2!, REP+9, REP+28, BIG+10
>> PSXSYS	SKIP+1
QFLAG	PSOSULOG+4~, EXIT+2!, REP+4, REP+22, REP+23, REP+30, REP+46, HEAD+1, BIG+4, BIG+5 , BIG+11, BIG+28, HEADB+1*
RX	CHKBAD+8~, CHKBAD+9*, CHKBAD+10
SEQ	CHKBAD+8~, CHKBAD+10*
SIN	PSOSULOG+4~, EXIT+2!, REP+5*, REP+6, REP+7, REP+8, REP+9, REP+10, REP+13, REP+17
SINRX	PSOSULOG+4~, EXIT+2!, REP+23, REP+24, REP+27, REP+41, BIG+5, BIG+6, BIG+9, BIG+23
SUSDIV	REP+3~, REP+13*
U	REP+13
>> VAPA(25	FOREIGN+3
X	PSOSULOG+4~, DATE, EDATE, EXIT+2!, CHKBAD+10*, CHKBAD+11, CHKBAD+12, CHKBAD+13, CHKBAD+14
Y	PSOSULOG+4~, LOG+5, DATE, EDATE, EDATE+1, EDATE+2, EDATE+7, EDATE+8, SKIP+2, SKIP+3 , SKIPC+1, SKIPC+2, EXIT+2!, REP+22, HEAD+1, BIG+4, HEADB+1
>> ZTDESC	SKIPC+4*
>> ZTQUEUED	EXIT+1
>> ZTREQ	EXIT+1*
>> ZTRTN	SKIPC+4*
>> ZTSAVE(	SKIPC+5*
ZZ	PSOSULOG+4~, EXIT+2!, REP+5, REP+17, CHKBAD+8~, CHKBAD+11

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOSULOG

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: