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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSOORED5

Package: Outpatient Pharmacy

Routine: PSOORED5


Information

PSOORED5 ;BIR/SAB-Rxs without dosing info ;29-Mar-2006 07:57;A,A

Source Information

Source file <PSOORED5.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Outpatient Pharmacy 7 (ASK,SCH)^PSOBKDED  EN^PSOFSIG  SIG^PSOHELP  CNON^PSOORED3  UPD^PSOORED6  (CON,CON1,DUR1,FNM,JFN,NOU,STR,UPD,VER)^PSOOREDX  (QTY,SCH)^PSOSIG  
VA Fileman 3 NOW^%DTC  ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Outpatient Pharmacy 6 PSOBKDED  PSODIR  PSOORED1  PSOORED2  PSOORFI3  PSOORNE4  

Entry Points

Name Comments DBIA/ICR reference
RTE
LAN ;
VER
SCH
DOSE1(PSORXED) ;for new rxs
UPD ;updates dosing array
DOSE ;pre-poe rx
JUMP ;
DUPD ;
KV
EX
EX1
ASK
NOU
DUR
NOU1
CON

External References

Name Field # of Occurrence
NOW^%DTC CON+17
^DIC RTE+10
^DIR DUPD+5, RTE+6, DUR+2, JUMP+8
ASK^PSOBKDED ASK
SCH^PSOBKDED SCH
EN^PSOFSIG CON+7
SIG^PSOHELP CON+6
CNON^PSOORED3 NOU1
UPD^PSOORED6 UPD+1
CON^PSOOREDX CON
CON1^PSOOREDX CON+4
DUR1^PSOOREDX DUR+4
FNM^PSOOREDX JUMP+3
JFN^PSOOREDX JUMP+9
NOU^PSOOREDX NOU
STR^PSOOREDX DUPD+8
UPD^PSOOREDX CON+4
VER^PSOOREDX VER
QTY^PSOSIG CON+9
SCH^PSOSIG SCH+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Dispense Units Per Dose is Required!!",!
  • Line Location: DUPD+7
Function Call: WRITE
  • Prompt: !,"NOUN: "_$G(NOUN)
  • Line Location: NOU1+1
Function Call: WRITE
  • Prompt: !,"NOUN: "_PSORXED("NOUN",ENT)
  • Line Location: NOU1+2
Function Call: WRITE
  • Prompt: X_" "_$G(ERTE)
  • Line Location: RTE+9
Function Call: WRITE
  • Prompt: " "_$P(Y(0),"^",2)
  • Line Location: RTE+10
Function Call: WRITE
  • Prompt: " ("_SCHEX_")"
  • Line Location: SCH+2
Function Call: WRITE
  • Prompt: !,?10,"Invalid Entry - nothing to delete!!"
  • Line Location: CON+2
Function Call: WRITE
  • Prompt: $C(7),!!,"All Dosing Instructions must be entered before Jumping to other Fields!",!!
  • Line Location: JUMP+1
Function Call: WRITE
  • Prompt: !,"Field Name Must Be At Least 3 Characters in Length",!
  • Line Location: JUMP+2
Function Call: WRITE
  • Prompt: !,"INVALID FIELD NAME. PLEASE TRY AGAIN!",!
  • Line Location: JUMP+4
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+5
Routine Call
  • DIC
  • Line Location:
    • RTE+10
