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

Package: Outpatient Pharmacy

Routine: PSOORED4


Information

PSOORED4 ;BIR/SAB - Edit front door dosing ;07/13/00

Source Information

Source file <PSOORED4.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Outpatient Pharmacy 10 (ASK,RTE,SCH)^PSOBKDED  DCHK1^PSODOSUT  EN^PSOFSIG  SIGS^PSOHCPRS  SIG^PSOHELP  ($$DUROK,CNON)^PSOORED3  $$SCHASL^PSOORED5  (CON,CON1,DUPD,DUR1,FNM,JFN,MP1,NOU,STR,UPD,VER)^PSOOREDX  
2^PSOORNW1  (QTY,SCH)^PSOSIG  
VA FileMan 3 ^DIC  MIX^DIC1  ^DIR  
List Manager 1 FULL^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 PSOORNE6  PSOORNEW  

Entry Points

Name Comments DBIA/ICR reference
DOSE(PSORXED) ;
ASK
VER
DUPD ;
NOU1
NOU
RTE
SCH
DUR
CON
EX ;
KV
EXQ ;
MP1
VERI ;checks for changes to dosing instructions
JUMP ;jump to fields
HLP ;help text for med route
SCHLP ;
A ;display 51.1 entries only
B
M
X
DICW ;

External References

Name Field # of Occurrence
^DIC HLP+2, M
MIX^DIC1 B
^DIR DUPD+4, DUR+2, JUMP+5, SCHLP+4, B+3
ASK^PSOBKDED ASK+6
RTE^PSOBKDED RTE
SCH^PSOBKDED SCH
DCHK1^PSODOSUT CON+10, CON+11
EN^PSOFSIG CON+16, CON+18, EXQ+1
SIGS^PSOHCPRS ASK+2
SIG^PSOHELP CON+15
$$DUROK^PSOORED3 CON+8
CNON^PSOORED3 NOU1+1
$$SCHASL^PSOORED5 SCH+2
CON^PSOOREDX CON
CON1^PSOOREDX CON+4
DUPD^PSOOREDX DUPD+2
DUR1^PSOOREDX DUR+4
FNM^PSOOREDX JUMP+2
JFN^PSOOREDX JUMP+6
MP1^PSOOREDX MP1
NOU^PSOOREDX NOU
STR^PSOOREDX DUPD+7
UPD^PSOOREDX CON+4
VER^PSOOREDX VER
2^PSOORNW1 DOSE+1
QTY^PSOSIG CON+21
SCH^PSOSIG SCH+2
FULL^VALM1 HLP+1, SCHLP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Possible SIG: "
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !?14
  • Condition for execution: $X+$L($P(MIG," ",SG)_" ")>IOM
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: $P(MIG," ",SG)_" "
  • Line Location: ASK+4
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+9
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
Function Call: WRITE
  • Prompt: !,"Please enter how patient will use the medication!"
  • Line Location: HLP+1
Function Call: WRITE
  • Prompt: !,"You can choose an entry from the Administration Schedule File (#51.1),",!,"Medication Instruction File (#51) or enter free text."
  • Line Location: SCHLP+1
Function Call: WRITE
  • Prompt: !,"The free text entry cannot contain more than 2 spaces or be greater than 20",!,"characters in length."
  • Line Location: SCHLP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SCHLP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: B+0
Function Call: WRITE
  • Prompt: " ",$P(^(0),"^",Z+2)
  • Line Location: DICW+2
Routine Call
  • DIC
  • Line Location:
    • HLP+2
    • M
