Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 344.01

Package: Accounts Receivable

AR BATCH PAYMENT(#344)-->344.01

Sub-Field: 344.01


Information

Parent File Name Number Package
AR BATCH PAYMENT(#344) TRANSACTION 344.01 Accounts Receivable

Details

Field # Name Loc Type Details
.01 TRANSACTION 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
  • LAST EDITED:  MAR 13, 2003
  • HELP-PROMPT:  Type a Number between 1 and 99999, 0 Decimal Digits
  • DESCRIPTION:  
    This DINUM field is the entry number for each transaction within a receipt. This field is sequentially assigned by the computer.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  344.01^B
    1)= S ^RCY(344,DA(1),1,"B",$E(X,1,30),DA)=""
    2)= K ^RCY(344,DA(1),1,"B",$E(X,1,30),DA)
    This x-ref is used for look-up and sorting by FileMan.
  • CROSS-REFERENCE:  344^AN01^MUMPS
    1)= I '$P($G(^RCY(344,DA(1),1,DA,0)),"^",3),$$EDILB^RCDPEU(DA(1))'=1 S ^RCY(344,"AN",DA(1),DA)=""
    2)= K ^RCY(344,"AN",DA(1),DA)
    This cross reference is used to build the list of payments that are unlinked. An unlinked payment does not have an entry in field .03. The cross reference for field .03 will remove the cross reference when the field is
    populated. EDI Lockbox deposit receipts will not have an entry in the .03 field, but are excluded from this xref since the funds are not deposited into suspense but are instead placed in FUND 5287/revenue source code
    8NZZ.
.02 CONFIRMATION # 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  FEB 22, 1992
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • DESCRIPTION:  
    This data should reflect the confirmation number that the credit card machine returns when entering credit card payments.
.03 ACCOUNT 0;3 VARIABLE POINTER
************************REQUIRED FIELD************************
ACCOUNTS RECEIVABLE(#430)  PATIENT(#2)  

  • LAST EDITED:  APR 26, 1999
  • DESCRIPTION:  This field is used to store where the payment should be applied. If the payment is associated to a specific bill, then the payment will be applied to the bill first and any money left over will be applied to any other
    bills the patient has remaining. If the bill is not a patient bill, then the money will be applied to the specific bill and any money left over will be refunded.
    If this field is associated with a Patient, then the program will automatically search the patient bills and apply payments to their respective bills until the payment is exhausted.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
    TRIGGERED by the PATIENT NAME OR BILL NUMBER field of the TRANSACTION sub-field of the AR BATCH PAYMENT File
  • CROSS-REFERENCE:  344^AC^MUMPS
    1)= S:X[";DPT(" ^RCY(344,"AC",X,DA(1),DA)="" I X[";PRCA(430,",$D(^RCD(340,+$P(^PRCA(430,+X,0),"^",9),0)) S ^RCY(344,"AC",$P(^RCD(340,+$P(^PRCA(430,+X,0),"^",9),0),"^"),DA(1),DA)=""
    2)= K:X[";DPT(" ^RCY(344,"AC",X,DA(1),DA) I X[";PRCA(430,",$D(^RCD(340,+$P(^PRCA(430,+X,0),"^",9),0)) K ^RCY(344,"AC",$P(^RCD(340,+$P(^PRCA(430,+X,0),"^",9),0),"^"),DA(1),DA)
    3)= NEEDED FOR ACCOUNT PROFILE
    This cross-reference is needed to display payments not yet posted to patient accounts during the use of the "Account Profile" option.
  • CROSS-REFERENCE:  344^AACCT
    1)= S ^RCY(344,"AACCT",$E(X,1,30),DA(1),DA)=""
    2)= K ^RCY(344,"AACCT",$E(X,1,30),DA(1),DA)
    This cross reference is used to lookup payments by account. This is especially useful when determining the pending payments for an account.
  • CROSS-REFERENCE:  344^AN03^MUMPS
    1)= K ^RCY(344,"AN",DA(1),DA)
    2)= S ^RCY(344,"AN",DA(1),DA)=""
    This cross reference is used to build the list of payments that are unlinked. An unlinked payment does not have an entry in field .03. This cross reference is initially set when the .01 entry is added to the file.
