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 |