Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSUSUM7

Package: Pharmacy Benefits Management

Routine: PSUSUM7


Information

PSUSUM7 ;BIR/DAM - Pt. Demographics Summary for IV/RX or UD/RX ; 20 DEC 2001

Source Information

Source file <PSUSUM7.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Pharmacy Benefits Management 3 PULL^PSUCP  PDSUM^PSUDEM5  (DATE,DIVTOT,IPDIV,OPDIV,TAB1,TOP)^PSUSUM6  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Benefits Management 1 PSUOP0  

Entry Points

Name Comments DBIA/ICR reference
EN ;EN CALLED FROM PSUOP0
EN1 ;Gather summary data
UNIQUE ;Find total unique pharmacy patients across all divisions when
TAB2 ;Tab spacing for line 7. Set line into global
UNIQUE1 ;Find total unique pharmacy patients across all divisions when
TUDIV ;Calculate total inpatient count and tab spacing for 'Total
IPDIV1 ;Find UD inpatient division totals
IPMSG ;Set UD inpatient division totals into message global
IPDIV2 ;Calculate inpatient totals for IV divisions
IPDIV3 ;Find unique inpatient count for each division
DIVNUM ;Set number of inpatients per division into summary message
TAB5 ;Calculate tab spacing
TAB4 ;Calculate UD totals of all divisions and place in summary
MSG ;Final lines of message
NODATA ;Summary report line to be sent if there is no data

External References

