IBCEST ;ALB/TMP - 837 EDI STATUS MESSAGE PROCESSING ;17-APR-96
Source file <IBCEST.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| UPD361(IBTDA) | ; Update IB BILL STATUS MESSAGES file
 ; IBTDA = ien of return message in file 364.2  | 
|
| UPDTBILL() | ||
| STORE(IB0,IBBTCH,IBMNUM,IBTDA,IBBILL,IBSEQ,IBPID,IB1) | ;
 | 
|
| UPDQ | ||
| BLDMSG(IB1,IBTDA,IBT,IBAUTO) | ; Builds message text
 ; IB1 = flag for batch message ; IBTDA = ien of entry in file 364.2 ; IBT = array returned with message text ; IBAUTO = if passed by reference, returns 1 if text indicates review ; not needed  | 
|
| UPDINS(IBPID,IBINS,IBIFN,IBTDA) | ||
| UPDINSQ | ||
| UPDLOG(UPD,IBDATE,IBINS,IBLOOK,IBTYP,IBID) | ||
| MSGLNSZ(MSG) | ; Change Input Message Lines to be no more than 70 characters long each
 | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(36 - [#36] | Classic Fileman Calls, GET1^DIQ | 
| ^IBM(361 - [#361] | Classic Fileman Calls, WP^DIE | 
| ^IBA(364.2 - [#364.2] | EXTERNAL^DILFD | 
| ^DGCR(399 - [#399] | Classic Fileman Calls |