SCRPI02 ;ALB/SCK - Incomplete Encounter Mgmt Statistical Summary Report ; 2/4/97
Source file <SCRPI02.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ADD(SDXMT,SDIV,SDIVN,SDDCL,SDDCLN,SDPCE) | ;  Add error entries from #409.75 ; for transmission entry. ; Input ; SDXMT - Pointer to #409.75 ; SDIV - Division IEN ; SDIVN - Division Name ; SDDCL - Clinic IEN ; SDDCLN - Clinic Name ; SDPCE - Piece to increment in ^TMP("SCRPI SUM",$J... ; 1 - Incomplete Encounter (P1) ; 2 - Deleted Incomplete Encounter (P2) | |
| EN | ; Entry point for summary report ; Variables ; VAUTD,VAUTC - VA variables ; SDDT - Date range, Begin^End ; SDRTYP - Report type S - Summary Only ; D - Summary with Detail | |
| ASKQ | ||
| RPT | ; Entry point for building the summary report | |
| RPTQ | ||
| REPORT(SDR) | ;  Select type of summary report ; Variable Input ; SDR - Returns with Report Type S - Summary Only, ; D - Summary with detail | |
| ENQ | ||
| ASKDT(SDT) | ;  Ask for date range for report ; Variable Input ; SDT - Returns date range as Begin^End | |
| EXIT | ; | |
| BLD | ; Search for errors in the transmitted outpatient encounter error file ; and begin building the report | |
| BLDDEL | ; Search for entries in the Deleted Outpatient Encounter File and add to ; the report. ; Variables ; See list in BLD | |
| ENBLT | ;  Entry point for bulletin generation of summary only report ; Variables ; SDBLT - Flag to send output to a bulletin ; SDRTYP - See above ; SDDT - See above | |
| HELP | ; | 
| 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 | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DG(40.8 - [#40.8] | BLD+23, BLDDEL+13 | 
| ^SC - [#44] | BLD+26, BLDDEL+16 | 
| ^SCE - [#409.68] | BLD+22, BLD+25 | 
| ^SCE("B" | BLD+19, BLD+20 | 
| ^SD(409.73 - [#409.73] | BLD+21, BLD+28, BLDDEL+11, BLDDEL+18 | 
| ^SD(409.74 - [#409.74] | BLDDEL+9, BLDDEL+10, BLDDEL+12, BLDDEL+15 | 
| ^SD(409.75 - [#409.75] | BLD+30, BLDDEL+19, ADD+21, ADD+22 | 
| ^TMP("SCRPI SUM" | RPT+3!, EXIT+1!, BLD+29*, BLD+31*, BLDDEL+20*, ADD+23* | 
| Name | Line Occurrences | 
|---|---|
| $$ASKDT | EN+16 | 
| $$REPORT | EN+10 | 
| ADD | BLD+32, BLDDEL+21 | 
| ASKQ | ASKDT+13, ASKDT+19 | 
| BLD | RPT+8 | 
| BLDDEL | RPT+8 | 
| ENQ | EN+13, EN+14, EN+16 | 
| RPTQ | REPORT+14 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DIR | REPORT+14!, ASKDT+19! | 
| DIR("?" | REPORT+12*, ASKDT+11* | 
| DIR("??" | REPORT+13* | 
| DIR("A" | REPORT+11*, ASKDT+10*, ASKDT+17* | 
| DIR("B" | REPORT+11*, ASKDT+12*, ASKDT+18* | 
| DIR(0 | REPORT+11*, ASKDT+10* | 
| DIRUT | REPORT+14, ASKDT+13, ASKDT+14!, ASKDT+19, ASKDT+20! | 
| IOST | RPT+7, ADD+25 | 
| NX | REPORT+8~ | 
| SCCNT | RPT+1~, RPT+4* | 
| SCDE | ADD+19~, ADD+21*, ADD+22 | 
| SCER | ADD+19~, ADD+22*, ADD+23 | 
| >> SDBDT | ASKDT+8*, ASKDT+12 | 
| SDBLT | ENBLT+6~, ENBLT+8*, RPT+7 | 
| >> SDCNT | BLD+17*, BLDDEL+7*, ADD+24*, ADD+25 | 
| SDDCL | BLD+25*, BLD+26, BLD+27, BLD+32, BLDDEL+15*, BLDDEL+16, BLDDEL+17, BLDDEL+21, ADD~ | 
| SDDCLN | BLD+26*, BLD+29, BLD+31, BLD+32, BLDDEL+16*, BLDDEL+20, BLDDEL+21, ADD~, ADD+23 | 
| SDDT | EN+7~, EN+16, ENBLT+6~, ENBLT+9*, BLD+18, BLDDEL+8 | 
| SDEND | BLD+15~, BLD+18*, BLD+19, BLDDEL+5~, BLDDEL+8*, BLDDEL+9 | 
| SDIV | BLD+22*, BLD+23, BLD+24, BLD+32, BLDDEL+12*, BLDDEL+13, BLDDEL+14, BLDDEL+21, ADD~ | 
| SDIVN | BLD+23*, BLD+29, BLD+31, BLD+32, BLDDEL+13*, BLDDEL+20, BLDDEL+21, ADD~, ADD+23 | 
| SDOE | BLD+15~, BLD+20*, BLD+21, BLD+22, BLD+25, BLD+28, BLDDEL+5~, BLDDEL+10*, BLDDEL+11, BLDDEL+12 , BLDDEL+15, BLDDEL+18 | 
| SDOEDT | BLD+15~, BLD+18*, BLD+19*, BLD+20, BLDDEL+5~, BLDDEL+8*, BLDDEL+9*, BLDDEL+10 | 
| SDPCE | ADD~, ADD+23 | 
| SDR | REPORT~, REPORT+10*, REPORT+15* | 
| SDRTYP | EN+7~, EN+10, EN+12, EN+13, EN+14, ENBLT+6~, ENBLT+8*, RPT+5 | 
| SDT | ASKDT~, ASKDT+13!, ASKDT+15*, ASKDT+19!, ASKDT+21*, ASKQ | 
| SDXMT | BLD+28*, BLD+30, BLD+32, BLDDEL+18*, BLDDEL+19, BLDDEL+21, ADD~, ADD+21 | 
| U | BLD+18, BLD+22, BLD+23, BLD+25, BLD+26, BLD+29, BLD+31, BLDDEL+8, BLDDEL+12, BLDDEL+13 , BLDDEL+15, BLDDEL+16, BLDDEL+20, ADD+22, ADD+23, ASKDT+21 | 
| VAUTC | EN+7~, EN+12*, ENBLT+6~, ENBLT+8*, BLD+27, BLDDEL+17 | 
| VAUTC( | BLD+27, BLDDEL+17 | 
| VAUTD | EN+7~, EN+12*, ENBLT+6~, ENBLT+8*, BLD+24, BLDDEL+14 | 
| VAUTD( | BLD+24, BLDDEL+14 | 
| >> X | EN+18*, EN+19 | 
| Y | REPORT+8~, REPORT+14*, REPORT+15, RPTQ, ASKDT+15, ASKDT+21 | 
| >> ZTQUEUED | RPT+7, ADD+25 | 
| ZTSAVE | EN+7~, EN+21 | 
| ZTSAVE( | EN+19* |