Routine Call
  • DIR
  • Line Location:
    • DUPD+5
    • RTE+6
    • DUR+2
    • JUMP+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.7 - [#50.7] RTE+1
^PS(51.2 - [#51.2] RTE+5, RTE+9, JUMP+5
^PS(55 - [#55] LAN+2
^PSDRUG - [#50] LAN+4, LAN+6, LAN+8, LAN+9
^PSRX - [#52] CON+13*, CON+14, CON+15*, CON+16*, CON+17*, CON+18*, CON+19*, CON+20*, CON+21*, CON+22*
, CON+23*, CON+24*, CON+25*

Label References

Name Line Occurrences
@( JUMP+1, JUMP+2, JUMP+4, JUMP+8, JUMP+9
ASK CON+5
CON CON+2, CON+4
DUPD ASK+4, ASK+5, VER+2, DUPD+7
EX ASK, VER+2, DUPD+6, NOU+1, SCH+1, DUR+3, CON+1, CON+4, CON+25, JUMP+10
EX1 EX+2
JUMP ASK+1, VER+1, DUPD+5, NOU, RTE+6, SCH, DUR+2, CON
KV DOSE+2, DUPD+2, RTE+4, DUR, JUMP+6
NOU1 DUPD+1
RTE NOU1, NOU1+1, NOU1+2, NOU+1, RTE+10
SCH RTE, RTE+8, RTE+9, SCH+1

Naked Globals

Name Field # of Occurrence
^(0 CON+13*, CON+16*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CON+17
A CON+14*, CON+17*, CON+18, CON+19, CON+20!
>> AR JUMP+5*
>> AR1 JUMP+5*, JUMP+8
>> COPY CON+4, CON+11, JUMP+7
>> D CON+13*
>> DIC RTE+10*
>> DIC("S" RTE+10*
>> DIC(0 RTE+10*
DIR CON+5!, KV!
DIR("?" RTE+4*
DIR("A" DUPD+2*, RTE+4*, DUR*, JUMP+7*, JUMP+8*
DIR("B" DUPD+4*!, RTE+5*!, DUR+1*!
DIR(0 DUPD+2*, RTE+4*, DUR*, JUMP+8*
DIRUT ASK, CON+4, KV!, JUMP+8
DOSE EX1!, LAN+8
DOSE( LAN+7
DOSE("LD" DUPD+1
DOSEOR DOSE+2!, EX1!
DRET RTE+1, RTE+2, RTE+5, RTE+8*, RTE+9!
DTOUT VER+2, DUPD+6, NOU+1, RTE+7, SCH+1, DUR+3, CON+1, EX, KV!
DUOUT VER+2, DUPD+6, NOU+1, RTE+7, SCH+1, DUR+3, CON+1, EX, KV!
DUPD DOSE+2!, DUPD+1!, DUPD+4, NOU1, EX1!
DUR DUR+1, EX1!
DURA EX1!
DUZ CON+17
ENT DOSE+2*, ASK+4, ASK+5, VER+2, VER+3, DUPD+1, DUPD+2, DUPD+3, DUPD+4, NOU1+1
, NOU1+2, NOU+1, NOU+4, RTE, RTE+1, RTE+2, RTE+5, RTE+8, RTE+9, RTE+11
, SCH+2, SCH+3, DUR+1, CON+2, CON+3, CON+5*, CON+7, CON+21, CON+22, EX1!
, LAN+7, LAN+9
ENTS EX1!
ERTE RTE+8!, RTE+9, RTE+11*, EX1!
EXP DUR!
FIELD DOSE+2!, VER+1*, DUPD+5*, NOU*, RTE+6*, SCH*, DUR+2*, CON*, JUMP+1, JUMP+2
, JUMP+4, JUMP+8, JUMP+9
FLDNM JUMP+4!, JUMP+5, JUMP+9
I CON+14*, CON+19*, CON+20!, CON+22*, CON+23, CON+24, LAN+8*, LAN+9, LAN+10!
>> II LAN+2, LAN+3, LAN+5, LAN+6
>> INS1 CON+6
JUMP ASK+1!
NM JUMP+4!, JUMP+5
NOUN NOU1+1, NOU+1!, NOU+2*, NOU+3*, EX1!
>> OLENT DOSE+2*
>> OR0 LAN+2
>> OTHDOS( LAN+3
>> PSODFN LAN+2
>> PSODIR("DFLG" RTE+7*
>> PSODRUG("IEN" LAN+1, LAN+4, LAN+6, LAN+8, LAN+9
>> PSODRUG("OI" RTE+1
>> PSOFROM CON+11, JUMP+7
PSONDEF NOU1~, NOU+2, NOU+3
>> PSONEW("DFLG" EX*
>> PSONEW("DOSE ORDERED" , LAN+2
>> PSONEW("DOSE" LAN+5, LAN+6
>> PSONEW("ODOSE" LAN+6*
>> PSOORRNW CON+8
>> PSOREEDT CON+8, CON+11, EX+2
PSORTE EX1!
>> PSORX("EDIT" ASK+5, NOU1+1, NOU1+2, RTE, EX+2
PSORXED DOSE1~, CON+7, CON+9, EX+2
PSORXED( JUMP+5
PSORXED("CONJUNCTION" CON+2, CON+3*, CON+5, CON+23, EX+3!
PSORXED("DOSE ORDERED" , DUPD+1!, DUPD+4, CON+22, EX+3!
PSORXED("DOSE" DUPD+1, DUPD+3*, CON+22, CON+24, EX+3!
PSORXED("DURATION" DUR+1, CON+23, EX+3!
PSORXED("ENT" SCH+3*, CON+7*, JUMP+5
PSORXED("INS" CON+6
PSORXED("IRXN" CON+13, CON+14, CON+15, CON+16, CON+17, CON+18, CON+19, CON+20, CON+21, CON+22
, CON+23, CON+24, CON+25
PSORXED("NOUN" DUPD+2, NOU1+1*, NOU1+2, NOU+1!, NOU+4*, CON+22, EX+3!
PSORXED("ODOSE" EX+3!, LAN+7*, LAN+9*
PSORXED("QTY" CON+9, CON+10*
PSORXED("ROUTE" RTE*, RTE+1*, RTE+2*, RTE+5, RTE+8*, RTE+9, RTE+11*, CON+23, EX+3!
PSORXED("SCHEDULE" SCH+2*, CON+23, EX+3!, JUMP+1
PSORXED("SIG" CON+6*
PSORXED("UNITS" CON+22
PSORXED("VERB" ASK+4*, ASK+5, VER+2!, VER+3*, CON+23, EX+3!
PSOSCH SCH+2!, EX1!
>> PSOSIGFL CON+4*, CON+12, EX+2
QI LAN+2!, LAN+4*, LAN+6
QII LAN+2!, LAN+4, LAN+6*, LAN+8!, LAN+9*, LAN+10!
>> QTY CON+9*
QTYHLD CON+9!*, CON+10, CON+11!
QUIT DOSE+1~, ASK+2!
ROU DOSE+2!, ASK*!, ASK+2!, EX1!
RTE RTE+3!, RTE+5, RTE+8!, RTE+9*, RTE+11*, EX1!
SCH SCH+1*, SCH+2!, EX1!
SCHEX SCH+2!
SIG CON+20!, EX+3!
SIG( CON+13
SIG(0 CON+7
>> SIGOK CON+7*
STRE DOSE+2!, EX1!
U VER+1, DUPD+5, NOU, RTE+6, RTE+10, SCH, DUR+2, CON
UNITN EX1!
UNITS DOSE+2!
VERB ASK+4, VER+2!, VER+3*, EX1!
X DOSE+2!, VER+1, VER+2, VER+3, DUPD+5, DUPD+7, NOU, NOU+1, NOU+2, NOU+3
, NOU+4, RTE+6, RTE+8, RTE+9, RTE+10, RTE+11, SCH, SCH+2!, DUR+2, CON
, CON+2, CON+3, CON+4, CON+6*, EX1!, JUMP+2, JUMP+4!
Y DOSE+2!, RTE+10, RTE+11, SCH+1, SCH+2!, CON+3, CON+4, EX1!, LAN+7
Y(0 RTE+10, RTE+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All