zOs/SQL/CREDBQQ2

  CREATE UNIQUE INDEX OA1A.IQQ051B1
    ON OA1A.TQQ051A
     (QQ051TXT             ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","s100447" ;
--
  CREATE VIEW OA1A.VQQ051VB1 AS
    SELECT *
      FROM OA1A.TQQ051A ;
--
  CREATE VIEW OA1A.VQQ051VB2 AS
    SELECT *
      FROM OA1A.TQQ051A ;