Routine: PSUV1

Package	Total	Call Graph
Pharmacy Benefits Management	4	($$UPPER,$$VAL,$$VALI,GETS,MOVEI)^PSUTL $$TESTPAT^PSUTL1 (GETRATE,SETDRUG,SETREC,SETSUM)^PSUV2 GETDIV^PSUV3
Kernel	2	$$VERSION^XPDUTL $$GET^XUA4A72
National Drug File	1	($$FORMI,$$FORMR)^PSNAPIS
Registration	1	PID^VADPT
Uncategorized	1	$$GETICN^MPIF001

Package	Total	Caller Graph
Pharmacy Benefits Management	2	PSUUD2 PSUV0

Entry Points

Name	Comments	DBIA/ICR reference
IVDATA	;Loop through IV data
ADDTIV	;Loop through each additive
ICN	;Find patient ICN
SETTOT	;Set totals ; Total number of IV's ordered
SOLUTN	;Loop through each solution
OCCAMT	;Calculate the number of dispensing occurrences
SETVAR	;Setup common variables for IV Additives and Solutions
CALC	;Do calculations for additives and solutions

External References

Name	Field # of Occurrence
$$GETICN^MPIF001	ICN+6
$$FORMI^PSNAPIS	SETVAR+7
$$FORMR^PSNAPIS	SETVAR+8
$$UPPER^PSUTL	IVDATA+47
$$VAL^PSUTL	IVDATA+46, ADDTIV+9
$$VALI^PSUTL	IVDATA+17, IVDATA+29, IVDATA+30, IVDATA+44, IVDATA+45
GETS^PSUTL	IVDATA+19, IVDATA+37, OCCAMT+4, ADDTIV+4, ADDTIV+6, ADDTIV+11, SOLUTN+3, SOLUTN+5, SOLUTN+10
MOVEI^PSUTL	IVDATA+26, IVDATA+38, OCCAMT+5, ADDTIV+5, ADDTIV+7, ADDTIV+12, SOLUTN+4, SOLUTN+6, SOLUTN+11
$$TESTPAT^PSUTL1	IVDATA+16
GETRATE^PSUV2	IVDATA+53
SETDRUG^PSUV2	ADDTIV+44, SOLUTN+43
SETREC^PSUV2	ADDTIV+43, SOLUTN+42
SETSUM^PSUV2	IVDATA+58
GETDIV^PSUV3	SETTOT+7
PID^VADPT	IVDATA+33
$$VERSION^XPDUTL	SETVAR+6
$$GET^XUA4A72	IVDATA+49

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT("SSN"	ICN+5
^PS(55 - [#55]	IVDATA+6, IVDATA+8, IVDATA+10, OCCAMT+2, ADDTIV+2, SOLUTN+1
^XTMP(	IVDATA+58, OCCAMT+13, OCCAMT+15, SETTOT+2, SETTOT+4, SETTOT+5, SETTOT+6, SETTOT+12, CALC+1, CALC+6 , CALC+8, CALC+10, CALC+12, CALC+14, CALC+16*
^XTMP("PSU_"	IVDATA+11, IVDATA+25, IVDATA+41, ICN+8, ICN+9, SETTOT+8, SETTOT+9*

Label References

Name	Line Occurrences
ADDTIV	IVDATA+56
CALC	ADDTIV+42, SOLUTN+41
ICN	IVDATA+35
OCCAMT	IVDATA+51
SETTOT	IVDATA+54
SETVAR	ADDTIV+22, SOLUTN+21
SOLUTN	IVDATA+57

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ADTIV	ADDTIV+1, ADDTIV+2
>> COUNT	IVDATA+12, CALC+3, CALC+4
>> DFN	IVDATA+33*
GENRIC	SOLUTN+2!
GENRIC(	SOLUTN+7
GENRIC(1	SOLUTN+9
GENRIC(7	SOLUTN+39
>> OCC	OCCAMT+1, OCCAMT+2
>> PSECT(	IVDATA+48
>> PSIVNFI	SETVAR+5, SETVAR+7
>> PSIVNFR	SETVAR+5, SETVAR+8
PSUADD	ADDTIV+3!
PSUADD(	ADDTIV+13
PSUADD(2	ADDTIV+14
PSUADD(20	ADDTIV+18
PSUADD(21	ADDTIV+15
PSUADD(22	ADDTIV+19
PSUADD(3	ADDTIV+20
PSUADD(31	ADDTIV+16
PSUADD(51	ADDTIV+17
PSUADD(52	ADDTIV+21
PSUADDTV	ADDTIV+3!
PSUADDTV(	ADDTIV+9, ADDTIV+23
>> PSUBAGS	ADDTIV+39, SOLUTN+38, CALC+6, CALC+8, CALC+10, CALC+12, CALC+14, CALC+16
>> PSUCAN	OCCAMT+1, OCCAMT+22, ADDTIV+36, SOLUTN+35
PSUCAN1	ADDTIV+35~, ADDTIV+36*
>> PSUDCLS	ADDTIV+14, SOLUTN+13
>> PSUDCST	ADDTIV+40, SOLUTN+39, CALC+1, CALC+6, CALC+8, CALC+10, CALC+12, CALC+14, CALC+16
>> PSUDEA	ADDTIV+20, SOLUTN+19
PSUDES1	ADDTIV+32~, ADDTIV+33*
>> PSUDEST	OCCAMT+1, OCCAMT+20, ADDTIV+33, SOLUTN+32
>> PSUDGDA	ADDTIV+10, SOLUTN+9
>> PSUDGU	ADDTIV+9, SOLUTN+8
>> PSUDISP	OCCAMT+1, OCCAMT+10, OCCAMT+11, OCCAMT+24*, ADDTIV+38, SOLUTN+37
>> PSUDISPT	OCCAMT+1, OCCAMT+11, ADDTIV+27, SOLUTN+26
>> PSUDIV	IVDATA+13, IVDATA+29, IVDATA+30, SETTOT+7*, SETTOT+9
>> PSUDIVNM	SETTOT+7, SETTOT+8, SETTOT+9
PSUDOC	IVDATA+36!
PSUDOC(	IVDATA+43, IVDATA+44, IVDATA+45
PSUDOC(29	IVDATA+46
PSUDOC(9	IVDATA+39, IVDATA+40
PSUDOC1	IVDATA+1~
>> PSUEDT	IVDATA+5
>> PSUFAC	IVDATA+30*, IVDATA+31, OCCAMT+13, OCCAMT+15, SETTOT+2, SETTOT+4, SETTOT+5, SETTOT+6, SETTOT+7, SETTOT+12 , CALC+1, CALC+6, CALC+8, CALC+10, CALC+12, CALC+14, CALC+16
>> PSUFAC(	IVDATA+31*
>> PSUFND	IVDATA+52, OCCAMT+1, OCCAMT+8
>> PSUGNM	ADDTIV+13, SOLUTN+12, SETVAR+1*
PSUGNRIC	ADDTIV+3!
PSUGNRIC(	ADDTIV+8
PSUGNRIC(1	ADDTIV+10
PSUGNRIC(7	ADDTIV+40
PSUICN	ICN+2~
PSUIV	IVDATA+14!, IVDATA+18!, IVDATA+22
PSUIV(	IVDATA+24, IVDATA+27, IVDATA+28, IVDATA+29, IVDATA+41, IVDATA+49, IVDATA+53, OCCAMT+13, CALC+7, CALC+9 , CALC+11, CALC+13, CALC+15
PSUIV(104	IVDATA+32
>> PSUIVDT	IVDATA+4, IVDATA+6, IVDATA+8, IVDATA+10, IVDATA+49
>> PSUIVSUB	IVDATA+58, OCCAMT+13, OCCAMT+15, SETTOT+2, SETTOT+4, SETTOT+5, SETTOT+6, SETTOT+12, CALC+1, CALC+6 , CALC+8, CALC+10, CALC+12, CALC+14, CALC+16
>> PSUJOB	IVDATA+11, IVDATA+25, IVDATA+41, ICN+8, ICN+9, SETTOT+8, SETTOT+9
>> PSUNADR	ADDTIV+18, SOLUTN+17, SETVAR+7, SETVAR+8
>> PSUNAF	ADDTIV+21, SOLUTN+20
>> PSUNDC	ADDTIV+16, SOLUTN+15, SETVAR+3*
>> PSUNDCL	ADDTIV+19, SOLUTN+18, SETVAR+7, SETVAR+8
>> PSUNFI	ADDTIV+17, SOLUTN+16, SETVAR+4*
>> PSUNITS	ADDTIV+1, ADDTIV+38, SOLUTN+1, SOLUTN+37, CALC+1
PSUOCC	OCCAMT+3!
PSUOCC(1	OCCAMT+6*, OCCAMT+7
PSUOCC(2	OCCAMT+9, OCCAMT+17, OCCAMT+19, OCCAMT+21, OCCAMT+24
PSUOCC(4	OCCAMT+10, OCCAMT+12, OCCAMT+13, OCCAMT+15, OCCAMT+18, OCCAMT+20, OCCAMT+22, OCCAMT+24
PSUOCC(6	OCCAMT+9, OCCAMT+17, OCCAMT+19, OCCAMT+21, OCCAMT+23
>> PSUODA	IVDATA+9, IVDATA+10, IVDATA+11, OCCAMT+2, ADDTIV+2, SOLUTN+1
PSUORDA	IVDATA+2!
>> PSUOUTP	IVDATA+32*, OCCAMT+14, SETTOT+10, CALC+5
>> PSUPCLS	IVDATA+42, IVDATA+44, IVDATA+45*
>> PSUPDA	IVDATA+7, IVDATA+8, IVDATA+10, IVDATA+16, IVDATA+25, IVDATA+33, OCCAMT+2, ADDTIV+2, SOLUTN+1
PSUPICN	ICN+2~
PSUPICN1	ICN+2~, ICN+6*, ICN+7, ICN+8, ICN+9
>> PSUPNAM	ADDTIV+8, SOLUTN+7
>> PSUPRNM	ADDTIV+15, SOLUTN+14, SETVAR+2*
>> PSUPSV	IVDATA+46, IVDATA+47, IVDATA+48
>> PSUPTN	ICN+3, ICN+5, ICN+6
>> PSUPULL	OCCAMT+1, OCCAMT+12, ADDTIV+39, SOLUTN+38
PSURCY1	ADDTIV+29~, ADDTIV+30*
>> PSURECT	OCCAMT+1, OCCAMT+18, ADDTIV+30, SOLUTN+29
>> PSUSDT	IVDATA+4, OCCAMT+7
>> PSUSERV	IVDATA+47, IVDATA+48
>> PSUSNDR	IVDATA+30
PSUSOL	SOLUTN+2!
PSUSOL(1	SOLUTN+22
>> PSUSP1	IVDATA+42, IVDATA+50
>> PSUSP2	IVDATA+42, IVDATA+50
>> PSUSSN	IVDATA+34*, ICN+4, ICN+5, SETTOT+4, SETTOT+6, SETTOT+8, SETTOT+9
PSUSSNA	IVDATA+2!
>> PSUSTRN	ADDTIV+23*, ADDTIV+27, ADDTIV+30, ADDTIV+33, ADDTIV+36, ADDTIV+38, ADDTIV+39
PSUTCS1	SOLUTN+34~, SOLUTN+35*
PSUTDS1	SOLUTN+31~, SOLUTN+32*
PSUTDSP1	ADDTIV+26~, ADDTIV+27*
>> PSUTEDT	IVDATA+5*, IVDATA+17, OCCAMT+7
PSUTRS1	SOLUTN+28~, SOLUTN+29*
PSUTSOL1	SOLUTN+25~, SOLUTN+26*
>> PSUVSSN1	IVDATA+39, IVDATA+40, IVDATA+41
>> RECIND	ADDTIV+41, SOLUTN+40
>> RECTYP	IVDATA+55, CALC+2, CALC+4*
>> SOLDA	SOLUTN+1*
SOLDRUG	SOLUTN+2!
SOLDRUG(	SOLUTN+12
SOLDRUG(2	SOLUTN+13
SOLDRUG(20	SOLUTN+17
SOLDRUG(21	SOLUTN+14
SOLDRUG(22	SOLUTN+18
SOLDRUG(3	SOLUTN+19
SOLDRUG(31	SOLUTN+15
SOLDRUG(51	SOLUTN+16
SOLDRUG(52	SOLUTN+20
>> SPECPTR	IVDATA+49*, IVDATA+50
U	IVDATA+50
>> VA("PID"	IVDATA+34
>> VOLUME	SOLUTN+22*, SOLUTN+26, SOLUTN+29, SOLUTN+32, SOLUTN+35, SOLUTN+37, SOLUTN+38
>> XX	IVDATA+17*

Customize PDF page

Package: Pharmacy Benefits Management

Routine: PSUV1

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: