DIFG1 ;SFISC/DG(OHPRD)-SINGLE VALUED FIELDS ; [ 02/03/93 3:17 PM ]
Source file <DIFG1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SETDR | ;
|
|
WPFIELD | ;PROCESS WP FIELD
|
|
PARSE | ; PARSE AND CHANGE DIFGSECP IF CONTAINS ";"
|
|
START | ;ASSIGNMENT STATEMENT FOR SINGLE VALUED FIELD
|
|
LOOKUP | ;FIELD LOOKUP
|
|
BUILD | ;
|
|
X2 | ||
X3 | ||
X1 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | START+5, LOOKUP+4 |
^UTILITY("DIFG" | SETDR+1, SETDR+2, SETDR+3, WPFIELD+2*, BUILD+1* |
^UTILITY("DIFG@" | START+4, START+7 |
Name | Line Occurrences |
---|---|
BUILD | WPFIELD+3 |
LOOKUP | START+5 |
PARSE | START+6 |
SETDR | START+3, START+9 |
WPFIELD | START+1 |
X1 | START+1, START+3, START+8 |
X2 | START+4, SETDR+2 |
X3 | LOOKUP+6, LOOKUP+7 |
Name | Field # of Occurrence |
---|---|
^( | SETDR+3*, SETDR+4* |
^("DR" | SETDR+1*, SETDR+2* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DIC | START+5, SETDR+1, SETDR+2, SETDR+3, LOOKUP+4, WPFIELD+2, BUILD+1 |
>> DIFG | LOOKUP+1*, X3* |
>> DIFG("COUNT" | WPFIELD+1*, WPFIELD+2, WPFIELD+3*, WPFIELD+4!, BUILD+1 |
>> DIFG("UNRESOLVED" | START+4 |
>> DIFGALNK | LOOKUP+8 |
>> DIFGDIX | START+2, LOOKUP+2, WPFIELD+3, BUILD+1 |
DIFGDOL | START+10! |
DIFGDOLF | START+10!, PARSE+1* |
>> DIFGENV("LAYGO" | LOOKUP+4 |
>> DIFGER | START+4*, START+8, LOOKUP+6 |
DIFGFLD | START+10! |
>> DIFGFLDN | WPFIELD+2 |
>> DIFGINCR | SETDR+1, SETDR+2, SETDR+3, WPFIELD+2, BUILD+1 |
>> DIFGL | WPFIELD+3* |
DIFGLAGO | LOOKUP+3*, LOOKUP+4*, X3+1! |
>> DIFGLINE | WPFIELD+3 |
>> DIFGNDC | SETDR+3, SETDR+4* |
DIFGNOLK | START+10! |
>> DIFGNUM | START+5, START+7, SETDR+2, SETDR+3, SETDR+4, LOOKUP+4 |
DIFGPARS | START+10!, PARSE+1*, PARSE+2 |
DIFGPC | START+10! |
DIFGSECP | START+2*, START+3, START+4, START+5, START+6, START+7, START+10!, PARSE+1*, PARSE+2* |
>> DIFGTYPE | START+1 |
DIFGVAL | START+3*, START+6*, START+7*, START+10!, SETDR+2, SETDR+3, SETDR+4, LOOKUP+7*, LOOKUP+8* |
>> DIFGY | START+4 |
I | PARSE+1~* |
U | START+4, START+5, LOOKUP+4 |
>> X | LOOKUP+2* |
Y | LOOKUP+7, X3+1! |