SCRPI01 ;ALB/SCK - IEMM REPORT OF INCOMPLETE ENCOUNTERS ; 2/2/97
Source file <SCRPI01.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Main entry point for report of incomplete encounters report
; Variables ; SDTXT - String array for initial message display ; SDDT - date Range, Begin^End ; SDSEL1,2 - Selection methods Line Tag ; SDOK - Flag, 1 - Ok to continu, 0 - Quit |
|
| ENQ | ||
| RPT | ; Build report, then call print
|
|
| EXIT | ;
|
|
| SELCT(S1,SCT) | ; Set selection criteria
; Input ; S1 - Previous selection method ; SCT - first or second selection method |
|
| CLN | ; Clinic selection o/m/a
|
|
| PAT | ; Patient selection o/m/a
|
|
| ERR | ; Error selection o/m/a
|
|
| DSS | ; Clinic Stop code selection o/m/a
|
|
| BLD | ; Search for incomplete encounters and build TMP global
; Variables ; SDEND - End date of date range ; SDOE - Encounter IEN ; SDOEDT - Encounter date ; SDCNT - Entry count |
|
| BLD1(SDE,SDX) | ; If error passes checks, add to sorted TMP global
; Input ; SDE - Pointer to #409.75 ; SDX - Pointer to #409.73 |
|
| SELMTHD(SEL) | ; Returns 'external' version of selection method
|
|
| HLP | ; '??' help for the selection criteria.
|
|
| MSG2 | ;
|
|
| MSG | ;
|
|
| OPTIONS | ; Selection methods
|
| 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 |
|
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(40.7 - [#40.7] | Classic Fileman Calls |
| ^SD(409.76 - [#409.76] | Classic Fileman Calls |