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

Package: Outpatient Pharmacy

Routine: PSOVER


Information

PSOVER ;BIR/SAB - verify rx's by clerk ;07/03/95

Source Information

Source file <PSOVER.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Outpatient Pharmacy 10 ^PSOBUILD  HD^PSODDPR2  STAT^PSODGDG2  ^PSODSPL  ^PSOLSET  LOCK^PSOORCPY  BLD^PSOORUT1  ^PSORXL  
(MARKV,VOPN)^PSOTPCAN  ^PSOVER1  
VA FileMan 5 ^DIC  FILE^DICN  (,IX)^DIK  $$GET1^DIQ  ^DIR  
List Manager 1 FULL^VALM1  
Pharmacy Data Management 1 ($$L,PSOL,PSOUL,UL)^PSSLOCK  
Registration 1 (KVA,PID)^VADPT  

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

Package Total Caller Graph
Outpatient Pharmacy 4 PSO VERIFY  PSO VR  PSODGDG2  PSOVER1  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
PAT
L1
SHOW
SHOW2 ;
CLERK
CL1
CL2
PATCHK
PACK
QUIT
END
DSPL ;
DGDGI ;process drug interaction for non verified rxs
DONE ;
DONEX
OERR ;
PPL
EOJ
EOJ2 ;
LPAT ;
ULP ;
LRX ;
ULRX ;
LK1 ;
ULK1 ;
ULB ;
SAVE ;

External References

Name Field # of Occurrence
^DIC PAT, CLERK+3, OERR+18
FILE^DICN OERR+21
^DIK PPL
IX^DIK OERR+23
$$GET1^DIQ L1, CL2, PACK
^DIR SHOW2+4, LRX+2
^PSOBUILD PAT+1, PATCHK, PATCHK+1, EOJ+3
HD^PSODDPR2 SHOW+1, SHOW2+1
STAT^PSODGDG2 CL1+3, OERR+24
^PSODSPL SHOW+3
^PSOLSET PSOVER+4, CLERK
LOCK^PSOORCPY LPAT+3
BLD^PSOORUT1 EOJ+3
^PSORXL PACK+1
MARKV^PSOTPCAN PPL+3
VOPN^PSOTPCAN OERR+3
^PSOVER1 DSPL+4, DGDGI+12
$$L^PSSLOCK OERR+12, LPAT+3
PSOL^PSSLOCK OERR+13, LRX+2, LK1+2
PSOUL^PSSLOCK CL1+7, CL1+8, CL1+9, ULRX+2, ULK1+2, ULB+2
UL^PSSLOCK OERR+13, ULP+2, ULB+1
KVA^VADPT END+1
PID^VADPT L1, PATCHK, PATCHK+1, OERR+26
FULL^VALM1 DGDGI+12, OERR+15, EOJ+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"Pharmacy Division Must be Selected!",!
  • Line Location: PSOVER+4
Function Call: WRITE
  • Prompt: !,$C(7),"This patient has no prescriptions on file",!!
  • Line Location: SHOW+0
Function Call: WRITE
  • Prompt: !,$P(^DPT(DFN,0),"^"),?40,"ID#:"_VA("PID")
  • Line Location: SHOW+2
Function Call: WRITE
  • Prompt: " RX#: "_$S($D(INT):$P(INT,"^"),$D(^PSRX(PSONV)):$P(^PSRX(PSONV,0),"^"),1:"")
  • Condition for execution: $D(INT)!$D(PSONV)
  • Line Location: SHOW+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SHOW2+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOW2+5
Function Call: WRITE
  • Prompt: $C(7),!!,"Pharmacy Division Must be Selected!",!
  • Line Location: CLERK+0
Function Call: WRITE
  • Prompt: !
  • Line Location: CLERK+2
Function Call: WRITE
  • Prompt: $C(7),$C(7)
  • Line Location: OERR+2
Function Call: WRITE
  • Prompt: $C(7),$C(7)
  • Line Location: OERR+5
Function Call: WRITE
  • Prompt: "for patient "_$P($G(^DPT(PSDFN,0)),"^")_".",!
  • Line Location: LRX+3
Routine Call
  • DIC
  • Line Location:
    • PAT
    • CLERK+3
    • OERR+18
