SCRPBK ;MJK/ALB - RPC Broker Utilities ; 27 FEB 96
Source file <SCRPBK.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| FIELDS(SCINC,SCRPT,SCDATA) | ; -- get fields to ask | |
| RPTDEF(SCRPT) | ; -- retrieve rpt def demographics | |
| TYPE(FILENUM) | ; -- determine file type for file | |
| FILES(SCINC,SCRPT,SCDATA) | ; -- get files to select | |
| SET(X,INC,SCDATA) | ; -- set value in return array | |
| SORTS(SCINC,SCRPT,SCDATA) | ; -- get possible sorts | |
| GETREC(SCDATA,SCRPT) | ; -- get REPORT record ; input : SCRPT := ien of report definition ; output : SCDATA is the return array ; SCDATA(0) := 0th node of rpt def ; (1..n) := sections for ; [Description], [Sorts], [Fields], [Files] | |
| TYPEQ | ||
| DESC(SCINC,SCRPT,SCDATA) | ; -- get rpt description | 
| Name | Field # of Occurrence | 
|---|---|
| $$CHKTYPE^SCRPBK2 | FILES+9 | 
| RPC Name | Call Tags | 
|---|---|
| SCRP DEFINITION GETRECORD | GETREC | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^SD(404.92 - [#404.92] | RPTDEF+2, DESC+3, SORTS+3, FIELDS+3, FILES+3 | 
| ^SD(404.93 - [#404.93] | FIELDS+5 | 
| ^SD(404.94 - [#404.94] | RPTDEF+3 | 
| Name | Line Occurrences | 
|---|---|
| $$RPTDEF | GETREC+12 | 
| $$TYPE | FILES+4 | 
| DESC | GETREC+16 | 
| FIELDS | GETREC+20 | 
| FILES | GETREC+22 | 
| SET | GETREC+14, DESC+2, DESC+4, DESC+5, SORTS+2, SORTS+4, SORTS+5, FIELDS+2, FIELDS+9, FIELDS+10 , FILES+2, FILES+9, FILES+10 | 
| SORTS | GETREC+18 | 
| TYPEQ | TYPE+3, TYPE+4, TYPE+5, TYPE+6, TYPE+7, TYPE+8 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | DESC+3, SORTS+3, FIELDS+3, FILES+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| FILENUM | TYPE~, TYPE+3, TYPE+4, TYPE+5, TYPE+6, TYPE+7, TYPE+8 | 
| I | DESC+1~, DESC+3*, SORTS+1~, SORTS+3*, FIELDS+1~, FIELDS+3*, FILES+1~, FILES+3* | 
| INC | SET~, SET+1* | 
| SC | GETREC+9~ | 
| SCDATA | GETREC~, GETREC+14, GETREC+16, GETREC+18, GETREC+20, GETREC+22, SET~, DESC~, DESC+2, DESC+4 , DESC+5, SORTS~, SORTS+2, SORTS+4, SORTS+5, FIELDS~, FIELDS+2, FIELDS+9, FIELDS+10, FILES~ , FILES+2, FILES+9, FILES+10 | 
| SCDATA( | SET+1* | 
| SCINC | GETREC+9~, GETREC+10*, GETREC+14, GETREC+16, GETREC+18, GETREC+20, GETREC+22, DESC~, DESC+2, DESC+4 , DESC+5, SORTS~, SORTS+2, SORTS+4, SORTS+5, FIELDS~, FIELDS+2, FIELDS+9, FIELDS+10, FILES~ , FILES+2, FILES+9, FILES+10 | 
| SCRPT | GETREC~, GETREC+10*, GETREC+12, GETREC+16, GETREC+18, GETREC+20, GETREC+22, RPTDEF~, RPTDEF+2, DESC~ , DESC+3, SORTS~, SORTS+3, FIELDS~, FIELDS+3, FILES~, FILES+3 | 
| SCTYPE | FILES+1~, FILES+4*, FILES+6, FILES+9 | 
| U | RPTDEF+3, FIELDS+5, FIELDS+6, FIELDS+7, FIELDS+8, FILES+6, FILES+7, FILES+8 | 
| X | GETREC+9~, GETREC+12*, GETREC+14, SET~, SET+1, RPTDEF+1~, RPTDEF+2*, RPTDEF+3, DESC+1~, DESC+3* , DESC+4, SORTS+1~, SORTS+3*, SORTS+4, FIELDS+1~, FIELDS+3*, FIELDS+5, FIELDS+6, FIELDS+7, FIELDS+8 , FILES+1~, FILES+3*, FILES+4, FILES+7, FILES+8, TYPE+1~, TYPE+2*, TYPE+3*, TYPE+4*, TYPE+5* , TYPE+6*, TYPE+7*, TYPE+8*, TYPEQ | 
| Y | RPTDEF+1~, RPTDEF+3*, RPTDEF+4, FIELDS+1~, FIELDS+4*, FIELDS+5*, FIELDS+6*, FIELDS+7*, FIELDS+8*, FIELDS+9 , FILES+1~, FILES+5*, FILES+6*, FILES+7*, FILES+8*, FILES+9 |