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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSIVSTAT

Package: Inpatient Medications

Routine: PSIVSTAT


Information

PSIVSTAT ;BIR/PR-BUILD COST TRANS NODE, ENTER COMPILE ;6 Nov 98 / 4:45 PM

Source Information

Source file <PSIVSTAT.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Inpatient Medications 3 ENIVKV^PSGSETU  ^PSIVST2  $$CODES^PSIVUTL  
VA FileMan 2 ^%DT  NOW^%DTC  
DSS Extracts 1 ^ECXPIV1  
Kernel 1 ^%ZTLOAD  
MailMan 1 ^XMD  

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

Package Total Caller Graph
Inpatient Medications 8 PSIVHYPL  PSIVHYPR  PSIVLABL  PSIVLABR  PSIVRD  PSIVRDC  PSJI BACKGROUND JOB  PSJI COMPILE STATS  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
RETDET ;Get the ward that returns or destroyed need to be associated with.
LBWD ;Get the ward we that we are printing labels on.
SKIP ;
DSS ; Update DSS for IV extract
Q1
EN ;Compile IV stats hold file here.
Q
CNT
SET
NOCOST ;Send message if the drug is missing a unit cost.
MSG

External References

Name Field # of Occurrence
^%DT EN+5
NOW^%DTC PSIVSTAT+13
^%ZTLOAD EN+1
^ECXPIV1 DSS+12
ENIVKV^PSGSETU Q
^PSIVST2 SET+3
$$CODES^PSIVUTL DSS+10
^XMD MSG+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" DSS+2
^DIC(42 - [#42] LBWD+2
^DPT - [#2] LBWD+2
^PS( DSS+9, SET+1, NOCOST+2
^PS(50.8 - [#50.8] PSIVSTAT+10, PSIVSTAT+13*, PSIVSTAT+14, PSIVSTAT+15*, PSIVSTAT+16, SKIP+2*, Q1EN+4, EN+6!, EN+8
EN+9, CNTCNT+2!, SETSET+3!, NOCOST+2*
^PS(55 - [#55] RETDET+2, LBWD+1, DSS+5, DSS+6, DSS+7, DSS+8, DSS+12, SET+1
^PS(59.5 - [#59.5] EN+5
^TMP("PSIVNC" EN+4!, CNT+1, NOCOST+2*, MSG+2!
^TMP($J DSS+4!, DSS+12*
^XUSEC("PSJI MGR" MSG+1

Label References

Name Line Occurrences
CNT EN+8
MSG CNT+1
NOCOST SET+1
Q EN+1
SET CNT
SKIP RETDET+2, LBWD+1

Naked Globals

Name Field # of Occurrence
^( PSIVSTAT+15, SKIP+2*, SET+1
^(0 PSIVSTAT+13*, PSIVSTAT+15*, PSIVSTAT+16, EN+6*
^(1 EN+5
^(9 RETDET+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PSIVSTAT+13
%DT Q!
A DSS+3~, DSS+6*
ADSTR DSS+3~, DSS+8*, DSS+11
ADUNITS DSS+3~, DSS+8*, DSS+10*, DSS+11
B DSS+3~, DSS+6*
D Q!
DCST DSS+3~, DSS+9*, DSS+11
DDRG DSS+3~, DSS+9*, DSS+11, DSS+12
DFN PSIVSTAT+15, PSIVSTAT+16, RETDET+2, LBWD+1, LBWD+2, SKIP+2, DSS+5, DSS+6, DSS+7, DSS+8
DSS+11, DSS+12, Q!, CNT*, SETSET+1, SET+3, NOCOST+2
DRG DSS+3~, DSS+7*, DSS+8
>> DRGTYP DSS+7*, DSS+8, DSS+9, DSS+10
DSDATE DSS+3~, DSS+6*, DSS+12
>> ECUD DSS+11*, DSS+12*
>> I EN+6*, SET+1*
IV Q!
IVROOM DSS+3~, DSS+6*, DSS+12
LO Q!
>> ND DSS+8*, DSS+9*, DSS+10
NON SET+1*, SET+2!
NUM NOCOST+2*, MSG+2!
>> ON RETDET+2, LBWD+1, SKIP+2, DSS+5, DSS+6, DSS+7, DSS+8, DSS+11, DSS+12, SET*
SET+1
PNL Q!
POP Q!
PROV DSS+3~, DSS+5*, DSS+11
PSGDT Q!
PSII DSS+12~*
PSIV Q!
PSIVC PSIVSTAT+11*, SKIP+2, DSS+11, Q!, SET*
PSIVD Q1!, Q!, SET*
PSIVDG Q!, SET+1*, SET+2!, NOCOST+2
PSIVDRG Q!, SET+1*, SET+2!, NOCOST+2
PSIVDUZ MSG+1*, MSG+2!
PSIVLP Q1!
PSIVNOL RETDET+2, SKIP+2, DSS+12, Q!, SET*
>> PSIVNOW PSIVSTAT+13*, SKIP+2, DSS+11
PSIVS EN+8*, EN+9, Q!, CNTCNT+2, SETSET+3, NOCOST+2
>> PSIVSITE EN+1
>> PSIVSN PSIVSTAT+10, PSIVSTAT+13, PSIVSTAT+15, PSIVSTAT+16, SKIP+2, Q1EN+1
PSIVTN PSIVSTAT+16*, SKIP+2, Q1!
PSIVV PSIVSTAT+10*, Q1!, Q!
PSIVWD RETDET+2*, LBWD+1*, LBWD+2*, SKIP+2, Q1!
>> PSJRDC PSIVSTAT+11
>> Q EN+4*, EN+5, EN+6
>> RDFLAG RETDET+2
>> RDWARD RETDET+2
SOLSTR DSS+3~, DSS+8*, DSS+11
START DSS+3~, DSS+5*, DSS+12
TN CNT*, CNT+1!, CNT+2!, SET*, SET+3, NOCOST+2
TYP DSS+3~, DSS+5*, DSS+11
U PSIVSTAT+13, PSIVSTAT+15, PSIVSTAT+16, RETDET+2, LBWD+1, SKIP+2, DSS+5, DSS+9, DSS+10, DSS+11
DSS+12, EN+5, EN+6, SETSET+1, NOCOST+2
>> W42 SET*
X DSS+2*, DSS+5*, EN+5*, CNT+1!, CNT+2!
XMDUZ MSG*, MSG+2!
XMSUB MSG*, MSG+2!
XMTEXT MSG*, MSG+2!
XMY MSG+2!
XMY( MSG+1*
Y PSIVSTAT+13*, DSS+10*, EN+6, CNT+1!, CNT+2!
Z Q!
>> ZTDESC EN+1*
>> ZTDTH EN+1*
ZTIO EN+1*, CNT+1!, CNT+2!
>> ZTQUEUED CNT+1
>> ZTREQ CNT+1*
ZTRTN EN+1*, CNT+1!, CNT+2!
ZTSAVE EN+1!
ZTSK EN+1, Q!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All