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: PSUSUM4

Package: Pharmacy Benefits Management

Routine: PSUSUM4


Information

PSUSUM4 ;BIR/DAM - Patient Demographics Summary for IV Extract ; 20 DEC 2001

Source Information

Source file <PSUSUM4.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Pharmacy Benefits Management 2 PULL^PSUCP  PDSUM^PSUDEM5  
VA FileMan 2 DD^%DT  YX^%DTC  

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: 2

Package Total Caller Graph
Pharmacy Benefits Management 2 PSUSUM5  PSUV0  

Entry Points

Name Comments DBIA/ICR reference
EN ;EN CALLED FROM PSUIV0
EN1 ;Entry point to collect data
DATE ;Convert date range of extract to external format
IVSUM ;Summary report header to be run if IV extract is run
UNIQUE ;Find number of unique patients across all divisions
WARD ;Find unique number of patients that are OP and IP
TAB ;Calculate tab spacing
TOTUN ;Set total number of unique in-patients and out-patients into
PATNUM ;Place division names and patient totals into summary message
SPACE ;S ^XTMP("PSU_"_PSUJOB,"PSUTOTAL")=PSUTOTAL ;Total of all divisions
TAB1 ;EN Calculate tab spacing for 'Total of all Divisions' line,
NODATA ;Summary report line to be sent if there is no data

External References

