Routine: RCDPEDA2

Package	Total	Call Graph
Accounts Receivable	3	(HDR,SL)^RCDPEDA3 ($$DEPBAL,DUP,EFTERRS,ERRMSGS,GETTR)^RCDPEDA4 $$MATCHDT^RCDPEWL7
VA FileMan	2	$$EXTERNAL^DILFD $$GET1^DIQ
Generic Code Sheet	1	$$STATUS^GECSSGET
Kernel	1	$$FMTE^XLFDT
List Manager	1	$$SETSTR^VALM1

Package	Total	Caller Graph
Accounts Receivable	1	RCDPEDAR

Entry Points

Name	Comments	DBIA/ICR reference
RPT2(INPUT)	;EP from RCDPEDAR ; Loop through EDI LOCKBOX DEPOSIT entries ; Input: INPUT - A1^A2^A3^...^An Where: ; A1 - 1 - Called by nightly job, 0 otherwise ; A2 - 1 - Display to list manager, 0 otherwise ; A3 - 1 - Detail report, 0 - Summary report ; A4 - Current Page Number ; A5 - Stop Flag ; A6 - Start of Date Range ; A7 - End of Date Range ; A8 - Current Line Number ; A9 - Internal Date being processed ; A10- 1 - Only Display EFTs with a debit flag of 'D' ; 0 - Display all EFTs ; ^TMP(B1,$J,B2,B3) = "" ; ^TMP(B1,$J,B2,B3,"EFT",B4) = "" Where: ; B1 - "RCDAILYACT" ; B2 - Internal Date from DATE/TIME ADDED ; (344.3, .13) ; B3 - Internal IEN for 344.3 ; B4 - Internal IEN for file 344.31 ; Output: INPUT - A1^A2^A3^...^An - The following pieces ; may be updated ; A4 - Updated Page Number ; A5 - Stop Flag ; A6 - Updated Line number ; ^TMP($J,"TOTALS","DEBIT") - Current Total # of debits for date range ; ^TMP($J,"TOTALS","DEBIT","D") - Total # of debits for Internal date (C1) ; ^TMP($J,"TOTALS","DEBITA") - Current Total Debit Amount for date range ; ^TMP($J,"TOTALS","DEBITA","D") - Total Debit Amount for Internal date (C1) ; ^TMP($J,"TOTALS","DEP",C1) - Total # of deposits by Internal date (C1) ; ^TMP($J,"TOTALS","DEPA",C1) - Total Deposit Amount by Internal date (C1) ; ^TMP($J,"TOTALS","EFT","D") - Total Deposit Amount by EFTs for date ; ^TMP($J,"TOTALS","FMS") - FMS Document Status or "NO FMS DOC" ; ^TMP($J,"TOTALS","FMS","D",-1) - Total Deposit Amount by FMS Document ; ^TMP($J,"TOTALS","FMS","D",0) - Total Amount for Error/Rejected documents ; ^TMP($J,"TOTALS","FMS","D",1") - Total Amount for 'A','M',"F' or 'T' docs ; ^TMP($J,"TOTALS","FMS","D",2") - Total Amount for queued docs ; ^TMP($J,"TOTALS","FMSTOT") - Updated Total Deposit Amount for date range ; ^TMP($J,"TOTALS","MATCH","D") - Current Total matched EFTs for date
ONEDEP(INPUT,IEN3443,TOTDEP,DLNCT)	; Gather and display lines for one Deposit ; PRCA4.5321 new method to first gather all the lines before displaying them ; Input: INPUT - See RPT2 for details ; ^TMP(B1,$J,B2,B3) - See RPT2 for details ; IEN3443 - Internal IEN for file 344.3 ; TOTDEP - Total Deposit Amount (344.3, .08) ; DLNCT - Current # of deposit lines displayed ; ^TMP($J,"DEPERRS") - Current Line Count ; Note: Only passed if not in detail mode ; ^TMP($J,"DEPERRS,X) - Error line(s) ; Output: INPUT - See RPT2 for details ; DLNCT - Updated # of deposit lines displayed ; ^TMP(B1,$J,B2,B3,"EFT",B4) - See RPT2 for details ; ^TMP($J,"TOTALS","DEP",C1) - See RPT2 for details ; ^TMP($J,"DEPERRS") - Updated Line Count ; Note: Only passed if not in detail mode
NEWDHDR(INPUT,DTADD)	; display a new deposit header for the specified date ; Input: INPUT - See RPT2 for details ; DTADD - Internal Date deposit are being displayed for
DETLN(INPUT,IEN3443,TOTDEP)	; Display detail line ; Input: INPUT - See RPT2 for details ; IEN3443 - Internal IEN for file 344.3 ; TOTDEP - Total Deposit Amount (344.3, .08) ; ^TMP($J,"TOTALS","FMS") - FMS Document # or "NO FMS DOC" ; Output: INPUT - A1^A2^A3^...^An - The following pieces may be updated ; A5 - Updated Page Number ; A6 - Stop Flag ; A8 - Updated Line Counter
PROCEFT(INPUT,IEN3443)
EFTDTL(INPUT,IEN3443,IEN34431,RCFMS1,EFTCTR)

