ORQPT ; SLC/MKB - Patient Selection ; 4/18/07 7:20am
Source file <ORQPT.m>
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?
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|