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 |  Local Variables  | All
Print Page as PDF
Routine: ORQPT1

Package: Order Entry Results Reporting

Routine: ORQPT1


Information

ORQPT1 ; SLC/MKB - Change Patient Selection List ;1/10/97 13:41 [6/5/01 12:36pm]

Source Information

Source file <ORQPT1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Order Entry Results Reporting 3 COMB^ORLP3USR  BUILD^ORQPT  ($$FDEFSRC,$$LISTSRC)^ORQPTQ11  
VA FileMan 3 ^%DT  (,IX)^DIC  ^DIR  
List Manager 1 FULL^VALM1  
Toolkit 1 (DEL,EN)^XPAR  

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

Package Total Caller Graph
Order Entry Results Reporting 11 ORQPT  ORQPT CHANGE LIST  ORQPT CLINIC LIST  ORQPT COMBINATION LIST  ORQPT PROVIDER LIST  ORQPT REMOVE PREFERENCE  ORQPT SAVE PREFERENCE  ORQPT SORT ORDER  
ORQPT SPECIALTY LIST  ORQPT TEAM LIST  ORQPT WARD LIST  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
CONTEXT() ; -- Returns current patient list context
WARD ; -- new ward list
CLINIC ; -- new clinic list
DATE(DEFLT,START) ; -- new start/stop date
D1
PROV ; -- new provider list
TEAM ; -- new team list
SPEC ; -- new treating specialty list
SORT ; -- new sort order
SAVE ; -- Save current list definition as default
OK() ; -- Current definition ok?
REMOVE ; Remove current default patient list view parameter setting(s).
; SLC/PKS - 5/2000.
OKR() ; -- Remove current definition?
COMBO ; New combination list.
; SLC/PKS - 5/2000.
REBUILD ; -- Ok to rebuild listing?

External References

Name Field # of Occurrence
^%DT D1+1
^DIC WARD+5, CLINIC+6, TEAM+5, SPEC+5
IX^DIC PROV+5
^DIR D1, SORT+12, OK+14, OKR+6
COMB^ORLP3USR COMBO+7
BUILD^ORQPT REBUILD+15
$$FDEFSRC^ORQPTQ11 REMOVE+21, REMOVE+25
$$LISTSRC^ORQPTQ11 WARD+3, CLINIC+3, PROV+3, TEAM+3, SPEC+3
FULL^VALM1 WARD+2, CLINIC+2, PROV+2, TEAM+2, SPEC+2, COMBO+4
DEL^XPAR REMOVE+18
EN^XPAR SAVE+9, SAVE+11, SAVE+14, SAVE+15, SAVE+16, SAVE+17, SAVE+18, SAVE+19, SAVE+20, SAVE+22
, SAVE+23, SAVE+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,DIR("?"),!
  • Line Location: D1+1
Function Call: WRITE
  • Prompt: !!,"Saving patient list definition ... "
  • Line Location: SAVE+2
Function Call: WRITE
  • Prompt: !,"ERROR"
  • Line Location: SAVE+5
Function Call: WRITE
  • Prompt: "done."
  • Line Location: SAVE+25
Function Call: WRITE
  • Prompt: !!,"Current List: "
  • Line Location: OK+1
Function Call: WRITE
  • Prompt: "Ward "_$P($G(^DIC(42,+PTR,0)),U)
  • Line Location: OK+3
Function Call: WRITE
  • Prompt: "Clinic "_$P($G(^SC(+PTR,0)),U)
  • Line Location: OK+4
Function Call: WRITE
  • Prompt: "Primary Provider "_$P($G(^VA(200,+PTR,0)),U)
  • Line Location: OK+5
Function Call: WRITE
  • Prompt: "Team "_$P($G(^OR(100.21,+PTR,0)),U)
  • Line Location: OK+6
Function Call: WRITE
  • Prompt: "Specialty "_$P($G(^DIC(45.7,+PTR,0)),U)
  • Line Location: OK+7
Function Call: WRITE
  • Prompt: "Combination"
  • Line Location: OK+9
