IBCECSA4 ;ALB/CXW - IB CLAIMS STATUS AWAITING RESOLUTION SCREEN ;5-AUG-1999
Source file <IBCECSA4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SMSG | ;select message
|
|
| SMSGQ | ||
| COB | ; COB management link from CSA
|
|
| EDI | ;History detail display
|
|
| EOB | ;View an EOB
|
|
| TPJI | ;Third Party joint Inquiry
|
|
| PBILL | ;Print bill - not for resubmit
; IB*320 - allow action for MRA request claims |
|
| PB1 | ;
|
|
| CANCEL | ;Cancel bill
|
|
| CANCELQ | ||
| CRD | ; enter here if correcting a bill
|
|
| CLONE | ;'Copy/cancel bill' protocol action
|
|
| CLONEQ | ||
| PRO | ; Copy for secondary/tertiary bill
|
|
| PROQ | ||
| RES | ;Resubmit bill by print
|
|
| EBI | ;Edit bill
|
|
| EDITQ | ||
| SEL(IBDA,ONE) | ; Select entry(s) from list
; IBDA = array returned if selections made ; IBDAX(n)=ien of bill selected (file 399) ; ONE = if set to 1, only one selection can be made at a time |
|
| RESUB(IBIFN,TXMT,IBFUNC,IBTBA) | ; Function asks if resubmit as resolution to a
; message is the intention ; IBIFN = ien of bill in file 399 ; TXMT = flag if = 1, assume it's transmittable, don't have to check ; IBFUNC = code to say where the code is called from ; 'E'=edit/authorize 'P'=print 'PX'= print/not to resubmit 'C'=cancel ; IBTBA = transmit bill array returned to calling routine. Optional ; parameter to be passed by reference. ; IBTBA(364ptr)="" |
|
| RESUB1 | ||
| RETXMT | ;
|
|
| RETXMTQ | ||
| MRACHK | ; Restrict access to process REQUEST MRA claims
|
|
| ERRWARN() | ; Display the warning message when someone is about to Resubmit by Print,
; Retransmit or Print a bill that has an error or was rejected. - IB*2*641 ; (US3380). |
|
| LOGATMP(IBDA,USER,CURDAT,ACTION) | ; Log a new entry in the "ARPN" cross-reference
; for an attempt to Resubmit by Print, Retransmit, or Print a claim after ignoring ; the warning message saying the claim has an error or was rejected. |
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^IBM(361 - [#361] | GET1^DIQ |