DDUCHK4 ;SFISC/MKO-CHECK INDEXES ON FILE ;6:36 AM 28 Dec 2004
Source file <DDUCHK4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| KILL(GL) | ;Kill a global and print a message
|
|
| CRV | ;Check a Cross-Reference Value
|
|
| CHKBB | ;Check "BB" index (In: DDUCFI = file; DDUCFIX = flag to fix)
|
|
| WMS(S,N) | ||
| FNM | ;Set the NAME for the Index
|
|
| CHKF | ;Check "F" index (In: DDUCFI = file; DDUCFIX = flag to fix)
|
|
| WNE | ||
| CHKIX | ;Check Index DDUCIX found in "B" index
|
|
| WNM | ||
| IXID(IX,NM) | ;Return string that identifies an Index
|
|
| WCHK | ||
| WEN(GL) | ||
| FRF | ;Set Root File equal to File and Root Type to 'INDEX FILE'
|
|
| CHKAC | ;Check "AC index (In: DDUCFI = file; DDUCFIX = flag to fix)
|
|
| WNOIX | ||
| INDEX(DDUCFI,DDUCFIX) | ;Check and optionally fix structure of Index file entry
|
|
| WRITE(TXT,TAB) | ;Write text, wrap at word boundaries.
|
|
| FON | ;Determine Order Number
|
|
| WFMS | ||
| SET(GL,VAL) | ;Set a global and print a message
|
|
| OID(ORD,IX,NM,IXID) | ;Return string that identifies Cross-Reference Value
|
|
| FFILE | ;Set the .01 of index to DDUCFI
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | CRV+27 |
| ^DD("IX" - [#.11] | INDEX+7, CHKIX+9, CHKIX+11, CHKIX+14, CHKIX+32, CRV+9, CRV+28, CHKAC+2, CHKAC+3, CHKAC+4 , CHKBB+3, CHKBB+5, CHKBB+6, CHKBB+7, CHKBB+9, CHKBB+22, CHKF+3, CHKF+5, CHKF+7, CHKF+8 , CHKF+9, FFILE+1*, FRF+1*, FRF+2*, FON+5, FON+10, FON+14*, FNM+1*, IXID+1 |
| Name | Line Occurrences |
|---|---|
| $$IXID | CHKIX+6, CHKIX+21, CHKBB+18, OID+1 |
| $$OID | CRV+17 |
| CHKAC | INDEX+10 |
| CHKBB | INDEX+10 |
| CHKF | INDEX+10 |
| CHKIX | INDEX+7 |
| CRV | CHKIX+32 |
| FFILE | CHKIX+17 |
| FNM | CHKBB+20 |
| FON | CRV+16 |
| FRF | CHKIX+28 |
| KILL | CHKIX+11, CHKAC+6, CHKBB+11, CHKBB+24, CHKF+11 |
| SET | CRV+30 |
| WCHK | INDEX+5 |
| WEN | CHKAC+5, CHKBB+10, CHKBB+23, CHKF+10 |
| WFMS | CRV+27 |
| WMS | CHKIX+16, CHKIX+22, CHKIX+27, CRV+15, CRV+21, CRV+29 |
| WNE | CRV+26 |
| WNM | CHKBB+19 |
| WNOIX | CHKIX+10 |
| WRITE | FFILE+2, FRF+4, FRF+5, FON+15, FNM+2, WNOIX, WMS, WNE, WFMS, WEN , WNM |
| Name | Field # of Occurrence |
|---|---|
| ^( | CRV+28, FON+10 |
| ^(0 | CHKAC+3, CHKF+8, FON+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | CHKIX+36~, CHKIX+37* |
| DDUCFI | INDEX~, INDEX+2, INDEX+7, CHKIX+11, CHKAC+2, CHKAC+3, CHKAC+4, CHKBB+3, CHKBB+5, CHKBB+8 , CHKBB+9, CHKBB+22, CHKF+3, CHKF+5, CHKF+7, CHKF+8, CHKF+9, FFILE+1, FFILE+2, FRF+2 , FRF+3, FRF+4 |
| DDUCFIL | CRV+7~, CRV+11*, CRV+20, CRV+26, CRV+27, CRV+28, WFMS |
| DDUCFIX | INDEX~, INDEX+2*, CHKIX+11, CHKIX+17, CHKIX+28, CHKIX+35, CRV+16, CRV+30, CHKAC+6, CHKBB+11 , CHKBB+20, CHKBB+24, CHKF+11 |
| DDUCFLD | CRV+7~, CRV+11*, CRV+27, CRV+28, CHKF+1~, CHKF+2*, CHKF+3*, CHKF+5, CHKF+7, CHKF+8 , CHKF+9, WFMS |
| DDUCGL | CRV+7~, CRV+28*, CRV+29, CRV+30, CHKAC+1~, CHKAC+4*, CHKAC+5, CHKAC+6, CHKBB+1~, CHKBB+9* , CHKBB+10, CHKBB+11, CHKBB+22*, CHKBB+23, CHKBB+24, CHKF+1~, CHKF+9*, CHKF+10, CHKF+11 |
| DDUCI | FON+1~, FON+9*, FON+10* |
| DDUCIX | INDEX+1~, INDEX+6*, INDEX+7*, CHKIX+6, CHKIX+9, CHKIX+11, CHKIX+14, CHKIX+21, CHKIX+32, CHKIX+37 , CRV+9, CRV+28, CHKAC+1~, CHKAC+2*, CHKAC+3, CHKAC+4, CHKBB+1~, CHKBB+4*, CHKBB+5*, CHKBB+6 , CHKBB+7, CHKBB+9, CHKBB+15*, CHKBB+16, CHKBB+17, CHKBB+18, CHKBB+21, CHKBB+22, CHKF+1~, CHKF+4* , CHKF+5*, CHKF+7, CHKF+8, CHKF+9, FFILE+1, FRF+1, FRF+2, FON+5, FON+10, FON+14 , FNM+1 |
| DDUCIX0 | CHKIX+5~, CHKIX+14*, CHKIX+15, CHKIX+20, CHKIX+25, CHKBB+1~, CHKBB+6*, CHKBB+7, CHKBB+8 |
| DDUCIXID | CHKIX+5~, CHKIX+6*, CHKIX+16, CHKIX+21*, CHKIX+22, CHKIX+27, CRV+15, CRV+17, CHKBB+1~, CHKBB+18* , FFILE+2, FRF+4, FRF+5, FON+15, FNM+2, WNOIX, WNM |
| DDUCNM | CHKIX+5~, CHKIX+20*, CHKIX+21, CHKBB+1~, CHKBB+2*, CHKBB+3*, CHKBB+5, CHKBB+7, CHKBB+8, CHKBB+9 , CHKBB+16*, CHKBB+17, CHKBB+21*, CHKBB+22, FNM+1, FNM+2, WNM |
| DDUCNML | CHKBB+1~, CHKBB+15 |
| DDUCNML( | CHKBB+7*, CHKBB+15, CHKBB+16, CHKBB+17, CHKBB+21 |
| DDUCO | FON+1~ |
| DDUCO( | FON+10* |
| DDUCO("" | FON+11 |
| DDUCOID | CRV+7~, CRV+17*, CRV+21, WNE, WFMS |
| DDUCORD | CRV+7~, CRV+11*, CRV+14, CRV+17, FON+4*, FON+5*, FON+8, FON+11*, FON+12*, FON+14 , FON+15 |
| DDUCRF | CHKIX+5~, CHKIX+25*, CHKIX+26, CRV+26, FRF+3* |
| DDUCRV | CHKIX+5~, CHKIX+31*, CHKIX+32*, CRV+9, CRV+15, CRV+28, CHKF+1~, CHKF+6*, CHKF+7*, CHKF+8 , CHKF+9, FON+5, FON+14, FON+15 |
| DDUCRV0 | CRV+7~, CRV+9*, CRV+10, CRV+11 |
| DIC | CHKIX+36~ |
| DIK | CHKIX+36~, CHKIX+37* |
| >> FIL | WFMS |
| >> FLD | WFMS |
| GL | KILL~, KILL+1, KILL+2, KILL+3, SET~, SET+1, SET+2, SET+3, WEN~ |
| I | WRITE+1~, WRITE+3* |
| IX | IXID~, IXID+1, IXID+2, OID~, OID+1 |
| IXID | OID~, OID+1*, OID+2 |
| N | WMS~ |
| NM | IXID~, IXID+1*, IXID+2, OID~, OID+1 |
| ORD | OID~, OID+2 |
| S | WMS~ |
| TAB | WRITE~, WRITE+2, WRITE+3 |
| TXT | WRITE~, WRITE+2, WRITE+3 |
| TXT( | WRITE+3 |
| TXT(0 | WRITE+3 |
| U | CHKIX+15, CHKIX+20, CHKIX+25, CRV+10, CRV+11, CHKAC+3, CHKBB+7, CHKBB+8, CHKF+8, FFILE+1 , FRF+1, FRF+2, FON+10, FON+14, FNM+1, IXID+1 |
| VAL | SET~, SET+2*, SET+3 |
| X | CHKIX+36~ |