SCRPBK3 ;MJK/ALB - RPC Broker Utilities ; 27 FEB 96
Source file <SCRPBK3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRINTQ | ||
PASSIGN(SCQREC,SCFLD) | ; -- determine if assign patient's is requested
|
|
RPT2(SCDATA,SCQREC,SCPNTR,SCRUNDT) | ; -- detailed patient enrollments
|
|
RPT5(SCDATA,SCQREC,SCPNTR,SCRUNDT) | ; -- team profile
|
|
RPT4(SCDATA,SCQREC,SCPNTR,SCRUNDT) | ; -- practitioner's pateints
|
|
RANGE(SCQREC) | ; -- deterime date range
|
|
BUILDQ | ||
BUILD(SCQREC,SCTYPE,VAUT) | ; -- build selection array
; is type active |
|
RPT7(SCDATA,SCQREC,SCPNTR,SCRUNDT) | ; -- team's patients
|
|
RPT1(SCDATA,SCQREC,SCPNTR,SCRUNDT) | ; -- patient/team assignment
|
|
PSTATUS(SCQREC,SCFLD) | ; -- determine pat status to show
|
|
PRINT(SCDATA,SCPTR,SCDATE,SCTIME,SCQDEF) | ;
; -- print pcmm report |
|
ROOT(SCTYPE) | ; -- determine global root for file type
|
|
RPT6(SCDATA,SCQREC,SCPNTR,SCRUNDT) | ; -- summaru listing of Teams
|
|
YESNO(SCQREC,SCFLD) | ; -- determine yes/no field value
|
|
RPT8(SCDATA,SCQREC,SCPNTR,SCRUNDT) | ; -- team's members
|
|
RPT3(SCDATA,SCQREC,SCPNTR,SCRUNDT) | ; -- practitioner's demographics
|
|
INIT(SCDATE,SCTIME,SCPTR,SCRUNDT,SCPNTR) | ; -- setup of general vars
|
|
ROOTQ | ||
FINDSORT(SCQREC) | ; -- find sort selected in report definition
|
Name | Field # of Occurrence |
---|---|
$$CHKTYPE^SCRPBK2 | BUILD+2 |
VALCHK^SCRPBK4 | PRINT+26 |
PARSE^SCRPBK5 | PRINT+22 |
$$ENTRY2^SCRPEC | RPT2+6 |
$$ENTRY2^SCRPITP | RPT5+4 |
$$ENTRY2^SCRPPAT | RPT4+8 |
$$ENTRY2^SCRPRAC | RPT3+3 |
$$ENTRY2^SCRPSLT | RPT6+5 |
$$ENTRY2^SCRPTA | RPT1+6 |
$$ENTRY2^SCRPTM | RPT8+7 |
$$ENTRY2^SCRPTP | RPT7+7 |
HDREC^SCUTBK3 | PRINT+28 |
RPC Name | Call Tags |
---|---|
SCRP REPORT PRINT |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SD(404.92 - [#404.92] | FINDSORT+6 |
Name | Line Occurrences |
---|---|
$$FINDSORT | RPT4+7, RPT7+6 |
$$PASSIGN | RPT2+5 |
$$PSTATUS | RPT7+5 |
$$RANGE | RPT8+6 |
$$ROOT | BUILD+4 |
$$YESNO | RPT4+6 |
@( | PRINT+34 |
BUILD | RPT1+2, RPT1+3, RPT1+4, RPT1+5, RPT2+2, RPT2+3, RPT2+4, RPT3+2, RPT4+2, RPT4+3 , RPT4+4, RPT4+5, RPT5+2, RPT5+3, RPT6+2, RPT6+3, RPT6+4, RPT7+2, RPT7+3, RPT7+4 , RPT8+2, RPT8+3, RPT8+4, RPT8+5 |
BUILDQ | BUILD+2 |
INIT | PRINT+31 |
PRINTQ | PRINT+27 |
ROOTQ | ROOT+2, ROOT+3, ROOT+4, ROOT+5, ROOT+6, ROOT+7 |
Name | Field # of Occurrence |
---|---|
^( | FINDSORT+6 |
^(0 | BUILD+6, FINDSORT+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIERR | PRINT+19~, PRINT+27, PRINT+28 |
DT | RANGE+1 |
I | FINDSORT+1~, FINDSORT+5*, FINDSORT+6* |
SCDATA | PRINT~, PRINT+28, RPT1~, RPT2~, RPT3~, RPT4~, RPT5~, RPT6~, RPT7~, RPT8~ |
SCDATA(0 | PRINT+36*, RPT1+6*, RPT2+6*, RPT3+3*, RPT4+8*, RPT5+4*, RPT6+5*, RPT7+7*, RPT8+7* |
SCDATE | PRINT~, PRINT+31, INIT~, INIT+3 |
SCFLD | YESNO~, YESNO+1, PSTATUS~, PSTATUS+2, PASSIGN~, PASSIGN+1 |
SCLOG | PRINT+19~, PRINT+25*, PRINT+26 |
SCPNTR | PRINT+19~, PRINT+31, RPT1~, RPT1+6, RPT2~, RPT2+6, RPT3~, RPT3+3, RPT4~, RPT4+8 , RPT5~, RPT5+4, RPT6~, RPT6+5, RPT7~, RPT7+7, RPT8~, RPT8+7, INIT~, INIT+2* |
SCPTR | PRINT~, PRINT+31, INIT~, INIT+2 |
SCQDEF | PRINT~, PRINT+22 |
SCQREC | PRINT+19~, PRINT+22, PRINT+26, RPT1~, RPT1+2, RPT1+3, RPT1+4, RPT1+5, RPT2~, RPT2+2 , RPT2+3, RPT2+4, RPT2+5, RPT3~, RPT3+2, RPT4~, RPT4+2, RPT4+3, RPT4+4, RPT4+5 , RPT4+6, RPT4+7, RPT5~, RPT5+2, RPT5+3, RPT6~, RPT6+2, RPT6+3, RPT6+4, RPT7~ , RPT7+2, RPT7+3, RPT7+4, RPT7+5, RPT7+6, RPT8~, RPT8+2, RPT8+3, RPT8+4, RPT8+5 , RPT8+6, BUILD~, FINDSORT~, YESNO~, PSTATUS~, PASSIGN~, RANGE~ |
SCQREC("FIELDS" | FINDSORT+4, YESNO+1, PSTATUS+2, PASSIGN+1, RANGE+1 |
SCQREC("REPORTID" | PRINT+32, PRINT+34, FINDSORT+3 |
SCQREC("SELECTIONS" | BUILD+5 |
SCRANG | RPT8+1~, RPT8+6*, RPT8+7 |
SCRPT | FINDSORT+1~, FINDSORT+3*, FINDSORT+6 |
>> SCRT | BUILD+4*, BUILD+6 |
SCRUNDT | PRINT+19~, PRINT+31, RPT1~, RPT1+6, RPT2~, RPT2+6, RPT3~, RPT3+3, RPT4~, RPT4+8 , RPT5~, RPT5+4, RPT6~, RPT6+5, RPT7~, RPT7+7, RPT8~, RPT8+7, INIT~, INIT+4* |
SCSORT | RPT4+1~, RPT4+7*, RPT4+8, RPT7+1~, RPT7+6*, RPT7+7, FINDSORT+1~, FINDSORT+4*, FINDSORT+6 |
SCSORTID | FINDSORT+1~, FINDSORT+2*, FINDSORT+6*, FINDSORT+7 |
SCTIME | PRINT~, PRINT+31, INIT~, INIT+3 |
SCTYPE | BUILD~, BUILD+2, BUILD+4, BUILD+5, ROOT~, ROOT+2, ROOT+3, ROOT+4, ROOT+5, ROOT+6 , ROOT+7 |
SCX | BUILD+3~, BUILD+4*, BUILD+5*, BUILD+6 |
U | BUILD+6, FINDSORT+6, RANGE+1 |
VALUE | PSTATUS+1~, PSTATUS+2*, PSTATUS+3*, PSTATUS+4 |
VAUT | BUILD~, BUILD+7* |
VAUT( | BUILD+6* |
VAUT(0 | BUILD+7 |
VAUTA | RPT2+1~, RPT2+5*, RPT2+6 |
VAUTC | RPT2+1~, RPT2+4, RPT2+6, RPT4+1~ |
VAUTD | RPT1+1~, RPT1+2, RPT1+6, RPT2+1~, RPT2+2, RPT2+6, RPT4+1~, RPT4+2, RPT4+8, RPT5+1~ , RPT5+2, RPT5+4, RPT6+1~, RPT6+2, RPT6+5, RPT7+1~, RPT7+2, RPT7+7, RPT8+1~, RPT8+2 , RPT8+7 |
VAUTP | RPT1+1~, RPT1+5*, RPT1+6, RPT3+1~, RPT3+2, RPT3+3, RPT4+1~, RPT4+5, RPT4+8 |
VAUTPS | RPT7+1~, RPT7+5*, RPT7+7 |
VAUTR | RPT1+1~, RPT1+4, RPT1+6, RPT4+1~, RPT4+4, RPT4+8, RPT6+1~, RPT6+4, RPT6+5, RPT7+1~ , RPT7+4, RPT7+7, RPT8+1~, RPT8+5, RPT8+7 |
VAUTS | RPT4+1~, RPT4+6*, RPT4+8 |
VAUTT | RPT1+1~, RPT1+3, RPT1+6, RPT2+1~, RPT2+3, RPT2+6, RPT4+1~, RPT4+3, RPT4+8, RPT5+1~ , RPT5+3, RPT5+4, RPT6+1~, RPT6+3, RPT6+5, RPT7+1~, RPT7+3, RPT7+7, RPT8+1~, RPT8+3 , RPT8+7 |
VAUTUC | RPT8+1~, RPT8+4, RPT8+7 |
X | INIT+1~, INIT+3*, INIT+4 |
Y | ROOT+1~, ROOT+2*, ROOT+3*, ROOT+4*, ROOT+5*, ROOT+6*, ROOT+7*, ROOTQ |