ECMUTL1 ;ALB/ESD - Utilities for Multiple Dates/Mult Procs ;20 AUG 1997 13:56
Source file <ECMUTL1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ASKPAT(ECPAT) | ; Ask patient
|
|
SEL | ;
|
|
ASKPATQ | ||
ASKORD() | ; Ask ordering section
|
|
ASKORDQ | ||
PCEDAT(ECUNIT,ECSCR,ECPCE) | ;get needed PCE data
|
|
ASKDX | ;ask dx
|
|
CLINIC | ;get associated clinic
|
|
VISIT | ;ask visit info
|
|
CLIN(EC4,ECPCL) | ;check for active associated clinic
|
|
MSGDX | ;if ecout & essential data missing, display msg
|
|
MSGCLN | ;if ecout & essential data missing, display msg
|
|
CLMSG | ; Display classification questions error message
|
|
MSG1 | ;Error message display
|
|
INOUT(ECPTIEN,ECARRY) | ; Determine inpatient/outpatient status
|
|
ASKELIG(ECDSS,ECIO,ECPTIEN) | ; Determine patient eligibility
|
|
REMOVE(ECPAT) | ; Remove patient from selected patient list because required data missing
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |