Format

      DEFINE  PROTECTION  FOR
              { DIRECTORY          }
              { FIELD              }
              { RECORD             } element-name ,...
              {                    }
              { GENERIC  type-name }

              [ POSITION  n     ]
              [ AFTER  id1+ ... ] IDENTIFIER  id2+... ACCESS
              [                 ]
              right+ ... .

                              { REPOSITORY  anchor-name          }
      DEFINE  PROTECTION  FOR { GENERIC MCS_CONTEXT context-name }
                              {                                  }

              [ POSITION n ]   IDENTIFIER id2
              { ACCESS         }
              { DEFAULT_ACCESS }  right+ ... .
              {                }