IB20P385 ;OAK/ELZ - POST INIT ROUTINE FOR IB*2*385 ;5/15/2013
Source file <IB20P385.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENV | ;
; need to make sure we can find the CD entry for 354.1 before we can ; install. |
|
| POST | ;
|
|
| CDFIX | ; - need to find the CD entry in file 354.1 and update the code so it is
; a 2 digit code, going to use 70 since IB ignores that code if passed ; in by the DG package |
|
| KIDSVFA | ; - entry for KIDS doing the VFA clean-up to know to output status bar
|
|
| VFA | ; - clean up since VFA is effective in the past
|
|
| CANCEL(DFN,IBXX) | ; cancel charges from date of last active exemption
|
|
| CANCELQ | ||
| MES(X,T) | ; - display message
|
|
| RESTART | ; - unadvertised entry to restart process from last XTMP patient
|
|
| DFN(DFN) | ; saves DFN into XTMP
|
|
| UP354(DA,IBDT,IBSTAT,IBEXREA) | ; -- calling out separate to update 354
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^IBA(354 - [#354] | Classic Fileman Calls |
| ^IBA(354.1 - [#354.1] | Classic Fileman Calls |
| ^IBE(354.2 - [#354.2] | Classic Fileman Calls |