Routine: PSUSUM5

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

PSUSUM5 ;BIR/DAM - Patient Demographics Summary for IV/UD ; 20 DEC 2001

Source Information

Source file <PSUSUM5.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Pharmacy Benefits Management	3	PULL^PSUCP PDSUM^PSUDEM5 TAB1^PSUSUM4
VA Fileman	2	DD^%DT YX^%DTC

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Pharmacy Benefits Management	1	PSUUD0

Entry Points

Name	Comments	DBIA/ICR reference
TOTAL	;Calculate sum of all divisions and set individual division lines
NODATA	;Summary report line to be sent if there is no data
EN	;EN CALLED FROM PSUUD0
IVUDSUM	;Summary report header
TAB1	;Calculate tab spacing
TOT	;Set total number of unique in-patients and out-patients into
TAB	;Calculate tab spacing
DATE	;Convert date range of extract to external format
DIV	;Set all divisions from both IV and UD extracts into one global
UNIQUE	;Find Total unique patient number across all divisions

Name	Field # of Occurrence
DD^%DT	DATE+8, DATE+12
YX^%DTC	DATE+4
PULL^PSUCP	DATE+2
PDSUM^PSUDEM5	EN+13, NODATA+5
TAB1^PSUSUM4	EN+12

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^XTMP("PSU_"	EN+2!, EN+3, EN+5!, EN+14!, EN+15!, EN+16!, EN+17!, EN+18!, EN+19!, EN+20! , EN+21!, EN+22!, EN+23!, EN+24!, EN+26!, IVUDSUM+2, IVUDSUM+3, IVUDSUM+4, IVUDSUM+5, IVUDSUM+6* , IVUDSUM+7, UNIQUE+6, UNIQUE+7, UNIQUE+8, UNIQUE+11, UNIQUE+12, UNIQUE+16, UNIQUE+19, TOT+3, TOT+4 , TOT+5, DIV+2, DIV+3, DIV+7, DIV+8, DIV+12, DIV+13, TOTAL+5, TOTAL+7, TOTAL+8 , TOTAL+9, TOTAL+11, TOTAL+12, TOTAL+14, TOTAL+18, TOTAL+19, TOTAL+21, NODATA+2, NODATA+3, NODATA+4

Name	Line Occurrences
DATE	EN+7
DIV	EN+10
IVUDSUM	DATE+15
NODATA	EN+4
TAB	UNIQUE+20
TAB1	TOTAL+20
TOT	TAB+15
TOTAL	EN+11
UNIQUE	EN+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %H	DATE+3*
>> C	TOTAL+10, TOTAL+11, TOTAL+13, TOTAL+14
>> E	DIV+5, DIV+8, DIV+9, DIV+13, DIV+14*
>> I	EN+8, TOT+3, TOT+4, TOT+5, TOTAL+21, TOTAL+22*
>> N	UNIQUE+14, UNIQUE+17
PSUD	DATE+5~*, IVUDSUM+2
>> PSUDNAM	TOTAL+4, TOTAL+5, TOTAL+7, TOTAL+9, TOTAL+11, TOTAL+12, TOTAL+14
>> PSUDNAM1	TOTAL+16, TOTAL+18, TOTAL+19, TOTAL+21, TAB1+3
PSUE	DATE+13~*, IVUDSUM+4
>> PSUEDT	DATE+11
PSUIPSUM	UNIQUE+5~, UNIQUE+17*, TAB+6, TOT+3
>> PSUJOB	EN+2, EN+3, EN+5, EN+14, EN+15, EN+16, EN+17, EN+18, EN+19, EN+20 , EN+21, EN+22, EN+23, EN+24, EN+26, IVUDSUM+2, IVUDSUM+3, IVUDSUM+4, IVUDSUM+5, IVUDSUM+6 , IVUDSUM+7, UNIQUE+6, UNIQUE+7, UNIQUE+8, UNIQUE+11, UNIQUE+12, UNIQUE+16, UNIQUE+19, TOT+3, TOT+4 , TOT+5, DIV+2, DIV+3, DIV+7, DIV+8, DIV+12, DIV+13, TOTAL+5, TOTAL+7, TOTAL+8 , TOTAL+9, TOTAL+11, TOTAL+12, TOTAL+14, TOTAL+18, TOTAL+19, TOTAL+21, NODATA+2, NODATA+3, NODATA+4
>> PSUNUM	TOTAL+19*, TOTAL+21, TAB1+3
>> PSUNUM1	TOTAL+6, TOTAL+7
PSUOPSUM	UNIQUE+5~, UNIQUE+19*, TAB+12, TOT+4
PSUS	DATE+9~*, IVUDSUM+4
>> PSUSDT	DATE+7
PSUSIT	UNIQUE+2~, UNIQUE+3*
>> PSUSNDR	UNIQUE+3
PSUSNUM	TOTAL+17~
>> PSUSUM	UNIQUE+15, UNIQUE+16
>> PSUTB(	TAB+7, TAB+8, TAB+13, TAB+14, TAB1+4*, TAB1+5
>> PSUTB1	TAB+4, TAB+8, TOT+3
PSUTB2	TAB+2~, TAB+5*, TAB+6, TOT+3
PSUTB3	TAB+2~, TAB+6*, TAB+7
PSUTB4	TAB+2~, TAB+11*, TAB+12, TOT+4
PSUTB5	TAB+2~, TAB+12*, TAB+13
>> PSUTB6	TAB+10, TAB+14, TOT+4, TOTAL+21, TAB1+2, TAB1+5
>> PSUTB7	TAB1+3*, TAB1+4
>> PSUZ	DIV+6, DIV+7, DIV+8
>> PSUZ1	DIV+11, DIV+12, DIV+13
>> S2	TAB+7, TAB+8, TAB1+4, TAB1+5
>> S3	TAB+13*, TAB+14
>> T	TOTAL+3, TOTAL+8
U	UNIQUE+6, UNIQUE+7, UNIQUE+8, UNIQUE+19, DIV+8, DIV+13, TOTAL+19
>> Y	DATE+5, DATE+7, DATE+9, DATE+11, DATE+13

Customize PDF page

Package: Pharmacy Benefits Management

Routine: PSUSUM5

Call Graph Total: 5

Caller Graph Total: 1