Routine: RCDPEDA3

Information

RCDPEDA3 ;AITC/DW - ACTIVITY REPORT ;Feb 17, 2017@10:37:00

Name	Comments	DBIA/ICR reference
HDR(INPUT)	;EP from RCDPEDAR ; Displays report header ; Input: INPUT - A1^A2^A3^...^An Where: ; A1 - 1 if called from Nightly Process, 0 otherwise ; A2 - 1 if displaying to Listman, 0 otherwise ; A3 - 1 if Detail report, 0 if summary report ; A4 - Current Page Number ; A5 - Stop Flag ; A6 - Start of Date Range ; A7 - End of Date Range ; A9 - Current line count ; A10- 1 - Only Display EFTs with a debit flag of 'D' ; 0 - Display all EFTs ; A11- A - All, Display all EFTs ; B - Balanced, Only display EFTs for deposits that are balanced ; U - Unbalanced, Only display EFTs for deposits that are unbalanced ; Output: INPUT - A1^A2^A3^...^An - The following pieces may be updated ; A4 - Current Page Number ; A5 - Stop Flag ; A8 - Updated line count
TOTSDAY(INPUT)	;EP from RCDPEDAR ; Display the totals for the specified date
TOTSF(INPUT)	; EP from RCDPEDAR ; Display Final Totals
ASK()	; Ask to continue ; PRCA4.5321 changed to extrinsic function ; Input: None ; Returns: 1 if user wants to stop, 0 otherwise
SL(INPUT,Z)	;EP from RCDPEDAR & RCDEPA2 ; Writes or stores line

FileNo	Call Tags
^DG(40.8 - [#40.8]	GET1^DIQ