IBYJPT ;ALB/ARH - PATCH IB*2*55 POST - INITIALIZATION ; 1-AUG-95
Source file <IBYJPT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Patch IB*2*55 post initialization.
|
|
RNB | ; Add to CLAIMS TRACKING NON-BILLABLE REASONS (356.8) a reason of NON-BILLABLE CLINIC
|
|
FLAG | ; insert program flag into existing entries in the two files
|
|
NBSTOP | ; add entries for Third Party Non-Billable Stop Codes to NON-BILLABLE CLINIC STOP CODES (#352.3) file
; Since the MT non-billable flag has been used as a TP non-billable flag, duplicating all MT entries ; that exist for TP will result in the no change in the function |
FileNo | Call Tags |
---|---|
^IBE(352.3 - [#352.3] | Classic Fileman Calls |
^IBE(352.4 - [#352.4] | Classic Fileman Calls |
^IBE(356.8 - [#356.8] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(40.7 - [#40.7] | NBSTOP+8 |
^IBE(352.3 - [#352.3] | FLAG+5, FLAG+6, NBSTOP+6, NBSTOP+7, NBSTOP+9 |
^IBE(352.4 - [#352.4] | FLAG+12, FLAG+13 |
^IBE(356.8 - [#356.8] | RNB+2, RNB+4, RNB+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | FLAG+4~, FLAG+7*!, FLAG+11!, FLAG+14*!, NBSTOP+11*! |
DD | RNB+5!, RNB+7!, NBSTOP+8! |
DIC | RNB+1~, RNB+5*, RNB+7!, NBSTOP+10*, NBSTOP+11! |
DIC(0 | RNB+5*, NBSTOP+10* |
DIE | FLAG+4~, FLAG+7*!, FLAG+11!, FLAG+14*!, NBSTOP+11*! |
DINUM | RNB+1~, RNB+5*, RNB+7! |
DO | RNB+5!, RNB+7!, NBSTOP+8! |
DR | FLAG+4~, FLAG+7*!, FLAG+11!, FLAG+14*!, NBSTOP+11*! |
IBI | RNB+1~, RNB+4*, RNB+5, FLAG+4~, FLAG+5*, FLAG+6, FLAG+7, FLAG+11!, FLAG+12*, FLAG+13 , FLAG+14, NBSTOP+5~, NBSTOP+6*, NBSTOP+7, NBSTOP+10 |
IBX | FLAG+4~, FLAG+6*, FLAG+11!, FLAG+13*, NBSTOP+5~, NBSTOP+7*, NBSTOP+8, NBSTOP+9, NBSTOP+10, NBSTOP+11 |
IBY | NBSTOP+5~, NBSTOP+8* |
U | FLAG+6, FLAG+13, NBSTOP+7, NBSTOP+8, NBSTOP+9, NBSTOP+11 |
X | RNB+5*, NBSTOP+5~, NBSTOP+10*, NBSTOP+11! |
Y | RNB+1~, RNB+6, RNB+7!, NBSTOP+10, NBSTOP+11 |