Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^RCY(344.3

Package: Accounts Receivable

Global: ^RCY(344.3

Information

FileMan FileNo	FileMan Filename	Package
344.3	EDI LOCKBOX DEPOSIT	Accounts Receivable

Description

This file is used to store EFT payment data received to allow the site to record the amount of the daily EDI Lockbox deposit to treasury that belongs to their site.

Directly Accessed By Routines, Total: 28

Package	Total	Routines
Accounts Receivable	26	PRCAP214 RCDPE8NZ RCDPEAP RCDPEAR2 RCDPEDA2 RCDPEDA4 RCDPEDAR RCDPEM RCDPEM0 RCDPEM1 RCDPEM6 RCDPEM7 RCDPEREC RCDPESR3 RCDPEU RCDPEUNB RCDPRPL3 RCDPRPLM RCDPTAR RCDPTAR1 RCDPURE1 ^RCY(344.31 RCDPTAR2 ^RCY(344.3 RCDPUREC SUBSEQUENT MAIL MESSAGE

Accessed By FileMan Db Calls, Total: 18

Package	Total	Routines
Accounts Receivable	18	PRCAP214 RCDPEAPQ RCDPEDA2 RCDPEDA4 RCDPEDAR RCDPEE RCDPEM RCDPEM0 RCDPEM2 RCDPEM3 RCDPENR3 RCDPESR3 RCDPEU2 RCDPEUNB RCDPTAR RCDPTAR1 RCDPTAR2 RCP380

Pointed To By FileMan Files, Total: 1

Package	Total	FileMan Files
Accounts Receivable	1	EDI THIRD PARTY EFT DETAIL(#344.31)[.01]

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
Accounts Receivable	1	AR DEPOSIT(#344.1)[.03]

Fields, Total: 16

Field #	Name	Loc	Type	Details
.01	NUMBER	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X I $D(X) S DINUM=X` LAST EDITED: `JAN 20, 2004` HELP-PROMPT: `Type a Number between 1 and 9999999999, 0 Decimal Digits` DESCRIPTION: `This field contains a sequential number generated at the time a record is stored in the file. It only serves to create an entry in the file and has no other special meaning.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `344.3^B` `1)= S ^RCY(344.3,"B",$E(X,1,30),DA)=""` `2)= K ^RCY(344.3,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `344.3^ALOCK^MUMPS` `1)= I '$D(^RCY(344.3,"ALOCK")) S ^RCY(344.3,"ALOCK")=""` `2)= Q` `3)= Do not delete` `This xref is set to allow a lock to be placed on the file so only one job that tries to match EFTs to ERAs is run at a time. This xref is set the first time an entry is added to the file.`
.02	FILE DATE/TIME	0;2	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUN 06, 2002` HELP-PROMPT: `Enter the date/time this record was reported filed by the EFT transaction.` DESCRIPTION: `This field is used to store the file date/time for payments.`
.03	AR DEPOSIT RECORD	0;3	POINTER TO AR DEPOSIT FILE (#344.1)	AR DEPOSIT(#344.1) LAST EDITED: `JAN 11, 2012` HELP-PROMPT: `Enter the AR Deposit ticket # that was created by this EFT.` DESCRIPTION: `This is the reference to the deposit ticket in AR that was created by this EFT.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `344.3^ARDEP` `1)= S ^RCY(344.3,"ARDEP",$E(X,1,30),DA)=""` `2)= K ^RCY(344.3,"ARDEP",$E(X,1,30),DA)` `3)= Do not delete`
.05	MAIL MESSAGE	0;5	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 27, 2003` HELP-PROMPT: `Type a Number between 0 and 999999999999999, 0 Decimal Digits` DESCRIPTION: `This is the number of the mail message in which this EFT was received.`
.06	DEPOSIT NUMBER	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `AUG 12, 2021` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: `This is the deposit number assigned by the banking institution for this payment.` CROSS-REFERENCE: `344.3^C` `1)= S ^RCY(344.3,"C",$E(X,1,30),DA)=""` `2)= K ^RCY(344.3,"C",$E(X,1,30),DA)` `3)= Do not delete` CROSS-REFERENCE: `344.3^AD^MUMPS` `1)= N Z,Z0 S Z=0 F S Z=$O(^RCY(344.3,DA,1,Z)) Q:'Z S Z0=$P($G(^(Z,0)),U,3) I Z0'="" S ^RCY(344.3,"AD",$E(X,1,30),$E(Z0,1,30),DA,Z)=""` `2)= N Z,Z0 S Z=0 F S Z=$O(RCY(344.3,DA,1,Z)) Q:'Z S Z0=$P($G(^(Z,0)),U,3) I Z0'="" K ^RCY(344.3,"AD",$E(X,1,30),$E(Z0,1,30),DA,Z)` `3)= Do not delete` `Xref by deposit number at the top level and payer ID at the 344.31 level` RECORD INDEXES: `ADEP (#289), ADEP2 (#474), AUN (#1698)`
.07	DEPOSIT DATE	0;7	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 12, 2021` DESCRIPTION: `This is the deposit date assigned by the banking institution for this payment.` RECORD INDEXES: `ADEP (#289), ADEP2 (#474), AUN (#1698)`
.08	TOTAL DEPOSIT AMOUNT	0;8	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999999999)!(X<0) X` LAST EDITED: `NOV 04, 2002` HELP-PROMPT: `Type a Dollar Amount between 0 and 999999999999999, 2 Decimal Digits` DESCRIPTION: `This is the amount of the deposit into the banking institution.`
.09	EFT CHECKSUM	0;9	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 27, 2003` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits` DESCRIPTION: `This is the value of the checksum for the detail records in this record. It is used to ensure the records are not changed after the data has been stored and before it has been recorded in AR.`
.1	CHECKSUM ERROR	0;10	SET	'0' FOR NO ERROR; '1' FOR CHECKSUM ERROR EXISTS; LAST EDITED: `JAN 27, 2003` HELP-PROMPT: `Enter a 1 if a checksum error exists.` DESCRIPTION: `This is the indicator that says the checksum stored does not match the calculated checksum for this record.`
.11	DATE POSTED	0;11	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JAN 27, 2003` HELP-PROMPT: `Enter the date the funds for this EFT were posted.` DESCRIPTION: `This is the date the funds for this EFT were posted.`
.12	AMOUNT POSTED TO DEPOSIT	0;12	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999999)!(X<0) X` LAST EDITED: `JAN 28, 2003` HELP-PROMPT: `Type a Dollar Amount between 0 and 999999999999, 2 Decimal Digits` DESCRIPTION: `This is the amount of money that was posted as a deposit as a result of this EFT.` FIELD INDEX: `APOST (#290) MUMPS IR SORTING ONLY` `Short Descr: Xref on pure numeric value of amt posted` `Set Logic: S ^RCY(344.3,"APOST",+X,DA)=""` `Kill Logic: K ^RCY(344.3,"APOST",+X,DA)` `Whole Kill: K ^RCY(344.3,"APOST")` `X(1): AMOUNT POSTED TO DEPOSIT (344.3,.12) (forwards)`
.13	DATE/TIME ADDED	0;13	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JAN 29, 2003` HELP-PROMPT: `Enter the date and time this record was stored in VistA` DESCRIPTION: `This is the date and time this record was last stored in VistA.` CROSS-REFERENCE: `344.3^ARECDT` `1)= S ^RCY(344.3,"ARECDT",$E(X,1,30),DA)=""` `2)= K ^RCY(344.3,"ARECDT",$E(X,1,30),DA)` `3)= Do not delete`
.14	TOTAL AMOUNT MATCHED	0;14	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999999)!(X<0) X` LAST EDITED: `JAN 28, 2003` HELP-PROMPT: `Type a Dollar Amount between 0 and 999999999999, 2 Decimal Digits` DESCRIPTION: `This is the total amount of dollars that have been matched from the EFT detail to ERAs or paper EOBs.` NOTES: `TRIGGERED by the MATCH STATUS field of the EDI THIRD PARTY EFT DETAIL File`
.15	UNBALANCED FLAG	0;15	SET (BOOLEAN Data Type)	a deposit were recieved and filed into VistA. LAST EDITED: `APR 03, 2025` HELP-PROMPT: `Set this flag to 'NO' if this deposit is balanced in VistA` DESCRIPTION: `This flag is set automatically if the deposit total sent from FSC does not match the total of the EFTs sent in the same transmission. The flag may be edited by an authorized user once it is determined that all the EFT for` `a deposit were recieved and filed into VistA.` TECHNICAL DESCR: `In the process where EFTs are received into VistA via a MailMan transmission from FSC, if the amount on the header of the transmission does not match the sum of the EFTs parsed and filed into VistA, this flag is set to` `true.` CROSS-REFERENCE: `344.3^AU` `1)= S ^RCY(344.3,"AU",$E(X,1,30),DA)=""` `2)= K ^RCY(344.3,"AU",$E(X,1,30),DA)` `This cross reference may be used by programmers to identify all EDI Lockbox Deposits that are flagged as unbalanced.` RECORD INDEXES: `AUN (#1698)`
2	ERROR MESSAGES	2;0	WORD-PROCESSING #344.32	DESCRIPTION: `This field stores any error messages that report problems with the incoming transmission.` LAST EDITED: `APR 23, 2002` HELP-PROMPT: `Enter the error messages that report problems with the transaction.` DESCRIPTION: `This word processing field stores any error messages that report problems with the incoming transmission.`
3	SUBSEQUENT MAIL MESSAGE	3;0	Multiple #344.33	344.33 DESCRIPTION: `This multiple stores the numbers of any mail messages containing this EFT that were received after the initial mail message (field #.05) on the same day.`

External References

Name	Field # of Occurrence
^%DT	.02+1, .07+1, .11+1, .13+1
$$FMTE^DILIBF	ID.07+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RCY(344.3 - [#344.3]	IXADEPSL+1, IXADEPKL+1!, IXADEPKEIC+1!, IXADEP2SL+1, IXADEP2KL+1!, IXADEP2KEIC+1!, IXAPOSTSL+1, IXAPOSTKL+1!, IXAPOSTKEIC+1!, IXAUNSL+1 , IXAUNKL+1!, IXAUNKEIC+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .03(XREF 1S), .03(XREF 1K), .06(XREF 1S), .06(XREF 1K), .06(XREF 2S) , .06(XREF 2K), .13(XREF 1S), .13(XREF 1K), .15(XREF 1S), .15(XREF 1K)

Naked Globals

Name	Field # of Occurrence
^(	.06(XREF 2S), .06(XREF 2K)
^(0	ID.06+1, ID.07+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	.02+1, .07+1, .11+1, .13+1
>> DA	IXADEPSL+1, IXADEPKL+1, IXADEP2SL+1, IXADEP2KL+1, IXAPOSTSL+1, IXAPOSTKL+1, IXAUNSL+1, IXAUNKL+1, .01(XREF 1S), .01(XREF 1K) , .03(XREF 1S), .03(XREF 1K), .06(XREF 1S), .06(XREF 1K), .06(XREF 2S), .06(XREF 2K), .13(XREF 1S), .13(XREF 1K), .15(XREF 1S), .15(XREF 1K)
>> DINUM	.01+1*
>> RCY(	.06(XREF 2K)
U	ID.06+1, ID.07+1, .06(XREF 2S), .06(XREF 2K)
X	IXAPOSTSL+1, IXAPOSTKL+1, .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .03(XREF 1S), .03(XREF 1K), .05+1!, .06+1! , .06(XREF 1S), .06(XREF 1K), .06(XREF 2S), .06(XREF 2K), .07+1!, .08+1!, .09+1!, .11+1!, .12+1!, .13+1! , .13(XREF 1S), .13(XREF 1K), .14+1*!, .15(XREF 1S), .15(XREF 1K)
X(1	IXADEPSL+1, IXADEPKL+1, IXADEP2SL+1, IXADEP2KL+1, IXAUNSL+1, IXAUNKL+1
X(2	IXADEPSL+1, IXADEPKL+1, IXADEP2SL+1, IXADEP2KL+1, IXAUNSL+1, IXAUNKL+1
X(3	IXAUNSL+1, IXAUNKL+1
>> Y	.02+1, .07+1, .11+1, .13+1
Z	.06(XREF 2S), .06(XREF 2K)
Z0	.06(XREF 2S), .06(XREF 2K)

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All