IBCEM02 ;ALB/TMP - 837 EDI RESUBMIT BATCH PROCESSING ;12-SEP-96
Source file <IBCEM02.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BATCH2 | ; Resubmit a batch of bills not necessarily in error
|
|
BATCH(IBBDA) | ;
|
|
BATCHQ | ||
RESUB(IBBDA,IBOLD) | ; Resubmit a batch entry # IBBDA in file 364.1
|
|
RESUBQ | ||
RESUBUP | ; Update old entries in file 364 for resubmitted bills, send bulletin
; for bills not resubmitted in batch, if any, update new batch(s) with ; old batch reference |
|
CTDOWN(IBBA,IBCT) | ; Upd the count, incomplete resubmit status on the batch
|
|
CKINC(IBBA) | ;Check to see if batch resubmit is incomplete
; IBBA = internal file 364.1 entry # of batch to check |
|
LOCK(FILE,IBBDA) | ; Lock file # FILE entry # IBBDA
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBA(364 - [#364] | Classic Fileman Calls |
^IBA(364.1 - [#364.1] | Classic Fileman Calls |