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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSUAR1

Package: Pharmacy Benefits Management

Routine: PSUAR1


Information

PSUAR1 ;BIR/PDW - Start AR/WS Extract ;11 AUG 1999

Source Information

Source file <PSUAR1.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Pharmacy Benefits Management 1 ($$VALI,GETM,GETS,MOVEMI)^PSUTL  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Pharmacy Benefits Management 2 PSUAR0  PSUPR2  

Entry Points

Name Comments DBIA/ICR reference
CATEGORY ;EP Pull Categories
MAP ;Find out whether an Area of Use (AOU) is mapped to a division or
EN ;EP MAIN ENTRY POINT
DIV(PSUSDA,PSUDTDA) ;EP process for a site the associated divisions by date.
; uses PSUSDA as entry for site ien in file 59.4 : returns division
; as of 2/99 date is no longer used as a parameter
CLEAR ;EP Clear ^XTMP("PSUAR*")
SITE ;Process one site for one date
; Find division for site for loading drug stats
DRUG ; Process one drug for one site for one day
; Load & loop categories within Drug
; total dispense & returns
; Category multiple loaded into PSUCAT
Q
START ;Start date scan thru stats file
AOU ;EP map divisions by dates for inpatient sites from the AOU file
MAP1 ;MAP continued. This subroutine takes the IEN from file 58.1 and looks
DATE ;PROCESS ONE DATE - Loop through inpatient sites

External References

Name Field # of Occurrence
$$VALI^PSUTL DRUG+5, AOU+16, AOU+17, AOU+22, AOU+23
GETM^PSUTL DATE+3, SITE+9, CATEGORY+2, DRUG+7, AOU+5, MAP1+10
GETS^PSUTL MAP+10
MOVEMI^PSUTL CATEGORY+5, AOU+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: CLEAR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(59.7 - [#59.7] MAP1+9
^PSI(58.1 - [#58.1] AOU+14, MAP+6, MAP+8
^PSI(58.5 - [#58.5] Q, DATE+1
^XTMP( CATEGORY+14, CATEGORY+15*, CATEGORY+16, CATEGORY+17*, CATEGORY+18, DRUG+17, DRUG+18*, DIV+4, DIV+8, DIV+10
, AOU+11!, AOU+24*, MAP1+15*, CLEAR+2!
^XTMP("PSUTCST" CATEGORY+18*

Label References

Name Line Occurrences
$$DIV SITE+2
AOU DIV+4
DATE Q
DRUG SITE+11
MAP SITE+14
MAP1 MAP+11
SITE DATE+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AOU MAP+9!, MAP1+15
AOU( MAP1+13!, MAP1+14!
DT AOU+19
>> IEN MAP+7*, MAP+8*, MAP+10, MAP1+9
MAPLOCI AOU+3~
MAPLOCI( AOU+20, AOU+21, AOU+22, AOU+23, MAP1+12, MAP1+13, MAP1+14
PSUADA AOU+3~, AOU+13*, AOU+14*, AOU+17, AOU+20, AOU+21, AOU+22, AOU+23
PSUAMCAT CATEGORY+1!, CATEGORY+13*, CATEGORY+14, CATEGORY+15, CATEGORY+16, CATEGORY+17, CATEGORY+18
PSUAMCAT( CATEGORY+10, CATEGORY+11, CATEGORY+12, CATEGORY+13
>> PSUARSUB CATEGORY+14, CATEGORY+15, CATEGORY+16, CATEGORY+17, CATEGORY+18, DRUG+17, DRUG+18, DIV+4, DIV+8, DIV+10
, AOU+11, AOU+24, MAP1+15
PSUCAT SITE+17!, DRUG+6!, DRUG+31!
PSUCAT( DRUG+10, DRUG+11, DRUG+12
>> PSUCDA CATEGORY+10*, CATEGORY+11, CATEGORY+12, CATEGORY+13, DRUG+9*, DRUG+10*, DRUG+11, DRUG+12
PSUCOST CATEGORY+9~, CATEGORY+12*, CATEGORY+17
PSUDA MAP1+7~, MAP1+11*, MAP1+12*, MAP1+13, MAP1+14
PSUDISP CATEGORY+9~, CATEGORY+11*, CATEGORY+15, DRUG+9*, DRUG+13*, DRUG+14*, DRUG+18
PSUDIV SITE+2*, SITE+4*, CATEGORY+14, CATEGORY+15, CATEGORY+16, CATEGORY+17, CATEGORY+18, DRUG+17, DRUG+18, DRUG+21
, DRUG+23, DRUG+24, DRUG+27, DRUG+29, DRUG+30, DIV+3~, DIV+8*, DIV+10*, DIV+11, AOU+3~
, AOU+15~*, AOU+20*, AOU+22*, AOU+23*, AOU+24
>> PSUDRDA SITE+10*, SITE+11*
>> PSUDRIEN DRUG+5*, DRUG+17, DRUG+18, DRUG+21, DRUG+23, DRUG+24, DRUG+27, DRUG+29, DRUG+30
PSUDRUG SITE+8!, SITE+12!
PSUDRUG( SITE+11
PSUDT START+2*, Q*, DATE+1, DIV+3~
PSUDTDA DATE+1*, DATE+3, SITE+2, DIV~
>> PSUEDT START+3*, Q
PSUINACT AOU+3~, AOU+17*, AOU+18, AOU+19*
>> PSUNAM MAP+4*, MAP+6*, MAP+8
>> PSUQUIT Q, DATE+5, SITE+11, DRUG+10
PSUSDA DATE+4*, DATE+5*, SITE+2, DIV~, DIV+4, DIV+8, DIV+10, AOU+14, AOU+16, AOU+24
>> PSUSDT START+1*, START+2
PSUSITE DATE+2!, DATE+6!
PSUSITE( DATE+5
PSUSLOC AOU+3~, AOU+16*
>> PSUSNDR SITE+4
PSUT DRUG+20~, DRUG+21*, DRUG+23, DRUG+24
PSUT1 DRUG+26~, DRUG+27*, DRUG+29, DRUG+30
>> PSUTDS DRUG+13*, DRUG+22, DRUG+23, DRUG+24
PSUTDSP EN+2!
PSUTDSP( DRUG+21, DRUG+23*, DRUG+24*
>> PSUTR DRUG+9*, DRUG+14*, DRUG+28, DRUG+29, DRUG+30
PSUTRET EN+2!
PSUTRET( DRUG+27, DRUG+29*, DRUG+30*
>> X CATEGORY+14*, CATEGORY+15, CATEGORY+16*, CATEGORY+17, DRUG+11*, DRUG+13, DRUG+14, DRUG+17*, DRUG+18, AOU+22*
, AOU+23*, CLEAR+1*, CLEAR+2
>> Y DRUG+12*, DRUG+13, DRUG+14, CLEAR+1*, CLEAR+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All