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

Package: Outpatient Pharmacy

Routine: PSOORED2


Information

PSOORED2 ;ISC-BHAM/SAB - edit orders from backdoor con't ;Jan 20, 2022@11:19:32

Source Information

Source file <PSOORED2.m>

Call Graph

Call Graph

Call Graph Total: 25

Package Total Call Graph
Outpatient Pharmacy 16 (ECMESND,REVERSE)^PSOBPSU1  RXACT^PSOBPSU2  CLRSHD^PSOBPSU4  ($$RXSITE,$$STATUS,$$SUBMIT)^PSOBPSUT  EXPDT^PSOCLO1  (EDTDAW,SAVDAW)^PSODAWUT  NDC^PSODRG  EN^PSOFSIG  
($$GETNDC,SAVNDC)^PSONDCUT  ^PSOORED3  DOSE^PSOORED5  (PRK,UNPARK)^PSOPRK  $$PSOET^PSOREJP3  $$HDLG^PSOREJU1  $$FIND^PSOREJUT  (CID,CIDH)^PSOUTL  
VA FileMan 5 ^%DT  NOW^%DTC  ^DIE  ($$GET1,GETS)^DIQ  ^DIR  
E Claims Management Engine 2 $$DIVNCPDP^BPSBUTL  $$ECMEON^BPSUTIL  
Inpatient Medications 1 $$ISCLOZ^PSJCLOZ  
List Manager 1 PAUSE^VALM1  

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 PSOORED7  PSOOREDT  

Entry Points

Name Comments DBIA/ICR reference
ISDT
FLDT
KV
CHK
CHK1
REF ;shows refill info
SRF
RFM
RFX
RFE
CHANGED(RX,RFL,PRIOR) ; - Check if fields have changed and should for 3rd Party Claim resubmission
DAT
DIE
RFD ;check for deleted refill
EDTDOSE ;edit med instructions fields
UPD ;updates dosing array
UPD1
UPD2

External References

Name Field # of Occurrence
^%DT ISDT+2
NOW^%DTC RFX+19
$$DIVNCPDP^BPSBUTL CHANGED+8
$$ECMEON^BPSUTIL RFE+19
^DIE RFX+9, RFX+24, DIE
$$GET1^DIQ RFX+8, RFX+12
GETS^DIQ RFX+2, CHANGED+6
^DIR FLDT+4, REF+4, SRF+10
$$ISCLOZ^PSJCLOZ ISDT+7
ECMESND^PSOBPSU1 RFE+24
REVERSE^PSOBPSU1 RFX+22, RFE+20
RXACT^PSOBPSU2 RFE+13
CLRSHD^PSOBPSU4 RFX+12
$$RXSITE^PSOBPSUT RFE+19
$$STATUS^PSOBPSUT RFX+4, RFE+2, RFE+23
$$SUBMIT^PSOBPSUT RFE+21
EXPDT^PSOCLO1 ISDT+7
EDTDAW^PSODAWUT RFE+3
SAVDAW^PSODAWUT RFE+5
NDC^PSODRG RFE+11
EN^PSOFSIG UPD1+17, UPD2+18
$$GETNDC^PSONDCUT RFE+10, RFE+12, RFE+13, RFE+24
SAVNDC^PSONDCUT RFE+14
^PSOORED3 EDTDOSE+3
DOSE^PSOORED5 EDTDOSE+2
PRK^PSOPRK RFX+30
UNPARK^PSOPRK RFX+29
$$PSOET^PSOREJP3 RFE+26
$$HDLG^PSOREJU1 RFE+28
$$FIND^PSOREJUT RFE+28
CID^PSOUTL ISDT+2
CIDH^PSOUTL ISDT+4
PAUSE^VALM1 ISDT, FLDT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Released by CMOP. No editing allowed on Issue Date."
  • Line Location: ISDT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: ISDT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ISDT+4
Function Call: WRITE
  • Prompt: !,"Released by CMOP. No editing allowed on Fill Date."
  • Line Location: FLDT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: REF+3
Function Call: WRITE
  • Prompt: !!,"# Log Date Refill Date Qty Routing Lot # Pharmacist",!
  • Line Location: SRF+0
Function Call: WRITE
  • Prompt: "="
  • Line Location: SRF+0
Function Call: WRITE
  • Prompt: !,"Division: "_PSDIV_$E(" ",$L(PSDIV)+1,8)_" "
  • Line Location: SRF+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SRF+10
Function Call: WRITE
  • Prompt: !,$C(7),"Invalid selection.",!
  • Line Location: RFM+0
Routine Call
  • DIE
  • Line Location:
    • RFX+9
    • RFX+24
    • DIE
Routine Call
  • DIR
  • Line Location:
    • FLDT+4
    • REF+4
    • SRF+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
