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 Total: 11

Package Total Call Graph
Outpatient Pharmacy 8 (ASK,RTE,SCH)^PSOBKDED  EN^PSOFSIG  SIGS^PSOHCPRS  SIG^PSOHELP  CNON^PSOORED3  (CON,CON1,DUPD,DUR1,FNM,JFN,MP1,NOU,STR,UPD,VER)^PSOOREDX  2^PSOORNW1  (QTY,SCH)^PSOSIG  
VA Fileman 2 (,IX)^DIC  ^DIR  
Registration 1 FULL^VALM1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Outpatient Pharmacy 2 PSOORNE6  PSOORNEW  

Entry Points

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

External References

Name Field # of Occurrence
^DIC HLP+2, M
IX^DIC B
^DIR DUPD+4, DUR+2, JUMP+5, SCHLP+4, B+3
ASK^PSOBKDED ASK+6
RTE^PSOBKDED RTE
SCH^PSOBKDED SCH
EN^PSOFSIG CON+7, EXQ+1
SIGS^PSOHCPRS ASK+2
SIG^PSOHELP CON+6
CNON^PSOORED3 NOU1+1
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+9
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: !,"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
Routine Call
  • DIC
  • Line Location:
    • B

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+5
CON CON+2, CON+4
DUPD ASK+9, VER+2, DUPD+6
EX 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+7, EXQ+1
NOU1 DUPD+1
RTE NOU1, NOU+2
SCH SCH+2
VERI CON+7
X SCHLP+4, B+1, B+3

Naked Globals

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

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+7!
>> D B*
DIC HLP+2*!, B!*, B+1!, M!*
DIC("S" HLP+2*
DIC("W" B*
DIC(0 HLP+2*, B*, M*
DIR CON+5!, 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, DUR+3, CON+1, KV!, B+1, B+2!
, B+3, M!
DUOUT VER+1, DUPD+5, NOU+1, RTE+2, SCH+1, DUR+3, CON+1, 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+4, DUR+1, CON+2, CON+3, CON+4, CON+5*, CON+8, 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+6
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+8*
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+12
>> ORD ASK, ASK+2
>> PSJPP DICW+2
>> PSJW DICW+2
PSOBDR EX+1!, EXQ+2!
PSOBDRG EX+1!, EXQ+2!
PSODOSE DOSE+2!*, 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 EXQ+2*
>> PSODRUG("IEN" DOSE+1
PSONDEF NOU1+2~, NOU+3, NOU+4
PSORXED DOSE~, DOSE+2, CON+7, CON+9, EXQ+1!*
PSORXED( JUMP+4
PSORXED("CONJUNCTION" CON+2, CON+3*, CON+4, CON+5, 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+4*, CON+8*, JUMP+4
PSORXED("INS" CON+6
PSORXED("NOUN" NOU1+3*, NOU+2!, NOU+5*
PSORXED("QTY" CON+9, CON+10*, CON+12*
PSORXED("ROUTE" VERI+10
PSORXED("SCHEDULE" SCH+3*, VERI+11, X+1
PSORXED("SIG" CON+6*
PSORXED("VERB" ASK+9*, VER+2!, VER+3*
PSOSCH SCH+3!, EX+1!, X+1
PSOSIGFL CON+7, CON+8, EXQ+1!, VERI+3*, VERI+5*, VERI+8*, VERI+9*, VERI+10*, VERI+11*
>> QTY CON+9*
QTYHLD CON+9!*, CON+10, CON+11!
ROU DOSE+2!, ASK+6*!, RTE*!, EX+1!
RTE EX+1!
SCH SCH+2*, SCH+3!, EX+1!
SCHEX SCH+3!
SG ASK+4*, ASK+5!
>> SIG( ASK+3
>> SIG("" ASK+2
>> SIGOK CON+8*
STRE DOSE+2!, EX+1!
U VER, DUPD+4, NOU, SCH, DUR+2, CON
UNITN DOSE+2!, EX+1!
UNITS DOSE+3!
>> VALMSG DOSE+1*, CON+8*
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+3!, DUR+2, CON, CON+2, CON+3, CON+4, CON+6*, EX+1!
, JUMP+1, JUMP+3!, HLP+2*!, SCHLP+4!, B!*, B+1!, B+3!, M!*
Y DOSE+3!, SCH+2, SCH+3!, CON+3, CON+4, EX+1!, HLP+2!, SCHLP+4!, SCHLP+5, B!
, B+2, B+3!, M!, DICW+1
>> 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