Function Call: WRITE
  • Prompt: ", sorted by "_$S(SORT="P":"Appointment Date",SORT="R":"Room-Bed",1:"Name")
  • Line Location: OK+10
Function Call: WRITE
  • Prompt: !?14,"from "_BEG_" to "_END
  • Line Location: OK+11
Function Call: WRITE
  • Prompt: !
  • Line Location: OK+14
Function Call: WRITE
  • Prompt: !!,"Removing your personal patient list definition ... "
  • Line Location: REMOVE+16
Function Call: WRITE
  • Prompt: !,"(NOTE: Service/Section default of """_$P(ORQSRC,U,3)_""" not affected.)"
  • Line Location: REMOVE+22
Function Call: WRITE
  • Prompt: !,"(NOTE: Service/Section default of """_$P(ORQSRC,U,3)_""" not affected.)"
  • Line Location: REMOVE+29
Function Call: WRITE
  • Prompt: !
  • Line Location: OKR+5
Function Call: WRITE
  • Prompt: !!,">> A Clinic list cannot be sorted by room-bed assignment!"
  • Line Location: REBUILD+3
Function Call: WRITE
  • Prompt: !," Please select a new sorting order:",!
  • Line Location: REBUILD+4
Function Call: WRITE
  • Prompt: !!,">> A Combination list cannot be sorted by room-bed assignment!"
  • Line Location: REBUILD+8
Function Call: WRITE
  • Prompt: !," Please select a new sorting order:",!
  • Line Location: REBUILD+9
Function Call: WRITE
  • Prompt: !!,">> A "_$S($E(ORY)="W":"Ward",$E(ORY)="P":"Primary Provider",$E(ORY)="T":"Team",$E(ORY)="S":"Specialty",1:"")_" list cannot be sorted by clinic appointment date!"
  • Line Location: REBUILD+12
Function Call: WRITE
  • Prompt: !," Please select a new sorting order:",!
  • Line Location: REBUILD+13
Routine Call
  • DIC
  • Line Location:
    • WARD+5
    • CLINIC+6
    • TEAM+5
    • SPEC+5
Routine Call
  • DIC
  • Line Location:
    • PROV+5
Routine Call
  • DIR
  • Line Location:
    • D1
    • SORT+12
    • OK+14
    • OKR+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] OK+3
^DIC(45.7 - [#45.7] OK+7
^OR(100.21 - [#100.21] OK+6
^SC - [#44] OK+4
^TMP("OR" CONTEXT+1
^VA(200 - [#200] SAVE+7, OK+5

Label References

Name Line Occurrences
$$CONTEXT SAVE+3, OK+2
$$DATE CLINIC+7, CLINIC+8
$$OK SAVE+2
$$OKR REMOVE+15
D1 D1+1
REBUILD COMBO+11
SORT REBUILD+5, REBUILD+10, REBUILD+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DATE+1~, D1+1*
BEG CLINIC+1~, CLINIC+7*, CLINIC+10*, CLINIC+11, SAVE+1~, SAVE+21*, SAVE+22, OK+1~, OK+2*, OK+11
BEG1 CLINIC+1~, CLINIC+6*, CLINIC+7*, CLINIC+8, CLINIC+9, CLINIC+10
CPARAM SAVE+13~, SAVE+14*, SAVE+15*, SAVE+16*, SAVE+17*, SAVE+18*, SAVE+19*, SAVE+20*
>> D PROV+4*
DEFLT DATE~, DATE+3
DIC WARD+1~, WARD+5*, CLINIC+1~, CLINIC+4*, PROV+1~, PROV+4*, TEAM+1~, TEAM+4*, SPEC+1~, SPEC+4*
DIC("A" CLINIC+4*, PROV+4*, TEAM+4*
DIC("B" WARD+3*, CLINIC+3*, PROV+3*, TEAM+3*, SPEC+3*
DIC("S" WARD+4*, CLINIC+5*, SPEC+4*
DIC(0 WARD+5*, CLINIC+4*, PROV+4*, TEAM+4*, SPEC+4*
DIR DATE+1~, SORT+1~, OK+1~, OKR+1~
DIR("?" DATE+4*, D1+1, SORT+11*, OK+13*, OKR+4*
DIR("A" DATE+2*, SORT+4*, SORT+9*, OK+12*, OKR+3*
DIR("B" DATE+3*, SORT+5*, SORT+10*
DIR(0 DATE+2*, SORT+3*, SORT+8*, OK+12*, OKR+2*
>> DTOUT D1, SORT+12
DUZ WARD+3, CLINIC+3, PROV+3, TEAM+3, SPEC+3, SAVE+7, REMOVE+14, REMOVE+17
END CLINIC+1~, CLINIC+8*, CLINIC+10*, CLINIC+11, SAVE+1~, SAVE+21*, SAVE+23, OK+1~, OK+2*, OK+11
END1 CLINIC+1~, CLINIC+6*, CLINIC+8*, CLINIC+9, CLINIC+10
IFN SAVE+1~, SAVE+10*, SAVE+11, SAVE+14, SAVE+15, SAVE+16, SAVE+17, SAVE+18, SAVE+19, SAVE+20
LIST SAVE+1~, SAVE+3*, SAVE+10, SAVE+21, SAVE+24, OK+1~, OK+2*, OK+3, OK+4, OK+5
, OK+6, OK+7, OK+9, OK+11, OKR+1~
ORQDUZ REMOVE+10~, REMOVE+14*, REMOVE+21, REMOVE+25
ORQENT REMOVE+10~, REMOVE+17*, REMOVE+18
ORQERR REMOVE+10~, REMOVE+12!, REMOVE+18, REMOVE+19, REMOVE+24, REMOVE+26, REMOVE+27, REMOVE+31
ORQSRC REMOVE+10~, REMOVE+21*, REMOVE+22, REMOVE+25*, REMOVE+29
ORQUIT REBUILD+1~, REBUILD+2, REBUILD+5*, REBUILD+7, REBUILD+10*, REBUILD+11, REBUILD+14*
ORSRV SAVE+7~*
>> ORY WARD+5*, CLINIC+7, CLINIC+8, CLINIC+11*, PROV+5*, TEAM+5*, SPEC+5*, SORT+2, SORT+7, SORT+13*
, COMBO+10*, REBUILD+2, REBUILD+5, REBUILD+7, REBUILD+10, REBUILD+11, REBUILD+12, REBUILD+14, REBUILD+15
PARAM SAVE+1~, SAVE+5*, SAVE+11, SAVE+14, SAVE+15, SAVE+16, SAVE+17, SAVE+18, SAVE+19, SAVE+20
PTR OK+1~, OK+2*, OK+3, OK+4, OK+5, OK+6, OK+7, OKR+1~
SORT OK+1~, OK+2*, OK+10
START DATE~, DATE+2, DATE+4
U CONTEXT+1, WARD+3, CLINIC+3, CLINIC+7, CLINIC+8, D1+1, PROV+3, TEAM+3, SPEC+3, SAVE+7
, OK+3, OK+4, OK+5, OK+6, OK+7, REMOVE+22, REMOVE+27, REMOVE+29, REMOVE+31
>> VALMBCK WARD+2*, CLINIC+2*, PROV+2*, TEAM+2*, SPEC+2*, SAVE+1*, SAVE+25*, REMOVE+13*, REMOVE+32*, COMBO+4*
X WARD+1~, CLINIC+1~, CLINIC+10*, DATE+1~, D1*, D1+1*, D1+2, PROV+1~, TEAM+1~, SPEC+1~
, SORT+1~, SORT+2*, SORT+3, SORT+4, SORT+5, SAVE+1~, SAVE+3*, SAVE+5, SAVE+9, SAVE+11
, SAVE+12, OK+1~, OKR+1~
Y WARD+1~, WARD+5, CLINIC+1~, CLINIC+6, CLINIC+11, DATE+1~, D1+1, PROV+1~, PROV+5, TEAM+1~
, TEAM+5, SPEC+1~, SPEC+5, SORT+1~, SORT+2*, SORT+5, SORT+12*, SORT+13, OK+1~, OK+15
, OKR+1~, OKR+7
Z CLINIC+1~, CLINIC+7*, CLINIC+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All