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

Package: Outpatient Pharmacy

Routine: PSODDPR3


Information

PSODDPR3 ;BIR/SAB - display NVA enhanced order checks ;10/04/06 3:38pm

Source Information

Source file <PSODDPR3.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 3 $$GET1^DIQ  ^DIR  ^DIWP  
National Drug File 1 ZERO^PSN50P6  
Outpatient Pharmacy 1 HD^PSODDPR2  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Outpatient Pharmacy 4 PSODDPR2  PSODDPR5  PSODDPR7  PSODDPR8  

Entry Points

Name Comments DBIA/ICR reference
FPMON ;displays instruction and/or comments
PAUSE1() ;Allow "^"
VAGEN(PSODD) ;Return the VA GENERIC name
FQUIT ;
FSTART
INST ;displays instruction and/or comments
DCOR ;dc duplicate therapy
CLASSES ;display therapeutic duplications classes (called from PSODDPR5 too)
QUE
MON ;print monograph
NVA
FSIG(FSIG) ;Format sig from remote site ;returned in the FSIG array
RDI ;RDI orders

External References

Name Field # of Occurrence
^%ZIS MON+5
^%ZISC MON+12, MON+14
^%ZTLOAD MON+12
$$GET1^DIQ QUE+14
^DIR MON+2, MON+15, PAUSE1+6, DCOR+8, DCOR+16, DCOR+21
^DIWP DCOR+13, DCOR+28, CLASSES+6, CLASSES+10
ZERO^PSN50P6 VAGEN+3
HD^PSODDPR2 INST+3, CLASSES+2, CLASSES+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NOTHING PRINTED"
  • Line Location: MON+6
Function Call: WRITE
  • Prompt: !
  • Line Location: MON+7
Function Call: WRITE
  • Prompt: !,"Monograph Queued to Print!",!
  • Line Location: MON+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: MON+15
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: QUE+24
Function Call: WRITE
  • Prompt: !,^TMP($J,LIST,"PMON",FDBSEV,QXX,QX,0)
  • Line Location: QUE+28
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: QUE+30
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE1+3
Function Call: WRITE
  • Prompt: !,^UTILITY($J,"W",1,ZX,0)
  • Line Location: DCOR+14
Function Call: WRITE
  • Prompt: !
  • Line Location: DCOR+15
Function Call: WRITE
  • Prompt: !,^UTILITY($J,"W",1,ZX,0)
  • Line Location: DCOR+29
Function Call: WRITE
  • Prompt: !
  • Line Location: DCOR+31
Function Call: WRITE
  • Prompt: @$S(TY=3:"!?14",1:"!?19")
  • Condition for execution: $X+$L($P(MIG," ",SG)_" ")>IOM
  • Line Location: INST+3
Function Call: WRITE
  • Prompt: $P(MIG," ",SG)_" "
  • Line Location: INST+3
Routine Call
  • DIR
  • Line Location:
    • MON+2
    • MON+15
    • PAUSE1+6
    • DCOR+8
    • DCOR+16
    • DCOR+21
Routine Call
  • %ZIS
  • Line Location:
    • MON+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.606 - [#50.606] NVA+1
^PS(50.7 - [#50.7] NVA+1
^PS(52.41 - [#52.41] INST+1
^PS(55 - [#55] NVA
^PSDRUG - [#50] NVA+2, VAGEN+3
^PSRX - [#52] DCOR+7, DCOR+13, DCOR+20, DCOR+28
^TMP("PSORXDC" DCOR+9*, DCOR+10*, DCOR+11*, DCOR+24*, DCOR+25*, DCOR+26*
^TMP($J MON+16!, QUE!, QUE+3, QUE+4, QUE+6, QUE+12*, QUE+13, QUE+15, QUE+17, QUE+19*
, QUE+20*, QUE+21*, QUE+22, QUE+23, QUE+25, QUE+27, QUE+28, RDI+1, RDI+2, RDI+9*
, FSIG+2, DCOR+4, DCOR+6, DCOR+20, DCOR+23, FPMON+1, FPMON+2*, FPMON+3*, FPMON+4*, VAGEN+4!
, CLASSES+7, CLASSES+8, CLASSES+9
^UTILITY($J NVA+6!, NVA+7!, MON+16!, DCOR+12!, DCOR+14, DCOR+15!, DCOR+27!, DCOR+29, DCOR+30!, CLASSES+5!
, CLASSES+11, CLASSES+12!
^XUSEC("PSORPH" DCOR+1

Label References

Name Line Occurrences
$$PAUSE1 QUE+29
FPMON QUE+22
FSIG RDI+5
QUE MON+14

Naked Globals

Name Field # of Occurrence
^( FSIG+2
^(0 NVA+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS MON+5!*
ACT NVA+5!, DCOR+3*, DCOR+10, DCOR+25, DCOR+31!
BSIG NVA+6!
CAN NVA+5!
CLASS CLASSES+12!
CNT FSIG+1~, FSTART+1*, FSTART+2
>> CT QUE*, QUE+3*, QUE+4, QUE+6, QUE+12*, QUE+13, QUE+15, QUE+17, QUE+22, FPMON+1
DA NVA+5!
DCN DCOR+4~, DCOR+23*, DCOR+24, DCOR+25, DCOR+26, DCOR+28
DCRD DCOR+4~, DCOR+22*, DCOR+23
DGI NVA+6!
DIR NVA+5!, MON+2!, MON+3!, MON+15!, MON+16!, QUE+24!, PAUSE1+2~, PAUSE1+3!, DCOR+6!, DCOR+8!
, DCOR+16!, DCOR+18!, DCOR+19!, DCOR+21!, DCOR+31!
DIR("?" MON+15*, PAUSE1+4*
DIR("A" MON+2*, MON+15*, PAUSE1+3*, DCOR+7*, DCOR+16*, DCOR+20*, DCOR+21*
DIR("B" MON+2*, DCOR+16*
DIR(0 MON+2*, MON+15*, PAUSE1+5*, DCOR+6*, DCOR+16*, DCOR+19*
DIRUT MON+3!, MON+15!, PAUSE1+2~, DCOR+8!, DCOR+17, DCOR+21!
DIWF NVA+7!, MON+16!, DCOR+12*, DCOR+15!, DCOR+27*, DCOR+30!, CLASSES+5*, CLASSES+12!
DIWL NVA+7!, MON+16!, DCOR+12*, DCOR+15!, DCOR+27*, DCOR+30!, CLASSES+5*, CLASSES+12!
DIWR NVA+7!, MON+16!, DCOR+12*, DCOR+15!, DCOR+27*, DCOR+30!, CLASSES+5*, CLASSES+12!
DNM NVA+5!
DRG QUE+3, QUE+4, QUE+6, QUE+8, QUE+12, QUE+13, QUE+15, QUE+16, QUE+17, QUE+18
, QUE+22, FPMON+1, CLASSES+12!
DRGI NVA+6!
>> DRGIEN QUE+13*, QUE+14
DRGINFO MON+2~, QUE+13*
DSC NVA+5!
DSPL NVA+5!
DTOUT MON+3!, MON+15!, MON+16!, QUE+24!, DCOR+8, DCOR+17, DCOR+21
DUOUT MON+3!, MON+15!, MON+16!, QUE+24!, PAUSE1+2~, DCOR+8, DCOR+17, DCOR+21
DUPRX0 NVA*, NVA+1, NVA+2, NVA+4, NVA+5!
DUZ DCOR+1
FDBSEV MON+2~, MON+16!, QUE+5*, QUE+8, QUE+18*, QUE+19, QUE+20, QUE+21, QUE+27*, QUE+28
, FPMON+2, FPMON+3, FPMON+4
FFF FSIG+1~, FSTART+1*, FSTART+2
FLIM FSIG+1~, FSTART+1, FSTART+3*
FSIG RDI+5, RDI+10!, FSIG~, FSIG+1!
FSIG( RDI+6, FSTART+1*, FSTART+5*
FSIG(1 FSTART+6*
FSIG(2 FSTART+6!
FVAR FSIG+1~, FSTART*, FSTART+1*, FSTART+3, FSTART+4*, FSTART+5
FVAR1 FSIG+1~, FSTART*, FSTART+1, FSTART+2*, FSTART+4
HSIG FSIG+1~
HSIG( FSIG+2*, FSTART+1, FSTART+2
I NVA+6!, RDI+6*, RDI+10!, FSIG+1~, FSIG+2*, DCOR+4*, DCOR+20*, DCOR+31!
II FSIG+1~, FSTART*, FSTART+1*, FSTART+5
INST INST+1*, INST+4!
IO QUE+1, QUE+24
IO("Q" MON+8
IOF MON+15, QUE+24, QUE+30, QUE+32
IOM INST+3
IOP MON+5!
IOSL QUE+28, QUE+29
IOST MON+15, QUE+29
ISSD NVA+5!
IZ NVA+6!
J NVA+5!
>> LIST MON+16, QUE, QUE+3, QUE+4, QUE+6, QUE+12, QUE+13, QUE+15, QUE+17, QUE+19
, QUE+20, QUE+21, QUE+22, QUE+23, QUE+25, QUE+27, QUE+28, RDI+1, RDI+2, FSIG+2
, FPMON+1, FPMON+2, FPMON+3, FPMON+4, CLASSES+7, CLASSES+8, CLASSES+9
LST NVA+6!, DCOR+4~, DCOR+22*, DCOR+23
LSTFL NVA+5!
MDRGCNT MON+2~, QUE*, QUE+14*, QUE+19, QUE+20, QUE+21, FPMON+2, FPMON+3, FPMON+4
MG FPMON+1*, FPMON+2, FPMON+3, FPMON+4, FPMON+5!
MIG INST+1*, INST+3, INST+4!
MONQ MON+2~, MON+16!, QUE+24!, QUE+27, QUE+28, QUE+31*
MONSEV MON+2~, QUE+4*, QUE+5
MONTITLE MON+2~, MON+16!, QUE+6*, QUE+7*, QUE+8
MSG NVA+5!, DCOR+2*, DCOR+9, DCOR+24, DCOR+31!
NNN FSIG+1~, FSTART+1*
NODDERR NVA+6!
NODTERR NVA+6!
NVAQ NVA~
>> ON NVA, QUE+3, QUE+4, QUE+6, QUE+12, QUE+13, QUE+15, QUE+17, QUE+22, QUE+25
, RDI+1, RDI+2, FSIG+2, FPMON+1
PDRG NVA+6!
>> PDRGIEN QUE+13*, QUE+14
PHYS NVA+5!
PMON MON+16!, QUE*, QUE+12*, QUE+19*, QUE+20*, QUE+21*, FPMON+1*, FPMON+2*, FPMON+3*, FPMON+4*
POP MON+5!, MON+6
PSOCD NVA+5!
PSOCLC NVA+5!
PSOCLOZ NVA+5!
PSODD VAGEN~, VAGEN+2, VAGEN+3
>> PSODFN NVA
>> PSODLQT MON+1, MON+3*, MON+15*, QUE+9, QUE+12, QUE+23, DCOR+1, DCOR+8*, DCOR+17*, DCOR+21*
, DCOR+22, INST+3, CLASSES+4
>> PSODUPC( NVA+1*, NVA+2*, NVA+4*, RDI+3*, RDI+4*, RDI+6*, RDI+7*, RDI+8*
>> PSODUPC("CLASS" CLASSES+2, CLASSES+3, CLASSES+5*, CLASSES+11*, CLASSES+13*
>> PSODUPCT CLASSES+2, CLASSES+3*
>> PSODUPF NVA+1, NVA+2, NVA+4, RDI+3, RDI+4, RDI+6, RDI+7, RDI+8, CLASSES+1, CLASSES+5
, CLASSES+11, CLASSES+13
PSOIEN VAGEN+2~, VAGEN+3*, VAGEN+4
PSOLDT NVA+5!
PSOLR NVA+5!
PSOMON1 MON+2~, MON+16!
PSOMON1( QUE+8*, QUE+18
PSOMONQ MON+15, MON+16!, QUE+27*, QUE+28, QUE+29*, QUE+30, QUE+31
>> PSONOOR DCOR+10*, DCOR+25*
>> PSONULN MON+3, QUE+19
>> PSONULN1 CLASSES+13
>> PSONV DCOR+2, DCOR+3
>> PSORX("DFLG" MON+3*, MON+15*, DCOR+8*, DCOR+17*, DCOR+21*
>> PSOVAG VAGEN+4*, VAGEN+5
PVAGDRG MON+2~, QUE+14*, QUE+15*, QUE+21
>> QTHER RDI+7
QX MON+16!, QUE+22*, QUE+28*, FPMON+1
>> QXX QUE+27*, QUE+28
RDI MON+16!
REA NVA+5!
RFLS NVA+5!
RMRX MON+16!, QUE+25*
RX0 NVA+5!
RX2 NVA+5!
RXN NVA+5!
RXREC NVA+5!, RDI+2*, RDI+3, RDI+4, RDI+7, RDI+8, RDI+9, RDI+10!, INST+1
SER NVA+6!
SERS NVA+6!
SEV NVA+6!
SG FPMON+3*, FPMON+5!, INST+3*, INST+4!
SIG NVA+5!
SMONTI MON+2~, MON+16!, QUE+17*, QUE+18
ST NVA+5!
>> SV QUE+3, QUE+4, QUE+6, QUE+12, QUE+13, QUE+15, QUE+17, QUE+22, FPMON+1
THER NVA+6!, DCOR+8!, DCOR+21!, DCOR+31!
THER( DCOR+23*, DCOR+24, DCOR+25, DCOR+26, DCOR+28
THER(1 DCOR+6*, DCOR+7, DCOR+9, DCOR+10, DCOR+11, DCOR+13
THERO NVA+6!, DCOR+4*, DCOR+5, DCOR+8!, DCOR+19, DCOR+20, DCOR+21!, DCOR+31!
TY INST+1, INST+2, INST+3, INST+4!
VAGDRG MON+2~, QUE+14*, QUE+16*, QUE+21
X NVA+7!, MON+16!, PAUSE1+2~, PAUSE1+7, PAUSE1+8, DCOR+8!, DCOR+13*, DCOR+15!, DCOR+18!, DCOR+28*
, DCOR+30!, DCOR+31!, CLASSES+6*, CLASSES+8*, CLASSES+9*, CLASSES+12!
Y NVA+5!, MON+3, DCOR+8!, DCOR+18!, DCOR+21, DCOR+31!
Y(0 DCOR+22
ZCT NVA+1, NVA+2, NVA+4, RDI+3, RDI+4, RDI+6, RDI+7, RDI+8, CLASSES+5*, CLASSES+7*
, CLASSES+8, CLASSES+9, CLASSES+12!
>> ZTDESC MON+9*
>> ZTQUEUED MON+13
>> ZTREQ MON+13*
>> ZTRTN MON+9*
>> ZTSAVE("CT" MON+10*
>> ZTSAVE("DRG" MON+10*
>> ZTSAVE("LIST" MON+9*
>> ZTSAVE("ON" MON+10*
>> ZTSAVE("PDRG" MON+10*
>> ZTSAVE("PSONULN" MON+9*
>> ZTSAVE("SEV" MON+9*
>> ZTSAVE("SV" MON+11*
>> ZTSAVE("^TMP($J,""OUT"",""REMOTE""," MON+11*
>> ZTSAVE("^TMP($J,LIST,""OUT"",""DRUGDRUG"",SV,DRG,ON," MON+10*
ZX NVA+7!, DCOR+14*, DCOR+29*, CLASSES+11*, CLASSES+12!
ZZ NVA+5!
ZZCT CLASSES+7*, CLASSES+8, CLASSES+9, CLASSES+12!
ZZZCT CLASSES+7*, CLASSES+12!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All