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 |