Name Field # of Occurrence
DD^%DT DATE+7, DATE+11
YX^%DTC DATE+3
PULL^PSUCP EN+3
PDSUM^PSUDEM5 EN1+39, NODATA+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP( EN1+3
^XTMP("PSU_" EN+6!, EN+7, EN+11!, EN1+3*, EN1+15*, EN1+16*, EN1+17*, EN1+18*, EN1+19*, EN1+23*
EN1+24*, EN1+25*, EN1+26*, EN1+27*, EN1+28*, EN1+32*, EN1+33*, EN1+34*, EN1+35*, EN1+38
EN1+40!, EN1+41!, EN1+42!, EN1+44!, EN1+47!, EN1+48, EN1+49!, EN1+50!, EN1+51!, EN1+53!
EN1+55!, IVSUM+3*, IVSUM+4*, IVSUM+5*, IVSUM+6*, IVSUM+7*, IVSUM+8*, UNIQUE+9, UNIQUE+10, UNIQUE+11
UNIQUE+12, UNIQUE+14*, UNIQUE+15*, WARD+4, WARD+5*, WARD+9, WARD+10*, TAB+2*, TAB+3*, TAB+7
TAB+13, TOTUN+3*, TOTUN+4*, TOTUN+5*, PATNUM+6, PATNUM+7, PATNUM+10*, PATNUM+12*, TAB1+7, TAB1+10*
TAB1+11*, TAB1+12*, TAB1+13*, TAB1+14*, TAB1+15*, TAB1+16*, TAB1+17*, NODATA+2*, NODATA+3*, NODATA+4*

Label References

Name Line Occurrences
DATE EN1+2
EN1 EN+12
IVSUM DATE+14
NODATA EN+10
PATNUM EN1+10
SPACE PATNUM+9
TAB EN1+7
TAB1 EN1+11
TOTUN EN1+8
UNIQUE EN1+5
WARD UNIQUE+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %H DATE+2*
>> I EN+4*, EN1+4*, EN1+9*, TOTUN+3*, TOTUN+4*, TOTUN+5, PATNUM+10, PATNUM+11*, TAB1+10*, TAB1+11*
TAB1+12*, TAB1+13*, TAB1+14*, TAB1+15*, TAB1+16*, TAB1+17
PSUCT3 PATNUM+3~, PATNUM+7*, PATNUM+8, PATNUM+10, SPACE+3
PSUD DATE+4~*, IVSUM+3
>> PSUD1A WARD+3*, WARD+4*
>> PSUD1B WARD+8*, WARD+9*
>> PSUDIVNM PATNUM+5*, PATNUM+6*, PATNUM+7, PATNUM+10, SPACE+3
PSUE DATE+12~*, IVSUM+5
>> PSUEDT DATE+10
>> PSUIPCT UNIQUE+7*, WARD+10*
>> PSUIVSUB EN1+3
>> PSUJOB EN+6, EN+7, EN+11, EN1+3, EN1+15, EN1+16, EN1+17, EN1+18, EN1+19, EN1+23
EN1+24, EN1+25, EN1+26, EN1+27, EN1+28, EN1+32, EN1+33, EN1+34, EN1+35, EN1+38
EN1+40, EN1+41, EN1+42, EN1+44, EN1+47, EN1+48, EN1+49, EN1+50, EN1+51, EN1+53
EN1+55, IVSUM+3, IVSUM+4, IVSUM+5, IVSUM+6, IVSUM+7, IVSUM+8, UNIQUE+9, UNIQUE+10, UNIQUE+11
UNIQUE+12, UNIQUE+14, UNIQUE+15, WARD+4, WARD+5, WARD+9, WARD+10, TAB+2, TAB+3, TAB+7
TAB+13, TOTUN+3, TOTUN+4, TOTUN+5, PATNUM+6, PATNUM+7, PATNUM+10, PATNUM+12, TAB1+7, TAB1+10
TAB1+11, TAB1+12, TAB1+13, TAB1+14, TAB1+15, TAB1+16, TAB1+17, NODATA+2, NODATA+3, NODATA+4
>> PSUMOD( EN+4*
>> PSUMOD(1 EN+8, EN1+13, EN1+21, EN1+30
>> PSUMOD(2 EN+8, EN1+13, EN1+21, EN1+30, EN1+37
>> PSUMOD(4 EN+9, EN1+14, EN1+22, EN1+31, EN1+37
>> PSUNUM UNIQUE+8*, UNIQUE+10*, UNIQUE+11, UNIQUE+12
>> PSUOPCT UNIQUE+6*, WARD+5*
>> PSUOPTS EN+4
PSUS DATE+8~*, IVSUM+5
>> PSUSDT DATE+6
PSUSIT UNIQUE+2~, UNIQUE+3*
>> PSUSIT1 UNIQUE+8*, UNIQUE+9*, UNIQUE+10, UNIQUE+11, UNIQUE+12
PSUSN UNIQUE+5~, UNIQUE+12*, UNIQUE+14, UNIQUE+15
>> PSUSNDR UNIQUE+3
>> PSUTB( TAB+8*, TAB+9, TAB+14*, TAB+15, SPACE+4*, SPACE+5, TAB1+8*, TAB1+9
PSUTB1 TAB+5*, TAB+9*, TOTUN+3, PATNUM+2~, PATNUM+10, SPACE+2*, SPACE+5*
PSUTB2 EN1+6~, TAB+6*, TAB+7, TOTUN+3, PATNUM+2~, SPACE+3*, SPACE+4
PSUTB3 EN1+6~, TAB+7*, TAB+8, TAB1+3~, TAB1+5*, TAB1+9*, TAB1+11
PSUTB4 EN1+6~, TAB+12*, TAB+13, TOTUN+4, TAB1+3~, TAB1+6*, TAB1+7, TAB1+11
PSUTB5 EN1+6~, TAB+13*, TAB+14, TAB1+3~, TAB1+7*, TAB1+8
>> PSUTB6 TAB+11*, TAB+15*, TOTUN+4
>> PSUTOTAL PATNUM+4*, PATNUM+8*, PATNUM+12
PSUWD UNIQUE+5~, UNIQUE+11*, UNIQUE+13, UNIQUE+14, UNIQUE+15
>> S2 TAB+8*, TAB+9, SPACE+4*, SPACE+5
>> S3 TAB+14*, TAB+15, TAB1+8*, TAB1+9
U UNIQUE+11, UNIQUE+12, PATNUM+7, TAB1+7, TAB1+11
>> Y DATE+4, DATE+6*, DATE+8, DATE+10*, DATE+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All