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

Package: Inpatient Medications

Routine: PSIVLABL


Information

PSIVLABL ;BIR/PR - PRINT OUT LABELS ; 8/19/09 3:00pm

Source Information

Source file <PSIVLABL.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Inpatient Medications 5 $$ENDTC^PSGMI  ($$BCMA,UP2,UP3)^PSIVBCID  $$CONVER1^PSIVORE2  ^PSIVSTAT  ENIV^PSJAC  
Kernel 1 PSET^%ZISP  
Pharmacy Data Management 1 $$HAZ^PSSUTIL  
VA FileMan 1 (C,NOW)^%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: 6

Package Total Caller Graph
Inpatient Medications 6 PSIVHYPL  PSIVHYPR  PSIVLBL1  PSIVORE1  PSIVORE2  PSIVSUS  

Entry Points

Name Comments DBIA/ICR reference
DEM ;Get demographics and see if label is example only
SETP
ENX ;Print example label
START
Q
RE ;
SOL
MEDRT ;Find Medication Route
INF
HAZ(TYP) ; Printing hazardous to handle/dispose warnings *364
; TYP=1 ADDITIVES | TYPE=2 SOLUTIONS
P
PMR ; Print Med Route on label
;
SOL1
MESS ;PSJ*5*184 -make MESS a local array so all messages display for all additives.
CONVER ;Expand dose to date.dose and set in X
BARCODE

External References

Name Field # of Occurrence
C^%DTC CONVER+3
NOW^%DTC DEM+7, DEM+23
PSET^%ZISP BARCODE
$$ENDTC^PSGMI DEM+7
$$BCMA^PSIVBCID RE+6
UP2^PSIVBCID RE+28
UP3^PSIVBCID SOL+1
$$CONVER1^PSIVORE2 CONVER+1
^PSIVSTAT START+6
ENIV^PSJAC DEM+7
$$HAZ^PSSUTIL HAZ+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DEM+21
Function Call: WRITE
  • Prompt: !
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !
  • Line Location: P+4
Function Call: WRITE
  • Prompt: $E(X,1,PSIVRM)
  • Line Location: P+8
Function Call: WRITE
  • Prompt: !
  • Line Location: P+10
Function Call: WRITE
  • Prompt: !
  • Line Location: PMR+6
Function Call: WRITE
  • Prompt: $E(X,1,PSIVRM)
  • Line Location: PMR+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PMR+13
Function Call: WRITE
  • Prompt: @IOBARON
  • Line Location: BARCODE+2
Function Call: WRITE
  • Prompt: PSJBCID
  • Line Location: BARCODE+3
Function Call: WRITE
  • Prompt: @IOBAROFF
  • Line Location: BARCODE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: BARCODE+5
