AGCNVMOD ;IHS/SD/EFG - CONVERT AUPNPAT FIELD 3401 TO A POINTER ;
Source file <AGCNVMOD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EMOD | ;CHANGE FIELD 3401 OF AUPNPAT TO USE POINTER TO ELIGIBILITY
|
|
FIXMOD | ;CHANGE .01 FIELD TO A POINTER
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNPAT - [#9000001] | EMOD+4, EMOD+5, EMOD+7, EMOD+8 |
^DD(9000001 | FIXMOD+12 |
Name | Line Occurrences |
---|---|
FIXMOD | EMOD+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> AG("DFN" | EMOD+2!, EMOD+3*, EMOD+4*, EMOD+5, EMOD+7, EMOD+8, FIXMOD+1, FIXMOD+9 |
>> AG("MODPTR" | EMOD+2!, EMOD+6*, EMOD+7*, EMOD+8, FIXMOD+2, FIXMOD+7, FIXMOD+8 |
DA | FIXMOD+2*, FIXMOD+5~ |
DA(1 | FIXMOD+1*, FIXMOD+3, FIXMOD+9*, FIXMOD+10 |
DD | FIXMOD+5~, FIXMOD+6! |
DIC | FIXMOD+5~, FIXMOD+10* |
DIC("P" | FIXMOD+12* |
DIC(0 | FIXMOD+11* |
>> DIK | FIXMOD+3* |
>> DINUM | FIXMOD+8* |
DLAYGO | FIXMOD+5~, FIXMOD+13* |
DO | FIXMOD+5~, FIXMOD+6! |
U | EMOD+8, FIXMOD+12 |
X | FIXMOD+5~, FIXMOD+7* |
Y | FIXMOD+5~ |