Routine Call
  • DIR
  • Line Location:
    • SHOW2+4
    • LRX+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^VA(200 - [#200] Classic Fileman Calls
^PSRX - [#52] GET1^DIQ
^PS(52.4 - [#52.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PAT+1, SHOW+2, PATCHK, PATCHK+1, DGDGI+11, OERR+25, LRX+3
^PS(52.4 - [#52.4] L1, L1+1, L1+2, L1+4, CL1, CL1+1, CL1+7, CL1+9, DGDGI+2, DGDGI+3
, DGDGI+15, DONE+1*, DONE+4, OERR+16, OERR+17, OERR+22*, OERR+23, OERR+27, PPL, SAVE+1
^PS(56 - [#56] DGDGI+8
^PSRX - [#52] L1+3, L1+4, SHOW+2, CL1+8, CL1+9, DSPL+1, DGDGI+2, DGDGI+3, DGDGI+6, DGDGI+10
, DGDGI+11, DGDGI+14*, DGDGI+15, DONE+1, DONE+2!, DONE+4, OERR+6, OERR+7, OERR+8, OERR+9
, OERR+11, OERR+17, OERR+19, OERR+22, OERR+25, OERR+28, EOJ+4, EOJ2+2, SAVE+1
^XUSEC("PSDRPH" OERR+8, OERR+9
^XUSEC("PSORPH" PSOVER+5, OERR+6, OERR+10

Label References

Name Line Occurrences
CLERK PAT, CL2
DGDGI L1+2, L1+3, OERR+27, OERR+28
DONE DGDGI+14, DGDGI+15
DONEX DGDGI+15
DSPL L1+4, CL1+7, CL1+8, CL1+9, DGDGI+14, DGDGI+15, DONE+4, OERR+29
END PAT, CLERK, CLERK+3, EOJ
EOJ OERR+24, OERR+27, OERR+28, OERR+29, PPL+1
EOJ2 EOJ+4
LK1 DGDGI+4
LPAT CL1+5
LRX CL1+6
PACK L1, CL2, PATCHK, QUIT
PAT L1
PATCHK CL1+1
PPL OERR+27, OERR+28
QUIT L1+5
SAVE DSPL+3, DGDGI+12
ULB OERR+18, EOJ
ULK1 DONE+5
ULP CL1+5, CL1+10

Naked Globals

Name Field # of Occurrence
^("STA" DGDGI+10, DGDGI+14, DONE+2, OERR+19
^(0 DGDGI+11, OERR+22
^(2 OERR+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A1 END+1!
C END+1!
CAN END!
CLFLAG CL1+3*!
CLS END!
D EOJ+1!
D0 END+1!
DA END!, DSPL+2*, OERR+15*, OERR+19!, OERR+23*, PPL*!
DD OERR+21!
DEA1 END!
DEA2 END!
>> DFN PAT+1*, SHOW+2, CL1+1*, CL1+2, PATCHK*, PATCHK+1, DGDGI+6, DGDGI+7, DGDGI+11, DGDGI+12*
, OERR+25*
DGDG L1+1*, L1+2, CL1*, CL1+1, CL1+7, EOJ+1!
DIC PAT*!, CLERK+2*, CLERK+3!, END!, OERR+18!*, OERR+21*!
DIC("A" PAT*, CLERK+2*
DIC("S" PAT*, CLERK+2*
DIC(0 PAT*, CLERK+2*, OERR+18*, OERR+21*
DIE END!
DIK OERR+23*!, PPL*!
DINUM OERR+21*!
DIPGM END+1!
DIR SHOW2+3~, SHOW2+4!, END+2!, LRX+2!
DIR("?" LRX+2*
DIR("A" SHOW2+4*, LRX+2*
DIR(0 SHOW2+4*, LRX+2*
DIROUT SHOW2+3~, END+2!
DIRUT PAT!, L1+1, SHOW2+3~, CLERK+1!, CL1, CL1+3, END+2!, DGDGI+1!, DGDGI+13, DGDGI+15
, DONEX!
DLAYGO OERR+21*!
DO OERR+21!
DQ END+1!
DR END!
DRG END!
DRGG END!
DRGX END+1!
DRUG END+1!
DTOUT PAT!, SHOW2+3~, CLERK+1!, CLERK+3, END+2!, DGDGI+1!, DGDGI+13, DGDGI+15, DONEX!
DUOUT SHOW2+3~, END+2!
DUP END!
DUPRX END!
DUPRX0 END!
DUZ PSOVER+5, OERR+6, OERR+8, OERR+9, OERR+10
FL OERR+7~*, OERR+8*, OERR+9*
FLAGST CL1+3, END+1!, OERR+24
FLDT END!
I END!
>> IFN DGDGI+6*
II END+1!
INA END+2!, DGDGI+7*, DGDGI+8, DGDGI+9
>> INT SHOW+2, DGDGI+6*
IOF SHOW2+5
IOSL SHOW+1, SHOW2+1
ISDT END!
ISSD END!
J PACK*, END!
LOCKARRY DGDGI+4!, DONE+5, DONEX!, ULK1+1
LOCKARRY( LK1+3*, ULK1+2
LOCKINA DGDGI+4*, DONEX!
LST OERR+25~
LSTFL END!
MED END+2!, DGDGI+3*, DGDGI+4, DGDGI+7
MW EOJ+1!
N END+1!
>> ORD OERR+3, OERR+6, OERR+7, OERR+8, OERR+9, OERR+11, OERR+15
>> ORN EOJ2+2
P EOJ+1!
PCOMX EOJ+1!
PDA EOJ+1!
PHY END+1!
PHYS END!
PI END+1!
PPL PAT+1*, CLERK+4*, PACK*, PACK+1, PACK+2*, END!, OERR+25*
PSC END!
PSD PACK+2!, END!, EOJ+1!
PSDFN PAT+1*, L1, L1+1, CL1+1*, CL1+6, PATCHK*, END!, OERR+25*, LRX+3
PSDFN0 CLERK+4*, CL1+6*, PATCHK, PATCHK+1, END!
PSDNEW END!
PSDOLD END!
PSI END+1!
PSLST OERR+3, OERR+6, OERR+7, OERR+8, OERR+9, OERR+11, OERR+15, EOJ+2!, EOJ+3*
PSLSTVER OERR+14*, OERR+18, OERR+19!, OERR+20*, PPL, EOJ+1!
PSMSG END!
PSOACT PAT!
>> PSOBEDT OERR+5
PSOCLK CLERK+2*, END+1!, EOJ+2, EOJ+3, EOJ+5
PSOCNT END+1!
PSOCQ CLERK+2!, CL1, END+1!
PSODFN PAT+1*, CL1+1*, PATCHK, DGDGI+7*, OERR+14~, OERR+25*
PSODLQT SHOW+1, OERR+2!
PSOEDITF OERR+1~
PSOINTV CLERK+2!, END+2!
PSOLKVRX DGDGI+4*, DONEX!, LK1+1, LK1+2, LK1+3
>> PSOLST( OERR+3, OERR+6, OERR+7, OERR+8, OERR+9, OERR+11, OERR+15, EOJ+3, EOJ2+2
PSOMSG CL1+6, CL1+7!, OERR+13!, LRX+1!, LRX+2, LK1+2
>> PSONACT OERR+2
PSONAM PAT+1*, CLERK+4!, PATCHK*, PATCHK+1*, END+1!, OERR+25*
PSONOOR END+2!, OERR+2!
PSONULN END+1!
PSONV PAT+1*, L1*, L1+1*, L1+2*, L1+3, L1+4, SHOW+2, CLERK+4*, CL1+1*, CL1+4
, CL1+7*, CL1+8, CL1+9, CL2, PACK, DSPL+1, DSPL+2, DGDGI+2, DGDGI+3, DGDGI+6
, DGDGI+10, DGDGI+11, DGDGI+14, DGDGI+15, DONE+1, DONE+2, DONE+4*, OERR+15*, OERR+16, OERR+17
, OERR+19!, OERR+21, OERR+22, OERR+23, OERR+25, OERR+26, OERR+27, OERR+28, PPL, EOJ+3
, EOJ+4, EOJ2+1!, LRX+1, LRX+2, ULRX+1, ULRX+2, SAVE+1
PSONVLP PPL+2*, PPL+4, PPL+6, PPL+7, EOJ+1!
PSONVXX CL1+4*, CL1+7, CL1+8, CL1+9, END+1!
PSOODOSP CLERK+4~, CL1+2*
PSOOLDFN DGDGI+6~*, DGDGI+12
PSOOORN OERR+1~
PSOOPT PACK+1*!, DGDGI+10*, DONEX!
PSOOVNOD END+2!, DONEX!, OERR+17*, SAVE+1!*
PSOOVSTA END+2!, DONEX!, OERR+17*, SAVE+1!*
>> PSOPAR PSOVER+4, CLERK
PSOPLCK OERR+12*!, OERR+13!, LPAT+3*, LPAT+4!
>> PSOPOCK EOJ+3, EOJ+5
PSOQUIT PAT!, L1+1, CLERK+2!, CL1, END!
PSORX CLERK+3!
PSORX("DFLG" PAT!, CLERK+1!, DSPL+4, DGDGI+1!, DGDGI+7, DGDGI+13, DONEX!, OERR+4!, OERR+27, OERR+28
, OERR+29
PSORX("DOSING OFF" , CL1+2!
PSORX("PSOL" PPL+4*, PPL+5, PPL+6*, PPL+7*
>> PSOSD L1+5, SHOW
PSOSIG L1+1!, L1+3*, CL1+1!, CL1+8*, END+2!, DGDGI+2, DGDGI+3, OERR+2!, OERR+28*
PSOSTA EOJ+1!
PSOTHER L1+1!, CL1+1!, END+1!, DONE+3*, DONE+4
PSOTHER( DONE+3
>> PSOTPBFG OERR+3
PSOTPPE9 OERR+3~*!, OERR+4!
PSOTPPEN OERR+3~*!, OERR+4!
PSOTPPEX OERR+3~*!, OERR+4!
PSOTRVV PACK+1*!
PSOTT PAT!, CLERK+4*, CL1, END!
PSOVBCK OERR+1~, EOJ+5
PSOVDFN OERR+11*, OERR+12, OERR+13, ULB+1, ULB+3!
PSOVEDIT OERR+1~*
PSOVER PAT!, CLERK+4!, PATCHK, PACK+2!, END!, OERR+2!
PSOVER( PACK, PPL+2
PSOVER(0 PPL+1
PSOVERLX CLERK+1!, CL1+4, CL1+5!, END+1!, LPAT+3*
PSOVERPH CLERK+1!, CL1+4, CL1+5*, CL1+10, END+1!, ULP+1, ULP+2!
PSOVERPL CLERK+1!, CL1+5, CL1+10, END+1!, LPAT+1!, LPAT+3*
PSOVERPX CLERK+1!, CL1+1*, CL1+4, CL1+5, END+1!, LPAT+2, LPAT+3
PSOVERQ CLERK+1!
PSOVMSGX DGDGI+4!, DGDGI+5!, LK1+2*
PSOVOLK ULK1+2*, ULK1+3!
PSOVORD CLERK+2!, END+2!, DONE+2!, OERR+2!, OERR+26*, EOJ+1!
PSOVQUIT PAT!, CLERK+1!, CL1+1*, END+2!, DGDGI+7, OERR+27, OERR+28
PSOVRXN OERR+11*, OERR+13, ULB+2, ULB+3!
>> PSOX1 PPL+5*
>> PSOX2 PPL+5*, PPL+6, PPL+7
PSOZVER PSOVER+5*, END+1!, OERR+14*, OERR+19!
PSPRXN EOJ+1!
PSREA END!
PSRFLS END!
PSRX END!
PSRX1 END!
PSRX2 END!
PSRXREF END!
PSS END+1!
PSVERFLG END!, DGDGI+6*, DGDGI+14, OERR+2!
PSVFLAG END+2!, DSPL+4*!, DGDGI+2*, EOJ+1!
PTST END+1!
RFDATE END+1!
RFL END+1!
RFL1 END+1!
RFLL END+1!
RFLS END!
RX DGDGI+10*, EOJ+1!
RX0 END!
RX2 END!
RX3 END!
RXF END+1!
SD END+1!
SER DGDGI+8*, DGDGI+9*, DONEX!
SER1 END+2!, DGDGI+2*, DGDGI+7, DGDGI+8, DGDGI+9
ST END!
ST0 END!
ST00 END+1!
>> STA DGDGI+10*, DGDGI+12
STAR END!
STEXT END+1!
>> VA("PID" SHOW+2
VALMBCK OERR+2*, OERR+3*, OERR+5*, OERR+6*, OERR+8*, OERR+9*, OERR+10*, OERR+12*, OERR+13*, OERR+16*
, OERR+19*, EOJ+3!, EOJ+4*, EOJ+5*
>> VALMSG OERR+2*, OERR+5*, OERR+6*, OERR+8*, OERR+9*, OERR+10*, OERR+12*, OERR+13*, OERR+16*, OERR+19*
VERLFLAG END+1!, DGDGI+4*, LK1+2*
X PAT, SHOW2+3~, END!, OERR+15*, OERR+19!, OERR+21*, OERR+23*
XQORNOD OERR+1~
Y PAT, PAT+1, SHOW2+3~, CLERK+3, CLERK+4, OERR+1~, OERR+18, OERR+19!, EOJ+3*, EOJ2+1!
Y(0 OERR+23*
Z END+1!
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