STANDARD DATA DICTIONARY #2263.1 -- ASISTS DOL SOURCE OF INJURY CODES FILE                                        9/29/25    PAGE 1
STORED IN ^OOPS(2263.1,  (121 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                  (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the valid codes and descriptions for the Source of Injury codes used for submitting claims to the DOL
(Department of Labor).  This file MUST NOT be altered as doing so may cause DOL to reject the submission.  


              DD ACCESS: @
              RD ACCESS: 
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: CODE (#1)[R]

POINTED TO BY: SOURCE CODE field (#124) of the ASISTS ACCIDENT REPORTING File (#2260) 
               SOURCE CODE field (#227) of the ASISTS ACCIDENT REPORTING File (#2260) 
               

CROSS
REFERENCED BY: CODE(C), NAME(D)

INDEXED BY:    NAME (B)




2263.1,.01    NAME                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K X D EN^DDIOL("Sorry, Can't Add") Q  K:$L(X)>60!($L(X)<3) X
              LAST EDITED:      MAR 29, 2000 
              HELP-PROMPT:      Answer must be 3-60 characters in length. 
              DESCRIPTION:      The NAME of the Source of Injury Code as defined by the Department of Labor (DOL).  The NAME of any
                                Source of Injury Code must not be altered.  

              DELETE TEST:      1,0)= I 1 D EN^DDIOL("Sorry, entries may not be deleted.")

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

              CROSS-REFERENCE:  2263.1^D^MUMPS 
                                1)= S ^OOPS(2263.1,"D",$$UP^OOPSUTL4($E(X,1,30)),DA)=""
                                2)= K ^OOPS(2263.1,"D",$$UP^OOPSUTL4($E(X,1,30)),DA)

              FIELD INDEX:      B (#58)    REGULAR    IR    LOOKUP & SORTING
                  Short Descr:  Index on the complete Name field (all 60 characters)
                    Set Logic:  S ^OOPS(2263.1,"B",$E(X,1,60),DA)=""
                   Kill Logic:  K ^OOPS(2263.1,"B",$E(X,1,60),DA)
                   Whole Kill:  K ^OOPS(2263.1,"B")
                         X(1):  NAME  (2263.1,.01)  (Subscr 1)  (Len 60)  (forwards)


2263.1,1      CODE                   0;2 NUMBER (Required)

              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      MAR 29, 2000 
              HELP-PROMPT:      Type a Number between 0 and 9999, 0 Decimal Digits 
              DESCRIPTION:      This is the CODE which corresponds to a matching Source of Injury NAME as defined by the Department
                                of Labor (DOL).  The value for any CODE must NOT be changed.  

                                UNEDITABLE
              CROSS-REFERENCE:  2263.1^C^MUMPS 
                                1)= S ^OOPS(2263.1,"C",$E(X,1,30),DA)=""
                                2)= K ^OOPS(2263.1,"C",$E(X,1,30),DA)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):