Name	Field # of Occurrence
$$EXTERNAL^DILFD	EFTDTL+27
$$GET1^DIQ	RPT2+54, RPT2+58, RPT2+61, RPT2+68, DETLN+16, PROCEFT+37, PROCEFT+39, PROCEFT+46, PROCEFT+47, PROCEFT+48 , PROCEFT+56, EFTDTL+12, EFTDTL+14, EFTDTL+16, EFTDTL+17, EFTDTL+22, EFTDTL+23, EFTDTL+30, EFTDTL+36, EFTDTL+38 , EFTDTL+51, EFTDTL+53
$$STATUS^GECSSGET	RPT2+69, PROCEFT+49
HDR^RCDPEDA3	NEWDHDR+4
SL^RCDPEDA3	ONEDEP+45, ONEDEP+62, ONEDEP+77, ONEDEP+84, NEWDHDR+8, NEWDHDR+9
$$DEPBAL^RCDPEDA4	DETLN+28
DUP^RCDPEDA4	EFTDTL+60
EFTERRS^RCDPEDA4	EFTDTL+59
ERRMSGS^RCDPEDA4	ONEDEP+24
GETTR^RCDPEDA4	EFTDTL+49
$$MATCHDT^RCDPEWL7	EFTDTL+25
$$SETSTR^VALM1	DETLN+21, DETLN+25, DETLN+32, DETLN+33, DETLN+35, EFTDTL+13, EFTDTL+15, EFTDTL+19, EFTDTL+27, EFTDTL+31 , EFTDTL+33, EFTDTL+43, EFTDTL+54, EFTDTL+55
$$FMTE^XLFDT	NEWDHDR+6, DETLN+25, EFTDTL+15

