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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Routine: PSORN52D

Package: Outpatient Pharmacy

Routine: PSORN52D


Information

PSORN52D ;BIR/LE - files new and renewal entries con't ;02/27/04

Source Information

Source file <PSORN52D.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Registration 1 ELIG^VADPT  
Scheduling 1 $$SC^SDCO22  
VA Fileman 1 ($$GET1,GETS)^DIQ  

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
Outpatient Pharmacy 11 PSOCP  PSOCPB  PSOCPC  PSOHLNE1  PSOHLNE3  PSONEW2  PSONEWF  PSONEWG  
PSORENW1  PSORN52  PSORN52A  

Entry Points

Name Comments DBIA/ICR reference
RESET ;called from reset copay status PSOCPC
FILE2 ;file ICD's on existing node or build new nodes
SHAD ;
G1 ;get ICD, if no IBQ node get SC/EI's
GET ;must have FILE and PSORENW variables to pull default data for ICD and SC/EI for SC>50% Rx's from file 52
FILE ;
SET3 ;for when patient status is exempt or SC>50
SCP ;Called from multiple routines - DFN or PSODFN variable must be available to call this subroutine.

External References

Name Field # of Occurrence
$$GET1^DIQ GET+8, GET+9, FILE2+4, RESET+7
GETS^DIQ GET+5
$$SC^SDCO22 SCP+4
ELIG^VADPT SCP+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] GET1^DIQ
^PS(52.41 - [#52.41] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.41 - [#52.41] GET+4
^PS(53 - [#53] G1+16, G1+19, FILE2+10, FILE2+23, SET3+2, SET3+8
^PSRX - [#52] GET+2, FILE+1, FILE+2, FILE+3*, FILE+4*, FILE+5*, FILE2+8!, FILE2+20*, FILE2+21*, FILE2+22*
, FILE2+26*, RESET+3, RESET+6, RESET+18, RESET+19, RESET+20*, RESET+22*, SHAD+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY GET+1~, GET+7
ARRAY( G1+1, G1+2, G1+4, G1+5, G1+6, G1+7, G1+8, G1+9, G1+10, G1+11
, G1+14, G1+18, G1+21
D FILE2+3~, FILE2+19*, FILE2+20, FILE2+21
DATA FILE2+3~, FILE2+9*, FILE2+10*, FILE2+12*, FILE2+13*, FILE2+14*, FILE2+15*, FILE2+16*, FILE2+17*, FILE2+18*
, FILE2+19*, FILE2+20*, FILE2+22, FILE2+23, RESET+5~, RESET+8*, RESET+10*, RESET+11*, RESET+12*, RESET+13*
, RESET+14*, RESET+15*, RESET+16*, RESET+17*, RESET+20, RESET+22
DATA1 FILE2+3~, FILE2+9*, FILE2+24*, FILE2+25*, FILE2+26
>> DFN RESET+7*, SCP+1*, SCP+4
ERR GET+1~
>> FILE GET+2, GET+4, GET+5, GET+8, G1+2, G1+13, G1+14, G1+17, G1+20
I RESET+5~, RESET+9*, RESET+10, RESET+11, RESET+12, RESET+13, RESET+14, RESET+15, RESET+16, RESET+17
, RESET+18*, RESET+19, RESET+20
II GET+1~, G1+1*, G1+2, G1+3, G1+4, G1+5, G1+6, G1+7, G1+8, G1+9
, G1+10, G1+11, G1+12*, G1+14, G1+18, G1+21, FILE+2~*, FILE+3, FILE+4, FILE+5
, FILE2+3~
JJ GET+1~, G1+4*, G1+5, G1+6, G1+7, G1+8, G1+9, G1+10, G1+11, G1+12*
, G1+14, G1+18, G1+21
JJJ SET3+3*, SET3+4, SET3+5, SET3+6, SET3+7, SET3+8, SET3+9, SET3+10, SET3+11, SET3+12
, SET3+13, SET3+14!
>> ORD GET+4, GET+8, FILE2+6
ORXN GET+1~, GET+2*, GET+4*, G1+5, G1+6, G1+7, G1+8, G1+9, G1+10, G1+11
, G1+13, G1+14, G1+17, G1+18, G1+20, G1+21
PENDSC GET+1~, GET+8*, G1+13, G1+17, G1+20
>> PSOANSQ( G1+5*, G1+6*, G1+7*, G1+8*, G1+9*, G1+10*, G1+11*, G1+13*, G1+14*, G1+17*
, G1+18*, G1+20*, G1+21*, FILE2+11, FILE2+12, FILE2+13, FILE2+14, FILE2+15, FILE2+16, FILE2+17
, FILE2+18, FILE2+24, FILE2+25, SHAD+2*, SHAD+3*
>> PSOANSQ("SC" G1+20*, G1+21*, FILE2+10, FILE2+24
>> PSOANSQ("SC>50" G1+13*, G1+14*, G1+17*, G1+18*, FILE2+10, SCP+2*
>> PSODA RESET+2, RESET+3, RESET+6, RESET+7, RESET+18, RESET+19, RESET+20, RESET+22
>> PSODFN SCP+1
>> PSOFDR FILE2+6
>> PSOIBOLD SET3+4, SET3+5, SET3+7, SET3+8, SET3+9, SET3+10, SET3+11, SET3+12, SET3+13
>> PSOIBQ RESET+2, RESET+10, RESET+11, RESET+12, RESET+13, RESET+14, RESET+15, RESET+16, RESET+17
PSOIBQF GET+1~, GET+2*, GET+4*, G1+3, G1+12
PSOICD RESET+5~, RESET+6*, RESET+18, RESET+22
>> PSONEW("ICD" G1+2*
PSOOICD SET3+3, SET3+4, SET3+5, SET3+7, SET3+8, SET3+9, SET3+10, SET3+11, SET3+12, SET3+13
, SET3+14!
PSOPATST GET+1~, GET+9*, G1+16, G1+19, FILE2+3~, FILE2+4*, FILE2+10, FILE2+23, SET3+1~*, SET3+2*
, SET3+8
>> PSOPIBQ SHAD+2
>> PSORENW("IRXN" GET+2
>> PSORENW("OIRXN" GET+2, GET+4
>> PSORX( G1+5*, G1+6*, G1+7*, G1+8*, G1+9*, G1+10*, G1+11*, G1+13*, G1+14*, G1+17*
, G1+18*, G1+20*, G1+21*, SET3+4*, SET3+5*, SET3+7*, SET3+8*, SET3+9*, SET3+10*, SET3+11*
, SET3+12*, SET3+13*
>> PSORX("ICD" GET+6!, G1+2*, FILE2+19, FILE2+21, FILE2+27!
>> PSORX("PATIEN T STATUS" , SET3+1, SET3+2
>> PSOSCA SCP+2*, SCP+4*
>> PSOSCP G1+13, G1+14, G1+16, G1+19, FILE2+10, FILE2+23, SCP+2*, SCP+3*, SET3+7, SET3+8
>> PSOSCP2 FILE2+6
>> PSOX("ICD" GET+6!
>> PSOX("IRXN" FILE+3, FILE+4, FILE+5, FILE2+4, FILE2+8, FILE2+11, FILE2+12, FILE2+13, FILE2+14, FILE2+15
, FILE2+16, FILE2+17, FILE2+18, FILE2+20, FILE2+21, FILE2+22, FILE2+24, FILE2+25, FILE2+26, SHAD+2
, SHAD+3
>> PSOX("OIRXN" FILE+1, FILE+2, FILE+3
RXN GET+1~, GET+2*, GET+4*, GET+9, G1+5, G1+6, G1+7, G1+8, G1+9, G1+10
, G1+11, G1+13, G1+14, G1+17, G1+18, G1+20, G1+21, FILE2+3~, SHAD+3
>> SRXN GET+2*, GET+4*, GET+5, G1+1, G1+2, G1+4, G1+5, G1+6, G1+7, G1+8
, G1+9, G1+10, G1+11, G1+14, G1+18, G1+21
SUBF GET+1~, GET+2*, GET+4*, G1+1, G1+2, G1+4, G1+5, G1+6, G1+7, G1+8
, G1+9, G1+10, G1+11, G1+14, G1+18, G1+21
SUBFLD GET+1~, GET+2*, GET+4*, GET+5
TYPE FILE2+3~, FILE2+9*, FILE2+11*, FILE2+12, FILE2+13, FILE2+14, FILE2+15, FILE2+16, FILE2+17, FILE2+18
U FILE2+10, FILE2+12, FILE2+13, FILE2+14, FILE2+15, FILE2+16, FILE2+17, FILE2+18, SCP+2, SCP+3
, SHAD+2, SHAD+3
VAEL SCP+5!
VAEL(3 SCP+2, SCP+3
XX SHAD+1~, SHAD+2*, SHAD+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  All