Routine: PSOAUTOC

Package	Total	Call Graph
Outpatient Pharmacy	8	REVERSE^PSOBPSU1 REF^PSOCAN2 FIL^PSOCAN3 EN^PSOHLSN EN^PSOHLSN1 EN^PSOHLUP REIN^PSONVNEW CAN^PSOTPCAN
VA Fileman	5	(,DD)^%DT NOW^%DTC ^DIC ^DIK EN^DIQ1
Kernel	3	^%ZTLOAD $$UP^XLFSTR (EDIT,RESCH)^XUTMOPT
MailMan	1	^XMD
Registration	1	(DEM,INP)^VADPT

Package

Total

Call Graph

Outpatient Pharmacy

REVERSE^PSOBPSU1 REF^PSOCAN2 FIL^PSOCAN3 EN^PSOHLSN EN^PSOHLSN1 EN^PSOHLUP REIN^PSONVNEW CAN^PSOTPCAN

VA Fileman

(,DD)^%DT NOW^%DTC ^DIC ^DIK EN^DIQ1

Kernel

^%ZTLOAD $$UP^XLFSTR (EDIT,RESCH)^XUTMOPT

MailMan

^XMD

Registration

(DEM,INP)^VADPT

Package	Total	Caller Graph
Outpatient Pharmacy	7	PSO AUTOCANCEL PSO AUTOCANCEL DEQUEUE PSO AUTOCANCEL REQUEUE PSO AUTOCANCEL1 PSO COSTINIT PSOHELP1 PSOMGCM1

Package

Total

Caller Graph

Outpatient Pharmacy

PSO AUTOCANCEL PSO AUTOCANCEL DEQUEUE PSO AUTOCANCEL REQUEUE PSO AUTOCANCEL1 PSO COSTINIT PSOHELP1 PSOMGCM1

External References

Name	Field # of Occurrence
^%DT	TASK+1
DD^%DT	MAIL+9
NOW^%DTC	CAN+16
^%ZTLOAD	APSOD+9
^DIC	AUTO+1, SETUP+1, SETUP1
^DIK	CAN+20, CAN+22
EN^DIQ1	MAIL+1
REVERSE^PSOBPSU1	CAN+6
REF^PSOCAN2	CAN+19
FIL^PSOCAN3	CAN+8
EN^PSOHLSN	MAIL+33
EN^PSOHLSN1	CAN+23
EN^PSOHLUP	CAN+2
REIN^PSONVNEW	MAIL+46
CAN^PSOTPCAN	CAN+7
DEM^VADPT	MAIL+7
INP^VADPT	CAN+1
$$UP^XLFSTR	APSOD+7
^XMD	MAIL+50
EDIT^XUTMOPT	AUTO+2, AUTO+3, SETUP+2, SETUP+3, SETUP1+1, SETUP1+2
RESCH^XUTMOPT	AUTO+3, SETUP+3, SETUP1+2

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!,"Autocancel System Parameter must be set to 'YES'",!,"before prescriptions are discontinued." Line Location: AUTO+0
Routine Call	DIC Line Location: AUTO+1 SETUP+1 SETUP1

