Routine: RCDPLPSR

Information

RCDPLPSR ;WISC/RFJ-link payments suspense report ;1 Jun 99

Name	Comments	DBIA/ICR reference
REPORT	; report to show payments cleared from suspense in FMS
DQ	; report (queue) starts here
H	; header
MAILMSG(RCRECTDA,RCTRANDA)	; generate message to users showing what needs to be moved out ; of suspense to 5287

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This option will print a report showing all unlinked payments" Line Location: REPORT+4
Function Call: WRITE	Prompt: !,"received between selected dates that were processed to the station's" Line Location: REPORT+5
Function Call: WRITE	Prompt: !,"suspense account and later cleared by on-line FMS input.",! Line Location: REPORT+6
Function Call: WRITE	Prompt: ! Line Location: REPORT+13
Function Call: WRITE	Prompt: !!,"<> please wait <>" Line Location: REPORT+17
Function Call: WRITE	Prompt: !,$P(DATA,"^"),?20,$J(RCTRANDA,5),?30,$P(DATA,"^",2),?50,$P(DATA,"^",3),?70,$J($P(DATA,"^",4),10,2) Line Location: DQ+32
Function Call: WRITE	Prompt: @IOF Line Location: H+1
Function Call: WRITE	Prompt: $C(13),"AR CLEARED SUSPENSE REPORT",?(80-$L(%)),% Line Location: H+2
Function Call: WRITE	Prompt: !," FOR THE DATE RANGE: ",DATEDIS1," TO ",DATEDIS2 Line Location: H+3
Function Call: WRITE	Prompt: !,"RECEIPT",?20,"TRAN#",?30,"UNAPPLIED DEPOSIT#",?50,"CLEAR FMS DOC ID#",?70,$J("AMOUNT",10) Line Location: H+4
Function Call: WRITE	Prompt: !,RCRJLINE Line Location: H+5