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