LOG aqatddl07 Clear;
---------------------------------------------------------------------
-- File: SQLQAT07                Formerly $cats.testest.qat007
-- Component: NonStop SQL Regression Test Suite
-- Description: create multiple-data-type database
--                             CREATE PROTECTION VIEWS
---------------------------------------------------------------------

---------------------------------------------------------------------
-- Protection VIEW pvsel01
---------------------------------------------------------------------
  CREATE VIEW pvsel01
      AS SELECT
         binary_signed
       , large_int
       , medium_int
       , pic_decimal_3
       , pic_x_1
       , pic_x_7
       , small_int
      FROM btsel01
   ;
---------------------------------------------------------------------

---------------------------------------------------------------------
-- Protection VIEW pvsel02
---------------------------------------------------------------------
  CREATE VIEW pvsel02
     AS SELECT *
     FROM btsel02
  ;
---------------------------------------------------------------------

---------------------------------------------------------------------
-- Protection VIEW pvsel03
---------------------------------------------------------------------
  CREATE VIEW pvsel03
      ( new_name_1
      , new_name_2
      , new_name_3
      , new_name_4
        )
     AS SELECT
        pic_9_7
      , binary_32_u
      , pic_x_7
      , SYSKEY
     FROM btsel03
     WHERE ( pic_9_7 < 100) AND
           NOT ( binary_32_u BETWEEN 10 AND pic_9_7 ) AND
              pic_x_7 IN ( '7' , 'A', 'B' )
  ;
---------------------------------------------------------------------

---------------------------------------------------------------------
-- Protection VIEW pvsel04
---------------------------------------------------------------------
  CREATE VIEW pvsel04
     AS SELECT *
     FROM btsel04
     WHERE ( pic_comp_1 > 100 )
  ;
---------------------------------------------------------------------
LOG;
