用动态SQL语句
--------------------------------------------------
CREATE OR REPLACE PROCEDURE mcdb.PGM IS
BEGIN
  execute immediate 'CREATE OR REPLACE VIEW A_VIEW AS ' ||
    'SELECT  field1,field2,field3  FROM  A_TABLE';
END PGM;