Routine: PSUCP

Package	Total	Call Graph
Pharmacy Benefits Management	7	(AUTO,MANUAL)^PSUALERT EN^PSUCP1 MMNOMAP^PSUCP2 ^PSUDBQUE CLEANUP^PSUHL ($$VAL,$$VALI)^PSUTL XMY^PSUTL1
VA FileMan	5	(,C,NOW)^%DTC ^DIC FILE^DIE DT^DILF ^DIR
Kernel	1	SETUP^XQALERT
MailMan	1	^XMD

Package	Total	Caller Graph
Pharmacy Benefits Management	20	PSU PBM AUTO PSU PBM MANUAL PSUCP1 PSUCP2 PSUDEM1 PSUDEM4 PSUDEM5 PSUOP0 PSUOP6 PSUSUM1 PSUSUM2 PSUSUM3 PSUSUM4 PSUSUM5 PSUSUM6 PSUSUM7 PSUUD0 PSUUD5 PSUV0 PSUV5

Name	Comments	DBIA/ICR reference
MANUAL	; entry point for manual option
MANUALQ
AUTO	; set variables for Auto-report option and task to background
AUTOQ
RUN	; run each selected module
PRINT	; print hard copy if requested
PRINTQ
EXIT	; exit point
PUT	; put variables in ^XTMP so modules can retrieve them
PUTQ
PULL	; pull variables from ^XTMP ; PSUJOB must exist and must be the job number used to store the data desired for this session.
PULLQ
OPTS	; set option array
OPTSQ
CONFIRM	;Send confirmation by Division(s)
CONFIRMQ
XMD	;Email
XMDQ
TIMING	; Timing report
TIMINGQ
LEAPYR(FMYR)	; Check to see if year is a leap year: 1=leap year, 0=not leap year

