Routine: PSUOP3

Package	Total	Call Graph
Pharmacy Benefits Management	5	LAB^PSULR0 DIVNM^PSUOP6 MULTI^PSUOPAM ($$UPPER,$$VAL,$$VALI,GETS,MOVEI)^PSUTL ICN^PSUV2
Kernel	2	$$VERSION^XPDUTL $$GET^XUA4A72
VA FileMan	2	^DIC $$GET1^DIQ
National Drug File	1	($$FORMI,$$FORMR)^PSNAPIS

Package	Total	Caller Graph
Pharmacy Benefits Management	2	PSUOP1 PSUOP2

Name	Comments	DBIA/ICR reference
PROVDR	;Get provider data, site number and AMIS category
GETVAR	;Get shared variables
NOPROV	; set up PSUPROV array when provider isn't found in ^VA(200
GETDRUG	;Get drug data
GETDRUGQ
SETREC	;Set the record into the ^XTMP global
SUMDRUG	; total drug info for summary report
REC4	;Multidose records greater than 200 characters in length
REC5	;
REC6	;

Name	Field # of Occurrence
^DIC	PROVDR+4
$$GET1^DIQ	GETVAR+4, GETVAR+14
$$FORMI^PSNAPIS	GETDRUG+20
$$FORMR^PSNAPIS	GETDRUG+21
LAB^PSULR0	SETREC+98
DIVNM^PSUOP6	PROVDR+7
MULTI^PSUOPAM	SETREC+69
$$UPPER^PSUTL	GETVAR+19
$$VAL^PSUTL	PROVDR+5, GETVAR+18
$$VALI^PSUTL	PROVDR+1, GETVAR+2, GETVAR+16, GETVAR+17
GETS^PSUTL	GETVAR+6, GETDRUG+2
MOVEI^PSUTL	GETVAR+8, GETDRUG+3
ICN^PSUV2	SETREC+15
$$VERSION^XPDUTL	GETDRUG+19
$$GET^XUA4A72	GETVAR+21

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

