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~ |