FileNo	Call Tags
^DIC(19.2 - [#19.2]	Classic Fileman Calls
^PS(52.4 - [#52.4]	Classic Fileman Calls
^PS(52.5 - [#52.5]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPM("AMV1"	TASK+2
^DGPM("APTT1"	TASK+2
^DPT - [#2]	TASK+2, MAIL+8, MAIL+48
^PS(50.606 - [#50.606]	MAIL+44
^PS(50.7 - [#50.7]	MAIL+36, MAIL+44
^PS(52.4 - [#52.4]	CAN+22
^PS(52.41 - [#52.41]	MAIL+4, MAIL+21, MAIL+22, MAIL+23, MAIL+27, MAIL+28, MAIL+29, MAIL+30, MAIL+34!, MAIL+35 , MAIL+36
^PS(52.5 - [#52.5]	CAN+18, CAN+19, CAN+20
^PS(52.91 - [#52.91]	APSOD+1, APSOD+2, APSOD+3, APSOD+4
^PS(53 - [#53]	APSOD+6, APSOD+7
^PS(55 - [#55]	TASK+2, CAN+2, CAN+3, APSOD+5, APSOD+7, MAIL+5, MAIL+42, MAIL+43, MAIL+45!
^PS(59.7 - [#59.7]	AUTO, TASK+1, CAN+1
^PSDRUG - [#50]	MAIL+15, MAIL+36, MAIL+44
^PSRX - [#52]	CAN+4, CAN+5, CAN+10, CAN+11, CAN+12, CAN+14, CAN+15, CAN+16, CAN+19, MAIL+15 , MAIL+17
^PSRX("AH"	CAN+11!
^PSRX("APSOD"	MAIL+3, MAIL+15
^TMP("PSOAD"	MAIL+2!, MAIL+8, MAIL+9, MAIL+10, MAIL+11, MAIL+12, MAIL+13, MAIL+14, MAIL+17, MAIL+19* , MAIL+20, MAIL+38, MAIL+39, MAIL+40, MAIL+41, MAIL+46, EX1!
^TMP("PSOHLD"	MAIL+2!, MAIL+15*, MAIL+16, EX1!
^XUSEC("PSORPH"	MAIL+49

Name	Line Occurrences
CAN	TASK+2
EX	AUTO+2
EX1	MAIL+1
KILL	TASK+1, TASK+3
OUT	SETUP+2, SETUP1+1

Name	Field # of Occurrence
^(	CAN+3
^("STA"	CAN+4, CAN+5*
^(0	CAN+3, CAN+4, APSOD+2, MAIL+23, MAIL+43, MAIL+45*
^(2	CAN+4
^(3	CAN+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CAN+16, KILL!
%DT	AUTO+1!, SETUP+1!, OUT!, SETUP1!, SETUP1+3!
%H	KILL!
%T	KILL!
ACNT	CAN+14, CAN+16, KILL!
C	EX!
COM	CAN+23*, KILL+1!
D	EX!
D0	EX!
DA	EX!, CAN+19, CAN+20, CAN+22, KILL!, APSOD+8~, MAIL+1
DFN	CAN+1, KILL!, MAIL+7, MAIL+43*
DI	EX!, APSOD+8~
DIC	AUTO+1!, EX!, SETUP+1!, OUT!, SETUP1!, SETUP1+3!, APSOD+8~, MAIL+1
DIC(0	AUTO+1, SETUP+1, SETUP1*
DIE	AUTO+1*, EX!, APSOD+8~
DIFROM	MAIL+48~
DIK	CAN+20!, CAN+22!
>> DIQ	MAIL+1*
DIR	SETUP1+3!
DIRUT	KILL!
DQ	EX!
DR	EX!, APSOD+8~, MAIL+1*
>> DRG	MAIL+16*, MAIL+17
DT	CAN+4, CAN+5, APSOD+4, MAIL+9
DTOUT	KILL!, SETUP+1!, OUT!, SETUP1!, SETUP1+3!
ENT	MAIL+7, MAIL+8, MAIL+9, MAIL+10, MAIL+11, MAIL+12, MAIL+13, MAIL+14, MAIL+17, MAIL+19 , MAIL+20, MAIL+35, MAIL+38, MAIL+39, MAIL+40, MAIL+41, MAIL+46*, EX1!
I	MAIL+3, MAIL+4, MAIL+5, MAIL+6!, MAIL+15, MAIL+16, MAIL+49, EX1!
LOCATION	MAIL+43*, MAIL+47!
MED	MAIL+36, MAIL+37, MAIL+39, MAIL+41~, MAIL+44*, MAIL+46, MAIL+47!, EX1!
NVA	MAIL+41~, MAIL+42*, MAIL+43, MAIL+45, MAIL+46
ORD	KILL+1!
ORTYP	MAIL+34!, MAIL+35*, MAIL+38, EX1!
PHARMST	CAN+23*, KILL+1!
PLACER	MAIL+43*, MAIL+47!
PSO	KILL!
PSO0	CAN+4*, KILL!
PSO2	CAN+4*, KILL!
PSOD	TASK+2*, KILL!
PSOD0	TASK+1*, TASK+2, KILL!
PSOD2	TASK+1*, CAN+4, KILL!
PSODD	MAIL+41~, MAIL+43*, MAIL+44, MAIL+47!
PSODFN	TASK+2*, CAN+1, CAN+2, CAN+3, KILL!, APSOD~, APSOD+1, APSOD+2, APSOD+3, APSOD+4 , APSOD+5, APSOD+7, MAIL+1, MAIL+3, MAIL+4, MAIL+5, MAIL+7, MAIL+8, MAIL+15, MAIL+21 , MAIL+22, MAIL+34, MAIL+42, MAIL+43, MAIL+45, MAIL+48, EX1!
PSODL	TASK+1*, TASK+2, KILL!
PSOIORD	CAN+29!
PSOLPI	MAIL+18~, MAIL+21*, MAIL+22, MAIL+23, MAIL+27, MAIL+28, MAIL+29, MAIL+30, MAIL+34, MAIL+35 , MAIL+36
PSOLPIST	MAIL+18~, MAIL+23*, MAIL+25, MAIL+30, MAIL+31
PSOLPIX	MAIL+18~, MAIL+23*, MAIL+24, MAIL+33
PSOLPND	MAIL+18~, MAIL+27*, MAIL+28, MAIL+29, MAIL+30
PSONVA	MAIL+41~, MAIL+46*
PSOOI	MAIL+41~, MAIL+43*, MAIL+44, MAIL+47!
PSOOPTN	OUT!, SETUP1+3!
PSOPTN	OUT!, SETUP1+3!
PSORD	CAN+29!
PSORESF1	APSOD+6~, APSOD+7*
PSORESFG	APSOD+6~, APSOD+7
PSORESPS	APSOD+6~*, APSOD+7
PSORX	CAN+3*, CAN+4, CAN+5, CAN+6, CAN+7, CAN+10, CAN+11, CAN+12, CAN+14, CAN+15 , CAN+16, CAN+18, CAN+19, CAN+20, CAN+22, CAN+23, KILL!
PSORXJ	CAN+3*, KILL!
PSOSD	KILL!
PSOTM	OUT!, SETUP1+3!
PTDOD	EX1!
PTDOD(2	MAIL+1
REIN	MAIL+46*, MAIL+47!
RF	CAN+15*, KILL!
RFCNT	CAN+15*, CAN+16, KILL!
RX	MAIL+16*, MAIL+17, EX1!
>> STA	CAN+4*
STAT	CAN+23*, KILL+1!
SUB	CAN+14*, KILL!
>> SUSD	CAN+19*
TM	KILL!
>> TOTNVA	MAIL+5*, MAIL+6, MAIL+40, MAIL+41
TOTPRX	MAIL+2!, MAIL+4*, MAIL+6, MAIL+19, MAIL+20, EX1!
TOTRX	MAIL+2!, MAIL+3*, MAIL+6, MAIL+14, EX1!
TSKDT	KILL!
U	CAN+2
>> VA("BID"	MAIL+48
>> VA("PID"	MAIL+8
>> VADM(3	MAIL+8
VAIN	CAN+1!, KILL!
VAIN(4	CAN+1
X	AUTO+1, EX!, TASK+1, KILL!, SETUP+1, OUT!, SETUP1, SETUP1+3!, APSOD+8~, EX1!
X1	KILL!
X2	KILL!
XMDUZ	MAIL+48*, EX1!
XMSUB	MAIL+48*, EX1!
XMTEXT	MAIL+48*, EX1!
XMY	EX1!
XMY(	MAIL+49*
Y	AUTO+2, EX!, TASK+1, KILL!, SETUP+2, OUT!, SETUP1+1, SETUP1+3!, APSOD+8~, MAIL+9* , MAIL+10, EX1!
ZTDESC	KILL!, APSOD+9*
ZTDTH	KILL!, APSOD+9*
ZTIO	KILL!, APSOD+9*
>> ZTQUEUED	KILL+1
>> ZTREQ	KILL+1, APSOD+9
ZTRTN	KILL!, APSOD+9*
ZTSAVE	KILL!
ZTSAVE("PSODFN"	APSOD+9*
ZTSAVE("ZTREQ"	APSOD+9*

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOAUTOC

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
TASK	;TaskMan entry point
AUTO
SETUP	;initialize nightly Rx cost compile job
APSOD(PSODFN)	;sends mail message that date of death has been deleted
KILL
EX
EX1
MAIL	;builds mail message
SETUP1
OUT
CAN	;discontinue Rxs