RCDPXPAP ;WISC/RFJ-CS automatically process the deposits ;1 Jun 99
Source file <RCDPXPAP.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PROCESS(RCDPDATE,RCPAYDA) | ; process the deposits
; rcdpdate is the transmission date; rcpayda is ien for the payment ; type found in ^rc(341.1,rcpayda) |
|
FINDACCT(ACCT) | ; lookup the patient and return the dfn
; if more than one patient matches acct, return null ; acct in the form 123456789ABCDE ; *296 - punctuation added to not process the acct in 9n1.5ap |
|
CHK170 | ;CHECK CS TX 170 FOR VALID BILL NUMER ;PRCA*4.5*301
|
|
FILETRAN(RECTDA,TRANDA,DR) | ; file the payment transaction
|