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 |