DDBRAP ;SFISC/DCL-BROWSER WP ANCHOR PROCESSOR ;NOV 04, 1996@13:53
Source file <DDBRAP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IENROOT(DDBROOT,DDBRLEV) | ;pass root,.variable~by reference to return
; $qs(ddbroot,$ql(ddbroot))~ |
|
| BINDEX(DDBROOT,DDBRNR,DDBRNRN) | ; *FUNCTION* return "B" index root
|
|
| EN | ;create anchors and jumps on existing wp entry
|
|
| DIC(DIC,X,DA) | ;dic call for exaxt match
|
|
| ENP | ;create anchors & jumps and 'P'urge non-referenced jumps
|
|
| ENC | ;create anchors and jumps and "C"lear out all jumps prior to building
|
|
| QS(X1,X2) | ;$QSUBSCRIPT OF GLOBAL STRING
|
|
| QL(X) | ;$QLENGTH OF GLOBAL STRING
|
|
| WP(DDBROOT,DDBRFLG,DDBRTLE) | ;
|
|
| GETR(DDBRWPDD,DDBRENS,DDBRFLG) | ;return root
|
|
| ERR(DDBERR) | ||
| NROOT(DDBROOT) | ; *FUNCTION* return new (negative) root for wp field X-REF
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | GETR+21 |
| ^TMP("DIERR" | GETR+20!, GETR+22! |
| Name | Line Occurrences |
|---|---|
| $$DIC | GETR+18 |
| $$NROOT | WP+7 |
| $$QL | WP+21, WP+22, BINDEX+2, IENROOT+3 |
| $$QS | BINDEX+5, IENROOT+5 |
| EN | ENP+3, ENC+3 |
| ERR | GETR+12 |
| WP | EN+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | QL+1~, QL+2*, QL+3, QS+1~, GETR+8~, GETR+11 |
| %1 | QL+1~, QL+2*, QS+1~, QS+7*, QS+8*, QS+9 |
| DA | DIC~ |
| DDBAXRT | WP+5~, WP+7*, WP+8, WP+9, WP+14 |
| DDBC | EN+1~ |
| DDBERR | ERR~ |
| DDBFLG | EN+1~, EN+6* |
| DDBL | EN+1~ |
| DDBNROOT | WP+5~, WP+7*, WP+8, WP+18, WP+20, WP+24, WP+26 |
| DDBPMSG | EN+1~, EN+7*, EN+9 |
| DDBRA | GETR+4~, GETR+5 |
| DDBRA( | GETR+9, GETR+16, GETR+21 |
| DDBRA("" | GETR+6 |
| DDBRA(0 | GETR+21 |
| DDBRCHK | WP+5~, WP+10*, WP+11* |
| DDBRCHK1 | WP+5~, WP+7*, WP+10*, WP+12 |
| DDBRDA | GETR+4~, GETR+17, GETR+18 |
| DDBRDD | GETR+4~, GETR+16*, GETR+18 |
| DDBREEN | GETR+4~, GETR+16*, GETR+18 |
| DDBREL | GETR+4~, GETR+6*, GETR+14 |
| DDBREN | GETR+4~, GETR+6*, GETR+16* |
| DDBRENS | GETR~, GETR+6, GETR+16 |
| DDBRFLG | WP~, WP+4*, EN+9, ENP+1~, ENP+2*, ENC+1~, ENC+2*, GETR~, GETR+7 |
| DDBRI | WP+6~, WP+14*, GETR+4~, GETR+15*, GETR+16 |
| DDBRIEN | GETR+4~, GETR+6*, GETR+17, GETR+18*, GETR+21 |
| DDBRINDX | WP+5~, WP+7*, WP+10*, WP+12, WP+13, WP+14 |
| DDBRLEV | IENROOT~, IENROOT+5* |
| DDBRLVLS | GETR+4~, GETR+6*, GETR+9, GETR+14, GETR+15 |
| DDBRNR | BINDEX~, BINDEX+5* |
| DDBRNRN | BINDEX~, BINDEX+5* |
| DDBROOT | WP~, WP+2, WP+3, WP+4*, WP+7, WP+10, WP+12, WP+13, WP+21, WP+22 , NROOT~, NROOT+2, BINDEX~, BINDEX+2, BINDEX+4, BINDEX+5, IENROOT~, IENROOT+3, IENROOT+5, IENROOT+6 , GETR+4~ |
| DDBRSUB | WP+5~ |
| DDBRSUBL | WP+5~, BINDEX+1~, BINDEX+2*, BINDEX+3, BINDEX+4, BINDEX+5, IENROOT+2~, IENROOT+3*, IENROOT+4, IENROOT+5 , IENROOT+6 |
| DDBRSX | WP+6~, WP+12*, WP+13*, WP+14 |
| DDBRSXL | WP+6~, WP+12*, WP+13*, WP+14 |
| DDBRSXP | WP+6~, WP+14* |
| DDBRTLE | WP~, WP+4*, WP+17, WP+18, WP+23*, WP+24 |
| DDBRTLER | WP+6~, WP+22*, WP+23 |
| DDBRWPDD | GETR~, GETR+5 |
| DDBRX | WP+6~, WP+16*, GETR+4~, GETR+21*, GETR+23 |
| DDBSA | EN+1~, EN+5*, EN+9 |
| DDBSROOT | WP+5~, BINDEX+1~, BINDEX+4*, BINDEX+5, BINDEX+6, IENROOT+2~ |
| DDBX | EN+1~, EN+3, EN+4 |
| DDBX(4 | EN+6 |
| DDBX(5 | EN+7 |
| DDBX(6 | EN+5 |
| DIAC | GETR+8~, GETR+9* |
| DIC | DIC~, DIC+1 |
| DIC(0 | DIC+2* |
| DIERR | GETR+7, GETR+15, GETR+20!, GETR+22! |
| DIFILE | GETR+8~, GETR+9*, GETR+12 |
| DUZ(0 | GETR+7 |
| IOBM | EN+1~ |
| IOTM | EN+1~ |
| P | ERR~, ERR+2 |
| P(1 | ERR* |
| U | ERR+1~* |
| X | QL~, QL+2, GETR+4~, DIC~, DIC+1, DIC+2 |
| X1 | QS~, QS+2, QS+3, QS+4, QS+5, QS+6, QS+7, QS+9 |
| X2 | QS~, QS+2, QS+3, QS+4, QS+5, QS+6, QS+7, QS+9, QS+10, QS+11 |
| Y | QS+1~, QS+9*, QS+10*, QS+11*, QS+12*, QS+13, GETR+4~, DIC+4 |