FileNo	Call Tags
^RCY(344 - [#344]	GET1^DIQ
^RCY(344.3 - [#344.3]	GET1^DIQ
^RCY(344.31 - [#344.31]	EXTERNAL^DILFD, GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^RCY(344 - [#344]	RPT2+55
^RCY(344.3 - [#344.3]	DETLN+14, DETLN+17
^TMP("RCDAILYACT"	RPT2+52, PROCEFT+32
^TMP($J	RPT2+44!, RPT2+45!, RPT2+46!, RPT2+47!, RPT2+48!, RPT2+49!, RPT2+56, RPT2+57, RPT2+59, RPT2+60 , RPT2+62, RPT2+64, RPT2+65, RPT2+66, RPT2+71, RPT2+72, RPT2+73, RPT2+75, RPT2+78, RPT2+79* , ONEDEP+19!, ONEDEP+23, ONEDEP+30, ONEDEP+31, ONEDEP+32, ONEDEP+44, ONEDEP+49, ONEDEP+59, ONEDEP+61, ONEDEP+67 , ONEDEP+72, ONEDEP+76, ONEDEP+81, ONEDEP+83, DETLN+34, DETLN+36, PROCEFT+26, PROCEFT+34, PROCEFT+35, PROCEFT+41 , PROCEFT+42, PROCEFT+43, PROCEFT+44, PROCEFT+51, PROCEFT+52, PROCEFT+58, PROCEFT+59, PROCEFT+63, PROCEFT+64, PROCEFT+65 , EFTDTL+28, EFTDTL+32, EFTDTL+34, EFTDTL+44, EFTDTL+45, EFTDTL+56, EFTDTL+57, EFTDTL+58

Name	Line Occurrences
DETLN	ONEDEP+22
EFTDTL	PROCEFT+62
NEWDHDR	ONEDEP+40, ONEDEP+52, ONEDEP+74
ONEDEP	RPT2+81
PROCEFT	ONEDEP+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CRDOC	RPT2+40~, RPT2+61*, RPT2+62, RPT2+63, RPT2+67, RPT2+69
CURLNS	ONEDEP+16~
DEPDT	DETLN+10~, DETLN+16*, DETLN+17, DETLN+23
DEPLNS	ONEDEP+16~, ONEDEP+33*, ONEDEP+38
DEPNUM	DETLN+10~, DETLN+16*, DETLN+17, DETLN+19
DETL	RPT2+40~, RPT2+41, ONEDEP+16~, ONEDEP+17, ONEDEP+19, ONEDEP+21, ONEDEP+26, DETLN+10~, DETLN+12, PROCEFT+24~ , PROCEFT+29, PROCEFT+60
DFLG	PROCEFT+24~, PROCEFT+38*, PROCEFT+40
DLNCT	RPT2+40~, RPT2+50, RPT2+81, ONEDEP~, ONEDEP+38, ONEDEP+39, ONEDEP+43, ONEDEP+50, ONEDEP+51, ONEDEP+54* , ONEDEP+73, ONEDEP+78, ONEDEP+85
DTADD	RPT2+40~, RPT2+41, RPT2+52, RPT2+56, RPT2+57, RPT2+59, RPT2+60, ONEDEP+16~, ONEDEP+18, ONEDEP+40 , ONEDEP+52, ONEDEP+74, NEWDHDR~, NEWDHDR+6, DETLN+10~, PROCEFT+24~, PROCEFT+27*, PROCEFT+32
EFTCTR	ONEDEP+16~, ONEDEP+65, ONEDEP+66, ONEDEP+67, ONEDEP+68, ONEDEP+72, ONEDEP+81, ONEDEP+83, PROCEFT+24~, PROCEFT+26* , PROCEFT+61*, PROCEFT+62, PROCEFT+63, PROCEFT+64, PROCEFT+65, EFTDTL~, EFTDTL+28, EFTDTL+34, EFTDTL+44, EFTDTL+45 , EFTDTL+56, EFTDTL+57, EFTDTL+58, EFTDTL+59, EFTDTL+60
EFTLN	ONEDEP+16~, ONEDEP+79, ONEDEP+80, ONEDEP+81, ONEDEP+82, ONEDEP+83, EFTDTL+11~, EFTDTL+56*, EFTDTL+57, EFTDTL+58
EFTLNS	ONEDEP+16~, ONEDEP+72*, ONEDEP+73
IEN344	RPT2+40~, RPT2+55*, RPT2+61, RPT2+68
IEN3443	RPT2+40~, RPT2+50, RPT2+51, RPT2+52, RPT2+53, RPT2+54, RPT2+58, RPT2+62, RPT2+81, ONEDEP~ , ONEDEP+22, ONEDEP+24, ONEDEP+25, DETLN~, DETLN+14, DETLN+16, DETLN+28, PROCEFT~, PROCEFT+32, PROCEFT+62 , EFTDTL~, EFTDTL+32
IEN34431	RPT2+40~, PROCEFT+24~, PROCEFT+30, PROCEFT+31, PROCEFT+32, PROCEFT+33, PROCEFT+37, PROCEFT+39, PROCEFT+46, PROCEFT+55 , PROCEFT+56, PROCEFT+62, EFTDTL~, EFTDTL+12, EFTDTL+14, EFTDTL+16, EFTDTL+17, EFTDTL+22, EFTDTL+23, EFTDTL+25 , EFTDTL+30, EFTDTL+36, EFTDTL+38, EFTDTL+49, EFTDTL+51, EFTDTL+55, EFTDTL+59, EFTDTL+60
INPUT	RPT2~, RPT2+41, RPT2+51, RPT2+81, ONEDEP~, ONEDEP+17, ONEDEP+18, ONEDEP+20, ONEDEP+22, ONEDEP+24 , ONEDEP+25, ONEDEP+38, ONEDEP+40, ONEDEP+41, ONEDEP+45, ONEDEP+50, ONEDEP+52, ONEDEP+53, ONEDEP+62, ONEDEP+66 , ONEDEP+73, ONEDEP+74, ONEDEP+75, ONEDEP+77, ONEDEP+84, NEWDHDR~, NEWDHDR+4, NEWDHDR+5, NEWDHDR+8, NEWDHDR+9 , DETLN~, DETLN+11, DETLN+12, PROCEFT~, PROCEFT+27, PROCEFT+29, PROCEFT+31, PROCEFT+62, EFTDTL~, EFTDTL+49 , EFTDTL+59, EFTDTL+60
IOSL	ONEDEP+38, ONEDEP+50, ONEDEP+73
LSTMAN	ONEDEP+16~, ONEDEP+20, ONEDEP+38, ONEDEP+50, ONEDEP+73, DETLN+10~, DETLN+11
MDT	EFTDTL+11~, EFTDTL+24, EFTDTL+25, EFTDTL+27
MULT	DETLN+10~, DETLN+14, DETLN+18, DETLN+25
NJ	DETLN+10~, DETLN+11*
PAMT	PROCEFT+24~, PROCEFT+39*, PROCEFT+44, PROCEFT+52
PAY	EFTDTL+11~, EFTDTL+39, EFTDTL+40, EFTDTL+41, EFTDTL+42, EFTDTL+43
PAYER	EFTDTL+11~, EFTDTL+36, EFTDTL+37, EFTDTL+39
PAYID	EFTDTL+11~, EFTDTL+38*, EFTDTL+39
Q	RPT2+40~, RPT2+76, RPT2+77, RPT2+78, RPT2+79
RCDBAL	DETLN+10~, DETLN+28*, DETLN+32
RCDEBIT	EFTDTL+11~, EFTDTL+17*, EFTDTL+18
RCFMS1	PROCEFT+24~, PROCEFT+28, PROCEFT+53, PROCEFT+62, EFTDTL~
RCFMS1(	PROCEFT+55*, EFTDTL+55
TOTDEP	RPT2+40~, RPT2+58*, RPT2+60, RPT2+65, RPT2+72, RPT2+79, RPT2+81, ONEDEP~, ONEDEP+22, DETLN~ , DETLN+35
TRDOC	PROCEFT+24~, PROCEFT+47*, PROCEFT+49
X	RPT2+40~, DETLN+10~, DETLN+21, DETLN+25, DETLN+32, DETLN+33, DETLN+35, DETLN+36, PROCEFT+24~, PROCEFT+48 , PROCEFT+49, PROCEFT+50, PROCEFT+53, PROCEFT+54, EFTDTL+11~, EFTDTL+13, EFTDTL+15, EFTDTL+19, EFTDTL+27, EFTDTL+28 , EFTDTL+31, EFTDTL+33, EFTDTL+34, EFTDTL+43, EFTDTL+44, EFTDTL+50, EFTDTL+54, EFTDTL+55*, EFTDTL+58
XX	RPT2+40~, RPT2+54, RPT2+55, RPT2+56, RPT2+57, RPT2+59, RPT2+60, RPT2+71, RPT2+72, RPT2+74* , RPT2+75, RPT2+78, RPT2+79, ONEDEP+16~, ONEDEP+31, ONEDEP+32, ONEDEP+44, ONEDEP+45, ONEDEP+49, ONEDEP+50 , ONEDEP+54, ONEDEP+57, ONEDEP+58, ONEDEP+59, ONEDEP+60, ONEDEP+61, ONEDEP+76, ONEDEP+77, NEWDHDR+3~, NEWDHDR+6 , NEWDHDR+7, NEWDHDR+8, DETLN+10~, DETLN+17, DETLN+18, DETLN+19, DETLN+21, DETLN+34, DETLN+35, PROCEFT+24~ , PROCEFT+34, PROCEFT+35, PROCEFT+41, PROCEFT+42, PROCEFT+43, PROCEFT+44, PROCEFT+46, PROCEFT+47, PROCEFT+48, PROCEFT+51* , PROCEFT+52, PROCEFT+54, PROCEFT+55, PROCEFT+56, PROCEFT+57, PROCEFT+58, PROCEFT+59, EFTDTL+11~, EFTDTL+12, EFTDTL+13 , EFTDTL+14, EFTDTL+15, EFTDTL+16, EFTDTL+18, EFTDTL+19, EFTDTL+22, EFTDTL+25, EFTDTL+27, EFTDTL+30, EFTDTL+31 , EFTDTL+32, EFTDTL+33, EFTDTL+41, EFTDTL+42, EFTDTL+51*, EFTDTL+52, EFTDTL+53
YY	RPT2+40~, RPT2+64, RPT2+65, RPT2+68, RPT2+69, RPT2+70, RPT2+74, RPT2+76, ONEDEP+16~, ONEDEP+61 , ONEDEP+62, DETLN+10~, DETLN+23, DETLN+25, PROCEFT+24~, PROCEFT+37, PROCEFT+38, PROCEFT+63, PROCEFT+64, PROCEFT+65 , EFTDTL+11~, EFTDTL+23, EFTDTL+27, EFTDTL+41, EFTDTL+42, EFTDTL+53, EFTDTL+54
ZZ	ONEDEP+16~, ONEDEP+29, ONEDEP+30, ONEDEP+32, ONEDEP+33, ONEDEP+83, ONEDEP+84, EFTDTL+11~, EFTDTL+41*

Customize PDF page

Package: Accounts Receivable

Routine: RCDPEDA2

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: