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

Package: Outpatient Pharmacy

Routine: PSOORED1


Information

PSOORED1 ;ISC-BHAM/SAB - edit orders from backdoor ;Oct 20, 2022@15:19

Source Information

Source file <PSOORED1.m>

Call Graph

Call Graph

Call Graph Total: 25

Package Total Call Graph
Outpatient Pharmacy 17 REVERSE^PSOBPSU1  REF^PSOCAN2  RMP^PSOCAN3  (INDICAT,SIND,SINS)^PSODIR  EN^PSOFSIG  SIG^PSOHELP  EXP^PSOHELP1  ($$INSCHK,DELINS)^PSOHELP3  
EN^PSOHLSN1  DEL^PSONEW  CHECK^PSONRXN  DRG^PSOORDRG  DOLST1^PSOORED3  DOSE1^PSOORED5  EN^PSOORNE1  CAN^PSOTPCAN  
($$MAXNUMRF,$$PRVDETOX,$$RXDEA)^PSOUTIL  
VA FileMan 6 NOW^%DTC  ^DIE  ^DIK  $$GET1^DIQ  ^DIR  EN^DIWE  
List Manager 1 PAUSE^VALM1  
Pharmacy Data Management 1 $$DETOX^PSSOPKI  

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

Package Total Caller Graph
Outpatient Pharmacy 2 PSOORCPY  PSOOREDT  

Entry Points

Name Comments DBIA/ICR reference
EN(PSORENW) ;
TRY
INS
INS1
INSX
INSQ ;
INSQX ;
INIT ;setup psorenw array
QTY
RFN
RF ;# of refills
; Retrieving the Maximum Number of Refills allowed
UPMI ;add dosing data for pre-poe rxs

External References

Name Field # of Occurrence
NOW^%DTC TRY+19
^DIE EN+13, TRY+9
^DIK TRY+15, TRY+24
$$GET1^DIQ INIT+30
^DIR INS1+4, UPMI+2
EN^DIWE INS+8
REVERSE^PSOBPSU1 TRY+2
REF^PSOCAN2 TRY+14
RMP^PSOCAN3 TRY+3
INDICAT^PSODIR INSQ+4
SIND^PSODIR INSQ+10
SINS^PSODIR INSX+3
EN^PSOFSIG INS1+5, INS1+6, INS1+12, INSX+4, INSQ+6
SIG^PSOHELP INS1+10
EXP^PSOHELP1 TRY+23
$$INSCHK^PSOHELP3 INSX+6
DELINS^PSOHELP3 INS1+7
EN^PSOHLSN1 TRY+5
DEL^PSONEW EN+5, EN+8
CHECK^PSONRXN EN+7
DRG^PSOORDRG RFN+14
DOLST1^PSOORED3 RFN+34
DOSE1^PSOORED5 UPMI+4
EN^PSOORNE1 EN+9
CAN^PSOTPCAN TRY+2
$$MAXNUMRF^PSOUTIL RF+2
$$PRVDETOX^PSOUTIL INIT+33
$$RXDEA^PSOUTIL INIT+15
$$DETOX^PSSOPKI INIT+33
PAUSE^VALM1 EN+4, EN+5, EN+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ("_$E(INS1,2,9999999)_")"
  • Line Location: INS1+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: UPMI+1
Routine Call
  • DIE
  • Line Location:
    • EN+13
    • TRY+9
Routine Call
  • DIR
  • Line Location:
    • INS1+4
    • UPMI+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DILOCKTM" EN+11
