Routine: PSUOP1

Package	Total	Call Graph
Pharmacy Benefits Management	2	(GETDRUG,PROVDR,SETREC)^PSUOP3 ($$VALI,GETS,MOVEI)^PSUTL
Registration	1	PID^VADPT
VA Fileman	1	C^%DTC

Package	Total	Caller Graph
Pharmacy Benefits Management	1	PSUOP0

Entry Points

Name	Comments	DBIA/ICR reference
ADPLOOP	;Get data for partial fills
EN	;Entry to data collection
GETPART	;Get data for Partial Fills
COMVAR	;Get the common variables
CMOPARY	;Loop through the "AR" cross reference and build CMOP array
GETDATA	;Get the data for New Fills, Refills and Partial fills
ARLOOP	;Check to see if CMOP Data exists for the reporting period
ADLOOP	;Loop through the AD cross reference

External References

Name	Field # of Occurrence
C^%DTC	ADLOOP+2, CMOPARY+2
GETDRUG^PSUOP3	COMVAR+10
PROVDR^PSUOP3	GETDATA+15, GETDATA+36, GETPART+15
SETREC^PSUOP3	ADLOOP+21, ARLOOP+6, ADPLOOP+8
$$VALI^PSUTL	GETDATA+13, GETDATA+33, GETDATA+34, GETPART+13
GETS^PSUTL	GETDATA+18, GETPART+2, COMVAR+1
MOVEI^PSUTL	GETDATA+19, GETPART+3, COMVAR+2
PID^VADPT	COMVAR+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSRX - [#52]	ADLOOP+9, ADLOOP+16, ADLOOP+22, ADPLOOP+2
^PSRX("AD"	ADLOOP+4, ADLOOP+6, ADLOOP+8
^PSRX("AR"	CMOPARY+4, CMOPARY+6, CMOPARY+8
^TMP($J	EN+1!, ADLOOP+23!, ARLOOP+1, CMOPARY+9*
^XTMP(	ADLOOP+22

Label References

Name	Line Occurrences
ADLOOP	EN+2
ADPLOOP	ADLOOP+22
ARLOOP	ADLOOP+16
CMOPARY	EN+2
COMVAR	ADLOOP+12, ADPLOOP+4
GETDATA	ADLOOP+20, ARLOOP+4
GETPART	ADPLOOP+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ADLOOP+2!, CMOPARY+2!
%H	ADLOOP+2!, CMOPARY+2!
%T	ADLOOP+2!, CMOPARY+2!
>> DFN	COMVAR+4*
>> PSUCDT	CMOPARY+3, CMOPARY+4, CMOPARY+6, CMOPARY+8
>> PSUCLN	CMOPARY+7, CMOPARY+8, CMOPARY+9
>> PSUCMOP	ADLOOP+13, ADLOOP+17, ARLOOP+2, ADPLOOP+3*, GETDATA+12, GETDATA+32
>> PSUCRX	CMOPARY+5, CMOPARY+6, CMOPARY+8, CMOPARY+9
>> PSUDIVP	GETDATA+10, GETDATA+23, GETPART+7*
>> PSUDR	GETDATA+30, COMVAR+7
>> PSUDRCT	GETDATA+5, GETDATA+26, GETPART+10*
>> PSUDRUG(31	GETDATA+14, GETDATA+35, GETPART+14
>> PSUDS	GETDATA+3, GETDATA+24, GETPART+8*
>> PSUEDT	ADLOOP+4, ARLOOP+5, ADPLOOP+7
>> PSUFD	ADPLOOP+7, GETDATA+2, GETDATA+20, GETPART+4*
>> PSUFDT	ADLOOP+3, ADLOOP+4, ADLOOP+6, ADLOOP+8, ADLOOP+18
>> PSUFIL	ADLOOP+7, ADLOOP+8, ADLOOP+11
>> PSUFLN	ADLOOP+11*, ADLOOP+19, ARLOOP+1, ARLOOP+3
>> PSUMW	GETDATA+9, GETDATA+22, GETPART+6*
>> PSUNDC	GETDATA+11, GETDATA+13, GETDATA+14, GETDATA+31, GETDATA+33, GETDATA+34, GETDATA+35, GETPART+13, GETPART+14*
PSUOP	ADLOOP+10!
PSUOP(	COMVAR+3
PSUOP(11	GETDATA+9
PSUOP(17	GETDATA+5
PSUOP(2	COMVAR+4
PSUOP(20	GETDATA+10
PSUOP(22	GETDATA+2
PSUOP(27	GETDATA+14
PSUOP(3	GETDATA+29, COMVAR+8
PSUOP(31	GETDATA+6
PSUOP(4	GETDATA+8
PSUOP(6	GETDATA+30, COMVAR+7
PSUOP(7	GETDATA+4
PSUOP(8	GETDATA+3
>> PSUOPSUB	ADLOOP+22
PSUPART	GETPART+1!
PSUPART(	GETPART+4, GETPART+6, GETPART+7, GETPART+8, GETPART+9, GETPART+10
PSUPART(6	GETPART+5
PSUPART(8	GETPART+11
>> PSUPFN	ADPLOOP+1, ADPLOOP+2
>> PSUPRID	GETDATA+8, GETDATA+21, GETPART+5*
>> PSUQTY	GETDATA+4, GETDATA+25, GETPART+9*
>> PSUREFIL(	GETDATA+20, GETDATA+24, GETDATA+26
>> PSUREFIL(1	GETDATA+25
>> PSUREFIL(15	GETDATA+21
>> PSUREFIL(17	GETDATA+27
>> PSUREFIL(2	GETDATA+22
>> PSUREFIL(8	GETDATA+23
>> PSURELDT	ARLOOP+5, GETDATA+6, GETDATA+7, GETDATA+27, GETDATA+28, GETPART+11, GETPART+12
>> PSURXIEN	ADLOOP+5, ADLOOP+6, ADLOOP+8, ADLOOP+9, ADLOOP+16, ADLOOP+22, ARLOOP+1, ADPLOOP+2, COMVAR+1
>> PSURXN	COMVAR+3*
>> PSURXP	GETDATA+29, COMVAR+8
>> PSUSDT	ADLOOP+1, ADLOOP+18, ARLOOP+5, ADPLOOP+7, CMOPARY+1
>> PSUSSN	COMVAR+5*
PSUTYP	ADLOOP+10!, ADLOOP+19, ARLOOP+3, ADPLOOP+5*, GETDATA+1, GETDATA+17
>> PSUWPC	COMVAR+6*
REC	GETDATA+17!
>> VA("PID"	COMVAR+5
>> X	ADLOOP+3, CMOPARY+3
>> X1	ADLOOP+1, CMOPARY+1
>> X2	ADLOOP+1, CMOPARY+1

Customize PDF page

Package: Pharmacy Benefits Management

Routine: PSUOP1

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: