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