Name	Line Occurrences (* Changed, ! Killed)
^TMP("PSOR"	SETREC+67, SETREC+68
^XTMP(	SETREC+56, SETREC+57, SETREC+58, SETREC+59, SETREC+60, SETREC+87, SETREC+88, SETREC+89, SETREC+90, SETREC+91 , SETREC+92, SETREC+93, SETREC+95, SUMDRUG+2, SUMDRUG+12
^XTMP("PSU_"	PROVDR+8, GETVAR+11, SETREC+15, SETREC+97

Name	Line Occurrences
NOPROV	GETVAR+7
REC4	SETREC+70
REC5	REC4+2
REC6	REC5+1

Name	Field # of Occurrence
>> DFN	SETREC+98
>> DIC	PROVDR+4*
>> DIC(0	PROVDR+4*
>> I	NOPROV+1, GETDRUG+4, SUMDRUG+3*
>> PSECT(	GETVAR+20
>> PSOPNFI	GETDRUG+18, GETDRUG+20, SETREC+8, SUMDRUG+11
>> PSOPNFR	GETDRUG+18, GETDRUG+21, SETREC+8
>> PSU2U	SETREC+2*, SETREC+3, SETREC+4, SETREC+5, SETREC+6, SETREC+7, SETREC+8, SETREC+9, SETREC+10, SETREC+11 , SETREC+12, SETREC+13, SETREC+14, SETREC+16, SETREC+21, SETREC+23, SETREC+26, SETREC+28, SETREC+31, SETREC+32 , SETREC+33, SETREC+35, SETREC+36, SETREC+37, SETREC+42, SETREC+43, SETREC+44, SETREC+45, SETREC+46, SETREC+47 , SETREC+48, SETREC+49, SETREC+50, SETREC+71, SETREC+72, SETREC+73, SETREC+74, SETREC+75, SETREC+76, SETREC+77 , SETREC+78, SETREC+79, REC4+3, REC4+4, REC4+5, REC4+6, REC4+7, REC4+8, REC4+9, REC4+10 , REC4+11, REC5+2, REC5+3, REC5+4, REC5+5, REC5+6, REC5+7, REC5+8, REC5+9, REC5+10 , REC6+1, REC6+2, REC6+3, REC6+4, REC6+5, REC6+6, REC6+7, REC6+8, REC6+9
>> PSUAMMD	SETREC+68*
>> PSUCAN	SETREC+16
>> PSUCLN	SETREC+21
>> PSUCMID	GETDRUG+16*, SETREC+23
>> PSUCMOP	SETREC+10, SUMDRUG+2, SUMDRUG+12
>> PSUCONJ	SETREC+47
>> PSUCONMD	SETREC+76, REC4+8, REC5+7, REC6+6
>> PSUCOPAY	SETREC+35
>> PSUD1	SETREC+66, SETREC+67, SETREC+68
>> PSUDEA	GETDRUG+9*, SETREC+9
>> PSUDISPU	SETREC+43
>> PSUDIVNM	PROVDR+5*, PROVDR+7, PROVDR+8
>> PSUDIVP	PROVDR+1, SETREC+1*
>> PSUDOC(9	GETVAR+12*
>> PSUDR	GETDRUG+2
>> PSUDRCT	SETREC+13, SUMDRUG+8
PSUDRUG	GETDRUG+1!, GETDRUG+4
PSUDRUG(	GETDRUG+4*, GETDRUG+5, GETDRUG+11
PSUDRUG(2	GETDRUG+12
PSUDRUG(20	GETDRUG+15
PSUDRUG(21	GETDRUG+7
PSUDRUG(22	GETDRUG+13
PSUDRUG(27	GETDRUG+16
PSUDRUG(3	GETDRUG+9
PSUDRUG(51	GETDRUG+10
PSUDRUG(52	GETDRUG+14
>> PSUDS	SETREC+14
>> PSUDSG	SETREC+42
>> PSUDSGMD	SETREC+71, REC4+3, REC5+2, REC6+1
>> PSUDSPMD	SETREC+72, REC4+4, REC5+3, REC6+2
>> PSUDUN	GETDRUG+11*, SETREC+13
>> PSUDUR	SETREC+46
>> PSUDURMD	SETREC+75, REC4+7, REC5+6, REC6+5
>> PSUFD	SETREC+3
>> PSUFDT	GETVAR+21
>> PSUFP	SETREC+25, SETREC+26, SETREC+27
>> PSUGNM	GETDRUG+5, GETDRUG+6, SETREC+6, SETREC+98, SUMDRUG+2, SUMDRUG+12
>> PSUJOB	PROVDR+8, GETVAR+11, SETREC+15, SETREC+97
>> PSUMDFLG	SETREC+37, SETREC+65, SETREC+86
>> PSUMW	SETREC+10
>> PSUNADR	GETDRUG+15*, GETDRUG+20, GETDRUG+21
>> PSUNAF	GETDRUG+14*, SETREC+14
>> PSUNDC	SETREC+7
>> PSUNDCL	GETDRUG+13*, GETDRUG+20, GETDRUG+21
>> PSUNFI	GETDRUG+10*, SETREC+7, SUMDRUG+10
>> PSUNITMD	SETREC+73, REC4+5, REC5+4, REC6+3
>> PSUNITS	SETREC+44
>> PSUNMD	SETREC+74, REC4+6, REC5+5, REC6+4
>> PSUNOUN	SETREC+45
>> PSUOPSUB	SETREC+56, SETREC+57, SETREC+58, SETREC+59, SETREC+60, SETREC+87, SETREC+88, SETREC+89, SETREC+90, SETREC+91 , SETREC+92, SETREC+93, SETREC+95, SUMDRUG+2, SUMDRUG+12
>> PSUOPVER	SETREC+60
>> PSUORDT	SETREC+31
>> PSUPCLS	GETVAR+15, GETVAR+16, GETVAR+17, NOPROV+2
>> PSUPDT	SETREC+33
>> PSUPI	SETREC+36
>> PSUPICN	SETREC+15*, SETREC+16
>> PSUPRID	GETVAR+6, GETVAR+11, GETVAR+21, SETREC+16
PSUPROV	GETVAR+5!, GETVAR+7
PSUPROV(	GETVAR+13, GETVAR+15, GETVAR+16, GETVAR+17, NOPROV+1*
PSUPROV(29	GETVAR+18
PSUPROV(9	GETVAR+9
>> PSUPRSSN	GETVAR+9, GETVAR+10, GETVAR+11, GETVAR+12, NOPROV+2*, SETREC+11
>> PSUPSERV	GETVAR+19, GETVAR+20, NOPROV+2*
>> PSUPST	GETVAR+2*, GETVAR+3
>> PSUPSV	GETVAR+18, GETVAR+19, GETVAR+20
>> PSUPTYP	GETVAR+13, GETVAR+14, NOPROV+2*, SETREC+11
>> PSUQTY	SETREC+14, SUMDRUG+7, SUMDRUG+8
>> PSURCT	SETREC+56, SETREC+57, SETREC+58, SETREC+59, SETREC+87, SETREC+88, SETREC+89, SETREC+90, SETREC+91, SETREC+92 , SETREC+93, SETREC+95
>> PSUREC	SUMDRUG+2*, SUMDRUG+3
>> PSUREDT	SETREC+32
>> PSURELDT	SETREC+4
>> PSUROUT	SETREC+48
>> PSURTMD	SETREC+77, REC4+9, REC5+8, REC6+7
>> PSURXIEN	GETVAR+4, GETVAR+14, SETREC+56, SETREC+57, SETREC+58, SETREC+59, SETREC+60, SETREC+67, SETREC+68, SETREC+87 , SETREC+88, SETREC+89, SETREC+90, SETREC+91, SETREC+92, SETREC+93, SETREC+95, SETREC+98
>> PSURXN	SETREC+4
>> PSURXP	GETVAR+2
>> PSUSC	GETVAR+3, GETVAR+4, SETREC+5
>> PSUSCHED	SETREC+49
>> PSUSCHMD	SETREC+78, REC4+10, REC5+9, REC6+8
>> PSUSITE	PROVDR+1*, PROVDR+4, PROVDR+7, PROVDR+8, SETREC+3, SETREC+26, SETREC+56, SETREC+57, SETREC+58, SETREC+59 , SETREC+87, SETREC+88, SETREC+89, SETREC+90, SETREC+91, SETREC+92, SETREC+93, SETREC+95, SETREC+98, SUMDRUG+2 , SUMDRUG+12
>> PSUSNDR	PROVDR+1, SETREC+1
>> PSUSP1	GETVAR+22, NOPROV+2
>> PSUSP2	GETVAR+22, NOPROV+2
>> PSUSPTY	GETVAR+21*, GETVAR+22
>> PSUSSN	SETREC+5
>> PSUTCST	SUMDRUG+8*, SUMDRUG+9
>> PSUTFIL	SUMDRUG+5*, SUMDRUG+9
>> PSUTPART	SUMDRUG+4*, SUMDRUG+9
>> PSUTQTY	SUMDRUG+7*, SUMDRUG+9
>> PSUTRFIL	SUMDRUG+6*, SUMDRUG+9
>> PSUTYP	SETREC+9, SETREC+31, SETREC+32, SETREC+33, SETREC+60, SUMDRUG+4, SUMDRUG+5, SUMDRUG+6
>> PSUVACLS	GETDRUG+12*, SETREC+6, SETREC+98
>> PSUVANM	GETDRUG+7, GETDRUG+8, SETREC+5
>> PSUVARS	SUMDRUG+1*, SUMDRUG+3
>> PSUVERB	SETREC+50
>> PSUVRBMD	SETREC+79, REC4+11, REC5+10, REC6+9
>> PSUWPC	SETREC+12
>> REC	SUMDRUG+9, SUMDRUG+10, SUMDRUG+11*, SUMDRUG+12
>> REC1	SETREC+2, SETREC+3, SETREC+4, SETREC+5, SETREC+6, SETREC+7, SETREC+8, SETREC+9, SETREC+10, SETREC+11 , SETREC+12, SETREC+13, SETREC+14, SETREC+16, SETREC+57, SETREC+88
>> REC2	SETREC+2, SETREC+21, SETREC+23, SETREC+26, SETREC+28, SETREC+31, SETREC+32, SETREC+33, SETREC+35, SETREC+36 , SETREC+37, SETREC+42, SETREC+43, SETREC+44, SETREC+45, SETREC+46, SETREC+47, SETREC+48, SETREC+49, SETREC+50 , SETREC+58, SETREC+89
>> REC3	SETREC+2, SETREC+70, SETREC+71, SETREC+72, SETREC+73, SETREC+74, SETREC+75, SETREC+76, SETREC+77, SETREC+78* , SETREC+79*, SETREC+90
>> REC4	SETREC+2, SETREC+91, REC4+2, REC4+3, REC4+4, REC4+5, REC4+6, REC4+7, REC4+8, REC4+9 , REC4+10, REC4+11
>> REC5	SETREC+2, SETREC+92, REC5+1, REC5+2, REC5+3, REC5+4, REC5+5, REC5+6, REC5+7, REC5+8 , REC5+9, REC5+10
>> REC6	SETREC+2, SETREC+93, REC6+1, REC6+2, REC6+3, REC6+4, REC6+5, REC6+6, REC6+7, REC6+8* , REC6+9*
U	GETVAR+22, SETREC+14, SETREC+56, SETREC+59, SETREC+87, SETREC+95, SUMDRUG+3, SUMDRUG+9, SUMDRUG+10, SUMDRUG+11
>> X	PROVDR+4, PROVDR+5, PROVDR+7*
>> Y	PROVDR+5

Name

Field # of Occurrence

>> DFN

SETREC+98

>> DIC

PROVDR+4*

>> DIC(0

PROVDR+4*

>> I

NOPROV+1*, GETDRUG+4*, SUMDRUG+3*

>> PSECT(

GETVAR+20