USER ID

This field contains the three-character logon ID for the current user.

        IF       --- USER ID                    NE TAP WORK USER ID
        AND      TAP OP EXCLUSIVE               EQ     1
  T     ERROR        Cannot Edit Another User's Data