STANDARD DATA DICTIONARY #344.4 -- ELECTRONIC REMITTANCE ADVICE FILE 3/24/25 PAGE 1 STORED IN ^RCY(344.4, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 4.5) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file holds the ERA (Electronic Remittance Advice) information that is received electronically. It holds the summary for each individual EOB (Explanation of Benefits) that comprise the ERA. Individual EOB detail data is found in file 361.1 in Integrated Billing. IDENTIFIED BY: TRACE NUMBER (#.02), ERA DATE (#.04), TOTAL AMOUNT PAID (#.05), PAYMENT FROM (#.06), EFT MATCH STATUS (#.09), ERA DETAIL POST STATUS (#.14) POINTED TO BY: ERA REFERENCE field (#.18) of the AR BATCH PAYMENT File (#344) ERA RECORD field (#.1) of the EDI THIRD PARTY EFT DETAIL File (#344.31) ERA REFERENCE field (#.01) of the EDI LOCKBOX EOB WORKLIST File (#344.49) ERA TOTALS RECORD field (#.07) of the AR EDI LOCKBOX MESSAGES File (#344.5) ERA # field (#.03) of the RCDPE AUTO-POST AUDIT File (#344.72) ERA field (#95) of the AR TRANSACTION File (#433) CROSS REFERENCED BY: ERA DATE(AC), REMOVED DATE(AD), EOB DETAIL(ADET), ERROR CATEGORY(AEXC), FILE DATE/TIME(AFD), DATE/TIME ERA LINKED(AFL), EFT MATCH STATUS(AMATCH), MARK FOR AUTO-POST(AP), RECEIPT(AREC), TRANSFERRED DATE(ATOUT), ENTRY(B), AUTO-POST STATUS(E), AUTO-POST DATE(F), AUTO-DECREASE DATE(G), RECEIPT(H), INSURANCE CO ID(I), MCCF DATE/TIME(MCCF) INDEXED BY: ENTRY & TRACE NUMBER & INSURANCE CO ID & ERA DATE & TOTAL AMOUNT PAID & PAYMENT FROM & FILE DATE/TIME & RECEIPT & EFT MATCH STATUS & INDIVIDUAL EOB COUNT & CHECK # & ERA DETAIL POST STATUS & REMOVED DATE & ERA LINKED BY (AMCCF), PAYMENT FROM & INSURANCE CO ID (APT), RECEIPT (ARCT), INSURANCE CO ID & PAYMENT FROM (ATP), TRACE NUMBER & INSURANCE CO ID (ATRID), TRACE NUMBER & INSURANCE CO ID (ATRIDUP), PAYMENT FROM (C), TRACE NUMBER (D), TRACE NUMBER (DNLZ) LAST MODIFIED: DEC 18,2023@14:44:32 344.4,.01 ENTRY 0;1 NUMBER (Required) INPUT TRANSFORM: K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X I $D(X) S DINUM=X LAST EDITED: MAY 16, 2018 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.4^B 1)= S ^RCY(344.4,"B",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"B",$E(X,1,30),DA) CROSS-REFERENCE: ^^TRIGGER^344.4^.14 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCY(344.4,D0,0)):^(0),1:"") S X=$P(Y(1),U,14),X=X S DIU=X K Y S X=DIV S X=0 S DIH=$G(^RCY(344.4,DIV(0),0)),DIV=X S $P(^(0),U,14)=DIV,DIH=344.4,DIG=.14 D ^DICR 2)= Q 3)= Do not delete CREATE VALUE)= S X=0 DELETE VALUE)= NO EFFECT FIELD)= DETAIL POST STATUS RECORD INDEXES: AMCCF (#828) 344.4,.02 TRACE NUMBER 0;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>50!($L(X)<3) X LAST EDITED: OCT 01, 2014 HELP-PROMPT: Answer must be 3-50 characters in length. DESCRIPTION: This is the bank trace number assigned to the ERA received. If the ERA was paid by paper check, this should be the check #. FIELD INDEX: D (#981) REGULAR IR LOOKUP & SORTING Short Descr: REGULAR INDEX Description: This cross-reference is used to look up an ERA by its full trace number. Set Logic: S ^RCY(344.4,"D",$E(X,1,50),DA)="" Kill Logic: K ^RCY(344.4,"D",$E(X,1,50),DA) Whole Kill: K ^RCY(344.4,"D") X(1): TRACE NUMBER (344.4,.02) (Subscr 1) (Len 50) (forwards) FIELD INDEX: DNLZ (#1212) MUMPS IR LOOKUP & SORTING Short Descr: Cross-ref. TRACE # without leading zeroes. Description: This cross-reference is used to lookup an ERA by its trace number without leading zeroes and to allow partial matches for numeric trace numbers. The "D" cross-reference is used for the full trace number. "NLZ" means "No Leading Zeroes", hence "DNLZ" for this cross-reference. After the leading zeroes are removed a space (" ") is appended to the cross-referenced value for collation purposes. This cross-reference is only SET or KILLed for TRACE # entries that are numeric or those with leading zeroes and numerics. A trace number such as "000345678" is stored as "345678 ", "001 " as "1 ",and "1234" as "1234 ". Trace numbers such as "000","0000","00000", etc. are stored as "0 ". Although the TRACE # field is supposed to be a minimum of 3 characters, this logic is designed to handle invalid values in this field. Set Logic: Q:'(X?.N!($E(X)=0)) N RC S RC=X X:$E(X)=0&($L(X)>2) "F S RC=$E(RC,2,$L(RC)) Q:$L(RC)<2!'($E(RC)=0 )" S ^RCY(344.4,"DNLZ",RC_" ",DA)="" Kill Logic: Q:'(X?.N!($E(X)=0)) N RC S RC=X X:$E(X)=0&($L(X)>2) "F S RC=$E(RC,2,$L(RC)) Q:$L(RC)<2!'($E(RC)=0 )" K ^RCY(344.4,"DNLZ",RC_" ",DA) Whole Kill: K ^RCY(344.4,"DNLZ") X(1): TRACE NUMBER (344.4,.02) (Subscr 1) (Len 50) (forwards) RECORD INDEXES: AMCCF (#828), ATRID (#292), ATRIDUP (#403) 344.4,.03 INSURANCE CO ID 0;3 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X LAST EDITED: NOV 17, 2017 HELP-PROMPT: Answer must be 1-30 characters in length. DESCRIPTION: This is the insurance co's electronic ID that will be recorded on each ERA received at the site. This field, along with the trace number should always be unique in this file. CROSS-REFERENCE: 344.4^I 1)= S ^RCY(344.4,"I",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"I",$E(X,1,30),DA) 3)= Do not Delete This is a search index on INSURANCE CO ID field, reports against the ERA file use a lookup based on INSURANCE CO ID, this index will reduce the time to generate ad-hoc reports. RECORD INDEXES: AMCCF (#828), APT (#1526), ATP (#1527), ATRID (#292), ATRIDUP (#403) 344.4,.04 ERA DATE 0;4 DATE INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X LAST EDITED: SEP 29, 2011 HELP-PROMPT: Enter the date from the ERA record. DESCRIPTION: This is the date the ERA was generated by the payer. CROSS-REFERENCE: 344.4^AC 1)= S ^RCY(344.4,"AC",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"AC",$E(X,1,30),DA) 3)= DO NOT DELETE This cross-reference is used by the option 'Mark ERAs Returned to Payer Audit Report'. RECORD INDEXES: AMCCF (#828) 344.4,.05 TOTAL AMOUNT PAID 0;5 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999999)!(X<0) X LAST EDITED: SEP 24, 2002 HELP-PROMPT: Type a Dollar Amount between 0 and 999999999999, 2 Decimal Digits DESCRIPTION: This is the total amount of all the individual EOB records included in the ERA. RECORD INDEXES: AMCCF (#828) 344.4,.06 PAYMENT FROM 0;6 FREE TEXT INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X MAXIMUM LENGTH: 60 LAST EDITED: NOV 17, 2017 HELP-PROMPT: Answer must be 1-60 characters in length. DESCRIPTION: This is the name of the insurance co as returned on the ERA. FIELD INDEX: C (#404) MUMPS IR LOOKUP & SORTING Short Descr: Used to look up entries by the full payer name. Description: This cross-reference is used for payer names of up to 60 characters. Do not delete this cross-reference. Set Logic: S ^RCY(344.4,"C",$$UP^XLFSTR($E(X,1,60)),DA)="" Kill Logic: K ^RCY(344.4,"C",$$UP^XLFSTR($E(X,1,60)),DA) Whole Kill: K ^RCY(344.4,"C") X(1): PAYMENT FROM (344.4,.06) (Subscr 1) (Len 60) (forwards) RECORD INDEXES: AMCCF (#828), APT (#1526), ATP (#1527) 344.4,.07 FILE DATE/TIME 0;7 DATE INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X LAST EDITED: JAN 21, 2004 HELP-PROMPT: Enter the date/time the ERA was filed in VistA. DESCRIPTION: This is the date/time the ERA was filed in VistA. CROSS-REFERENCE: 344.4^AFD 1)= S ^RCY(344.4,"AFD",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"AFD",$E(X,1,30),DA) 3)= Do not delete Created to find entries to include on ERA worklist pick list. RECORD INDEXES: AMCCF (#828) 344.4,.08 RECEIPT 0;8 POINTER TO AR BATCH PAYMENT FILE (#344) LAST EDITED: APR 06, 2004 HELP-PROMPT: Enter the receipt that this ERA detail is contained in. DESCRIPTION: This is the receipt created to record the detail of the ERA for AR posting. NOTES: TRIGGERED by the RECEIPT # field of the AR BATCH PAYMENT File CROSS-REFERENCE: 344.4^AREC 1)= S ^RCY(344.4,"AREC",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"AREC",$E(X,1,30),DA) 3)= Do not delete CROSS-REFERENCE: ^^TRIGGER^344.49^.02 1)= Q 2)= X ^DD(344.4,.08,1,2,2.3) I X S X=DIV S I(0,0)=$G(D0),D0=D0 S:'D0!'$D(^RCY(344.49,+D0,0)) D0=-1 S DIV(0)=D0,Y(101)=$S($D(^RCY(344.49,D0,0)):^(0),1:"") S X=$P($G(^RCY(344,+$P(Y(101),U,2),0)),U),D0 =I(0,0),DIU=X K Y S X="" X ^DD(344.4,.08,1,2,2.4) 2.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^RCY(344.4,D0,0)):^(0),1:"") S X=$P($G(^R CY(344,+$P(Y(1),U,8),0)),U)="" 2.4)= S DIH=$G(^RCY(344.49,DIV(0),0)),DIV=X I $D(^(0)) S $P(^(0),U,2)=DIV,DIH=344.49,DIG=.02 D ^DIC R 3)= Do not delete CREATE VALUE)= NO EFFECT DELETE CONDITION)= RECEIPT="" DELETE VALUE)= @ FIELD)= EDI LOCKBOX EOB WORKLIST:RECEIPT FIELD INDEX: ARCT (#291) REGULAR IR SORTING ONLY Short Descr: Cross reference by AR receipt # Set Logic: S ^RCY(344.4,"ARCT",X,DA)="" Kill Logic: K ^RCY(344.4,"ARCT",X,DA) Whole Kill: K ^RCY(344.4,"ARCT") X(1): RECEIPT (344.4,.08) (Subscr 1) (forwards) RECORD INDEXES: AMCCF (#828) 344.4,.09 EFT MATCH STATUS 0;9 SET '0' FOR UNMATCHED; '-1' FOR MATCHED WITH ERRORS; '1' FOR MATCHED; '2' FOR MATCHED TO PAPER CHECK; '3' FOR MATCH-0 PAYMENT; '4' FOR REMOVED FROM WORKLIST; '5' FOR MATCHED TO TDA; LAST EDITED: JAN 12, 2022 HELP-PROMPT: Enter the status to indicate if the ERA has been matched DESCRIPTION: This is the status that indicates whether or not the ERA has been matched to an electronic EFT record or TDA. If the total amt of the EFT payment does not equal the total amount of the ERA payment, the status will be -1 (MATCHED WITH ERRORS). If the ERA has a 0-payment and no EFT or check, the status will be 3 (MATCH-0 PAYMENT) and if matched to a paper check, the status will be 2 (MATCHED TO PAPER CHECK). If the ERA has been removed from the worklist the status will be 4 (REMOVED FROM WORKLIST). If the ERA has been matched to a TDA, the status will be 5 (MATCHED TO A TDA). CROSS-REFERENCE: 344.4^AMATCH 1)= S ^RCY(344.4,"AMATCH",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"AMATCH",$E(X,1,30),DA) 3)= Do not delete This xref allows easy access to unmatched or mismatched ERA records. RECORD INDEXES: AMCCF (#828) 344.4,.1 ERA TYPE 0;10 SET '0' FOR MRA; '1' FOR ERA; LAST EDITED: DEC 06, 2002 HELP-PROMPT: Enter a 0 if this is an ERA from MEDICARE (MRA) DESCRIPTION: This is the field that will designate whether the ERA is from an insurance company or from MEDICARE via the MRA requests. 344.4,.11 INDIVIDUAL EOB COUNT 0;11 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: SEP 17, 2002 HELP-PROMPT: Type a Number between 0 and 999, 0 Decimal Digits DESCRIPTION: This field contains the total # of EOB detail records included in the ERA. NOTES: TRIGGERED by the SEQUENCE # field of the ERA DETAIL sub-field of the ELECTRONIC REMITTANCE ADVICE File RECORD INDEXES: AMCCF (#828) 344.4,.12 MAIL MESSAGE 0;12 FREE TEXT INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X LAST EDITED: JAN 14, 2003 HELP-PROMPT: Answer must be 1-60 characters in length. DESCRIPTION: This is the list of message #s where the original ERA was received, separated by commas. 344.4,.13 CHECK # 5;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>50!($L(X)<1) X LAST EDITED: JAN 12, 2022 HELP-PROMPT: Answer must be 1-50 characters in length. DESCRIPTION: This is the # of the paper check that was received for payment of this ERA. NOTE: If the EFT MATCH STATUS is 5 (MATCHED TO TDA), this field is null. RECORD INDEXES: AMCCF (#828) 344.4,.14 ERA DETAIL POST STATUS 0;14 SET '0' FOR NOT POSTED; '1' FOR POSTED; '2' FOR MANUALLY POSTED; '3' FOR POSTING NOT NEEDED; '4' FOR NOT POSTED-REMOVED; '5' FOR PARTIAL; LAST EDITED: MAR 07, 2014 HELP-PROMPT: Enter the code that corresponds to whether or not the ERA detail was posted and if so, if it was manually posted. DESCRIPTION: This is a flag that indicates whether or not the receipt for the ERA has been posted. It is used to limit the choices when selecting ERAs for the ERA Worklist option. NOTES: TRIGGERED by the ENTRY field of the ELECTRONIC REMITTANCE ADVICE File RECORD INDEXES: AMCCF (#828) 344.4,.15 EXPECTED PAYMENT METHOD CODE 0;15 FREE TEXT INPUT TRANSFORM: K:$L(X)>3!($L(X)<1) X LAST EDITED: SEP 12, 2003 HELP-PROMPT: Answer must be 1-3 characters in length. DESCRIPTION: This is the code that indicates the method of payemnt that can be expected as a result of this ERA. 344.4,.16 REMOVED BY 6;1 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JAN 24, 2012 HELP-PROMPT: Select the person who removed the ERA from the EEOB worklist. DESCRIPTION: This field is used to record the person who removed the ERA from the EEOB worklist. 344.4,.17 REMOVED DATE 6;2 DATE INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:Y<1 X LAST EDITED: JAN 17, 2012 HELP-PROMPT: Enter the Date/time the ERA was removed. DESCRIPTION: This field records the date/time that the ERA was removed from the EEOB worklist. CROSS-REFERENCE: 344.4^AD 1)= S ^RCY(344.4,"AD",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"AD",$E(X,1,30),DA) 3)= DO NOT DELETE This cross-reference is used by the option 'Mark ERAs Returned to Payer Audit Report'. RECORD INDEXES: AMCCF (#828) 344.4,.18 REMOVE REASON 6;3 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>60!($L(X)<5) X MAXIMUM LENGTH: 60 LAST EDITED: OCT 26, 2022 HELP-PROMPT: Answer must be 5-60 characters in length. DESCRIPTION: The justification for removing the ERA from the EEOB worklist. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 344.4,.19 AUTO-DECREASE BLOCKED 6;4 SET '1' FOR YES; '0' FOR NO; LAST EDITED: FEB 09, 2018 HELP-PROMPT: Enter YES if the ERA should not be auto-decreased. DESCRIPTION: This field is used to determine if a zero balance denial ERA with payment type of 'NON' should be blocked from auto-decrease in the PRCA Nightly Process. TECHNICAL DESCR: This field is set manually in the ERA Worklist if an ERA has auto-decrease CARCs but the user decides to block auto-decrease of these CARCS. 344.4,1 ERA DETAIL 1;0 Multiple #344.41 (Add New Entry without Asking) LAST EDITED: AUG 12, 2003 DESCRIPTION: This subfile contains the list of individual EOBs that were processed in this ERA from a single payer. INDEXED BY: SEQUENCE # & EOB DETAIL & AMOUNT PAID & RECEIPT & ERROR STATUS & AUTO-DECREASE AMOUNT & AUTO-POST DATE & AUTO-DECREASE DATE (AMCCF), MCCF DATE/TIME (AMCCF1), EOB DETAIL & INVALID BILL NUMBER (AVAL) 344.41,.01 SEQUENCE # 0;1 NUMBER (Required) (Multiply asked) INPUT TRANSFORM: K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."1.N) X I $D(X) S DINUM=X LAST EDITED: JUL 15, 2020 HELP-PROMPT: Type a number between 0 and 99999999, 0 Decimal Digits DESCRIPTION: This is a sequence # used internally to identify this ERA detail record. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 344.41^B 1)= S ^RCY(344.4,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,DA(1),1,"B",$E(X,1,30),DA) CROSS-REFERENCE: ^^TRIGGER^344.4^.11 1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^RCY(344.4,D0,0)):^(0),1:"") S X=$P(Y(1),U, 11),X=X S DIU=X K Y S X=DIV S X=DIU+1 S DIH=$G(^RCY(344.4,DIV(0),0)),DIV=X S $P(^(0),U,11)=DIV,DIH= 344.4,DIG=.11 D ^DICR 2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^RCY(344.4,D0,0)):^(0),1:"") S X=$P(Y(1),U, 11),X=X S DIU=X K Y S X=DIV S X=DIU-1 S DIH=$G(^RCY(344.4,DIV(0),0)),DIV=X S $P(^(0),U,11)=DIV,DIH= 344.4,DIG=.11 D ^DICR 3)= Do not delete CREATE VALUE)= INDIVIDUAL EOB COUNT+1 DELETE VALUE)= INDIVIDUAL EOB COUNT-1 FIELD)= INDIVIDUAL EOB COUNT Keeps track of the number of individual EOBs in the EOB transmission. RECORD INDEXES: AMCCF (#845) 344.41,.02 EOB DETAIL 0;2 POINTER TO EXPLANATION OF BENEFITS FILE (#361.1) INPUT TRANSFORM:S DIC("S")="I '$P(^(0),U,4)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: NOV 25, 2002 HELP-PROMPT: Enter the EOB detail records that will comprise the EOB record DESCRIPTION: The detail EOB records that comprise the 835 transaction. SCREEN: S DIC("S")="I '$P(^(0),U,4)" EXPLANATION: This can only be regular EOB's, not MRA's CROSS-REFERENCE:344.41^AC 1)= S ^RCY(344.4,DA(1),1,"AC",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,DA(1),1,"AC",$E(X,1,30),DA) 3)= Do not delete CROSS-REFERENCE:344.4^ADET 1)= S ^RCY(344.4,"ADET",$E(X,1,30),DA(1),DA)="" 2)= K ^RCY(344.4,"ADET",$E(X,1,30),DA(1),DA) 3)= Do not delete Cross references entire file by EOB detail pointer to file 361.1 RECORD INDEXES: AMCCF (#845), AVAL (#293) 344.41,.03 AMOUNT PAID 0;3 NUMBER INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999999999)!(X<-9999999999999) X LAST EDITED: FEB 13, 2003 HELP-PROMPT: Type a Dollar Amount between -9999999999999 and 9999999999999, 2 Decimal Digits DESCRIPTION: This is the specific amount the payer has paid on this bill. RECORD INDEXES: AMCCF (#845) 344.41,.04 INSURANCE COMPANY ON BILL 0;4 POINTER TO INSURANCE COMPANY FILE (#36) LAST EDITED: AUG 27, 2003 HELP-PROMPT: Enter the name of the insurance co who supplied this EOB data DESCRIPTION: This is the insurance company that supplied this EOB data 344.41,.05 INVALID BILL NUMBER 0;5 FREE TEXT INPUT TRANSFORM:K:$L(X)>20!($L(X)<1) X LAST EDITED: APR 09, 2003 HELP-PROMPT: Answer must be 1-20 characters in length. DESCRIPTION: This is the bill # received on the EOB, but it doesn't exist in VistA. CROSS-REFERENCE:344.41^AD 1)= S ^RCY(344.4,DA(1),1,"AD",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,DA(1),1,"AD",$E(X,1,30),DA) 3)= Do not delete CROSS-REFERENCE:^^TRIGGER^344.41^.17 1)= Q 2)= X ^DD(344.41,.05,1,2,2.3) I X S X=DIV S Y(1)=$S($D(^RCY(344.4,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1 ),U,17),X=X S DIU=X K Y X ^DD(344.41,.05,1,2,2.1) X ^DD(344.41,.05,1,2,2.4) 2.1)= S X=DIV S Y(1)=$S($D(^RCY(344.4,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,5) 2.3)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(0)=X S Y(1)=$S($D(^RCY(344.4,D0,1,D1,0)) :^(0),1:"") S X=$P(Y(1),U,17)="" 2.4)= S DIH=$G(^RCY(344.4,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,17)=DIV,DIH=344.41,DIG=.17 D ^DICR 3)= Do not delete CREATE VALUE)= NO EFFECT DELETE CONDITION)= BILL NUMBER FROM PAYER="" DELETE VALUE)= INVALID BILL NUMBER FIELD)= BILL NUMBER FROM PAYER RECORD INDEXES: AVAL (#293) 344.41,.07 ERROR CATEGORY 0;7 SET '1' FOR VALID BILL NOT FOUND; '2' FOR EOB DETAIL NOT IN IB; '99' FOR OTHER; LAST EDITED: DEC 23, 2002 HELP-PROMPT: Enter the # corresponding to the specific error detected DESCRIPTION: This field is used to categorize the specific errors associated with EOB detail records. This is the coded error for special exception processing. CROSS-REFERENCE:344.4^AEXC 1)= S ^RCY(344.4,"AEXC",$E(X,1,30),DA(1),DA)="" 2)= K ^RCY(344.4,"AEXC",$E(X,1,30),DA(1),DA) This xref is used to identify EOB records with exception conditions. 344.41,.08 UNSPECIFIC ERROR 0;8 FREE TEXT INPUT TRANSFORM:K:$L(X)>60!($L(X)<1) X LAST EDITED: SEP 24, 2002 HELP-PROMPT: Answer must be 1-60 characters in length. DESCRIPTION: This is the text to describe the error associated with EOB detail records when the ERROR CATEGORY field is OTHER. 344.41,.09 TRANSFERRED OUT MSG # 0;9 FREE TEXT INPUT TRANSFORM:K:$L(X)>20!($L(X)<1) X LAST EDITED: OCT 24, 2002 HELP-PROMPT: Answer must be 1-20 characters in length. DESCRIPTION: This field will hold the last mail message number used to transmit a detail record for an EOB received for a bill belonging to another site. 344.41,.1 TRANSFER STATUS 0;10 SET '0' FOR NOT ACCEPTED; '1' FOR ACCEPTED; LAST EDITED: OCT 24, 2002 HELP-PROMPT: Enter the code that corresponds to the status of the EOB transferred to another site DESCRIPTION: This field indicates whether or not an EOB transfer has been accepted by a site to whom this EOB detail record was sent. 344.41,.11 TRANSFERRED TO SITE 0;11 POINTER TO INSTITUTION FILE (#4) LAST EDITED: OCT 25, 2002 HELP-PROMPT: Enter the name of the site where the EOB detail record will be sent DESCRIPTION: This is the name of the site where the EOB detail record will be sent. 344.41,.12 TRANSFERRED DATE 0;12 DATE INPUT TRANSFORM:S %DT="ETX" D ^%DT S X=Y K:Y<1 X LAST EDITED: JAN 15, 2003 HELP-PROMPT: Enter the date the EOB was last transferred to another site DESCRIPTION: This is the latest date/time when the transfer of the EOB detail record took place. CROSS-REFERENCE:344.4^ATOUT 1)= S ^RCY(344.4,"ATOUT",$E(X,1,30),DA(1),DA)="" 2)= K ^RCY(344.4,"ATOUT",$E(X,1,30),DA(1),DA) 3)= Do not delete This cross reference allows easy access to EOBs that have been transferred out of the site to another site. 344.41,.13 ERROR STATUS 0;13 SET '0' FOR UNRESOLVED; '1' FOR RESOLVED; LAST EDITED: OCT 24, 2002 HELP-PROMPT: Enter the code to indicate if the error for this EOB detail record has been resolved. DESCRIPTION: This indicates if the error associated with this EOB detail record was resolved or not. If resolved, it will not appear on any more EOB detail exception lists. RECORD INDEXES: AMCCF (#845) 344.41,.14 REVERSAL 0;14 SET '0' FOR NO; '1' FOR YES; LAST EDITED: JAN 07, 2003 HELP-PROMPT: Enter a 1 (YES) if this is a reversal notification DESCRIPTION: This is the flag that indicates the bill was not paid, but was reversed. CROSS-REFERENCE:344.41^ATB 1)= S ^RCY(344.4,DA(1),1,"ATB",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,DA(1),1,"ATB",$E(X,1,30),DA) 3)= Do not delete This xref is used to easily find reversal or takeback EOBs in an ERA. 344.41,.15 FREE TEXT PATIENT NAME 0;15 FREE TEXT INPUT TRANSFORM:K:$L(X)>35!($L(X)<1) X LAST EDITED: DEC 23, 2002 HELP-PROMPT: Answer must be 1-35 characters in length. DESCRIPTION: This is the name of the patient as returned by the payer. Used only if the bill cannot be found at the site. 344.41,.16 TRANSFER RECEIVED OTHER SITE 0;16 SET '0' FOR NO; '1' FOR YES; LAST EDITED: JAN 15, 2003 HELP-PROMPT: Enter YES (1) if the other site has received the transferred EOB DESCRIPTION: This indicates whether or not the other site has received the transferred EOB record. 344.41,.17 BILL NUMBER FROM PAYER 0;17 FREE TEXT INPUT TRANSFORM:K:$L(X)>15!($L(X)<1) X LAST EDITED: APR 09, 2003 HELP-PROMPT: Answer must be 1-15 characters in length. DESCRIPTION: If a bill number must be edited because it could not be found in the site's A/R file, this is the original bill # that the payer sent. WRITE AUTHORITY:^ NOTES: TRIGGERED by the INVALID BILL NUMBER field of the ERA DETAIL sub-field of the ELECTRONIC REMITTANCE ADVICE File 344.41,.18 BILLING PROVIDER NPI 3;1 FREE TEXT INPUT TRANSFORM:K:$L(X)>10!($L(X)<10)!'(X?10N) X LAST EDITED: JUN 14, 2007 HELP-PROMPT: Answer must be 10 characters in length. DESCRIPTION: This field contains the NPI for the Billing Provider that is found in piece 16 of the line type 10 of the 835ERA sent from Austin Information Technology Center. 344.41,.19 RENDERING/SERVICING PROV NPI 3;2 FREE TEXT INPUT TRANSFORM:K:$L(X)>10!($L(X)<10)!'(X?10N) X LAST EDITED: MAY 06, 2008 HELP-PROMPT: Answer must be 10 characters in length. DESCRIPTION: This field contains the NPI for the Rendering/Servicing Provider that is found in piece 16 of the line type 10 of the 835ERA sent from the Austin Information Technology Center. This field is named Rendering NPI on the 835ERA and can contain the NPI for the Rendering (individual) or the Servicing (non-individual) provider. 344.41,.2 ENTITY TYPE QUALIFIER 3;3 SET '1' FOR INDIVIDUAL; '2' FOR NON-INDIVIDUAL; LAST EDITED: OCT 18, 2007 HELP-PROMPT: Enter a '1' for an individual NPI or a '2' for a non-individual NPI. DESCRIPTION: This field reflects the type of NPI that is being returned in the NM1 segment of the X12N 835. If it is a 1 then the NPI is for an individual provider. If it is a 2 then it is a non-individual (organizational) NPI. This data is found in piece 17 of line type 10 in the 835ERA message transmitted from the Austin Information Technology Center. 344.41,.21 RENDERING/SERVICING PROV NAME 3;4 FREE TEXT INPUT TRANSFORM:K:$L(X)>96!($L(X)<2) X LAST EDITED: JUN 21, 2010 HELP-PROMPT: Answer must be 2-96 characters in length. DESCRIPTION: This field holds the value of the "Rendering Provider Name" field from the NM1 segment of the X12N 835. It is last name (or servicing organization name) concatenated with a comma (if there is a first name) concatenated with the first name. The last name is piece 18 of a line type of 10 in the 835ERA message and the first name is piece 19 of a line type of 10 in the 835ERA message transmitted from the Austin Information Technology Center. 344.41,.22 BILLING PROV COMMENT 3;5 FREE TEXT BILLING PROVIDER NPI REJECT COMMENT INPUT TRANSFORM:K:$L(X)>80!($L(X)<3) X LAST EDITED: APR 28, 2008 HELP-PROMPT: Answer must be 3-80 characters in length. DESCRIPTION: This comment is about the Billing Provider NPI. This field is filled in only if the NPI is not in proper format. 344.41,.23 REN PROV COMMENT 4;1 FREE TEXT RENDERING/SERVICING PROVIDER NPI REJECT COMMENT INPUT TRANSFORM:K:$L(X)>80!($L(X)<3) X LAST EDITED: JUN 21, 2010 HELP-PROMPT: Answer must be 3-80 characters in length. DESCRIPTION: This field is filled in with a comment if the Rendering/Servicing Provider NPI is not in correct format. 344.41,.24 ECME # 4;2 FREE TEXT ELECTRONIC CLAIMS MANAGEMENT ENGINE NUMBER INPUT TRANSFORM:K:$L(X)>12!($L(X)<1) X LAST EDITED: MAY 05, 2014 HELP-PROMPT: Answer must be 1-12 characters in length. DESCRIPTION: The ELECTRONIC CLAIMS MANAGEMENT ENGINE NUMBER is used to track an ERA for matching, posting, and reporting claims. CROSS-REFERENCE:344.41^ECME 1)= S ^RCY(344.4,DA(1),1,"ECME",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,DA(1),1,"ECME",$E(X,1,30),DA) This cross-reference is for locating the ECME number(s) for an ERA. 344.41,.25 RECEIPT 4;3 POINTER TO AR BATCH PAYMENT FILE (#344) LAST EDITED: JAN 10, 2015 HELP-PROMPT: Select the AR BATCH PAYMENT entry associated with this ERA DETAIL sub-file entry. DESCRIPTION: This is the AR BATCH PAYMENT entry that has the associated Receipt Number. CROSS-REFERENCE:344.41^RECEIPT 1)= S ^RCY(344.4,DA(1),1,"RECEIPT",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,DA(1),1,"RECEIPT",$E(X,1,30),DA) CROSS-REFERENCE:344.4^H 1)= S ^RCY(344.4,"H",$E(X,1,30),DA(1),DA)="" 2)= K ^RCY(344.4,"H",$E(X,1,30),DA(1),DA) This cross reference is for the RECEIPT that is stored at each of the individual claim lines within an ERA. RECORD INDEXES: AMCCF (#845) 344.41,1 RAW DATA 1;0 WORD-PROCESSING #344.411 (NOWRAP) DESCRIPTION: This field stores the raw data as it was received for the individual EOB if its detail could not be stored in IB. LAST EDITED: SEP 24, 2002 HELP-PROMPT: Enter the raw data associated with this EOB record DESCRIPTION: This is the raw data received in a message for an EOB record in error. It is saved here so the data is not lost if needed for transfer to another station or for recovery of data unable to be stored in IB. 344.41,1.1 FORMATTED MESSAGE DATA ; COMPUTED MUMPS CODE: S X="" N Q,Q0,Q1 D DISP^RCDPESR0("^RCY(344.4,"_D0_",1,"_D1_",1)","Q0",1,"Q1",75,1) I $O(Q1(0)) D EN ^DDIOL("FORMATTED MESSAGE DATA: ","","!!") S Q=0 F S Q=$O(Q1(Q)) D:'Q EN^DDIOL(" ","","!") Q:'Q D EN^DDIOL(Q1(Q),"","!") ALGORITHM: S X="" N Q,Q0,Q1 D DISP^RCDPESR0("^RCY(344.4,"_D0_",1,"_D1_",1)","Q0",1,"Q1",75,1) I $O(Q1(0)) D EN ^DDIOL("FORMATTED MESSAGE DATA: ","","!!") S Q=0 F S Q=$O(Q1(Q)) D:'Q EN^DDIOL(" ","","!") Q:'Q D EN^DDIOL(Q1(Q),"","!") LAST EDITED: NOV 04, 2002 344.41,2 RESOLUTION LOG 2;0 WORD-PROCESSING #344.412 (NOWRAP) DESCRIPTION: This field contains comments to detail the attempts made to remove the exception condition associated with this individual EOB. LAST EDITED: OCT 30, 2002 HELP-PROMPT: Enter a description of the attempts to resolve any exception DESCRIPTION: This is the log used to keep track of the actions/results of any attempts to resolve the exceptions associated with this EOB detail record. 344.41,4 CLAIM COMMENT 6;3 FREE TEXT INPUT TRANSFORM:K:$L(X)>132!($L(X)<3) X LAST EDITED: OCT 30, 2015 HELP-PROMPT: Answer must be 3-132 characters in length. DESCRIPTION: This field will hold any claim comments used to indicate what was done to this line item to get exceptions resolved so the claim will post and get the ERA processed. 344.41,4.01 CLAIM COMMENT DATE 6;2 DATE INPUT TRANSFORM:S %DT="ESTX" D ^%DT S X=Y K:Y<1 X LAST EDITED: JAN 06, 2016 HELP-PROMPT: Enter date comment was added to this detail record. DESCRIPTION: This will be the date that this comment was added/updated. Date is required but time is optional. 344.41,4.02 CLAIM COMMENT USER 6;1 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JAN 05, 2016 HELP-PROMPT: Enter the name of user that added/edited this comment. DESCRIPTION: This will be the pointer to the user that entered/updated this comment last. 344.41,5 AUTO-POST REJECTION REASON 5;1 SET '1' FOR FIELD VERIFICATION FAILED; '2' FOR CLAIM ALREADY COMPLETED/CLOSED; '3' FOR PAYMENT EXCEEDS CLAIM BALANCE; '4' FOR REFERRED TO GENERAL COUNCIL; '5' FOR REJECTED (COMPLETED/CLOSED); '6' FOR PAYMENT AMOUNT IS NEGATIVE; '7' FOR REJECTED (GENERAL COUNCIL); LAST EDITED: JUL 28, 2014 HELP-PROMPT: Enter the reason that auto-post rejected this line. DESCRIPTION: This field describes the reason that caused the ERA detail line to be rejected by the ERA auto-posting process in the AR nightly job. 344.41,6 MARK FOR AUTO-POST 5;2 SET '0' FOR NO; '1' FOR YES; LAST EDITED: MAY 21, 2014 HELP-PROMPT: Enter YES if the EEOB line item in the ERA is marked for auto-posting. DESCRIPTION: This flag identifies if the EEOB line item in the ERA is marked for automatic posting to a receipt during the nightly job process. CROSS-REFERENCE:344.4^AP 1)= S ^RCY(344.4,"AP",$E(X,1,30),DA(1),DA)="" 2)= K ^RCY(344.4,"AP",$E(X,1,30),DA(1),DA) This cross reference is used to identify ERA claim lines which have been marked for auto-post in the EDI Lockbox option 'Auto-Post Awaiting Resolution'. 344.41,6.01 MARKED FOR AUTOPOST USER 5;7 POINTER TO NEW PERSON FILE (#200) LAST EDITED: NOV 14, 2017 HELP-PROMPT: Select the person who marked the ERA detail for auto-posting DESCRIPTION: This is the person who marked the ERA detail for auto-posting. This field is set automatically by the system. 344.41,7 AUTO-DECREASE INDICATOR 5;3 SET '1' FOR YES; LAST EDITED: MAY 06, 2014 HELP-PROMPT: Enter Yes to indicate that the claim is auto-decreased. DESCRIPTION: This field indicates that the claim on this ERA DETAIL line has been reviewed by the nightly decrease adjustment process. 344.41,8 AUTO-DECREASE AMOUNT 5;4 NUMBER INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X LAST EDITED: MAY 06, 2014 HELP-PROMPT: Type a dollar amount between 0 and 9999, 2 decimal digits. DESCRIPTION: This is the dollar amount of the decrease adjustment applied to the claim on this ERA DETAIL line by the nightly automatic decrease adjustment process. RECORD INDEXES: AMCCF (#845) 344.41,9 AUTO-POST DATE 5;5 DATE INPUT TRANSFORM:S %DT="EX" D ^%DT S X=Y K:X<1 X LAST EDITED: MAR 26, 2014 HELP-PROMPT: Enter the date on which this claim was auto-posted. DESCRIPTION: This is the date on which the claim line was auto-posted by the AR Nightly process. CROSS-REFERENCE:344.4^F 1)= S ^RCY(344.4,"F",$E(X,1,30),DA(1),DA)="" 2)= K ^RCY(344.4,"F",$E(X,1,30),DA(1),DA) This cross reference is for the auto-posting date of individual claim lines within an ERA. RECORD INDEXES: AMCCF (#845) 344.41,9.01 PHARMACY CLAIM COMMENT 9;1 FREE TEXT INPUT TRANSFORM:K:$L(X)>80!($L(X)<3) X LAST EDITED: FEB 26, 2014 HELP-PROMPT: Answer must be 3-80 characters. DESCRIPTION: This field is informational and is to aid users in the processing of pharmacy claims. 344.41,9.02 MCCF DATE/TIME 9;2 DATE INPUT TRANSFORM:S %DT="ESTR" D ^%DT S X=Y K:X<1 X LAST EDITED: MAY 28, 2020 HELP-PROMPT: Enter the date/time the ERA detail line data changed DESCRIPTION: This field is updated each time any ERA detail line field required for MCCF reporting is updated. The field is used by MCCF extract RPCs to identify recently changed ERA detail line data. TECHNICAL DESCR: This field is updated by action cross reference AMCCF1. CROSS-REFERENCE:344.41^MCCF 1)= S ^RCY(344.4,DA(1),1,"MCCF",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,DA(1),1,"MCCF",$E(X,1,30),DA) Recent ERA Changes Index for the MCCF Extract. FIELD INDEX: AMCCF1 (#846) MUMPS IR ACTION Short Descr: Updates List of ERA level changes for MCCF Extract Description: When the MCCF DATE/TIME (#9.02) field in this subfile entry is updated, set the MCCF DATE/TIME (#9) field of the superfile (ELECTRONIC REMITTANCE ADVICE (#344.4)) entry to NOW. Set Logic: N FDA,MSG,DIERR S FDA(344.4,DA(1)_",",9)="NOW" D FILE^DIE("E","FDA","MSG") Q Kill Logic: Q X(1): MCCF DATE/TIME (344.41,9.02) (forwards) NO RE-INDEXING ALLOWED! 344.41,10 AUTO-DECREASE DATE 5;6 DATE INPUT TRANSFORM:S %DT="EX" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAY 06, 2014 HELP-PROMPT: Enter the date on which this claim was auto-decreased. DESCRIPTION: This is the date on which the claim line was auto-decreased by the AR Nightly process. CROSS-REFERENCE:344.4^G 1)= S ^RCY(344.4,"G",$E(X,1,30),DA(1),DA)="" 2)= K ^RCY(344.4,"G",$E(X,1,30),DA(1),DA) This cross reference is for the auto-decrease date of individual claim lines within an ERA. RECORD INDEXES: AMCCF (#845) 344.41,10.01 CHECKED FOR FIRST PARTY AD 5;8 SET '1' FOR YES; LAST EDITED: JUL 05, 2019 HELP-PROMPT: Enter 'YES' if this line was checked for 1st Party Auto-Decrease. DESCRIPTION: This field is used in the PRCA NIGHTLY PROCESS to ensure that each ERA detail line is only checked and processed once for first party auto-decrease. The field is set automatically by the system. 344.41,99 BILL REFERENCE NUMBER ; COMPUTED MUMPS CODE: S:'$G(DA(1)) DA(1)=+$G(D0),DA=+$G(D1) S X=$$GETBILL^RCDPESR0(.DA) 9.2 = S Y(344.41,99,81)=$G(D1),Y(344.41,99,80)=$G(D0),Y(344.41,99,1)=$S($D(^RCY(344.4,D0,1,D1,0)):^ (0),1:"") 9.3 = X ^DD(344.41,99,9.2) S D0=$P(Y(344.41,99,1),U,2) S:'D0!'$D(^IBM(361.1,+D0,0)) D0=-1 S Y(344.4 1,99,101)=$S($D(^IBM(361.1,D0,0)):^(0),1:"") 9.4 = X ^DD(344.41,99,9.3) S Y(344.41,99,102)=$G(X),D0=$P(Y(344.41,99,101),U,1) S:'D0!'$D(^DGCR(399 ,+D0,0)) D0=-1 S Y(344.41,99,201)=$S($D(^DGCR(399,D0,0)):^(0),1:"") 9.5 = X ^DD(344.41,99,9.4) S D0=$P(Y(344.41,99,1),U,2) S:'D0!'$D(^IBM(361.1,+D0,0)) D0=-1 S Y(344.4 1,99,280)=$G(D0),Y(344.41,99,201)=$S($D(^IBM(361.1,D0,0)):^(0),1:"") 9.6 = X ^DD(344.41,99,9.5) S Y(344.41,99,202)=$G(X),D0=$P(Y(344.41,99,201),U,1) S:'D0!'$D(^DGCR(399 ,+D0,0)) D0=-1 S Y(344.41,99,301)=$S($D(^DGCR(399,D0,0)):^(0),1:"") ALGORITHM: S:'$G(DA(1)) DA(1)=+$G(D0),DA=+$G(D1) S X=$$GETBILL^RCDPESR0(.DA) LAST EDITED: SEP 25, 2003 344.4,2 ERA LEVEL ADJUSTMENTS 2;0 Multiple #344.42 (Add New Entry without Asking) DESCRIPTION: This field holds the ERA level adjustments the payer has applied to the ERA. These can be additional monies or less monies, depending on the type of adjustment (i.e. Takeback would be less money, interest would be more money). INDEXED BY: REFERENCE NUMBER (B) 344.42,.01 REFERENCE NUMBER 0;1 FREE TEXT (Multiply asked) INPUT TRANSFORM: K:$L(X)>50!($L(X)<1) X LAST EDITED: JUN 22, 2010 HELP-PROMPT: Answer must be 1-50 characters in length. FIELD INDEX: B (#982) REGULAR IR LOOKUP & SORTING Short Descr: REGULAR INDEX Set Logic: S ^RCY(344.4,DA(1),2,"B",$E(X,1,50),DA)="" Kill Logic: K ^RCY(344.4,DA(1),2,"B",$E(X,1,50),DA) Whole Kill: K ^RCY(344.4,DA(1),2,"B") X(1): REFERENCE NUMBER (344.42,.01) (Subscr 1) (Len 50) (forwards) 344.42,.02 ADJUSTMENT CODE 0;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>5!($L(X)<1) X LAST EDITED: DEC 23, 2002 HELP-PROMPT: Answer must be 1-5 characters in length. DESCRIPTION: This is the X12 code for the reason for the adjustment. 344.42,.03 ADJUSTMENT AMOUNT 0;3 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>999999999999.99)!(X<-999999999999.99) X LAST EDITED: DEC 23, 2002 HELP-PROMPT: Type a Dollar Amount between -999999999999.99 and 999999999999.99, 2 Decimal Digits DESCRIPTION: This is the amount of the adjustment. 344.42,.04 ADJUSTMENT TEXT 1;1 FREE TEXT INPUT TRANSFORM: K:$L(X)>190!($L(X)<1) X LAST EDITED: JUN 21, 2010 HELP-PROMPT: Answer must be 1-190 characters in length. DESCRIPTION: This is the text that describes the adjustment code. 344.4,3.01 CONTACT NAME 3;1 FREE TEXT INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X LAST EDITED: MAR 20, 2003 HELP-PROMPT: Answer must be 1-30 characters in length. DESCRIPTION: This is the name of the contact the payer has provided for questions regarding this ERA. 344.4,3.02 CONTACT NUMBER 1 3;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X LAST EDITED: AUG 02, 2010 HELP-PROMPT: Answer must be 1-60 characters in length. DESCRIPTION: This is a phone #/telephone extension or email address for the contact. 344.4,3.03 CONTACT TYPE 1 3;3 SET 'EM' FOR E-MAIL; 'FX' FOR FAX; 'TE' FOR TELEPHONE; 'EX' FOR TELEPHONE EXTENSION; LAST EDITED: MAR 20, 2003 HELP-PROMPT: Enter the code for the type of contact information. DESCRIPTION: This is the code that describes the type of contact information provided in the CONTACT NUMBER 1 field. 344.4,3.04 CONTACT NUMBER 2 3;4 FREE TEXT INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X LAST EDITED: AUG 02, 2010 HELP-PROMPT: Answer must be 1-60 characters in length. DESCRIPTION: This is a phone #/telephone extension or email address for the contact. 344.4,3.05 CONTACT TYPE 2 3;5 SET 'EM' FOR E-MAIL; 'FX' FOR FAX; 'TE' FOR TELEPHONE; 'EX' FOR TELEPHONE EXTENSION; LAST EDITED: MAR 20, 2003 HELP-PROMPT: Enter the code for the type of contact information. DESCRIPTION: This is the code that describes the type of contact information provided in the CONTACT NUMBER 2 field. 344.4,3.06 CONTACT NUMBER 3 3;6 FREE TEXT INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X LAST EDITED: AUG 02, 2010 HELP-PROMPT: Answer must be 1-60 characters in length. DESCRIPTION: This is a phone #/telephone extension or email address for the contact. 344.4,3.07 CONTACT TYPE 3 3;7 SET 'EM' FOR E-MAIL; 'FX' FOR FAX; 'TE' FOR TELEPHONE; 'EX' FOR TELEPHONE EXTENSION; LAST EDITED: MAR 20, 2003 HELP-PROMPT: Enter the code for the type of contact information. DESCRIPTION: This is the code that describes the type of contact information provided in the CONTACT NUMBER 3 field. 344.4,4.01 AUTO-POST DATE 4;1 DATE INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X LAST EDITED: JUN 06, 2014 HELP-PROMPT: Enter the date that this ERA was auto-posted. DESCRIPTION: This date is set by the auto-posting process in the PRCA nightly job when a matching ERA is found for an EFT which is accepted by FMS. This only applies if the ERA has no adjustments or interest charges and no pharmacy claims. 344.4,4.02 AUTO-POST STATUS 4;2 SET '0' FOR UNPOSTED; '1' FOR PARTIAL; '2' FOR COMPLETE; LAST EDITED: MAR 26, 2014 HELP-PROMPT: Enter the status for the ERA. DESCRIPTION: This field indicates if all the claim lines on an ERA have been posted as 'TR' receipts to Accounts Receivable. CROSS-REFERENCE: 344.4^E 1)= S ^RCY(344.4,"E",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"E",$E(X,1,30),DA) This cross-reference is used to find ERA entries by the AUTO-POST STATUS for lookup and reporting purposes. 344.4,4.03 LATEST AUTO-DECREASE DATE 4;4 DATE INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAY 06, 2014 HELP-PROMPT: Enter date that this ERA was last auto-decreased. DESCRIPTION: This is the date that the ERA was last processed for automatic decrease adjustments by the nightly process. 344.4,4.04 MARKED FOR AUTOPOST USER 4;3 POINTER TO NEW PERSON FILE (#200) LAST EDITED: DEC 11, 2017 HELP-PROMPT: Select the person who marked the ERA for auto-posting DESCRIPTION: This is the person who marked the ERA for auto-posting. This field is set automatically by the system. 344.4,5.01 PAYER WEB SITE ADDRESS 5;1 FREE TEXT INPUT TRANSFORM: K:$L(X)>115!($L(X)<1) X LAST EDITED: JUN 18, 2010 HELP-PROMPT: Enter payer web site address (1-115 characters). DESCRIPTION: This is the web site for the payer. The source for this field is the contact data record (type '01') of the X12 835 received from FSC. TECHNICAL DESCR: From 835 record 1000A PER04 where PER01 = "IC" and 1000A PER03 = "UR" 344.4,5.03 DATE CHECK MATCHED 5;3 DATE INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:X<1 X LAST EDITED: JAN 12, 2022 HELP-PROMPT: (No range limit on date) DESCRIPTION: Date the ERA was matched to a paper check if the EFT MATCH STATUS is 2 (MATCHED TO PAPER CHECK). Date the ERA was matched to a TDA if the EFT MATCH STATUS is 5 (MATCHED TO A TDA). TECHNICAL DESCR: This date will be automatically set to today's date by the software when an ERA is matched to a paper check or to a TDA. 344.4,5.04 CHECK MATCHED USER 5;4 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JAN 12, 2022 DESCRIPTION: The user who matched the ERA to a paper check if the EFT MATCH STATUS is 2 (MATCHED TO PAPER CHECK). The user who matched the ERA to a TDA if the EFT MATCH STATUS is 5 (MATCHED TO A TDA). TECHNICAL DESCR: This field will be automatically set to the current user by the software when an ERA is matched to a paper check or to a TDA. 344.4,7.01 DATE/TIME ERA LINKED 7;1 DATE INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:X<1 X LAST EDITED: MAR 24, 2011 HELP-PROMPT: Enter the date/time the ERA was linked to receipt. DESCRIPTION: This is date/time the ERA was linked to receipt. CROSS-REFERENCE: 344.4^AFL 1)= S ^RCY(344.4,"AFL",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"AFL",$E(X,1,30),DA) Created to find entries to include on ERA posted to Paper EOB report. 344.4,7.02 ERA LINKED BY 7;2 POINTER TO NEW PERSON FILE (#200) LAST EDITED: MAR 28, 2011 HELP-PROMPT: Select the person who linked the ERA to the receipt. DESCRIPTION: This is the person who linked the ERA to the receipt. RECORD INDEXES: AMCCF (#828) 344.4,8 OTHER RECEIPT NUMBERS 8;0 POINTER Multiple #344.48 DESCRIPTION: An auto-posted ERA can have multiple receipt numbers. If there is more than one receipt number for an ERA the subsequent receipt numbers are stored in this sub-file. 344.48,.01 OTHER RECEIPT NUMBER 0;1 POINTER TO AR BATCH PAYMENT FILE (#344) (Multiply asked) LAST EDITED: FEB 25, 2014 HELP-PROMPT: Enter the subsequent receipt number assigned to EEOB line(s) after initial auto-post . DESCRIPTION: This is the receipt created to record the detail of the ERA for AR posting. CROSS-REFERENCE: 344.48^B 1)= S ^RCY(344.4,DA(1),8,"B",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,DA(1),8,"B",$E(X,1,30),DA) 344.4,9 MCCF DATE/TIME 9;1 DATE INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X LAST EDITED: MAY 28, 2020 HELP-PROMPT: Enter the date/time the ERA data changed DESCRIPTION: This field is updated each time any ERA field required for MCCF reporting is updated. The field is used by MCCF extract RPCs to identify recently changed ERA data. TECHNICAL DESCR: This field is updated by action cross reference AMCCF. CROSS-REFERENCE: 344.4^MCCF 1)= S ^RCY(344.4,"MCCF",$E(X,1,30),DA)="" 2)= K ^RCY(344.4,"MCCF",$E(X,1,30),DA) Recent ERA Changes Index for the MCCF Extract. 344.4,20.01 DATE POSTED TO SUSPENSE 20;1 DATE INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAY 15, 2003 HELP-PROMPT: Enter the date/time this receipt was posted to suspense. DESCRIPTION: This is the date/time this ERA was posted to suspense. 344.4,20.02 POSTED TO SUSPENSE BY 20;2 POINTER TO NEW PERSON FILE (#200) LAST EDITED: MAY 15, 2003 HELP-PROMPT: Enter the name of the person who posted this ERA to suspense. DESCRIPTION: This is the person who posted this ERA to suspense. 344.4,20.03 PAPER EOB ENTRY 20;3 SET '0' FOR NO; '1' FOR YES; LAST EDITED: AUG 28, 2003 HELP-PROMPT: Enter a 1 (YES) if the ERA was posted using a paper EOB. DESCRIPTION: This is a flag that indicates if the ERA was not referenced when its data was posted to A/R and FMS because the data was posted using the paper EOB instead. FILES POINTED TO FIELDS AR BATCH PAYMENT (#344) RECEIPT (#.08) ERA DETAIL:RECEIPT (#.25) OTHER RECEIPT NUMBERS:OTHER RECEIPT NUMBER (#.01) EDI LOCKBOX EOB WORKLIST (#344.49) RECEIPT (#.08) ELECTRONIC REMITTANCE ADVICE (#344.4) ERA DETAIL:SEQUENCE # (#.01) EXPLANATION OF BENEFITS (#361.1) ERA DETAIL:EOB DETAIL (#.02) INSTITUTION (#4) ERA DETAIL:TRANSFERRED TO SITE (#.11) INSURANCE COMPANY (#36) ERA DETAIL:INSURANCE COMPANY ON BILL (#.04) NEW PERSON (#200) REMOVED BY (#.16) MARKED FOR AUTOPOST USER (#4.04) CHECK MATCHED USER (#5.04) ERA LINKED BY (#7.02) POSTED TO SUSPENSE BY (#20.02) ERA DETAIL:CLAIM COMMENT USER (#4.02) MARKED FOR AUTOPOST USER (#6.01) File #344.4 Record Indexes: AMCCF (#828) RECORD MUMPS IR ACTION Short Descr: Updates Recent ERA Changes Index for MCCF Extract Description: When any of the defined fields are updated, set the MCCF DATE/TIME (#9) field to NOW. Set Logic: N FDA,MSG,DIERR S FDA(344.4,DA_",",9)="NOW" D FILE^DIE("E","FDA","MSG") Q Kill Logic: Q X(1): ENTRY (344.4,.01) (forwards) X(2): TRACE NUMBER (344.4,.02) (forwards) X(3): INSURANCE CO ID (344.4,.03) (forwards) X(4): ERA DATE (344.4,.04) (forwards) X(5): TOTAL AMOUNT PAID (344.4,.05) (forwards) X(6): PAYMENT FROM (344.4,.06) (forwards) X(7): FILE DATE/TIME (344.4,.07) (forwards) X(8): RECEIPT (344.4,.08) (forwards) X(9): EFT MATCH STATUS (344.4,.09) (forwards) X(10): INDIVIDUAL EOB COUNT (344.4,.11) (forwards) X(11): CHECK # (344.4,.13) (forwards) X(12): ERA DETAIL POST STATUS (344.4,.14) (forwards) X(13): REMOVED DATE (344.4,.17) (forwards) X(14): ERA LINKED BY (344.4,7.02) (forwards) NO RE-INDEXING ALLOWED! APT (#1526) RECORD REGULAR IR SORTING ONLY Short Descr: Index by payer name and TIN Description: Index by payer name and payer ID. To be used when sorting reports by payer name first then payer ID. Set Logic: S ^RCY(344.4,"APT",$E(X(1),1,60),$E(X(2),1,30),DA)="" Kill Logic: K ^RCY(344.4,"APT",$E(X(1),1,60),$E(X(2),1,30),DA) Whole Kill: K ^RCY(344.4,"APT") X(1): PAYMENT FROM (344.4,.06) (Subscr 1) (Len 60) (forwards) X(2): INSURANCE CO ID (344.4,.03) (Subscr 2) (Len 30) (forwards) ATP (#1527) RECORD REGULAR IR SORTING ONLY Short Descr: Index by payer TIN and payer name. Description: Index by payer ID and payer name. To be used when sorting reports by payer ID first then payer name. Set Logic: S ^RCY(344.4,"ATP",$E(X(1),1,30),$E(X(2),1,60),DA)="" Kill Logic: K ^RCY(344.4,"ATP",$E(X(1),1,30),$E(X(2),1,60),DA) Whole Kill: K ^RCY(344.4,"ATP") X(1): INSURANCE CO ID (344.4,.03) (Subscr 1) (Len 30) (forwards) X(2): PAYMENT FROM (344.4,.06) (Subscr 2) (Len 60) (forwards) ATRID (#292) RECORD MUMPS IR SORTING ONLY Short Descr: Xref by bank trace # and ins co id # Set Logic: S ^RCY(344.4,"ATRID",$E(X(1),1,50),$E(X(2),1,30),DA)="" Kill Logic: K ^RCY(344.4,"ATRID",$E(X(1),1,50),$E(X(2),1,30),DA) Whole Kill: K ^RCY(344.4,"ATRID") X(1): TRACE NUMBER (344.4,.02) (Subscr 1) (Len 30) (forwards) X(2): INSURANCE CO ID (344.4,.03) (Subscr 2) (Len 30) (forwards) ATRIDUP (#403) RECORD MUMPS IR SORTING ONLY Short Descr: Case-insensitive lookup for Trace # and Insurance Co. Description: This cross-reference is used for claim matching without regard to case. The trace number and insurance company are converted to uppercase and the software uses this for matching claims by the trace number. The values in the TRACE NUMBER (#.02) and INSURANCE CO ID (#.03) fields remain unchanged. Set Logic: S ^RCY(344.4,"ATRIDUP",$$UP^XLFSTR($E(X(1),1,50)),$$UP^XLFSTR($E(X(2),1,30)),DA)="" Kill Logic: K ^RCY(344.4,"ATRIDUP",$$UP^XLFSTR($E(X(1),1,50)),$$UP^XLFSTR($E(X(2),1,30)),DA) Whole Kill: K ^RCY(344.4,"ATRIDUP") X(1): TRACE NUMBER (344.4,.02) (Subscr 1) (Len 50) (forwards) X(2): INSURANCE CO ID (344.4,.03) (Subscr 2) (Len 30) (forwards) Subfile #344.41 Record Indexes: AMCCF (#845) RECORD MUMPS IR ACTION Short Descr: Updates Recent ERA Changes Index for MCCF Extract Description: When any of the defined fields are updated, set the MCCF DATE/TIME (#9.02) field in this subfile entry to NOW. Set Logic: N FDA,MSG,DIERR S FDA(344.41,DA_","_DA(1)_",",9.02)="NOW" D FILE^DIE("E","FDA","MSG") Q Kill Logic: Q X(1): SEQUENCE # (344.41,.01) (forwards) X(2): EOB DETAIL (344.41,.02) (forwards) X(3): AMOUNT PAID (344.41,.03) (forwards) X(4): RECEIPT (344.41,.25) (forwards) X(5): ERROR STATUS (344.41,.13) (forwards) X(6): AUTO-DECREASE AMOUNT (344.41,8) (forwards) X(7): AUTO-POST DATE (344.41,9) (forwards) X(8): AUTO-DECREASE DATE (344.41,10) (forwards) NO RE-INDEXING ALLOWED! AVAL (#293) RECORD MUMPS IR SORTING ONLY Short Descr: Xref to find EOBs for bills not valid in VistA Description: This cross reference is set when the free text bill number is entered for the EOB detail and when the EOB detail pointer is deleted. This cross reference makes it possible to find those bills that do not belong to the site, but were included in the ERA received from an insurance co. Set Logic: S ^RCY(344.4,DA(1),1,"AVAL",DA)="" Set Cond: S X=$S(X2(1)="":1,1:0) Kill Logic: K ^RCY(344.4,DA(1),1,"AVAL",DA) Kill Cond: S X=$S(X2(1)'="":1,1:0) Whole Kill: K ^RCY(344.4,DA(1),1,"AVAL") X(1): EOB DETAIL (344.41,.02) (forwards) X(2): INVALID BILL NUMBER (344.41,.05) (forwards) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):