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