Routine: RCDPEDA4

Package	Total	Call Graph
VA FileMan	3	$$EXTERNAL^DILFD $$GET1^DIQ ^DIR
Kernel	1	$$FMTE^XLFDT
List Manager	1	$$SETSTR^VALM1

Package	Total	Caller Graph
Accounts Receivable	2	RCDPEDA2 RCDPEDAR

Entry Points

Name	Comments	DBIA/ICR reference
ERRMSGS(INPUT,IEN3443)	;EP from RCDPEDA2 ; Display any EFT error messages ; Input: INPUT - See EFTERRS for details ; IEN3443 - Internal IEN for file 344.3 ; ^TMP($J,"DEPERRS") - Current Line Count ; Note: Only passed if not in detail mode ; ^TMP($J,"DEPERRS,X) - Error line(s) ; Output: ^TMP($J,"DEPERRS") - Current Line Count ; Note: Only passed if not in detail mode
EFTERRS(INPUT,IEN34431,EFTCTR)	;EP from RCDPEDA2 ; Output any EFT Detail errors ; Input: INPUT - A1^A2^A3^...^An Where: ; A1 - 1 if called from Nightly Process, 0 otherwise ; A2 - 1 if displaying to Listman, 0 otherwise ; A3 - 1 if Detail report, 0 if summary report ; A4 - Current Page Number ; A5 - Stop Flag ; A6 - Start of Date Range ; A7 - End of Date Range ; A8 - Current Line Counter ; A9 - Internal Date being processed ; A10- 1 - Only Display EFTs with a debit flag of 'D' ; 0 - Display all EFTs ; IEN34431 - Internal IEN for file 344.31 ; EFTCTR - Used to store lines for EFT ; ^TMP($J,ONEDEP,0,1) - Deposit Detail line ; ^TMP($J,ONEDEP,EFTCTR) - Current # of lines for EFT ; ^TMP($J,ONEDEP,EFTCTR,xx)- EFT Deposit Lines ; Output ^TMP($J,ONEDEP,EFTCTR) - Updated # of lines for EFT ; ^TMP($J,ONEDEP,EFTCTR,xx)- Updated EFT Deposit Lines
LMHDR(RCSTOP,RCDET,RCNJ,RCDT1,RCDT2,RCHDR,DONLY)	;EP from RCDPEDAR ; ListMan report heading ; Input: RCDET - 1 to display detail, 0 otherwise ; RCNJ - Set 1, indicates report was called from the nightly ; process OR displaying to listman. Used to set lines ; into a ^TMP array instead of displaying them. ; RCDT1 - Internal Start Date of date range ; RCDT2 - Internal End Date of date range ; DONLY - 1 - Only EFTs with debits, 0 - display all EFTs ; RCNP - Payer Selection flag A1^A2^A3 Where: ; A1 - 1 - Range,2 - All,3 -Specific ; A2 - From Payer text (only set if A1=1) ; A3 - Through text (only set if A1=1) ; ^TMP("RCSELPAY",$J,B1) - Selected payers to be displayed ; Output: RCHDR - Array of listman header lines ; RCSTOP - 1 if user stopped
GETTR(IEN34431,INPUT)
DEPBAL(RCDIEN)	;Is the deposit total in balance with EFT amounts ; New subroutine PRCA4.5439 ; If modified, also check DEPBAL^RCDPTAR2 ; Input: RCDIEN - IEN for EDI LOCKBOX DEPOSIT, #344.3
UNBALONLY()	; Allows the user to select filter to only show Balanced, Unbalanced or All deposits ; PRCA4.5439 Added subroutine ; Input: None ; Returns: A - All, B - Balanced, U - Unbalanced, (-1) - User '^' or timeout
RTYPE()	; Allows the user to select the report type (Summary/Detail) ; Input: None ; Returns: 0 - Summary Display ; 1 - Detail Display ; -1 - User up-arrowed or timed out
DTRANGE(STDATE,ENDDATE)	; Allows the user to select the date range to by used ; Input: None ; Output: STDATE = Internal Fileman Date to start at ; ENDDATE - Internal Fileman Date to end at ; Returns: 0 - User up-arrowed or timed out, 1 otherwise
DBTONLY()	; Allows the user to select filter to only show EFTs with debits ; PRCA4.5321 Added subroutine ; Input: None ; Returns: 0 - All EFTs to display ; 1 - Only EFTs with debits to be displayed ; -1 - User up-arrowed or timed out
DUP(INPUT,IEN34431,EFTCTR)	; Check to see if the EFT was a duplicate ; Input: IEN34431 - Internal IEN for file 344.31 ; INPUT - See RPT2 for details ; EFTCTR - Used to store lines for EFT ; ^TMP($J,ONEDEP,EFTCTE) - Current # of lines for EFT ; ^TMP($J,ONEDEP,EFTCTR,xx)- Current Deposit Lines ; Output: ^TMP($J,ONEDEP,EFTCTR) - Updated # of lines for EFT ; ^TMP($J,ONEDEP,EFTCTR,xx)- Updated EFT Lines
EXCELHDR	;Excel header ; PRCA4.5439 Add EXCELHDR tag

Name	Field # of Occurrence
$$EXTERNAL^DILFD	DUP+14
$$GET1^DIQ	ERRMSGS+13, EFTERRS+27, LMHDR+27, GETTR+19, GETTR+20, GETTR+22, GETTR+30, GETTR+32, DEPBAL+20, DUP+12 , DUP+13
^DIR	UNBALONLY+16, RTYPE+9, DTRANGE+9, DTRANGE+16, DBTONLY+12
$$SETSTR^VALM1	LMHDR+51, LMHDR+56, LMHDR+59, LMHDR+61, LMHDR+65, LMHDR+66, LMHDR+67, LMHDR+70
$$FMTE^XLFDT	LMHDR+42, LMHDR+43, DUP+14

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"DEP #^UNBALANCED^DEPOSIT DT^DEP AMOUNT^FMS DEPOSIT STAT^" Line Location: EXCELHDR+2
Function Call: WRITE	Prompt: "EFT #^DATE PD^PAYMENT AMOUNT^ERA MATCH STATUS^ERA^DATE^EFT PAYER TRACE #^CR #^PAYMENT FROM^PAYER TIN^TR #^DEP RECEIPT #^DEP RECEIPT STATUS" Line Location: EXCELHDR+3
Routine Call	DIR Line Location: UNBALONLY+16 RTYPE+9 DTRANGE+9 DTRANGE+16 DBTONLY+12

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

Name	Line Occurrences (* Changed, ! Killed)
^RCY(344.3 - [#344.3]	DEPBAL+16
^RCY(344.31 - [#344.31]	EFTERRS+21, DUP+11
^RCY(344.4 - [#344.4]	GETTR+27
^TMP($J	ERRMSGS+16, ERRMSGS+17, ERRMSGS+18, ERRMSGS+24, ERRMSGS+25, ERRMSGS+26, EFTERRS+24, EFTERRS+25, EFTERRS+26, EFTERRS+34* , EFTERRS+35, GETTR+17, GETTR+18, GETTR+41, GETTR+42, GETTR+48, GETTR+49, DUP+15, DUP+16, DUP+17* , DUP+19, DUP+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CTR	GETTR+14~, GETTR+17, GETTR+24, GETTR+34, GETTR+35, GETTR+36
DEPDATA	DEPBAL+11~, DEPBAL+16*, DEPBAL+17
DETL	ERRMSGS+11~, ERRMSGS+12*
DIR	UNBALONLY+5~, UNBALONLY+16!, RTYPE+5~, DTRANGE+5~, DTRANGE+12!, DBTONLY+6~
DIR("?"	UNBALONLY+12, UNBALONLY+14, UNBALONLY+15, DTRANGE+6, DTRANGE+13, DBTONLY+10, DBTONLY+11*
DIR("A"	UNBALONLY+11, RTYPE+6, DTRANGE+8, DTRANGE+15, DBTONLY+7*
DIR("B"	UNBALONLY+13, RTYPE+8, DTRANGE+14, DBTONLY+9
DIR(0	UNBALONLY+10, RTYPE+7, DTRANGE+7, DTRANGE+15, DBTONLY+8*
DIROUT	UNBALONLY+5~, RTYPE+5~, DTRANGE+5~, DBTONLY+6~
DIRUT	UNBALONLY+5~, RTYPE+5~, DTRANGE+5~, DBTONLY+6~
DONLY	LMHDR~, LMHDR+44
DT	DTRANGE+7, DTRANGE+15
DTOT	DEPBAL+11~, DEPBAL+17*, DEPBAL+19
DTOUT	UNBALONLY+5~, UNBALONLY+19, RTYPE+5~, RTYPE+10, DTRANGE+5~, DTRANGE+10, DTRANGE+17, DBTONLY+6~, DBTONLY+13
DUOUT	UNBALONLY+5~, UNBALONLY+19, RTYPE+5~, RTYPE+10, DTRANGE+5~, DTRANGE+10, DTRANGE+17, DBTONLY+6~, DBTONLY+13
EFTCTR	EFTERRS~, EFTERRS+24, EFTERRS+25, EFTERRS+26, EFTERRS+34, EFTERRS+35, GETTR+18, GETTR+41, GETTR+42, GETTR+48 , GETTR+49, DUP~, DUP+15, DUP+16, DUP+17, DUP+19, DUP+20
EFTDATA	DEPBAL+11~
EFTLN	EFTERRS+22~, EFTERRS+24, EFTERRS+25, EFTERRS+26, EFTERRS+33, EFTERRS+34, EFTERRS+35, GETTR+14~, GETTR+18, GETTR+40 , GETTR+41, GETTR+42, GETTR+47, GETTR+48, GETTR+49, DUP+10~, DUP+15, DUP+16, DUP+17, DUP+18* , DUP+19, DUP+20
ENDDATE	DTRANGE~, DTRANGE+18*
ERRS	ERRMSGS+11~, ERRMSGS+14, EFTERRS+22~
ERRS(	ERRMSGS+21, ERRMSGS+23, EFTERRS+30, EFTERRS+32
IEN3443	ERRMSGS~, ERRMSGS+13
IEN34431	EFTERRS~, EFTERRS+21, EFTERRS+27, GETTR~, GETTR+19, DUP~, DUP+11, DUP+12, DUP+13
IEN3444	GETTR+14~, GETTR+19*, GETTR+20, GETTR+27, GETTR+29
IENS	GETTR+14~, GETTR+29*, GETTR+30
INPUT	ERRMSGS~, ERRMSGS+12, EFTERRS~, GETTR~, DUP~
LNCT	ERRMSGS+11~, ERRMSGS+16, ERRMSGS+17, ERRMSGS+18, ERRMSGS+24, ERRMSGS+25, ERRMSGS+26, GETTR+14~, GETTR+17*
RCBALS	DEPBAL+11~, DEPBAL+12, DEPBAL+14, DEPBAL+16, DEPBAL+19, DEPBAL+20*, DEPBAL+22
RCCT	LMHDR+17~, LMHDR+18, LMHDR+37, LMHDR+38, LMHDR+41, LMHDR+46, LMHDR+47, LMHDR+52, LMHDR+57, LMHDR+62* , LMHDR+68, LMHDR+71
RCDET	LMHDR~, LMHDR+19, LMHDR+36, LMHDR+40, LMHDR+45, LMHDR+48
RCDIEN	DEPBAL~, DEPBAL+14, DEPBAL+16, DEPBAL+20
RCDT1	LMHDR~, LMHDR+42, DTRANGE+15
RCDT2	LMHDR~, LMHDR+43
RCHDR	LMHDR~
RCHDR(	LMHDR+37, LMHDR+38, LMHDR+41, LMHDR+46, LMHDR+47, LMHDR+52, LMHDR+57, LMHDR+62, LMHDR+68, LMHDR+71
RCHDR("TITLE"	LMHDR+20*
RCNJ	LMHDR~
RCSTOP	LMHDR~
>> RCUNBAL	LMHDR+34
RECEIPT	GETTR+14~, GETTR+20, GETTR+21, GETTR+22, GETTR+30, GETTR+31, GETTR+32
RTNFLG	UNBALONLY+5~, UNBALONLY+7, UNBALONLY+19
STDATE	DTRANGE~, DTRANGE+11*
TRDOC	GETTR+14~, GETTR+22, GETTR+23, GETTR+24, GETTR+32, GETTR+33, GETTR+34, GETTR+35, GETTR+36
TRDOCS	GETTR+14~, GETTR+39
TRDOCS(	GETTR+24, GETTR+34, GETTR+35, GETTR+36*, GETTR+45, GETTR+49
U	DEPBAL+17, DEPBAL+19, DEPBAL+20
V	EFTERRS+22~, EFTERRS+28, EFTERRS+29, EFTERRS+30, EFTERRS+31, EFTERRS+32
>> VAUTD	LMHDR+22, LMHDR+30
>> VAUTD(	LMHDR+25
X	LMHDR+17~, DUP+10~, DUP+14*, DUP+17
XX	ERRMSGS+11~, ERRMSGS+13, ERRMSGS+15, ERRMSGS+18, ERRMSGS+19, ERRMSGS+20, ERRMSGS+21, ERRMSGS+22, ERRMSGS+23, EFTERRS+22~ , EFTERRS+23, EFTERRS+26, EFTERRS+27, EFTERRS+32, EFTERRS+35, LMHDR+17~, LMHDR+19, LMHDR+20, LMHDR+27, LMHDR+29 , LMHDR+49, LMHDR+50, LMHDR+51, LMHDR+55, LMHDR+56, GETTR+14~, GETTR+25, GETTR+26, GETTR+27, GETTR+28 , GETTR+29, GETTR+43, GETTR+44, GETTR+45, GETTR+46, GETTR+49, DUP+10~, DUP+12*, DUP+14
Y	LMHDR+17~, UNBALONLY+5~, UNBALONLY+21*, UNBALONLY+23, RTYPE+10, RTYPE+11, DTRANGE+10, DTRANGE+11, DTRANGE+17, DTRANGE+18 , DBTONLY+13, DBTONLY+14
Y(0	DTRANGE+14
YY	EFTERRS+22~, DUP+10~, DUP+13*, DUP+14
Z	LMHDR+17~, LMHDR+30, LMHDR+32, LMHDR+33, LMHDR+34, LMHDR+35, LMHDR+38, LMHDR+42, LMHDR+43, LMHDR+44* , LMHDR+47, LMHDR+51, LMHDR+52, LMHDR+56, LMHDR+57, LMHDR+59, LMHDR+61, LMHDR+62, LMHDR+65, LMHDR+66 , LMHDR+67, LMHDR+68, LMHDR+70, LMHDR+71
Z0	LMHDR+17~, LMHDR+23, LMHDR+24, LMHDR+25, LMHDR+26, LMHDR+27, LMHDR+32*, LMHDR+33
Z1	LMHDR+17~, LMHDR+21, LMHDR+29, LMHDR+30, LMHDR+32*
ZZ	ERRMSGS+11~, ERRMSGS+23*, ERRMSGS+26, GETTR+14~

Customize PDF page

Package: Accounts Receivable

Routine: RCDPEDA4

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Local Variables

Legend: