RCDPEM6 ;OIFO-BAYPINES/RBN - DUPLICATE EFT DEPOSITS AUDIT REPORT ;Jun 11, 2014@18:03:49
Source file <RCDPEM6.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1 | ; entry point for EFT Audit Report
|
|
ENFRMQ | ; entry point from TaskMan Queue
|
|
GENRPRT | ; Generate the report ^TMP array
; INPUT: RCDTRNG - date range for report |
|
DSPRPRT | ; Format display for screen/printer, Excel, or ListMan
; RCDISPTY - display for Excel flag ; RCLSTMGR - display for ListMan flag |
|
PROC(EFTIEN) | ; gather data into ^TMP
; EFTIEN = ien of the EFT |
|
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 ; INPUT: ; RCDISPTY - Display/print/Excel flag ; RCRTYP - Report Type (EOB or ERA) ; RCDTRNG - selected dates |
|
HDRLM | ; create the Listman Screen header section
; returns RCHDR ; RCHDR(0) = header text line count ; INPUT: ; RCDTRNG - selected dates |
|
HDRNM() | ||
EXIT | ;
|
|
INFO | ; Useful Info for Excel capture
|
|
WP(JC) | ; format justification comments
; JC - Justification Comment |
|
NOW() | ;function, Returns current date/time in format mm/dd/yy@hh:mm:ss
|
Name | Field # of Occurrence |
---|---|
^%ZIS | EN1+32 |
HOME^%ZIS | EN1+38 |
^%ZISC | EXIT+2 |
^%ZTLOAD | EN1+36 |
$$GET1^DIQ | PROC+25, PROC+26 |
$$ASKLM^RCDPEARL | EN1+20 |
$$ENDORPRT^RCDPEARL | DSPRPRT+32 |
$$NOW^RCDPEARL | HDRBLD+12 |
$$PAD^RCDPEARL | DSPRPRT+22, DSPRPRT+24, DSPRPRT+25, HDRBLD+36, HDRBLD+37, HDRBLD+39, HDRLM+21, HDRLM+22, HDRLM+24 |
ASK^RCDPEARL | EXIT+1 |
HDRLST^RCDPEARL | DSPRPRT+15, DSPRPRT+20 |
LMRPT^RCDPEARL | EN1+29 |
SL^RCDPEARL | DSPRPRT+19, DSPRPRT+22, DSPRPRT+23, DSPRPRT+25, DSPRPRT+26, DSPRPRT+30, DSPRPRT+32, WP+13 |
$$DISPTY^RCDPEM3 | EN1+16 |
$$DTRNG^RCDPEM4 | EN1+12 |
$$ISTYPE^RCDPEU1 | GENRPRT+17 |
$$RTYPE^RCDPEU1 | EN1+13 |
$$FMTE^XLFDT | PROC+17, HDRBLD+30, HDRBLD+31, HDRLM+12, HDRLM+13, NOW+1 |
$$NOW^XLFDT | NOW+1 |
$$NAME^XUSER | PROC+16 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^RCY(344.31 - [#344.31] | GET1^DIQ |
Name | Field # of Occurrence |
---|---|
^(3 | PROC+15 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | EN1+32* |
AMT | PROC+3~, PROC+20*, PROC+27 |
CMNT | WP+3~ |
CMNT( | WP+7*, WP+10*, WP+11*, WP+13 |
CNT | DSPRPRT+5~, DSPRPRT+16*, DSPRPRT+18*, DSPRPRT+30 |
CNTR | WP+3~, WP+7*, WP+10*, WP+11, WP+13 |
DEPNO | PROC+3~, PROC+23*, PROC+24*, PROC+27 |
DIV | HDRBLD+18~, HDRLM+8~ |
DUPEFT | DSPRPRT+5~, DSPRPRT+18*, DSPRPRT+19, DSPRPRT+22, DSPRPRT+23, DSPRPRT+24, DSPRPRT+25, DSPRPRT+26 |
EFTIEN | GENRPRT+3~, GENRPRT+16*, GENRPRT+17, GENRPRT+18, PROC~, PROC+15, PROC+17, PROC+25, PROC+26 |
EFTLID | PROC+3~, PROC+25*, PROC+27 |
FRSTDT | GENRPRT+3~, GENRPRT+10*, GENRPRT+12 |
H | EN1+24~, EN1+26*, EN1+28* |
HCNT | HDRBLD+18~, HDRBLD+19*, HDRBLD+21*, HDRBLD+27*, HDRBLD+32*, HDRBLD+33*, HDRBLD+35*, HDRBLD+36*, HDRBLD+38*, HDRBLD+40* , HDRBLD+41*, HDRBLD+43, HDRLM+8~, HDRLM+9*, HDRLM+14*, HDRLM+15*, HDRLM+19*, HDRLM+20*, HDRLM+21*, HDRLM+23* , HDRLM+25*, HDRLM+27 |
HDR | EN1+24~, EN1+29 |
HDR( | EN1+26* |
HDR("TITLE" | EN1+25* |
I | EN1+1~, WP+3~, WP+8*, WP+9, WP+13* |
INDXDT | GENRPRT+3~, GENRPRT+12*, GENRPRT+15*, GENRPRT+16 |
IO | EN1+40 |
IO("Q" | EN1+33, EN1+38! |
IOSL | DSPRPRT+20 |
JC | WP~, WP+2, WP+7, WP+9 |
JUST | PROC+3~, PROC+18*, PROC+27 |
L | EN1+24~*, EN1+26*, EN1+27, EN1+28 |
LINE | DSPRPRT+5~ |
LSTDT | GENRPRT+3~, GENRPRT+11*, GENRPRT+15 |
N | EN1+28~* |
PAYER | PROC+3~, PROC+19*, PROC+27 |
PCS | WP+3~, WP+7*, WP+8 |
>> POP | EN1+32 |
PTR | PROC+3~, PROC+21*, PROC+23 |
RCDISPTY | EN1+1~, EN1+16*, EN1+18, DSPRPRT+19, DSPRPRT+29, HDRBLD+14 |
RCDTRNG | EN1+1~, EN1+12*, GENRPRT+10, GENRPRT+11, HDRBLD+29, HDRLM+11 |
RCHDR | EN1+1~, DSPRPRT+15, DSPRPRT+20, HDRBLD+12!, HDRLM+6! |
RCHDR( | EN1+26, EN1+27, EN1+28, HDRBLD+21*, HDRBLD+27*, HDRBLD+32*, HDRBLD+33*, HDRBLD+35*, HDRBLD+36*, HDRBLD+38* , HDRBLD+40*, HDRBLD+41*, HDRLM+14*, HDRLM+15*, HDRLM+19*, HDRLM+20*, HDRLM+21*, HDRLM+23*, HDRLM+25* |
RCHDR("RUNDATE" | HDRBLD+12*, HDRBLD+23 |
RCHDR("XECUTE" | HDRBLD+15*, HDRBLD+22* |
RCHDR(0 | DSPRPRT+20, HDRBLD+15*, HDRBLD+43*, HDRLM+27* |
RCHDR(1 | HDRBLD+16* |
RCLNCNT | DSPRPRT+5~, DSPRPRT+14*, DSPRPRT+19, DSPRPRT+22, DSPRPRT+23, DSPRPRT+25, DSPRPRT+26, DSPRPRT+30, DSPRPRT+32, WP+13 |
RCLSTMGR | EN1+1~, EN1+10*, EN1+14*, EN1+18*, EN1+20*, EN1+21, DSPRPRT+11, DSPRPRT+12, DSPRPRT+15, DSPRPRT+20 , HDRBLD+35, EXIT+1 |
RCPGNUM | EN1+1~, HDRBLD+12*, HDRBLD+15*, HDRLM+6* |
RCRD | PROC+3~ |
RCRD(0 | PROC+15*, PROC+19, PROC+20, PROC+21 |
RCRD(3 | PROC+15*, PROC+16, PROC+18 |
RCSTOP | EN1+1~, EN1+10*, DSPRPRT+15, DSPRPRT+17, DSPRPRT+20, DSPRPRT+29, DSPRPRT+32, HDRBLD+12*, HDRLM+6*, EXIT+1 |
RCTMPND | EN1+1~, EN1+15*, EN1+22*, EN1+28, EN1+29, DSPRPRT+14, DSPRPRT+19, DSPRPRT+22, DSPRPRT+23, DSPRPRT+25 , DSPRPRT+26, DSPRPRT+30, DSPRPRT+32, WP+13 |
RCTYPE | EN1+1~, EN1+13*, GENRPRT+17, HDRBLD+26, HDRLM+18 |
RDT | DSPRPRT+5~, DSPRPRT+16*, DSPRPRT+17*, DSPRPRT+18 |
RMTYPE | PROC+3~, PROC+26*, PROC+27 |
RTRNDT | PROC+3~, PROC+17*, PROC+27 |
SP | INFO+1~*, INFO+2, INFO+3, INFO+4, INFO+5, INFO+6, INFO+7, INFO+8, INFO+9, INFO+10 |
TRACE | PROC+3~, PROC+20*, PROC+27 |
U | EN1+18, GENRPRT+10, GENRPRT+11, DSPRPRT+22, DSPRPRT+23, DSPRPRT+24, DSPRPRT+25, DSPRPRT+26, PROC+16, PROC+17 , PROC+18, PROC+19, PROC+20, PROC+21, PROC+23, HDRBLD+29, HDRLM+11 |
USER | PROC+3~, PROC+16*, PROC+27 |
X | EN1+1~, GENRPRT+3~ |
Y | EN1+1~, GENRPRT+3~, DSPRPRT+5~, DSPRPRT+22*, DSPRPRT+23*, DSPRPRT+24*, DSPRPRT+25*, DSPRPRT+30*, HDRBLD+18~, HDRBLD+21* , HDRBLD+23*, HDRBLD+25*, HDRBLD+26*, HDRBLD+27, HDRBLD+30*, HDRBLD+31*, HDRBLD+32, HDRBLD+34!, HDRBLD+36*, HDRBLD+37* , HDRBLD+38, HDRBLD+39*, HDRBLD+40, HDRBLD+41*, HDRLM+8~, HDRLM+12*, HDRLM+13*, HDRLM+15, HDRLM+16!, HDRLM+17* , HDRLM+18*, HDRLM+19, HDRLM+21*, HDRLM+22*, HDRLM+23, HDRLM+24*, HDRLM+25, WP+3~, WP+9*, WP+10 , WP+11 |
Y( | HDRBLD+30*, HDRLM+12* |
Y("1ST" | HDRBLD+29*, HDRBLD+31, HDRLM+11*, HDRLM+13 |
Y("LST" | HDRBLD+29*, HDRBLD+31, HDRLM+11*, HDRLM+13 |
ZTDESC | EN1+34~, EN1+35* |
>> ZTQUEUED | EXIT+1 |
ZTRTN | EN1+34~, EN1+35* |
ZTSAVE | EN1+34~ |
ZTSAVE("RC*" | EN1+35* |
ZTSAVE("VAUTD" | EN1+35* |
ZTSK | EN1+34~, EN1+37 |