RCDPEX5 ;ALB/TMK,DWA - ELECTRONIC EOB EXCEPTION PROCESSING - FILE 344.5 ;8 Aug 2018 21:44:13
Source file <RCDPEX5.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
UPD | ; Update (File) ERA msgs manually from DUPLICATE exception list for file 344.5
|
|
UPDQ | ; fall through or GOTO from above
|
|
VP | ; View/Print ERA Messages - File 344.5
|
|
VPOUT | ; Entrypoint for queued job
|
|
VPQ | ||
SEL(RCDA,ONE) | ; Select entry(s) from list
; RCDA = array returned if selections made ; RCDA(n)=ien of bill selected in file 344.5 ; ONE = if set to 1, only one selection can be made at a time |
|
DEL | ; RCDPEX DELETE DUP MESSAGE option
; Delete messages from messages list - file 344.5 |
|
DELQ | ; fall through or GOTO here
|
|
SNDMLMN(RCLKBXDA) | ; send MailMan message about RCLKBXDA entry in 344.5
|
|
LKBXDEL(RCLKBXDA) | ;Delete entry from AR EDI LOCKBOX MESSAGES file
|
|
TASK(RCRTN,RCLKBXDA) | ;function, Schedule the task to update data base from message
; RCRTN - routine to task ; RCLKBXDA - IEN in file 344.5 ; returns: TaskMan task # |
|
LOCK(RCLKBXDA) | ; Boolean function, lock entry RCLKBXDA in file 344.5
; Return 1 if successful, else zero |
|
HDR(RCTDA,RCPG) | ;Prints report heading
; RCTDA = ien of file 344.5 ; RCPG = page # last printed |
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^RCY(344.5 - [#344.5] | Classic Fileman Calls, GET1^DID, GETS^DIQ |