Routine: PSUUD2

Package	Total	Call Graph
Pharmacy Benefits Management	4	(GETS,MOVEI)^PSUTL SECTN^PSUTL1 ICN^PSUV1 GETDIV^PSUV3
VA Fileman	2	C^%DTC DT^DILF

Package	Total	Caller Graph
Pharmacy Benefits Management	1	PSUUD1

Entry Points

External References

Name	Field # of Occurrence
C^%DTC	SETUP+7, SETUP+13
DT^DILF	SETUP+2, SETUP+4
GETS^PSUTL	DAL134+6
MOVEI^PSUTL	DAL134+7
SECTN^PSUTL1	SETUP+1
ICN^PSUV1	TMPDD+10
GETDIV^PSUV3	TMPDD+31

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(55 - [#55]	DAL134, DAL134+4
^TMP($J	DISAMTQ!
^XTMP(	SETUP+11!, SETUP+14, TMPDD+16, TMPDD+18, TMPDD+23, TMPDD+25, TMPDD+26, TMPDD+27, TMPDD+28, TMPDD+29* , TMPDD+30, TMPDD+35, TMPDD+36, TMPDD+37, TMPDD+39, TMPDD+40*
^XTMP("PSU_"	TMPDD+10, TMPDD+32, TMPDD+33

Label References

Name	Line Occurrences
DAL134	DAL134+9, DAL134+20
DISAMTQ	DAL134+1, DAL134+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SETUP+7!
%H	SETUP+7!
%T	SETUP+7!
DADATE	DISAMT+1~, DAL134+8*
DADRUG	DISAMT+1~, DAL134+9*, DAL134+12, DAL134+14, DAL134+16, DAL134+17
DAHOW	DISAMT+1~, DAL134+11*, DAL134+12, DAL134+13, DAL134+15
DAMT	DISAMT+1~, DAL134+10*, DAL134+12, DAL134+14, DAL134+16
>> DISPDA	DAL134+3, DAL134+4
DISPI	DAL134+5!, DAL134+19!
DISPI(	DAL134+8, DAL134+9, DAL134+10, DAL134+11
>> DLM	TMPUD+1, TMPUD+2, TMPUD+3, TMPDD+3, TMPDD+4, TMPDD+5, TMPDD+6, TMPDD+7, TMPDD+8, TMPDD+11 , TMPDD+20
DT	SETUP+13, SETUP+14
>> EXTD	SETUP+2, SETUP+4
>> EXTD(0	SETUP+3, SETUP+5
>> PSDATE	SETUP+8*
>> PSDOSE	DAL134, DAL134+4
>> PSPAT	DAL134, DAL134+4
PSUDAMT	TMPDD+1~*, TMPDD+2, TMPDD+8, TMPDD+37, TMPDD+39, TMPDD+40
PSUDAS	DISAMT+2!
PSUDAS(	DAL134+12*, TMPDD+1
PSUDAS("DISP"	DAL134+14*, DAL134+17, TMPDD+15
PSUDAS("NET"	DAL134+17*
PSUDAS("RET"	DAL134+16*, DAL134+17, TMPDD+17
>> PSUDISD(	TMPDD+1, TMPDD+7, TMPDD+15, TMPDD+17
>> PSUDIV	TMPDD+31*, TMPDD+33
>> PSUDIVNM	TMPDD+31, TMPDD+32, TMPDD+33
>> PSUDNFI	TMPDD+6, TMPDD+36
>> PSUDNFR	TMPDD+6
>> PSUDOSE(	TMPUD+2, TMPDD+25, TMPDD+26
>> PSUDOSE(1	TMPDD+11
>> PSUDOSE(10	TMPUD+2
>> PSUDOSE(26	TMPUD+3
>> PSUDRUG(	TMPDD+5, TMPDD+7, TMPDD+35, TMPDD+36, TMPDD+37
>> PSUDRUG(16	TMPDD+8, TMPDD+36, TMPDD+40
>> PSUDRUG(2	TMPDD+4
>> PSUDRUG(21	TMPDD+4
>> PSUDRUG(3	TMPDD+8
>> PSUDRUG(31	TMPDD+5
>> PSUDRUG(51	TMPDD+6, TMPDD+36
>> PSUDRUG(52	TMPDD+8
PSUDSP	TMPDD+14~, TMPDD+15*, TMPDD+16, TMPDD+20
PSUDTLRN	SETUP+12!
PSUDTLRN(	TMPDD+3*, TMPDD+23
>> PSUEDT	SETUP+4, SETUP+9
>> PSUEDTIM	SETUP+9*
>> PSUFACN	TMPUD+2, TMPDD+3, TMPDD+16, TMPDD+18, TMPDD+23, TMPDD+25, TMPDD+26, TMPDD+27, TMPDD+28, TMPDD+29 , TMPDD+30, TMPDD+31, TMPDD+35, TMPDD+36, TMPDD+37, TMPDD+39, TMPDD+40
>> PSUJOB	SETUP+10*, TMPDD+10, TMPDD+32, TMPDD+33
>> PSUPICN	TMPDD+10*, TMPDD+11
PSURET	TMPDD+14~, TMPDD+17, TMPDD+18, TMPDD+19, TMPDD+20
>> PSURP("END"	SETUP+5*
>> PSURP("START"	SETUP+3*
>> PSUSDT	DISAMT+4, SETUP+2, SETUP+6
>> PSUSSN	TMPUD+3, TMPDD+28, TMPDD+29, TMPDD+32, TMPDD+33
>> PSUTEDT	DAL134+2
>> PSUUDST	TMPDD+11
>> PSUUDSUB	SETUP+10*, SETUP+11, SETUP+14, TMPDD+16, TMPDD+18, TMPDD+23, TMPDD+25, TMPDD+26, TMPDD+27, TMPDD+28 , TMPDD+29, TMPDD+30, TMPDD+35, TMPDD+36, TMPDD+37, TMPDD+39, TMPDD+40
>> PSUVSSN	TMPUD+3
>> PSUXX	DISAMT+4, DAL134, DAL134+1, DAL134+2, DAL134+4
>> REC1	TMPUD+1, TMPUD+2, TMPUD+3*, TMPDD+4
>> REC2	TMPDD+3, TMPDD+4, TMPDD+5, TMPDD+6, TMPDD+7, TMPDD+8, TMPDD+11, TMPDD+20, TMPDD+23
U	SETUP+14, TMPDD+36, TMPDD+37
>> X	SETUP+8, SETUP+14
>> X1	SETUP+6, SETUP+13
>> X2	SETUP+6, SETUP+13

Name	Comments	DBIA/ICR reference
DISAMT	; precompute dispensed amounts by drug
TMPDD	; create Dispense Drug record and store in ^XTMP
TMPUDQ
SETUP	; set up some variables required later
DISAMTQ
TMPUD	; store Unit Dose data in first half of record, pieces 2-7
SETUPQ
DAL134
TMPDDQ

Customize PDF page

Package: Pharmacy Benefits Management

Routine: PSUUD2

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: