STANDARD DATA DICTIONARY #344.49 -- EDI LOCKBOX EOB WORKLIST FILE                                                 6/27/25    PAGE 1
STORED IN ^RCY(344.49,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 4.5)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the data that will be used to auto-create a receipt from data received via the EDI Lockbox system for ERAs.  



CROSS
REFERENCED BY: BATCH IN USE(AINUSE), ERA REFERENCE(B), CLAIM #(D)

    LAST MODIFIED: FEB 14,2023@17:41:43

344.49,.01    ERA REFERENCE          0;1 POINTER TO ELECTRONIC REMITTANCE ADVICE FILE (#344.4) (Required)

              INPUT TRANSFORM:  S:$D(X) DINUM=X Q
              LAST EDITED:      FEB 03, 2003 
              HELP-PROMPT:      Enter the reference to the ERA that caused this scratch pad record to exist. 
              DESCRIPTION:      This is the pointer to the record in file 344.4 that contains the ERA detail as received from the
                                EDI Lockbox transmission.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  344.49^B 
                                1)= S ^RCY(344.49,"B",$E(X,1,30),DA)=""
                                2)= K ^RCY(344.49,"B",$E(X,1,30),DA)


344.49,.02    RECEIPT #              0;2 POINTER TO AR BATCH PAYMENT FILE (#344)

              LAST EDITED:      FEB 04, 2003 
              HELP-PROMPT:      Enter the receipt number that was created from this entry. 
              DESCRIPTION:      This is the pointer to the receipt entry that was created as a result of this EDI Lockbox Worklist
                                entry.  

              NOTES:            TRIGGERED by the RECEIPT field of the ELECTRONIC REMITTANCE ADVICE File 


344.49,.03    TOTAL PAYMENT RECEIVED 0;3 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999999999)!(X<0) X
              LAST EDITED:      FEB 04, 2003 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999999999, 2 Decimal Digits 
              DESCRIPTION:      This is the total amount of money that was received in conjunction with the ERA.  This amount must
                                equal the total amount being posted in the receipt.  


344.49,.04    CHECK #                0;4 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
              LAST EDITED:      MAY 08, 2003 
              HELP-PROMPT:      Answer must be 1-15 characters in length. 
              DESCRIPTION:      This is the paper check number that is matched to this ERA.  It will be included on each receipt
                                transaction if the receipt is created through the EOB Worklist options.  


344.49,.05    CHECK DATE             0;5 DATE

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JUN 20, 2003 
              HELP-PROMPT:      Enter the date on the bank's check. 
              DESCRIPTION:
                                This is the date on the check.  


344.49,.06    BANK ROUTING #         0;6 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
              LAST EDITED:      JUN 20, 2003 
              HELP-PROMPT:      Answer must be 1-15 characters in length. 
              DESCRIPTION:
                                This is the bank routing number to be put on the receipt.  


344.49,1      SEQUENCE #             1;0 Multiple #344.491 (Add New Entry without Asking)

              LAST EDITED:      FEB 14, 2003 

344.491,.01     ERA SEQUENCE #         0;1 NUMBER (Multiply asked)

                INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."4N.N) X
                LAST EDITED:      FEB 19, 2003 
                HELP-PROMPT:      Type a Number between 1 and 999, 3 Decimal Digits 
                DESCRIPTION:      This field contains a number consisting of a whole number and optionally a decimal.  The whole
                                  number represents the place holder for the line in the original ERA that was used to initially
                                  create the scratch pad.  The decimal portion represents additional lines that have been added to
                                  break down and further define the allocation of this payment.  

                CROSS-REFERENCE:  344.491^B 
                                  1)= S ^RCY(344.49,DA(1),1,"B",$E(X,1,30),DA)=""
                                  2)= K ^RCY(344.49,DA(1),1,"B",$E(X,1,30),DA)

                CROSS-REFERENCE:  344.491^ASEQ^MUMPS 
                                  1)= S:(X\1=X) ^RCY(344.49,DA(1),1,"ASEQ",X,DA)=""
                                  2)= K:(X\1=X) ^RCY(344.49,DA(1),1,"ASEQ",X,DA)
                                  3)= Do not delete


344.491,.02     CLAIM #                0;2 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
                LAST EDITED:      MAY 18, 2018 
                HELP-PROMPT:      Answer must be 1-15 characters in length. 
                DESCRIPTION:      This is the claim # that will be posted against when/if this line is added to a receipt.  If this
                                  field is blank, assume SUSPENSE as the account.  

                CROSS-REFERENCE:  344.49^D 
                                  1)= S ^RCY(344.49,"D",$E(X,1,30),DA(1),DA)=""
                                  2)= K ^RCY(344.49,"D",$E(X,1,30),DA(1),DA)
                                  INDEX SCRATCHPAD BY CLAIM NUMBER - USED TO MATCH CLAIM NUMBER TO AN ERA FOR MCCF 



344.491,.03     AMOUNT TO POST ON RECEIPT 0;3 NUMBER

                INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999999999)!(X<0) X
                LAST EDITED:      FEB 04, 2003 
                HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999999999, 2 Decimal Digits 
                DESCRIPTION:
                                  This is the amount of money to post for this line item on the receipt.  

                NOTES:            TRIGGERED by the NET AMOUNT OF PAYMENT field of the SEQUENCE # sub-field of the EDI LOCKBOX EOB 
                                  WORKLIST File 


344.491,.04     INCLUDE ON RECEIPT     0;4 SET

                                  '1' FOR YES; 
                                  '0' FOR NO; 
                LAST EDITED:      FEB 04, 2003 
                HELP-PROMPT:      Enter a '1' (YES) to include this line on a receipt. 
                DESCRIPTION:      Responding YES here will force a line item with the data contained on this record to be added to
                                  the EDI Lockbox receipt that will be created from this worklist entry.  


344.491,.05     AMT OF PAYMENT         0;5 NUMBER

                INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999999999)!(X<-9999999999999) X
                LAST EDITED:      FEB 04, 2003 
                HELP-PROMPT:      Type a Dollar Amount between -9999999999999 and 9999999999999, 2 Decimal Digits 
                DESCRIPTION:      This is the amount of money paid for the claim in the ERA.  If this amount is negative, it
                                  indicates an adjustment of this amount was found on the ERA for the claim.  


344.491,.06     NET AMOUNT OF PAYMENT  0;6 NUMBER

                INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999999999)!(X<-9999999999999) X
                LAST EDITED:      FEB 04, 2003 
                HELP-PROMPT:      Type a Dollar Amount between -9999999999999 and 9999999999999, 2 Decimal Digits 
                DESCRIPTION:
                                  This is the amount of the original payment less any adjustments recorded.  

                CROSS-REFERENCE:  ^^TRIGGER^344.491^.03 
                                1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(0)=X S X=Y(0)'<0 I X S X=DIV S Y(1)=$S($D(
                                ^RCY(344.49,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 ^DD(344.491,.
                                06,1,1,1.4)

                                1.4)= S DIH=$G(^RCY(344.49,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=344.491,DIG=.03 D ^DICR

                                2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^RCY(344.49,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.491,.06,1,1,2.4)

                                2.4)= S DIH=$G(^RCY(344.49,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=344.491,DIG=.03 D ^DICR

                                CREATE CONDITION)= NET AMOUNT OF PAYMENT'<0
                                CREATE VALUE)= NET AMOUNT OF PAYMENT
                                DELETE VALUE)= @
                                FIELD)= AMOUNT TO POST ON RECEIPT


344.491,.07     AR BILL #            0;7 POINTER TO ACCOUNTS RECEIVABLE FILE (#430)

                LAST EDITED:    FEB 06, 2003 
                HELP-PROMPT:    Enter the AR bill # that corresponds to the claim # on this record. 
                DESCRIPTION:    This is the pointer to file 430 for the AR bill that corresponds to the claim # on file for the
                                payment.  Thi sfield will be blank for 'SUSPENSE' items.  


344.491,.08     NET AMT OF ADJUSTMENTS 0;8 NUMBER

                INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999999999)!(X<-9999999999999) X
                LAST EDITED:    APR 23, 2003 
                HELP-PROMPT:    Type a Dollar Amount between -9999999999999 and 9999999999999, 2 Decimal Digits 
                DESCRIPTION:
                                This is the total net amount of all adjustments for the line item.  


344.491,.09     ORIGINAL ERA SEQUENCES 0;9 FREE TEXT

                INPUT TRANSFORM:K:$L(X)>10!($L(X)<1) X
                LAST EDITED:    FEB 14, 2003 
                HELP-PROMPT:    Answer must be 1-10 characters in length. 
                DESCRIPTION:    This is the list of sequence #'s in the original ERA that was used to create this sequence in the
                                scratch pad.  It will only exist on the record whose sequence # is a whole number.  An ERA level
                                adjustment will be listed as ADJ followed by the ien of the adjustment in the ERA record in file
                                344.42.  The referenced sequence numbers are separated by commas.  


344.491,.1      RECEIPT LINE COMMENT 0;10 FREE TEXT

                INPUT TRANSFORM:K:$L(X)>60!($L(X)<3) X
                MAXIMUM LENGTH:   60
                LAST EDITED:    MAY 12, 2017 
                HELP-PROMPT:    Answer must be 3-60 characters in length. 
                DESCRIPTION:    This is the text that will be used to create a bill comment for the bill referenced by this
                                sequence.  


344.491,.11     REVIEWED?            0;11 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
                                'I' FOR IN PROCESS; 
                LAST EDITED:    JUN 12, 2003 
                HELP-PROMPT:    Enter the code that corresponds to the review status of this EOB. 
                DESCRIPTION:
                                This is the review status of the EOB.  


344.491,.12     REVIEWED BY          0;12 POINTER TO NEW PERSON FILE (#200)

                LAST EDITED:    JUN 12, 2003 
                HELP-PROMPT:    Enter the name of the user who performed the revieew for this EOB 
                DESCRIPTION:
                                This is the name of the user who performed the revieew for this EOB.  


344.491,.13     VERIFIED             0;13 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
                LAST EDITED:    FEB 12, 2004 
                HELP-PROMPT:    Enter a 1 (YES) if the EEOB's verification data has been matched correctly to the VistA claim's 
                                data. 
                DESCRIPTION:    This is the flag that indicates the EEOB's verification data has been matched correctly to the
                                VistA claim's data, either automatically or manually to determine that the claim paid was the
                                correct claim.  

                CROSS-REFERENCE:344.491^ANV 
                                1)= S ^RCY(344.49,DA(1),1,"ANV",$E(X,1,30),DA)=""
                                2)= K ^RCY(344.49,DA(1),1,"ANV",$E(X,1,30),DA)
                                3)= Do not delete


344.491,.14     BATCH #              0;14 NUMBER

                INPUT TRANSFORM:K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:    FEB 19, 2004 
                HELP-PROMPT:    Type a Number between 1 and 999, 0 Decimal Digits 
                DESCRIPTION:
                                This is the # assigned to this EEOB for the batch in which it will be accessible.  

                CROSS-REFERENCE:344.491^ABAT 
                                1)= S ^RCY(344.49,DA(1),1,"ABAT",$E(X,1,30),DA)=""
                                2)= K ^RCY(344.49,DA(1),1,"ABAT",$E(X,1,30),DA)
                                3)= Do not delete


344.491,1       ADJUSTMENT LOG       1;0 Multiple #344.4911 (Add New Entry without Asking)


344.4911,.01      ADJUSTMENT #         0;1 NUMBER (Multiply asked)

                  INPUT TRANSFORM:K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
                  LAST EDITED:    FEB 04, 2003 
                  HELP-PROMPT:    Type a Number between 1 and 99, 0 Decimal Digits 
                  DESCRIPTION:    This is a sequential # used to enumerate the adjustments made as a result of or to this line
                                  item.  

                  CROSS-REFERENCE:344.4911^B 
                                  1)= S ^RCY(344.49,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""
                                  2)= K ^RCY(344.49,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)


344.4911,.02      ADJUSTMENT CAUSE     0;2 SET (Required)

                                  '0' FOR ADJUSTED DUE TO ANOTHER CLAIM; 
                                  '1' FOR CAUSED ANOTHER CLAIM TO BE ADJUSTED; 
                                  '2' FOR RETRACTION - SPECIFIC CLAIM; 
                                  '3' FOR RETRACTION - NO SPECIFIC CLAIM; 
                                  '4' FOR ADDITIONAL PAYMENT - SPECIFIC CLAIM; 
                                  '5' FOR ADDITIONAL PAYMENT - NO SPECIFIC CLAIM; 
                  LAST EDITED:    FEB 14, 2003 
                  HELP-PROMPT:    Enter the code that corresponds to the reason the adjustment record is being added. 
                  DESCRIPTION:    This is a flag that indicates if the adjustment was caused by this line item, if the adjustment
                                  is a result of another line item needing to decrease the amount of money being applied for this
                                  ERA or if the adjustment is a result of a reversal or additional payment on the ERA for a
                                  specific or non-specific claim.  


344.4911,.03      ADJUSTMENT AMOUNT    0;3 NUMBER

                  INPUT TRANSFORM:S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999999999)!(X<-9999999999999) X
                  LAST EDITED:    FEB 04, 2003 
                  HELP-PROMPT:    Type a Dollar Amount between -9999999999999 and 9999999999999, 2 Decimal Digits 
                  DESCRIPTION:    This is the amount that will be used to either reduce or increase the net amount of payment for
                                  the line item.  


344.4911,.04      REFERENCE #          0;4 FREE TEXT

                  INPUT TRANSFORM:K:$L(X)>30!($L(X)<1) X
                  LAST EDITED:    FEB 04, 2003 
                  HELP-PROMPT:    Answer must be 1-30 characters in length. 
                  DESCRIPTION:
                                  This is the reference # or claim # that was provided to identify the cause of the adjustment.  


344.4911,.05      BACKGROUND ACTION    0;5 SET

                                  '0' FOR NONE; 
                                  '1' FOR DECREASE ADJUSTMENT; 
                                  '2' FOR COMMENT; 
                                  '3' FOR ADD LINE TO RECEIPT; 
                  LAST EDITED:    FEB 14, 2003 
                  HELP-PROMPT:    Enter the code that corresponds to the action that should be applied to this record as a result 
                                  of this adjustment. 
                  DESCRIPTION:    This indicates the action that should be taken to apply this adjustment to the claim referenced
                                  when the receipt is ready to be created.  


344.4911,.06      USER OFFSET ACTION NEEDED 0;6 SET

                                  '0' FOR NO; 
                                  '1' FOR YES; 
                  LAST EDITED:    FEB 14, 2003 
                  HELP-PROMPT:    Enter a 1 (YES) if the user needs to offset this adjustment with a dec adj on another claim. 
                  DESCRIPTION:    This indicates what action the user is expected to take to reconcile the adjustment so the ERA is
                                  ready for receipt creation.  


344.4911,.07      ERA SEQUENCE REF     0;7 FREE TEXT

                  INPUT TRANSFORM:K:$L(X)>10!($L(X)<1) X
                  LAST EDITED:    FEB 14, 2003 
                  HELP-PROMPT:    Answer must be 1-10 characters in length. 
                  DESCRIPTION:    This is the reference to the actual seq or ERA adjustment record that this adjustment was
                                  received in.  


