SCRPBK2 ;MJK/ALB - RPC Broker Utilities ; 27 FEB 96
Source file <SCRPBK2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
NAMECHK(SCQNAME,SCUSER,SCERR,SCDUP) | ; -- actuallt scan xref for query name
|
|
SAVEREC(SCQREC,SCIENS,SCERR) | ; -- actual save process
|
|
CHKTYPE(SCTYPE) | ; -- special checks to see if file type is ok to use
|
|
DELREC(SCQREC) | ; -- actually delete query record
|
|
SAVERECQ | ||
SAVEQ | ||
GETFLDS(RPTID,SCAN) | ; -- build array of fields used/needed by report
|
|
DELCHK(SCLOG,SCQREC) | ; -- check to see if query can be deleted
; -- is the query being used as a default by any user? |
|
SAVSEL(SCQREC,SCFDA,SCDFDA,SCERR,SCNEW) | ;
; -- determine which file selections were changed or deleted |
|
DELETE(SCDATA,SCQDEF) | ; -- delete a query record
|
|
SAVFLD(SCQREC,SCFDA,SCDFDA,SCERR,SCNEW) | ;
; -- determine which fields were changed or deleted |
|
NAME(SCDATA,SCQNAME,SCUSER) | ;
; -- check to see if user has a query with same name ; ; input: SCQNAME -> query name ; SCUSER -> user id (DUZ) |
|
DELCHKQ | ||
GETYPE(RPTID,SCAN) | ; -- build array of files used/needed by report
|
|
SAVE(SCDATA,SCQDEF) | ; -- save query definition
|
|
STRIP(SCQREC) | ; -- strip out inappropriate data for report type
|
Name | Field # of Occurrence |
---|---|
BLD^DIALOG | DELCHK+9 |
FILE^DIE | SAVEREC+24, SAVEREC+30 |
UPDATE^DIE | SAVEREC+28 |
^DIK | DELREC+2 |
FDA^DILF | SAVEREC+10, SAVEREC+11, SAVEREC+12, SAVEREC+13, SAVEREC+14, SAVEREC+16, SAVFLD+14, SAVFLD+25, SAVFLD+26, SAVSEL+15 , SAVSEL+23 |
$$TYPE^SCRPBK | GETYPE+4 |
VALCHK^SCRPBK4 | SAVE+16 |
PARSE^SCRPBK5 | SAVE+12, DELETE+12 |
ERRCHK^SCUTBK3 | SAVE+25 |
HDREC^SCUTBK3 | SAVE+18, DELETE+14 |
$$NOW^XLFDT | SAVEREC+14 |
RPC Name | Call Tags |
---|---|
SCRP QUERY SAVE | SAVE |
SCRP QUERY DELETE | DELETE |
SCRP QUERY CHECK NAME | NAME |
FileNo | Call Tags |
---|---|
^SD(404.95 - [#404.95] | Classic Fileman Calls |
404.9502 | FDA^DILF |
404.9503 | FDA^DILF |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SCRS(403.35 - [#403.35] | DELCHK+5 |
^SD(404.91 - [#404.91] | CHKTYPE+5 |
^SD(404.92 - [#404.92] | GETFLDS+3, GETYPE+3 |
^SD(404.93 - [#404.93] | SAVFLD+9, SAVFLD+21, GETFLDS+4 |
^SD(404.95 - [#404.95] | SAVFLD+8, SAVSEL+7, NAMECHK+3, NAMECHK+4 |
Name | Line Occurrences |
---|---|
$$CHKTYPE | GETYPE+5 |
$$NAMECHK | NAME+12 |
$$SAVEREC | SAVE+21 |
$$STRIP | SAVEREC+8 |
DELCHK | DELETE+13 |
DELCHKQ | DELCHK+5 |
DELREC | DELETE+15 |
GETFLDS | STRIP+3 |
GETYPE | STRIP+9 |
SAVEQ | SAVE+17 |
SAVFLD | SAVEREC+19 |
SAVSEL | SAVEREC+20 |
Name | Field # of Occurrence |
---|---|
^( | SAVFLD+8, SAVSEL+7, GETFLDS+3, GETYPE+3 |
^(0 | SAVFLD+9, SAVSEL+8, GETFLDS+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | DELREC+1~, DELREC+2* |
DIERR | SAVE+10~, SAVE+17, SAVE+18, DELETE+10~, DELETE+14 |
DIK | DELREC+1~, DELREC+2* |
I | STRIP+1~ |
PARAM | DELCHK+3~ |
RPTID | GETFLDS~, GETFLDS+3, GETYPE~, GETYPE+3 |
SCAN | SAVFLD+3~, SAVSEL+3~, STRIP+1~, STRIP+3, STRIP+8!, STRIP+9, GETFLDS~, GETYPE~ |
SCAN( | SAVFLD+9*, SAVFLD+13, SAVFLD+14, SAVFLD+22, SAVSEL+8*, SAVSEL+12, SAVSEL+15, SAVSEL+21, STRIP+6, STRIP+12 , GETFLDS+4*, GETYPE+5* |
SCDATA | SAVE~, SAVE+18, SAVE+25, DELETE~, DELETE+14, NAME~ |
SCDATA(0 | SAVE+23*, DELETE+15 |
SCDATA(1 | NAME+13*, NAME+15* |
SCDFDA | SAVEREC+1~, SAVEREC+3*, SAVEREC+19, SAVEREC+20, SAVEREC+23, SAVEREC+24, SAVFLD~, SAVFLD+14, SAVSEL~, SAVSEL+15 |
SCDUP | NAME+11~, NAME+12, NAME+15, NAMECHK~, NAMECHK+4* |
SCERR | SAVE+10~, SAVE+21, SAVE+25, SAVEREC~, SAVEREC+3*, SAVEREC+10, SAVEREC+11, SAVEREC+12, SAVEREC+13, SAVEREC+14 , SAVEREC+16, SAVEREC+19, SAVEREC+20, SAVEREC+24, SAVEREC+28, SAVEREC+30, SAVFLD~, SAVFLD+14, SAVFLD+25, SAVFLD+26 , SAVSEL~, SAVSEL+15, SAVSEL+23, NAME+11~, NAME+12, NAMECHK~ |
SCERR("DIERR" | SAVERECQ |
SCERS | SAVE+10~ |
SCFDA | SAVEREC+1~, SAVEREC+3*, SAVEREC+10, SAVEREC+11, SAVEREC+12, SAVEREC+13, SAVEREC+14, SAVEREC+16, SAVEREC+19, SAVEREC+20 , SAVEREC+28, SAVEREC+30, SAVFLD~, SAVFLD+25, SAVFLD+26, SAVSEL~, SAVSEL+23 |
SCFILE | SAVEREC+1~, SAVEREC+2*, SAVEREC+10, SAVEREC+11, SAVEREC+12, SAVEREC+13, SAVEREC+14, SAVEREC+16 |
SCFLD | SAVFLD+3~, SAVFLD+12*, SAVFLD+13*, SAVFLD+14, SAVFLD+17*, SAVFLD+18*, SAVFLD+20, SAVFLD+21, SAVFLD+22, STRIP+1~ , STRIP+4*, STRIP+5*, STRIP+6 |
SCFLDI | SAVFLD+19~, SAVFLD+21*, SAVFLD+25 |
SCHIT | SAVSEL+3~, SAVSEL+13*, SAVSEL+14*, SAVSEL+15 |
SCI | SAVFLD+3~, SAVFLD+7*, SAVFLD+8*, SAVFLD+9, SAVSEL+3~, SAVSEL+6*, SAVSEL+7*, SAVSEL+8, NAMECHK+2*, NAMECHK+3* , NAMECHK+4, GETFLDS+1~, GETFLDS+2*, GETFLDS+3*, GETYPE+1~, GETYPE+2*, GETYPE+3* |
SCIEN | SAVFLD+19~, SAVFLD+23*, SAVFLD+24, SAVFLD+25, SAVFLD+26, SAVSEL+22*, SAVSEL+23 |
SCIENS | SAVE+10~, SAVE+21, SAVEREC~, SAVEREC+3*, SAVEREC+28 |
SCIENS(1 | SAVE+23 |
SCLOG | SAVE+10~, SAVE+15*, SAVE+16, DELETE+10~, DELETE+11*, DELETE+13, DELCHK~, DELCHK+9 |
SCMOD | SAVEREC+1~, SAVEREC+8*, SAVERECQ, STRIP+1~, STRIP+2*, STRIP+6*, STRIP+12*, STRIP+13 |
SCNEW | SAVEREC+1~, SAVEREC+18*, SAVEREC+19, SAVEREC+20, SAVEREC+27, SAVFLD~, SAVFLD+23*, SAVSEL~, SAVSEL+22* |
SCOK | NAMECHK+1~, NAMECHK+2*, NAMECHK+3, NAMECHK+4*, NAMECHK+5, CHKTYPE+1~*, CHKTYPE+2*, CHKTYPE+5*, CHKTYPE+6 |
>> SCPARM | DELCHK+9 |
>> SCPARM("QUERY | NAME" , DELCHK+8* |
SCPROC | SAVE+10~, SAVE+11*, SAVE+25 |
SCQDEF | SAVE~, SAVE+12, DELETE~, DELETE+12 |
SCQNAME | NAME~, NAME+12, NAMECHK~, NAMECHK+4 |
SCQREC | SAVE+10~, SAVE+12, SAVE+16, SAVE+21, SAVEREC~, SAVEREC+8, SAVEREC+19, SAVEREC+20, SAVFLD~, SAVSEL~ , DELETE+10~, DELETE+12, DELETE+13, DELETE+15, DELCHK~, DELREC~, STRIP~ |
SCQREC("ACCESSID" | SAVEREC+12 |
SCQREC("CREATORID" | SAVEREC+11 |
SCQREC("DESCRIPTION" | SAVEREC+15, SAVEREC+16 |
SCQREC("FIELDS" | SAVFLD+13, SAVFLD+18, SAVFLD+20, STRIP+5, STRIP+6! |
SCQREC("NAME" | SAVEREC+10, DELCHK+8 |
SCQREC("QUERYID" | SAVE+23, SAVEREC+4, SAVFLD+4, SAVSEL+4, DELCHK+4, DELREC+2 |
SCQREC("REPORTID" | SAVEREC+13, STRIP+3, STRIP+9 |
SCQREC("SELECTIONS" | SAVSEL+14, SAVSEL+19, SAVSEL+21, STRIP+11, STRIP+12! |
SCQRY | SAVEREC+1~, SAVEREC+4*, SAVEREC+10, SAVEREC+11, SAVEREC+12, SAVEREC+13, SAVEREC+14, SAVEREC+16, SAVEREC+18, SAVFLD+3~ , SAVFLD+4*, SAVFLD+8, SAVFLD+14, SAVFLD+25, SAVFLD+26, SAVSEL+3~, SAVSEL+4*, SAVSEL+7, SAVSEL+15, SAVSEL+23 , DELCHK+3~, DELCHK+4*, DELCHK+5 |
SCSEL | SAVSEL+3~, SAVSEL+11*, SAVSEL+12*, SAVSEL+14, SAVSEL+15, SAVSEL+20*, SAVSEL+21*, SAVSEL+23 |
SCSTAT | SAVE+10~, SAVE+21*, SAVE+22, SAVE+23 |
SCTYPE | SAVSEL+3~, SAVSEL+13*, SAVSEL+14*, SAVSEL+18*, SAVSEL+19*, SAVSEL+21, STRIP+10*, STRIP+11*, STRIP+12, GETYPE+4* , GETYPE+5, CHKTYPE~, CHKTYPE+2, CHKTYPE+5 |
SCUR | SAVFLD+3~, SAVFLD+19~, SAVFLD+22*, SAVFLD+23, SAVFLD+24, SAVSEL+3~ |
SCUSER | NAME~, NAME+12, NAMECHK~, NAMECHK+3 |
SCVAL | SAVFLD+19~, SAVFLD+20*, SAVFLD+24, SAVFLD+26 |
SCVM | SAVE+10~, SAVE+15*, SAVE+16 |
SCX | GETFLDS+1~, GETFLDS+3*, GETFLDS+4, GETYPE+1~, GETYPE+3*, GETYPE+4, GETYPE+5 |
SDI | NAMECHK+1~ |
U | SAVE+23, SAVERECQ, SAVFLD+9, SAVFLD+24, SAVSEL+8, NAMECHK+4, GETFLDS+4, CHKTYPE+5 |
X | SAVFLD+8*, SAVFLD+9, SAVSEL+7*, DELREC+1~, STRIP+1~ |