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

Package: Pharmacy Benefits Management

Routine: PSUSUM3


Information

PSUSUM3 ;BIR/DAM - Patient Demographics Summary for UD Extract ; 20 DEC 2001

Source Information

Source file <PSUSUM3.m>

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

Caller Graph Total: 2

Package Total Caller Graph
Pharmacy Benefits Management 2 PSUSUM6  PSUUD0  

Entry Points

Name Comments DBIA/ICR reference
TOTAL ;EN Calculate Inpatient total of all divisions
NODATA ;Summary report line to be sent if there is no data
EN ;EN CALLED FROM PSUUD0
DIVNUM ;Set number of patients per division into summary message
UDSUM ;Summary report header to be run if UD (Inpatient) extract is run
TAB2 ;Tab spacing for line 7. Set line into global
TAB1 ;EN Calculate tab spacing for 'Outpatient Total of all Divisions' line.
EN1 ;Entry point to collect data
RE ;Rearrange the ^XTMP("PSU_"_PSUJOB,"PSUUD","DETAIL" global so information in PATDIV
TAB ;Calculate tab spacing
DATE ;Convert date range of extract to external format
UNIQUE ;Find number of unique patients across all divisions

External References

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP( EN1+2
^XTMP("PSU_" EN+6, EN+10!, EN+11!, EN1+2*, EN1+12*, EN1+13*, EN1+14*, EN1+18*, EN1+19*, EN1+23*
, EN1+24*, EN1+25*, EN1+29!, EN1+30!, EN1+31!, EN1+32!, EN1+34!, EN1+35!, RE+9, RE+10
, RE+11, RE+12, RE+14, RE+16, RE+17*, UDSUM+3*, UDSUM+4*, UDSUM+5*, UDSUM+6*, UDSUM+7*
, UDSUM+8*, UNIQUE+4, UNIQUE+6, UNIQUE+7, UNIQUE+8*, UNIQUE+14, UNIQUE+15*, UNIQUE+17*, TAB2+6, TAB2+9*
, DIVNUM+6, DIVNUM+7, DIVNUM+9*, TOTAL+5, TOTAL+6, TOTAL+8*, TAB1+5, TAB1+6*, TAB1+9, 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+1
DIVNUM EN1+6
EN1 EN+12
NODATA EN+9
RE EN1+3
TAB DIVNUM+8
TAB1 EN1+8
TAB2 UNIQUE+16
TOTAL EN1+7
UDSUM DATE+14
UNIQUE EN1+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %H DATE+2*
>> B UNIQUE+12*, UNIQUE+15*
>> I EN+4*, EN1+5*, DIVNUM+9, DIVNUM+10*, TAB1+12*, TAB1+13*, TAB1+14*, TAB1+15*, TAB1+16*, TAB1+17
PSUCT3 DIVNUM+4~, DIVNUM+7*, DIVNUM+9, TAB+3
PSUD DATE+4~*, UDSUM+3
>> PSUDFN RE+13*, RE+14*, RE+16, RE+17
>> PSUDIVA2 DIVNUM+5*, DIVNUM+6*, DIVNUM+7, DIVNUM+9, TAB+3
PSUE DATE+12~*, UDSUM+5
>> PSUEDT DATE+10
PSUIPCT TOTAL+2~, TOTAL+6*, TOTAL+7
>> PSUIPTOT TOTAL+3*, TOTAL+5*, TOTAL+6
>> PSUJOB EN+6, EN+10, EN+11, EN1+2, EN1+12, EN1+13, EN1+14, EN1+18, EN1+19, EN1+23
, EN1+24, EN1+25, EN1+29, EN1+30, EN1+31, EN1+32, EN1+34, EN1+35, RE+9, RE+10
, RE+11, RE+12, RE+14, RE+16, RE+17, UDSUM+3, UDSUM+4, UDSUM+5, UDSUM+6, UDSUM+7
, UDSUM+8, UNIQUE+4, UNIQUE+6, UNIQUE+7, UNIQUE+8, UNIQUE+14, UNIQUE+15, UNIQUE+17, TAB2+6, TAB2+9
, DIVNUM+6, DIVNUM+7, DIVNUM+9, TOTAL+5, TOTAL+6, TOTAL+8, TAB1+5, TAB1+6, TAB1+9, TAB1+12
, TAB1+13, TAB1+14, TAB1+15, TAB1+16, TAB1+17, NODATA+2, NODATA+3, NODATA+4
>> PSUMOD( EN+4*
>> PSUMOD(1 EN+7, EN1+10, EN1+16, EN1+21, EN1+27
>> PSUMOD(2 EN+7, EN1+10, EN1+16, EN1+21
>> PSUMOD(4 EN+8, EN1+11, EN1+17, EN1+22, EN1+27
>> PSUOPTS EN+4
>> PSUPN1 RE+8*, RE+10*, RE+11, RE+12
PSUS DATE+8~*, UDSUM+5
>> PSUSDT DATE+6
PSUSIT RE+3~, RE+4*
>> PSUSIT1 RE+8*, RE+9*, RE+10, RE+11, RE+12
>> PSUSN RE+15*, RE+16*, RE+17
>> PSUSNDR RE+4
PSUSSNA RE+7~, RE+12*, RE+17
>> PSUTB( TAB2+7*, TAB2+8, TAB+4*, TAB+5, TAB1+10*, TAB1+11
PSUTB1 DIVNUM+2~, DIVNUM+9, TAB+2*, TAB+5*
PSUTB2 DIVNUM+2~, TAB+3*, TAB+4
PSUTB3 TAB2+2~, TAB2+4*, TAB2+8*, TAB2+9, TAB1+3~, TAB1+7*, TAB1+11*, TAB1+13
PSUTB4 TAB2+2~, TAB2+5*, TAB2+6, TAB2+9, TAB1+3~, TAB1+8*, TAB1+9, TAB1+13
PSUTB5 TAB2+2~, TAB2+6*, TAB2+7, TAB1+3~, TAB1+9*, TAB1+10
>> PSUTOCT1 TOTAL+4*, TOTAL+7*, TOTAL+8
PSUUDA RE+7~, RE+11*, RE+17
>> PSUUDS UNIQUE+2*, UNIQUE+4*, UNIQUE+6, UNIQUE+7
>> PSUUDS1 UNIQUE+5*, UNIQUE+6*, UNIQUE+7
>> PSUUDS2 UNIQUE+13*, UNIQUE+14*
PSUUDS3 UNIQUE+3~, UNIQUE+7*, UNIQUE+8
>> PSUUDSUB EN1+2
>> S2 TAB+4*, TAB+5
>> S3 TAB2+7*, TAB2+8, TAB1+10*, TAB1+11
U RE+11, RE+12, UNIQUE+7, TAB2+6, TAB2+9, DIVNUM+7, TOTAL+6, TOTAL+8, TAB1+9, TAB1+13
>> 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