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 |