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

Package: Order Entry Results Reporting

Routine: ORQPT


Information

ORQPT ; SLC/MKB - Patient Selection ; 4/18/07 7:20am

Source Information

Source file <ORQPT.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Order Entry Results Reporting 5 $$CONTEXT^ORQPT1  TEAMPTS^ORQPTQ1  (CLINPTS,PROVPTS,SPECPTS,WARDPTS)^ORQPTQ2  COMBPTS^ORQPTQ6  SDA^ORQRY01  
List Manager 3 (CHGCAP,EN)^VALM  FULL^VALM1  (CLEAN,CNTRL)^VALM10  
VA FileMan 3 ^%DT  ^DIC  ^DIR  
Kernel 2 ($$DOW,$$FMTE)^XLFDT  ($$LJ,$$UP)^XLFSTR  
Registration 2 ($$DOB,$$SSN)^DPTLK1  (ELIG,OERR)^VADPT  
Toolkit 1 $$GET^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: 17

Package Total Caller Graph
Order Entry Results Reporting 13 OR ADD MENU CLINICIAN  OR ADD MENU NURSE  OR ADD MENU WARD CLERK  OR ADD ORDERS  OR PATIENT SELECTION  ORCACT3  ORCB  ORCHART  
ORCXPND  ORQPT FIND PATIENT  ORQPT PATIENT SELECTION  ORQPT SELECT PATIENT  ORQPT1  
Consult Request Tracking 2 GMRCACT ADD NEW ORDERS  GMRCACT ADD PHARMACY CONSULT REQUEST  
Kernel 2 ^DIC(19  ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for OR PATIENT SELECTION
HDR ; -- header code
INIT ; -- init variables and list array
; Modifications for multiple "Combination" lists by PKS.
DEFAULT() ; -- Returns default action
MSG() ; -- Lmgr msg bar
HELP ; -- help code
EXIT ; -- exit code
BUILD(LIST) ; -- build list in ^TMP("OR",$J,"PATIENTS")
B1
B2
BQ
ID(DFN) ; -- Returns short ID for patient ID
APPT(DFN,CLINIC,FROM,TO) ; -- Return [next?] clinic appointment
; returns date/time next appt or "", returns "^error message" on error
ALT ; -- XQORM("ALT") code to search File 2 for patient X
FIND ; -- find patient in ^DPT
SELECT ; -- select patient from list
SLCT1 ; -- may enter here with DFN from FIND
SLCT2 ; -- convert patient's orders, if not already done
OK(DATE) ; -- Patient is deceased; ok to continue?

External References

Name Field # of Occurrence
^%DT BUILD+9, BUILD+10
^DIC ALT+3, FIND+3, SELECT+5
^DIR OK+4
$$DOB^DPTLK1 B2+14
$$SSN^DPTLK1 B2+12
$$CONTEXT^ORQPT1 SLCT1+4
TEAMPTS^ORQPTQ1 BUILD+11
CLINPTS^ORQPTQ2 BUILD+15
PROVPTS^ORQPTQ2 BUILD+12
SPECPTS^ORQPTQ2 BUILD+13
WARDPTS^ORQPTQ2 BUILD+14
COMBPTS^ORQPTQ6 BUILD+17
SDA^ORQRY01 APPT+4
ELIG^VADPT SLCT1+2
OERR^VADPT SLCT1+2
CHGCAP^VALM BQ+3
EN^VALM EN+2
FULL^VALM1 HELP+1, ALT+1, FIND+2, SELECT+5
CLEAN^VALM10 BUILD+23
CNTRL^VALM10 B2+16
$$DOW^XLFDT INIT+17
$$FMTE^XLFDT INIT+22, INIT+25, B2+2, B2+4, OK+3
$$LJ^XLFSTR B2+15
$$UP^XLFSTR INIT+17, INIT+21, INIT+24
$$GET^XPAR INIT+13, INIT+18, INIT+21, INIT+24, INIT+27

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Enter the display number of the patient whose chart you wish to open"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !,"or enter a patient name, SSN, or initial/last 4 combination. To"
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !,"change the list of patients displayed on this screen, enter CV. To"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !,"have the new list automatically displayed when selecting a new patient,"
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !,"enter SV. Enter FD to search by patient name or identifier."
  • Line Location: HELP+6
Function Call: WRITE
  • Prompt: !!,"Press <return> to continue ..."
  • Line Location: HELP+7
Function Call: WRITE
  • Prompt: $C(7),!!,NMBR_" is not a valid selection.",!
  • Line Location: SELECT+3
Function Call: WRITE
  • Prompt: !!,"Press <return> to continue ..."
  • Line Location: SLCT1+14
Function Call: WRITE
  • Prompt: $C(7),!!,"This patient died "_$$FMTE^XLFDT(DATE)_"!"
  • Line Location: OK+3
Routine Call
  • DIC
  • Line Location:
    • ALT+3
    • FIND+3
    • SELECT+5
Routine Call
  • DIR
  • Line Location:
    • OK+4
Routine Call
  • VALM
  • Line Location:
    • BQ+3
Routine Call
  • VALM
  • Line Location:
    • EN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGSL(38.1 - [#38.1] SLCT1+10
^DIC(42 - [#42] BUILD+14, SLCT1+3
^DIC(45.7 - [#45.7] BUILD+13
^DPT - [#2] B1+7, B2+2, B2+3, ID+1, ID+2, ALT+4, FIND+4, SELECT+6, SLCT1+10
^OR(100.21 - [#100.21] BUILD+11
^ORD(101 - [#101] BQ+1
^SC - [#44] BUILD+15, SLCT1+6
^TMP("OR" DEFAULT+1, EXIT+1!, BUILD+22*, B1+11*, B1+12, B1+17*, B2B2+4, B2+7*, B2+15*
, BQ*, BQ+1*, SELECT+2
^UTILITY("VASD" APPT+2!, APPT+5!, APPT+6, APPT+7!
^VA(200 - [#200] INIT+11, BUILD+12
^XUSEC("DG SENSITIVITY" SLCT1+10

Label References

Name Line Occurrences
$$ID B2+11
$$OK ALT+4, FIND+4, SELECT+6
BQ BUILD+19, B1+12
BUILD INIT+30
SLCT1 ALT+5, FIND+5

Naked Globals

Name Field # of Occurrence
^( B2, APPT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT BUILD+1~, BUILD+9*, BUILD+10*
BEG BUILD+1~, BUILD+9*, BUILD+15, BUILD+17
CLINIC APPT~, APPT+3
DATE OK~, OK+3
DFN BUILD+1~, B1+1*, B1+11, B2+1*, B2+2, B2+3, B2+11, B2+12, B2+14, ID~
, ID+1, ID+2, APPT~, ALT+1~, ALT+5*, FIND+1~, FIND+5*, SELECT+1~, SELECT+2*, SELECT+3
SELECT+5, SLCT1+7
DIC ALT+1~, ALT+2*, FIND+1~, FIND+2*, SELECT+1~, SELECT+5*
DIC(0 ALT+2*, FIND+2*, SELECT+5*
DIR OK+1~
DIR("A" OK+2*
DIR("B" OK+1*
DIR(0 OK+1*
DOB BUILD+1~, B2+2*, B2+14*, B2+15
DT INIT+17, INIT+22, INIT+25
DTIME HELP+7, SLCT1+15
DUZ INIT+11, SLCT1+10
END BUILD+1~, BUILD+10*, BUILD+15, BUILD+17
ERR APPT+2~, APPT+4, APPT+5
ERRMSG APPT+2~, APPT+4, APPT+5
FROM APPT~, APPT+3
ID ID+1~*, ID+2*, ID+3
>> IOINHI B2+16
>> IOINORM B2+16
LCNT BUILD+1~, BUILD+21*, BUILD+23*, B1+15*, B2+6*, B2+15, B2+16, BQBQ+4
LIST BUILD~, BUILD+2, BUILD+8*, BUILD+9, BUILD+10, BQ
LOC SLCT1+1~, SLCT1+3*, SLCT1+4*, SLCT1+5*, SLCT1+6
MSG BUILD+17~, BUILD+20, BUILD+22, B1+13~, B1+14*, B1+16*, B1+17
NAME BUILD+1~, B2+1*, B2+15, ID+3
>> NEXT APPT+6*, APPT+8
NMBR SELECT+1~*, SELECT+2, SELECT+3, SLCT1+4
NUM BUILD+1~, BUILD+21*, BUILD+23*, B1+15*, B2+6*, B2+7, B2+15, BQBQ+1
>> ORAGE SLCT1+8*
>> ORATTEND SLCT1+9*
ORCNV SLCT1+1~
>> ORDOB SLCT1+8*
ORI BUILD+1~, B1*, B1+1, B1+4, B1+6, B1+7, B1+10, B1+11
>> ORL SLCT1+6*
>> ORL(0 SLCT1+6*
>> ORL(1 SLCT1+6*
>> ORPNM EN+1, HDR+2, SLCT1+7*
>> ORSC SLCT1+9*
>> ORSEX SLCT1+8*
ORSRV INIT+11~*, INIT+13, INIT+18, INIT+21, INIT+24, INIT+27
>> ORSSN EN+1, HDR+2, SLCT1+7*
>> ORTS SLCT1+9*
ORVP EN+1!, HDR+1, ALT+5, FIND+5, SLCT1+7*, SLCT1+10
>> ORWARD SLCT1+9*
ORX INIT+8~, INIT+14, INIT+18*, INIT+23*, INIT+26*, BUILD+1~, B1+3*, B1+4*, B1+5*, B1+6*
B1+7*, B1+8*, B1+10*, B1+11, B2*, B2+4, ALT+1~*, ALT+2, ALT+4*, FIND+1~
FIND+4*, SELECT+1~, SELECT+6*
ORY INIT+8~, INIT+13*, INIT+14*, INIT+16, INIT+17, INIT+20, INIT+27*, INIT+30, BUILD+1~, BUILD+11
, BUILD+12, BUILD+13, BUILD+14, BUILD+15, B2*, B2+1, B2+7
ORY( B1B1+1, B1+4, B1+6, B1+7, B1+10, B1+11
ORY(1 B1+16
ORYZB INIT+8~, INIT+21*, INIT+22*, INIT+23
ORYZE INIT+8~, INIT+24*, INIT+25*, INIT+26
PARAM INIT+8~, INIT+16*, INIT+17*, INIT+18
PTID BUILD+1~, B2+10*, B2+11*, B2+13*, B2+15
PTR BUILD+1~, BUILD+2*, BUILD+11, BUILD+12, BUILD+13, BUILD+14, BUILD+15, BUILD+17
RBED BUILD+1~, B2+3*, B2+4*, B2+15, BQ+2*, BQ+3
SENS BUILD+1~, B2+12*, B2+13
SORT BUILD+1~, BUILD+2*, BUILD+4*, BUILD+6, BUILD+7*, BUILD+8, B1+4, B1+7, B1+8, B2+4
TITLE BUILD+1~, BUILD+11*, BUILD+12*, BUILD+13*, BUILD+14*, BUILD+15*, BUILD+17*, BQ+4
TO APPT~, APPT+3
TYPE BUILD+1~, BUILD+2*, BUILD+4, BUILD+5, BUILD+11, BUILD+12, BUILD+13, BUILD+14, BUILD+15, BUILD+17
, BUILD+19, B1+4, B1+7, B2+3, B2+4, BQ+2
U INIT+11, DEFAULT+1, BUILD+11, BUILD+12, BUILD+13, BUILD+14, BUILD+15, B1+4, B1+6, B1+7
B1+10, B2+1, B2+2, B2+3, B2+4, BQ, ID+1, ID+2, APPT+6, SLCT1+6
SLCT1+7, SLCT1+8
VA SLCT1+1~
VADM SLCT1+1~
VADM(1 SLCT1+7
VADM(2 SLCT1+7
VADM(3 SLCT1+8
VADM(4 SLCT1+8
VADM(5 SLCT1+8
VAEL SLCT1+1~
VAEL(3 SLCT1+9
VAERR APPT+2~, SLCT1+1~
VAIN SLCT1+1~
VAIN(11 SLCT1+9
VAIN(3 SLCT1+9
VAIN(4 SLCT1+3, SLCT1+9
VAIN(5 SLCT1+6
>> VALM("TITLE" BQ+4*
>> VALMBCK HELP+1*, BQ+4*, ALT+3*, ALT+4*, FIND+3*, FIND+4*, SELECT+3*, SELECT+5*, SELECT+6*
>> VALMBG BQ+4*
>> VALMCNT BQ+4*
VALMHDR BQ+3!
VALMHDR(1 HDR+3*
VASD APPT+2~
VASD("C" APPT+3*
VASD("F" APPT+3*
VASD("T" APPT+3*
X HDR+1~*, HDR+2*, HDR+3, HELP+1~, HELP+7*, BUILD+1~, BUILD+9*, BUILD+10*, ALT+1, ALT+2*
FIND+1~, SELECT+1~, SELECT+5*, SLCT1+4~*, SLCT1+13~, SLCT1+15*, OK+1~
>> XQAID SLCT1+3
>> XQORM("ALT" EXIT+1!
>> XQORM("B" DEFAULT+2
>> XQORMRCL ALT+2
>> XQORNOD(0 SELECT+1
Y BUILD+1~, BUILD+9, BUILD+10, ALT+1~, ALT+3, ALT+4, ALT+5, FIND+1~, FIND+3, FIND+4
FIND+5, SELECT+1~, SELECT+2*, SELECT+5, SELECT+6, OK+1~, OK+5
Z SELECT+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All