344.4911,.08      BACKGROUND ACTION COMPLETED 0;8 SET

                                  '0' FOR NO; 
                                  '1' FOR YES; 
                  LAST EDITED:    FEB 14, 2003 
                  HELP-PROMPT:    Enter a 1 (YES) if the background action has been completed. 
                  DESCRIPTION:    This field keeps track of whther or not the background action that has been assigned to this
                                  adjustment has been completed or not.  This prevents decrease adjustments from being performed
                                  more than once.  


344.4911,.09      ADJUSTMENT COMMENT   0;9 FREE TEXT

                  INPUT TRANSFORM:K:$L(X)>60!($L(X)<1) X
                  LAST EDITED:    FEB 25, 2003 
                  HELP-PROMPT:    Answer must be 1-60 characters in length. 
                  DESCRIPTION:
                                  This is the comment that will be placed in the bill record as a result of this adjustment.  




344.491,2.01    ADDED BY               2;1 POINTER TO NEW PERSON FILE (#200)

                  LAST EDITED:    FEB 18, 2003 
                  HELP-PROMPT:    Enter the name of the person who wqs responsible for creating this record. 
                  DESCRIPTION:
                                  This is the name of the person whose actions caused this record to be created.  


344.491,2.02    DATE/TIME ADDED        2;2 DATE

                  INPUT TRANSFORM:S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
                  LAST EDITED:    FEB 18, 2003 
                  HELP-PROMPT:    Enter the date and time the record was added. 
                  DESCRIPTION:
                                  This is the date and time the record was first added to the scratch pad.  


344.491,2.03    LAST EDITED BY         2;3 POINTER TO NEW PERSON FILE (#200)

                  LAST EDITED:    FEB 18, 2003 
                  HELP-PROMPT:    Enter the name of the person who last edited this record. 
                  DESCRIPTION:
                                  This is the aname of the person who last edited this record.  


344.491,2.04    LAST EDITED DATE/TIME  2;4 DATE

                  INPUT TRANSFORM:S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
                  LAST EDITED:    FEB 18, 2003 
                  HELP-PROMPT:    Enter the date and time this record was last edited. 
                  DESCRIPTION:
                                  This is the date and time this record was last edited.  


344.491,4       REVIEW                 4;0 DATE Multiple #344.4914

                  DESCRIPTION:
                                  This is the data relating to the notes entered by the user when reviewing the EEOB.  


344.4914,.01      REVIEW DATE/TIME       0;1 DATE

                    INPUT TRANSFORM:S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
                    LAST EDITED:    JAN 02, 2004 
                    HELP-PROMPT:    Enter the date/time that the review was entered. 
                    DESCRIPTION:
                                    The date/time the review comment was entered.  

                    CROSS-REFERENCE:344.4914^B 
                                    1)= S ^RCY(344.49,DA(2),1,DA(1),4,"B",$E(X,1,30),DA)=""
                                    2)= K ^RCY(344.49,DA(2),1,DA(1),4,"B",$E(X,1,30),DA)


344.4914,.02      REVIEWED BY            0;2 POINTER TO NEW PERSON FILE (#200)

                    LAST EDITED:    JAN 08, 2004 
                    HELP-PROMPT:    Enter the name of the person who entered this review. 
                    DESCRIPTION:
                                    This is the pointer to the NEW PERSON file for the person who entered the review comment.  

                    CROSS-REFERENCE:344.491^AC 
                                    1)= S ^RCY(344.49,DA(2),1,"AC",$E(X,1,30),DA(1),DA)=""
                                    2)= K ^RCY(344.49,DA(2),1,"AC",$E(X,1,30),DA(1),DA)
                                    3)= Do not delete
                                    This xref allows a quick lookup of one user's comments for the EEOB.  



344.4914,.03      COMMENT                1;0   WORD-PROCESSING #344.49141   (NOWRAP)


                      LAST EDITED:    JAN 06, 2004 
                      HELP-PROMPT:    Enter the review comment pertaining to this EEOB. 
                      DESCRIPTION:
                                      The review comment as entered by the user regarding their review of this EEOB.  




344.4914,.04      LAST EDITED DATE/TIME    0;4 DATE

                      INPUT TRANSFORM:S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
                      LAST EDITED:    JAN 08, 2004 
                      HELP-PROMPT:    Enter the date/time this comment was last edited. 
                      DESCRIPTION:
                                      This is the date/time this comment was last edited.  






344.49,2      USER PREFERENCE        2;0 POINTER Multiple #344.492 (Add New Entry without Asking)

              DESCRIPTION:      This is a collection of all the preferences recorded for a user so default settings can be applied
                                customized by user when the worklist entry is selected.  


344.492,.01     CLERK                  0;1 POINTER TO NEW PERSON FILE (#200)

                LAST EDITED:      JAN 02, 2004 
                HELP-PROMPT:      Enter the user for whom the preference are being stored. 
                DESCRIPTION:
                                  This is the user whose preferences are being recorded for this worklist entry.  

                CROSS-REFERENCE:  344.492^B 
                                  1)= S ^RCY(344.49,DA(1),2,"B",$E(X,1,30),DA)=""
                                  2)= K ^RCY(344.49,DA(1),2,"B",$E(X,1,30),DA)


344.492,.02     REVIEW ON?             0;2 SET

                                  '0' FOR NO; 
                                  '1' FOR YES; 
                LAST EDITED:      JAN 02, 2004 
                HELP-PROMPT:      Enter a 1 (YES) if review data should be shown on entry to the worklist. 
                DESCRIPTION:      This flag indicates whether or not the last time this user accessed the worklist, the review data
                                  was displayed.  


344.492,.03     LAST ORDER SELECTION   0;3 SET

                                  'N' FOR NO ORDER; 
                                  'F' FOR ZERO-PAYMENTS FIRST; 
                                  'L' FOR ZERO-PAYMENTS LAST; 
                LAST EDITED:      JAN 06, 2004 
                HELP-PROMPT:      Enter the code corresponding to the sort order the user last used when accessing the worklist 
                                  entry. 
                DESCRIPTION:
                                  This is the sort order the user last used when accessing the worklist entry.  




344.49,3      BATCH                  3;0 Multiple #344.493

              LAST EDITED:      JAN 15, 2004 
              DESCRIPTION:      This multiple field holds a record for each batch defined for the ERA.  It will hold the number of
                                the batch, the name of the batch and other data related specifically to each batch within the ERA.  

              IDENTIFIED BY:    NAME(#.02), READY FOR POSTING(#.03)

344.493,.01     BATCH #                0;1 NUMBER (Multiply asked)

                INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X I $D(X) S DINUM=X
                LAST EDITED:      FEB 10, 2004 
                HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits 
                DESCRIPTION:
                                  This is the batch # assigned to a group of EEOBs within the ERA record.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  344.493^B 
                                  1)= S ^RCY(344.49,DA(1),3,"B",$E(X,1,30),DA)=""
                                  2)= K ^RCY(344.49,DA(1),3,"B",$E(X,1,30),DA)


344.493,.02     NAME                   0;2 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                LAST EDITED:      APR 22, 2004 
                HELP-PROMPT:      Answer must be 1-30 characters in length. 
                DESCRIPTION:
                                  This is the name assigned to the batch.  

                CROSS-REFERENCE:  344.493^C 
                                  1)= S ^RCY(344.49,DA(1),3,"C",$E(X,1,30),DA)=""
                                  2)= K ^RCY(344.49,DA(1),3,"C",$E(X,1,30),DA)
                                  3)= Do not delete


344.493,.03     READY FOR POSTING      0;3 SET

                                  '0' FOR NO; 
                                  '1' FOR YES; 
                OUTPUT TRANSFORM: S Y=$S(Y:"",1:"NOT ")_"READY TO POST"
                LAST EDITED:      FEB 12, 2004 
                HELP-PROMPT:      Enter 1 (YES) if all the batch's records are ready to be posted. 
                DESCRIPTION:      This is a flag that indicates whether or not a user has indicated the batch is ready to be
                                  posted.  All batches must be flagged as ready before a receipt can be created from the worklist
                                  entry.  


344.493,.04     POSTING FLAG SET BY    0;4 POINTER TO NEW PERSON FILE (#200)

                LAST EDITED:      JAN 15, 2004 
                HELP-PROMPT:      Enter the name of the user who set the flag to 1 for batch ready to post. 
                DESCRIPTION:
                                  This is the name of the user who set the flag to 1 for batch ready to post.  


344.493,.05     BATCH IN USE           0;5 SET

                                  '0' FOR NO; 
                                  '1' FOR YES; 
                LAST EDITED:      FEB 11, 2004 
                HELP-PROMPT:      Enter 1 (YES) if the batch is currently being used. 
                DESCRIPTION:
                                  If the batch is currently being used, this field will be set to YES (1).  

                CROSS-REFERENCE:  344.49^AINUSE 
                                  1)= S ^RCY(344.49,"AINUSE",$E(X,1,30),DA(1),DA)=""
                                  2)= K ^RCY(344.49,"AINUSE",$E(X,1,30),DA(1),DA)
                                  3)= Do not delete
                                  This xref allows for a quick check to see if any batches within the ERA are in use or not.  



344.493,.06     CRITERIA USED          0;6 SET

                                  '1' FOR MAX #; 
                                  '2' FOR NAME RANGE; 
                                  '3' FOR PAYMENT PART/FULL/NONE; 
                                  '4' FOR COPAY/NO COPAY; 
                LAST EDITED:      FEB 12, 2004 
                HELP-PROMPT:      Enter the code for the type of criteria selected for the batches. 
                DESCRIPTION:
                                  This is the code to identify the type of criteria selected to create the batches.  


344.493,.07     START VALUE            0;7 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                LAST EDITED:      FEB 12, 2004 
                HELP-PROMPT:      Answer must be 1-30 characters in length. 
                DESCRIPTION:      This is the first data value to be used to determine if the EEOB should belong to this batch when
                                  assigning batch #'s to the EEOBs.  


344.493,.08     END VALUE              0;8 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                LAST EDITED:      FEB 12, 2004 
                HELP-PROMPT:      Answer must be 1-30 characters in length. 
                DESCRIPTION:      This is the last data value to be used to determine if the EEOB should belong to this batch when
                                  assigning batch #'s to the EEOBs.  




344.49,4      OTHER RECEIPT NUMBERS  4;0 POINTER Multiple #344.494

              DESCRIPTION:
                                This sub-file is used to store additional receipt information for this entry.  


344.494,.01     OTHER RECEIPT NUMBER   0;1 POINTER TO AR BATCH PAYMENT FILE (#344) (Multiply asked)

                LAST EDITED:      FEB 12, 2014 
                HELP-PROMPT:      Enter a Receipt Number from the AR BATCH PAYMENT file (#344). 
                DESCRIPTION:
                                  This is an additional Receipt Number related to this entry.  

                CROSS-REFERENCE:  344.494^B 
                                  1)= S ^RCY(344.49,DA(1),4,"B",$E(X,1,30),DA)=""
                                  2)= K ^RCY(344.49,DA(1),4,"B",$E(X,1,30),DA)





      FILES POINTED TO                      FIELDS

ACCOUNTS RECEIVABLE (#430)        FIELD^NL^4^20:AR BILL # (#.07)

AR BATCH PAYMENT (#344)           RECEIPT # (#.02)
                                  OTHER RECEIPT NUMBERS:OTHER RECEIPT NUMBER (#.01)

ELECTRONIC REMITTANCE ADVICE 
                   (#344.4)       ERA REFERENCE (#.01)

NEW PERSON (#200)                 FIELD^NL^4^20:REVIEWED BY (#.12)
                                  ADDED BY (#2.01)
                                  LAST EDITED BY (#2.03)
                                  REVIEW:REVIEWED BY (#.02)
                                  USER PREFERENCE:CLERK (#.01)
                                  BATCH:POSTING FLAG SET BY (#.04)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):