.04 PAYMENT AMOUNT 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999.99)!(+X'>0) X S:$D(X) X=$J(X,0,2) I $D(X) D CHGAMT^RCDPURED I $D(X) D PAYCHK^RCDPURED
  • LAST EDITED:  MAY 07, 1999
  • HELP-PROMPT:  Type a Dollar Amount between .01 and 999999.99, 2 Decimal Digits
  • DESCRIPTION:  
    This field is the amount of payment to be posted to A/R.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.05 AMOUNT PROCESSED 0;5 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
  • LAST EDITED:  MAR 05, 1992
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits
  • DESCRIPTION:  Once payments begin to post to bills, this field will reflect the amount of payment actually processed. For example, if the payment amount is $20.00 and only $15.00 of the payment could be applied, this field would
    reflect the $15.00 processed.
.06 DATE OF PAYMENT 0;6 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X D:$D(X) PAYDATE^RCDPURED
  • LAST EDITED:  MAY 11, 1999
  • HELP-PROMPT:  Type a valid date for payment. Cannot be in future or over a month in past.
  • DESCRIPTION:  Date of Payment represents the date the payment was received and should be credited to the account. For example, if the payment was received yesterday, but due to time-delays is being input today, this field should be
    set to T-1 (yesterday). This is necessary so the patient will get credit for paying bills on time. If the patients' payment date was, for example, 5/10/92 and the payment was received 5/9/92 but is being input on
    5/12/92, this field should have 5/9/92. If 5/12/92 is entered, the patient will be incorrectly charged interest and administrative charges.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.07 CHECK # 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  MAY 23, 2011
  • HELP-PROMPT:  Answer must be 1-50 characters in length.
  • DESCRIPTION:  If available the check # should be entered for check payments. This information will be valuable for tracking 'lost' payments or to provide information for patient inquiries. The check number will be logged with the
    payment transaction for each bill to which the payment is applied.
.08 CHECK BANK/ROUTING # 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  DEC 23, 1998
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • DESCRIPTION:  If available, the bank # should be entered for check payments. This information will be valuable for tracking 'lost' payments or to provide information for patient inquiries. The check number will be logged with the
    payment transaction for each bill to which the payment is applied.
.09 PATIENT NAME OR BILL NUMBER 0;9 FREE TEXT

  • INPUT TRANSFORM:  D PNORBILL^RCDPURED K:'$G(X) X
  • OUTPUT TRANSFORM:  S Y=$P(@("^"_$P(Y,";",2)_+Y_",0)"),"^")
  • LAST EDITED:  JUN 19, 2017
  • HELP-PROMPT:  Enter one of following: Patient Name, Bill No, TRICARE Authorization No, ECME Rx Reference Number or Prescription Number.
  • EXECUTABLE HELP:  D HLP09^RCDPURED
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  ^^TRIGGER^344.01^.03
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^RCY(344,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S X=DIV,X=X X ^DD(344.01,.09,1,1,1.4)
    1.4)= S DIH=$S($D(^RCY(344,DIV(0),1,DIV(1),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=344.01,DIG=.03 D ^DICR:$O(^DD(DIH,DIG,1,0))
    2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^RCY(344,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X="" X ^DD(344.01,.09,1,1,2.4)
    2.4)= S DIH=$S($D(^RCY(344,DIV(0),1,DIV(1),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=344.01,DIG=.03 D ^DICR:$O(^DD(DIH,DIG,1,0))
    3)= Needed to set Account field
    CREATE VALUE)= INTERNAL(#.09)
    DELETE VALUE)= @
    FIELD)= ACCOUNT
    This field allows a customized look-up to the Patient file and Bill number file when prompting the user for "PATIENT NAME OR BILL NUMBER" during payment entry. Once the user selects the Patient or Bill Number, this data
    is then moved to the "Account" field for VA FileMan Compatiblity for printing.
.1 DATE OF CHECK 0;10 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 29, 1992
  • DESCRIPTION:  If available, the date appearing at the top of the check should be entered for check payments. This information will be valuable for tracking 'lost' payments or to provide information for patient inquiries. The Date of
    Check will be logged with the payment transaction for each bill to which payment is applied.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.11 CREDIT CARD # 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>16!($L(X)<10)!'(X?1N.N) X
  • LAST EDITED:  DEC 10, 1998
  • HELP-PROMPT:  Answer must be 10-16 characters in length.
  • DESCRIPTION:  If available, the credit card # should be entered for credit card payments. This information will be valuable for tracking 'lost' payments or to provide information for patient inquiries. The Credit Card number will be
    logged with the payment transaction for each bill to which payment is applied.
.12 ENTERED BY 0;12 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  FEB 25, 1993
  • DESCRIPTION:  
    This field contains the person who entered the payment into the AR system.
.13 CHECK ACCOUNT # 0;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<1) X
  • LAST EDITED:  JAN 07, 1999
  • HELP-PROMPT:  Answer must be 1-9 characters in length.
  • DESCRIPTION:  
    This field is used to store the account number from a check.
.14 EDITED BY 0;14 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 16, 2003
  • DESCRIPTION:  
    This field contains the person who edited the payment entry into the AR system.
.15 LOCKBOX TRANSACTION CODE 0;19 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<100)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 28, 2016
  • HELP-PROMPT:  Type a number between 100 and 999, 0 decimal digits.
  • DESCRIPTION:  
    This field indentifies the transaction type as the receipt is posted or re-processed.
.21 ACCOUNT LOOKUP 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  SEP 02, 1998
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • DESCRIPTION:  This field is used to store the account lookup information. The account lookup information is obtained from automatic payment processing. The account lookup information may not be successful in finding the correct
    account and is stored for manual linking of the account by the user.
.22 BATCH NUMBER 2;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 02, 1998
  • HELP-PROMPT:  Type a Number between 1 and 99999, 0 Decimal Digits
  • DESCRIPTION:  
    The batch number in combination with the sequence number is supplied by automatic payment processing and is used to identify the payment at the central bank.
.23 SEQUENCE NUMBER 2;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 02, 1998
  • HELP-PROMPT:  Type a Number between 1 and 99999, 0 Decimal Digits
  • DESCRIPTION:  
    The sequence number in combination with the batch number is supplied by automatic payment processing and is used to identify the payment at the central bank.
.24 PAYMENT TYPE 2;4 SET
  • '1' FOR CASH;
  • '2' FOR CHECK;
  • '3' FOR CREDIT CARD;

  • LAST EDITED:  DEC 23, 1998
  • DESCRIPTION:  
    This field is used to identify the type of payment used by automatic payment processing.
.25 UNAPPLIED DEPOSIT NUMBER 2;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>13!($L(X)<13) X
  • LAST EDITED:  JAN 20, 1999
  • HELP-PROMPT:  Answer must be 13 characters in length.
  • DESCRIPTION:  
    This field stores the unapplied deposit number used on the Cash Receipt document when referencing the suspense fund.
.26 CLEAR SUSPENSE FMS DOC ID# 2;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  APR 28, 1999
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • DESCRIPTION:  
    This field is used to enter the FMS Document ID Number used to clear a payment from suspense in FMS.
  • DELETE TEST:  1,0)= I 1 W !,"You cannot delete this value. Use lowercase x to override current value."
.27 ERA WORKLIST SEQUENCE 0;27 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 29, 2003
  • HELP-PROMPT:  Type a Number between 1 and 99999, 0 Decimal Digits
  • DESCRIPTION:  
    This is the ien of the entry in file 344.491 that was used to create this line in the receipt.
.28 AUTO DECREASE ADJUSTMENT 0;28 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 09, 2003
  • HELP-PROMPT:  Enter 1 if there is a decrease adjustment from EOB Worklist for this payment.
  • DESCRIPTION:  
    This is the flag that indicates the EOB Worklist has a pending decrease adjustment for this payment.
1.01 POSTING ERROR 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  FEB 22, 1992
  • HELP-PROMPT:  Answer must be 1-60 characters in length.
  • DESCRIPTION:  
    If a payment transaction cannot be posted to a bill, this field will contain the type of problem encountered.
1.02 COMMENT 1;2 FREE TEXT

  • INPUT TRANSFORM:  S X=$$TRIM^XLFSTR(X) K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  JAN 07, 2016
  • HELP-PROMPT:  Answer must be 1-60 characters in length.
  • DESCRIPTION:  
    This field is used to enter comments for payments cancelled or unapplied.
3.01 SUSPENSE STATUS 3;1 SET
  • 'PD' FOR Paid;
  • 'P' FOR Pending;
  • 'R' FOR Refund Sent;

  • LAST EDITED:  SEP 17, 2015
  • HELP-PROMPT:  Enter the Suspense Status for the transaction.
  • DESCRIPTION:  
    Current Status of an EFT transaction that is in suspense.
3.02 DATE IN SUSPENSE 3;2 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 2016
  • HELP-PROMPT:  Enter the date and time the transaction was placed in suspense
  • DESCRIPTION:  
    The date and time the transaction was placed in suspense.
3.03 SUSPENDED BY 3;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  SEP 17, 2015
  • HELP-PROMPT:  Enter the user who placed the transaction in suspense.
  • DESCRIPTION:  
    The AR Clerk (or Postmaster if done in the background) who placed the transaction in suspense.
3.04 DATE OUT OF SUSPENSE 3;4 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 05, 2016
  • HELP-PROMPT:  Enter the date and time the transaction was taken out of suspense.
  • DESCRIPTION:  
    The date and time the transaction was taken out of suspense.
3.05 REMOVED BY 3;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  SEP 17, 2015
  • HELP-PROMPT:  Enter the user who removed the transaction from suspense.
  • DESCRIPTION:  
    The AR Clerk who removed the transaction from suspense. If the transaction was removed from suspense during nightly processing, the AR Clerk will be Postmaster
Info |  Details