Name Field # of Occurrence
PULL^PSUCP EN+3
PDSUM^PSUDEM5 EN1+15, NODATA+5
DATE^PSUSUM6 EN1+1
DIVTOT^PSUSUM6 EN1+7
IPDIV^PSUSUM6 EN1+12
OPDIV^PSUSUM6 EN1+6
TAB1^PSUSUM6 IPDIV1+8
TOP^PSUSUM6 EN1+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP("PSU_" EN+6!, EN+7!, EN+8, EN+9, EN+11!, EN1+16!, EN1+17!, EN1+18!, EN1+19!, EN1+20!
EN1+21!, UNIQUE+6, UNIQUE+7*, UNIQUE+8, UNIQUE+9*, UNIQUE+11*, UNIQUE+13*, TAB2+4, TAB2+7*, UNIQUE1+7
UNIQUE1+8*, UNIQUE1+9, UNIQUE1+10*, UNIQUE1+12*, UNIQUE1+13*, UNIQUE1+14*, TUDIV+6, TUDIV+7*, TUDIV+10*, TUDIV+12*
TUDIV+15, TUDIV+19*, TUDIV+20*, IPDIV1+6, IPDIV1+7, IPMSG+2*, IPDIV2+6, IPDIV2+8, IPDIV2+10, IPDIV2+11*
IPDIV3+3, IPDIV3+4, IPDIV3+5*, IPDIV3+6, IPDIV3+8*, IPDIV3+9, IPDIV3+11*, DIVNUM+7, DIVNUM+8, DIVNUM+10*
TAB4+6, TAB4+7, TAB4+8*, MSG+2*, MSG+8, MSG+11*, MSG+12*, MSG+13*, MSG+14*, MSG+15*
MSG+16*, NODATA+2*, NODATA+3*, NODATA+4*

Label References

Name Line Occurrences
DIVNUM IPDIV3+12
EN1 EN+13
IPDIV1 EN1+13
IPDIV2 EN1+10
IPDIV3 IPDIV2+12
IPMSG IPDIV1+9
MSG IPDIV3+13, TAB4+10
NODATA EN+10
TAB2 UNIQUE+12
TAB4 EN1+14
TAB5 DIVNUM+9
TUDIV EN1+8
UNIQUE EN1+4
UNIQUE1 EN1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C IPDIV3+7*, IPDIV3+8, IPDIV3+10*, IPDIV3+11
>> I EN+4*, EN1+2*, UNIQUE+13*, TAB2+7, TAB2+8*, UNIQUE1+13*, UNIQUE1+14*, TUDIV+19*, TUDIV+20*, IPMSG+2
IPMSG+3*, DIVNUM+10, DIVNUM+11*, MSG+11*, MSG+12*, MSG+13*, MSG+14*, MSG+15*, MSG+16
>> N UNIQUE+5*, UNIQUE+7*, UNIQUE+9*, UNIQUE+11, UNIQUE1+5*, UNIQUE1+8*, UNIQUE1+10*, UNIQUE1+12, DIVNUM+3*, TAB4+3*
TAB4+7*, TAB4+8
>> PSUCT1 IPDIV3+1*, IPDIV3+3*, IPDIV3+4, IPDIV3+6, IPDIV3+8, IPDIV3+9, IPDIV3+11
PSUCT2 IPDIV3+1*, IPDIV3+4*, DIVNUM+5~, DIVNUM+8*, DIVNUM+10, TAB5+3
>> PSUDIVA1 DIVNUM+6*, DIVNUM+7*, DIVNUM+8, DIVNUM+10, TAB5+3
PSUDT TUDIV+3~, TUDIV+6*, TUDIV+7
>> PSUDV IPDIV2+5*, IPDIV2+6*, IPDIV2+8, IPDIV2+11
>> PSUIVN UNIQUE1+3*, UNIQUE1+9*, UNIQUE1+10
>> PSUJOB EN+6, EN+7, EN+8, EN+9, EN+11, EN1+16, EN1+17, EN1+18, EN1+19, EN1+20
EN1+21, UNIQUE+6, UNIQUE+7, UNIQUE+8, UNIQUE+9, UNIQUE+11, UNIQUE+13, TAB2+4, TAB2+7, UNIQUE1+7
UNIQUE1+8, UNIQUE1+9, UNIQUE1+10, UNIQUE1+12, UNIQUE1+13, UNIQUE1+14, TUDIV+6, TUDIV+7, TUDIV+10, TUDIV+12
TUDIV+15, TUDIV+19, TUDIV+20, IPDIV1+6, IPDIV1+7, IPMSG+2, IPDIV2+6, IPDIV2+8, IPDIV2+10, IPDIV2+11
IPDIV3+3, IPDIV3+4, IPDIV3+5, IPDIV3+6, IPDIV3+8, IPDIV3+9, IPDIV3+11, DIVNUM+7, DIVNUM+8, DIVNUM+10
TAB4+6, TAB4+7, TAB4+8, MSG+2, MSG+8, MSG+11, MSG+12, MSG+13, MSG+14, MSG+15
MSG+16, NODATA+2, NODATA+3, NODATA+4
>> PSULBL IPDIV1+2*, IPDIV1+6*, IPDIV1+7, IPMSG+2
>> PSUMKER TAB4+3*, TAB4+6*, TAB4+7
>> PSUMOD( EN+4*
>> PSUMOD(1 EN1+3, EN1+4, EN1+9, TUDIV+5
>> PSUMOD(2 EN1+11, TUDIV+9, IPDIV1+5, TAB4+5
>> PSUOPTS EN+4
>> PSUPT IPDIV2+7*, IPDIV2+8*, IPDIV2+11
>> PSUPT1 IPDIV2+9*, IPDIV2+10*, IPDIV2+11
>> PSURXN UNIQUE+3*, UNIQUE+6*, UNIQUE+7, UNIQUE1+3*, UNIQUE1+7*, UNIQUE1+8
>> PSUTB( TAB2+5*, TAB2+6, TUDIV+16*, TUDIV+17, TAB5+4*, TAB5+5, MSG+9*, MSG+10
PSUTB1 IPMSG+2, DIVNUM+2~, DIVNUM+10, TAB5+2*, TAB5+5*
PSUTB2 DIVNUM+2~, TAB5+3*, TAB5+4
PSUTB3 TAB2+2*, TAB2+6*, TAB2+7, TUDIV+3~, TUDIV+13*, TUDIV+17*, TUDIV+19, MSG+4~, MSG+6*, MSG+10*
MSG+12
PSUTB4 TAB2+3*, TAB2+4, TAB2+7, TUDIV+3~, TUDIV+14*, TUDIV+15, TUDIV+19, MSG+4~, MSG+7*, MSG+8
MSG+12
PSUTB5 TAB2+4*, TAB2+5, TUDIV+3~, TUDIV+15*, TUDIV+16, MSG+4~, MSG+8*, MSG+9
PSUTTL IPDIV1+3~, IPDIV1+7*, IPMSG+2
>> PSUUDN1 UNIQUE+3*, UNIQUE+8*, UNIQUE+9
>> PSUUDN2 UNIQUE+3*
>> R TAB4+3*
>> S2 TAB5+4*, TAB5+5
>> S3 TAB2+5*, TAB2+6, TUDIV+16*, TUDIV+17, MSG+9*, MSG+10
>> T IPDIV3+1*, IPDIV3+5*
U TAB2+4, TAB2+7, UNIQUE1+13, TUDIV+6, TUDIV+10, TUDIV+15, TUDIV+19, IPDIV1+7, DIVNUM+8, TAB4+7
MSG+8, MSG+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All