IBYRPOST ;ALB/EMG - IB*2*70 POST-INIT ; 21-MAY-97
Source file <IBYRPOST.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Patch IB*2*70 post initialization.
|
|
| OGEN | ; set up check points for post init
|
|
| HOLD | ; modify IB ACTION TYPE entries - place on hold
|
|
| DAYS | ; set NUMBER OF DAYS PT CHARGES HELD field (#7.04) in file #350.9
|
|
| DATE | ; find charges on hold & related 3rd party bills
; set ON HOLD DATE to either: ; - date entry added to file #350 ; - authorization date of 3rd party bill |
|
| BILLDT | ; find authorization date for 3rd party bills
|
|
| REL | ; Auto-release entries on hold for more than 90 days
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | BILLDT+3 |
| ^IB - [#350] | DATE+13, DATE+14 |
| ^IBE(350.1 - [#350.1] | HOLD+4, HOLD+5* |
| ^IBE(350.9 - [#350.9] | DAYS+4* |
| ^TMP($J | DATE+12, BILLDT+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | OGEN+1~, OGEN+2*, OGEN+3*, OGEN+4*, OGEN+5* |
| DFN | DATE+5~, DATE+12*, BILLDT+2 |
| DIERR | DATE+5~, DATE+18 |
| DONE | HOLD+1~, HOLD+2*, HOLD+6, DAYS+1~, DAYS+2*, DAYS+5, DATE+5~, DATE+6*, DATE+20, REL+1~ , REL+2*, REL+7 |
| FDA | DATE+5~ |
| FDA(350 | DATE+16* |
| IBADT | DATE+5~, DATE+11*, BILLDT+1~, BILLDT+3*, BILLDT+4 |
| IBBILL | BILLDT+1~, BILLDT+2*, BILLDT+3 |
| IBDEA | DATE+5~, DATE+11*, DATE+14*, BILLDT+4 |
| IBN | DATE+5~, DATE+12*, DATE+13, DATE+14, DATE+16, BILLDT+2 |
| IBNAME | DATE+5~, DATE+12*, BILLDT+2 |
| IBNUM | DATE+5~, DATE+13*, DATE+18 |
| IBOHDT | DATE+5~, DATE+11*, DATE+14*, DATE+16, BILLDT+4* |
| S1 | HOLD+1~, HOLD+4*, HOLD+5, DAYS+1~ |
| U | HOLD+4, HOLD+5, DAYS+4 |
| Z | OGEN+1~, HOLD+1~, HOLD+4*, DAYS+1~ |
| Z1 | HOLD+1~, HOLD+4*, HOLD+5, DAYS+1~ |