RMPR150P ;VM/RB - FIX PROBLEM FILE #660 ISSUES WITH NEGATIVE AMIS GROUPER COUNTER ;03/27/08
Source file <RMPR150P.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FIXAMIS | ; Post install to correct negative AMIS GROUPER pointers/links caused by
; field GROUPER COUNTER in File #669.9 being set to zero and ; allowing negative pointers to be created. |
|
BUILD | ||
0 | ;FIND 660 RECORDS WITH NEGATIVE 'AMS' POINTERS
|
|
1 | ||
2 | ||
3 | ||
5 | ||
6 | ||
10 | ||
11 | ||
12 | ||
19 | ||
90 | ;correct any sites with NULL/negative AMIS GROUPER number and change to 99999999.
|
|
91 | ||
92 | ||
EXIT | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | 6 |
^RMPR(660 - [#660] | 1, 1+1, 2, 3, 3+1, 6+6* |
^RMPR(668 - [#668] | 3+3, 10, 11, 12, 12+1!, 12+2* |
^RMPR(669.9 - [#669.9] | 5, 5+2, 92, 92+1, 92+2*, EXIT+3* |
^TMP($J | 0+1!, 5+5, 6+1*, EXIT+10! |
^XTMP("RMPR150P" | BUILD!, BUILD+1*, BUILD+2*, BUILD+3*, 5*, 6+3*, 6+4*, 12+3*, 92+3*, EXIT+1* , EXIT+6*, EXIT+7* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | BUILD, EXIT+5, EXIT+9! |
AMS | 1+1*, 2*, 6+4, 12+3, EXIT+8! |
AMSG | 5+2*, 5+3*, 5+4, 5+5*, 5+6*, 6+1, 6+4, 6+6, 12+2, 12+3 , EXIT+8! |
DFN | 1+1*, 1+2, 6, EXIT+8! |
I | EXIT+2*, EXIT+9! |
IEN | 0+1*, 1*, 1+1, 2, 3, 3+1, 3+3, 6+3, 6+4, 6+6 , 10, 11, 12, 12+1, 12+3, 91*, 92*, 92+1, 92+2, 92+3 , EXIT+8! |
LIEN | 1+1!, 3+1*, 3+2, 5+5, 6+1, 6+4, EXIT+9! |
PNAME | 6*, EXIT+8! |
R | 1+1*, 6+3, 92+1*, 92+3, EXIT+8! |
R669 | 5+2*, EXIT+8! |
RLB | 3+1*, EXIT+9! |
RMEND | EXIT+5*, EXIT+7, EXIT+8! |
RMSTART | BUILD*, BUILD+1, BUILD+3, EXIT+8! |
RSTN | 1+1*, 1+3, 5, EXIT+9! |
S10 | 6+8*, 11*, 12, 12+1, 12+2, 12+3, EXIT+8! |
SIEN | 6+8*, 10*, 11, 12+1, 12+2, 12+3, EXIT+8! |
STN | 5*, 5+1, 5+2, 5+4, 5+6, 6+5, EXIT+9! |
TOT | 0+1*, 6+2*, EXIT+8! |
U | 0+1*, 1+1, 3+1, 5+2, 5+6, 6, 6+4, 6+5, 12+3, 92+1 , 92+2, EXIT+3 |
X | EXIT+2*, EXIT+3, EXIT+8! |
XAMS | 12*, 12+1, EXIT+9! |
XSTN | BUILD!, EXIT+1, EXIT+6, EXIT+9! |
XSTN( | 5+1, 5+4*, 5+6*, 6+5*, EXIT+2, EXIT+3 |
XSTN(0 | EXIT+1, EXIT+6 |