RCDPEAR2 ;ALB/TMK/PJH - EFT Unmatched Aging Report - FILE 344.3 ;Nov 24, 2014@18:31:57
Source file <RCDPEAR2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ; option: EFT Unmatched Aging Report [RCDPE EFT AGING REPORT]
|
|
| EN1Q | ; exit and clean up
|
|
| RPTOUT | ; Entry point for queued job, nightly job
; RCTMPND = name of the subscript for ^TMP to use to return all lines ; If undefined or null, output is printed ; Return global if RCTMPND not null: ^TMP($J,RCTMPND,line#)=line text |
|
| PRTQ | ;
; PRCA*4.5*298, added ListMan check |
|
| HDRNM() | ||
| HDRBLD | ; create the report header
; returns RCHDR, RCPGNUM, RCSTOP ; RCHDR(0) = header text line count ; RCHDR("XECUTE") = M code for page number ; RCHDR("RUNDATE") = date/time report generated, external format ; RCPGNUM - page counter ; RCSTOP - flag to exit |
|
| HDRLM | ; create the Listman header section
; returns RCHDR ; RCHDR(0) = header text line count |
|
| EXCEL | ; Print report to screen, one record per line for export to MS Excel.
; RCTMPND = name of the subscript for ^TMP to use |
|
| PRTQ2 | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^RCY(344.31 - [#344.31] | GET1^DIQ, GETS^DIQ |