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

Package: Outpatient Pharmacy

Routine: PSOCAN2


Information

PSOCAN2 ;BHAM ISC/JMB - rx cancel with speed ability drug check ; 2/16/12 3:40pm

Source Information

Source file <PSOCAN2.m>

Call Graph

Call Graph

Call Graph Total: 24

Package Total Call Graph
Outpatient Pharmacy 15 $$STATUS^PSOBPSUT  ^PSOBUILD  CAN^PSOCAN  AREC^PSOCAN1  REF^PSOCAN4  (,REINS)^PSOCMOPA  DOSCK^PSODOSUT  (POST,SET,WAIT)^PSODRG  
EN^PSOHLSN1  DAOC^PSONEW  $$TRIC^PSOREJP1  SUBMIT^PSOREJU3  $$FIND^PSOREJUT  Q^PSORXL  SPR^PSOUTL  
VA FileMan 7 DD^%DT  NOW^%DTC  ^DIC  FILE^DICN  ^DIE  (,IX)^DIK  ^DIR  
List Manager 1 PAUSE^VALM1  
Registration 1 KVA^VADPT  

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

Package Total Caller Graph
Outpatient Pharmacy 11 PSOAUTOC  PSOCAN  PSOCAN1  PSOCAN3  PSOCAN3N  PSOCAN4  PSOHLDC  PSOORED1  
PSOORFI6  PSOORUTL  PSOUTL  

Entry Points

Name Comments DBIA/ICR reference
DRGDRG ;Checks for drug/drug interaction, duplicate drug and class
DELREF ;
LOG
AUTOD ;reinstates Rxs dc'd by date of death
VERIFY ;Put in non-verify file
REINS
RMB(IDX) ;remove Rx if found in array BBRX() (Bingo Board)
SUS ;Adds rec to suspense
ACT
KILL
HLD
REF
NVER ;Called from PSOCAN3, needs DA defined

External References

Name Field # of Occurrence
DD^%DT ACT+13, ACT+14
NOW^%DTC LOG+3
^DIC DRGDRG+5
FILE^DICN SUS+2, VERIFY+2, AUTOD+12
^DIE HLD+2
^DIK SUS+1, AUTOD+11
IX^DIK AUTOD+5, AUTOD+14
^DIR ACT+31
$$STATUS^PSOBPSUT ACT+28, ACT+34
^PSOBUILD ACT+1
CAN^PSOCAN ACT+6
AREC^PSOCAN1 REINS+7, SUS+5
REF^PSOCAN4 REF+5
^PSOCMOPA HLD+6
REINS^PSOCMOPA ACT+18
DOSCK^PSODOSUT DRGDRG+11
POST^PSODRG DRGDRG+10
SET^PSODRG DRGDRG+10
WAIT^PSODRG ACT+37
EN^PSOHLSN1 SUS+5, VERIFY+4, AUTOD+8, AUTOD+17, AUTOD+21, AUTOD+23, NVER+2
DAOC^PSONEW DRGDRG+18
$$TRIC^PSOREJP1 ACT+21
SUBMIT^PSOREJU3 ACT+22
$$FIND^PSOREJUT ACT+27, ACT+33
Q^PSORXL ACT+31
SPR^PSOUTL REF+10
KVA^VADPT KILL+2
PAUSE^VALM1 REINS+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+0
Function Call: WRITE
  • Prompt: "="
  • Line Location: ACT+0
Function Call: WRITE
  • Prompt: !!,RX_" "_DRG
  • Line Location: ACT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+6
Function Call: WRITE
  • Prompt: !,"Prescription #"_RX_" REINSTATED!"
  • Line Location: ACT+19
Function Call: WRITE
  • Prompt: !?3,"Prescription #",RX_": "
  • Line Location: ACT+24
Function Call: WRITE
  • Prompt: !?5,"Either print the label using the reprint option "
  • Line Location: ACT+36
Function Call: WRITE
  • Prompt: !?7,"or check later to see if the label has been printed."
  • Line Location: ACT+37
Function Call: WRITE
  • Prompt: !?5,"Placing Rx on suspense. Please wait..."
  • Line Location: ACT+38
Function Call: WRITE
  • Prompt: !
  • Line Location: DRGDRG+13
Routine Call
  • DIE
  • Line Location:
    • HLD+2
Routine Call
  • DIC
  • Line Location:
    • DRGDRG+5