Routine Call
  • DIR
  • Line Location:
    • DUPD+4
    • DUR+2
    • JUMP+5
    • SCHLP+4
    • B+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(51.1 - [#51.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(51.1 - [#51.1] DICW+1
^PS(51.2 - [#51.2] JUMP+4
^PS(52.41 - [#52.41] ASK+2

Label References

Name Line Occurrences
@( JUMP+1, JUMP+3, JUMP+5, JUMP+6, SCHLP+5
ASK CON+10
CON CON+2, CON+4
DUPD ASK+9, VER+2, DUPD+6
DUR CON+8
EX CON+10, CON+11, EXQ+3, JUMP+7
EXQ ASK+7, VER+1, DUPD+5, NOU+1, RTE+2, SCH+1, DUR+3, CON+1, CON+4
JUMP ASK+6, VER, DUPD+4, NOU, RTE+1, SCH, DUR+2, CON
KV DOSE+3, DUR, JUMP+5
MP1 CON+16, EXQ+1
NOU1 DUPD+1
RTE NOU1, NOU+2
SCH SCH+2
VERI CON+16
X SCHLP+4, B+1, B+3

Naked Globals

Name Field # of Occurrence
^( DICW+2
^(0 DICW+2, DICW+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AR EX+1!, JUMP+4*
>> AR1 JUMP+4*, JUMP+5
CKX CON+4~*, CON+16!
>> D B*
DIC HLP+2*!, B!*, B+1!, M!*
DIC("S" HLP+2*
DIC("W" B*
DIC(0 HLP+2*, B*, M*
DIR CON+10!, KV!, B+2!, B+3!
DIR("?" X*
DIR("A" DUR*, JUMP+5*, SCHLP+4*, B+2*, X*
DIR("B" DUPD+3*!, DUR+1*!, SCHLP+3*, B+2*, X+1*!
DIR(0 DUR*, JUMP+5*, SCHLP+3*, B+2*, X*
DIRUT ASK+7, CON+4, KV!, JUMP+5, SCHLP+4
>> DOSE("LD" DUPD+1
DOSEOR DOSE+3!, EX+1!
DTOUT VER+1, DUPD+5, NOU+1, RTE+2, SCH+1, SCH+2, DUR+3, CON+1, CON+11, KV!
, B+1, B+2!, B+3, M!
DUOUT VER+1, DUPD+5, NOU+1, RTE+2, SCH+1, SCH+2, DUR+3, CON+1, CON+11, KV!
, B+2!, M!
DUPD DOSE+3!, DUPD+1!, EX+1!
DUR EX+1!
DURATION VERI+7*, VERI+8, VERI+12!
ENT DOSE+3*, ASK+6, ASK+9, VER+2, VER+3, DUPD+1, DUPD+3, NOU1, NOU1+3, NOU+2
, NOU+5, SCH+3, SCH+5, DUR+1, CON+2, CON+3, CON+4, CON+8, CON+10*, CON+20
, EX+1!, X+1
ENTS EX+1!, VERI+1*, VERI+2*, VERI+3
ERTE EX+1!
EXP DUR!
FIELD DOSE+3!, VER*, DUPD+4*, NOU*, SCH*, DUR+2*, CON*, EX+1!, JUMP+1, JUMP+3
, JUMP+5, JUMP+6
FLDNM EX+1!, JUMP+3!, JUMP+4, JUMP+6
>> I VERI+2*, VERI+4*, VERI+5, VERI+6, VERI+7, VERI+8, VERI+9, VERI+10, VERI+11
II ASK+6*!
>> INS1 CON+15
INST ASK+3*, ASK+5!
IOM ASK+4
JUMP ASK+6!, RTE!, RTE+1!
LBL SCHLP+5*, B+1!, M!
MIG ASK+3*, ASK+4, ASK+5!
>> NCPDPFLG CON+20*
NM EX+1!, JUMP+3!, JUMP+4
NOUN NOU1+3, NOU+2!, NOU+3*, NOU+4*, EX+1!
OLENT DOSE+3*, EX+1!, VERI+3, VERI+4
>> OR0 CON+18, CON+24
>> ORD ASK, ASK+2
>> PSJPP DICW+2
>> PSJW DICW+2
PSOBDR CON+19!, EX+1!, EXQ+2!
PSOBDRG CON+19!, EX+1!, EXQ+2!
PSOCKCON CON+10*, CON+11!, CON+12!
PSODLBD4 CON+6~*
PSODOSE DOSE+2!*, CON+18, EX+1!, EXQ+1
PSODOSE("CONJUNCTION" VERI+9
PSODOSE("DOSE" VERI+5
PSODOSE("DURATION" VERI+6, VERI+7
PSODOSE("ROUTE" VERI+10
PSODOSE("SCHEDULE" VERI+11
PSODRUG CON+19!*, EXQ+2*
PSODRUG("IEN" DOSE+1
PSOEDDOS CON+12!
PSONDEF NOU1+2~, NOU+3, NOU+4
>> PSONEW("DFLG" CON+10, CON+11*
>> PSORX("DFLG" CON+11*
PSORXED DOSE~, DOSE+2, CON+8, CON+12, CON+16, CON+18!*, CON+21, EXQ+1!*
PSORXED( JUMP+4
PSORXED("CONJUNCTION" CON+2, CON+3*, CON+4, CON+10, VERI+9
PSORXED("DOSE ORDERED" , DUPD+1!, DUPD+3, NOU1
PSORXED("DOSE" DUPD+1, VERI+2, VERI+5
PSORXED("DURATION" DUR+1, VERI+8
PSORXED("ENT" DOSE+3, SCH+5*, CON+20*, JUMP+4
PSORXED("INS" CON+15
PSORXED("NOUN" NOU1+3*, NOU+2!, NOU+5*
PSORXED("QTY" CON+21, CON+22*, CON+24*
PSORXED("ROUTE" VERI+10
PSORXED("SCHEDULE" SCH+3*, VERI+11, X+1
PSORXED("SIG" CON+15*
PSORXED("VERB" ASK+9*, VER+2!, VER+3*
PSOSAVX CON+6*, CON+12, CON+13!
PSOSCH SCH+4!, EX+1!, X+1
PSOSIGFL CON+16, CON+17, CON+18!, EXQ+1!, VERI+3*, VERI+5*, VERI+8*, VERI+9*, VERI+10*, VERI+11*
>> QTY CON+21*
QTYHLD CON+21!*, CON+22, CON+23!
ROU DOSE+2!, ASK+6*!, RTE*!, EX+1!
RTE EX+1!
SCH SCH+2*, SCH+3, SCH+4!, EX+1!
SCHEX SCH+3, SCH+4!
SG ASK+4*, ASK+5!
>> SIG( ASK+3
>> SIG("" ASK+2
>> SIGOK CON+20*
STRE DOSE+2!, EX+1!
U VER, DUPD+4, NOU, SCH, DUR+2, CON, DICW+4
UNITN DOSE+2!, EX+1!
UNITS DOSE+3!
>> VALMSG DOSE+1*, CON+18*, CON+20*
VERB ASK+9, VER+2!, VER+3*, EX+1!
X DOSE+3!, VER, VER+2, VER+3, DUPD+4, DUPD+6, NOU, NOU+2, NOU+3, NOU+4
, NOU+5, SCH, SCH+4!, DUR+2, CON, CON+2, CON+3, CON+4, CON+6, CON+15*
, EX+1!, JUMP+1, JUMP+3!, HLP+2*!, SCHLP+4!, B!*, B+1!, B+3!, M!*
Y DOSE+3!, SCH+2, SCH+4!, CON+3, CON+4, EX+1!, HLP+2!, SCHLP+4!, SCHLP+5, B!
, B+2, B+3!, M!, DICW+1, DICW+4
>> Z DICW+1*, DICW+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