IBCEM ;ALB/TMP - 837 EDI RETURN MESSAGE PROCESSING ;17-APR-96
Source file <IBCEM.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
UPD | ; Update messages manually from messages list
|
|
UPDQ | ||
VP | ; View/Print Return Messages
|
|
VPQ | ||
SEL(IBDA,ONE) | ; Select entry(s) from list
; IBDA = array returned if selections made ; IBDA(n)=ien of bill selected in file 399 ; ONE = if set to 1, only one selection can be made at a time |
|
UPDEDI(IBDA,FUNC,NOCT,MSCN) | ; Update EDI files - cancel/resubmit/print as
; resolution to message ; IBDA = transmit bill ien # for bill ; FUNC = "E" for edit/resubmit, "C" for cancel, "R" for resubmit not ; from edit, "P" for print, "Z" for COB processed , "N" for no ; further action needed-close record ; NOCT = 1 if not necessary to update batch count, 0 if update needed ; MSCN = 2 if this call came from CLONE and the cloned claim is a secondary and its primary was an MRA ; (secondaries created from MRA primaries share the same claim#. Do not want to cancel MRA ; associated with the primary, only any EOBs associated with the cloned secondary claim). |
|
DEL | ; Delete messages from messages list - locked with IB SUPERVISOR key
|
|
DELQ | ||
TASK(IBRTN,IBBDA,IBTDA,IBTYP) | ; Schedule the task to update data base from message
; IBRTN = routine to task ; IBBDA = batch # associated with the message (OPTIONAL) ; IBTDA = internal entry of message ; IBTYP = the number that is the last digit in the message type |
|
LOCK(IBTDA) | ; Attempt to lock message file entry IBTDA
; Return 1 if successful, 0 if not able to lock |
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBM(361 - [#361] | Classic Fileman Calls |
361.02 | EXTERNAL^DILFD |
^IBA(364 - [#364] | Classic Fileman Calls |
^IBA(364.2 - [#364.2] | Classic Fileman Calls |