^PS(50.7 - [#50.7] INS1+2
^PS(52.4 - [#52.4] TRY+24
^PS(52.5 - [#52.5] TRY+11, TRY+12, TRY+13, TRY+14
^PS(53 - [#53] RFN+12
^PS(55 - [#55] INS1+5, INSXINSX+4, INSQ+2, INSQ+7, RFN+11
^PS(59 - [#59] EN+11, EN+13
^PSRX - [#52] TRY*, TRY+1*, TRY+6, TRY+7, TRY+8, TRY+9, TRY+10*, TRY+14, TRY+16, TRY+17
TRY+18, TRY+19*, TRY+20*, TRY+21*, TRY+22*, INS+1, INS+2, INS+3, INS+4, INS+5
INS+6, INS+7, INS+10, INS1+1, INSX+2, INSQ+3, INSQ+8, INSQ+9, INIT+1, INIT+2
INIT+6, INIT+9, RFN+32, RFN+33
^PSRX("AH" TRY+9!
^PSRX("B" EN+14
^SC - [#44] RFN+10
^TMP($J INS!, INS+6*, INS+7*, INS+8!, INS+9, RFN+28, RFN+30, RFN+31!
^VA(200 - [#200] INIT+13, INIT+16, RFN+25

Label References

Name Line Occurrences
@( EN+3
INIT EN+2
INS INSX+7
INS1 INS+2, INS+4, INS1+10
INSQ INS1+13, INSXINSX+4
INSQX INS1+5, INS1+6
INSX INS+5
QTY INIT+34
RF RFN+15
UPMI INS+1

Naked Globals

Name Field # of Occurrence
^("IND" INIT+5
^("PS" INIT+16
^("SIG" INIT+6
^("STA" TRY+8, INIT+1
^("TN" INIT+1
^(2 INIT+1
^(3 INIT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TRY+19
>> ACNT TRY+17*, TRY+19, TRY+20, TRY+21, TRY+22
>> ACOM TRY+6*, TRY+9*, TRY+13*, TRY+19
>> CLOZPAT INIT+35, RFNRF+2
COMM TRY+5*!
>> COPY EN+16, INIT+18, RFN+26
D INS+10*, INIT+9*, INIT+10!
>> DA EN+10*, TRY*, TRY+1, TRY+2, TRY+5, TRY+7, TRY+8, TRY+9, TRY+10, TRY+11*
TRY+12, TRY+13, TRY+14*, TRY+15*, TRY+16*, TRY+17, TRY+18, TRY+19, TRY+20, TRY+21
TRY+22, TRY+24*
DD INS+3!*, INS+4!, RFN+29!
DIC INS!, INS+8*, INS1!, INSQX+1!
DIE EN+10*, EN+13!, TRY+9*
DIK TRY+15*!, TRY+24*!
DIR INS!, INS1!, INSX+1!, INSQX+1!, UPMI+1!, UPMI+2!
DIR("?" INS1+4*
DIR("A" UPMI+1*
DIR("B" INS1+3*, UPMI+1*
DIR(0 INS1+4*, UPMI+1*
DIRUT INS!, INS1!, INSQX+1!, UPMI+1!, UPMI+2!
>> DR EN+12*, TRY+9*
>> DREN RFN+14*
DT TRY+1, RFN+1, RFN+8
DTOUT INS!, INS1!, INS1+5, INSQ+5, INSQX+1!, UPMI+1!
DUOT UPMI+2!
DUOUT INS!, INS1!, INS1+5, INSQ+5, INSQX+1!, UPMI+1!, UPMI+2!
DUZ TRY+19, RFN+24, RFN+25
>> DWLW INS+8*
DWPK INS+8*, INSQX+1!
EDTHLD UPMI+3*, UPMI+4!
GG INS+3!
>> I INS+3*, INS+6*, INIT+9*, RFN+27*, RFN+30*
>> INS1 INS1+8*, INS1+9*, INS1+11, INS1+12
INSDEL INS!, INS+9*
LST EN+1~
>> OLENT RFN+34
ORD EN+1~
ORN EN+1~
PHARM TRY+5*!
POERR RFN+14*!
PSCDA TRY+24*!
>> PSDAYS RFN+13*, RF+2
>> PSOAC EN+1*
PSODELINS INS1+7*, INS1+8, INS1+9, INS1+13, INSQX+1!
>> PSODFN TRY+16*, INS1+5, INSXINSX+4, INSQ+2, INSQ+7
>> PSODRUG("DEA" RFN+21
>> PSODRUG("IEN" INIT+28, INIT+30, RFN+14, RF+2
>> PSODRUG("OI" INS1+2
>> PSOEDIT INIT+18
>> PSOID RFN+1*, RFN+6*
>> PSOINSCH INSX+6*, INSX+7
>> PSOMRFLG TRY+20, TRY+21, TRY+22
>> PSOMTFLG INIT+22, RFN+4, RFN+18
>> PSONEW INS1+6
>> PSONEW("DFLG" EN+6, EN+8, UPMI+1!, UPMI+4
>> PSONEW("OLD L AST RX#" , EN+10
>> PSONEW("QFLG" EN+4!, EN+6, EN+8
>> PSONEW("RX #" , EN+4, EN+5, EN+6, EN+14
>> PSONOOR TRY+5
PSOOEINS INS1+1*, INS1+5, INS1+6, INS1+8, INSX+4, INSQX+1!
>> PSOOIFLG TRY+20, TRY+21, TRY+22
PSOOSINS INS1+1*, INS1+5, INS1+6, INSX+4, INSQX+1!
>> PSOPAR EN+3, EN+4, EN+6, EN+9
PSORENW EN~, EN+8!, EN+9, RFN+34
PSORENW("# OF REFILLS" , RFN*, RFN+15, RFN+18*, RF+2*
PSORENW("CLER K CODE" , RFN+24*
PSORENW("CLINIC" INIT+17*, RFN+10
PSORENW("COPIES" RFN+23*
PSORENW("COSI GNING PROVIDER" , INIT+16*
PSORENW("COSIGNER" INIT+24*, INIT+25!
PSORENW("DAYS SUPPLY" , INIT+30*, INIT+34, INIT+35*, RFN+13
PSORENW("DEA" INIT+15*
PSORENW("DETX" INIT+33*
PSORENW("DOSE" RFN+27
PSORENW("DRUG IEN" , INIT+28*, INIT+33
PSORENW("ENT" RFN+26*, RFN+27!*, RFN+34*
PSORENW("FILL DATE" , RFN+1*, RFN+8*
PSORENW("IND" INIT+5*
PSORENW("INDF" INIT+5*
PSORENW("INS" RFN+32*
PSORENW("IRXN" TRY+6, INIT+1, INIT+2, INIT+6, INIT+9, INIT+11, INIT+15, RFN+32, RFN+33
PSORENW("ISSU E DATE" , RFN+1*, RFN+6*
PSORENW("MAIL EXEMPTION" , INIT+19*
PSORENW("MAIL/WINDOW" RFN+20*, RFN+21*, RFN+22
PSORENW("OIRXN" TRYINIT+11*
PSORENW("ORX #" , INIT+27*
PSORENW("PATI ENT STATUS" , RFN+11*, RFN+12, RF+2
PSORENW("PROV IDER NAME" , INIT+13*
PSORENW("PROVIDER" INIT+12*, INIT+13, INIT+16, INIT+33
PSORENW("PSODFN" INIT+26*, RFN+11
PSORENW("PTST NODE" , RFN+12*, RFN+13
PSORENW("QTY" QTY*
PSORENW("REMARKS" INIT+18*, INIT+22*
PSORENW("RX # " , EN+6*, EN+7
PSORENW("RX0" INIT+1*, INIT+12, INIT+17, INIT+18, INIT+22, INIT+26, INIT+27, INIT+30, INIT+35, QTY
RFNRFN+6, RFN+11, RFN+13, RFN+20, RFN+23
PSORENW("RX2" INIT+1*
PSORENW("RX3" INIT+1*, INIT+24, RFN+8
PSORENW("RX7" INIT+2*, INIT+19
PSORENW("SIG" INIT+3*, INIT+6*, RFN+30*
PSORENW("SINS" RFN+33*
PSORENW("STA" INIT+1*
PSORENW("TN" INIT+1*
>> PSORX("CLERK CODE" , RFN+25*
>> PSORX("CLINIC" RFN+10*
>> PSORX("DFLG" EN+1*
>> PSORX("EDIT" UPMI+3!, UPMI+4*
>> PSORX("FN" EN+1!, EN+9
>> PSORX("MAIL/WINDOW" RFN+22*
>> PSORX("PROVID ER NAME" , INIT+13*
>> PSORX("QFLG" EN+1*
>> PSORX("SIG" INIT+3
>> PSORXED INS1+5, INS1+12, INSX+3, INSX+4, INSX+6, INSQ+4, INSQ+6, INSQ+10, UPMI+4*
>> PSORXED("DEACOPY" INIT+15
>> PSORXED("DFLG" INS1+6, INSX+4
>> PSORXED("DOSE" INS+1
>> PSORXED("FLD" INS+2*, INS+4*, INS1+2*, INS1+3, INS1+5!, INS1+9*, INS1+12*, INSX+4!, INSX+5*, INSQ+3*
INSQ+5!, INSQ+8*, INSQ+9*
>> PSORXED("IND" INSQ+3*, INSQ+8*
>> PSORXED("INDF" INSQ+3*, INSQ+8*
>> PSORXED("INDO" INSQ+9*
>> PSORXED("INS" INS+10*, INS1+5*, INS1+6*, INS1+8*, INS1+9!, INS1+12*, INSX+4*
>> PSORXED("IRXN" INS+1, INS+2, INS+3, INS+4, INS+5, INS+6, INS+7, INS+10, INS1+1, INSX+2
INSQ+3, INSQ+8, INSQ+9
>> PSORXED("SIG" INS+10*, INS1+5*, INS1+6*!, INS1+9!, INS1+12*, RFN+29!
>> PSORXED("SINS" INS1+5*, INS1+6*, INS1+9!, INSX+2*, INSX+4*, INSX+5
>> PSOSIGFL INIT+3, RFN+34
>> PSOSITE EN+10, EN+11, EN+13
PSOX EN+7*, EN+10*, EN+12, EN+13, EN+15!
PSOX1 INIT+10!
PSOY EN+10*, EN+11, EN+12, EN+13, EN+15!
QUIT INS!, INS+1, UPMI+2*, UPMI+4*
>> REA TRY+23*
>> RF TRY+18*
>> RFCNT TRY+18*, TRY+19
>> RXDA TRY+11*, TRY+14, TRY+16
>> RXREF TRY+16*
>> SIG( INIT+9*
>> SIG(0 INIT+8
>> SIGOK INIT+3*, INIT+8*
STAT TRY+5*!
>> SUB TRY+17*
SUSD TRY+12*, TRY+16!
SUSDA TRY+11*, TRY+14, TRY+15, TRY+16!
UPMI INS!, INS+2!, INS+4!, INS1+2!, UPMI+3*
VALMBCK EN+1!, EN+4*, EN+5*, EN+8*, EN+9*
VALMSG EN+4!, EN+5!
X EN+13!, INS!, INS+8, INS1!, INS1+7, INS1+8*, INS1+10, INSQX+1!
Y EN+13!, INS!, INS1!, INSQX+1!, RFN+1*, UPMI+2
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