Name	Field # of Occurrence
^%DTC	TIMING+12
C^%DTC	AUTO+14, PUT+4
NOW^%DTC	AUTO+14, AUTO+17, AUTO+30, RUN+13, RUN+15, RUN+25
^DIC	XMD+6
FILE^DIE	RUN+4, RUN+27
DT^DILF	RUN+17, RUN+19
^DIR	MANUAL+11
AUTO^PSUALERT	AUTO+1
MANUAL^PSUALERT	MANUAL+1
EN^PSUCP1	MANUAL+15
MMNOMAP^PSUCP2	RUN+21
^PSUDBQUE	MANUAL+25, AUTO+15, AUTO+31
CLEANUP^PSUHL	MANUAL+12, AUTO+6
$$VAL^PSUTL	AUTO+24, XMD+7
$$VALI^PSUTL	AUTO+24
XMY^PSUTL1	MANUAL+17, RUN+11, XMD+3
^XMD	XMD+11
SETUP^XQALERT	AUTO+5

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	TIMING+5, TIMING+8
^XTMP(	CONFIRM+10, CONFIRM+11!, CONFIRM+12, CONFIRM+14, CONFIRM+17, CONFIRM+18, CONFIRM+19, CONFIRM+24, CONFIRM+25, CONFIRM+26* , TIMING+1!, TIMING+4, TIMING+5, TIMING+8, TIMING+15, TIMING+17, TIMING+18, TIMING+19, TIMING+20, TIMING+21
^XTMP("PSU"	MANUAL+23, AUTO+3, AUTO+16, RUN+1, PRINT+11!, EXIT+1!
^XTMP("PSUJFLG"	MANUAL+5, MANUAL+18, AUTO+10, EXIT+2!
^XTMP("PSUMANL"	MANUAL+14*
^XTMP("PSU_"	MANUAL+18, AUTO+8, AUTO+9, AUTO+19, AUTO+23, AUTO+26, AUTO+27, RUN+14, RUN+16, PUT+5 , PUT+6*, PULL+4

Name	Line Occurrences
$$LEAPYR	AUTO+20
@(	RUN+15, PRINT+9
CONFIRM	RUN+23
EXIT	MANUAL+16
OPTS	RUN+2, PRINT+2, CONFIRM+3
PULL	RUN+2, RUN+9, RUN+15, PRINT+2, PRINT+7
PUT	MANUAL+19, AUTO+28
TIMING	RUN+22
XMD	CONFIRM+28, TIMING+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	AUTO+14, AUTO+30, RUN+14, RUN+16, RUN+26!
%H	RUN+26!
%I	RUN+26!
>> DIC	XMD+6*
>> DIC(0	XMD+6*
>> DIR("A"	MANUAL+10*
>> DIR("B"	MANUAL+9*
>> DIR(0	MANUAL+9*
DT	AUTO+17, PUT+4, PUT+5
DUZ	AUTO+4, AUTO+22, XMD+2
>> EXTD	RUN+17, RUN+19
>> EXTD(0	RUN+18, RUN+20
FMYR	LEAPYR~, LEAPYR+2
I	RUN+5, PRINT+4, PUT+3, PULL+2~, PULL+4
>> PSUA(	RUN+12, PRINT+8, CONFIRM+16, TIMING+14
>> PSUA("A"	OPTS+14*
>> PSUA(1	OPTS+1*
>> PSUA(10	OPTS+10*
>> PSUA(11	OPTS+11*
>> PSUA(12	OPTS+12*
>> PSUA(13	OPTS+13*
>> PSUA(2	OPTS+2*
>> PSUA(3	OPTS+3*
>> PSUA(4	OPTS+4*
>> PSUA(5	OPTS+5*
>> PSUA(6	OPTS+6*
>> PSUA(7	OPTS+7*
>> PSUA(8	OPTS+8*
>> PSUA(9	OPTS+9*
PSUALERT	MANUAL+1, MANUAL+2!, MANUAL+3!, MANUAL+24!, AUTO+1, AUTO+2!, AUTO+32!
>> PSUAUTO	MANUAL+18, AUTO+25, RUN+4, RUN+10, RUN+24, CONFIRM+5
PSUCONF	CONFIRM+1!, CONFIRM+12
PSUCONF(1	CONFIRM+4*
PSUCONF(2	CONFIRM+5*
PSUCONF(3	CONFIRM+7*
PSUCONF(4	CONFIRM+8*
PSUCONF(5	CONFIRM+9*
>> PSUDASH	CONFIRM+2*, CONFIRM+9
>> PSUDIV	CONFIRM+2, CONFIRM+10, CONFIRM+14, CONFIRM+17, CONFIRM+18, CONFIRM+24, CONFIRM+25, XMD+6, XMD+8, TIMING+22*
>> PSUDIVNM	XMD+7*, XMD+8
>> PSUDTH	AUTO+14, AUTO+30
>> PSUDUZ	AUTO+22*, CONFIRM+28
>> PSUEDT	AUTO+21*, RUN+19
>> PSUERR	MANUAL+16
PSUFDA	RUN+3!
PSUFDA(	RUN+4, RUN+26
>> PSUFQ	MANUAL+4, AUTO+12, AUTO+29*
>> PSUIOP	MANUAL+21, AUTO+13, AUTO+25, PRINT+1
>> PSUJOB	MANUAL+13, MANUAL+18, AUTO+7, AUTO+8, AUTO+9, AUTO+19, AUTO+23, AUTO+26, AUTO+27, RUN+14 , RUN+16, RUN+20, PUT+5, PUT+6, PULL+4
>> PSULCT	CONFIRM+13, CONFIRM+15, CONFIRM+19, CONFIRM+22, CONFIRM+26, TIMING+3, TIMING+13, TIMING+15, TIMING+16, TIMING+17* , TIMING+18, TIMING+19, TIMING+20*, TIMING+21
>> PSULIN	CONFIRM+17, CONFIRM+19, CONFIRM+24, CONFIRM+26
>> PSULY	AUTO+20*, AUTO+21
>> PSUMASF	AUTO+22*, RUN+23, CONFIRM+28, XMD+5
PSUMOD	RUN+3!, PRINT+3!
PSUMOD(	RUN+5, RUN+7, PRINT+4, PRINT+6
>> PSUMON	AUTO+17, AUTO+18, AUTO+19, AUTO+20, AUTO+21
>> PSUMSG	CONFIRM+18, CONFIRM+19, CONFIRM+25, CONFIRM+26
PSUMSGT	RUN+8!
>> PSUNS	MANUAL+22, AUTO+29
>> PSUOPT	CONFIRM+13, CONFIRM+14, CONFIRM+16, CONFIRM+17, CONFIRM+18, CONFIRM+24, CONFIRM+25
>> PSUOPTN	RUN+6, RUN+7, RUN+12, RUN+14, RUN+16, PRINT+5, PRINT+6, PRINT+8
>> PSUOPTS	AUTO+25*, RUN+5, PRINT+4
>> PSUPBMG	AUTO+22, RUN+10, RUN+23, CONFIRM+28, XMD+5
>> PSUPKG	CONFIRM+16, CONFIRM+19, CONFIRM+20, CONFIRM+23, CONFIRM+26
>> PSURC	MANUAL+20, AUTO+12, AUTO+29*
>> PSUREC	TIMING+14*, TIMING+15
>> PSURP	MANUAL+21, AUTO+13, AUTO+29*
>> PSURP("END"	RUN+20*, XMD+8
>> PSURP("START"	RUN+18*, XMD+8
>> PSURTN	RUN+12, RUN+15, PRINT+8, PRINT+9
>> PSURX	MANUAL+22, AUTO+13, AUTO+29*
>> PSURXMT	CONFIRM+5
>> PSUSDT	AUTO+19*, RUN+17
>> PSUSMRY	AUTO+22*
>> PSUSNDR	AUTO+24*, TIMING+22
>> PSUSPACE	TIMING+2*, TIMING+14
>> PSUSUB	RUN+20*, CONFIRM+10, CONFIRM+11, CONFIRM+12, CONFIRM+14, CONFIRM+17, CONFIRM+18, CONFIRM+19, CONFIRM+24, CONFIRM+25 , CONFIRM+26, TIMING+1, TIMING+4, TIMING+5, TIMING+8, TIMING+15, TIMING+17, TIMING+18, TIMING+19, TIMING+20 , TIMING+21
>> PSUSUBJ	CONFIRM+27, XMD+8, TIMING+23
>> PSUT1	TIMING+6, TIMING+7, TIMING+14
>> PSUT2	TIMING+9, TIMING+10, TIMING+14
>> PSUTITLE	MANUAL+20, AUTO+12, AUTO+29*
PSUVARS	PUT+1, PUT+3, PUT+7!, PULL+3, PULL+4
PSUVSTR	PUT+2, PUT+3, PUT+6, PUT+7!
>> PSUX	TIMING+3, TIMING+4, TIMING+5, TIMING+8, TIMING+14
>> PSUXMYH	XMD+5
>> PSUXMYS1	XMD+4
SQAFLG	MANUAL+24!
SQAID	MANUAL+24!
U	AUTO+20, PUT+3, PUT+5, PULL+4
X	AUTO+14, AUTO+17, AUTO+20, AUTO+21, AUTO+24, RUN+26!, PUT+5, PUT+7!, XMD+6, XMD+7 , TIMING+5, TIMING+11, TIMING+12*, TIMING+14
X1	AUTO+14, PUT+4, PUT+7!, TIMING+8*, TIMING+11
>> X2	AUTO+14, PUT+4, TIMING+11*
XAQ	MANUAL+24!
>> XMCHAN	XMD+10*
>> XMDUZ	XMD+2*
>> XMSUB	XMD+8*
>> XMTEXT	XMD+9*
>> XMY	XMD+4, XMD+5
XQA	AUTO+32!
XQA(	AUTO+4*
XQA("G.PSU PB	M" , AUTO+4*
XQAFLG	AUTO+5*, AUTO+32!
XQAID	AUTO+5*, AUTO+32!
XQAMSG	MANUAL+24!
XQMSG	MANUAL+24!, AUTO+4*
>> Y	MANUAL+5, XMD+7, TIMING+5, TIMING+6, TIMING+7, TIMING+8, TIMING+9, TIMING+10, TIMING+11*, TIMING+12
YYYY	LEAPYR+1~, LEAPYR+2*, LEAPYR+3
ZTSK	MANUAL+23, MANUAL+24!, AUTO+16, AUTO+32!

Customize PDF page

Package: Pharmacy Benefits Management

Routine: PSUCP

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 20

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: