RCDPESR8 ;ALB/TMK - EFT return file field captions ;09-SEP-2003
Source file <RCDPESR8.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DISP(RCMIN,RCMOUT,RCFMT,RCFULL,RCW) | ; Format display for 835 EFT return msg
; RCMIN = the name of the array that contains the raw message data ; The data is contained at the next level and the subscript is ; numeric and greater than 0 OR the data can be at the ; 0-node subsequent to the final subscript. ; If the message array is a global ^TMP($J,"MSG",n), RCMIN ; will equal "^TMP($J,""MSG"")" and the message text will be ; in ^TMP($J,"MSG",1), ^TMP($J,"MSG",2), etc. OR ; the message text can be defined at TMP($J,"MSG",1,0) ^...,2,0) ; etc. ; RCMOUT = the name of the array that should be returned. This array ; will follow the same convention as the input array. The ; array will be returned with a numeric final subscript. If ; RCMOUT is passed as "^TMP($J,""MSG1"")", then the display ; lines will be returned in ^TMP($J,"MSG1",1), ; ^TMP($J,"MSG1",2), etc. Note the array RCMOUT is killed ; on entry to this call ; RCFMT = 0 or null if call should return raw data, 1 to execute the ; transforms attached to the fields ; RCFULL = the name of an array if the data should be returned in ; this array, formatted into lines for display. If not sent, ; only the display data by element is returned in RCMOUT. If ; RCFULL is sent, the array is killed before populating it ; RCW = max # of characters per line to return in array RCFULL |
|
| FMTDSP(RCMUN,RCMFO,RCW) | ; Format the display data in array named in RCMUN into
; lines up to RCW characters wide RCMUN must be set up the same as the ; output of the DISP call above ; Returns array named in RCMFO with the last subscript being the line # ; Note @RCMFO is killed on entry to this call ; Default is 80 if RCW=0 or null |
|
| DISPADJ(RC3444,RCARRAY) | ; Returns formatted lines of ERA level takeback data
; in array @RCARRAY@(n) where n=line #. Data is taken from entry ; # RC3444 in file 344.4, subfile 344.42 |
|
| EFT | ;;HEADER DATA
|
|
| 01 | ;;EFT DETAIL RECORD
|
