DIKCU2 ;SFISC/MKO-ARRAY COMPARE, TEXT MANIPULATION ;2:40 PM 28 Jan 1998
Source file <DIKCU2.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 3 | BLD^DIALOG ($$FLEVDIFF,$$FROOTDA)^DIKCU $$OREF^DILF |
Name | Comments | DBIA/ICR reference |
---|---|---|
GCMP(DIKCU2A0,DIKCU2B0) | ;
|
|
XRINFO(XR,UIR,LDIF,MAXL,RFILE,IROOT,SS) | ;
|
|
LD(X) | ;Strip leading spaces
|
|
DOWNT | ;Push the T array from element J+1 down
|
|
TR(X) | ;Strip trailing spaces
|
|
UPT | ;Pop the T array from element J+1 down
|
|
WRAP(T,WID,WID1,COD) | ;Wrap the lines in the T array
|
|
ERR(ERR,DIFILE,DIIENS,DIFIELD,DI1,DI2,DI3) | ;Build an error message
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("IX" - [#.11] | XRINFO+2, XRINFO+5, XRINFO+17, XRINFO+18 |
Name | Line Occurrences |
---|---|
$$LD | WRAP+17, WRAP+24, WRAP+30, WRAP+34 |
$$TR | WRAP+24, WRAP+33 |
DOWNT | WRAP+21, WRAP+43 |
UPT | WRAP+35, WRAP+53 |
Name | Field # of Occurrence |
---|---|
^( | XRINFO+17 |
^(0 | XRINFO+5, XRINFO+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
COD | WRAP~, WRAP+15 |
CRV | XRINFO+3~, XRINFO+17*, XRINFO+18 |
DI1 | ERR~ |
DI2 | ERR~ |
DI3 | ERR~ |
DIFIELD | ERR~ |
DIFILE | ERR~ |
DIIENS | ERR~ |
DIKCU2A | GCMP+1~, GCMP+2*, GCMP+3, GCMP+5, GCMP+8, GCMP+12*, GCMP+13, GCMP+14, GCMP+15, GCMP+16 |
DIKCU2A0 | GCMP~, GCMP+2, GCMP+11*, GCMP+13, GCMP+15 |
DIKCU2B | GCMP+1~, GCMP+2*, GCMP+3, GCMP+5, GCMP+8, GCMP+12*, GCMP+13, GCMP+14, GCMP+15, GCMP+16 |
DIKCU2B0 | GCMP~, GCMP+2, GCMP+11*, GCMP+13, GCMP+15 |
DIKCU2DA | GCMP+1~, GCMP+5*, GCMP+6, GCMP+7, GCMP+8 |
DIKCU2DB | GCMP+1~, GCMP+5*, GCMP+6, GCMP+7, GCMP+8 |
DIKCU2E | GCMP+1~, GCMP+10*, GCMP+12, GCMP+14*, GCMP+15*, GCMP+16*, GCMP+17 |
E | WRAP+2~, WRAP+50*, WRAP+51, WRAP+52 |
ERR | ERR~, ERR+3 |
FIL | XRINFO+3~, XRINFO+18*, XRINFO+22 |
FILE | XRINFO+3~, XRINFO+5*, XRINFO+6, XRINFO+8, XRINFO+9, XRINFO+10, XRINFO+13 |
FLD | XRINFO+3~, XRINFO+18*, XRINFO+22 |
I | TR+2~, TR+3*, TR+4, LD+2~, LD+3*, LD+4, ERR+1~, ERR+2* |
IOM | WRAP+5, WRAP+8, WRAP+9 |
IROOT | XRINFO~, XRINFO+15* |
J | WRAP+2~, WRAP+15*, WRAP+16, WRAP+17, WRAP+20, WRAP+22, WRAP+23, WRAP+24, WRAP+27, WRAP+28 , WRAP+29, WRAP+30, WRAP+32, WRAP+33, WRAP+34, WRAP+35*, WRAP+38*, WRAP+39, WRAP+42, WRAP+44 , WRAP+45, WRAP+48, WRAP+49, WRAP+50, WRAP+51, WRAP+52, WRAP+53*, DOWNT+2, DOWNT+3, UPT+2 |
K | DOWNT+1~, DOWNT+2*, UPT+1~, UPT+2* |
LDIF | XRINFO~, XRINFO+1!, XRINFO+9*, XRINFO+10, XRINFO+12* |
MAXL | XRINFO~, XRINFO+1! |
MAXL( | XRINFO+20* |
ML | XRINFO+3~, XRINFO+18*, XRINFO+20, XRINFO+22 |
NAME | XRINFO+3~, XRINFO+5*, XRINFO+6, XRINFO+15 |
ORD | XRINFO+3~, XRINFO+18*, XRINFO+19, XRINFO+20, XRINFO+21 |
P | WRAP+2~, WRAP+22*, WRAP+23, WRAP+24, WRAP+32*, WRAP+33, WRAP+34, ERR+1~, ERR+3 |
P( | ERR+2* |
RFILE | XRINFO~, XRINFO+5*, XRINFO+6, XRINFO+8, XRINFO+9 |
S | XRINFO+3~, XRINFO+17*, XRINFO+22 |
SS | XRINFO~, XRINFO+1!, XRINFO+22* |
SS( | XRINFO+22* |
T | WRAP~, WRAP+1, WRAP+12, WRAP+55* |
T( | WRAP+15, WRAP+17*, WRAP+20, WRAP+22, WRAP+23*, WRAP+24*, WRAP+27, WRAP+28, WRAP+29*, WRAP+30* , WRAP+32, WRAP+33*, WRAP+34*, WRAP+35, WRAP+38, WRAP+42, WRAP+44*, WRAP+45*, WRAP+48, WRAP+49 , WRAP+50, WRAP+51*, WRAP+52*, WRAP+53, DOWNT+2*, DOWNT+3*, UPT+2*, UPT+3! |
T("" | DOWNT+2, UPT+2, UPT+3 |
T(0 | WRAP+12*, WRAP+55! |
T0 | WRAP+2~, WRAP+12*, WRAP+55 |
TYPE | XRINFO+3~, XRINFO+5* |
U | XRINFO+5, XRINFO+18, XRINFO+22 |
UIR | XRINFO~, XRINFO+1!, XRINFO+10*, XRINFO+13*, XRINFO+14, XRINFO+15*, XRINFO+20*, XRINFO+21*, XRINFO+24* |
V | ERR+1~, ERR+2* |
W | WRAP+2~, WRAP+8*, WRAP+9*, WRAP+10*, WRAP+16*, WRAP+20, WRAP+22, WRAP+23, WRAP+27, WRAP+32 , WRAP+39*, WRAP+42, WRAP+44, WRAP+45, WRAP+48, WRAP+50 |
WID | WRAP~, WRAP+4*, WRAP+5*, WRAP+6*, WRAP+8, WRAP+16, WRAP+39 |
WID1 | WRAP~, WRAP+8 |
X | TR~, TR+1, TR+3, TR+4, LD~, LD+1, LD+3, LD+4 |
XR | XRINFO~, XRINFO+2, XRINFO+5, XRINFO+17, XRINFO+18 |