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 |  Marked Items |  All
Print Page as PDF
Routine: ORCDPS

Package: Order Entry Results Reporting

Routine: ORCDPS


Information

ORCDPS ;SLC/MKB-Pharmacy dialog utilities ;02:36 PM 2 Apr 2001

Source Information

Source file <ORCDPS.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Order Entry Results Reporting 3 ($$PTR,$$VAL,LIST)^ORCD  (CHANGED,OI2)^ORCDPS1  D1^ORCDPS2  
Inpatient Medications 1 (ENDD,ENRFA)^PSJORUTL  
Integrated Billing 1 $$RXST^IBARXEU  
Outpatient Pharmacy 1 ($$SC,SC)^PSOCP  
Pharmacy Data Management 1 START^PSSJORDF  
Registration 1 $$LOWER^VALM1  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Order Entry Results Reporting 5 ORCDPS2  ORWDPS3  ORWDXM2  ORWDXM4  ORWDXR  

Entry Points

Name Comments DBIA/ICR reference
PTR(X) ; -- Return ptr to prompt OR GTX X
CHANGED(TYPE) ; -- Kill dependent values when OI changes
NF(DRUG) ; -- Get alternatives for non-formulary drugs
; [Called from P-S Action for Dose]
DISPDRUG() ; -- Get Dispense Drug from dose selection(s) [from EXDOSE^ORCDPS2]
; Expects PROMPT, ORDIALOG(), ORDOSE()
ID() ; -- Return ID string for dose instance INST
RESETID ; -- Reset ORDIALOG(DOSE) nodes for new ORDRUG
; From EXDOSE^ORCDPS2: Expects PROMPT, DRUG
INSTR(OI) ; -- Get allowable instructions and routes
NF1
ASKSC() ; -- Return 1 or 0, if SC prompt should be asked
CHOICES(TYPE) ; -- Get list of allowable dispense drugs

External References

Name Field # of Occurrence
^DIR NF1+6
$$RXST^IBARXEU ASKSC+2
$$PTR^ORCD INSTR+6, INSTR+8, NF1+10
$$VAL^ORCD CHOICES+2
LIST^ORCD NF1+12
CHANGED^ORCDPS1 NF1+11
OI2^ORCDPS1 NF1+11
D1^ORCDPS2 NF1+11
ENDD^PSJORUTL CHOICES+3, CHOICES+4, CHOICES+5
ENRFA^PSJORUTL NF+5
$$SC^PSOCP ASKSC+1
SC^PSOCP ASKSC+1
START^PSSJORDF INSTR+3
$$LOWER^VALM1 INSTR+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CHOICES+7
Function Call: WRITE
  • Prompt: !!,"*** The dispense drug for this dose is not in the formulary! ***"
  • Line Location: NF+11
Function Call: WRITE
  • Prompt: !," Please consult with your pharmacy before ordering this dose."
  • Line Location: NF+13
Function Call: WRITE
  • Prompt: !," Formulary alternative orderable items:"
  • Line Location: NF1+5
Routine Call
  • DIR
  • Line Location:
    • NF1+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ORD(100.98 - [#100.98] INSTR+5
^ORD(101.41 - [#101.41] CHANGED+10, PTR+1
^ORD(101.43 - [#101.43] INSTR+3, CHOICES+2, NF+6, NF+10, NF1+8
^TMP("PSJINS" INSTR+2!, INSTR+9
^TMP("PSJMR" INSTR+2!
^TMP("PSJNOUN" INSTR+2!, INSTR+7
^TMP("PSJSCH" INSTR+4

Label References

Name Line Occurrences
$$PTR DISPDRUG+4, DISPDRUG+12, ID+2, RESETID+4

Naked Globals

Name Field # of Occurrence
^( INSTR+7
^($J INSTR+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT INSTR+1~, INSTR+6*, INSTR+7*, INSTR+8
DD NF+2~, NF+7*, NF+8, DISPDRUG+3~, DISPDRUG+4*, DISPDRUG+5*, DISPDRUG+6, DISPDRUG+9*, DISPDRUG+10*, DISPDRUG+11
, DISPDRUG+12*, DISPDRUG+13, DISPDRUG+17, DISPDRUG+18, DISPDRUG+20, DISPDRUG+21, DISPDRUG+22*, DISPDRUG+23*, DISPDRUG+24, ID+1~
, ID+2*, ID+3*, ID+4
DIR NF1+1~
DIR("?" NF1+4*
DIR("A" NF1+2*, NF1+3*, NF1+13*
DIR(0 NF1+1*
DONE NF1+12!
DOSE DISPDRUG+3~, DISPDRUG+7*, DISPDRUG+8, DISPDRUG+9, DISPDRUG+15*, DISPDRUG+17, DISPDRUG+18, DISPDRUG+19, ID+1~, ID+2*
, ID+3, ID+4, RESETID+3~, RESETID+7*, RESETID+8, RESETID+9, RESETID+11
DRUG NF~, NF+3, NF+5, RESETID+4
DTOUT NF+2~, NF1+6
DUOUT NF+2~, NF1+6
FORM DISPDRUG+3~, DISPDRUG+5*, DISPDRUG+9, RESETID+3~, RESETID+5*, RESETID+8
HALFOK DISPDRUG+3~, DISPDRUG+13*, DISPDRUG+20
I CHANGED+1~, CHANGED+11*, INSTR+1~, INSTR+6*, INSTR+7*, INSTR+9*, CHOICES+1~, CHOICES+6*, CHOICES+7*, CHOICES+8*
, CHOICES+12, NF+2~, NF+7*, NF+9*, NF+12, NF1, NF1+3*, DISPDRUG+3~, DISPDRUG+6*, DISPDRUG+7
, DISPDRUG+14*, DISPDRUG+15, DISPDRUG+18, DISPDRUG+19, DISPDRUG+20, DISPDRUG+23*, RESETID+3~, RESETID+6*, RESETID+7, RESETID+12
ID ID+1~, ID+2*, ID+4*, ID+5
>> INST NF1+13*, ID+2
INSTR INSTR+1~, INSTR+8*, INSTR+10, INSTR+11, ID+1~, ID+2*, ID+3
NAME CHANGED+1~, CHANGED+9*, CHANGED+10
NOUN INSTR+1~, INSTR+6*, INSTR+7, INSTR+8, RESETID+9~*, RESETID+10*, RESETID+11
OI INSTR~, INSTR+3, CHOICES+1~, CHOICES+2*
OK DISPDRUG+3~, DISPDRUG+13*, DISPDRUG+14, DISPDRUG+17*, DISPDRUG+21*
>> ORCAT NF+4, DISPDRUG+9, DISPDRUG+10, RESETID+3
>> ORDG INSTR+5
>> ORDIALOG( CHANGED+11!, CHANGED+12!, INSTR+7*, INSTR+8*, INSTR+10*, INSTR+11*, CHOICES+1, CHOICES+12*, CHOICES+13*, NF1+10*
, NF1+12, NF1+13, DISPDRUG+4, DISPDRUG+6, DISPDRUG+7, DISPDRUG+8, DISPDRUG+14, DISPDRUG+15, DISPDRUG+19, ID+2
, ID+3, RESETID+6, RESETID+7, RESETID+12*
>> ORDOSE("DD" DISPDRUG+12, DISPDRUG+13, DISPDRUG+17, ID+4, RESETID+7
>> ORDOSE(1 DISPDRUG+5, DISPDRUG+9, DISPDRUG+16, DISPDRUG+22, RESETID+9
>> ORDRUG ASKSC+1, RESETID+7, RESETID+11
>> ORENEW NF+3
ORESET NF1+12!
>> ORI NF1+13*
ORID DISPDRUG+3~, DISPDRUG+12*, DISPDRUG+19, RESETID+3~, RESETID+4*, RESETID+12
ORLEAD INSTR+2!, INSTR+10*, INSTR+11
ORNOUNS INSTR+2!, INSTR+6*, INSTR+7*, INSTR+11
>> OROI NF+6, NF+10, NF1+9
ORPSOI NF+2~, NF+6*, NF+8
ORQTY CHANGED+3!, CHANGED+4!, CHANGED+7!
>> ORQUIT NF1, NF1+6*
ORSCHED CHANGED+3!, CHANGED+4!, CHANGED+7!, INSTR+2!, INSTR+4*
>> ORVP ASKSC+1, ASKSC+2, CHOICES+4
ORX CHOICES+1~, CHOICES+3*, CHOICES+4, CHOICES+5, CHOICES+7*, CHOICES+8*, DISPDRUG+3~
ORX( DISPDRUG+17!, DISPDRUG+18*, DISPDRUG+20*, DISPDRUG+21!, DISPDRUG+23
ORX(0 DISPDRUG+22
ORY CHOICES+1~, CHOICES+4, CHOICES+5, CHOICES+6, CHOICES+13, NF+2~, NF+5, NF+7, NF+12, NF1
, NF1+1
ORY( CHOICES+6!, NF+7, NF+8
ORY("B" CHOICES+6*, CHOICES+8, NF+9*, NF1+3, NF1+8
ORY("PS" NF+8, NF+9*
P CHANGED+1~, CHANGED+9*
>> PROMPT CHOICES+1, CHOICES+12, CHOICES+13, NF1+12, NF1+13, DISPDRUG+6, DISPDRUG+7, DISPDRUG+8, DISPDRUG+14, DISPDRUG+15
, RESETID+6, RESETID+7
PROMPTS CHANGED+1~, CHANGED+2*, CHANGED+3*, CHANGED+4*, CHANGED+5*, CHANGED+6*, CHANGED+7*, CHANGED+8*, CHANGED+9
PSJOI CHOICES+1~, CHOICES+2*, CHOICES+4, CHOICES+5
PSOI INSTR+1~, INSTR+3*, NF+2~, NF+8*, NF+9, NF1+8*
PTR CHANGED+1~, CHANGED+10*, CHANGED+11, CHANGED+12
STR DISPDRUG+3~, DISPDRUG+13*, DISPDRUG+19, RESETID+3~, RESETID+4*, RESETID+8, RESETID+9, RESETID+11
TYPE CHANGED~, CHANGED+2, CHANGED+3, CHANGED+4, CHANGED+5, CHANGED+6, CHANGED+7, CHANGED+8, CHOICES~, CHOICES+4
, CHOICES+5, NF+2~, NF+4*, NF+5
U CHANGED+9, INSTR+3, INSTR+5, INSTR+7, INSTR+9, CHOICES+2, CHOICES+6, CHOICES+9, CHOICES+10, CHOICES+11
, CHOICES+12, NF+6, NF+8, NF+10, NF1+3, DISPDRUG+5, DISPDRUG+13, RESETID+4, RESETID+9
UD RESETID+9~*, RESETID+10, RESETID+11
UNT RESETID+3~, RESETID+4*, RESETID+5, RESETID+11
X INSTR+1~, INSTR+7*, INSTR+9*, INSTR+10, CHOICES+1~, CHOICES+6*, CHOICES+8*, CHOICES+9, CHOICES+10, CHOICES+11
, CHOICES+12, NF+2~, NF1+8*, NF1+9, NF1+10, DISPDRUG+3~, DISPDRUG+7*, DISPDRUG+8*, DISPDRUG+9, DISPDRUG+10
, DISPDRUG+17*, DISPDRUG+19*, DISPDRUG+20, DISPDRUG+23*, RESETID+3~, RESETID+7*, RESETID+8, RESETID+11*, RESETID+12, PTR~
, PTR+1
Y CHOICES+1~, CHOICES+9*, CHOICES+10*, CHOICES+11*, CHOICES+12, NF+2~, NF1+7, NF1+8

Marked Items

Name Field # of Occurrence
$T(ENDD^PSJORUTL CHOICES+3
$T(SC^PSOCP ASKSC+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All