      * CICSATTR.CPY
      * Copyright (C) 1991-2007 Micro Focus (IP) Limited.
      * All rights reserved.
      *                                                                *
      *    ATTRIBUTES FOR USE WITH CICS                                *
      *                                                                *
      *       U = UNPROTECTED                                          *
      *       P = PROTECTED                                            *
      *       X = ALPHANUMERIC                                         *
      *       9 = NUMERIC                                              *
      *       S = AUTO SKIP                                            *
      *       M = MODIFY DATA TAG                                      *
      *       N = NORMAL INTENSITY                                     *
      *       B = HIGH INTENSITY                                       *
      *       D = DARK                                                 *
      *       L = LIGHTPEN DETECTABLE                                  *
      *                                                                *
      ******************************************************************

       01  CICS-ATTRIBUTES.
           05  ATTR-UXN                PIC X(01) VALUE SPACE.
           05  ATTR-UXMN               PIC X(01) VALUE 'A'.
           05  ATTR-UXNL               PIC X(01) VALUE 'D'.
           05  ATTR-UXMNL              PIC X(01) VALUE 'E'.
           05  ATTR-UXBL               PIC X(01) VALUE 'H'.
           05  ATTR-UXMBL              PIC X(01) VALUE 'I'.
           05  ATTR-UXD                PIC X(01) VALUE '<'.
           05  ATTR-UXMD               PIC X(01) VALUE '('.
           05  ATTR-U9N                PIC X(01) VALUE '&'.
           05  ATTR-U9MN               PIC X(01) VALUE 'J'.
           05  ATTR-U9NL               PIC X(01) VALUE 'M'.
           05  ATTR-U9MNL              PIC X(01) VALUE 'N'.
           05  ATTR-U9BL               PIC X(01) VALUE 'Q'.
           05  ATTR-U9MBL              PIC X(01) VALUE 'R'.
           05  ATTR-U9D                PIC X(01) VALUE '*'.
           05  ATTR-U9MD               PIC X(01) VALUE ')'.
           05  ATTR-PXN                PIC X(01) VALUE '-'.
           05  ATTR-PXMN               PIC X(01) VALUE '/'.
           05  ATTR-PXNL               PIC X(01) VALUE 'U'.
           05  ATTR-PXMNL              PIC X(01) VALUE 'V'.
           05  ATTR-PXBL               PIC X(01) VALUE 'Y'.
           05  ATTR-PXMBL              PIC X(01) VALUE 'Z'.
           05  ATTR-PXD                PIC X(01) VALUE '%'.
           05  ATTR-PXMN               PIC X(01) VALUE '_'.
           05  ATTR-PSN                PIC X(01) VALUE '0'.
           05  ATTR-PSMN               PIC X(01) VALUE '1'.
           05  ATTR-PSNL               PIC X(01) VALUE '4'.
           05  ATTR-PSMNL              PIC X(01) VALUE '5'.
           05  ATTR-PSBL               PIC X(01) VALUE '8'.
           05  ATTR-PSMBL              PIC X(01) VALUE '9'.
           05  ATTR-PSD                PIC X(01) VALUE '@'.
           05  ATTR-PSMD               PIC X(01) VALUE "'".
