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 PATCLERK+3, OERR+20
FILE^DICN OERR+23
^DIK PPL
IX^DIK OERR+25
$$GET1^DIQ L1CL2PACK
^DIR SHOW2+4, LRX+2
^PSOBUILD PAT+1, PATCHKPATCHK+1, EOJ+3
HD^PSODDPR2 SHOW+1, SHOW2+1
STAT^PSODGDG2 CL1+3, OERR+26
^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+14, LPAT+3
PSOL^PSSLOCK OERR+15, LRX+2, LK1+2
PSOUL^PSSLOCK CL1+7, CL1+8, CL1+9, ULRX+2, ULK1+2, ULB+2
UL^PSSLOCK OERR+15, ULP+2, ULB+1
KVA^VADPT END+1
PID^VADPT L1PATCHKPATCHK+1, OERR+28
FULL^VALM1 DGDGI+12, OERR+17, 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+20
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, PATCHKPATCHK+1, DGDGI+11, OERR+27, LRX+3
^PS(52.4 - [#52.4] L1L1+1, L1+2, L1+4, CL1CL1+1, CL1+7, CL1+9, DGDGI+2, DGDGI+3
DGDGI+15, DONE+1*, DONE+4, OERR+18, OERR+19, OERR+24*, OERR+25, OERR+29, PPLSAVE+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+7, OERR+8, OERR+9, OERR+10
OERR+11, OERR+13, OERR+19, OERR+21, OERR+24, OERR+27, OERR+30, EOJ+4, EOJ2+2, SAVE+1
^XUSEC("PSDRPH" OERR+9, OERR+11
^XUSEC("PSORPH" PSOVER+5, OERR+7, OERR+12

Label References

Name Line Occurrences
CLERK PATCL2
DGDGI L1+2, L1+3, OERR+29, OERR+30
DONE DGDGI+14, DGDGI+15
DONEX DGDGI+15
DSPL L1+4, CL1+7, CL1+8, CL1+9, DGDGI+14, DGDGI+15, DONE+4, OERR+31
END PATCLERKCLERK+3, EOJ
EOJ OERR+26, OERR+29, OERR+30, OERR+31, PPL+1
EOJ2 EOJ+4
LK1 DGDGI+4
LPAT CL1+5
LRX CL1+6
PACK L1CL2PATCHKQUIT
PAT L1
PATCHK CL1+1
PPL OERR+29, OERR+30
QUIT L1+5
SAVE DSPL+3, DGDGI+12
ULB OERR+20, EOJ
ULK1 DONE+5
ULP CL1+5, CL1+10

Naked Globals

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

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+17*, OERR+21!, OERR+25*, PPL*!
DD OERR+23!
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+27*
DGDG L1+1*, L1+2, CL1*, CL1+1, CL1+7, EOJ+1!
DIC PAT*!, CLERK+2*, CLERK+3!, END!, OERR+20!*, OERR+23*!
DIC("A" PAT*, CLERK+2*
DIC("S" PAT*, CLERK+2*
DIC(0 PAT*, CLERK+2*, OERR+20*, OERR+23*
DIE END!
DIK OERR+25*!, PPL*!
DINUM OERR+23*!
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!, CL1CL1+3, END+2!, DGDGI+1!, DGDGI+13, DGDGI+15
, DONEX!
DLAYGO OERR+23*!
DO OERR+23!
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+7, OERR+9, OERR+11, OERR+12
FL OERR+8~*, OERR+10*, OERR+11*
FLAGST CL1+3, END+1!, OERR+26
FLDT END!
I END!
>> IFN DGDGI+6*
II END+1!
INA END+2!, DGDGI+7*, DGDGI+8, DGDGI+9
INT SHOW+2, DGDGI+6*, OERR+1~
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+27~
LSTFL END!
MED END+2!, DGDGI+3*, DGDGI+4, DGDGI+7
MW EOJ+1!
N END+1!
>> ORD OERR+3, OERR+6, OERR+13, OERR+17
>> 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+27*
PSC END!
PSD PACK+2!, END!, EOJ+1!
PSDFN PAT+1*, L1L1+1, CL1+1*, CL1+6, PATCHK*, END!, OERR+27*, LRX+3
PSDFN0 CLERK+4*, CL1+6*, PATCHKPATCHK+1, END!
PSDNEW END!
PSDOLD END!
PSI END+1!
PSLST OERR+3, OERR+6, OERR+13, OERR+17, EOJ+2!, EOJ+3*
PSLSTVER OERR+16*, OERR+20, OERR+21!, OERR+22*, PPLEOJ+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!, CL1END+1!
PSODFN PAT+1*, CL1+1*, PATCHKDGDGI+7*, OERR+16~, OERR+27*
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+13, OERR+17, EOJ+3, EOJ2+2
PSOMSG CL1+6, CL1+7!, OERR+15!, LRX+1!, LRX+2, LK1+2
>> PSONACT OERR+2
PSONAM PAT+1*, CLERK+4!, PATCHK*, PATCHK+1*, END+1!, OERR+27*
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, CL2PACKDSPL+1, DSPL+2, DGDGI+2, DGDGI+3, DGDGI+6
DGDGI+10, DGDGI+11, DGDGI+14, DGDGI+15, DONE+1, DONE+2, DONE+4*, OERR+17*, OERR+18, OERR+19
OERR+21!, OERR+23, OERR+24, OERR+25, OERR+27, OERR+28, OERR+29, OERR+30, PPLEOJ+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+19*, SAVE+1!*
PSOOVSTA END+2!, DONEX!, OERR+19*, SAVE+1!*
>> PSOPAR PSOVER+4, CLERK
PSOPLCK OERR+14*!, OERR+15!, 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+29, OERR+30
OERR+31
PSORX("DOSING OFF" , CL1+2!
PSORX("PSOL" PPL+4*, PPL+5, PPL+6*, PPL+7*
PSORXIEN OERR+1~, OERR+6*, OERR+7, OERR+8, OERR+9, OERR+10, OERR+11
>> PSOSD L1+5, SHOW
PSOSIG L1+1!, L1+3*, CL1+1!, CL1+8*, END+2!, DGDGI+2, DGDGI+3, OERR+2!, OERR+30*
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+13*, OERR+14, OERR+15, ULB+1, ULB+3!
PSOVEDIT OERR+1~*
PSOVER PAT!, CLERK+4!, PATCHKPACK+2!, END!, OERR+2!
PSOVER( PACKPPL+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+28*, EOJ+1!
PSOVQUIT PAT!, CLERK+1!, CL1+1*, END+2!, DGDGI+7, OERR+29, OERR+30
PSOVRXN OERR+13*, OERR+15, ULB+2, ULB+3!
>> PSOX1 PPL+5*
>> PSOX2 PPL+5*, PPL+6, PPL+7
PSOZVER PSOVER+5*, END+1!, OERR+16*, OERR+21!
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+7*, OERR+10*, OERR+11*, OERR+12*, OERR+14*, OERR+15*, OERR+18*
OERR+21*, EOJ+3!, EOJ+4*, EOJ+5*
>> VALMSG OERR+2*, OERR+5*, OERR+7*, OERR+10*, OERR+11*, OERR+12*, OERR+14*, OERR+15*, OERR+18*, OERR+21*
VERLFLAG END+1!, DGDGI+4*, LK1+2*
X PATSHOW2+3~, END!, OERR+17*, OERR+21!, OERR+23*, OERR+25*
XQORNOD OERR+1~
Y PATPAT+1, SHOW2+3~, CLERK+3, CLERK+4, OERR+1~, OERR+20, OERR+21!, EOJ+3*, EOJ2+1!
Y(0 OERR+25*
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