STANDARD DATA DICTIONARY #392.1 -- BENEFICIARY TRAVEL DISTANCE FILE                                               3/24/25    PAGE 1
STORED IN ^DGBT(392.1,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 1.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
 This file contains the mileage data between departure cities and medical center divisions.  Each departure city can have multiple 
divisions entered, each with it's own associated mileage, most economical cost, and remarks field.  


              DD ACCESS: @
              RD ACCESS: d
              WR ACCESS: D
             DEL ACCESS: D
           LAYGO ACCESS: D
IDENTIFIED BY: STATE (#2)[R]

CROSS
REFERENCED BY: CITY OR TOWN(AC), STATE(ACS), CITY OR TOWN(B), ZIP(C)



392.1,.01     CITY OR TOWN           0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1)!'(X'?1P.E) X I $D(X) D UP^DGBTHELP
              LAST EDITED:      OCT 30, 2001 
              HELP-PROMPT:      Enter the name of the city or town to be used as the point of departure, 1-30 characters in length. 
              DESCRIPTION:      This field contains the free text departure name, 1 to 30 characters in length, of the City or Town
                                that is used as the alternate lookup in determining the one way mileage distance that is
                                pre-stuffed when entering the Bene Travel Claim.  

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

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

              CROSS-REFERENCE:  392.1^AC^MUMPS 
                                1)= S:$P(^DGBT(392.1,DA,0),"^",2)]"" ^DGBT(392.1,"ACS",$E(X,1,30),$P(^DGBT(392.1,DA,0),"^",2),DA)="
                                " S ^DGBT(392.1,"AC",DA)=$E(X,1,30)

                                2)= K:$P(^DGBT(392.1,DA,0),"^",2)]"" ^DGBT(392.1,"ACS",$E(X,1,30),$P(^DGBT(392.1,DA,0),"^",2),DA) K
                                 ^DGBT(392.1,"AC",DA)


392.1,2       STATE                  0;2 POINTER TO STATE FILE (#5) (Required)

              LAST EDITED:      MAR 16, 1989 
              HELP-PROMPT:      Enter the State name or two digit postal abbreviation 
              DESCRIPTION:      This field points to the State File (#5) and contains the IFN for that field and is used in the
                                Beneficiary Travel Claim Options as the primary look-up to determine the one way mileage that can
                                be pre-stuffed in the Bene Travel Claim.  

              CROSS-REFERENCE:  392.1^ACS^MUMPS 
                                1)= S ^DGBT(392.1,"ACS",$P(^DGBT(392.1,DA,0),"^"),X,DA)=""
                                2)= K ^DGBT(392.1,"ACS",$P(^DGBT(392.1,DA,0),"^"),X,DA)


392.1,3       DEFAULT MILEAGE        0;3 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>10000)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      FEB 09, 1993 
              HELP-PROMPT:      Enter the default mileage between the city/town and the primary division.  This must be a number 
                                between 0 and 10000. 
              DESCRIPTION:      This field contains the one way mileage (in whole numbers between 0 and 10000) distance (e.g.
                                between place of departure and place of destination).  The default mileage is between the departure
                                city and the primary division of the instituion.  This value is not accessed directly by the user 
                                but is stuffed from the mileage/one way field in the primary division of the division mileage
                                multiple.  It is changed whenever the one-way mileage in the primary division is changed.  


392.1,4       ZIP                    0;4 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<5) X I $D(X) D ZIPIN^VAFADDR
              OUTPUT TRANSFORM: D ZIPOUT^VAFADDR
              LAST EDITED:      MAR 01, 1993 
              HELP-PROMPT:      Answer must be 5 digit or 9 digit zip code.  If no zip code is entered, you will not be able to do 
                                lookups later by cross-referencing on the zip code. 
              DESCRIPTION:      This field contains the 5-digit zip code for the Beneficiary Travel Distance File. This field is
                                not required, but if no zip code is present, the claim enter/edit routine will not be able to make
                                the initial look-up using the 'C' cross reference, and a correct look-up for the mileage will rely
                                solely  on the correct spelling of the city/town.  

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

              CROSS-REFERENCE:  392.1^C 
                                1)= S ^DGBT(392.1,"C",$E(X,1,30),DA)=""
                                2)= K ^DGBT(392.1,"C",$E(X,1,30),DA)
                                Zipcode cross-reference for lookup by zipcode 



392.1,5       * ADDITIONAL INFORMATION 0;5 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      FEB 09, 1993 
              HELP-PROMPT:      Enter 'YES' to indication that additional information should be checked (e.g. closer VA facility). 
              DESCRIPTION:      This field is a set of codes 0 for no and 1 for yes and is used to indicate that additional
                                information should be checked or not (e.g. if there is a closer VA facility, etc.) 


392.1,6       * MOST ECON/PUBLIC TRANS. COST 0;6 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>10000)!(X<0) X
              LAST EDITED:      FEB 09, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 10000, 2 Decimal Digits.  Indicate if there is a Most 
                                Econ./Public Trans. amount that should be used for this location. 
              DESCRIPTION:      This field is a dollar amount between 0 and 10000.00 and is used to indicate if there is a most
                                econ./public trans. amount that should be used for this location.  


392.1,100     DIVISION MILEAGE       1;0 POINTER Multiple #392.1001 (Add New Entry without Asking)

              LAST EDITED:      FEB 09, 1993 
              DESCRIPTION:      Multiple for divisions with each division having it's own mileage value between the division and
                                the departure city.  Edited by the user and, for the primary division, the mileage will be stuffed
                                into the default mileage field, #3.  


392.1001,.01    DIVISION NAME          0;1 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8) (Required)

                LAST EDITED:      FEB 09, 1993 
                HELP-PROMPT:      Enter the division name to be associated with this departure city 
                DESCRIPTION:
                                  Division Name points to the Medical Center Division file, #40.8 

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


392.1001,2      MILEAGE ONE WAY        0;2 NUMBER (Required)

                INPUT TRANSFORM:  K:+X'=X!(X>10000)!(X<0)!(X?.E1"."1N.N) X
                LAST EDITED:      FEB 09, 1993 
                HELP-PROMPT:      Enter the one-way mileage distance between the departure city and the division, 0 to 10000 miles, 
                                  no decimal points 
                DESCRIPTION:      One-way mileage value between the departure city and the division.  Value is between 0 and 10000
                                  miles.  For the primary division only, this value is used to populate the Default Mileage field,
                                  #3 on the zero node.  This value is stuffed into Field #3 when ever there is a difference between
                                  the Default mileage, and the primary division mileage.  


392.1001,3      MOST ECONOMICAL COST   0;3 NUMBER

                INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>10000)!(X<0) X
                LAST EDITED:      FEB 09, 1993 
                HELP-PROMPT:      Enter the cost of the most economical method of transportation as a dollar value between $0 and 
                                  $10000. 
                DESCRIPTION:
                                  Cost for the most economical method of transportation, public or private.  


392.1001,4      ADDITIONAL INFORMATION 0;4 SET

                                  '0' FOR NO; 
                                  '1' FOR YES; 
                LAST EDITED:      FEB 09, 1993 
                HELP-PROMPT:      Enter 'Y'es if there are remarks to be entered, or a 'N'o if there are no additional mileage 
                                  remarks. 
                DESCRIPTION:      Set of codes for additional information/remarks field.  If '0', no remarks exist.  If '1', there
                                  are remarks attached.  


392.1001,5      REMARKS                0;5 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
                LAST EDITED:      FEB 09, 1993 
                HELP-PROMPT:      Remarks can be 1 to 50 characters in length, and are associated with this division only. 
                DESCRIPTION:      Additional remarks associated with this division.  Remarks are free text, 1 to 50 characters in
                                  length.  These remarks will be displayed for informational purposes during Claim Enter/Edit, 
                                  prior to the mileage display.  The remark can only be changed in the Distance Enter/Edit option,
                                  it cannot be changed from the claim Enter/edit.  





      FILES POINTED TO                      FIELDS

MEDICAL CENTER DIVISION (#40.8)   DIVISION MILEAGE:DIVISION NAME (#.01)

STATE (#5)                        STATE (#2)



INPUT TEMPLATE(S):
DGBT MILES                    FEB 09, 1993@15:03  USER #0    
DGBT REMARKS                  FEB 09, 1993@15:04  USER #0    
DGBT ZIP                      FEB 09, 1993@15:04  USER #0    

PRINT TEMPLATE(S):
DGBT MILES                    FEB 09, 1993@14:57  USER #0                                          BENEFICIARY TRAVEL DISTANCE LIST
DGBT REMARKS                  FEB 09, 1993@14:52  USER #0                                          BENEFICIARY TRAVEL DISTANCE LIST
DGBT ZIP                      JUL 14, 1993@11:41  USER #0                                          BENEFICIARY TRAVEL DISTANCE LIST

SORT TEMPLATE(S):
DGBT REMARKS                  MAR 26, 1993@15:15  USER #0    
SORT BY: @DIVISION MILEAGE;L1//
DIVISION MILEAGE SUB-FIELD: ADDITIONAL INFORMATION="YES"// (ADDITIONAL INFORMATION=""YES"")
  WITHIN ADDITIONAL INFORMATION="YES", SORT BY: @DIVISION MILEAGE;L1//
  DIVISION MILEAGE SUB-FIELD: REMARKS=""// (REMARKS="""")


FORM(S)/BLOCK(S):