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

Directly Accessed By Routines, Total: 25

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

Accessed By FileMan Db Calls, Total: 15

Package Total Routines
Accounts Receivable 15 PRCAP214    RCDPEAPQ    RCDPEDA2    RCDPEDA4    RCDPEE    RCDPEM    RCDPEM0    RCDPEM2
RCDPEM3    RCDPENR3    RCDPESR3    RCDPEU2    RCDPTAR    RCDPTAR1    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: 15

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)
.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)
.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
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!, .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)

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, .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)
>> 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*!
X(1 IXADEPSL+1, IXADEPKL+1, IXADEP2SL+1, IXADEP2KL+1
X(2 IXADEPSL+1, IXADEPKL+1, IXADEP2SL+1, IXADEP2KL+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