SCENI0 ;ALB/SCK - INCOMPLETE ENCOUNTER MGMT MAIN LM DISPLAY ; 07-MAY-1997
Source file <SCENI0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Entry point for IEMM LM display
; Variables ; VAUTC,VAUTD - Clinic and Division o/m/a arrays ; SDENTYP - Search type, P:patient, C:Clinic, E:Error Code ; SDCLN - Clinic from selection lookup ; SDDT - Date range for search, Begin^End format ; SDY - Local variable used in selection criteria ; SDEVAL - Error code value ; SDFN - Patient DFN for local use ; SDIEMM - Flag for IEMM |
|
| AGN | ||
| EN1 | ||
| ENQ | ||
| ENP(SDXPTR) | ; Entry point for Data validation, Patient Predefined
; This entry point will jump to the second LM screen and display any ; errors for the encounter. |
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| BLD | ; Order through the Xmited OE Error file on encounter Xref
; Variables ; SDOEDT - Encounter date ; SDOE - Pointer to #409.68 ; SDE - End date of date range ; SDCNT - Count of entries ; SDXMT - Pointer to #409.73 ; SDXER - Pointer to #409.75 |
|
| BLDA(SDXMT,SDOEDT) | ; Build list entry, and retreive encounter information
; Input ; SDXMT - Pointer to $409.73 ; SDOEDT - Date of encounter |
|
| BLDLM | ; Build display list array for LM
; Variables ; SDN - Patient Name ; SDD - Encounter Date ; SDXT - Pointer to #409.73, transmission pointer |
|
| BLDLM1(SDXT) | ; Build LM Display line
; Input ; SDXT - DFN^BID^Delete marker ('*') |
|
| SET(X,SDXMT) | ;
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| EX1 | ||
| PLKUP(SDFN) | ;
|
|
| CLKUP(SDCLN) | ;
|
|
| CHKDATE(XMIT,BDT,EDT) | ;
|
|
| CHKQ |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
