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

Package: Outpatient Pharmacy

Routine: PSOORED3


Information

PSOORED3 ;BIR/SAB-edit finished orders through backdoor ;Apr 08, 2020@09:09:53

Source Information

Source file <PSOORED3.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Outpatient Pharmacy 9 (ASK,RTE,SCH)^PSOBKDED  ($$DCHK,DCHK1)^PSODOSUT  EN^PSOFSIG  $$SCHASL^PSOORED5  VER^PSOORED7  (CON,CON1,DUPD,DUR1,FNM,JFN,M1,NOU,STR,UPD,VER)^PSOOREDX  MW^PSOPRK  (QTY,SCH)^PSOSIG  
DAYSUP^PSOUTIL  
VA FileMan 3 NOW^%DTC  $$GET1^DIQ  ^DIR  

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

Package Total Caller Graph
Outpatient Pharmacy 8 PSOERXD2  PSOORED1  PSOORED2  PSOORED4  PSOORED5  PSOORED6  PSOORED7  PSOVER1  

Entry Points

Name Comments DBIA/ICR reference
DOSE ;adds dosing info
ASK
VER
DUPD ;
NOU1
NOU
RTE
SCH
DUR
CON
MW
UDSIG
EX ;
EX1
KV
EXQ
M1
DOLST1(PSORXED) ;
DOLST
UPDSIG ;updates sig
JUMP ;jump to fields
CNON ;
DUROK(DOSE,ENT) ; Duration OK? (Complex Doses only)

External References

Name Field # of Occurrence
NOW^%DTC UDSIG+3
$$GET1^DIQ DUROK+9
^DIR DUPD+4, DUR+5, JUMP+5
ASK^PSOBKDED ASK
RTE^PSOBKDED RTE+1
SCH^PSOBKDED SCH
$$DCHK^PSODOSUT CON+10
DCHK1^PSODOSUT CON+9
EN^PSOFSIG CON+20, EXQ
$$SCHASL^PSOORED5 SCH+2
VER^PSOORED7 CON+20
CON^PSOOREDX CON
CON1^PSOOREDX CON+4
DUPD^PSOOREDX DUPD+2
DUR1^PSOOREDX DUR+7
FNM^PSOOREDX JUMP+2
JFN^PSOOREDX JUMP+6
M1^PSOOREDX M1
NOU^PSOOREDX NOU
STR^PSOOREDX DUPD+7
UPD^PSOOREDX CON+4
VER^PSOOREDX VER
MW^PSOPRK MW+5
QTY^PSOSIG CON+25
SCH^PSOSIG SCH+2
DAYSUP^PSOUTIL CON+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Dispense Units Per Dose is Required!!",!
  • Line Location: DUPD+6
Function Call: WRITE
  • Prompt: " ("_SCHEX_")"
  • Line Location: SCH+3
Function Call: WRITE
  • Prompt: !,?10,"Invalid Entry - nothing to delete!!"
  • Line Location: CON+2
Function Call: WRITE
  • Prompt: !!,"Duration is required for the dosage entered prior to the THEN conjunction.",$C(7),!
  • Line Location: CON+8
Function Call: WRITE
  • Prompt: !,"Field Name Must Be At Least 3 Characters in Length",!
  • Line Location: JUMP+1
Function Call: WRITE
  • Prompt: !,"INVALID FIELD NAME. PLEASE TRY AGAIN!",!
  • Line Location: JUMP+3
Function Call: WRITE
  • Prompt: !,AR_". "_$P(FLDNM,"^",2)_": "_$S(NM="ROU"&($G(PSORXED($P(FLDNM,"^"),AR))):$P(^PS(51.2,PSORXED($P(FLDNM,"^"),AR),0),"^"),1:$G(PSORXED($P(FLDNM,"^"),AR)))
  • Line Location: JUMP+4
Routine Call
  • DIR
  • Line Location:
    • DUPD+4
    • DUR+5
    • JUMP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(51.1 - [#51.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(51.1 - [#51.1] DUROK+8
^PS(51.2 - [#51.2] JUMP+4
^PSDRUG - [#50] DUR+2
^PSRX - [#52] CON+18, CON+19, UDSIG+1*, UDSIG+2, UDSIG+3*, UDSIG+4*, UDSIG+5*, UDSIG+6*, UDSIG+7*, UDSIG+9*
UDSIG+10*, UDSIG+11*, UDSIG+12*, UDSIG+13*, DOLSTDOLST+6, DOLST+8, DOLST+9, UPDSIG+1!*, UPDSIG+2*
UPDSIG+3*

Label References

Name Line Occurrences
$$DUROK CON+7
@( JUMP+1, JUMP+3, JUMP+5, JUMP+6
ASK CON+9
CNON NOU1+1
CON DUR+2, CON+2, CON+4
DOLST PSOORED3+5
DUPD ASK+4, VER+2, DUPD+6
DUR CON+7
EX UDSIG+14, EXQJUMP+7
EX1 MW+8, MW+10
EXQ ASK+1, VER+1, DUPD+5, NOU+1, RTE+3, SCH+1, DUR+6, CON+1, CON+4, MW+1
JUMP ASKVERDUPD+4, NOURTE+2, SCHDUR+5, CON
KV DOSE+3, DURMW+3, JUMP+5
M1 CON+20, EXQ
MW CON+4, CON+9, CON+10
NOU1 DUPD+1
RTE NOU1NOU+2
SCH SCH+2

Naked Globals

Name Field # of Occurrence
^( DOLST
^(0 UDSIG+1*, UPDSIG+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % UDSIG+3, UDSIG+4
A UDSIG+2*, UDSIG+3*, UDSIG+4*, UDSIG+5, UDSIG+6, UDSIG+8!
>> AR JUMP+4*
>> AR1 JUMP+4*, JUMP+5
CKX CON+4~*, CON+20!
>> D CON+19*, UDSIG+1*, UPDSIG+2*
DENT CON+14*, CON+15, CON+16!
DIR CON+9!, KV!
DIR("A" DUR+3*, JUMP+5*
DIR("B" DUPD+3*!, DUR+4*!
DIR(0 DUR+3*, JUMP+5*
DIRUT ASK+1, CON+4, KV!, JUMP+5
DOOR DOSE+3!
DOSE EX+1!, EX1!, DUROK~
DOSE("CONJUNCTION" DUROK+5
DOSE("DD" CNON+4
DOSE("DURATION" DUROK+6
DOSE("LD" DUPD+1
DOSE("SCHEDULE" DUROK+7, DUROK+8
DOSEOR DOSE+3!, EX+1!, EX1!
>> DRET RTE*
DTOUT VER+1, DUPD+5, NOU+1, RTE+3, SCH+1, SCH+2, DUR+6, CON+1, CON+4, MW+6
, KV!
DUOUT VER+1, DUPD+5, NOU+1, RTE+3, SCH+1, SCH+2, DUR+6, CON+1, CON+4, MW+6
, KV!
DUPD DUPD+1!, EX+1!, EX1!
DUR DUR+4, EX1!
DURA EX+2!
DUZ UDSIG+3, UDSIG+4
ENT DOSE+3*, ASK+4, VER+2, VER+3, DUPD+1, DUPD+3, NOU1NOU1+3, NOU+2, NOU+5
RTESCH+3, SCH+5, DUR+4, CON+2, CON+3, CON+7, CON+9*, CON+14, MW+8
UDSIG+9, UDSIG+10, EX+1!, CNON+2, CNON+11, CNON+12, DUROK~, DUROK+5, DUROK+6, DUROK+7
, DUROK+8
ENTS EX1!
ERTE EX1!
EXP DUR!
FIELD DOSE+3!, VER*, DUPD+4*, NOU*, SCH*, DUR+5*, CON*, CON+17!, JUMP+1, JUMP+3
JUMP+5, JUMP+6
FLDNM JUMP+3!, JUMP+4, JUMP+6
I DOSE+1*, UDSIG+2*, UDSIG+6*, UDSIG+8!, UDSIG+10*, UDSIG+11, UDSIG+12, DOLST*, DOLST+1, DOLST+3
DOLST+4, DOLST+5, DOLST+6
>> INST DOLST*, DOLST+1, DOLST+2, DOLST+3, DOLST+4, DOLST+5
JUMP ASK!, RTE+1!, RTE+2!
NM JUMP+3!, JUMP+4
NOUN DOSE+2!, NOU1+3, NOU+2!, NOU+3*, NOU+4*, EX+1!, EX1!, CNON+1, CNON+10!
OLENT DOLST+5*, DOLST+7!
PRKMW MW+2~, MW+7
PSOCKCON CON+9*, CON+10!, CON+11!
PSODLBD4 CON+6~*
PSODOSE DOSE+2!*, EX+1!, EXQ
>> PSODRUG("DEA" MW+1
>> PSODRUG("IEN" DUR+2, CON+23, CNON+4
>> PSOEDDOS CON+11
PSOEXQ MW*, MW+1, MW+6*, EX1!
PSONDEF NOU1+2~, NOU+3, NOU+4
PSONLG CNON+3~, CNON+5*, CNON+6, CNON+7, CNON+11, CNON+12
PSONLL CNON+3~, CNON+4*, CNON+5, CNON+7, CNON+11, CNON+12
PSONLT CNON+3~, CNON+7*, CNON+8, CNON+11
>> PSOQUIT CON+10*
>> PSOREEDQ MW+10
PSORTE EX+1!
>> PSORX("DFLG" CON+9
PSORXED DOSE+2, CON+7, CON+11, CON+20, CON+23, CON+25, EXQ!*, DOLST1~
PSORXED( JUMP+4
PSORXED("CONJUNCTION" CON+2, CON+3*, CON+9, CON+16!, UDSIG+11, EX+2!, DOLST+5*
PSORXED("DAYS SUPPLY" , CON+21*
PSORXED("DFLG" CON+9, EXQ*
PSORXED("DOSE ORDERED" , DUPD+1!, DUPD+3, NOU1CON+15!, UDSIG+10, EX+1!, DOLST+1*, CNON+2, CNON+11
PSORXED("DOSE" DOSE+1, DUPD+1, CON+14, CON+15!, UDSIG+10, EX+1!, DOLST+1*, DOLST+7
PSORXED("DURATION" DUR+4, CON+16!, UDSIG+11, EX+2!, DOLST+3*
PSORXED("ENT" DOSE+1*, SCH+5*, MW+8*, DOLST+7!, JUMP+4
PSORXED("IND" DOLST+9*
PSORXED("INDF" DOLST+9*
PSORXED("INS" DOLST+8*
PSORXED("IRXN" CON+18, CON+19, UDSIG+1, UDSIG+2, UDSIG+3, UDSIG+4, UDSIG+5, UDSIG+6, UDSIG+7, UDSIG+9
UDSIG+10, UDSIG+11, UDSIG+12, UDSIG+13, DOLSTDOLST+6, DOLST+8, DOLST+9, UPDSIG+1, UPDSIG+2
UPDSIG+3
PSORXED("MAIL/WINDOW" MW+7*
PSORXED("NOUN" NOU1+3*, NOU+2!, NOU+5*, CON+15!, UDSIG+10, EX+1!, DOLST+1*, CNON+11*, CNON+12*
PSORXED("ODOSE" CON+15!, UDSIG+12, EX+2!, DOLST+6*
PSORXED("QTY" CON+25, CON+26*, UDSIG+3
PSORXED("ROUTE" RTECON+15!, UDSIG+11, EX+1!, DOLST+4*
PSORXED("RX0" CON+21, CON+25, MW+1
PSORXED("SCHEDULE" SCH+3*, CON+16!, UDSIG+11, EX+2!, DOLST+4*
PSORXED("SIG" CON+19*
PSORXED("UNITS" UDSIG+10, DOLST+1*
PSORXED("VERB" ASK+4*, VER+2!, VER+3*, CON+15!, UDSIG+11, EX+1!, DOLST+5*
PSOSAVX CON+6*, CON+11, CON+12!
PSOSCH SCH+4!, EX1!
PSOSIGFL CON+20, MW+8, EXQ!
>> PSOVER CON+20, MW+10
QTY CON+25!*, UDSIG+3!
QTYHLD CON+25!*, CON+26, MW+10!
QUIT ASK+2!, RTE+4!, CON+17*
ROU DOSE+2!, ASK*!, ASK+2!, RTE+1*!, RTE+4!, EX1!
RTE DOSE+2!, EX1!
SCH SCH+2*, SCH+3, SCH+4!, EX+1!, EX1!
SCHEX SCH+3, SCH+4!
SCHIEN DUROK+4~, DUROK+8*, DUROK+9
SIG UDSIG+8!, EX+1!
SIG( UDSIG+1, UPDSIG+2
SIG(0 UDSIG
>> SIGOK MW+8*
STRE DOSE+2!, EX1!
U VERDUPD+4, NOUSCHDUR+2, DUR+5, CONMW+1
UNITN DOSE+2!, EX1!
UNITS DOSE+3!
VERB DOSE+2!, ASK+4, VER+2!, VER+3*, EX+1!, EX1!
X DOSE+3!, VERVER+2, VER+3, DUPD+4, DUPD+6, NOUNOU+2, NOU+3, NOU+4
NOU+5, SCHSCH+4!, DUR+5, CONCON+2, CON+3, CON+4, CON+6, EX+2!
, EX1!, JUMP+1, JUMP+3!
Y DOSE+3!, SCH+2, SCH+4!, CON+3, CON+4, EX+2!, EX1!
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