RCXFMSCR ;WISC/RFJ-fms cash receipt (cr) code sheet generator ;1 Oct 97
Source file <RCXFMSCR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BUILDCR(RCRECTDA,RCGECSDA,RCEFT) | ; generate a cr/tr code sheet for a receipt
; rcgecsda is the ien for the gcs stack file 2100.1 for rebuilds ; rceft = 1 if processing CR for an EFT deposit (CR to rev src cd 8NZZ) ; = 2 if processing TR for the receipt detail relating to an EFT ; (TR from 528704/8NZZ to original fund/rsc) |
|
GETUNAPP(RCRECTDA,RCTRANDA,RCSTORE) | ; get unapplied deposit number for receipt
; if $g(rcstore) store it with transaction |