SDSCRPT1 ;ALB/JAM/RBS - ASCD Reports for Service Connected Automated Monitor ; 4/24/07 4:30pm
Source file <SDSCRPT1.m>
Package | Total | Caller Graph |
---|---|---|
Scheduling | 13 | SDSC ENC REPORT SDSC FIRST PARTY REPORT SDSC PROVIDER REPORT SDSC THIRD PARTY REPORT SDSC USER REPORT SDSCCHK SDSCLST SDSCMSR SDSCPRV SDSCRP1 SDSCRP2 SDSCSSD SDSCUSR |
Name | Comments | DBIA/ICR reference |
---|---|---|
LOAD | ; Standard start tag for all current reports.
; Initialize variables if necessary. |
|
NSCINS | ; 'ROUTINE' tag called by option "SDSC THIRD PARTY REPORT - Third Party Billable Service Connected Report"
|
|
RPTEND | ;Report cleSDp.
|
|
RDPOV | ; 'ROUTINE' tag called by option "SDSC ENC REPORT - Service Connected Encounters Report"
|
|
STDGET() | ; All standard data retrieval from SD, Encounter and Visit.
; Get compiled data |
|
SCPRV | ;Provider Service Connected Encounters Report
|
|
NSCCOP | ; 'ROUTINE' tag called by option "SDSC FIRST PARTY REPORT - First Party Billable Service Connected Report"
|
|
COPPRT | ;Display all encounters that may be billable for co-payment.
|
|
SCUSR | ;User Service Connected Encounters Report
|
|
END | ; Clear all variables before exiting.
|
|
INSPRT | ;Display all encounters that may be billable to insurance.
|
|
; Display the encounters previously stored for this date.
; This is a detailed report, set flag |
||
PRVPRT | ;Display all User Reviewed encounters by Provider
|
|
DIV | ; Ask Division
|
|
LOOP | ; Loop through each division and display the selected report.
|
|
RVWPRT | ;Display all User Reviewed encounters
|
Name | Field # of Occurrence |
---|---|
^%ZIS | LOAD+11 |
HOME^%ZIS | LOAD+3 |
^%ZISC | RPTEND+4 |
^%ZTLOAD | LOAD+13 |
^DIR | RDPOV+5, SCPRV+5, SCUSR+5, RPTEND+2, DIV+4 |
$$GETOE^SDOE | STDGET+4 |
GETDATE^SDSCOMP | LOAD+7 |
ENCBDDT^SDSCRPT2 | PRINT+13 |
HEADER^SDSCRPT2 | PRINT+4 |
NBILLBD^SDSCRPT2 | INSPRT+14, COPPRT+14 |
NBILLHD^SDSCRPT2 | INSPRT+3, COPPRT+3 |
PRVBD^SDSCRPT2 | PRVPRT+15 |
PRVHD^SDSCRPT2 | PRVPRT+4 |
RVWBD^SDSCRPT2 | RVWPRT+15 |
RVWHD^SDSCRPT2 | RVWPRT+4 |
$$NBFP^SDSCUTL | COPPRT+11 |
$$NBTP^SDSCUTL | INSPRT+11 |
$$SCHNG^SDSCUTL | INSPRT+13, COPPRT+13 |
DIV^SDSCUTL | DIV+3 |
Name | Line Occurrences |
---|---|
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 |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(40.8 - [#40.8] | LOOP+7 |
^SDSC(409.48 - [#409.48] | PRINT+6, PRINT+7, PRINT+8, PRINT+11, INSPRT+5, INSPRT+6, INSPRT+7, COPPRT+5, COPPRT+6, COPPRT+7 , RVWPRT+6, RVWPRT+9, RVWPRT+10, RVWPRT+11, PRVPRT+6, PRVPRT+9, PRVPRT+10, PRVPRT+11, STDGET+2 |
Name | Line Occurrences |
---|---|
$$STDGET | PRINT+10, INSPRT+9, COPPRT+9, RVWPRT+13, PRVPRT+13 |
@( | LOOP+3, LOOP+7 |
DIV | LOAD+5 |
END | LOAD+5, LOAD+7, LOAD+11, LOAD+14, LOOP+9 |
LOAD | RDPOV+8, NSCCOP+3, NSCINS+3, SCPRV+8, SCUSR+8 |
LOOP | LOAD+12 |
RPTEND | LOOP+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%ZIS | LOAD+3!, LOAD+11* |
CT | LOOP+1~, LOOP+2*, LOOP+7* |
DIR | RDPOV+1~, SCPRV+1~, SCUSR+1~, RPTEND+2~, DIV+1~ |
DIR("A" | RDPOV+4*, SCPRV+4*, SCUSR+4* |
DIR("B" | RDPOV+4*, SCPRV+3*, SCUSR+3* |
DIR(0 | RDPOV+3*, SCPRV+3*, SCUSR+3*, RPTEND+2* |
DIRUT | RDPOV+1~, RDPOV+5, SCPRV+1~, SCPRV+5, SCUSR+1~, SCUSR+5 |
DTOUT | END+2!, DIV+5 |
DUOUT | END+2!, DIV+5 |
IO | LOAD+12, PRINT+4, INSPRT+3, COPPRT+3, RVWPRT+4, PRVPRT+4 |
IO("Q" | LOAD+12 |
ION | LOAD+13 |
IOST | RPTEND+1 |
L | LOAD+2~, LOAD+9*, RVWPRT+16*, PRVPRT+16* |
P | LOAD+2~, LOAD+9* |
POP | LOAD+11, END+2! |
SCLN | END+3!, DIV+6 |
SCVAL | PRINT+2~, PRINT+11*, PRINT+12, INSPRT+1~, INSPRT+13*, INSPRT+14 |
SDABRT | LOAD+2~, LOAD+9*, LOOP+6, PRINT+4, PRINT+6, PRINT+7, INSPRT+3, INSPRT+5, INSPRT+6, COPPRT+3 , COPPRT+5, COPPRT+6, RVWPRT+4, RVWPRT+6, RVWPRT+9, RVWPRT+10, PRVPRT+4, PRVPRT+6, PRVPRT+9, PRVPRT+10 , RPTEND+1, RPTEND+3 |
SDCLIN | STDGET+8*, END+1! |
SDCST | STDGET+10*, END+1! |
SDDATA | STDGET+2*, END+1! |
SDDET | SCPRV+1~, SCPRV+6*, SCUSR+1~, SCUSR+6*, PRINT+2~, PRINT+3* |
SDEDT | PRINT+6, INSPRT+5, COPPRT+5, RVWPRT+9, PRVPRT+9, END+1! |
SDFILEOK | END+1! |
SDHDR | INSPRT+1~, INSPRT+2*, COPPRT+1~, COPPRT+2*, RVWPRT+2~, RVWPRT+3*, PRVPRT+2~, PRVPRT+3* |
SDI | LOOP+1~, LOOP+6* |
SDLEB | RVWPRT+2~, RVWPRT+6*, RVWPRT+9, RVWPRT+10 |
SDNWPV | RVWPRT+2~, RVWPRT+8*, PRVPRT+2~, PRVPRT+8* |
SDOE | PRINT+2~, PRINT+7*, PRINT+8, PRINT+11, INSPRT+1~, INSPRT+6*, INSPRT+7, INSPRT+13, COPPRT+1~, COPPRT+6* , COPPRT+7, COPPRT+11, COPPRT+13, RVWPRT+2~, RVWPRT+10*, RVWPRT+11, PRVPRT+2~, PRVPRT+10*, PRVPRT+11, STDGET+2 , STDGET+4 |
SDOEDAT | STDGET+4*, STDGET+6, STDGET+8, STDGET+10, STDGET+12, END+3! |
SDOEDT | PRINT+2~, PRINT+6*, PRINT+7, INSPRT+1~, INSPRT+5*, INSPRT+6, COPPRT+1~, COPPRT+5*, COPPRT+6, RVWPRT+2~ , RVWPRT+9*, RVWPRT+10, PRVPRT+2~, PRVPRT+9*, PRVPRT+10 |
SDOPT | RDPOV+1~, RDPOV+6*, PRINT+12 |
SDPAT | STDGET+6*, END+1! |
SDPCT | RVWPRT+2~, RVWPRT+8*, RVWPRT+14*, RVWPRT+16, PRVPRT+2~, PRVPRT+8*, PRVPRT+14*, PRVPRT+16 |
SDPCTS | END+3! |
SDPOV | END+2! |
SDPROV | PRVPRT+2~, PRVPRT+6*, PRVPRT+9, PRVPRT+10, END+2! |
SDPVCN | RVWPRT+2~, RVWPRT+8*, PRVPRT+2~, PRVPRT+8* |
SDQFL | LOAD+5, END+3!, DIV+2*, DIV+5* |
SDRTN | RDPOV+1~, RDPOV+7*, NSCCOP+1~, NSCCOP+2*, NSCINS+1~, NSCINS+2*, SCPRV+1~, SCPRV+7*, SCUSR+1~, SCUSR+7* , LOOP+3, LOOP+7, END+3! |
SDSCBDT | END+2! |
SDSCDIV | LOOP+1~, LOOP+2*, LOOP+3, LOOP+4, LOOP+6*, LOOP+7, PRINT+8, INSPRT+7, COPPRT+7, RVWPRT+11 , PRVPRT+11 |
SDSCDNM | LOOP+1~, LOOP+3*, LOOP+7* |
SDSCDVLN | LOOP+2, END+3!, DIV+6* |
SDSCDVSL | LOOP+2, LOOP+6, END+3!, DIV+6* |
SDSCEDT | END+2! |
SDSCTDT | LOAD+7, PRINT+6, INSPRT+5, COPPRT+5, RVWPRT+9, PRVPRT+9, END+1! |
SDV0 | STDGET+12*, END+1! |
SDVAL | COPPRT+1~, COPPRT+13*, COPPRT+14 |
SDVPOV0 | END+2! |
THDR | LOOP+1~, LOOP+5*, LOOP+7* |
U | PRINT+8, PRINT+11, INSPRT+7, INSPRT+14, COPPRT+7, COPPRT+14, RVWPRT+11, PRVPRT+11, STDGET+6, STDGET+8 , STDGET+10, STDGET+12 |
X | RDPOV+1~, SCPRV+1~, SCUSR+1~, END+1!, DIV+1~ |
X1 | END+1! |
X2 | END+1! |
Y | RDPOV+1~, RDPOV+6, SCPRV+1~, SCPRV+6, SCUSR+1~, SCUSR+6, END+1!, DIV+1~, DIV+6 |
ZTDESC | RDPOV+1~, RDPOV+7*, NSCCOP+1~, NSCCOP+2*, NSCINS+1~, NSCINS+2*, SCPRV+1~, SCPRV+7*, SCUSR+1~, SCUSR+7* , LOAD+12! |
ZTIO | LOAD+2~, LOAD+13* |
ZTQUEUED | RPTEND+5, END+2! |
ZTREQ | RPTEND+5*, END+2! |
ZTRTN | LOAD+2~, LOAD+13* |
ZTSAVE | LOAD+2~ |
ZTSAVE("*" | LOAD+13* |