STANDARD DATA DICTIONARY #6915.6 -- FR DOCUMENT LOG FILE                                                          3/24/25    PAGE 1
STORED IN ^ENG(6915.6,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 7.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
File of FR documents sent to Fixed Assets. This file should not be locally modified.  


IDENTIFIED BY: DATE/TIME CREATED (#1)[R], TRANS NUMBER (#23)[R]

CROSS
REFERENCED BY: A.V. DATE(AV), EQUIPMENT RECORD(B), TRANS NUMBER(C), DATE/TIME CREATED(D)



6915.6,.01    EQUIPMENT RECORD       0;1 POINTER TO EQUIPMENT INV. FILE (#6914) (Required)

              LAST EDITED:      SEP 06, 1995 
              DESCRIPTION:      This field holds the internal entry number from file 6914 for the piece of capitalized NX equipment
                                that an FR document was sent for.  

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


6915.6,1      DATE/TIME CREATED      0;2 DATE (Required)

              INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      DEC 13, 1995 
              DESCRIPTION:
                                This is the date and time that the FR document was prepared.  

              CROSS-REFERENCE:  6915.6^D 
                                1)= S ^ENG(6915.6,"D",$E(X,1,30),DA)=""
                                2)= K ^ENG(6915.6,"D",$E(X,1,30),DA)


6915.6,1.5    SENDER                 0;3 POINTER TO NEW PERSON FILE (#200) (Required)

              LAST EDITED:      SEP 13, 1995 
              DESCRIPTION:
                                This is the person who created the FR document using the Equipment Entry option.  


6915.6,2      SEGMENT 1 ID           1;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the Segment 1 ID for the FR document, usually it will be CTL.  


6915.6,3      SOURCE SYSTEM          1;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the source system for the FR document, ususally RMM.  


6915.6,4      DESTINATION SYSTEM     1;3 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the system where the FR document is going, usually FMS.  


6915.6,5      SUBMITTING STATION     1;4 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the station number of the site that is submitting this FR document.  


6915.6,6      TRANSACTION CLASS      1;5 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:      This is the class of document being sent to FMS.  It is usually DOC, to represent a document
                                transaction.  


6915.6,7      TRANSACTION CODE       1;6 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 2 characters in length. 
              DESCRIPTION:
                                This tells FMS what kind of document is being sent.  FR for an FR document.  


6915.6,8      SEC1 CODE              1;7 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 4 characters in length. 
              DESCRIPTION:      This is the Security 1 code of the submitting Administration/Staff office.  VHR=10, VBR=20, and
                                NCS=40.  


6915.6,9      BATCH NUMBER           1;8 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>6!($L(X)<6) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 6 characters in length. 
              DESCRIPTION:
                                This is the batch number of the FR document being sent.  Currently set to six spaces.  


6915.6,10     TRANSACTION NUMBER     1;9 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>11!($L(X)<11) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 11 characters in length. 
              DESCRIPTION:      This is the transaction number for this FR document.  It consists of the station number_the last
                                digit of the fiscal year_N_the 4 digit sequential number.  


6915.6,11     TRANSACTION DATE       1;10 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<8) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 8 characters in length. 
              DESCRIPTION:
                                This is the date the FR document was created in YYYYMMDD format.  


6915.6,12     TRANSACTION TIME       1;11 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>6!($L(X)<6) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 6 characters in length. 
              DESCRIPTION:
                                This is the time the FR document was created in HHMMSS format.  


6915.6,13     SEQUENCE NUMBER        1;12 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the transaction part sequence number.  Should always be 001.  


6915.6,14     SEQUENCE TOTAL         1;13 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the total number of transaction parts.  Should always be 001.  


6915.6,15     VERSION                1;14 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the RMES/MERS-FMS interface version.  Should always be 001.  


6915.6,16     SEGMENT 2 ID           2;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the segment identifier for segment 2.  Should always be DOC.  


6915.6,20     SEGMENT 3 ID           3;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 3 characters in length. 
              DESCRIPTION:
                                This is the segment identifier for the the FR1 segment.  Should always be FR1.  


6915.6,21     TRANS CODE             3;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 2 characters in length. 
              DESCRIPTION:
                                This is the Trans code for the FR1 segment.  Should always be FR.  


6915.6,22     TRANS DIVISION         3;3 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>4!($L(X)<2) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 2-4 characters in length. 
              DESCRIPTION:
                                This is the Security 1 code.  VHA=10, VBA=20, NCS=40.  


6915.6,23     TRANS NUMBER           3;4 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>11!($L(X)<9) X
              LAST EDITED:      DEC 19, 1996 
              HELP-PROMPT:      Answer must be 9-11 characters in length. 
              DESCRIPTION:      This is the transaction number for this FR document.  It consists of the station number_the last
                                digit of the fiscal year_N_the 4 digit sequential number.  

              CROSS-REFERENCE:  6915.6^C 
                                1)= S ^ENG(6915.6,"C",$E(X,1,30),DA)=""
                                2)= K ^ENG(6915.6,"C",$E(X,1,30),DA)


6915.6,24     FIXED ASSET NUMBER     3;5 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>15!($L(X)<15) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 15 characters in length. 
              DESCRIPTION:      The fixed asset number consists of the submitting station_the 2 digit satelite station number (or 2
                                spaces if no satellite)_the internal entry number of the asset from file 6914.  


6915.6,25     FIXED ASSET TYPE       3;6 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 1 character in length. 
              DESCRIPTION:
                                This is the FA TYPE field from the NX SGL file for this particular Standard General Ledger account.  


6915.6,26     NEW FA GROUP           3;7 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 4 characters in length. 
              DESCRIPTION:
                                This is the fixed asset group at the new facility.  


6915.6,27     BEG BUDGET FY          3;8 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 2 characters in length. 
              DESCRIPTION:
                                This is the beginning budget fiscal year.  


6915.6,28     NEW FUND (TEXT)        3;9 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>6!($L(X)<4) X
              LAST EDITED:      SEP 25, 1995 
              HELP-PROMPT:      Answer must be 4-6 characters in length. 
              DESCRIPTION:
                                This is the new fund at the new facility.  


6915.6,29     NEW A/O (TEXT)         3;10 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>4!($L(X)<2) X
              LAST EDITED:      SEP 25, 1995 
              HELP-PROMPT:      Answer must be 2-4 characters in length. 
              DESCRIPTION:
                                This is the new division at the new facility.  


6915.6,30     NEW OWNING STATION     3;11 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>5!($L(X)<3) X
              LAST EDITED:      OCT 03, 1995 
              HELP-PROMPT:      Answer must be 3-5 characters in length. 
              DESCRIPTION:
                                This is the new station number of the owning facility.  

                                UNEDITABLE

6915.6,31     NEW XPROGRAM           3;12 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9) X
              LAST EDITED:      SEP 22, 1995 
              HELP-PROMPT:      This is the new Fund Control Point/Project (ACC code).  Answer must be 9 characters in length. 
              DESCRIPTION:
                                This is the ACC, obtained from IFCAP. If unavailable, '000000000' will be used instead.  


6915.6,32     NEW BOC (TEXT)         3;13 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4) X
              LAST EDITED:      SEP 25, 1995 
              HELP-PROMPT:      Answer must be 4 characters in length. 
              DESCRIPTION:
                                This is the new Budget Object Code at the new facility.  


6915.6,33     NEW LOCATION           3;14 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>4!($L(X)<2) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 2-4 characters in length. 
              DESCRIPTION:
                                This is the new location at the new facility.  


6915.6,34     NEW COST ORG           3;15 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>7!($L(X)<4) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 4-7 characters in length. 
              DESCRIPTION:
                                This is the new cost center at the new facility.  


6915.6,35     NEW SUB ORG            3;16 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
              LAST EDITED:      SEP 06, 1995 
              HELP-PROMPT:      Answer must be 2 characters in length. 
              DESCRIPTION:
                                New satellite station number suffix.  


6915.6,36     NEW SATELLITE STATION  3;17 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2)!'(X?2UN) X
              LAST EDITED:      OCT 03, 1995 
              HELP-PROMPT:      Answer must be 2 characters in length. 
              DESCRIPTION:
                                Satellite designator for consolidated facilities.  

                                UNEDITABLE

6915.6,37     NEW XAREA              3;18 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
              LAST EDITED:      DEC 15, 1998 
              HELP-PROMPT:      Answer must be 1-10 characters in length. 
              DESCRIPTION:      Contains the equipment's new CMR value (external) sent on the FR Document to update the XAREA data
                                element on the Fixed Assets/FMS system. Derived from the NEW CMR (#105) field which updates both
                                the Fixed Assets system and the CMR (#19) field of the EQUIPMENT INV (#6914) file.  


6915.6,100    NEW CATEGORY STOCK NUMBER 100;1 POINTER TO CATEGORY STOCK NUMBER FILE (#6917)

              LAST EDITED:      SEP 22, 1995 
              DESCRIPTION:
                                Used to derive FA GROUP .  


6915.6,101    NEW FUND               100;2 POINTER TO NX FUND FILE (#6914.6) (Required)

              INPUT TRANSFORM:  S DIC("S")="I $P($G(^(0)),U,5)=""""!($P($G(^(0)),U,5)>DT)!($G(DIUTIL)=""VERIFY FIELDS"")" D ^DIC K 
                                DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      OCT 21, 1997 
              DESCRIPTION:
                                Financial classification of appropriation (based on line of business).  

              SCREEN:           S DIC("S")="I $P($G(^(0)),U,5)=""""!($P($G(^(0)),U,5)>DT)!($G(DIUTIL)=""VERIFY FIELDS"")"
              EXPLANATION:      Only active FUNDs can be selected.

6915.6,102    NEW ADMINISTRATIVE/OFFICE 100;3 POINTER TO NX A/O FILE (#6914.7) (Required)

              LAST EDITED:      SEP 27, 1995 
              DESCRIPTION:
                                New A/O (10 for VHA, 20 for VBA, etc.).  


6915.6,103    NEW FUND CONTROL POINT 100;4 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      APR 23, 1996 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:      Used to derive the ACC (field #31). Free text required because Fund Control Points are subject to
                                change.  


6915.6,104    NEW BOC                100;5 POINTER TO NX BOC FILE (#6914.4)

              INPUT TRANSFORM:  S DIC("S")="I $P($G(^(0)),U,5)=""""!($P($G(^(0)),U,5)>DT)!($G(DIUTIL)=""VERIFY FIELDS"")" D ^DIC K 
                                DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      OCT 21, 1997 
              DESCRIPTION:
                                Value to be recorded in FAP and AEMS/MERS.  

              SCREEN:           S DIC("S")="I $P($G(^(0)),U,5)=""""!($P($G(^(0)),U,5)>DT)!($G(DIUTIL)=""VERIFY FIELDS"")"
              EXPLANATION:      Only active budget object codes can be selected.

6915.6,105    NEW CMR                100;6 POINTER TO CMR FILE (#6914.1)

              INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,7)=""""!($P(^(0),U,7)=$P($G(^ENG(6914,ENEQ(""DA""),9)),U,5))" D ^DIC K DIC 
                                S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      MAR 05, 1996 
              DESCRIPTION:      Basis for LOCATION (as in department locator).  
                                 
                                CMRs that are assigned to a station other than the owning station for this asset are unacceptable.
                                A change of this kind will require you to enter an FD document, then edit the CMR, and then enter
                                an FA document.  

              SCREEN:           S DIC("S")="I $P(^(0),U,7)=""""!($P(^(0),U,7)=$P($G(^ENG(6914,ENEQ(""DA""),9)),U,5))"
              EXPLANATION:      Must select CMR valid for equipment's station #. Enter '?' for list.

6915.6,106    *NEW COST CENTER       100;7 POINTER TO COST CENTER FILE (#420.1)

              LAST EDITED:      MAR 27, 1997 
              DESCRIPTION:      This field is no longer used to obtain the new cost center value. Instead the cost center is
                                computed based on the CMR (EIL).  


6915.6,107    ASSET VALUE            100;8 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999999999)!(X<0) X
              LAST EDITED:      JUL 19, 1996 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 99999999999, 2 Decimal Digits 
              DESCRIPTION:
                                Asset value at time document processed.  


6915.6,301    A.V. DATE              300;1 DATE

              INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      DEC 18, 1996 
              DESCRIPTION:      This field contains the date/time when an Adjustment Voucher was created.  If blank, then an
                                Adjustment Voucher has not yet been created for the FR Document. An Adjustment Voucher is used to
                                notify Fiscal about a selected FAP Document.  

                                UNEDITABLE
              CROSS-REFERENCE:  ^^TRIGGER^6915.6^302 
                                1)= X ^DD(6915.6,301,1,1,1.3) I X S X=DIV S Y(1)=$S($D(^ENG(6915.6,D0,300)):^(300),1:"") S X=$P(Y(1
                                ),U,2),X=X S DIU=X K Y S X=DIV S X=DUZ X ^DD(6915.6,301,1,1,1.4)

                                1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^ENG(6915.6,D0,300)):^(300),1:"") S X=$S(
                                '$D(^VA(200,+$P(Y(1),U,2),0)):"",1:$P(^(0),U,1))=""

                                1.4)= S DIH=$S($D(^ENG(6915.6,DIV(0),300)):^(300),1:""),DIV=X S $P(^(300),U,2)=DIV,DIH=6915.6,DIG=3
                                02 D ^DICR:$O(^DD(DIH,DIG,1,0))>0

                                2)= Q

                                CREATE CONDITION)= #302=""
                                CREATE VALUE)= S X=DUZ
                                DELETE VALUE)= NO EFFECT
                                FIELD)= #302

              CROSS-REFERENCE:  6915.6^AV 
                                1)= S ^ENG(6915.6,"AV",$E(X,1,30),DA)=""
                                2)= K ^ENG(6915.6,"AV",$E(X,1,30),DA)


6915.6,302    A.V. CREATED BY        300;2 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      DEC 18, 1996 
              DESCRIPTION:
                                User that created adjustment voucher.  

              WRITE AUTHORITY:  ^
              NOTES:            TRIGGERED by the A.V. DATE field of the FR DOCUMENT LOG File 


6915.6,303    A.V. REASON            300;3 POINTER TO AV REASON FILE (#6915.11)

              INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)[""FR""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      JAN 31, 1997 
              HELP-PROMPT:      Select reason for adjustment voucher. 
              SCREEN:           S DIC("S")="I $P(^(0),U,2)[""FR"""
              EXPLANATION:      Applicable reasons for FR Document

6915.6,310    A.V. COMMENTS          301;0   WORD-PROCESSING #6915.61


                LAST EDITED:      DEC 17, 1996 
                HELP-PROMPT:      Enter adjustment voucher comments (if any). 




      FILES POINTED TO                      FIELDS

AV REASON (#6915.11)              A.V. REASON (#303)

CATEGORY STOCK NUMBER (#6917)     NEW CATEGORY STOCK NUMBER (#100)

CMR (#6914.1)                     NEW CMR (#105)

COST CENTER (#420.1)              *NEW COST CENTER (#106)

EQUIPMENT INV. (#6914)            EQUIPMENT RECORD (#.01)

NEW PERSON (#200)                 SENDER (#1.5)
                                  A.V. CREATED BY (#302)

NX A/O (#6914.7)                  NEW ADMINISTRATIVE/OFFICE (#102)

NX BOC (#6914.4)                  NEW BOC (#104)

NX FUND (#6914.6)                 NEW FUND (#101)



INPUT TEMPLATE(S):
ENFA XFR                      MAR 27, 1997@10:13  USER #0    

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):