52.1 GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" ISDT+2, FLDT+1
^PS(52.5 - [#52.5] CHK1+1
^PS(59 - [#59] SRF+5
^PSRX - [#52] ISDT+2, FLDT+1, CHK+1, CHK1, CHK1+3, REF+1, SRF+1, RFM, RFM+1, RFM+2
, RFX+3, RFX+14, RFX+17, RFX+18*, RFX+20*, RFX+23, RFX+25, RFE, EDTDOSE+2
^PSRX("AR" CHK, CHK+1, RFM+1
^VA(200 - [#200] SRF+4

Label References

Name Line Occurrences
$$CHANGED RFE+17
CHK ISDT, FLDT
DAT SRF+2
ISDT ISDT+4, ISDT+5
KV ISDT+9, FLDT+1, FLDT+5, REF+3, REF+4, SRF+10
RFD RFX+22
RFE RFX+4
RFM SRF+9
RFX RFM+1
SRF RFM
UPD1 UPD1+1, UPD2+1

Naked Globals

Name Field # of Occurrence
^( SRF+1
^(0 CHK1+1, CHK1+3, SRF+4, SRF+5, RFM+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % RFX+19
%DT ISDT+2*!, ISDT+9!
%DT("A" ISDT+2*
%DT("B" ISDT+2*
%DT(0 ISDT+2*
CHANGED RFX~, RFE+17*, RFE+18, RFE+19, RFE+23, RFE+24, CHANGED+5~, CHANGED+6*, CHANGED+7*, CHANGED+8*
, CHANGED+9
CHGNDC RFX~, RFE+13*, RFE+24
>> CLOZPAT ISDT+7
CMRL ISDT!, FLDT!, CHK*, CHK+1*, CHK1, CHK1+1*, CHK1+2*, CHK1+3*, RFM+1*, RFM+2*
, RFX+1, RFX+22!, RFX+24, RFE+29!
DA ISDT+2, FLDT+1, REF+3!, RFX+1*, RFX+2, RFX+3, RFX+5, RFX+15~, RFX+16*, RFX+17
, RFX+18, RFX+20, RFX+22, RFX+28, RFX+29!*, RFX+30!*, RFE+29!
DA(1 SRF+9*, RFX+1, RFX+2, RFX+3
>> DAT SRF+2, SRF+3, DAT*
DAW RFX~, RFE+3, RFE+4*, RFE+5
>> DI RFX+22
DIE RFX+1*, RFX+28, RFX+29*, RFX+30*, RFE+29!, DIE*, DIE+1!
DIR KV!
DIR("?" FLDT+3*, FLDT+4*
DIR("A" FLDT+1*, REF+3*, SRF+10*
DIR("B" FLDT+1*, REF+3*
DIR(0 FLDT+2*, REF+3*, SRF+10*
DIRUT FLDT+5, KV!, SRF+10
DR REF+3!, RFX+1*, RFX+21!, RFX+24*, RFE+29!, DIE+1!
DTOUT ISDT+2!, KV!
>> DTT SRF+2*, DAT*
DUOUT ISDT+2!, KV!
DUZ RFX+20
>> ENT UPD+1
FDA RFX+15~, RFX+17*
FEV CHK1+3*, RFM+2*, RFX+21!
>> FLD RFX+28, RFX+29*, RFX+30*
FLDPRE RFX~, RFX+8*, RFX+12
FLDS RFX~, RFE+17
HENT UPD+1*, UPD1, UPD1+1, UPD1+2, UPD1+3, UPD1+4, UPD1+5, UPD1+6, UPD1+7, UPD1+8
, UPD1+9, UPD1+10, UPD1+11, UPD1+12, UPD1+13*, UPD1+14, UPD1+15, UPD1+16, UPD1+17!, UPD2
, UPD2+1, UPD2+2, UPD2+3, UPD2+4, UPD2+5, UPD2+6, UPD2+7, UPD2+8, UPD2+9, UPD2+10
, UPD2+11, UPD2+12, UPD2+13*, UPD2+14, UPD2+15, UPD2+16, UPD2+18!
I SRF*, CHANGED+7*, RFD+1~*, RFD+2*, RFD+6, UPD2+17*
IR RFX+15~, RFX+17*, RFX+18*, RFX+20
J RFD+1~, RFD+3*
K RFD+1~*, RFD+2, RFD+4*, RFD+6
>> LOG SRF+2*, SRF+3
>> N REF+1*, SRF+1*, SRF+3
NDC RFX~, RFE+10*, RFE+11, RFE+12, RFE+13, RFE+14
NOW RFX+15~, RFX+19*, RFX+20
>> P1 SRF+1*, SRF+2, SRF+3, SRF+4, SRF+5, SRF+6, SRF+7, SRF+8
>> PREVMWP RFX+23*, RFX+26, RFX+27
PRIOR CHANGED~
PRIOR( CHANGED+7, CHANGED+8
>> PRKMW RFX+25*, RFX+26, RFX+27
>> PSDA RFX+29*
>> PSDIV SRF+5*
>> PSODRUG("IEN" ISDT+7
PSOEDDOS EDTDOSE+1*, EDTDOSE+4!
>> PSOFRPK RFX+27*, RFX+28, RFX+29
PSORFILL RFX+5~*, RFX+8, RFX+12, RFX+14, RFX+20, RFX+23, RFX+25
PSORFKILL RFX~
>> PSORX("PSOL" RFX+22, RFD+1, RFD+6*!
>> PSORXED ISDT+7, UPD1+17, UPD2+18
>> PSORXED("CONJUNCTION" UPD1!, UPD1+1*, UPD1+2!, UPD1+9*, UPD1+14, UPD1+15!, UPD2!, UPD2+1*, UPD2+2!, UPD2+9*
, UPD2+14
>> PSORXED("DFLG" DIE*
>> PSORXED("DOSE ORDERED" , UPD1+5*, UPD1+15!, UPD2+4*, UPD2+15!
>> PSORXED("DOSE" UPD1, UPD1+3, UPD1+4*, UPD1+15!, UPD2, UPD2+2, UPD2+3*, UPD2+15!, UPD2+17
>> PSORXED("DURATION" UPD1+8*, UPD1+15!, UPD2+8*, UPD2+15!
>> PSORXED("ENT" UPD1+17*, UPD2+18*
>> PSORXED("FLD" ISDT+5*, FLDT+5!, FLDT+6*
>> PSORXED("IRXN" CHK, CHK+1, CHK1, CHK1+1, CHK1+3, REF+1, SRF+1, SRF+9, RFM, RFM+1
, RFM+2, RFX+4, RFX+8, RFX+12, RFX+14, RFX+16, RFX+22, RFX+23, RFX+25, RFX+29
, RFX+30, RFE, RFE+2, RFE+3, RFE+5, RFE+10, RFE+11, RFE+12, RFE+13, RFE+14
, RFE+17, RFE+19, RFE+20, RFE+21, RFE+22, RFD+2, RFD+4, EDTDOSE+2
>> PSORXED("NOUN" UPD1+7*, UPD1+15!, UPD2+6*, UPD2+15!
>> PSORXED("ODOSE" UPD1+12*, UPD1+16!, UPD2+12*, UPD2+16!
>> PSORXED("ROUTE" UPD1+10*, UPD1+15!, UPD2+10*, UPD2+15!
>> PSORXED("RX1" RFX+3*
>> PSORXED("RX2" FLDT+2, CHK
>> PSORXED("SCHEDULE" UPD1+11*, UPD1+15!, UPD2+11*, UPD2+15!
>> PSORXED("UNITS" UPD1+6*, UPD1+15!, UPD2+5*, UPD2+15!
>> PSORXED("VERB" UPD1+16!, UPD2+7*, UPD2+15!
>> PSOSFN RFX+14
>> PSOTOPK RFX+26*, RFX+28, RFX+30
PSOX2 RFD+1~, RFD+2*, RFD+3
PSOX3 RFD+1~, RFD+3*, RFD+4, RFD+5
PSOX9 RFD+1~, RFD+2*, RFD+5*, RFD+6
>> PSOZ1("PSOL" RFD+1*, RFD+2, RFD+7!
QUIT RFX~, RFX+4*, RFX+10*, RFX+24*, RFE+2, RFE+9
RF ISDT!, FLDT!, CHK+1*
RFED RFX+3*, RFX+22!
RFL RFX~, RFX+3*, RFX+4, RFX+22, RFE, RFE+2, RFE+3, RFE+5, RFE+10, RFE+11
, RFE+12, RFE+13, RFE+14, RFE+17, RFE+19, RFE+20, RFE+21, RFE+23, RFE+24, RFE+26
, RFE+28, CHANGED~, CHANGED+6, CHANGED+7, CHANGED+8
RFM REF+1*, SRF+9, SRF+10, RFX+21!
RFN REF+1*, REF+3, SRF+9, RFX+21!
>> RN SRF+2*, SRF+3
>> RTS SRF+7*, SRF+8
RX RFE+22~*, RFE+23, RFE+24, RFE+26, RFE+28, CHANGED~, CHANGED+6, CHANGED+7, CHANGED+8
>> RX0 ISDT+2, FLDT+2
SAVDA RFX+28!*, RFX+29, RFX+30
>> SAVDIE RFX+28*, RFX+29, RFX+30
SAVED CHANGED+5~
SAVED( CHANGED+7, CHANGED+8
>> SAVFLD RFX+28*, RFX+29, RFX+30
SENT UPD1+17!, UPD2+17*, UPD2+18!
>> ST RFX+4
>> SURX CHK1+1*
X ISDT+2!, ISDT+9!, FLDT+5!, FLDT+7!, RFX+21!, RFE+26*, RFE+28*, DIE+1!
Y ISDT+2*!, ISDT+4, ISDT+5, ISDT+9!, FLDT+1*, FLDT+5!, FLDT+6, FLDT+7!, REF+4, SRF+9*
, RFM, RFM+1, RFM+2, RFX+1, RFX+10, RFX+21!, RFX+24, RFX+29!, RFX+30!, DIE
, DIE+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