Routine Call
  • DIR
  • Line Location:
    • ACT+31

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] Classic Fileman Calls
^PS(52.4 - [#52.4] Classic Fileman Calls
^PS(52.5 - [#52.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" REINS+3
^PS(52.4 - [#52.4] AUTOD+5*
^PS(52.5 - [#52.5] SUS+1, SUS+3*, AUTOD+11, AUTOD+13*
^PSDRUG - [#50] REINS+4, ACT+1
^PSRX - [#52] REINS+2, REINS+3, REINS+4, REINS+6, REINS+8, ACT+1, ACT+5, ACT+9, ACT+10, ACT+11
, ACT+12, ACT+29, ACT+35, SUS+1, SUS+4*, DRGDRG+1, DRGDRG+4, DRGDRG+5, DRGDRG+12, VERIFY+3*
, HLD, HLD+1*, HLD+2, HLD+3, HLD+4!, HLD+5, REF, REF+3, REF+5, REF+6
, REF+8!, REF+9*, REF+11*, REF+12*, DELREF+3, AUTOD+1, AUTOD+2, AUTOD+5*, AUTOD+7!, AUTOD+14*
, AUTOD+16!, AUTOD+18*, AUTOD+19*, AUTOD+22!, AUTOD+24!, LOG, LOG+1, LOG+3*, LOG+5*, LOG+6*
, LOG+7*
^PSRX("AD" HLD+4!, REF+8!
^PSRX("AH" HLD+1!, AUTOD+19*
^PSRX("APSOD" REINS+6, AUTOD+1!, AUTOD+7!, AUTOD+16!, AUTOD+22!, AUTOD+24!, LOG+4!
^TMP("PSODAOC" DRGDRG+16, DRGDRG+19!
^XUSEC("PSORPH" REINS+7, DRGDRG+9

Label References

Name Line Occurrences
ACT REINS+6
AUTOD REINS+6
DELREF REF+1
DRGDRG REINS+7, ACT+3
LOG AUTOD+8, AUTOD+17, AUTOD+21, AUTOD+23
SUS ACT+38
VERIFY REINS+7

Naked Globals

Name Field # of Occurrence
^("DDSTA" AUTOD+2
^(0 REINS+4, ACT+1, ACT+10, ACT+12, REF, DELREF+3, AUTOD+13
^(2 ACT+11
^(3 SUS+4, REF+11*, LOG+7*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% KILL!, LOG+3, LOG+4!
ACNT KILL!, LOG!*, LOG+2*, LOG+3, LOG+4!
ACOM SUS+5*, HLD+1*, KILL!, AUTOD+6*, AUTOD+8!, AUTOD+15*, AUTOD+17!, AUTOD+20*, AUTOD+21!, AUTOD+23*!
, LOG+3
ACT SUS+1*, KILL!
ALL KILL!
>> BBRX RMB+7
>> BBRX( RMB+2, RMB+6*!
BCNUM KILL!
BINGCRT RMB+7!
CMOP HLD~, HLD+6!, KILL!
CMOP( HLD+6
CMOP("L" HLD+6
CMOP("S" HLD+6
CNT KILL!
DA REINS+2, REINS+3, REINS+4, REINS+6, REINS+7*, REINS+8, ACT+1, ACT+6*, ACT+7, ACT+9
, ACT+10, ACT+11, ACT+12, SUS+1*, SUS+4*, SUS+5, DRGDRG+1, DRGDRG+4, DRGDRG+5, DRGDRG+10
, VERIFY+1, VERIFY+3*, VERIFY+4, HLD, HLD+1, HLD+2, HLD+3, HLD+4, HLD+5, REF
, REF+3, REF+5, REF+6, REF+8, REF+9, REF+11, REF+12, KILL!, DELREF+3, AUTOD+1
, AUTOD+2, AUTOD+5!*, AUTOD+7, AUTOD+8*, AUTOD+11*, AUTOD+12*, AUTOD+13, AUTOD+14!*, AUTOD+16, AUTOD+17
, AUTOD+18, AUTOD+19, AUTOD+21, AUTOD+22, AUTOD+23, AUTOD+24, LOG, LOG+1, LOG+3, LOG+4
, LOG+5, LOG+6, LOG+7, NVER+2, RMB+2, RMB+5
DA(1 REF+9*, REF+10!
DAYS360 KILL!
DD SUS+2!, VERIFY+2!, AUTOD+12!
DEAD KILL!
DIC SUS+2*, DRGDRG+5*!, VERIFY+1*, VERIFY+2!, AUTOD+12*
DIC("DR" SUS+2*, VERIFY+1*
DIC(0 SUS+2*, DRGDRG+5*, VERIFY+1*, AUTOD+12*
DIE HLD+2*!
DIK SUS+1*, AUTOD+5*!, AUTOD+11*, AUTOD+14*!
DINUM VERIFY+1*, VERIFY+2!
DIR ACT+31!
DIR("?" ACT+30*
DIR("A" ACT+30*
DIR("B" ACT+30*
DIR(0 ACT+30*
DIRUT ACT+31, KILL!
DLAYGO VERIFY+1*, VERIFY+2!
DO SUS+2!, VERIFY+2!, AUTOD+12!
>> DODD AUTOD+2*, AUTOD+5, AUTOD+13, AUTOD+19
DODR REINS~, REINS+6*, ACT+38, ACT+39!, AUTOD+1!
>> DODS AUTOD+2*, AUTOD+3
DR HLD+2*!, KILL!
DRG ACT+1*, ACT+2, KILL!
DRUG KILL!
DT REINS+2, ACT+26, ACT+32, ACT+38, DRGDRG+1, VERIFY+1, AUTOD+20
DTOUT DRGDRG+5, KILL!
DUOUT KILL!
DUZ REINS+7, DRGDRG+9, VERIFY+1, LOG+3
EN KILL!
FDT ACT+11*, ACT+12*, ACT+13, ACT+26, ACT+32, ACT+38, SUS+2, KILL!
>> FILE AUTOD+3*, AUTOD+4, AUTOD+9, AUTOD+18
HOLD DRGDRG+6!, DRGDRG+13!, KILL!
HOLD( DRGDRG+6*, DRGDRG+13
HOLDRX ACT+1*, ACT+5!
HPOERR ACT+2*, ACT+4, ACT+5!
I ACT*, KILL!
IDX RMB~, RMB+2, RMB+6
IFN HLD+3*, HLD+4!, REF*, REF+3, REF+6, REF+8, REF+11*, REF+13!, DELREF+3
II KILL!
IN KILL!
INCOM KILL!
IT KILL!
JJ KILL!
K RMB+1~, RMB+4*
LC KILL!
LFD SUS+4*, SUS+5, KILL!, AUTOD+13*, AUTOD+15, AUTOD+17!
LINE KILL!
LL ACT+10*, KILL!
LPRT ACT+10*, ACT+14, KILL!
LREF ACT+10*, ACT+16, ACT+25, KILL!
LSI KILL!
NAME DRGDRG+6*, DRGDRG+13, KILL!
NDF KILL!
NODE REF+10*!
NOEXP KILL!
NSF KILL!
ORN REINS~
OUT KILL!
PCNT KILL+1!
PDA HLD~, HLD+5*
PHST SUS+5*!, VERIFY+4*!, AUTOD+6*, AUTOD+8!, AUTOD+17*!
PLINE KILL+1!
>> POERR ACT+2, ACT+4*, KILL
POP KILL+1!
PPL ACT+31*, KILL+1!
PS KILL+1!
>> PSCAN( REINS+6*, REINS+8*, ACT+5, ACT+6, DRGDRG+6, DRGDRG+12
PSCNODE DELREF+1~, DELREF+3*, DELREF+4, DELREF+5
PSDTEST HLD~, HLD+4*, HLD+5*, HLD+7*
PSFROM KILL+1!
PSI KILL+1!
PSINV KILL+1!
PSOCAN KILL+1!
PSOCMOP KILL+1!
PSODAOC DRGDRG+17~*
PSODFN REINS+1, VERIFY+1, KILL+1!, AUTOD+16, AUTOD+22, AUTOD+24, LOG+4
PSODRG KILL+1!
PSODRG("QFLG" DRGDRG+7*
PSODRUG KILL+1!
PSOLBL REF+4~, REF+6*
>> PSONEW("OLD V AL" , DRGDRG+7
PSONODEL REF+4~*, REF+5, REF+6*, REF+7
PSONOOR KILL+1!
PSONVC NVER+1~, NVER+2*
PSONVCC NVER+1~, NVER+2*
PSONVCP NVER+1~, NVER+2*
>> PSOODOSP REINS+1*
PSOOPT KILL+1!
>> PSOPAR REINS+7
>> PSOQUIT REINS+7, ACT+3, DRGDRG+10
PSOREINF REINS+1!
PSOREINO REINS~*
>> PSOREINS REINS+7, ACT+3, DRGDRG+10
>> PSORENW("OIRXN" DRGDRG+10*, DRGDRG+12, DRGDRG+13!
PSORFDEL REF+1!, REF+8!, DELREF+2*, DELREF+5*
>> PSORX("DFLG" REINS+7, ACT+4*, ACT+5, DRGDRG+2*, DRGDRG+11
>> PSORX("DOSING OFF" , REINS+1!
>> PSORXED("DFLG" DRGDRG+2*
PSOSD KILL+1!
PSOSD( DRGDRG+6!, DRGDRG+13*
>> PSOSITE SUS+2
PSOTECCK DRGDRG+8!, DRGDRG+9*
PSOTRIC ACT+21~*, ACT+22, ACT+28, ACT+29, ACT+34, ACT+35
PSOVODA REINS+7~*
PSOY DRGDRG+8!*
PSOY(0 DRGDRG+8*
PSPOP KILL+1!
PSRXDA VERIFY+1*, VERIFY+3, KILL+1!
PSS KILL+1!
PSVC KILL+1!
>> PSXSYS ACT+18
RDL DELREF+1~, DELREF+3*
REA ACT+6*, DRGDRG+12*, HLD+1, KILL+2!
RELDT ACT+11*, ACT+12*, ACT+13, ACT+16, KILL+2!
RET DRGDRG+19!
RF ACT+9*, REF+10!, KILL+2!, LOG+1*, LOG+4!
RFCNT ACT+9*, ACT+11, ACT+12, ACT+16, ACT+21, ACT+22, ACT+25, ACT+28, ACT+34, SUS+3
, KILL+2!, LOG+1*, LOG+3, LOG+4!
RFDATE KILL+2!
RFDT HLD+3*, HLD+4!
RFL KILL+2!
RFL1 KILL+2!
RFLL KILL+2!
RP KILL+2!
RX ACT+1, ACT+2, ACT+5*, ACT+6, ACT+16, ACT+19, ACT+24, DRGDRG+6, KILL+2!
RX0 SUS+1*, SUS+2, KILL+2!
RX1 REINS+8*!
RXCNT KILL+2!
RXDA KILL+2!
RXIEN ACT+7~*, ACT+21, ACT+22, ACT+27, ACT+28, ACT+29, ACT+31, ACT+33, ACT+34, ACT+35
RXN SUS+1*, SUS+2, SUS+4, DRGDRG+17~*, KILL+2!, AUTOD+5*, AUTOD+8!, AUTOD+11*, AUTOD+12, AUTOD+14
RXNUM KILL+2!
RXP SUS+2*, KILL+2!
RXREC KILL+2!
RXREF KILL+2!
RXS SUS+1*, KILL+2!, AUTOD+11*
RXSP KILL!
SDATE KILL+2!
SPCANC KILL+2!
SS KILL+2!
ST SUS+5*!, VERIFY+4*!, AUTOD+6*, AUTOD+8!, AUTOD+17*!
ST4 RMB+1~, RMB+2*, RMB+4
ST5 RMB+1~, RMB+4*, RMB+5
ST6 RMB+1~, RMB+3*, RMB+5*, RMB+6
STA DRGDRG+3*, DRGDRG+4, DRGDRG+13!, AUTOD+3*, AUTOD+5, AUTOD+14, AUTOD+17, AUTOD+18, AUTOD+20
STAT DRGDRG+4*, DRGDRG+6, DRGDRG+13!, KILL+2!
SUB KILL+2!, LOG*
SUSD HLD~, HLD+3*, HLD+4!, HLD+5, REF, REF+8, REF+11, REF+12, REF+13!
VCOM VERIFY+4*!
WARN KILL!
X SUS+2*, DRGDRG+5*, VERIFY+1*, KILL+2!, AUTOD+12*
XFDT ACT+10*, ACT+13*, ACT+16, ACT+25, KILL+2!
XFLAG ACT+18!
XLPDT ACT+14*, ACT+16, ACT+25, KILL+2!
XRELDT ACT+10*, ACT+13*, ACT+16, ACT+25, KILL+2!
Y REINS+3*, REINS+4, ACT+13*, ACT+14*, ACT+31, SUS+3, DRGDRG+5, DRGDRG+7, DRGDRG+8, KILL+2!
, AUTOD+12
Y(0 DRGDRG+6, DRGDRG+8
ZRXN DRGDRG+9~, DRGDRG+10*, DRGDRG+17
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