zOs/TX/WK999DDL
----------$-[right(userid() sysvar(sysnode) date(s) time(), 60, '-')$]
-- testCase $dsn
-- env $env phase $phase
-- dbSys $dbSys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop view $creator.vwk999;
drop alias $creator.awk999;
drop alias ${creator}B.vwk999;
drop alias ${creator}B.awk999;
$@[
if $phase > 0 then $@=[
create view $creator.vWk999 as
select $phase phase
from sysibm.sysdummy1;
create alias $creator.awk999 for $creator.vwk999;
create alias ${creator}B.awk999 for $creator.vwk999;
create alias ${creator}B.vwk999 for $creator.vwk999;
$]
if $phase > 0 & 1 then $@=[
$=x=wk999 $** phase$phase
label on alias $creator.awk999 is 'label $creator.a$x';
label on alias ${creator}B.awk999 is 'label ${creator}B.a$x';
label on alias ${creator}B.vwk999 is 'label ${creator}B.v$x';
$]
$]