ABMMRS4 ; IHS/ASDST/DMJ - STANDALONE TO FIX CORRUPTED DATA IN BILL FILE ;
Source file <ABMMRS4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
INIT | ||
SET | ; Use fileman and re-populate bill file
|
|
SEP | ;Separate pieces from string to re-populate bill file
|
Name | Field # of Occurrence |
---|---|
^DIE | SET+3 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDBILL( | SEP+1, SEP+2 |
^ABMMRS | INIT+4 |
^ABMMRS1( | INIT+2, INIT+3, SEP+6 |
^ABMMRS99( | SEP+1*, SEP+3*, SEP+4* |
Name | Line Occurrences |
---|---|
SEP | INIT+4 |
SET | SEP+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> BDFN | INIT*, INIT+3*, INIT+4, SEP+1, SEP+2, SEP+3, SEP+4, SEP+6, SET+1 |
>> BTYP | SEP+7*, SEP+11* |
>> CLAIM | INIT*, INIT+2*, INIT+3, INIT+4, SEP+1, SEP+3, SEP+4, SEP+6 |
>> CLINIC | SEP+9*, SET+2 |
>> CODE | SEP+9*, SET+2 |
DA | SET+1*, SET+3! |
>> DFN | INIT* |
>> DIE | INIT+1* |
DR | SET+2*, SET+3! |
DUZ(2 | SET+1* |
>> IIEN | SEP+8*, SET+2 |
>> MODE | SEP+8*, SET+2 |
>> PAT | SEP+8*, SET+2 |
>> SITE | INIT*, INIT+4*, SEP+1, SEP+2, SEP+3, SEP+4, SEP+6, SEP+10, SET+1 |
>> STAT | SEP+7*, SET+2 |
>> STR | SEP+6*, SEP+7, SEP+8, SEP+9 |
>> TMP | SEP+2*, SEP+3, SEP+4 |
>> TMPAT | SEP+2*, SEP+3 |
>> TMPBTYP | SEP+2*, SEP+11 |
U | INIT*, SEP+2, SEP+4, SEP+7, SEP+8, SEP+9 |
>> VLOC | SEP+7*, SEP+10*, SET+2 |
>> VTYP | SEP+8*, SET+2 |
>> X | INIT* |
>> Y | INIT* |