Function Call: WRITE
  • Prompt: PSJBCID
  • Line Location: BARCODE+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(2 - [#3.2] DEM+2
^PS( HAZ+5
^PS(51.2 - [#51.2] DEM+17, MEDRT+3
^PS(52.6 - [#52.6] RE+18, RE+25, MESS+1
^PS(52.7 - [#52.7] SOL+3, SOL+4, SOL1
^PS(55 - [#55] DEM+4, DEM+10, DEM+15, DEM+23*, SETP, RE+3, RE+12, RE+14, RE+17, RE+25
, SOL, SOL+5, MEDRT+2, INF+1, HAZ+5, SOL1
^PS(59.5 - [#59.5] INF+6
^SC - [#44] DEM+5, DEM+6

Label References

Name Line Occurrences
BARCODE RE+11
CONVER SOL+7
ENX DEM+8
HAZ RE+20, RE+27, SOL+2
MEDRT SOL+6
MESS RE+22, RE+29
P DEM+19, RE+15, RE+16, RE+19, RE+26, SOL+1, SOL+4, SOL+5, SOL+6, SOL+7
, INF, INF+1, INF+2, INF+3, INF+5, INF+6, INF+7, HAZ+7
PMR DEM+18, MEDRT+4
Q DEM+10
RE DEM+13, START+1
SETP DEM+10, ENX+1
SOL RE+23
SOL1 SOL+1
START DEM+24

Naked Globals

Name Field # of Occurrence
^( DEM+2, RE+18, RE+25, SOL
^(0 RE+18, RE+25, SOL, SOL1
^(1 DEM+2
^(3 INF+1
^(4 INF+6
^(9 DEM+23*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DEM+7, DEM+23
BAG Q!
CX Q!
>> DFN DEM+4, DEM+10, DEM+15, DEM+23, SETP, RE+3, RE+6, RE+12, RE+14, RE+17
, RE+25, RE+28, SOL, SOL+1, SOL+5, MEDRT+2, INF+1, HAZ+5, SOL1
DIEN SOL+3*, HAZ+2~, HAZ+5*
DO RE+1!
DRIEN SOL+3~
DT RE+12, RE+14
FIL HAZ+2~, HAZ+3*, HAZ+5
HAZ HAZ+2~, HAZ+5*, HAZ+6
I DEM+1~, DEM+2*, P+5*, P+7*, P+9*, PMR+7*, PMR+10*, PMR+12*, BARCODE+7*, BARCODE+9*
>> IOBAROFF BARCODE+4
>> IOBARON BARCODE+2
IOST(0 DEM+2
LINE DEM+13*, DEM+21*, START+1*, START+3*, Q!, P*, P+1, P+2*, PMR+2*, PMR+3
, PMR+4*
MESS Q!, INF+5
MESS( INF+5, MESS+1*
>> ON DEM+4, DEM+10, DEM+15, DEM+23, SETP, RE+3, RE+6, RE+12, RE+14, RE+17
, RE+25, SOL, SOL+5, MEDRT+2, INF+1, HAZ+5, SOL1
>> P( SETP*
>> P(11 INF+3
>> P(15 RE+5*, CONVER+1, CONVER+3
>> P(16 RE+4*, RE+5*, RE+25
>> P(23 SOL+5
>> P(4 DEM+16, RE+3, SOL+5, SOL+6
>> P(5 RE+4
>> P(8 INF
>> P(9 INF+2
P16 DEM+10*, Q!, RE+5
PDATE Q!, CONVER+2*, CONVER+3*, CONVER+4
PDOSE Q!, CONVER+2*, CONVER+3, CONVER+4
PSIMESS Q!, INF+5*
PSIV Q!, RE+17*, RE+18, RE+25*, RE+28, SOL*, SOL+1, SOL+3, SOL+4, INF+6*
, HAZ+5, SOL1
PSIV1 DEM+13*, DEM+16, START*, Q!, RE+4, RE+5, RE+6, RE+9, RE+11, RE+28
, SOL+1, SOL+6, SOL+7, INF+7, CONVER+1, CONVER+2, CONVER+3
PSIV2 DEM+13*, DEM+20, Q!, RE+6, INF+7
PSIVADTYPE RE+3~*, RE+4
PSIVCLAB DEM+1~, DEM+6*, DEM+8
PSIVCLDT DEM+1~, DEM+5*, DEM+8
PSIVCLIN DEM+1~, DEM+4*, DEM+5*, DEM+6, DEM+8, RE+13
PSIVCT DEM+10!, DEM+23, START+6, Q!, RE+6
PSIVDOSE Q!, SOL+7*, CONVER+1, CONVER+2, CONVER+3
>> PSIVEXAM DEM+8
PSIVFLAG DEM+13*, DEM+24!, ENX+1*, START+2, Q!, RE+17, RE+23
>> PSIVID( RE+9*
>> PSIVNOL DEM+10, DEM+13*, DEM+20*, DEM+23, START, RE+6, INF+7
>> PSIVNOW DEM+7*, INF+7
PSIVRM DEM+10*, ENX+1*, Q!, RE+13, P+8, P+11, PMR+11, PMR+14
>> PSIVRP DEM+14*, DEM+15*, DEM+17, MEDRT+1*, MEDRT+2*, MEDRT+3
>> PSIVRT DEM+14*, DEM+17*, DEM+18, MEDRT+1*, MEDRT+3*, MEDRT+4
PSIVSH DEM+24!
>> PSIVSITE DEM+10, DEM+12, DEM+16, DEM+21, ENX+1, START+3, RE+16, SOL+6, P+1, P+4
, PMR+3, PMR+6
>> PSIVSN INF+6
>> PSIVT RE+4
PSIVWD DEM+8*, Q!, RE+12, RE+13, RE+14
>> PSIVWMFL RE+9
>> PSJBCID RE+6*, RE+9, BARCODE+3, BARCODE+8
>> PSJBLN RE+28, SOL+1
PSJIO DEM+1~, DEM+3*, DEM+11, DEM+21, DEM+22, START+3, START+4, START+5, RE+10, P+3
, P+10, PMR+5, PMR+13, BARCODE+1, BARCODE+6
PSJIO( DEM+2*, P+5, P+7, P+9, PMR+7, PMR+10, PMR+12, BARCODE+7, BARCODE+9
PSJIO("EL" DEM+22, START+4
PSJIO("FE" START+5
PSJIO("FI" DEM+11
PSJIO("SL" RE+10
PSJTRNC RE+13~*, RE+14
TSUB HAZ+2~, HAZ+4*, HAZ+5
TYP HAZ~, HAZ+3, HAZ+4
U DEM+8, DEM+10, DEM+12, DEM+15, DEM+16, DEM+17, DEM+21, DEM+23, SETP, ENX+1
, START+3, RE+3, RE+12, RE+14, RE+16, RE+18, RE+25, SOL+3, SOL+4, SOL+5
, SOL+6, MEDRT+2, MEDRT+3, INF+6, SOL1, MESS+1
>> VADM(1 RE+16
>> VADM(2 DEM+7*, RE+12, RE+14
>> VAIN(4 DEM+8, RE+13
>> VAIN(5 RE+16
VAR HAZ+2~, HAZ+5*
>> X DEM+18*, DEM+19*, SETP*, RE+12*, RE+13, RE+14*, RE+16*, RE+18*, RE+25*, SOL+4*
, SOL+5*, SOL+6*, SOL+7*, MEDRT+4*, INF*, INF+1*, INF+2*, INF+3*, INF+5*, INF+6*
, INF+7*, HAZ+6*, HAZ+7, P, P+8, P+11*, PMR+2, PMR+11, PMR+14*, SOL1*
, CONVER+1*, CONVER+2, CONVER+3*, CONVER+4*
X0 DEM+1~, DEM+2*
>> X1 CONVER+3*
>> X2 CONVER+3*
XX1 Q!, CONVER+3*
XX2 Q!, CONVER+3*
>> Y DEM+23*, SETP*, RE+18*, RE+25*, RE+28*, INF+6*, MESS+1
>> YY RE+28*, SOL*, SOL+1
ZZ P+4*, P+6!, PMR+6*, PMR+8!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All