zOs/war/sql1

}¢--- A540769.WK.SQL(REODDLXX) cre=2011-12-13 mod=2012-05-23-14.42.27 A540769 ---
$#@
call sqlConnect DBOC
            $*( fun = funktion
                   t = tables erstellen/migrieren und views erstellen
                   v = nur views droppen und erstellen
                   tDropOld = alte Tables löschen
                              (entstehen bei migration durch rename
                               ==> nach Kontrolle migration )
            $*)
$=fun=tDropOld
$=fun=v
$=db2v10ENF = 1     $** v10 catalog or not
$=mig=59    $*( migration ab wo
                   0 = create new
                  54 = migrate ab 54
                  570 = migrate ab (unvollständiger) Version 5.7
                  571 = migrate ab 5.7 ohne clusterRatio
                  59 = migrate stats tables from v9 to db2v10
            $*)
$;
$** $>.fEdit() $@/ddl/
    call sqlStmts , , 'sql72'  $<@/ddl/
$@=¢
  SET CURRENT SQLID='S100447';
  drop view A540769.efghik;
  COMMENT ON TABLE s100447.TReoIXParms
    IS 'diese Tabelle enthaelt die Default-Schwellwerte und die TS mit s
peziellen triggern' ;
$!
$/ddl/
}¢--- A540769.WK.SQL(REODDL2) cre=2011-10-05 mod=2011-10-06-11.47.36 A540769 ---
set current sqlid = 'S100447';
---------------------------------------------------------------------
-- test tReoRunJob (and tReoRunPart.reoTst)
-- message e not null ==> error message ==> see case statement below
-- eo2 = calculate better eoj
---------------------------------------------------------------------
create view s100447.vReoRunJobChk as
with p as -- part gruppiert nach job, nur ty='r'
(select tst, ty, count(*) cnt,
     count(reotst) cntReo,
     min(reoTst) reoTstVon,
     max(reoTst) reoTstBis
    from s100447.tReoRunPart
    where sta = 'r'
    group by tst, ty
), j as -- join to job
(
select j.*,
       p.ty pTy, p.cnt pCnt, p.cntReo,
       p.reoTstVon, p.reoTstBis,
       (select min(tst)
            from s100447.tReoRunJob a
            where a.job = j.job and a.tst > j.tst
       ) nextJob
    from s100447.tReoRunJob j
      left join p
        on j.tst = p.tst and p.ty = lower(left(j.ty, 1))
)
        ----> diese case statement macht error message <-------------
select  case when eoj is null and nextJob is not null
                 then 'null not last'
             when reoTstVon < tst then 'reoTst < tst'
             when reoTstBis > nextJob then 'reoTst > nextJob'
             when reoTstBis > eoj then 'reoTst > eoj'
             when eoj > nextJob then 'overlap nextJob'
             when reoTstBis - tst > 1000000 then 'reoTst > 1 day'
      --     when eoj - tst > 1000000 then 'eoj > 1 day'
             else null
        end e,
        case when pCnt is null or pCnt < 1 then tst
             when reoTstBis is not null
                  and (nextJob is null or nextJob > reoTstBis)
                  and (tst < current timestamp - 2 days
                        or pCnt = cntReo) then reoTstBis
             when nextJob is not null then
                  nextJob
             else null
        end eo2, j.*
    from j
;
---------------------------------------------------------------------
-- check tReoRunPart
-- message e not null ==> error message ==> see case statement below
-- newTime = calculate reoTime from current values
---------------------------------------------------------------------
create view S100447.vReoRunRngChk as
with r as -- part gruppiert nach range
(
select
    (select j.job from s100447.tReoRunJob j where j.tst = p.tst) job,
    p.tst, p.rng,
    min(ty) ty,
    count(distinct ty) cdTy,
    min(sta) sta,
    count(distinct sta) cdSta,
    sum(case when part = paVon then 1 else 0 end) cPaVon,
    sum(case when part = paBis then 1 else 0 end) cPaBis,
    count(*) cnt,
    count(distinct part) cdPart,
    count(reoTst) cReoTst,
    min(reoTst) minReoTst,
    max(reoTst) maxReoTst,
    (select max(b.reoTst) -- letzter reoTst aus vorgehenden Ranges
          from s100447.tReoRunPart b
          where b.tst = p.tst and b.rng < p.rng) befReoTst,
    (select min(sta) || max(sta) -- status und reoTst aus Range -1
            || case when count(*) = count(reotst) then '=' else '0' end
            || coalesce(char(max(reoTst)), '-')
          from s100447.tReoRunPart b
          where b.tst = p.tst and b.rng = p.rng-1) r1ReoTst,
    (select min(sta) || max(sta) -- status und reoTst aus Range -2
            || case when count(*) = count(reotst) then '=' else '0' end
            || coalesce(char(max(reoTst)), '-')
          from s100447.tReoRunPart b
          where b.tst = p.tst and b.rng = p.rng-2) r2ReoTst,
    max(case when part = paVon then reoTime else null end) reoTime
  from s100447.tReoRunPart p
  group by tst, rng
) , s as -- begTst aus range -1 und range -2 berechnen
( select r.*,
      case when rng = 1 then tst
           when left(r1ReoTst, 3) = 'rr='
               then timestamp(substr(r1ReoTst, 4))
           when left(r1ReoTst, 2) <> '00' then null
           when rng = 2 then tst
           when left(r2ReoTst, 3) = 'rr='
               then timestamp(substr(r2ReoTst, 4))
           else null
           end begTst
    from r
), t as -- aktuelle reoZeit berechnen
( select s.*,
        (days(maxReoTst) - days(begTst)) * 86400
        + midnight_seconds(maxReoTst) - midnight_seconds(begTst)
        + 1e-6 * (microsecond(maxReoTst)-microsecond(begTst)) newTime
    from s
)
select ---> case statement macht error message <--------------------
    case when job is null   then 'job missing'
         when cdTy <> 1     then 'ty not unique'
         when cdSta <> 1    then 'sta not unique'
         when cPaVon <> 1   then 'part=paVon not unique'
         when cPaBis <> 1   then 'part=paBis not unique'
         when cdPart <> cnt then 'part not distinct'
         when minReoTst < tst then 'reoTst < tst'
                           -- rng waren früher anders sortiert
   --    when tst < '2011-09-29-00.00.00'  then null
         when befReoTst > minReoTst then 'before ReoTst > minReoTst'
         when abs(reoTime-newTime) >= 1 then 'reoTime <> newTime'
         else null
    end e,
    t.*
    from t
;
}¢--- A540769.WK.SQL(REODEL) cre=2011-09-24 mod=2011-09-24-13.34.38 A540769 ----
select * from s100447.tReoRunPart
     where tst = '2011-09-18-08.02.09.375826'
;
delete from s100447.tReoRunJob
     where tst = '2011-09-18-08.02.09.375826'
;
}¢--- A540769.WK.SQL(REOEOJFX) cre=2010-11-30 mod=2010-11-30-16.18.36 A540769 ---
update
         s100447.tReoRunJob a
    set eoj = max(tst, (select min(tst) - 1 seconds
                           from s100447.tReoRunJob u
                           where a.job = u.job and u.tst > a.tst ))
    where eoj >= (select min(tst)
                     from s100447.tReoRunJob n
                     where a.job = n.job and n.tst > a.tst )
;
select *
    from s100447.tReoRunJob a
    where eoj >= (select min(tst)
                     from s100447.tReoRunJob n
                     where a.job = n.job and n.tst > a.tst )
    order by eoj asc
;
commit
}¢--- A540769.WK.SQL(REOFIX) cre=2012-03-26 mod=2012-03-26-12.40.04 A540769 ----
select uncompressedDatasize, fixUncomp, r.*
    from S100447.vReoTSStatsPlus r
    where dbName like 'MF%'
    ;
select count(*),
       sum(case when uncompressedDatasize is Null
                  or uncompressedDatasize <> fixUncomp
                then 1 else 0 end) ungleich
    from S100447.vReoTSStatsPlus
    where dbName like 'MF%'
}¢--- A540769.WK.SQL(REOIX) cre=2010-10-08 mod=2013-09-18-10.28.18 A540769 -----
set current path oa1t;
select
        substr(strip(db) ||'.' || strip(ts), 1, 17) "db.ts",
        substr(ix, 1, 12) "index",
        smallint(part) "part",
        substr(fosFmTime(reorgTime), 1, 5) "reoTi",
        importance "imp",
        reason "reason",
        s.*
    from s100447.VReoIx s
    where 1=1
        and db like 'WF%'
     -- and TS like 'APER24%'
     -- and importance > 0
    order by db, ts, ix, part
    with ur
;x;
select *
      from s100447.tReoIXParms e
;
with sw as
( select
          CASE WHEN POSSTR(DB,  '*') > 0
               THEN POSSTR(DB,  '*') - 1 ELSE 8 END DBLEN,
          CASE WHEN POSSTR(TS,  '*') > 0
               THEN POSSTR(TS,  '*') - 1 ELSE 8 END TSLEN,
          CASE WHEN POSSTR(IX,  '*') > 0
               THEN POSSTR(IX,  '*') - 1 ELSE 20 END IXLEN,
          substr(right('00' || STRIP(CHAR(PRIO)), 2), 1, 2) prC2,
          e.*
      from s100447.tReoIXParms e
)
select * from sw
;
-- create view S100447.vReoIXSchwelle as
with sw as
( select
          CASE WHEN POSSTR(DB,  '*') > 0
               THEN POSSTR(DB,  '*') - 1 ELSE 8 END DBLEN,
          CASE WHEN POSSTR(TS,  '*') > 0
               THEN POSSTR(TS,  '*') - 1 ELSE 8 END TSLEN,
          CASE WHEN POSSTR(IX,  '*') > 0
               THEN POSSTR(IX,  '*') - 1 ELSE 20 END IXLEN,
          substr(right('00' || STRIP(CHAR(PRIO)), 2), 1, 2) prC2,
          e.*
      from s100447.tReoIXParms e
)
select i.creator cr, i.name ix, p.partition part,
           substr(max(prC2 || char(sw.reorg      )), 3)   swReorg     ,
       int(substr(max(prC2 || char(pageSplits )), 3)) swPageSplits,
       int(substr(max(prC2 || char(sw.EXTENTS  )), 3)) swEXTENTS    ,
       int(substr(max(prC2 || char(REORGDAYS  )), 3)) swREORGDAYS ,
       int(substr(max(prC2 || char(INSERTS    )), 3)) swINSERTS    ,
       int(substr(max(prC2 || char(DELETES    )), 3)) swDELETES    ,
       int(substr(max(prC2 || char(pseudoDel  )), 3)) swPseudoDel ,
       min(i.dbName) db, min(i.indexSpace) is, min(t.tsName) ts,
       min(i.dbId) dbId, min(i.isoBid) isoBid,
       min(p.createdTS) createdTS,
       min(t.creator) tbCr, min(t.name) tb
    from
        SYSIBM.sysIndexes           I
        join SYSIBM.SYSTABLES       T
            on i.tbCreator = t.creator and i.tbName = t.name
               and i.dbName = t.dbName
        join SYSIBM.SYSIndexPart    p
            on p.ixCreator = i.creator and p.ixName = i.name
        , sw
    where   left(i.dbName, dbLen) = left(db, dbLen)
        and left(i.name, ixLen) = left(ix, ixLen)
        and left(t.tsName, tsLen) = left(ts, tsLen)
        and p.partition between partVon and partBis
        and current date between guVon and guBis
        and i.dbName like 'WF%'
    group by i.creator, i.name, p.partition
;x;
select '<' || char(STRIP(CHAR(1   )), 2)||'>' from sysibm.sysdummy1;X;
set current path = oA1t;
SELECT *
    from s100447.VReoIx s
    where db like 'WF%'
;x;
create view S100447.vReoIXSchwelle as
with sw as
( select
          CASE WHEN POSSTR(DB,  '*') > 0
               THEN POSSTR(DB,  '*') - 1 ELSE 8 END DBLEN,
          CASE WHEN POSSTR(TS,  '*') > 0
               THEN POSSTR(TS,  '*') - 1 ELSE 8 END TSLEN,
          CASE WHEN POSSTR(IX,  '*') > 0
               THEN POSSTR(IX,  '*') - 1 ELSE 20 END IXLEN,
          substr(right('00' || STRIP(CHAR(PRIO)), 2), 1, 2) prC2,
          e.*
      from s100447.tReoIXParms e
)
select i.creator cr, i.name ix, p.partition part,
           substr(max(prC2 || char(reorg      )), 3)   swReorg     ,
       int(substr(max(prC2 || char(pageSplits )), 3)) swPageSplits,
       int(substr(max(prC2 || char(sw.EXTENTS  )), 3)) swEXTENTS    ,
       int(substr(max(prC2 || char(REORGDAYS  )), 3)) swREORGDAYS ,
       int(substr(max(prC2 || char(INSERTS    )), 3)) swINSERTS    ,
       int(substr(max(prC2 || char(DELETES    )), 3)) swDELETES    ,
       int(substr(max(prC2 || char(pseudoDel  )), 3)) swPseudoDel ,
       min(i.dbName) db, min(i.indexSpace) is, min(t.tsName) ts,
       min(i.dbId) dbId, min(i.isoBid) isoBid,
       min(p.createdTS) createdTS,
       min(t.creator) tbCr, min(t.name) tb
    from
        SYSIBM.sysIndexes           I
        join SYSIBM.SYSTABLES       T
            on i.tbCreator = t.creator and i.tbName = t.name
               and i.dbName = t.dbName
        join SYSIBM.SYSIndexPart    p
            on p.ixCreator = i.creator and p.ixName = i.name
        , sw
    where   left(i.dbName, dbLen) = left(db, dbLen)
        and left(i.name, ixLen) = left(ix, ixLen)
        and left(t.tsName, tsLen) = left(ts, tsLen)
        and p.partition between partVon and partBis
        and current date between guVon and guBis
    group by i.creator, i.name, p.partition
;
???????????????????????
------------------------------------------------------------------------
-- RTS-Stats Werte pro ix-Partition zu Schwellen joinen
--     Kolonnen Namen: sw*: Schwellen
--
create view S100447.vReoIxStats as
  select cr, ix, part, db, is, ts, tbCr, tb, createdTS,
         swReorg     , swPageSplits, swEXTENTS   , swREORGDAYS ,
         swINSERTS   , swDELETES   , swPseudoDel ,
         max(CAST(TOTALEntries AS REAL), 100) rEntrs,
         cast(nActive AS REAL) rActive,
         max(coalesce(reorgLastTime,   createdTS),
             coalesce(loadrLastTime,   createdTS),
             coalesce(rebuildLastTime, createdTS)) lastBuilt ,
         coalesce(real(max(r.space, 0)) * 1024 * 1.3558420E-07 , 0)
             + 1.8626988 reorgTime ,
         r.*
    from S100447.vReoIXSchwelle s
        left join sysibm.sysIndexSpaceStats r
        on      r.DBID          = S.DBID
            AND r.ISOBID        = S.ISOBID
            AND r.DBNAME        = S.DB
            AND r.indexSpace    = S.is
            AND r.partition     = s.part
;
------------------------------------------------------------------------
-- vReoIx: SchwellwertUeberschreitungen herausfinden
--            in riesigem case statement
--
create view S100447.vReoIX as
with ix1 as
(
  select s.*
    , value(
        ( select 'no - db status ' || strip(d.sta)
            from s100447.tDbState d
            where d.sta like 'STOP%'
              and d.Ty = 'D' and d.db = s.db
            fetch first row only
        )
      , ( select 'no - ts status ' || strip(t.sta)
            from s100447.tDbState t
            where t.sta like 'STOP%'
              and t.Ty            = 'T'
              and t.db            = s.db
              AND t.sp            = s.ts
              AND t.paFr         <= s.part
              AND t.paTo         >= s.part
            fetch first row only
        )
      , ( select substr(min(
               case when i.sta like 'RO%' or i.sta like 'STOP%'
                                          or i.sta like '%RBD%'
                        then '1no - ix status ' || strip(i.sta)
                    when ',' || strip(i.sta) || ',' like '%,REORP,%'
                        then '2pending reorp ' || strip(i.sta)
                    when ',' || strip(i.sta) || ',' like '%,AREOR,%'
                        then '3pending areor ' || strip(i.sta)
                    else null end), 2)
            from s100447.tDbState i
            where   i.Ty            = 'I'
                and i.db            = s.db
                AND i.sp            = s.is
                and ( i.paFr = 0 or s.part = 0
                 or (   i.paFr <= s.part
                    AND i.paTo >= s.part ))
      ) ) xSta
    from S100447.vReoIXStats s
)
, ix2 as
( select
    case
        when swReorg = 'NEVER' then 'no - reorgNever'
        when xSta is not null then xSta
        when swReorg = 'ALWAYS' then 'reorgAlways'
        when indexSpace is null then 'rtsMissing'
        when REORGLASTTIME IS NULL and LOADRLASTTIME IS NULL
                  and REBUILDLASTTIME IS NULL then 'rtsNull'
        when rEntrs is null then 'rtsRowsNull'
        when totalEntries < 0 then 'rtsEntries '
                  || strip(char(totalEntries)) || ' < 0'
        when REORGLEAFFAR > rActive / 100 * swPageSplits
            then 'pageSplits ' || strip(char(reorgLeafFar)) || ' > '
                || strip(char(swPageSplits))
                || '% of ' || strip(char(nActive))
        when extents         > swExtents
            then 'extents ' || strip(char(extents)) || ' > '
                || strip(char(swExtents))
        when reorgInserts    > rEntrs / 100 * swInserts
            then 'inserts ' || strip(char(reorgInserts)) || ' > '
                || strip(char(swInserts)) || '% of '
                || strip(char(totalEntries))
        when reorgDeletes    > rEntrs / 100 * swDeletes
            then 'deletes ' || strip(char(reorgDeletes)) || ' > '
                || strip(char(swDeletes)) || '% of '
                || strip(char(totalEntries))
        when reorgPseudoDeletes    > rEntrs / 100 * swPseudoDel
            then 'pseudoDel ' || strip(char(reorgPseudoDeletes))||' > '
                || strip(char(swPseudoDel)) || '% of '
                || strip(char(totalEntries))
        when CURRENT TIMESTAMP - swReorgDays days > lastBuilt
            then 'lastBuilt ' || char(date(lastBuilt)) || ' older '
                || strip(char(swReorgDays)) ||' reorgDays'
        else 'no - reorg not required'
    end reason, s.*
    from ix1 s
)
    -- importance voranstellen
select smallint(case
            when reason = 'no - reorg not required' then  0
            when reason like 'no %'                 then -1
            when reason like 'lastBuilt %'          then  3
            when reason like 'pending areo*%'       then  7
            when reason like 'pending %'            then 11
            when reason like 'reorgAlway%'          then  9
                                                    else  5
          end) importance,
       ix2.*
    from ix2
;
------------------------------------------------------------------------
-- vReoJobParms: jobLen und prC2 anfügen
--
CREATE VIEW S100447.vReoJobParms AS
      SELECT e.*,
          CASE WHEN POSSTR(job, '*') > 0
               THEN POSSTR(job, '*') - 1 ELSE 8 END jobLEN,
          substr(right('00' || STRIP(CHAR(PRIO)), 2), 1, 2) prC2
      FROM s100447.TReoJobParms e
;
CREATE VIEW S100447.vReoRunTsStats    AS
with tp as
( select
          real(totalRows)                           rows
       ,  log10(max(real(totalRows),1))             logRows
       ,  real(space) * 1024                        spc
       ,  log10(max(real(space), 1)*1024)           logSpc
       ,  real(uncompressedDatasize)                uds
       ,  log10(max(real(uncompressedDatasize), 1)) logUds
       ,  r.*
      from s100447.tReoRunTsStats r
)
, t as
( select tst, rng
       , min(partition)            partMin
       , max(partition)            partMax
       , count(*)                  parts
       , sum(rows)                 rows
       , max(rows)                 rowsMax
       , sum(rows * logrows)       rowsLog
       , sum(rows) * max(logRows)  rowsLogMax
       , sum(spc)                  spc
       , sum(spc * logSpc)         spcLog
       , sum(spc * logRows)        spcLogRows
       , max(spc)                  spcMax
       , sum(spc) * max(logSpc)    spcLogMax
       , sum(Uds)                  Uds
       , sum(Uds * logUds)         UdsLog
       , sum(Uds * logRows)        UdsLogRows
       , max(Uds)                  UdsMax
       , sum(Uds) * max(logUds)    UdsLogMax
      from tp
      group by tst, rng
)
,    ip as
( select
          real(totalEntries) ent,
          log10(max(real(totalEntries),1)) logEnt,
          real(space) * 1024 spc,
          log10(max(real(space), 1)*1024) logSpc,
          r.*
      from s100447.tReoRunIxStats r
)
,    i as
( select tst, rng, count(*)        parts
       , sum(ent)                  ent
       , max(ent)                  entMax
       , sum(ent * logEnt)         entLog
       , sum(ent) * max(logEnt)    entLogMax
       , sum(spc)                  spc
       , sum(spc * logSpc)         spcLog
       , sum(spc * logEnt)         spcLogEnt
       , max(spc)                  spcMax
       , sum(spc) * max(logSpc)    spcLogMax
      from ip
      group by tst, rng
)
select j.job, r.*
       , partMin                      tsPartMin
       , partMax                      tsPartMax
       , value(t .parts          , 0) tsParts
       , value(t .rows           , 0) tsRows
       , value(t .rowsMax        , 0) tsRowsMax
       , value(t .rowsLog        , 0) tsRowsLog
       , value(t .rowsLogMax     , 0) tsRowsLogMax
       , value(t .spc            , 0) tsSpc
       , value(t .spcLog         , 0) tsSpcLog
       , value(t .spcLogRows     , 0) tsSpcLogRows
       , value(t .spcMax         , 0) tsSpcMax
       , value(t .spcLogMax      , 0) tsSpcLogMax
       , value(t .Uds            , 0) tsUds
       , value(t .UdsLog         , 0) tsUdsLog
       , value(t .UdsLogRows     , 0) tsUdsLogRows
       , value(t .UdsMax         , 0) tsUdsMax
       , value(t .UdsLogMax      , 0) tsUdsLogMax
       , value(ix.parts          , 0) ixparts
       , value(ix.ent            , 0) ixent
       , value(ix.entMax         , 0) ixentMax
       , value(ix.entLog         , 0) ixentLog
       , value(ix.entLogMax      , 0) ixentLogMax
       , value(ix.spc            , 0) ixspc
       , value(ix.spcLog         , 0) ixspcLog
       , value(ix.spcLogEnt      , 0) ixspcLogEnt
       , value(ix.spcMax         , 0) ixspcMax
       , value(ix.spcLogMax      , 0) ixspcLogMax
       , value(i0.parts          , 0) i0parts
       , value(i0.ent            , 0) i0ent
       , value(i0.entMax         , 0) i0entMax
       , value(i0.entLog         , 0) i0entLog
       , value(i0.entLogMax      , 0) i0entLogMax
       , value(i0.spc            , 0) i0spc
       , value(i0.spcLog         , 0) i0spcLog
       , value(i0.spcLogEnt      , 0) i0spcLogEnt
       , value(i0.spcMax         , 0) i0spcMax
       , value(i0.spcLogMax      , 0) i0spcLogMax
    from s100447.tReoRunJob j, s100447.tReoRunPart r
        left join t on t.tst = r.tst and t.rng = r.rng
        left join i ix on ix.tst = r.tst and ix.rng = r.rng
        left join i i0 on i0.tst = r.tst and i0.rng = r.rngI0
                                       and r.rngI0 > 0
    where j.ty = 'TS' and j.sta <> '0' and r.ty = 't' and r.sta = 'r'
        and r.part = r.pavon and r.reoTime is not null
        and r.tst = j.tst
;
CREATE VIEW S100447.vReoRunIxStats    AS
with ip as
( select
          real(totalEntries) ent,
          log10(max(1, real(totalEntries))) logEnt,
          real(space) * 1024 spc,
          log10(max(1, real(space)*1024)) logSpc,
          r.*
      from s100447.tReoRunIxStats r
)
,    i as
( select tst, rng, count(*)        parts
       , min(partition)            partMin
       , max(partition)            partMax
       , sum(ent)                  ent
       , max(ent)                  entMax
       , sum(ent * logEnt)         entLog
       , sum(ent) * max(logEnt)    entLogMax
       , sum(spc)                  spc
       , sum(spc * logSpc)         spcLog
       , sum(spc * logEnt)         spcLogEnt
       , max(spc)                  spcMax
       , sum(spc) * max(logSpc)    spcLogMax
      from ip
      group by tst, rng
)
select j.job, r.*
       , partMin                      partMin
       , partMax                      partMax
       , value(ix.parts          , 0) parts
       , value(ix.ent            , 0) ent
       , value(ix.entMax         , 0) entMax
       , value(ix.entLog         , 0) entLog
       , value(ix.entLogMax      , 0) entLogMax
       , value(ix.spc            , 0) spc
       , value(ix.spcLog         , 0) spcLog
       , value(ix.spcLogEnt      , 0) spcLogEnt
       , value(ix.spcMax         , 0) spcMax
       , value(ix.spcLogMax      , 0) spcLogMax
    from s100447.tReoRunJob j, s100447.tReoRunPart r
        left join i ix on ix.tst = r.tst and ix.rng = r.rng
    where j.ty = 'IX' and j.sta <> '0' and r.ty = 'i' and r.sta = 'r'
        and r.part = r.pavon and r.reoTime is not null
        and r.tst = j.tst
;
create view S100447.vReoTSStatsPlus as
select r.*, s.pgSize, p.pageSave,
        case when r.uncompressedDatasize > 0
                 and real(r.nActive) * s.pgSize * 102400
                       / min(max(100-p.pageSave, 3), 100)
                 between real(r.uncompressedDatasize) / 7
                     and real(r.uncompressedDatasize) * 7
             then bigInt(r.uncompressedDatasize)
             else
                  bigInt(real(r.nActive) * s.pgSize * 102400
                       / min(max(100-p.pageSave, 3), 100))
        end fixUncomp
    from sysibm.sysTableSpaceStats r,
         sysibm.sysTableSpace s, sysibm.sysTablePart p
    where   s.dbName = r.dbName and s.name = r.name
        and s.dbid = r.dbId and s.psid = r.psid
        and p.dbName = r.dbName and p.tsName = r.name
        and p.partition = r.partition
;
create view S100447.vReoTSStatsFix    as
    select UPDATESTATSTIME
         , NACTIVE
         , NPAGES
         , EXTENTS
         , LOADRLASTTIME
         , REORGLASTTIME
         , REORGINSERTS
         , REORGDELETES
         , REORGUPDATES
         , REORGUNCLUSTINS
         , REORGDISORGLOB
         , REORGMASSDELETE
         , REORGNEARINDREF
         , REORGFARINDREF
         , STATSLASTTIME
         , STATSINSERTS
         , STATSDELETES
         , STATSUPDATES
         , STATSMASSDELETE
         , COPYLASTTIME
         , COPYUPDATEDPAGES
         , COPYCHANGES
         , COPYUPDATELRSN
         , COPYUPDATETIME
         , IBMREQD
         , DBID
         , PSID
         , PARTITION
         , INSTANCE
         , SPACE
         , TOTALROWS
         , DATASIZE
         , fixUncomp UNCOMPRESSEDDATASIZE
         , DBNAME
         , NAME
$@¢ if $db2v10ENF then $@=¢
         , REORGCLUSTERSENS -- from here new db2v10 columns
         , REORGSCANACCESS
         , REORGHASHACCESS
         , HASHLASTUSED
         , DRIVETYPE
         , LPFACILITY
         , STATS01
 $! $!
    from S100447.vReoTSStatsPlus
;
-- check views ------------------------------------------------------
---------------------------------------------------------------------
-- test tReoRunJob (and tReoRunPart.reoTst)
-- message e not null ==> error message ==> see case statement below
-- eo2 = calculate better eoj
---------------------------------------------------------------------
create view s100447.vReoRunJobChk as
with p as -- part gruppiert nach job, nur ty='r'
(select tst, ty, count(*) cnt,
     count(reotst) cntReo,
     min(reoTst) reoTstVon,
     max(reoTst) reoTstBis
    from s100447.tReoRunPart
    where sta = 'r'
    group by tst, ty
), j as -- join to job
(
select j.*,
       p.ty pTy, p.cnt pCnt, p.cntReo,
       p.reoTstVon, p.reoTstBis,
       (select min(tst)
            from s100447.tReoRunJob a
            where a.job = j.job and a.tst > j.tst
       ) nextJob
    from s100447.tReoRunJob j
      left join p
        on j.tst = p.tst and p.ty = lower(left(j.ty, 1))
)
        ----> diese case statement macht error message <-------------
select  case when eoj is null and nextJob is not null
                 then 'null not last'
             when reoTstVon < tst then 'reoTst < tst'
             when reoTstBis > nextJob then 'reoTst > nextJob'
             when reoTstBis > eoj then 'reoTst > eoj'
             when eoj > nextJob then 'overlap nextJob'
             when reoTstBis - tst > 1000000 then 'reoTst > 1 day'
      --     when eoj - tst > 1000000 then 'eoj > 1 day'
             else null
        end e,
        case when pCnt is null or pCnt < 1 then tst
             when reoTstBis is not null
                  and (nextJob is null or nextJob > reoTstBis)
                  and (tst < current timestamp - 2 days
                        or pCnt = cntReo) then reoTstBis
             when nextJob is not null then
                  nextJob
             else null
        end eo2, j.*
    from j
;
---------------------------------------------------------------------
-- check tReoRunPart
-- message e not null ==> error message ==> see case statement below
-- newTime = calculate reoTime from current values
---------------------------------------------------------------------
create view S100447.vReoRunRngChk as
with r as -- part gruppiert nach range
(
select
    (select j.job from s100447.tReoRunJob j where j.tst = p.tst) job,
    p.tst, p.rng,
    min(ty) ty,
    count(distinct ty) cdTy,
    min(sta) sta,
    count(distinct sta) cdSta,
    sum(case when part = paVon then 1 else 0 end) cPaVon,
    sum(case when part = paBis then 1 else 0 end) cPaBis,
    count(*) cnt,
    count(distinct part) cdPart,
    count(reoTst) cReoTst,
    min(reoTst) minReoTst,
    max(reoTst) maxReoTst,
    (select max(b.reoTst) -- letzter reoTst aus vorgehenden Ranges
          from s100447.tReoRunPart b
          where b.tst = p.tst and b.rng < p.rng) befReoTst,
    (select min(sta) || max(sta) -- status und reoTst aus Range -1
            || case when count(*) = count(reotst) then '=' else '0' end
            || coalesce(char(max(reoTst)), '-')
          from s100447.tReoRunPart b
          where b.tst = p.tst and b.rng = p.rng-1) r1ReoTst,
    (select min(sta) || max(sta) -- status und reoTst aus Range -2
            || case when count(*) = count(reotst) then '=' else '0' end
            || coalesce(char(max(reoTst)), '-')
          from s100447.tReoRunPart b
          where b.tst = p.tst and b.rng = p.rng-2) r2ReoTst,
    max(case when part = paVon then reoTime else null end) reoTime
  from s100447.tReoRunPart p
  group by tst, rng
) , s as -- begTst aus range -1 und range -2 berechnen
( select r.*,
      case when rng = 1 then tst
           when left(r1ReoTst, 3) = 'rr='
               then timestamp(substr(r1ReoTst, 4))
           when left(r1ReoTst, 2) <> '00' then null
           when rng = 2 then tst
           when left(r2ReoTst, 3) = 'rr='
               then timestamp(substr(r2ReoTst, 4))
           else null
           end begTst
    from r
), t as -- aktuelle reoZeit berechnen
( select s.*,
        (days(maxReoTst) - days(begTst)) * 86400
        + midnight_seconds(maxReoTst) - midnight_seconds(begTst)
        + 1e-6 * (microsecond(maxReoTst)-microsecond(begTst)) newTime
    from s
)
select ---> case statement macht error message <--------------------
    case when job is null   then 'job missing'
         when cdTy <> 1     then 'ty not unique'
         when cdSta <> 1    then 'sta not unique'
         when cPaVon <> 1   then 'part=paVon not unique'
         when cPaBis <> 1   then 'part=paBis not unique'
         when cdPart <> cnt then 'part not distinct'
         when minReoTst < tst then 'reoTst < tst'
                           -- rng waren früher anders sortiert
         when tst < '2011-09-29-00.00.00'  then null
         when befReoTst > minReoTst then 'before ReoTst > minReoTst'
         when abs(reoTime-newTime) >= 1 then 'reoTime <> newTime'
         else null
    end e,
    t.*
    from t
;
commit
;
--- end of install v5.9 -------------------------------------
$/view/
$/ddl/
}¢--- A540769.WK.SQL(REOIXHIS) cre=2011-01-24 mod=2011-01-24-16.16.23 A540769 ---
with r as
(
select creator, name, partition,
       max(reorgLastTime, rebuildLastTime) laBui
   from s100447.tReoRunIxStats
   where tst > current timestamp - 180 days
      -- and partition > 240
   and (creator, name) in
       (select creator, name
            from sysibm.sysIndexes
            where tbCreator = 'OA1P' and tbName = 'TNI250A101A'
       )
   group by creator, name, partition,
            max(reorgLastTime, rebuildLastTime)
 )
select substr(name, 1, 16), partition, count(*)
    from r
   group by creator, name, partition
   order by creator, name, partition
;
}¢--- A540769.WK.SQL(REOJOB) cre=2010-10-08 mod=2011-10-03-14.22.21 A540769 ----
set current path   =  oA1t ;                                            00010045
set current schema =  oA1t ;                                            00020045
select current timestamp from sysibm.sysdummy1                          00030000
;                                                                       00040000
------------------------------------------------------------------------00050000
-- reorgTime by job (or db if job not found)                            00060000
------------------------------------------------------------------------00070000
with j as                                                               00080019
( select substr(max(char(runtime) || jobName), 27) job,                 00090025
         db_name db, ts_name ts                                         00100019
      from TADM11A1                                                     00110021
      where UTILITY_TYPE   = 'W'                                        00120021
      and jobname like     'QR%'                                        00130024
      group by db_name, ts_name                                         00140020
      order by 2                                                        00150019
) , qrJob as                                                            00160019
( select coalesce(j.job, substr('-' || r.db, 1, 9)) jobName, r.*        00170026
    from S100447.vReoTS r                                               00180046
        left join j                                                     00190019
        on        j.DB             = r.db                               00200019
              and j.TS             = r.TS                               00210019
) , g as                                                                00220022
(                                                                       00230000
  select jobName,                                                       00240000
         coalesce(sum(reorgTime), -1) reorgTime,                        00250000
         sum(parts) pa, sum(real(space) * 1024) spc,                    00260000
         sum(ixParts) ixPa, sum(ixSpc) ixSpc,                           00270000
         sum(i0Parts) i0Pa, sum(i0Spc) i0Spc                            00280000
    from qrJob                                                          00290000
    where importance > 0                                                00300000
    group by jobName                                                    00310000
), o as                                                                 00320048
(                                                                       00330048
   select *                                                             00340049
   from g                                                               00350048
   order by reorgTime  desc                                             00360048
)                                                                       00370048
, r as                                                                  00380054
( select o.*, rownumber() over() rowNum                                 00390054
    from o                                                              00400054
)                                                                       00410054
select substr(jobName, 1, 9) "job",                                     00420000
       substr(fosFmTime(reorgTime),1,5) "reoTime",                      00430030
       pa "parts", substr(fosFmtE7(spc),1,7) "spc",                     00440000
       ixPa "ixParts", substr(fosFmtE7(ixSpc),1,7) "ixSpc",             00450000
       i0Pa "i0Parts", substr(fosFmtE7(i0Spc),1,7) "i0Spc"              00460053
    from r                                                              00470055
    where rownum <= 10                                                  00480054
        or reorgTime > 1800                                             00490050
    with ur                                                             00500024
;                                                                       00510000
select current timestamp from sysibm.sysdummy1;                         00520000
}¢--- A540769.WK.SQL(REOMIT) cre=2010-11-26 mod=2010-11-26-11.48.59 A540769 ----
SET CURRENT PATH   = 'OA1T';                                            00320000
SET CURRENT SCHEMA = 'OA1T';                                            00330000
------------------------------------------------------------------------00340000
-- date next sunday                                                     00350000
------------------------------------------------------------------------00360000
select date(next_day(current date,'sun')) "next sunday",                00370000
       current timestamp "now" ,                                        00380000
       'v5.4' "version"                                                 00390000
    FROM SYSIBM.SYSDUMMY1                                               00400000
;                                                                       00410000
                                                                        00420000
------------------------------------------------------------------------00530000
    -- copy vReoTs in temporary table to avoid 0c4 from err.ew04        00540000
declare global temporary table  session.vReoTS as                       00550000
  ( select * from s100447.vReoTs )                                      00560000
    with no data                                                        00570000
    on commit preserve rows                                             00580000
;                                                                       00590000
select current timestamp from sysibm.sysdummy1                          00600000
;                                                                       00610000
insert into session.vReoTs                                              00620000
    select * from s100447.vReoTs                                        00630000
        where importance > 0                                            00631000
;                                                                       00640000
commit                                                                  00650000
;                                                                       00680000
---------- next sunday + current time ----------------------------------00681000
select date(next_day(current date,'sun')) "next sunday",                00690000
       current timestamp "now" ,                                        00700000
       'v5.4' "version"                                                 00710000
    FROM SYSIBM.SYSDUMMY1                                               00720000
;                                                                       00730000
                                                                        00740000
------------------------------------------------------------------------00950000
-- reorgTime by job (or db if job not found)                            00960000
------------------------------------------------------------------------00970000
with j as                                                               00980000
( select substr(max(char(runtime) || jobName), 27) job,                 00990000
         db_name db, ts_name ts                                         01000000
      from TADM11A1                                                     01010000
      where UTILITY_TYPE   = 'W'                                        01020000
      and jobname like     'QR%'                                        01030000
      group by db_name, ts_name                                         01040000
      order by 2                                                        01050000
) , qrJob as                                                            01060000
( select coalesce(j.job, substr('-' || r.db, 1, 9)) jobName, r.*        01070000
    from session.vReoTS r                                               01080000
        left join j                                                     01090000
        on        j.DB             = r.db                               01091000
              and j.TS             = r.TS                               01092000
) , g as                                                                01093000
(                                                                       01094000
  select jobName,                                                       01095000
         coalesce(sum(reorgTime), -1) reorgTime,                        01096000
         sum(parts) pa, sum(real(space) * 1024) spc,                    01097000
         sum(ixParts) ixPa, sum(ixSpc) ixSpc,                           01098000
         sum(i0Parts) i0Pa, sum(i0Spc) i0Spc                            01099000
    from qrJob                                                          01099100
    where importance > 0                                                01099200
    group by jobName                                                    01099300
)                                                                       01099400
select substr(jobName, 1, 9) "job",                                     01099500
       substr(fosFmte7(reorgTime),1,7) "reoTime",                       01099600
       pa "parts", substr(fosFmtE7(spc),1,7) "spc",                     01099700
       ixPa "ixParts", substr(fosFmtE7(ixSpc),1,7) "ixSpc",             01099800
       i0Pa "i0Parts", substr(fosFmtE7(i0Spc),1,7) "i0Spc"              01099900
    from g                                                              01100000
    order by reorgTime  desc                                            01100100
    fetch first 20 rows only                                            01100200
    with ur                                                             01100300
;                                                                       01100400
---------- next sunday + current time ----------------------------------01100500
select date(next_day(current date,'sun')) "next sunday",                01100600
       current timestamp "now" ,                                        01100700
       'v5.4' "version"                                                 01100800
    FROM SYSIBM.SYSDUMMY1                                               01100900
;                                                                       01101000
------------------------------------------------------------------------01851000
-- ACTIVE TABLESPACE EXCEPTIONS ON NEXT SUNDAY                          01852000
------------------------------------------------------------------------01853000
SELECT DB,TS,PARTVON,PARTBIS,GUVON,GUBIS,REORG                          01854000
  FROM TSTRTS.TRTSREOTSEXCEPTION                                        01855000
 WHERE DATE(NEXT_DAY(CURRENT DATE,'SUN')) BETWEEN GUVON AND GUBIS       01856000
WITH UR                                                                 01857000
;                                                                       01858000
}¢--- A540769.WK.SQL(REOPART) cre=2011-09-25 mod=2011-09-26-08.07.56 A540769 ---
select j.job, p.*, p.tst
    from s100447.treoRunJob j
       , s100447.treoRunPart p
    where j.tst = p.tst
      and p.tst > current timestamp - 24 hour
    order by p.tst desc, rng, part
}¢--- A540769.WK.SQL(REOQDBST) cre=2013-09-17 mod=2013-09-17-17.06.07 A540769 ---
-- check sql fuer tDbState
-- #1 zeige ty sta und count
select count(*), ty, sta
    from s100447.tDbState
    group by ty, sta
;
--# suche Partitions Ueberlappungen
with r as
(
  select s.*, rid(s) rid
    from s100447.tDbState s
 -- where sta <> ''
)
, d as
( select s.*
    from r s
    where exists (select 1
        from r e
        where e.rid <> s.rid
        and e.ty = s.ty and e.db = s.db and e.sp = s.sp
        and (e.paFr = 0 or e.paTo = 0 or s.paFr = 0 or s.paTo = 0
             or (e.paFr <= s.paTo and e.paTo >= s.paFr) )
        )
)
select * from d
    order by db, sp, ty
}¢--- A540769.WK.SQL(REOREFSE) cre=2013-11-27 mod=2013-11-27-10.43.29 A540769 ---
select * from S100447.tDbSTate
    order by db, sp, paFr, paTo
}¢--- A540769.WK.SQL(REORUANA) cre=2011-10-06 mod=2011-10-06-14.32.58 A540769 ---
select count(*), ty, sta, min(reason)
    from s100447.tReoRunPart p
    where p.db = 'WB12A1T' and sp ='A500A'
         and tst > current timestamp - 1 year
    group by substr(reason, 1, 10), ty, sta
    order by substr(reason, 1, 10), ty ,sta
;;
    fro
select tst, reason, p.*
    where p.db = 'WB12A1T' and sp ='A500A' and part=2
    order by tst desc
 ;
;;;
select (select count(*)
            from s100447.tReoRunJob    j
            where j.job = d.fJob and j.ty = d.jTy
------------------------------------------------------------------
--  analysis 1:
--     show reorg history and current reorgimportance&Reason
--     for all partitions with many reorgs
with d as
(
select sum(case when p.sta = 'r' then 1 else 0 end) cReo,
       sum(case when p.sta = 's' then 1 else 0 end) cSpa,
        db, sp, part,
        count(distinct job) cJob, min(job) fJob, max(job) tJob,
            min(j.ty) jTy,
        min(p.ty) ty, min(dbid) dbid, min(spid) spid
    from s100447.tReoRunPart p
      join s100447.tReoRunJob    j
        on p.tst = j.tst
    where p.sta in ('r', 's') and p.tst > current timestamp - 3 month
        and reason > '0' and not left(reason, 1) = '-'
        and job like 'QR%'
    group by db, sp, part
 --   having count(*) > 1 and min(job) not like 'A%'
)
select *
    from d
    order by 2 desc , 1 desc
;;;
      CREO         CSPA  DB        SP          PART         C
     ---+---------+---------+---------+---------+---------+--
        18            0  WB12A1T   A500A          2
        16            0  NZ01A1T   A001A          0
        15            0  CZ11A1T   A906A          4
        15            0  CZ11A1T   A906A          3
        14            0  CZ11A1T   A905A          0
        14            0  CY02A1T   ICY053A3       0
        14            0  CY02A1T   ICY053A2       0
        14            0  CY02A1T   ICY053A1       0
        14            0  CY02A1T   ICY053A0       0
        14            0  CY02A1T   A055A          0
        14            0  WB12A1T   A500A          1
        13            0  VV29A1T   VDPS438        0
        13            0  UU02A1T   A610A          0
        13            0  UU02A1T   A260A          0
        13            0  UU02A1T   A250A          0
        13            0  UU02A1T   A220A          0
        13            0  UU02A1T   A200A          0
        13            0  UU02A1T   A170A          0
        13            0  UU02A1T   A131A          0
        13            0  UU02A1T   A100A          0
        13            0  XR01A1T   IXR101A3       0
        13            0  XR01A1T   IXR101A1       0
        13            0  XR01A1T   IXR101A0       0
        13            0  XC02A1T   AXCQ011        0
        13            0  AV04A1T   A413A03        0
        13            0  AV04A1T   A402A03        0
        13            0  AV04A1T   A401A03        0
        13            0  AV02A1T   A207A          0
        13            0  AV02A1T   A206A          0
        13            0  AV01A1T   IAV063A1       0
        13            0  AV01A1T   A009A          0
select cReo, cSpa, d.db, d.sp, d.part, p.reason, p.tst
    from d
      left join s100447.tReoRunPart p
        on p.db =  d.db || '' and p.sp = d.sp || '' and p.part = d.part
             and p.tst > current timestamp - 3 month
    order by 2 desc , 1 desc, p.tst desc
;;;
select (select count(*)
            from s100447.tReoRunJob    j
            where j.job = d.fJob and j.ty = d.jTy
                and j.tst > current timestamp - 3 month ) totJobs,
       d.*
    from d
    order by 3 desc ,2 desc
    fetch first 100 rows only
;;;
, h (cnt, db, sp, part, cla, reason, tst) as
(
select d.cnt, d.db, d.sp, d.part, d.ty, p.reason, p.tst
    from d, s100447.tReoRunPart p
    where p.sta = 'r'
        and d.db = p.db and d.sp = p.sp and d.part = p.part
union all select d.cnt, d.db, d.sp, d.part,
        'T' || strip(char(importance)), r.reason, r.updateStatsTime
    from d, s100447.vReoTs r
    where d.ty = 't'
        and d.db = r.db and d.sp = r.ts and d.part = r.part
        and d.dbid = r.dbid and d.spid = r.psid and d.part = r.part
union all select d.cnt, d.db, d.sp, d.part,
        'I' || strip(char(importance)), r.reason, r.updateStatsTime
    from d, s100447.vReoIx r
    where d.ty = 'i'
        and d.db = r.db and d.sp = r.is and d.part = r.part
        and d.dbid = r.dbid and d.spid = r.isoBid and d.part = r.part
)
select * from h
 -- where db like 'A%'
    order by 1 desc, 2, 3, 4, 7 desc
;x;
select count(*), db, sp, part, min(p.tst), max(p.tst),
        min(job), max(job)
    from s100447.tReoRunPart p
       , s100447.tReoRunJob    j
    where p.sta = 'r'
        and p.tst = j.tst
    group by db, sp, part
    order by 1 desc, 2, 3, 4
;
x;
select count(*), ty, sta
    from s100447.tReoRunPart
    group by ty, sta
---------------------------------------------------------
-- fix: überlüssige parts löschen
update
       s100447.tReoRunPart p
    set rngI0 = -9876
    where sta = '0'
      and not exists (select 1 FROM s100447.tReoRunTSStats t
                         where t.tst = p.tst and t.rng = p.rng)
      and not exists (select 1 FROM s100447.tReoRunIxStats i
                         where i.tst = p.tst and i.rng = p.rng)
;
delete from s100447.tReoRunPart p
    where rngI0 = -9876
;
with c as
( select
      (select count(*) FROM s100447.tReoRunTSStats t
           where t.tst = p.tst and t.rng = p.rng) cntTs,
      (select count(*) FROM s100447.tReoRunIxStats i
           where i.tst = p.tst and i.rng = p.rng) cntIx,
      p.*
    from s100447.tReoRunPart p
)
select * from c
    where cntTs = 0 and cntIx = 0
;
commit;
;;  where not exists (
         select 1 from  s100447.tRts
;
select ty, count(*)
    from s100447.tReoRunPart
    group by ty
;;
select *
    from s100447.tReoRunPart
    where not exists0-07-08-00.07.35.261954'
;
------------------------------------------------------------------
--  analysis 2 TS:
--     show reorg history and current reorgImportance&Reason
--     for all partitions wich should be reorganized NOW
select r.db, r.ts, r.part,
        substr(strip(char(r.importance)) || ' ' || r.reason, 1, 30),
        substr(p.reason, 1, 30) "pReason", p.tst pTst, p.reoTst,
        r.lastBuilt
    from s100447.tReoRunPart p
       , s100447.vReoTS r
    where p.sta = 'r'
        and p.db = r.db and p.sp = r.ts and p.part = r.part
        and r.importance > 0
        and r.lastBuilt > p.tst
    order by importance, r.reason, db, ts, part
    with ur
;?;

------------------------------------------------------------------
--  analysis 3 TS:
--     show mismatch between reorgTst and realtime stats
--     ???????????titions wich should be reorganized NOW
select r.db, r.ts, r.part,
        substr(strip(char(r.importance)) || ' ' || r.reason, 1, 30),
        substr(p.reason, 1, 30) "pReason", p.tst pTst, p.reoTst,
        r.lastBuilt
    from s100447.tReoRunPart p
       , s100447.tReoRunJob    j
       , s100447.vReoTS r
    where p.sta = 'r'
        and p.db = r.db and p.sp = r.ts and p.part = r.part
        and p.tst = j.tst
        and ((r.lastBuilt > p.tst and r.lastBuilt < j.eoj
        and (p.reoTst is null or p.reoTime is null)
          or ((r.lastBuilt < p.tst or r.lastBuilt > j.eoj)
        and (p.reoTst is not null or p.reoTime is not null))))
    order by importance, r.reason, db, ts, part
    with ur
;?;
    having count(*) > 1 and min(job) not like 'A%'
)
, h (cnt, db, sp, part, cla, reason, tst) as
(
select d.cnt, d.db, d.sp, d.part, d.ty, p.reason, p.tst
    from d, s100447.tReoRunPart p
    where p.sta = 'r'
        and d.db = p.db and d.sp = p.sp and d.part = p.part
union all select d.cnt, d.db, d.sp, d.part,
        'T' || strip(char(importance)), r.reason, r.updateStatsTime
    from d, s100447.vReoTs r
    where d.ty = 't'
        and d.db = r.db and d.sp = r.ts and d.part = r.part
        and d.dbid = r.dbid and d.spid = r.psid and d.part = r.part
union all select d.cnt, d.db, d.sp, d.part,
        'I' || strip(char(importance)), r.reason, r.updateStatsTime
    from d, s100447.vReoIx r
    where d.ty = 'i'
        and d.db = r.db and d.sp = r.is and d.part = r.part
        and d.dbid = r.dbid and d.spid = r.isoBid and d.part = r.part
)
select * from h
 -- where db like 'A%'
    order by 1 desc, 2, 3, 4, 7 desc
;
}¢--- A540769.WK.SQL(REORUCHK) cre=2011-10-03 mod=2011-10-17-11.05.26 A540769 ---
-----------------------------------------------------------------------
-- test tReoRun* tables
-- if necessary fix them
-----------------------------------------------------------------------
select *
    from S100447.vReoRunRngChk
    where e is not null
        -- and tst > current timestamp - 5 days
    order by tst desc, rng asc
;
--select *
--    from s100447.treoRunPart
--    where tst = '2011-08-28-13.03.18.303014'
--    order by tst desc, rng asc ;

select eoj, j.*
    from s100447.vReoRunJobChk j
    where e is not null
    order by job, tst desc
    with ur
;;;;
update s100447.tReoRunJob j
    set eoj = (select eo2
                   from s100447.vReorunJobChk e
                   where e.job = j.job and e.tst = j.tst)
    where (job, tst) in
          (select job, tst from s100447.vReorunJobChk e
                           where e.e is not null
          )
;
select eoj, j.*
    from s100447.vReoRunJobChk j
    where e is not null
    order by job, tst desc
    with ur
;
rollback;
commit;                                                               m
;;;;
------------------------------------------------------------------------
-- test jobs with/without reorgs
--
select j.tst, min(j.job),
        count(*) parts,
        sum(case when p.part = p.pavon then 1 else 0 end) rngs,
        sum(case when p.part = p.pavon and p.reoTime is null
             then 1 else 0 end) rngReoNull
    from s100447.tReoRunJob j
      left join s100447.tReoRunPart p
        on j.tst = p.tst
    where job not like 'QR%'
    group by j.tst
    order by tst desc
;
------------------------------------------------------------------------
-- delete test jobs without reorgs
--     first update then delete,
--         because direct delete is disallowed because of triggers
--
update         s100447.tReoRunJob j set ty = 'de'
    where job not like 'QR%'
      and not exists (select 1
          from s100447.tReoRunPart p
          where j.tst = p.tst
              and p.part = p.pavon and p.reoTime is not null
          )
;
delete from    s100447.tReoRunJob
    where ty = 'de'
;
rollback;
commit;
;;;
}¢--- A540769.WK.SQL(REORUNJP) cre=2011-10-04 mod=2011-10-05-12.23.44 A540769 ---
set current sqlid = 'S100447';
create view s100447.vReoRunJobPart as
with p as
(select tst, ty, count(*) cnt,
     count(reotst) cntReo,
     min(reoTst) reoTstVon,
     max(reoTst) reoTstBis
    from s100447.tReoRunPart
    where sta = 'r'
    group by tst, ty
), j as
(
select j.*,
       p.ty pTy, p.cnt pCnt, p.cntReo,
       p.reoTstVon, p.reoTstBis,
       (select min(tst)
            from s100447.tReoRunJob a
            where a.job = j.job and a.tst > j.tst
       ) nextJob
    from s100447.tReoRunJob j
      left join p
        on j.tst = p.tst and p.ty = lower(left(j.ty, 1))
)
select  case when eoj is null and nextJob is not null
                 then 'null not last'
             when reoTstVon < tst then 'reoTst < tst'
             when reoTstBis > nextJob then 'reoTst > nextJob'
             when reoTstBis > eoj then 'reoTst > eoj'
             when eoj > nextJob then 'overlap nextJob'
             when reoTstBis - tst > 1000000 then 'reoTst > 1 day'
      --     when eoj - tst > 1000000 then 'eoj > 1 day'
             else null
        end e,
        case when pCnt is null or pCnt < 1 then tst
             when reoTstBis is not null
                  and (nextJob is null or nextJob > reoTstBis)
                  and (tst < current timestamp - 2 days
                        or pCnt = cntReo) then reoTstBis
             when nextJob is not null then
                  nextJob
             else null
        end eo2, j.*
    from j
;
select eoj, j.*
    from s100447.vReoRunJobPart j
    where e is not null
    order by job, tst desc
    with ur
;
update s100447.tReoRunJob j
    set eoj = (select eo2
                   from s100447.vReoRunJobPart e
                   where e.job = j.job and e.tst = j.tst)
    where (job, tst) in
          (select job, tst from s100447.vReoRunJobPart e
                           where e.e is not null
          )
;
select *
    from s100447.vReoRunJobPart
    where e is not null
    order by job, tst desc
    with ur
;
commit
;;;;
with p as
(select tst, ty, count(*) cnt,
     count(reotst) cntReoTst,
     sum(case when part = paVon then 1 else 0 end) cntReoRng,
     min(reoTst) reoTstVon,
     max(reoTst) reoTstBis
    from s100447.tReoRunPart
    group by tst, ty
)
select j.job, j.tst, j.eoj, p.ty, p.reoTstBis, p.*, j.*
    from s100447.tReoRunJob j
      left join p
        on j.tst = p.tst and p.ty = lower(left(j.ty, 1))
    where j.tst > current timestamp - 2 day
    order by j.job, j.tst desc
    with ur
}¢--- A540769.WK.SQL(REORUNST) cre=2010-09-22 mod=2010-09-22-16.54.37 A540769 ---
-- select collect run TS statistics
--             first use checkrtD to calcuate reotime |
select * from tstRts.vRtsReoRunTsStats
    where job like 'QR%'
    order by   tst desc,   rng
    fetch first 100 rows only
    with ur
; x;
-- select collect run IX statistics
--             first use checkrtD to calcuate reotime |
select * from tstRts.vRtsReoRunIxStats
    where job like 'QR%'
    order by   tst desc,   rng
    fetch first 100 rows only
    with ur
; x;
}¢--- A540769.WK.SQL(REOSTCO) cre=2011-01-14 mod=2011-01-14-17.47.19 A540769 ---
select *
    from s100447.tReoRunJob
    order by tst desc
    fetch first 100 rows only
;
select *
    from s100447.tReoRunTsStats
    where tst in('2011-01-14-16.46.03.559586',
                 '2011-01-14-16.45.32.370847')
    order by rng, dbName, name, partition, tst desc
    fetch first 100 rows only
;
select *
    from s100447.tReoRunIxStats
    where tst in
                ('2011-01-14-16.45.47.812338',
                 '2011-01-14-16.45.39.194249')
    order by rng, dbName, name, partition, tst desc
    fetch first 100 rows only
}¢--- A540769.WK.SQL(REOTIMUP) cre=2010-07-09 mod=2011-09-12-14.20.11 A540769 ---
--- update calculated reoTime
---     first
---         if no job is running use checkref to update eoj's
---         use checkref to update reoTst from RTS
---
---     afterwards usc checkRtc to verify what you have done
---
   update s100447.tReoRunPart p
      set reoTime = (select rngTime
                         from s100447.vReoRunRng2 r
                         where r.tst = p.tst and r.rng = p.rng
                    )
    where part = paVon and reoTime is null
        and tst > current timestamp - 10 hours
        and exists  (select rngTime
                         from s100447.vReoRunRng2 r
                         where r.tst = p.tst and r.rng = p.rng
                    )
;
rollback
;;;
------------------------------------------------------------------
-- checkPart2: check reoTime and ranges
--
select case
        when p.paVon <> r.paVon then '97 paVon <>'
        when p.paBis <> r.paBis then '96 paBis <>'
        when p.part < r.paVon or p.part > r.paBis
            then '95 part outside von bis'
        when p.reoTime is not null and r.cnt <> r.cntReoTst
            then '85 reoTime with reoTst null'
        when p.reoTime is not null and p.part <> p.paVon
            then '84 reoTime part <> paVon'
        when p.reoTime <> r.rngTime
            then '83 reoTime <> rngTime'
        when p.reoTime is null and r.cnt = r.cntReoTst
                               and p.part = p.paVon
            then '05 reoTime can be set'
        else '' end err, p.*, r.*
    from s100447.tReoRunPart p, s100447.vReoRunRng r
    where p.tst = r.tst and p.rng = r.rng
    order by 1 desc, p.tst desc
    fetch first 100 rows only
}¢--- A540769.WK.SQL(REOTOTAL) cre=2010-11-26 mod=2011-10-13-07.36.48 A540769 ---
set current path = oa1t;                                                00010032
  --------------------------------------------------------------------- 00020012
  --  reorgTime by importance                                           00030015
  --------------------------------------------------------------------- 00040012
SElect importance "imp",                                                00050011
       substr(fosFmTime(sum(reorgTime)), 1, 5) "reoTi",                 00060015
       sum(parts) pa, substr(fosFmtE7(sum(real(space) * 1024)),1,7) spc,00070010
       sum(ixParts) ixPa, substr(fosFmtE7(sum(ixSpc)),1,7) ixSpc,       00080010
       sum(i0Parts) i0Pa, substr(fosFmtE7(sum(i0Spc)),1,7) i0Spc        00090010
    from s100447.vReoTs                                                 00100012
    where totalRows is not null                                         00110000
    group by importance                                                 00120000
    order by importance desc                                            00130000
    with ur                                                             00140000
;                                                                       00150004
select current timestamp from sysibm.sysdummy1;                         00160005
------------------------------------------------------------------------00170005
-- reorgTime by importance and beginning of reason                      00180015
------------------------------------------------------------------------00190005
select importance "imp", substr(reason,1, 8),                           00200011
       substr(fosFmTime(sum(reorgTime)), 1, 5) "reoTi",                 00210015
       sum(parts) pa, substr(fosFmtE7(sum(real(space) * 1024)),1,7) spc,00220005
       sum(ixParts) ixPa, substr(fosFmtE7(sum(ixSpc)),1,7) ixSpc,       00230005
       sum(i0Parts) i0Pa, substr(fosFmtE7(sum(i0Spc)),1,7) i0Spc        00240005
    from s100447.vReoTs                                                 00250012
    group by importance, substr(reason, 1, 8)                           00260005
    order by 1 desc, 2                                                  00270005
    with ur                                                             00280005
;                                                                       00290005
select current timestamp from sysibm.sysdummy1;                         00300025
--------------------------------------------------------------------    00310026
-- tsParts die am schnellsten wieder einen Reorg brauchen               00320027
--         ==> sortiert nach lastBuilt desc                             00330028
------------------------------------------------------------------------00340027
select lastBuilt, substr(strip(q.db) || '.' || strip(q.ts)              00350026
                  || ':' || strip(char(q.part)), 1, 20),                00360026
       r,s,y,z,                                                         00370026
       fosFmTime(reorgTime) "reoTime",                                  00380026
       fosFmTime(i0Time) "i0Time",                                      00390026
       importance "imp", reason, q.*                                    00400026
    from s100447.vReoTs q                                               00410026
    left join (                                                         00420026
        select sum(case when icType = 'R' then 1 else 0 end) r          00430026
             , sum(case when icType = 'S' then 1 else 0 end) s          00440026
             , sum(case when icType = 'Y' then 1 else 0 end) y          00450026
             , sum(case when icType = 'Z' then 1 else 0 end) z          00460026
             , dbName db, tsName ts, dsNum part                         00470026
             from sysibm.syscopy                                        00480026
             where timestamp > current timestamp - 21 days              00490026
             group by dbName , tsName , dsNum                           00500026
              ) c                                                       00510026
        on c.db = q.db and c.ts = q.ts and c.part = q.part              00520026
    where importance > 0 -- reason like 'clusterRa%'                    00530029
    order by 1 desc                                                     00540026
    fetch first 100 rows only                                           00550027
    with ur                                                             00560026
;                                                                       00570026
select current timestamp from sysibm.sysdummy1;                         00580026
select substr(strip(q.db) || '.' || strip(q.ts)                         00590031
                  || ':' || strip(char(q.part)), 1, 20),                00600031
       importance "imp", reason,                                        00610033
       fosFmTime(reorgTime) "reoTime",                                  00620031
       fosFmTime(i0Time) "i0Time"                                       00630031
    from s100447.vReoTs q                                               00640031
    where importance > 0                                                00650031
    order by db, ts, part                                               00660031
;                                                                       00670031
select current timestamp from sysibm.sysdummy1;                         00680031
}¢--- A540769.WK.SQL(REOTS) cre=2009-11-30 mod=2016-02-29-10.53.09 A540769 -----
set current path = oA1p;
select substr(value(clone, '-') || value(strip(char(base)), '-')
                         || value(strip(char(instance)), '-'), 1, 3) cbi
    , count(*)
    , min(reason), max(reason)
    from s100447.VReoIx s
group by value(clone, '-') || value(strip(char(base)), '-')
                          || value(strip(char(instance)), '-')
;x;
    from s100447.VReoTs s
select
        substr(strip(db) ||'.' || strip(ts), 1, 17) "db.ts",
        smallint(part) "part",
        substr(fosFmTime(reorgTime), 1, 5) "reoTi",
        substr(fosFmTime(i0Time), 1, 5) "i0Ti",
        importance "imp",
        reason "reason",
        s.*
    from s100447.VReoTs s
    where  1=1 -- reason like '%clusterRat%'
        and db = 'DB2PDB2'
    --  and TS like 'PAXXSB'
    --  and importance > 0

 -- order by  importance desc, db, ts, part
    order by db, ts, part
    with ur
;;;;
select substr(strip(db) || '.' || strip(ts)
              || ':' || strip(char(part)), 1, 25), reorgTime, importance
              , reason, s.*
    from A540769.VReoTs s
    where importance > 0
    order by  importance desc, db, ts, part
;;;;
}¢--- A540769.WK.SQL(REOTSHIS) cre=2011-01-24 mod=2011-01-24-16.24.19 A540769 ---
select *
   from s100447.tReoRunPart
   where tst > current timestamp -  90 days
      -- and partition > 240
      and db     = 'VV29A1T' and sp = 'VDPS425'
   order by db, sp, part, tst
;;
   group by dbName, name, partition,
       max(value(reorgLastTime, LoadRLastTime)
          ,value(loadRLastTime, reorgLastTime) )
 )
with r as
(
select dbName, name, partition,
       max(value(reorgLastTime, LoadRLastTime)
          ,value(loadRLastTime, reorgLastTime) ) laBui
   from s100447.tReoRunTsStats
   where tst > current timestamp -  90 days
      -- and partition > 240
   and dbName = 'VV29A1T' and name = 'VDPS425'
   group by dbName, name, partition,
       max(value(reorgLastTime, LoadRLastTime)
          ,value(loadRLastTime, reorgLastTime) )
 )
select *
    from r
    order by dbName, name, partition, laBui
;;
select substr(name, 1, 16), partition, count(*)
    from r
   group by creator, name, partition
   order by creator, name, partition
;
}¢--- A540769.WK.SQL(REOTSIX) cre=2010-11-30 mod=2010-11-30-17.06.43 A540769 ---
select *
    from s100447.tReoRunJob t
    where job = 'QR38704S'
        and tst > '2010-11-28-11.00.00'
;;
with ti as
(
select t.*,
               (select min(n.tst)
                    from s100447.tReoRunJob n
                    where t.job = n.job
                        and t.tst < n.tst
                        and t.eoj + 1 hour > n.tst
                        and n.tyInp = 'IX'
               ) ixTst
    from s100447.tReoRunJob t
    where t.tyInp = 'TS' and t.tst > current timestamp - 7 days
)
select * from ti where ixTst is null
}¢--- A540769.WK.SQL(REOTSPRF) cre=2014-01-27 mod=2014-01-27-17.46.33 A540769 ---
---------+---------+---------+---------+---------+---------+---------+---------+
with p as
(
select
    case when REORGUNCLUSTINS > TOTALROWS * 0.1 then 'u' else ' ' end
  ||case when REORGNEARINDREF+REORGFARINDREF >TOTALROWS * 0.1
                                             then 'i' else ' ' end
  || case when REORGDeletes  > TOTALROWS * 0.25 then 'd' else ' ' end
  || case when SPACE > DATASIZE / 512.0 then 's' else ' ' end
  || case when reorgMassDelete > 0      then 'm' else ' ' end
  || case when reorgClusterSens> 0      then 'c' else ' ' end prfOrig,
    case when REORGUNCLUSTINS > TOTALROWS * 0.1 then 'u' else ' ' end
  ||case when REORGNEARINDREF+REORGFARINDREF >TOTALROWS * 0.1
                                             then 'i' else ' ' end
  || case when REORGDeletes  > TOTALROWS * 0.25 then 'd' else ' ' end
  || case when SPACE > DATASIZE / 512.0 then 's' else ' ' end
  || case when reorgMassDelete > 0      then 'm' else ' ' end
  || case when reorgClusterSens> 0
          and REORGUNCLUSTINS > TOTALROWS * 0.1 then 'c' else ' ' end
    prfFix ,
  case when dataSize >= 0 and dataSize
         < real(nActive) * pgSize * 0.1024 * pctLoad * swdatasize

           then 'ds0' else '   ' end dsN,

  s.*
  from s100447.VReoTs s
  where crTb like 'OA1P.T%'
)
select smallint(importance) imp, substr(reason, 1, 8) reason,
        min(dsN) || '-' || max(dsN) dsN,
        prfOrig,  prfFix,
        count(distinct strip(db) ||'.' || strip(ts)) ts,
        count(*) parts
    from p
    group by importance, substr(reason, 1, 8), prfFix, prfOrig,
         case when importance <= 0 then dsN else '' end
    order by 1, 2, 3, 4, 5
;;;;
---------+---------+---------+---------+---------+---------+---------+---------+
   IMP  REASON    DSN      PRFORIG  PRFFIX           TS        PARTS
---------+---------+---------+---------+---------+---------+---------+---------+
    -1  no - ts   ds0-ds0     s        s              3            3
    -1  no - ts   ds0-ds0     s c      s              1            1
     0  no - reo     -                              155         1203
     0  no - reo     -          c                   417         1739
     0  no - reo     -         mc       m             2            2
     0  no - reo     -        s        s            254          935
     0  no - reo     -        s c      s            485         1834
     0  no - reo     -        smc      sm             1            1
     0  no - reo     -       d        d               4            4
     0  no - reo     -       d  c     d              29           43
     0  no - reo     -       d mc     d m             3            3
     0  no - reo     -       ds       ds              3           12
     0  no - reo     -       ds c     ds             34           88
     0  no - reo     -       dsmc     dsm             2            2
     0  no - reo  ds0-ds0     s        s           2126        21825
     0  no - reo  ds0-ds0     s c      s           2566         8364
     0  no - reo  ds0-ds0     sm       sm             1            1
     0  no - reo  ds0-ds0     smc      sm            22           22
     0  no - reo  ds0-ds0    ds       ds             70          181
     0  no - reo  ds0-ds0    ds c     ds            472         1532
     0  no - reo  ds0-ds0    dsm      dsm            10           10
     0  no - reo  ds0-ds0    dsmc     dsm            81          134
     0  no - reo  ds0-ds0   i s c    i s              4            7
     0  no - reo  ds0-ds0   ids c    ids              1            1
     0  no - reo  ds0-ds0  u  s     u  s              2            2
     0  no - reo  ds0-ds0  u  s c   u  s c            8           20
     0  no - reo  ds0-ds0  u ds     u ds              7            9
     0  no - reo  ds0-ds0  u ds c   u ds c           22           31
     0  no - reo  ds0-ds0  u dsmc   u dsmc            1            1
     3  clusterR     -                                3           27
     3  clusterR     -          c                    13           85
     3  clusterR     -ds0     s        s              2          107
     3  clusterR     -ds0     s c      s              8           45
     3  lastBuil     -                               11           20
     3  lastBuil     -          c                     2            6
     3  lastBuil     -       d        d               9           26
     3  lastBuil     -       d  c     d               1            1
     3  lastBuil     -     u        u                 1            1
     3  lastBuil     -ds0     s        s             76          835
     3  lastBuil     -ds0     s c      s             17           26
     3  lastBuil     -ds0    ds       ds             23          929
     3  lastBuil     -ds0    ds c     ds              2            8
     3  lastBuil  ds0-ds0     sm       sm             4            4
     5  nearIndR     -       ds c     ds              1            1
     5  nearIndR     -ds0     s c      s              4            4
     5  nearIndR  ds0-ds0   i s      i s              1            1
     5  nearIndR  ds0-ds0   i s c    i s              2            2
     5  pagesave     -                                1            5
     5  pagesave     -          c                     1            1
     5  pagesave     -         mc       m             1            1
     5  pagesave     -       d        d               2            2
     5  pagesave  ds0-ds0    ds       ds              1            6
     5  rtsMissi     -                              397          937
     5  rtsNull      -                                4            4
     5  rtsRowsN     -                                6            6
     5  unclust      -     u        u                 3            6
     5  unclust      -     u    c   u    c            2            2
     5  unclust      -ds0  u  s c   u  s c            5            5
     5  unclust   ds0-ds0  u  s     u  s              2            6
     5  unclust   ds0-ds0  u  sm    u  sm             1            1
     5  unclust   ds0-ds0  u  smc   u  smc            1            1
     5  unclust   ds0-ds0  u ds     u ds              7          107
     5  unclust   ds0-ds0  u ds c   u ds c            8            8
DSNE610I NUMBER OF ROWS DISPLAYED IS 63
}¢--- A540769.WK.SQL(REOTSTJ) cre=2011-09-12 mod=2011-09-19-17.40.48 A540769 ---
select *
    from s100447.treoRunJob
    where job = 'A540769'
    order by tst desc
    fetch first 10 rows only
;
select *
    from s100447.treoRunPart
    where tst = '2011-09-11-10.01.50.258516'
    order by tst desc, rng, part
;
select *
    from s100447.treoRunTSStats
    where tst = '2011-09-11-10.01.50.258516'
    order by tst desc, rng, partition
;
select *
    from s100447.treoRunIXStats
    where tst = '2011-09-11-10.01.50.258516'
    order by tst desc, rng, partition
;
}¢--- A540769.WK.SQL(REOTSTK) cre=2011-09-12 mod=2011-09-12-14.41.03 A540769 ---
set current sqlid = 's100447';
drop   view s100447.vReoRunRng2 ;
create view s100447.vReoRunRng2 as
with r1 as
(  select p.tst, p.rng, sta
         , count(*) cnt
         , count(reoTst) cntReoTst
         , max(case when reoTst>tst then reotst else  tst end) reoEnd
    from s100447.tReoRunPart p
    group by tst, sta, rng
) , r2 as
(
    select r1.*,
              (select max(sta)
                   from s100447.tReoRunPart p
                   where r1.tst = p.tst and r1.rng-1 = p.rng
                                            ) sta1
        from r1
        where sta = 'r' and cnt = cntReoTst
) , r3 as
(
    select r2.*,
              (select max(b.reoEnd)
                   from r1 b
                   where r2.tst = b.tst
                   and r2.rng-(case when r2.sta1='0' then 2 else 1 end)
                       = b.rng
                   and b.cnt = b.cntReoTst
              ) befEn1
        from r2
) , r4 as
(
    select r3.*,
        case when rng = 1 or (rng = 2 and sta1 = '0') then tst
             else befEn1 end befEnd
        from r3
)
select
        (days(reoEnd) - days(befEnd)) * 86400
        + midnight_seconds(reoEnd) - midnight_seconds(befEnd) rngTime,
        r4.*
    from r4
    where befEnd is not null
;
select * from s100447.vReoRunRng2
      where tst = '2011-09-12-11.32.03.461038'
;
commit
;;
select * from r4
    where tst = '2011-09-12-11.32.03.461038'
;;
) , r2 as
( select r.*,
      ( select coalesce(max(coalesce(o.reoEnd, o.tst))
                 , r.tst)
            from r1 o
            where o.tst = r.tst
                and o.rng <> r.rng and o.reoEnd < r.reoEnd
       ) reoBeg
    from r1 r
)
}¢--- A540769.WK.SQL(REOTTT) cre=2010-10-08 mod=2010-10-08-14.16.03 A540769 ----
select count(*), min(runDate), max(runDate)
    from s100447.TRTSREOSTATSTS
;
select count(*), min(runDate), max(runDate)
    from s100447.TRTSREOSTATSix
}¢--- A540769.WK.SQL(REVI) cre=2006-04-07 mod=2006-04-12-12.59.33 F540769 ------
SELECT *                                                                00001024
  FROM REVI.DB2LOAD                                                     00001124
  WHERE SUBSYS = 'DBTF'                                                 00001226
      AND TIMESTAMP =                                                   00001324
          (   SELECT MAX(TIMESTAMP)                                     00001424
                  FROM REVI.DB2LOAD                                     00002024
                  WHERE SUBSYS = 'DBTF'                                 00003026
          )                                                             00004024
;                                                                       00005024
FEHLER                                                                  00006024
INSERT                                                                  00010013
    INTO REVI.DB2LOAD                                                   00020013
      (                                                                 00030013
        "GROUP",                                                        00040014
        TIMESTAMP,                                                      00050013
        DBNAME,                                                         00060013
        TSNAME,                                                         00070013
        DSNUM,                                                          00080013
        ICTYPE,                                                         00090013
        JOBNAME,                                                        00100013
        AUTHID                                                          00110013
      )                                                                 00120013
    SELECT                                                              00130013
        'DBAF',                                                         00140013
        TIMESTAMP,                                                      00150013
        DBNAME,                                                         00160013
        TSNAME,                                                         00170013
        DSNUM,                                                          00180013
        ICTYPE,                                                         00190013
        JOBNAME,                                                        00200013
        AUTHID                                                          00210013
                                                                        00220013
      FROM SYSIBM.SYSCOPY                                               00230013
        WHERE TIMESTAMP >                                               00240023
          (                                                             00250023
            SELECT MAX(TIMESTAMP)                                       00260018
              FROM REVI.DB2LOAD                                         00270018
              WHERE GROUP = 'DBAF'                                      00280018
          )                                                             00290023
          AND TIMESTAMP <= CURRENT TIMESTAMP - 5 DAYS + 3 HOURS         00300021
      ;                                                                 00310013
                                                                        00320013
    COMMIT ;                                                            00330017
                                                                        00340017
    ENDE                                                                00350009
SELECT COUNT(*), ICTYPE, CURRENT SERVER, CURRENT MEMBER                 00360005
    FROM CHSKA000DBTF.SYSIBM.SYSCOPY                                    00370007
    WHERE TIMESTAMP >= CURRENT TIMESTAMP - 1 DAY                        00380002
    GROUP BY ICTYPE;                                                    00390008
                                                                        00400009
 001600  CREATE TABLE    REVI.DB2LOAD                                   00410009
 001700     (GROUP    CHAR(4)                                           00420009
 001800      TIMESTAMP TIMESTAMP                                        00430009
 001900      DBNAME   CHAR(8)                                           00440009
 002000      TSNAME   CHAR(8)                                           00450009
 002100      DSNUM    INTEGER                                           00460009
 002200      ICTYPE   CHAR(1)                                           00470009
 002300      JOBNAME  CHAR(8)                                           00480009
 002400      AUTHID   CHAR(8)                                           00490009
}¢--- A540769.WK.SQL(REVICNT) cre=2006-04-07 mod=2006-04-07-13.13.18 F540769 ---
SELECT COUNT(*), ICTYPE, CURRENT SERVER, CURRENT MEMBER                 00001000
    FROM              SYSIBM.SYSCOPY                                    00002000
    WHERE TIMESTAMP >= CURRENT TIMESTAMP - 1 DAY                        00003000
    GROUP BY ICTYPE ;                                                   00004000
SELECT COUNT(*), ICTYPE, CURRENT SERVER, CURRENT MEMBER                 00010000
    FROM CHSKA000DBTF.SYSIBM.SYSCOPY                                    00011000
    WHERE TIMESTAMP >= CURRENT TIMESTAMP - 1 DAY                        00020000
    GROUP BY ICTYPE;                                                    00030000
}¢--- A540769.WK.SQL(REVIDB) cre=2006-04-07 mod=2006-04-11-15.55.36 F540769 ----
 CREATE TABLE    REVI.DB2LOAD                                           00010003
    (SUBSYS   CHAR(4)                             NOT NULL,             00020005
     TIMESTAMP TIMESTAMP                          NOT NULL,             00030003
     DBNAME   CHAR(8)                             NOT NULL,             00040003
     TSNAME   CHAR(8)                             NOT NULL,             00050003
     DSNUM    INTEGER                             NOT NULL,             00060003
     ICTYPE   CHAR(1)                             NOT NULL,             00070003
     JOBNAME  CHAR(8)                             ,                     00080003
     AUTHID   CHAR(8)                                                   00090003
    )                                                                   00100003
        IN DA540769.A002A                                               00110008
        AUDIT NONE                                                      00120003
    ;                                                                   00130003
                                                                        00140003
 LABEL ON TABLE REVI.DB2LOAD                                            00150000
        IS 'LOAD JOBS'                                                  00160000
    ;                                                                   00170002
   CREATE        INDEX REVI.I002A1                                      00180000
          ON REVI.DB2LOAD                                               00190000
        ( SUBSYS ASC,                                                   00200007
          TIMESTAMP            ASC                                      00210000
        )                                                               00220000
          USING STOGROUP GSMS                                           00230000
                PRIQTY   72                                             00240000
                SECQTY   720                                            00250000
          ERASE NO                                                      00260000
          FREEPAGE   0                                                  00270000
          PCTFREE 10                                                    00280000
          GBPCACHE CHANGED                                              00290000
          BUFFERPOOL BP1                                                00300000
          CLOSE YES                                                     00310000
          PIECESIZE 1       G                                           00320000
          COPY NO                                                       00330000
          ;                                                             00340006
COMMIT;                                                                 00350005
CREATE       TABLESPACE A002A    IN DA540769                            00360008
       USING STOGROUP GSMS                                              00370005
             PRIQTY 72                                                  00380005
             SECQTY 720                                                 00390005
             ERASE NO                                                   00400005
             FREEPAGE   0                                               00410005
             PCTFREE  5                                                 00420005
             GBPCACHE CHANGED                                           00430005
             TRACKMOD YES                                               00440005
       BUFFERPOOL BP2                                                   00450005
       LOCKSIZE ANY                                                     00460005
       LOCKMAX  SYSTEM                                                  00470005
       CLOSE YES                                                        00480005
       CCSID EBCDIC                                                     00490005
       MAXROWS 255;                                                     00500005
}¢--- A540769.WK.SQL(REVIDBOL) cre=2006-04-18 mod=2006-04-18-14.50.41 F540769 ---
CREATE       TABLESPACE A002A    IN DB2REVI
       USING STOGROUP GSMS
             PRIQTY 72
             SECQTY 7200
             ERASE NO
             FREEPAGE   0
             PCTFREE  5
             GBPCACHE CHANGED
             TRACKMOD YES
       BUFFERPOOL BP2
       LOCKSIZE ANY
       LOCKMAX SYSTEM
       CCSID EBCDIC
       MAXROWS 255
       CLOSE YES
                                                                      ;
CREATE TABLE    REVI.DB2LOAD
   (SUBSYS CHAR(4)                               NOT NULL             ,
    TIMESTAMP TIMESTAMP                          NOT NULL             ,
    DBNAME CHAR(8)                               NOT NULL             ,
    TSNAME CHAR(8)                               NOT NULL             ,
    DSNUM INTEGER                                NOT NULL             ,
    ICTYPE CHAR(1)                               NOT NULL             ,
    JOBNAME CHAR(8)                                                   ,
    AUTHID CHAR(8)                                                    )
       IN DB2REVI.A002A
       AUDIT NONE
       CCSID EBCDIC
                                                                      ;
LABEL ON TABLE REVI.DB2LOAD
       IS 'LOAD JOBS'
                                                                      ;
CREATE INDEX REVI.I002A1
       ON REVI.DB2LOAD
     ( SUBSYS               ASC  ,
       TIMESTAMP            ASC  )
       USING STOGROUP GSMS
             PRIQTY      72
             SECQTY     720
       ERASE NO
       FREEPAGE   0
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 1       G
       COPY NO
                                                                      ;
}¢--- A540769.WK.SQL(REVIT) cre=2006-04-07 mod=2006-04-07-15.00.52 F540769 -----
SELECT A.TIMESTAMP, T.TIMESTAMP                                         00001006
      FROM SYSIBM.SYSCOPY A,                                            00002005
           CHSKA000DBTF.SYSIBM.SYSCOPY T                                00003005
      WHERE A.TIMESTAMP = T.TIMESTAMP AND                               00004003
              A.TIMESTAMP >  CURRENT TIMESTAMP - 1 HOURS                00005007
        ;                                                               00006003
 ENDE                                                                   00007003
INSERT                                                                  00010000
    INTO REVI.DB2LOAD                                                   00020000
      (                                                                 00030000
        "GROUP",                                                        00040000
        TIMESTAMP,                                                      00050000
        DBNAME,                                                         00060000
        TSNAME,                                                         00070000
        DSNUM,                                                          00080000
        ICTYPE,                                                         00090000
        JOBNAME,                                                        00100000
        AUTHID                                                          00110000
      )                                                                 00120000
    SELECT                                                              00130000
        'DBTF',                                                         00140000
        TIMESTAMP,                                                      00150000
        DBNAME,                                                         00160000
        TSNAME,                                                         00170000
        DSNUM,                                                          00180000
        ICTYPE,                                                         00190000
        JOBNAME,                                                        00200000
        AUTHID                                                          00210000
                                                                        00220000
      FROM CHSKA000DBTF.SYSIBM.SYSCOPY                                  00230001
        WHERE TIMESTAMP >  CURRENT TIMESTAMP - 5 DAYS + 3 HOURS         00240002
   ;      (                                                             00250002
            SELECT MAX(TIMESTAMP)                                       00260000
              FROM REVI.DB2LOAD                                         00270000
              WHERE GROUP = 'DBTF'                                      00280001
          )                                                             00290000
          AND TIMESTAMP <= CURRENT TIMESTAMP - 5 DAYS + 3 HOURS         00300000
      ;                                                                 00310000
                                                                        00320000
    COMMIT ;                                                            00330000
                                                                        00340000
}¢--- A540769.WK.SQL(REXXISOL) cre=2016-10-21 mod=2016-10-21-09.58.40 A540769 ---
set current packageSet = 'DSNREXRRA540769';
select count(*), current timestamp, current server
    from sysibm.sysTables
}¢--- A540769.WK.SQL(RI) cre=2006-11-02 mod=2006-11-02-16.51.19 F540769 --------
-- referential integrity
-- show tables and referenced tables plus relAttributes
select
        char(creator, 8) "tabCrea",
        char(tbname, 20) "table",
        char(relName ,12) "rel",
        r.deleteRule "ru", r.enforced "en", r.colcount "cols",
        char(refTBcreator, 8) "refCrea",
        char(refTBname, 20) "refTab"
    from sysibm.sysrels r
    where (tbname like 'T%' or refTBname like 'T%')
    order by tbName, refTbName, relName, creator
;
}¢--- A540769.WK.SQL(RICKEN) cre=2006-08-08 mod=2006-08-08-13.12.51 F540769 ----
set current sqlid = 'S100447'                 ;
             drop TABLESPACE WI02A1L.A105A01  ;
             drop TABLESPACE WI02A1L.A103A01  ;
             drop INDEX OA1L.IWI100A1         ;
             drop INDEX OA1L.IWI100H1         ;
-- ******* START VIEW COMMANDS ******************
             drop VIEW S100447.VWI103A1004003 ;
             drop VIEW S100447.VWI103A1004000 ;
             drop VIEW S100447.VWI103A1005004 ;
             drop VIEW S100447.VWI103A1005000 ;
-- -CDL  012150 drop VIEW OA1L.HBD103A1131
             drop VIEW S100447.VWI103A1006005 ;
             drop VIEW S100447.VWI103A1006000 ;
             drop VIEW S100447.VWI103A1007006 ;
             drop VIEW S100447.VWI103A1007000 ;
             drop VIEW S100447.VWI105A1001000 ;
             drop VIEW S100447.VWI105A1002000 ;
             drop VIEW S100447.VWI105A1003000 ;
             drop VIEW S100447.VWI105A1004001 ;
             drop VIEW S100447.VWI105A1004000 ;
             drop VIEW S100447.VWI105A1005000 ;
             drop VIEW S100447.VWI105A1006000 ;
             drop VIEW S100447.VWI105A1007002 ;
             drop VIEW S100447.VWI105A1007000 ;
             drop VIEW S100447.VWI105A1008000 ;
             drop VIEW S100447.VWI105A1010000 ;
             drop VIEW S100447.VWI105A1009000 ;
             drop VIEW S100447.VWI103A1010000 ;
             drop VIEW S100447.VWI103A1009001 ;
             drop VIEW S100447.VWI103A1009000 ;
             drop VIEW S100447.VWI103A1008000 ;
             drop VIEW S100447.VWI103A1003002 ;
             drop VIEW S100447.VWI103A1003000 ;
             drop VIEW S100447.VWI103A1002000 ;
             drop VIEW S100447.VWI103A1001001 ;
             drop VIEW S100447.VWI103A1001000 ;
}¢--- A540769.WK.SQL(RICOL) cre=2006-11-02 mod=2006-11-02-16.55.13 F540769 -----
-- referential integrity  with column pairs
with r as
( select *
    from sysibm.sysrels
    where (creator = 'OA1A' and tbname like 'T%')
) ,
f  as
( select ff.*
    from r, sysibm.sysforeignkeys ff
    where   r.creator = ff.creator
        and r.tbName  = ff.tbName
        and r.relName = ff.relName
) ,
k as
( select r.creator, r.tbName, r.relName, kk.*, i.name kIxName
    from r, sysibm.sysindexes i, sysibm.syskeys kk
    where
        (
            (        r.ixName <> ''
                 and r.ixOwner = i.creator and r.ixName = i.name
             ) or (r.ixName = '' and i.uniqueRule = 'P'
                                 and r.refTBCreator = i.tbCreator
                                 and r.refTbName = i.tbName
        )   ) and  i.creator = kk.ixCreator
              and  i.name = kk.ixName
)
select  char(strip(r.creator) ||'.'|| strip(r.tbname)
                || '.' || strip(f.colName),40) "crea.table.col",
        char(strip(r.refTBcreator) ||'.'|| strip(r.refTBname)
                || '.' || strip(k.colName), 40) "references",
        f.colSeq, k.colSeq,
        char(r.relName,12),
        r.deleteRule "ru", r.enforced "en", r.colcount "cols",
        char(r.ixName, 12) "relIndex",
        char(k.kIxName, 12) "indIndex"
    from r
        left join
            (f full join k
            on      f.creator = k.creator
                and f.tbName  = k.tbName
                and f.relName = k.relName
                and f.colSeq  = k.colSeq
           )
        on      r.creator = k.creator
            and r.tbName = k.tbName
            and r.relName = k.relName
;
}¢--- A540769.WK.SQL(RID) cre=2011-06-10 mod=2011-06-10-14.30.34 A540769 -------
select    rid(t), hex(rid(t)),                                          00000116
    t.*                                                                 00000216
    from oa1a.twm005a1 t                                                00000316
    where rid(t) in (19021840, 19021841                                 00000416
                    ,19021843, 19021844                                 00000516
                    ,19021846, 19021847                                 00000616
                    )                                                   00000716
;;;;                                                                    00000816
update oa1a.twm005a1 t  set d$gueb = '2345-06-07-08.09.00.000000'       00000916
    where rid(t) =   19021846                                           00001016
;                                                                       00001116
select    rid(t), hex(rid(t)),                                          00001216
    t.*                                                                 00001316
    from oa1a.twm005a1 t                                                00001416
    where rid(t) =   19021846                                           00001516
union all                                                               00001616
select    rid(t), hex(rid(t)),                                          00001716
    t.*                                                                 00001816
    from oa1a.twm005a1 t                                                00001916
    where rid(t) =   19021847                                           00002016
;                                                                       00002116
commit                                                                  00002216
;;;                                                                     00002316
                    )                                                   00002416
;                                                                       00002516
update oa1a.twm005a1 t  set d$gueb = '2345-06-07-08.09.00.000000'       00002616
    where rid(t) =   19021840                                           00002716
;                                                                       00003011
update oa1a.twm005a1 t  set d$gueb = '2345-06-07-08.09.00.000000'       00004012
    where rid(t) =   19021843                                           00005011
;                                                                       00006011
}¢--- A540769.WK.SQL(ROWNUM) cre=2011-02-09 mod=2011-02-09-11.28.42 A540769 ----
select row_number() over ()
    from sysibm.sysColumns
    fetch first 5 rows only
;
select (row_number () over()) + mm
     , strip(left(name, 40))
     from sysibm.sysColumns,
       (select max(key)+1 mm from A540769.tPer10) m
      fetch first 10 rows only
}¢--- A540769.WK.SQL(ROWVALUE) cre=2010-05-13 mod=2010-05-13-18.55.23 A540769 ---
select case when (1, 2, 'abc') = (1, 2, 'ac') then '>' else '<=' end
     from sysibm.sysDummy1;
}¢--- A540769.WK.SQL(RP01DBLF) cre= mod= ---------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBAF (810)     Extract time : 2006-08-28 15:41 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=A012A In Database DA540769    --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DA540769   Stogroup=GSMS
-- Tablespace=DA540769.A012A
------------------------------------------------------------------------
--
  CREATE TABLESPACE A012A
    IN DA540769
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 100
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 8
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
------------------------------------------------------------------------
--    Table=A540769.TWK012A In DA540769.A012A
------------------------------------------------------------------------
--
  CREATE TABLE A540769.TWK012A
     (WK012CH20            CHAR(20) FOR SBCS DATA WITH DEFAULT NULL,
      WK012CH4             CHAR(4) FOR SBCS DATA WITH DEFAULT NULL,
      WK012CH2             TIMESTAMP WITH DEFAULT NULL,
      WK012TST             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL)
    IN DA540769.A012A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IWK012A0 On A540769.TWK012A
------------------------------------------------------------------------
--
  CREATE INDEX A540769.IWK012A0
    ON A540769.TWK012A
     (WK012CH20             ASC)
    USING STOGROUP GSMS
    PRIQTY 12 SECQTY 12
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  CREATE ALIAS A540769X.TWK012A FOR A540769.TWK012A ;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(RP01DBOF) cre= mod= ---------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBOF (810)     Extract time : 2006-08-25 15:41 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=N TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Database DRP01                           --
--                                                                    --
------------------------------------------------------------------------
--
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE DATABASE RP01A1L
    BUFFERPOOL BP0
    INDEXBP    BP0
    CCSID      EBCDIC
    STOGROUP   GSMS;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S101A
------------------------------------------------------------------------
--
  CREATE TABLESPACE S101A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP101A1 In RP01A1L.S101A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP101A1
     (RP10101              INTEGER NOT NULL,
      RP10102              INTEGER NOT NULL,
      RP10103              INTEGER NOT NULL,
      RP10104              DATE NOT NULL,
      RP10105              DATE NOT NULL,
      RP10106              INTEGER NOT NULL,
      RP10107              INTEGER NOT NULL,
      RP10108              CHAR(20) FOR SBCS DATA NOT NULL,
      RP10109              CHAR(4) FOR SBCS DATA NOT NULL,
      RP10110              INTEGER NOT NULL,
      RP10111              INTEGER NOT NULL,
      RP10112              INTEGER NOT NULL,
      RP10113              INTEGER NOT NULL,
      RP10114              INTEGER NOT NULL,
      RP10115              INTEGER NOT NULL,
      RP10116              INTEGER NOT NULL,
      RP10117              INTEGER NOT NULL,
      RP10118              INTEGER NOT NULL,
      RP10119              INTEGER NOT NULL,
      RP10120              INTEGER NOT NULL,
      RP10121              INTEGER NOT NULL,
      RP10122              INTEGER NOT NULL,
      RP10123              INTEGER NOT NULL,
      RP10124              INTEGER NOT NULL,
      RP10125              CHAR(18) FOR SBCS DATA NOT NULL,
      RP10126              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10127              DATE NOT NULL,
      RP10128              TIME NOT NULL,
      PRIMARY KEY (RP10101))
    IN RP01A1L.S101A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP101A1 IS 'KONZERNSTANDARD';
--
  COMMENT ON ODV.TRP101A1
   (RP10125 IS 'Technischer Name              -Modulname bei Funktionen
    -Feldname bei Feldern         -Name von Datenstrukturen
                           ',
    RP10124 IS 'Daten-Typ: Feld-Genauigkeit
                   ',
    RP10123 IS 'Daten-Typ: Feld-Länge
                   ',
    RP10122 IS 'Daten-Typ
                   ',
    RP10121 IS 'SET: Daten-Typen       ITM=105
                   ',
    RP10120 IS 'Feld --> Datenstruktur        -REF.TRP101
                   ',
    RP10119 IS 'Technischer Element-Typ
                   ',
    RP10118 IS 'SET:Tech.Elem.Typen    ITM=104
                   ',
    RP10117 IS 'Wertebereich: ...BIS!
                   ',
    RP10116 IS 'Wertebereich: ¢VON...
                   ',
    RP10115 IS 'Wertebereichstyp Einzelcode   -REF.TRP104
    -REF.Extern.RFT.Code
                           ',
    RP10114 IS 'Attribute   --> SET/RFT/FKT   Untergruppe --> SET/RFT/FK
T   Hauptgruppe --> SET/RFT/FKT   SET/RFT     --> SET/RFT  (red)Datenfel
d   --> SET/RFT  (red)-REF.TRP101',
    RP10113 IS 'Wertebereichs-Typ
                   ',
    RP10112 IS 'SET: WertebereichsTyp  ITM=103
                   ',
    RP10111 IS 'Feld --> Attribut             -Ref.TRP101
                   ',
    RP10110 IS 'Externe Referenztabellen-Nr.
                   ',
    RP10109 IS 'Sekundär. Sicherheitskategorie
                   ',
    RP10108 IS 'ITEM-Verantwortliche Org.Unit
                   ',
    RP10107 IS 'Status
                   ',
    RP10106 IS 'SET: Status            ITM=102
                   ',
    RP10103 IS 'SP-Info-Element
                   ',
    RP10102 IS 'SET: SP-Info-Elemente  ITM=101
                   ',
    RP10101 IS 'ITEM-ID fortlaufend vergeben  - 0, ¢100-Max(INT)!
                   ');
--
  LABEL ON ODV.TRP101A1
   (RP10128 IS 'D_MUTN_TIME',
    RP10127 IS 'D_MUTN',
    RP10126 IS 'I_MUTN_PID',
    RP10125 IS 'I_TCHNCL_NAME',
    RP10124 IS 'N_DATA_PRCSN',
    RP10123 IS 'N_DATA_LNGTH',
    RP10122 IS 'I_DATA_T_CODE',
    RP10121 IS 'I_DATA_T_SET',
    RP10120 IS 'I_DATA_STRCTR_ITM',
    RP10119 IS 'I_TCHNCL_T_CODE',
    RP10118 IS 'I_TCHNCL_T_SET',
    RP10117 IS 'I_DOMN_UPPER_LMT',
    RP10116 IS 'I_DOMN_LOWER_LMT',
    RP10115 IS 'I_DOMN_CODE',
    RP10114 IS 'I_DOMN_ITM',
    RP10113 IS 'I_DOMN_T_CODE',
    RP10112 IS 'I_DOMN_T_SET',
    RP10111 IS 'I_ATTR_ITM',
    RP10110 IS 'I_EXTNL_RFT_NMBR',
    RP10109 IS 'C_SCND_SCY_CTGRY',
    RP10108 IS 'I_RSPNSBL_FOR',
    RP10107 IS 'I_STATUS_CODE',
    RP10106 IS 'I_STATUS_SET',
    RP10105 IS 'D_END',
    RP10104 IS 'D_EFCTV',
    RP10103 IS 'I_GRPSP_T_CODE',
    RP10102 IS 'I_GRPSP_T_SET',
    RP10101 IS 'I_GRPSP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP101A0 On ODV.TRP101A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP101A0
    ON ODV.TRP101A1
     (RP10101               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP101A1 On ODV.TRP101A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP101A1
    ON ODV.TRP101A1
     (RP10103               ASC,
      RP10111               ASC,
      RP10101               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S102A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S102A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP102A1 In RP01A1L.S102A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP102A1
     (RP10201              INTEGER NOT NULL,
      RP10202              INTEGER NOT NULL,
      RP10203              INTEGER NOT NULL,
      RP10204              INTEGER NOT NULL,
      RP10205              INTEGER NOT NULL,
      RP10206              INTEGER NOT NULL,
      RP10207              DATE NOT NULL,
      RP10208              DATE NOT NULL,
      RP10209              INTEGER NOT NULL,
      RP10210              CHAR(72) FOR SBCS DATA NOT NULL,
      RP10211              CHAR(144) FOR SBCS DATA NOT NULL,
      RP10212              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10213              DATE NOT NULL,
      RP10214              TIME NOT NULL,
      PRIMARY KEY (RP10201,
                   RP10202,
                   RP10203,
                   RP10204,
                   RP10205,
                   RP10206,
                   RP10207,
                   RP10208,
                   RP10209))
    IN RP01A1L.S102A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP102A1 IS 'KONZERNSTANDARD-BESCHREIBUNG';
--
  COMMENT ON ODV.TRP102A1
   (RP10209 IS 'Zeilen-Id. bei Textbeschreib.
                   ',
    RP10206 IS 'Sprachcode
                   ',
    RP10205 IS 'SET:Sprachcodes        ITM=109
                   ',
    RP10204 IS 'Beschreibung
                   ',
    RP10203 IS 'SET:Bezeichungen       ITM=106SET:Textbeschreibungen ITM
=107SET:Zusatzattribute    ITM=108
                           ',
    RP10202 IS 'SET/RFT-Code                  - REF.Default
    - REF.TRP104                  - REF.Extern.RFT.Code
                           ',
    RP10201 IS 'Standardpaket-ITEM            -REF.TRP101
                   ');
--
  LABEL ON ODV.TRP102A1
   (RP10214 IS 'D_MUTN_TIME',
    RP10213 IS 'D_MUTN',
    RP10212 IS 'I_MUTN_PID',
    RP10211 IS 'T_DESC_SRH',
    RP10210 IS 'T_DESC',
    RP10209 IS 'I_LINE',
    RP10208 IS 'D_END',
    RP10207 IS 'D_EFCTV',
    RP10206 IS 'I_LNG_CODE',
    RP10205 IS 'I_LNG_SET',
    RP10204 IS 'I_DESC_CODE',
    RP10203 IS 'I_DESC_SET',
    RP10202 IS 'I_CODE',
    RP10201 IS 'I_GRPSP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP102A0 On ODV.TRP102A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP102A0
    ON ODV.TRP102A1
     (RP10201               ASC,
      RP10202               ASC,
      RP10203               ASC,
      RP10204               ASC,
      RP10205               ASC,
      RP10206               ASC,
      RP10207               ASC,
      RP10208               ASC,
      RP10209               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP102A2 On ODV.TRP102A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP102A2
    ON ODV.TRP102A1
     (RP10201               ASC,
      RP10210               ASC,
      RP10204               ASC,
      RP10206               ASC,
      RP10205               ASC,
      RP10203               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP102A1 On ODV.TRP102A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP102A1
    ON ODV.TRP102A1
     (RP10203               ASC,
      RP10204               ASC,
      RP10206               ASC,
      RP10211               ASC,
      RP10201               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S103A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S103A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP103A1 In RP01A1L.S103A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP103A1
     (RP10301              INTEGER NOT NULL,
      RP10302              INTEGER NOT NULL,
      RP10303              INTEGER NOT NULL,
      RP10304              INTEGER NOT NULL,
      RP10305              INTEGER NOT NULL,
      RP10306              INTEGER NOT NULL,
      RP10307              DATE NOT NULL,
      RP10308              DATE NOT NULL,
      RP10309              INTEGER NOT NULL,
      RP10310              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10311              DATE NOT NULL,
      RP10312              TIME NOT NULL,
      PRIMARY KEY (RP10301,
                   RP10302,
                   RP10303,
                   RP10304,
                   RP10305,
                   RP10306,
                   RP10307))
    IN RP01A1L.S103A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP103A1 IS 'REFERENZTABELLEN-VERBINDUNG';
--
  COMMENT ON ODV.TRP103A1
   (RP10309 IS 'Verbindungs-Sequenznummer
                   ',
    RP10306 IS 'Verbindung CODE-AN            -REF.Default
    -REF.TRP104                   -REF.Extern.RFT.Code
                           ',
    RP10305 IS 'Verbindung ITEM-AN            -REF.TRP101
                   ',
    RP10304 IS 'Verbindungstyp
                   ',
    RP10303 IS 'SET:Verbindungstypen   ITM=110
                   ',
    RP10302 IS 'Verbindung CODE-Von           -REF.Default
    -REF.TRP104                   -REF.Extern.RFT.Code
                           ',
    RP10301 IS 'Verbindung ITEM-Von           -REF.TRP101
                   ');
--
  LABEL ON ODV.TRP103A1
   (RP10312 IS 'D_MUTN_TIME',
    RP10311 IS 'D_MUTN',
    RP10310 IS 'I_MUTN_PID',
    RP10309 IS 'N_LINK_SEQ',
    RP10308 IS 'D_END',
    RP10307 IS 'D_EFCTV',
    RP10306 IS 'I_CODE_TO',
    RP10305 IS 'I_GRPSP_ITM_TO',
    RP10304 IS 'I_LINK_CODE',
    RP10303 IS 'I_LINK_SET',
    RP10302 IS 'I_CODE_FROM',
    RP10301 IS 'I_GRPSP_ITM_FROM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP103A0 On ODV.TRP103A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP103A0
    ON ODV.TRP103A1
     (RP10301               ASC,
      RP10302               ASC,
      RP10303               ASC,
      RP10304               ASC,
      RP10305               ASC,
      RP10306               ASC,
      RP10307               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP103A1 On ODV.TRP103A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP103A1
    ON ODV.TRP103A1
     (RP10305               ASC,
      RP10306               ASC,
      RP10303               ASC,
      RP10304               ASC,
      RP10307               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S104A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S104A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP104A1 In RP01A1L.S104A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP104A1
     (RP10401              INTEGER NOT NULL,
      RP10402              INTEGER NOT NULL,
      RP10403              DATE NOT NULL,
      RP10404              DATE NOT NULL,
      RP10405              INTEGER NOT NULL,
      RP10406              CHAR(20) FOR SBCS DATA NOT NULL,
      RP10407              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10408              DATE NOT NULL,
      RP10409              TIME NOT NULL,
      RP10410              CHAR(12) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      PRIMARY KEY (RP10401,
                   RP10402))
    IN RP01A1L.S104A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP104A1 IS 'REFERENZTABELLEN-ERLAEUTERUNG';
--
  COMMENT ON ODV.TRP104A1
   (RP10410 IS 'Ext. Code, zB ISO, oder numer.
                   ',
    RP10406 IS 'Code-Verantwortliche Org.Unit
                   ',
    RP10405 IS 'Code Sequenz-Nummer
                   ',
    RP10402 IS 'SET-Code
                   ',
    RP10401 IS 'Standardpaket-SET-ITEM        -REF.TRP101
                   ');
--
  LABEL ON ODV.TRP104A1
   (RP10410 IS 'I_CODE_EXT',
    RP10409 IS 'D_MUTN_TIME',
    RP10408 IS 'D_MUTN',
    RP10407 IS 'I_MUTN_PID',
    RP10406 IS 'I_RSPNSBL_FOR',
    RP10405 IS 'N_CODE_SEQ',
    RP10404 IS 'D_END',
    RP10403 IS 'D_EFCTV',
    RP10402 IS 'I_SET_CODE',
    RP10401 IS 'I_SET_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP104A0 On ODV.TRP104A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP104A0
    ON ODV.TRP104A1
     (RP10401               ASC,
      RP10402               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP104A1 On ODV.TRP104A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP104A1
    ON ODV.TRP104A1
     (RP10401               ASC,
      RP10410               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S105A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S105A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP105A1 In RP01A1L.S105A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP105A1
     (RP10501              INTEGER NOT NULL,
      RP10502              CHAR(20) FOR SBCS DATA NOT NULL,
      RP10503              CHAR(20) FOR SBCS DATA NOT NULL,
      RP10504              INTEGER NOT NULL,
      RP10505              INTEGER NOT NULL,
      RP10506              INTEGER NOT NULL,
      RP10507              INTEGER NOT NULL,
      RP10508              INTEGER NOT NULL,
      RP10509              INTEGER NOT NULL,
      RP10510              DATE NOT NULL,
      RP10511              DATE NOT NULL,
      RP10512              CHAR(72) FOR SBCS DATA NOT NULL,
      RP10513              CHAR(144) FOR SBCS DATA NOT NULL,
      RP10514              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10515              DATE NOT NULL,
      RP10516              TIME NOT NULL,
      PRIMARY KEY (RP10501,
                   RP10502,
                   RP10503,
                   RP10504,
                   RP10505,
                   RP10506,
                   RP10507,
                   RP10508,
                   RP10509,
                   RP10510))
    IN RP01A1L.S105A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP105A1 IS 'CODE.KONVERSION';
--
  COMMENT ON ODV.TRP105A1
   (RP10509 IS 'Bei 1: Sprache                Bei 2: SET-Code
    Bei 3: Basis-Domäne-Code
                           ',
    RP10508 IS 'Bei 1: SET:Sprachcodes ITM=109Bei 2: SET-ITEM
    Bei 3: BASIS-Domäne-ITEM
                           ',
    RP10507 IS 'Bei 1: Beschreibung           Bei 2: =0
    Bei 3: =0      ',
    RP10506 IS 'Bei 1: SET:Bezeichnung ITM=106Bei 2: =0
    Bei 3: Attribut-ITEM
                           ',
    RP10505 IS 'Eintragstyp                   =1 für lokale Bezeichung
    =2 für Hauptkonversion        =3 für Zusatzkonversion
                           ',
    RP10504 IS 'SET:Eintagstypen       ITM=111
                   ',
    RP10503 IS 'Lokaler Code
                   ',
    RP10502 IS 'Org-Einheit lokales System
                   ',
    RP10501 IS 'Standard-Paket-ITEM (SET/RFT) -REF.TRP101
                   ');
--
  LABEL ON ODV.TRP105A1
   (RP10516 IS 'D_MUTN_TIME',
    RP10515 IS 'D_MUTN',
    RP10514 IS 'I_MUTN_PID',
    RP10513 IS 'T_DESC_SRH',
    RP10512 IS 'T_DESC',
    RP10511 IS 'D_END',
    RP10510 IS 'D_EFCTV',
    RP10509 IS 'I_CODE_2',
    RP10508 IS 'I_GRPSP_ITM_2',
    RP10507 IS 'I_CODE_1',
    RP10506 IS 'I_GRPSP_ITM_1',
    RP10505 IS 'I_ENTRY_T_CODE',
    RP10504 IS 'I_ENTRY_T_SET',
    RP10503 IS 'I_CODE_L',
    RP10502 IS 'I_ORG_UNIT',
    RP10501 IS 'I_GRPSP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP105A0 On ODV.TRP105A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP105A0
    ON ODV.TRP105A1
     (RP10501               ASC,
      RP10502               ASC,
      RP10503               ASC,
      RP10504               ASC,
      RP10505               ASC,
      RP10506               ASC,
      RP10507               ASC,
      RP10508               ASC,
      RP10509               ASC,
      RP10510               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP105A1 On ODV.TRP105A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP105A1
    ON ODV.TRP105A1
     (RP10501               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S106A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S106A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP106A1 In RP01A1L.S106A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP106A1
     (RP10601              CHAR(20) FOR SBCS DATA NOT NULL,
      RP10602              INTEGER NOT NULL,
      RP10603              INTEGER NOT NULL,
      RP10604              INTEGER NOT NULL,
      RP10605              INTEGER NOT NULL,
      RP10606              CHAR(20) FOR SBCS DATA NOT NULL,
      RP10607              DATE NOT NULL,
      RP10608              DATE NOT NULL,
      RP10609              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10610              DATE NOT NULL,
      RP10611              TIME NOT NULL,
      PRIMARY KEY (RP10601,
                   RP10602,
                   RP10603,
                   RP10604,
                   RP10605,
                   RP10606,
                   RP10607))
    IN RP01A1L.S106A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP106A1 IS 'BERECHTIGUNG (RESERVE)';
--
  COMMENT ON ODV.TRP106A1
   (RP10606 IS 'Org.Einheit lokales System
                   ',
    RP10605 IS 'Minimalpakettyp
                   ',
    RP10604 IS 'Minimalpaket-Typen     ITM=115
                   ',
    RP10603 IS 'Eintragstyp                   =10 für zentrale Typisieru
ng  =11 für lokale Typisierung
                           ',
    RP10602 IS 'SET: Eintragstyp       ITM=111
                   ',
    RP10601 IS 'Meldeposition                 -REF.TRP113
                   ');
--
  LABEL ON ODV.TRP106A1
   (RP10611 IS 'D_MUTN_TIME',
    RP10610 IS 'D_MUTN',
    RP10609 IS 'I_MUTN_PID',
    RP10608 IS 'D_END',
    RP10607 IS 'D_EFCTV',
    RP10606 IS 'I_ORG_UNIT',
    RP10605 IS 'I_MP_T_CODE',
    RP10604 IS 'I_MP_T_SET',
    RP10603 IS 'I_ENTRY_T_CODE',
    RP10602 IS 'I_ENTRY_T_SET',
    RP10601 IS 'I_RPTG_POSTN');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP106A0 On ODV.TRP106A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP106A0
    ON ODV.TRP106A1
     (RP10601               ASC,
      RP10602               ASC,
      RP10603               ASC,
      RP10604               ASC,
      RP10605               ASC,
      RP10606               ASC,
      RP10607               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S107A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S107A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP107A1 In RP01A1L.S107A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP107A1
     (RP10701              INTEGER NOT NULL,
      RP10702              INTEGER NOT NULL,
      RP10703              INTEGER NOT NULL,
      RP10704              DATE NOT NULL,
      RP10705              DATE NOT NULL,
      RP10706              INTEGER NOT NULL,
      RP10707              INTEGER NOT NULL,
      RP10708              CHAR(20) FOR SBCS DATA NOT NULL,
      RP10709              CHAR(4) FOR SBCS DATA NOT NULL,
      RP10710              INTEGER NOT NULL,
      RP10711              INTEGER NOT NULL,
      RP10712              INTEGER NOT NULL,
      RP10713              INTEGER NOT NULL,
      RP10714              DECIMAL(9, 6) NOT NULL,
      RP10715              DECIMAL(9, 6) NOT NULL,
      RP10716              DECIMAL(15, 0) NOT NULL,
      RP10717              DECIMAL(15, 0) NOT NULL,
      RP10718              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10719              DATE NOT NULL,
      RP10720              TIME NOT NULL,
      PRIMARY KEY (RP10701))
    IN RP01A1L.S107A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP107A1 IS 'MINIMAL-PAKET-POSITIONEN';
--
  COMMENT ON ODV.TRP107A1
   (RP10717 IS 'Vergleichsbetrag  ...BIS!
                   ',
    RP10716 IS 'Vergleichsbetrag  ¢VON...
                   ',
    RP10715 IS 'Erlaubte Abweichung gegenüber der Vorperiode
    -vorzeichengerecht
                           ',
    RP10714 IS 'Erlaubte Abweichung gegenüber der Vorperiode
    -ABSOLUT       ',
    RP10713 IS 'Sub-Item-Code
                   ',
    RP10712 IS 'SET: Ord.Strukturtyp   ITM=113SET: Positionstyp      ITM
=114               ',
    RP10711 IS 'Position --> Ordnungsstruktur -REF.TRP107
                   ',
    RP10710 IS 'Externe ITEM-Identifikation
                   ',
    RP10709 IS 'Sekundär. Sicherheitskategorie
                   ',
    RP10708 IS 'ITEM-Verantwortliche Org.Unit
                   ',
    RP10707 IS 'Status
                   ',
    RP10706 IS 'SET: Status            ITM=102
                   ',
    RP10703 IS 'MP-Info-Element
                   ',
    RP10702 IS 'SET: MP-Info-Elemente  ITM=112
                   ',
    RP10701 IS 'ITEM-ID fortlaufend vergeben  - 0, ¢100-Max(INT)!
                   ');
--
  LABEL ON ODV.TRP107A1
   (RP10720 IS 'D_MUTN_TIME',
    RP10719 IS 'D_MUTN',
    RP10718 IS 'I_MUTN_PID',
    RP10717 IS 'A_CTRL_UPPER_LMT',
    RP10716 IS 'A_CTRL_LOWER_LMT',
    RP10715 IS 'P_VARTN_LMT',
    RP10714 IS 'P_VARTN_LMT_ABS',
    RP10713 IS 'I_SUB_T_CODE',
    RP10712 IS 'I_SUB_T_SET',
    RP10711 IS 'I_STRCTR_ITM',
    RP10710 IS 'I_EXTNL_ITM_ID',
    RP10709 IS 'C_SCND_SCY_CTGRY',
    RP10708 IS 'I_RSPNSBL_FOR',
    RP10707 IS 'I_STATUS_CODE',
    RP10706 IS 'I_STATUS_SET',
    RP10705 IS 'D_END',
    RP10704 IS 'D_EFCTV',
    RP10703 IS 'I_GRPMP_T_CODE',
    RP10702 IS 'I_GRPMP_T_SET',
    RP10701 IS 'I_GRPMP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP107A1 On ODV.TRP107A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP107A1
    ON ODV.TRP107A1
     (RP10701               ASC,
      RP10704               ASC,
      RP10705               ASC,
      RP10711               ASC,
      RP10702               ASC,
      RP10703               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP107A2 On ODV.TRP107A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP107A2
    ON ODV.TRP107A1
     (RP10711               ASC,
      RP10704               ASC,
      RP10705               ASC,
      RP10701               ASC,
      RP10702               ASC,
      RP10703               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP107A0 On ODV.TRP107A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP107A0
    ON ODV.TRP107A1
     (RP10701               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S108A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S108A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP108A1 In RP01A1L.S108A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP108A1
     (RP10801              INTEGER NOT NULL,
      RP10802              INTEGER NOT NULL,
      RP10803              INTEGER NOT NULL,
      RP10804              INTEGER NOT NULL,
      RP10805              INTEGER NOT NULL,
      RP10806              DATE NOT NULL,
      RP10807              DATE NOT NULL,
      RP10808              INTEGER NOT NULL,
      RP10809              CHAR(72) FOR SBCS DATA NOT NULL,
      RP10810              CHAR(144) FOR SBCS DATA NOT NULL,
      RP10811              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10812              DATE NOT NULL,
      RP10813              TIME NOT NULL,
      PRIMARY KEY (RP10801,
                   RP10802,
                   RP10803,
                   RP10804,
                   RP10805,
                   RP10806,
                   RP10808))
    IN RP01A1L.S108A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP108A1 IS 'MINIMAL-PAKET-BESCHREIBUNG';
--
  COMMENT ON ODV.TRP108A1
   (RP10808 IS 'Zeilen-Id. bei Textbeschreib.
                   ',
    RP10805 IS 'Sprachcode
                   ',
    RP10804 IS 'SET:Sprachcodes        ITM=109
                   ',
    RP10803 IS 'Beschreibung
                   ',
    RP10802 IS 'SET:Bezeichnungen      ITM=106SET:Textbeschreibungen ITM
=107SET:Zusatzattribute    ITM=108
                           ',
    RP10801 IS 'Minimalpaket-ITEM             -REF.TRP107
                   ');
--
  LABEL ON ODV.TRP108A1
   (RP10813 IS 'D_MUTN_TIME',
    RP10812 IS 'D_MUTN',
    RP10811 IS 'I_MUTN_PID',
    RP10810 IS 'T_DESC_SRH',
    RP10809 IS 'T_DESC',
    RP10808 IS 'I_LINE',
    RP10807 IS 'D_END',
    RP10806 IS 'D_EFCTV',
    RP10805 IS 'I_LNG_CODE',
    RP10804 IS 'I_LNG_SET',
    RP10803 IS 'I_DESC_CODE',
    RP10802 IS 'I_DESC_SET',
    RP10801 IS 'I_GRPMP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP108A0 On ODV.TRP108A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP108A0
    ON ODV.TRP108A1
     (RP10801               ASC,
      RP10802               ASC,
      RP10803               ASC,
      RP10804               ASC,
      RP10805               ASC,
      RP10806               ASC,
      RP10808               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP108A1 On ODV.TRP108A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP108A1
    ON ODV.TRP108A1
     (RP10803               ASC,
      RP10805               ASC,
      RP10802               ASC,
      RP10810               ASC,
      RP10801               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S109A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S109A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP109A1 In RP01A1L.S109A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP109A1
     (RP10901              INTEGER NOT NULL,
      RP10902              INTEGER NOT NULL,
      RP10903              INTEGER NOT NULL,
      RP10904              INTEGER NOT NULL,
      RP10905              DATE NOT NULL,
      RP10906              DATE NOT NULL,
      RP10907              INTEGER NOT NULL,
      RP10908              CHAR(8) FOR SBCS DATA NOT NULL,
      RP10909              DATE NOT NULL,
      RP10910              TIME NOT NULL,
      PRIMARY KEY (RP10901,
                   RP10902,
                   RP10903,
                   RP10904,
                   RP10905))
    IN RP01A1L.S109A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP109A1 IS 'MINIMAL-PAKET-VERBINDUNGEN';
--
  COMMENT ON ODV.TRP109A1
   (RP10907 IS 'Verbindungs-Sequenznummer
                   ',
    RP10904 IS 'Verbindung ITEM-AN
                   ',
    RP10903 IS 'Verbindungstyp
                   ',
    RP10902 IS 'SET:Verbindungstypen   ITM=110
                   ',
    RP10901 IS 'Verbindung ITEM-VON           -REF.TRP107
                   ');
--
  LABEL ON ODV.TRP109A1
   (RP10910 IS 'D_MUTN_TIME',
    RP10909 IS 'D_MUTN',
    RP10908 IS 'I_MUTN_PID',
    RP10907 IS 'N_LINK_SEQ',
    RP10906 IS 'D_END',
    RP10905 IS 'D_EFCTV',
    RP10904 IS 'I_GRPMP_ITM_TO',
    RP10903 IS 'I_LINK_CODE',
    RP10902 IS 'I_LINK_SET',
    RP10901 IS 'I_GRPMP_ITM_FROM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP109A0 On ODV.TRP109A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP109A0
    ON ODV.TRP109A1
     (RP10901               ASC,
      RP10902               ASC,
      RP10903               ASC,
      RP10904               ASC,
      RP10905               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP109A3 On ODV.TRP109A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP109A3
    ON ODV.TRP109A1
     (RP10904               ASC,
      RP10902               ASC,
      RP10903               ASC,
      RP10901               ASC)
    USING STOGROUP GSMS
    PRIQTY 1440 SECQTY 720
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP109A2 On ODV.TRP109A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP109A2
    ON ODV.TRP109A1
     (RP10902               ASC,
      RP10903               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP109A1 On ODV.TRP109A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP109A1
    ON ODV.TRP109A1
     (RP10904               ASC,
      RP10902               ASC,
      RP10903               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S110A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S110A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP110A1 In RP01A1L.S110A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP110A1
     (RP11001              INTEGER NOT NULL,
      RP11002              INTEGER NOT NULL,
      RP11003              INTEGER NOT NULL,
      RP11004              INTEGER NOT NULL,
      RP11005              CHAR(8) FOR SBCS DATA NOT NULL,
      RP11006              DATE NOT NULL,
      RP11007              TIME NOT NULL,
      PRIMARY KEY (RP11001,
                   RP11002))
    IN RP01A1L.S110A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP110A1 IS 'MINIMAL-PAKET-SICHTEN';
--
  COMMENT ON ODV.TRP110A1
   (RP11004 IS 'Auswahl-Wertebereich          -REF.TRP101 (SET/FKT/UGR/H
GR)                ',
    RP11003 IS 'Kolonnen-Sequenznummer
                   ',
    RP11002 IS 'Selektiertes Feld             -REF.TRP101
                   ',
    RP11001 IS 'Ausscheidungs-/Zuordnungssicht-REF.TRP107
                   ');
--
  LABEL ON ODV.TRP110A1
   (RP11007 IS 'D_MUTN_TIME',
    RP11006 IS 'D_MUTN',
    RP11005 IS 'I_MUTN_PID',
    RP11004 IS 'I_SLCTN_DOMN',
    RP11003 IS 'N_COL_SEQ',
    RP11002 IS 'I_FLD_ITM',
    RP11001 IS 'I_VIEW_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP110A0 On ODV.TRP110A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP110A0
    ON ODV.TRP110A1
     (RP11001               ASC,
      RP11002               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP110A1 On ODV.TRP110A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP110A1
    ON ODV.TRP110A1
     (RP11002               ASC,
      RP11003               ASC,
      RP11001               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S111A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S111A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP111A1 In RP01A1L.S111A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP111A1
     (RP11101              INTEGER NOT NULL,
      RP11102              INTEGER NOT NULL,
      RP11103              INTEGER NOT NULL,
      RP11104              DATE NOT NULL,
      RP11105              DATE NOT NULL,
      RP11106              INTEGER NOT NULL,
      RP11107              INTEGER NOT NULL,
      RP11108              INTEGER NOT NULL,
      RP11109              INTEGER NOT NULL,
      RP11110              INTEGER NOT NULL,
      RP11111              INTEGER NOT NULL,
      RP11112              INTEGER NOT NULL,
      RP11113              CHAR(8) FOR SBCS DATA NOT NULL,
      RP11114              DATE NOT NULL,
      RP11115              TIME NOT NULL,
      PRIMARY KEY (RP11101,
                   RP11102,
                   RP11103))
    IN RP01A1L.S111A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP111A1 IS 'MINIMAL-PAKET-SELEKTIONEN';
--
  COMMENT ON ODV.TRP111A1
   (RP11112 IS 'Selektierter Wert
                   ',
    RP11111 IS 'Selektions Grundmenge         -REF.TRP101 (SET/RFT/UGR)
                   ',
    RP11110 IS 'Eintragstyp                   =4 Selektionwert
    =5 Restwert:=Selektion        =6 Restwert:=Warnung          =7 Restw
ert:=Fehler                ',
    RP11109 IS 'SET:Eintragstyp        ITM=111
                   ',
    RP11108 IS 'Zeilen-Sequenznummer
                   ',
    RP11107 IS 'Status
                   ',
    RP11106 IS 'SET: Status            ITM=102
                   ',
    RP11103 IS 'Selektions-Identifikations-Nr.
                   ',
    RP11102 IS 'Selektiertes Feld             -REF.TRP110
                   ',
    RP11101 IS 'Ausscheidungs-/Zuordnungssicht-REF.TRP110
                   ');
--
  LABEL ON ODV.TRP111A1
   (RP11115 IS 'D_MUTN_TIME',
    RP11114 IS 'D_MUTN',
    RP11113 IS 'I_MUTN_PID',
    RP11112 IS 'I_CODE',
    RP11111 IS 'I_GRPSP_ITM',
    RP11110 IS 'I_ENTRY_T_CODE',
    RP11109 IS 'I_ENTRY_T_SET',
    RP11108 IS 'N_ROW_SEQ',
    RP11107 IS 'I_STATUS_CODE',
    RP11106 IS 'I_STATUS_SET',
    RP11105 IS 'D_END',
    RP11104 IS 'D_EFCTV',
    RP11103 IS 'I_SLCTN',
    RP11102 IS 'I_FLD_ITM',
    RP11101 IS 'I_VIEW_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP111A0 On ODV.TRP111A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP111A0
    ON ODV.TRP111A1
     (RP11101               ASC,
      RP11102               ASC,
      RP11103               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP111A2 On ODV.TRP111A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP111A2
    ON ODV.TRP111A1
     (RP11101               ASC,
      RP11111               ASC,
      RP11112               ASC,
      RP11104               ASC,
      RP11105               ASC,
      RP11102               ASC,
      RP11103               ASC,
      RP11109               ASC,
      RP11110               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP111A1 On ODV.TRP111A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP111A1
    ON ODV.TRP111A1
     (RP11101               ASC,
      RP11102               ASC,
      RP11108               ASC,
      RP11104               ASC,
      RP11105               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S112A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S112A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP112A1 In RP01A1L.S112A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP112A1
     (RP11201              INTEGER NOT NULL,
      RP11202              INTEGER NOT NULL,
      RP11203              INTEGER NOT NULL,
      RP11204              INTEGER NOT NULL,
      PRIMARY KEY (RP11201,
                   RP11202,
                   RP11203,
                   RP11204))
    IN RP01A1L.S112A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP112A1 IS 'MINIMAL-PAKET-DAVONWERTE';
--
  COMMENT ON ODV.TRP112A1
   (RP11204 IS 'Selektions-Identifikations-Nr.-REF.TRP111
                   ',
    RP11203 IS 'Selektiertes Feld             -REF.TRP111
                   ',
    RP11202 IS 'Davonwert Identifikations-Nr. innerhalb einer Sicht ¢1-n
!                  ',
    RP11201 IS 'Ausscheidungssicht            -REF.TRP111
                   ');
--
  LABEL ON ODV.TRP112A1
   (RP11204 IS 'I_SLCTN',
    RP11203 IS 'I_FLD_ITM',
    RP11202 IS 'I_NMBR_OF_WCH',
    RP11201 IS 'I_VIEW_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP112A0 On ODV.TRP112A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP112A0
    ON ODV.TRP112A1
     (RP11201               ASC,
      RP11202               ASC,
      RP11203               ASC,
      RP11204               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP112A1 On ODV.TRP112A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP112A1
    ON ODV.TRP112A1
     (RP11201               ASC,
      RP11203               ASC,
      RP11204               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S113A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S113A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP113A1 In RP01A1L.S113A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP113A1
     (RP11301              CHAR(20) FOR SBCS DATA NOT NULL,
      RP11302              INTEGER NOT NULL,
      RP11303              INTEGER NOT NULL,
      RP11304              INTEGER NOT NULL,
      RP11305              INTEGER NOT NULL,
      RP11306              INTEGER NOT NULL,
      CONSTRAINT RP11301
      PRIMARY KEY (RP11301))
    IN RP01A1L.S113A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP113A1 IS 'MINIMAL-PAKET-MELDEPOSITION';
--
  COMMENT ON ODV.TRP113A1
   (RP11306 IS 'Eintragstyp                   =8 für zugeordneter Wert
    =9 für ausgeschiedener Wert
                           ',
    RP11305 IS 'SET: Eintragstypen     ITM=111
                   ',
    RP11304 IS 'Davonwert Identifikations-Nr. innerhalb einer Sicht ¢1-n
!                  ',
    RP11303 IS 'Ausscheidungssicht            -REF.TRP107
                   ',
    RP11302 IS 'Abstimm-/Ordnungsposition     -REF.TRP107
                   ',
    RP11301 IS 'Meldeposition
                   ');
--
  LABEL ON ODV.TRP113A1
   (RP11306 IS 'I_ENTRY_T_CODE',
    RP11305 IS 'I_ENTRY_T_SET',
    RP11304 IS 'I_NMBR_OF_WCH',
    RP11303 IS 'I_VIEW_ITM',
    RP11302 IS 'I_POSTN_ITM',
    RP11301 IS 'I_RPTG_POSTN');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP113A2 On ODV.TRP113A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP113A2
    ON ODV.TRP113A1
     (RP11303               ASC,
      RP11302               ASC,
      RP11304               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP113A0 On ODV.TRP113A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP113A0
    ON ODV.TRP113A1
     (RP11301               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP113A1 On ODV.TRP113A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP113A1
    ON ODV.TRP113A1
     (RP11302               ASC,
      RP11303               ASC,
      RP11304               ASC,
      RP11301               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S114A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S114A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP114A1 In RP01A1L.S114A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP114A1
     (RP11401              INTEGER NOT NULL,
      RP11402              INTEGER NOT NULL,
      RP11403              INTEGER NOT NULL,
      RP11404              INTEGER NOT NULL,
      RP11405              DATE NOT NULL,
      RP11406              DATE NOT NULL,
      RP11407              CHAR(8) FOR SBCS DATA NOT NULL,
      RP11408              DATE NOT NULL,
      RP11409              TIME NOT NULL,
      PRIMARY KEY (RP11401,
                   RP11402,
                   RP11403,
                   RP11404,
                   RP11405))
    IN RP01A1L.S114A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP114A1 IS 'MINIMAL-PAKET-TYPISIERUNG';
--
  COMMENT ON ODV.TRP114A1
   (RP11404 IS 'Selektions-Identifikations-NR.-REF.TRP111
                   ',
    RP11403 IS 'Selektiertes Feld             -REF.TRP111
                   ',
    RP11402 IS 'Zuordnungssicht               -REF.TRP111
                   ',
    RP11401 IS 'Abstimm-/Ordnungsposition     -REF.TRP107
                   ');
--
  LABEL ON ODV.TRP114A1
   (RP11409 IS 'D_MUTN_TIME',
    RP11408 IS 'D_MUTN',
    RP11407 IS 'I_MUTN_PID',
    RP11406 IS 'D_END',
    RP11405 IS 'D_EFCTV',
    RP11404 IS 'I_SLCTN',
    RP11403 IS 'I_FLD_ITM',
    RP11402 IS 'I_VIEW_ITM',
    RP11401 IS 'I_POSTN_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP114A0 On ODV.TRP114A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP114A0
    ON ODV.TRP114A1
     (RP11401               ASC,
      RP11402               ASC,
      RP11403               ASC,
      RP11404               ASC,
      RP11405               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP114A2 On ODV.TRP114A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP114A2
    ON ODV.TRP114A1
     (RP11402               ASC,
      RP11403               ASC,
      RP11404               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S115A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S115A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP115A1 In RP01A1L.S115A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP115A1
     (RP11501              INTEGER NOT NULL,
      RP11502              INTEGER NOT NULL,
      RP11503              INTEGER NOT NULL,
      RP11504              INTEGER NOT NULL,
      RP11505              INTEGER NOT NULL,
      RP11506              INTEGER NOT NULL,
      RP11507              INTEGER NOT NULL,
      RP11508              INTEGER NOT NULL,
      RP11509              DATE NOT NULL,
      RP11510              DATE NOT NULL,
      RP11511              CHAR(8) FOR SBCS DATA NOT NULL,
      RP11512              DATE NOT NULL,
      RP11513              TIME NOT NULL,
      RP11514              INTEGER NOT NULL WITH DEFAULT,
      PRIMARY KEY (RP11501,
                   RP11502,
                   RP11503,
                   RP11504,
                   RP11505,
                   RP11506,
                   RP11507,
                   RP11508,
                   RP11509))
    IN RP01A1L.S115A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP115A1 IS 'STEUERTABELLE BEWIRTSCHAFTUNG';
--
  COMMENT ON ODV.TRP115A1
   (RP11508 IS 'Verbindungstyp
                   ',
    RP11507 IS 'SET: Verbindungstypen  ITM=110
                   ',
    RP11506 IS 'AN-CODE                       -REF.Default
    -REF.TRP104                   -REF.Extern.RFT.Code
                           ',
    RP11505 IS 'AN-ITEM                       -REF.TRP101
    -REF.TRP107    ',
    RP11504 IS 'VON-Code                      -REF.Default
    -REF.TRP104                   -REF.Extern.RFT.Code
                           ',
    RP11503 IS 'VON-ITEM                      -REF.TRP101
    -REF.TRP107    ',
    RP11502 IS 'Steuerelement
                   ',
    RP11501 IS 'SET:Steuerelemente     ITM=100
                   ');
--
  LABEL ON ODV.TRP115A1
   (RP11514 IS 'N_LINK_SEQ',
    RP11513 IS 'D_MUTN_TIME',
    RP11512 IS 'D_MUTN',
    RP11511 IS 'I_MUTN_PID',
    RP11510 IS 'D_END',
    RP11509 IS 'D_EFCTV',
    RP11508 IS 'I_LINK_CODE',
    RP11507 IS 'I_LINK_SET',
    RP11506 IS 'I_CODE_TO',
    RP11505 IS 'I_ITM_TO',
    RP11504 IS 'I_CODE_FROM',
    RP11503 IS 'I_ITM_FROM',
    RP11502 IS 'I_PROC_CODE',
    RP11501 IS 'I_PROC_SET');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP115A0 On ODV.TRP115A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP115A0
    ON ODV.TRP115A1
     (RP11501               ASC,
      RP11502               ASC,
      RP11503               ASC,
      RP11504               ASC,
      RP11505               ASC,
      RP11506               ASC,
      RP11507               ASC,
      RP11508               ASC,
      RP11509               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP115A1 On ODV.TRP115A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP115A1
    ON ODV.TRP115A1
     (RP11501               ASC,
      RP11502               ASC,
      RP11505               ASC,
      RP11506               ASC,
      RP11507               ASC,
      RP11508               ASC,
      RP11514               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S116A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S116A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP116A1 In RP01A1L.S116A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP116A1
     (RP11601              CHAR(30) FOR SBCS DATA NOT NULL,
      RP11602              CHAR(30) FOR SBCS DATA NOT NULL,
      RP11603              INTEGER NOT NULL,
      RP11604              CHAR(72) FOR SBCS DATA NOT NULL,
      RP11605              CHAR(72) FOR SBCS DATA NOT NULL,
      RP11606              CHAR(72) FOR SBCS DATA NOT NULL,
      RP11607              CHAR(72) FOR SBCS DATA NOT NULL,
      RP11608              CHAR(72) FOR SBCS DATA NOT NULL,
      RP11609              INTEGER NOT NULL,
      RP11610              VARCHAR(3000) FOR SBCS DATA NOT NULL,
      PRIMARY KEY (RP11601,
                   RP11602,
                   RP11603))
    IN RP01A1L.S116A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP116A1 IS 'DYN.SQL-STEUERUNG-ONLINE';
--
  LABEL ON ODV.TRP116A1
   (RP11610 IS 'V_SQL_STMT',
    RP11609 IS 'I_GRPSP_ITM',
    RP11608 IS 'T_TITEL_S',
    RP11607 IS 'T_TITEL_E',
    RP11606 IS 'T_TITEL_I',
    RP11605 IS 'T_TITEL_F',
    RP11604 IS 'T_TITEL_D',
    RP11603 IS 'I_LAUF_NR',
    RP11602 IS 'I_FELD_ID',
    RP11601 IS 'I_BILD_ID');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP116A0 On ODV.TRP116A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP116A0
    ON ODV.TRP116A1
     (RP11601               ASC,
      RP11602               ASC,
      RP11603               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S117A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S117A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP117A1 In RP01A1L.S117A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP117A1
     (RP117001             INTEGER NOT NULL,
      RP117002             INTEGER NOT NULL,
      RP117003             INTEGER NOT NULL,
      RP117004             INTEGER NOT NULL,
      RP117005             INTEGER NOT NULL,
      RP117006             INTEGER NOT NULL,
      RP117007             INTEGER NOT NULL,
      RP117008             DATE NOT NULL,
      RP117009             DATE NOT NULL,
      RP117010             INTEGER NOT NULL,
      RP117011             INTEGER NOT NULL,
      RP117012             INTEGER NOT NULL,
      RP117013             CHAR(8) FOR SBCS DATA NOT NULL,
      RP117014             DATE NOT NULL,
      RP117015             TIME NOT NULL,
      PRIMARY KEY (RP117001,
                   RP117002,
                   RP117003,
                   RP117004,
                   RP117005,
                   RP117006,
                   RP117007,
                   RP117008))
    IN RP01A1L.S117A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP117A1 IS 'MINIMALPAKET-ERHEBUNGS-STEUER.';
--
  LABEL ON ODV.TRP117A1
   (RP117015 IS 'D_MUTN_TIME',
    RP117014 IS 'D_MUTN',
    RP117013 IS 'I_MUTN_PID',
    RP117012 IS 'I_PERIOD_CODE',
    RP117011 IS 'I_PERIOD_SET',
    RP117010 IS 'N_LINK_SEQ',
    RP117009 IS 'D_END',
    RP117008 IS 'D_EFCTV',
    RP117007 IS 'I_MIN_PACK_T',
    RP117006 IS 'I_MIN_PACK_SET',
    RP117005 IS 'I_VIEW_ITM',
    RP117004 IS 'I_POSTN_ITM',
    RP117003 IS 'I_LINK_CODE',
    RP117002 IS 'I_LINK_SET',
    RP117001 IS 'I_CTRL_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP117A0 On ODV.TRP117A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP117A0
    ON ODV.TRP117A1
     (RP117001              ASC,
      RP117002              ASC,
      RP117003              ASC,
      RP117004              ASC,
      RP117005              ASC,
      RP117006              ASC,
      RP117007              ASC,
      RP117008              ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP117A4 On ODV.TRP117A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP117A4
    ON ODV.TRP117A1
     (RP117004              ASC,
      RP117005              ASC,
      RP117006              ASC,
      RP117007              ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP117A2 On ODV.TRP117A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP117A2
    ON ODV.TRP117A1
     (RP117006              ASC,
      RP117007              ASC,
      RP117011              ASC,
      RP117012              ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP117A3 On ODV.TRP117A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP117A3
    ON ODV.TRP117A1
     (RP117005              ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP117A1 On ODV.TRP117A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP117A1
    ON ODV.TRP117A1
     (RP117004              ASC,
      RP117012              ASC,
      RP117011              ASC,
      RP117001              ASC,
      RP117002              ASC,
      RP117003              ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S118A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S118A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP118A1 In RP01A1L.S118A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP118A1
     (RP11801              INTEGER NOT NULL,
      RP11802              INTEGER NOT NULL,
      RP11803              INTEGER NOT NULL,
      RP11804              DATE NOT NULL,
      RP11805              DATE NOT NULL,
      RP11806              INTEGER NOT NULL,
      RP11807              CHAR(8) FOR SBCS DATA NOT NULL,
      RP11808              DATE NOT NULL,
      RP11809              TIME NOT NULL,
      PRIMARY KEY (RP11801,
                   RP11802,
                   RP11803))
    IN RP01A1L.S118A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP118A1 IS 'CONVERSION RULES';
--
  COMMENT ON COLUMN ODV.TRP118A1.RP11801
    IS 'Convertible Set Item, zB 124
           ';
--
  LABEL ON ODV.TRP118A1
   (RP11809 IS 'D_MUTN_TIME',
    RP11808 IS 'D_MUTN',
    RP11807 IS 'I_MUTN_PID',
    RP11806 IS 'N_SEQ',
    RP11805 IS 'D_END',
    RP11804 IS 'D_EFCTV',
    RP11803 IS 'I_CONV_RULE_CODE',
    RP11802 IS 'I_CONV_RULE_SET',
    RP11801 IS 'I_GRPSP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP118A0 On ODV.TRP118A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP118A0
    ON ODV.TRP118A1
     (RP11801               ASC,
      RP11802               ASC,
      RP11803               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S119A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S119A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP119A1 In RP01A1L.S119A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP119A1
     (RP11901              INTEGER NOT NULL,
      RP11902              INTEGER NOT NULL,
      RP11903              INTEGER NOT NULL,
      RP11904              CHAR(20) FOR SBCS DATA NOT NULL,
      RP11905              DATE NOT NULL,
      RP11906              DATE NOT NULL,
      RP11907              CHAR(20) FOR SBCS DATA NOT NULL,
      RP11908              CHAR(8) FOR SBCS DATA NOT NULL,
      RP11909              DATE NOT NULL,
      RP11910              TIME NOT NULL,
      PRIMARY KEY (RP11901,
                   RP11902,
                   RP11903,
                   RP11904))
    IN RP01A1L.S119A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP119A1 IS 'CONVERSION CODES';
--
  COMMENT ON ODV.TRP119A1
   (RP11907 IS 'Fremdcode wie geliefert
                   ',
    RP11904 IS 'Fremdcode normalisiert
                   ',
    RP11901 IS 'Convertible Set Item, zB 124
                   ');
--
  LABEL ON ODV.TRP119A1
   (RP11910 IS 'D_MUTN_TIME',
    RP11909 IS 'D_MUTN',
    RP11908 IS 'I_MUTN_PID',
    RP11907 IS 'I_CODE_L_EXT',
    RP11906 IS 'D_END',
    RP11905 IS 'D_EFCTV',
    RP11904 IS 'I_CODE_L',
    RP11903 IS 'I_CONV_RULE_CODE',
    RP11902 IS 'I_CONV_RULE_SET',
    RP11901 IS 'I_GRPSP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP119A0 On ODV.TRP119A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP119A0
    ON ODV.TRP119A1
     (RP11901               ASC,
      RP11902               ASC,
      RP11903               ASC,
      RP11904               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S120A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S120A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP120A1 In RP01A1L.S120A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP120A1
     (RP12001              INTEGER NOT NULL,
      RP12002              INTEGER NOT NULL,
      RP12003              INTEGER NOT NULL,
      RP12004              CHAR(20) FOR SBCS DATA NOT NULL,
      RP12005              INTEGER NOT NULL,
      RP12006              INTEGER NOT NULL,
      RP12007              INTEGER NOT NULL,
      RP12008              INTEGER NOT NULL,
      RP12009              DATE NOT NULL,
      RP12010              DATE NOT NULL,
      RP12011              CHAR(72) FOR SBCS DATA NOT NULL,
      RP12012              CHAR(72) FOR SBCS DATA NOT NULL,
      RP12013              CHAR(8) FOR SBCS DATA NOT NULL,
      RP12014              DATE NOT NULL,
      RP12015              TIME NOT NULL,
      PRIMARY KEY (RP12001,
                   RP12002,
                   RP12003,
                   RP12004,
                   RP12005,
                   RP12006,
                   RP12007,
                   RP12008,
                   RP12009))
    IN RP01A1L.S120A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP120A1 IS 'CONVERSION DESCRIPTIONS';
--
  COMMENT ON ODV.TRP120A1
   (RP12004 IS 'Fremdcode normalisiert
                   ',
    RP12001 IS 'Convertible Set, zB 124
                   ');
--
  LABEL ON ODV.TRP120A1
   (RP12015 IS 'D_MUTN_TIME',
    RP12014 IS 'D_MUTN',
    RP12013 IS 'I_MUTN_PID',
    RP12012 IS 'T_DESC_SRH',
    RP12011 IS 'T_DESC',
    RP12010 IS 'D_END',
    RP12009 IS 'D_EFCTV',
    RP12008 IS 'I_LNG_CODE',
    RP12007 IS 'I_LNG_SET',
    RP12006 IS 'I_DESC_CODE',
    RP12005 IS 'I_DESC_SET',
    RP12004 IS 'I_CODE_L',
    RP12003 IS 'I_CONV_RULE_CODE',
    RP12002 IS 'I_CONV_RULE_SET',
    RP12001 IS 'I_GRPSP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP120A0 On ODV.TRP120A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP120A0
    ON ODV.TRP120A1
     (RP12001               ASC,
      RP12002               ASC,
      RP12003               ASC,
      RP12004               ASC,
      RP12005               ASC,
      RP12006               ASC,
      RP12007               ASC,
      RP12008               ASC,
      RP12009               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S121A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S121A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP121A1 In RP01A1L.S121A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP121A1
     (RP12101              INTEGER NOT NULL,
      RP12102              INTEGER NOT NULL,
      RP12103              INTEGER NOT NULL,
      RP12104              CHAR(20) FOR SBCS DATA NOT NULL,
      RP12105              INTEGER NOT NULL,
      RP12106              INTEGER NOT NULL,
      RP12107              DATE NOT NULL,
      RP12108              DATE NOT NULL,
      RP12109              INTEGER NOT NULL,
      RP12110              CHAR(8) FOR SBCS DATA NOT NULL,
      RP12111              DATE NOT NULL,
      RP12112              TIME NOT NULL,
      PRIMARY KEY (RP12101,
                   RP12102,
                   RP12103,
                   RP12104,
                   RP12105,
                   RP12106,
                   RP12107))
    IN RP01A1L.S121A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP121A1 IS 'CONVERSION MAPPING';
--
  COMMENT ON ODV.TRP121A1
   (RP12109 IS 'Rück-Konv, 1=Default, 2=Other
                   ',
    RP12106 IS 'Group Standard Code
                   ',
    RP12105 IS 'Stimmt mit I_GRPSP_ITM überein
                   ',
    RP12104 IS 'Fremdcode normalisiert
                   ',
    RP12101 IS 'Convertible Set, zB 124
                   ');
--
  LABEL ON ODV.TRP121A1
   (RP12112 IS 'D_MUTN_TIME',
    RP12111 IS 'D_MUTN',
    RP12110 IS 'I_MUTN_PID',
    RP12109 IS 'F_CONV_DFLT',
    RP12108 IS 'D_END',
    RP12107 IS 'D_EFCTV',
    RP12106 IS 'I_CONV_TO_CODE',
    RP12105 IS 'I_CONV_TO_SET',
    RP12104 IS 'I_CODE_L',
    RP12103 IS 'I_CONV_RULE_CODE',
    RP12102 IS 'I_CONV_RULE_SET',
    RP12101 IS 'I_GRPSP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP121A0 On ODV.TRP121A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP121A0
    ON ODV.TRP121A1
     (RP12101               ASC,
      RP12102               ASC,
      RP12103               ASC,
      RP12104               ASC,
      RP12105               ASC,
      RP12106               ASC,
      RP12107               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S122A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S122A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP122A1 In RP01A1L.S122A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP122A1
     (RP12201              INTEGER NOT NULL,
      RP12202              INTEGER NOT NULL,
      RP12203              INTEGER NOT NULL,
      RP12204              INTEGER NOT NULL,
      RP12205              INTEGER NOT NULL,
      RP12206              DATE NOT NULL,
      RP12207              DATE NOT NULL,
      RP12208              INTEGER NOT NULL,
      RP12209              CHAR(8) FOR SBCS DATA NOT NULL,
      RP12210              DATE NOT NULL,
      RP12211              TIME NOT NULL,
      PRIMARY KEY (RP12201,
                   RP12202,
                   RP12203,
                   RP12204,
                   RP12205,
                   RP12206))
    IN RP01A1L.S122A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP122A1 IS 'CONVERSION SETUP';
--
  COMMENT ON ODV.TRP122A1
   (RP12203 IS 'Convertible Set, zB 124
                   ',
    RP12202 IS 'Grp Std Code der Unit
                   ',
    RP12201 IS 'Grp Std Set Units, zZ 50102
                   ');
--
  LABEL ON ODV.TRP122A1
   (RP12211 IS 'D_MUTN_TIME',
    RP12210 IS 'D_MUTN',
    RP12209 IS 'I_MUTN_PID',
    RP12208 IS 'N_SEQ',
    RP12207 IS 'D_END',
    RP12206 IS 'D_EFCTV',
    RP12205 IS 'I_CONV_RULE_CODE',
    RP12204 IS 'I_CONV_RULE_SET',
    RP12203 IS 'I_GRPSP_ITM',
    RP12202 IS 'I_CONV_UNIT_CODE',
    RP12201 IS 'I_CONV_UNIT_SET');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP122A0 On ODV.TRP122A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP122A0
    ON ODV.TRP122A1
     (RP12201               ASC,
      RP12202               ASC,
      RP12203               ASC,
      RP12204               ASC,
      RP12205               ASC,
      RP12206               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP122A1 On ODV.TRP122A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP122A1
    ON ODV.TRP122A1
     (RP12203               ASC,
      RP12204               ASC,
      RP12205               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S131A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S131A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP131A1 In RP01A1L.S131A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP131A1
     (RP13101              INTEGER NOT NULL,
      RP13102              INTEGER NOT NULL,
      RP13103              INTEGER NOT NULL,
      RP13104              DATE NOT NULL,
      RP13105              DATE NOT NULL,
      RP13106              DATE NOT NULL,
      RP13107              DATE NOT NULL,
      RP13108              INTEGER NOT NULL,
      RP13109              CHAR(8) FOR SBCS DATA NOT NULL,
      RP13110              DATE NOT NULL,
      RP13111              TIME NOT NULL,
      CONSTRAINT RP13101
      PRIMARY KEY (RP13101,
                   RP13102,
                   RP13103))
    IN RP01A1L.S131A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP131A1 IS 'REQUIREMENTS';
--
  COMMENT ON ODV.TRP131A1
   (RP13111 IS 'Mutations-Zeit',
    RP13110 IS 'Mutations-Datum',
    RP13109 IS 'Mutations-Referenz',
    RP13108 IS 'Haupt-Sortierung',
    RP13107 IS 'Productive End Date',
    RP13106 IS 'Productive Effective Date',
    RP13105 IS 'End Date',
    RP13104 IS 'Effective Date',
    RP13103 IS 'Value Type Code',
    RP13102 IS 'View Item',
    RP13101 IS 'Structure Item');
--
  LABEL ON ODV.TRP131A1
   (RP13111 IS 'D_MUTN_TIME',
    RP13110 IS 'D_MUTN',
    RP13109 IS 'I_MUTN_PID',
    RP13108 IS 'N_SEQ',
    RP13107 IS 'D_PROD_END',
    RP13106 IS 'D_PROD_EFCTV',
    RP13105 IS 'D_END',
    RP13104 IS 'D_EFCTV',
    RP13103 IS 'I_VAL_T',
    RP13102 IS 'I_VIEW_ITM',
    RP13101 IS 'I_STRCTR_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP131A0 On ODV.TRP131A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP131A0
    ON ODV.TRP131A1
     (RP13101               ASC,
      RP13102               ASC,
      RP13103               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP131A2 On ODV.TRP131A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP131A2
    ON ODV.TRP131A1
     (RP13101               ASC,
      RP13102               ASC,
      RP13103               ASC,
      RP13106               ASC,
      RP13107               ASC,
      RP13108               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP131A1 On ODV.TRP131A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP131A1
    ON ODV.TRP131A1
     (RP13101               ASC,
      RP13102               ASC,
      RP13103               ASC,
      RP13104               ASC,
      RP13105               ASC,
      RP13108               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S132A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S132A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP132A1 In RP01A1L.S132A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP132A1
     (RP13201              INTEGER NOT NULL,
      RP13202              INTEGER NOT NULL,
      RP13203              INTEGER NOT NULL,
      RP13204              INTEGER NOT NULL,
      RP13205              INTEGER NOT NULL,
      RP13206              INTEGER NOT NULL,
      RP13207              INTEGER NOT NULL,
      RP13208              DATE NOT NULL,
      RP13209              DATE NOT NULL,
      RP13210              CHAR(72) FOR SBCS DATA NOT NULL,
      RP13211              CHAR(72) FOR SBCS DATA NOT NULL,
      RP13212              CHAR(8) FOR SBCS DATA NOT NULL,
      RP13213              DATE NOT NULL,
      RP13214              TIME NOT NULL,
      CONSTRAINT RP13201
      PRIMARY KEY (RP13201,
                   RP13202,
                   RP13203,
                   RP13204,
                   RP13205,
                   RP13206,
                   RP13207,
                   RP13208))
    IN RP01A1L.S132A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP132A1 IS 'REQUIREMENT TEXT ATTRIBUTES';
--
  COMMENT ON ODV.TRP132A1
   (RP13214 IS 'Mutations-Zeit',
    RP13213 IS 'Mutations-Datum',
    RP13212 IS 'Mutations-Referenz',
    RP13211 IS 'Description Search',
    RP13210 IS 'Description Text',
    RP13209 IS 'End Date',
    RP13208 IS 'Effective Date',
    RP13207 IS 'Assignment Code',
    RP13206 IS 'Assignment Set',
    RP13205 IS 'Description Code',
    RP13204 IS 'Description Set',
    RP13203 IS 'Value Type Code',
    RP13202 IS 'View Item',
    RP13201 IS 'Structure Item');
--
  LABEL ON ODV.TRP132A1
   (RP13214 IS 'D_MUTN_TIME',
    RP13213 IS 'D_MUTN',
    RP13212 IS 'I_MUTN_PID',
    RP13211 IS 'T_DESC_SRH',
    RP13210 IS 'T_DESC',
    RP13209 IS 'D_END',
    RP13208 IS 'D_EFCTV',
    RP13207 IS 'I_ASGN_CODE',
    RP13206 IS 'I_ASGN_SET',
    RP13205 IS 'I_DESC_CODE',
    RP13204 IS 'I_DESC_SET',
    RP13203 IS 'I_VAL_T',
    RP13202 IS 'I_VIEW_ITM',
    RP13201 IS 'I_STRCTR_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP132A0 On ODV.TRP132A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP132A0
    ON ODV.TRP132A1
     (RP13201               ASC,
      RP13202               ASC,
      RP13203               ASC,
      RP13204               ASC,
      RP13205               ASC,
      RP13206               ASC,
      RP13207               ASC,
      RP13208               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S133A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S133A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP133A1 In RP01A1L.S133A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP133A1
     (RP13301              INTEGER NOT NULL,
      RP13302              INTEGER NOT NULL,
      RP13303              INTEGER NOT NULL,
      RP13304              INTEGER NOT NULL,
      RP13305              INTEGER NOT NULL,
      RP13306              INTEGER NOT NULL,
      RP13307              INTEGER NOT NULL,
      RP13308              DATE NOT NULL,
      RP13309              DATE NOT NULL,
      RP13310              INTEGER NOT NULL,
      RP13311              INTEGER NOT NULL,
      RP13312              INTEGER NOT NULL,
      RP13313              CHAR(12) FOR SBCS DATA NOT NULL,
      RP13314              DECIMAL(15, 3) NOT NULL,
      RP13315              CHAR(8) FOR SBCS DATA NOT NULL,
      RP13316              DATE NOT NULL,
      RP13317              TIME NOT NULL,
      CONSTRAINT RP13301
      PRIMARY KEY (RP13301,
                   RP13302,
                   RP13303,
                   RP13304,
                   RP13305,
                   RP13306,
                   RP13307,
                   RP13308))
    IN RP01A1L.S133A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP133A1 IS 'REQ. REFERENCE ATTRIBUTES';
--
  COMMENT ON ODV.TRP133A1
   (RP13317 IS 'Mutations-Zeit',
    RP13316 IS 'Mutations-Datum',
    RP13315 IS 'Mutations-Referenz',
    RP13314 IS 'Deviation tolerance',
    RP13313 IS 'External Reference Text',
    RP13312 IS 'Reference Code',
    RP13311 IS 'Reference Set',
    RP13310 IS 'Sort Sequence',
    RP13309 IS 'End Date',
    RP13308 IS 'Effective Date',
    RP13307 IS 'Assignment Code',
    RP13306 IS 'Assignment Set',
    RP13305 IS 'Attribute Code',
    RP13304 IS 'Attribute Set',
    RP13303 IS 'Value Type Code',
    RP13302 IS 'View Item',
    RP13301 IS 'Structure Item');
--
  LABEL ON ODV.TRP133A1
   (RP13317 IS 'D_MUTN_TIME',
    RP13316 IS 'D_MUTN',
    RP13315 IS 'I_MUTN_PID',
    RP13314 IS 'A_TOLRNC',
    RP13313 IS 'I_CODE_EXT',
    RP13312 IS 'I_REF_CODE',
    RP13311 IS 'I_REF_SET',
    RP13310 IS 'N_SEQ',
    RP13309 IS 'D_END',
    RP13308 IS 'D_EFCTV',
    RP13307 IS 'I_ASGN_CODE',
    RP13306 IS 'I_ASGN_SET',
    RP13305 IS 'I_ATTR_CODE',
    RP13304 IS 'I_ATTR_SET',
    RP13303 IS 'I_VAL_T',
    RP13302 IS 'I_VIEW_ITM',
    RP13301 IS 'I_STRCTR_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP133A0 On ODV.TRP133A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP133A0
    ON ODV.TRP133A1
     (RP13301               ASC,
      RP13302               ASC,
      RP13303               ASC,
      RP13304               ASC,
      RP13305               ASC,
      RP13306               ASC,
      RP13307               ASC,
      RP13308               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S143A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S143A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP143A1 In RP01A1L.S143A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP143A1
     (RP14301              INTEGER NOT NULL,
      RP14302              INTEGER NOT NULL,
      RP14303              INTEGER NOT NULL,
      RP14304              INTEGER NOT NULL,
      RP14305              INTEGER NOT NULL,
      RP14306              INTEGER NOT NULL,
      RP14307              INTEGER NOT NULL,
      RP14308              DATE NOT NULL,
      RP14309              DATE NOT NULL,
      RP14310              INTEGER NOT NULL,
      RP14311              INTEGER NOT NULL,
      RP14312              INTEGER NOT NULL,
      RP14313              CHAR(12) FOR SBCS DATA NOT NULL,
      RP14314              CHAR(8) FOR SBCS DATA NOT NULL,
      RP14315              DATE NOT NULL,
      RP14316              TIME NOT NULL,
      CONSTRAINT RP14301
      PRIMARY KEY (RP14301,
                   RP14302,
                   RP14303,
                   RP14304,
                   RP14305,
                   RP14306,
                   RP14307,
                   RP14308))
    IN RP01A1L.S143A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP143A1 IS 'POS+VLI REFERENCE ATTRIBUTES';
--
  COMMENT ON ODV.TRP143A1
   (RP14316 IS 'Mutations-Zeit',
    RP14315 IS 'Mutations-Datum',
    RP14314 IS 'Mutations-Referenz',
    RP14313 IS 'External Reference Text',
    RP14312 IS 'Reference Code',
    RP14311 IS 'Reference Set',
    RP14310 IS 'Sort Sequence',
    RP14309 IS 'End Date',
    RP14308 IS 'Effective Date',
    RP14307 IS 'Assignment Code',
    RP14306 IS 'Assignment Set',
    RP14305 IS 'Attribute Code',
    RP14304 IS 'Attribute Set',
    RP14303 IS 'Value Type Code',
    RP14302 IS 'View Line Item Number',
    RP14301 IS 'Position or View Item');
--
  LABEL ON ODV.TRP143A1
   (RP14316 IS 'D_MUTN_TIME',
    RP14315 IS 'D_MUTN',
    RP14314 IS 'I_MUTN_PID',
    RP14313 IS 'I_CODE_EXT',
    RP14312 IS 'I_REF_CODE',
    RP14311 IS 'I_REF_SET',
    RP14310 IS 'N_SEQ',
    RP14309 IS 'D_END',
    RP14308 IS 'D_EFCTV',
    RP14307 IS 'I_ASGN_CODE',
    RP14306 IS 'I_ASGN_SET',
    RP14305 IS 'I_ATTR_CODE',
    RP14304 IS 'I_ATTR_SET',
    RP14303 IS 'I_VAL_T',
    RP14302 IS 'I_NMBR_OF_WCH',
    RP14301 IS 'I_GRPMP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP143A0 On ODV.TRP143A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP143A0
    ON ODV.TRP143A1
     (RP14301               ASC,
      RP14302               ASC,
      RP14303               ASC,
      RP14304               ASC,
      RP14305               ASC,
      RP14306               ASC,
      RP14307               ASC,
      RP14308               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP143A1 On ODV.TRP143A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP143A1
    ON ODV.TRP143A1
     (RP14301               ASC,
      RP14313               ASC,
      RP14303               ASC,
      RP14304               ASC,
      RP14305               ASC,
      RP14306               ASC,
      RP14307               ASC,
      RP14308               ASC,
      RP14302               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP143A2 On ODV.TRP143A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP143A2
    ON ODV.TRP143A1
     (RP14303               ASC,
      RP14304               ASC,
      RP14305               ASC,
      RP14306               ASC,
      RP14307               ASC,
      RP14308               ASC,
      RP14309               ASC,
      RP14302               ASC,
      RP14301               ASC,
      RP14311               ASC,
      RP14312               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S150A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S150A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP3
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP150A1 In RP01A1L.S150A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP150A1
     (RP15001              INTEGER NOT NULL,
      RP15002              INTEGER NOT NULL,
      RP15003              INTEGER NOT NULL,
      RP15004              INTEGER NOT NULL,
      RP15005              INTEGER NOT NULL,
      RP15006              INTEGER NOT NULL,
      RP15007              INTEGER NOT NULL,
      RP15008              DATE NOT NULL,
      RP15009              DATE NOT NULL,
      RP15010              DECIMAL(15, 8) NOT NULL,
      RP15011              INTEGER NOT NULL,
      RP15012              INTEGER NOT NULL,
      RP15013              INTEGER NOT NULL,
      RP15014              CHAR(8) FOR SBCS DATA NOT NULL,
      RP15015              DATE NOT NULL,
      RP15016              TIME NOT NULL,
      CONSTRAINT RP15001
      PRIMARY KEY (RP15001,
                   RP15002,
                   RP15003,
                   RP15004,
                   RP15005,
                   RP15006,
                   RP15007,
                   RP15008))
    IN RP01A1L.S150A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP150A1 IS 'CHECK DETAILS';
--
  COMMENT ON ODV.TRP150A1
   (RP15016 IS 'Mutations-Zeit',
    RP15015 IS 'Mutations-Datum',
    RP15014 IS 'Mutations-Referenz',
    RP15013 IS 'Sort within Cell Group',
    RP15012 IS 'View Function Code',
    RP15011 IS 'View Function Item',
    RP15010 IS 'Calculation Factor',
    RP15009 IS 'End Date',
    RP15008 IS 'Effective Date',
    RP15007 IS 'Cell Group Index',
    RP15006 IS 'Value Type',
    RP15005 IS 'Number of Which',
    RP15004 IS 'View Item',
    RP15003 IS 'Structure or Position Number',
    RP15002 IS 'Check Number',
    RP15001 IS 'Check Group Item');
--
  LABEL ON ODV.TRP150A1
   (RP15016 IS 'D_MUTN_TIME',
    RP15015 IS 'D_MUTN',
    RP15014 IS 'I_MUTN_PID',
    RP15013 IS 'N_SEQ',
    RP15012 IS 'I_FUNC_CODE',
    RP15011 IS 'I_FUNC_SET',
    RP15010 IS 'A_FACTOR',
    RP15009 IS 'D_END',
    RP15008 IS 'D_EFCTV',
    RP15007 IS 'I_CELLGRP',
    RP15006 IS 'I_VAL_T',
    RP15005 IS 'I_NMBR_OF_WCH',
    RP15004 IS 'I_VIEW_ITM',
    RP15003 IS 'I_GRPMP_ITM',
    RP15002 IS 'I_CHECK_NR',
    RP15001 IS 'I_CHKGRP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP150A0 On ODV.TRP150A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP150A0
    ON ODV.TRP150A1
     (RP15001               ASC,
      RP15002               ASC,
      RP15003               ASC,
      RP15004               ASC,
      RP15005               ASC,
      RP15006               ASC,
      RP15007               ASC,
      RP15008               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP150A1 On ODV.TRP150A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP150A1
    ON ODV.TRP150A1
     (RP15003               ASC,
      RP15004               ASC,
      RP15005               ASC,
      RP15006               ASC,
      RP15008               ASC,
      RP15009               ASC,
      RP15001               ASC,
      RP15002               ASC,
      RP15007               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S151A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S151A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP151A1 In RP01A1L.S151A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP151A1
     (RP15101              INTEGER NOT NULL,
      RP15102              INTEGER NOT NULL,
      RP15103              INTEGER NOT NULL,
      RP15104              INTEGER NOT NULL,
      RP15105              INTEGER NOT NULL,
      RP15106              INTEGER NOT NULL,
      RP15107              INTEGER NOT NULL,
      RP15108              INTEGER NOT NULL,
      RP15109              DATE NOT NULL,
      RP15110              DATE NOT NULL,
      RP15111              INTEGER NOT NULL,
      RP15112              CHAR(8) FOR SBCS DATA NOT NULL,
      RP15113              DATE NOT NULL,
      RP15114              TIME NOT NULL,
      CONSTRAINT RP15101
      PRIMARY KEY (RP15101,
                   RP15102,
                   RP15103,
                   RP15104,
                   RP15105,
                   RP15106,
                   RP15107,
                   RP15108,
                   RP15109))
    IN RP01A1L.S151A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP151A1 IS 'CELL IMPACTS';
--
  COMMENT ON ODV.TRP151A1
   (RP15114 IS 'Mutations-Zeit',
    RP15113 IS 'Mutations-Datum',
    RP15112 IS 'Mutations-Referenz',
    RP15111 IS 'Sort Sequence',
    RP15110 IS 'End Date',
    RP15109 IS 'Effective Date',
    RP15108 IS 'Check Number / View Number',
    RP15107 IS 'Chk Group Nr / Position Number',
    RP15106 IS 'Link Code',
    RP15105 IS 'Link Table Item',
    RP15104 IS 'Number of Which',
    RP15103 IS 'Value Type',
    RP15102 IS 'View Item',
    RP15101 IS 'Structure or Position Number');
--
  LABEL ON ODV.TRP151A1
   (RP15114 IS 'D_MUTN_TIME',
    RP15113 IS 'D_MUTN',
    RP15112 IS 'I_MUTN_PID',
    RP15111 IS 'N_SEQ',
    RP15110 IS 'D_END',
    RP15109 IS 'D_EFCTV',
    RP15108 IS 'I_IMPACT_B',
    RP15107 IS 'I_IMPACT_A',
    RP15106 IS 'I_LINK_CODE',
    RP15105 IS 'I_LINK_SET',
    RP15104 IS 'I_NMBR_OF_WCH',
    RP15103 IS 'I_VAL_T',
    RP15102 IS 'I_VIEW_ITM',
    RP15101 IS 'I_GRPMP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP151A0 On ODV.TRP151A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP151A0
    ON ODV.TRP151A1
     (RP15101               ASC,
      RP15102               ASC,
      RP15103               ASC,
      RP15104               ASC,
      RP15105               ASC,
      RP15106               ASC,
      RP15107               ASC,
      RP15108               ASC,
      RP15109               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP151A1 On ODV.TRP151A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP151A1
    ON ODV.TRP151A1
     (RP15105               ASC,
      RP15106               ASC,
      RP15107               ASC,
      RP15108               ASC,
      RP15109               ASC,
      RP15110               ASC,
      RP15101               ASC,
      RP15102               ASC,
      RP15103               ASC,
      RP15104               ASC,
      RP15111               ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP3
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S161A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S161A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP161A1 In RP01A1L.S161A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP161A1
     (RP16101              INTEGER NOT NULL,
      RP16102              CHAR(6) FOR SBCS DATA NOT NULL,
      RP16103              INTEGER NOT NULL,
      RP16104              INTEGER NOT NULL,
      RP16105              INTEGER NOT NULL,
      RP16106              INTEGER NOT NULL,
      RP16107              DATE NOT NULL,
      RP16108              DATE NOT NULL,
      RP16109              DATE NOT NULL,
      RP16110              DATE NOT NULL,
      RP16111              CHAR(8) FOR SBCS DATA NOT NULL,
      RP16112              DATE NOT NULL,
      RP16113              TIME NOT NULL,
      CONSTRAINT RP16101
      PRIMARY KEY (RP16101,
                   RP16102))
    IN RP01A1L.S161A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP161A1 IS 'TEMPLATE DEFINITIONS';
--
  COMMENT ON ODV.TRP161A1
   (RP16113 IS 'Mutation-Time',
    RP16112 IS 'Mutation-Date',
    RP16111 IS 'Mutation-Reference',
    RP16110 IS 'Productive End Date',
    RP16109 IS 'Productive Effective Date',
    RP16108 IS 'End Date',
    RP16107 IS 'Effective Date',
    RP16106 IS 'Template State SubCode',
    RP16105 IS 'Template State MainCode',
    RP16104 IS 'Template Type SubCode',
    RP16103 IS 'Template Type MainCode',
    RP16102 IS 'Reporting Period',
    RP16101 IS 'Reporting Template ID');
--
  LABEL ON ODV.TRP161A1
   (RP16113 IS 'D_MUTN_TIME',
    RP16112 IS 'D_MUTN',
    RP16111 IS 'I_MUTN_PID',
    RP16110 IS 'D_PROD_END',
    RP16109 IS 'D_PROD_EFCTV',
    RP16108 IS 'D_END',
    RP16107 IS 'D_EFCTV',
    RP16106 IS 'I_STAT_CODE',
    RP16105 IS 'I_STAT_SET',
    RP16104 IS 'I_TYPE_CODE',
    RP16103 IS 'I_TYPE_SET',
    RP16102 IS 'D_BAL_PERIOD',
    RP16101 IS 'I_TEMP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP161A1 On ODV.TRP161A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP161A1
    ON ODV.TRP161A1
     (RP16102               ASC,
      RP16107               ASC,
      RP16108               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP161A0 On ODV.TRP161A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP161A0
    ON ODV.TRP161A1
     (RP16101               ASC,
      RP16102               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S162A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S162A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP162A1 In RP01A1L.S162A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP162A1
     (RP16201              INTEGER NOT NULL,
      RP16202              CHAR(6) FOR SBCS DATA NOT NULL,
      RP16203              INTEGER NOT NULL,
      RP16204              INTEGER NOT NULL,
      CONSTRAINT RP16201
      PRIMARY KEY (RP16201,
                   RP16202,
                   RP16203))
    IN RP01A1L.S162A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP162A1 IS 'TEMPLATE ORDER HISTORY';
--
  COMMENT ON ODV.TRP162A1
   (RP16204 IS 'Template Order number closed',
    RP16203 IS 'Template Order number',
    RP16202 IS 'Reporting Period',
    RP16201 IS 'Reporting Template ID');
--
  LABEL ON ODV.TRP162A1
   (RP16204 IS 'I_MUTN_NMBR_CLSE',
    RP16203 IS 'I_MUTN_NMBR',
    RP16202 IS 'D_BAL_PERIOD',
    RP16201 IS 'I_TEMP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP162A2 On ODV.TRP162A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP162A2
    ON ODV.TRP162A1
     (RP16203               ASC,
      RP16204               ASC,
      RP16201               ASC,
      RP16202               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP162A1 On ODV.TRP162A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP162A1
    ON ODV.TRP162A1
     (RP16203               ASC,
      RP16201               ASC,
      RP16202               ASC,
      RP16204               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP162A0 On ODV.TRP162A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP162A0
    ON ODV.TRP162A1
     (RP16201               ASC,
      RP16202               ASC,
      RP16203               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S163A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S163A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 736 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP32K
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP163A1 In RP01A1L.S163A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP163A1
     (RP16301              INTEGER NOT NULL,
      RP16302              CHAR(6) FOR SBCS DATA NOT NULL,
      RP16303              INTEGER NOT NULL,
      RP16304              INTEGER NOT NULL,
      RP16305              VARCHAR(32000) FOR SBCS DATA NOT NULL,
      CONSTRAINT RP16301
      PRIMARY KEY (RP16301,
                   RP16302,
                   RP16303,
                   RP16304))
    IN RP01A1L.S163A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP163A1 IS 'TEMPLATE ORDER DATA';
--
  COMMENT ON ODV.TRP163A1
   (RP16305 IS 'Template Data row',
    RP16304 IS 'Sequence number',
    RP16303 IS 'Template Order number',
    RP16302 IS 'Reporting Period',
    RP16301 IS 'Reporting Template ID');
--
  LABEL ON ODV.TRP163A1
   (RP16305 IS 'V_DATA_ROW',
    RP16304 IS 'I_LAUF_NR',
    RP16303 IS 'I_MUTN_NMBR',
    RP16302 IS 'D_BAL_PERIOD',
    RP16301 IS 'I_TEMP_ITM');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP163A1 On ODV.TRP163A1
------------------------------------------------------------------------
--
  CREATE INDEX ODV.IRP163A1
    ON ODV.TRP163A1
     (RP16303               ASC,
      RP16304               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP163A0 On ODV.TRP163A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP163A0
    ON ODV.TRP163A1
     (RP16301               ASC,
      RP16302               ASC,
      RP16303               ASC,
      RP16304               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L   Stogroup=GSMS
-- Tablespace=RP01A1L.S170A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE S170A
    IN RP01A1L
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=ODV.TRP170A1 In RP01A1L.S170A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
  CREATE TABLE ODV.TRP170A1
     (RP17001              CHAR(2) FOR SBCS DATA NOT NULL,
      RP17002              CHAR(12) FOR SBCS DATA NOT NULL,
      RP17003              CHAR(4) FOR SBCS DATA NOT NULL,
      RP17004              CHAR(4) FOR SBCS DATA NOT NULL,
      RP17005              CHAR(4) FOR SBCS DATA NOT NULL,
      RP17006              CHAR(4) FOR SBCS DATA NOT NULL,
      RP17007              CHAR(6) FOR SBCS DATA NOT NULL,
      RP17008              DATE NOT NULL,
      RP17009              DATE NOT NULL,
      RP17010              INTEGER NOT NULL,
      RP17011              INTEGER NOT NULL,
      RP17012              INTEGER NOT NULL,
      RP17013              INTEGER NOT NULL,
      RP17014              CHAR(12) FOR SBCS DATA NOT NULL,
      RP17015              INTEGER NOT NULL,
      RP17016              INTEGER NOT NULL,
      RP17017              INTEGER NOT NULL,
      RP17018              INTEGER NOT NULL,
      RP17019              INTEGER NOT NULL,
      RP17020              INTEGER NOT NULL,
      RP17021              INTEGER NOT NULL,
      RP17022              INTEGER NOT NULL,
      RP17023              CHAR(8) FOR SBCS DATA NOT NULL,
      RP17024              DATE NOT NULL,
      RP17025              TIME NOT NULL,
      CONSTRAINT RP17001
      PRIMARY KEY (RP17001,
                   RP17002,
                   RP17003,
                   RP17004,
                   RP17005,
                   RP17006,
                   RP17007,
                   RP17008,
                   RP17010,
                   RP17011,
                   RP17012,
                   RP17013,
                   RP17014,
                   RP17015,
                   RP17016,
                   RP17017,
                   RP17018))
    IN RP01A1L.S170A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE ODV.TRP170A1 IS 'FRANGO MAPPING';
--
  COMMENT ON ODV.TRP170A1
   (RP17025 IS 'Mutation-Time',
    RP17024 IS 'Mutation-Date',
    RP17023 IS 'Mutation-Reference',
    RP17022 IS 'Sign Handling SubCode',
    RP17021 IS 'Sign Handling MainCode',
    RP17020 IS 'Mapping Type SubCode',
    RP17019 IS 'Mapping Type MainCode',
    RP17018 IS 'View Grouping SubCode',
    RP17017 IS 'View Grouping MainCode',
    RP17016 IS 'View Function SubCode',
    RP17015 IS 'View Function MainCode',
    RP17014 IS 'View-Line-Item (external)',
    RP17013 IS 'View-Line-Item (internal)',
    RP17012 IS 'View',
    RP17011 IS 'Position',
    RP17010 IS 'Value Type',
    RP17009 IS 'End Date',
    RP17008 IS 'Effective Date',
    RP17007 IS 'FRANGO Intercompany-Counterparty',
    RP17006 IS 'FRANGO Dimension 4',
    RP17005 IS 'FRANGO Dimension 3',
    RP17004 IS 'FRANGO Dimension 2',
    RP17003 IS 'FRANGO Dimension 1',
    RP17002 IS 'FRANGO Account',
    RP17001 IS 'FRANGO Actuality');
--
  LABEL ON ODV.TRP170A1
   (RP17025 IS 'D_MUTN_TIME',
    RP17024 IS 'D_MUTN',
    RP17023 IS 'I_MUTN_PID',
    RP17022 IS 'I_SIGN_HAND_CODE',
    RP17021 IS 'I_SIGN_HAND_SET',
    RP17020 IS 'I_MAP_TYPE_CODE',
    RP17019 IS 'I_MAP_TYPE_SET',
    RP17018 IS 'I_VIEW_GRP_CODE',
    RP17017 IS 'I_VIEW_GRP_SET',
    RP17016 IS 'I_VIEW_FCT_CODE',
    RP17015 IS 'I_VIEW_FCT_SET',
    RP17014 IS 'I_VLI_EXT',
    RP17013 IS 'I_VLI_INT',
    RP17012 IS 'I_VIEW_ITM',
    RP17011 IS 'I_POS_ITM',
    RP17010 IS 'I_VAL_T',
    RP17009 IS 'D_END',
    RP17008 IS 'D_EFCTV',
    RP17007 IS 'I_FRGO_IC',
    RP17006 IS 'I_FRGO_DIM_4',
    RP17005 IS 'I_FRGO_DIM_3',
    RP17004 IS 'I_FRGO_DIM_2',
    RP17003 IS 'I_FRGO_DIM_1',
    RP17002 IS 'I_FRGO_ACNT',
    RP17001 IS 'I_FRGO_ACTU');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP170A1 On ODV.TRP170A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP170A1
    ON ODV.TRP170A1
     (RP17011               ASC,
      RP17012               ASC,
      RP17013               ASC,
      RP17014               ASC,
      RP17015               ASC,
      RP17016               ASC,
      RP17017               ASC,
      RP17018               ASC,
      RP17010               ASC,
      RP17001               ASC,
      RP17002               ASC,
      RP17003               ASC,
      RP17004               ASC,
      RP17005               ASC,
      RP17006               ASC,
      RP17007               ASC,
      RP17008               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=RP01A1L
--    Index=ODV.IRP170A0 On ODV.TRP170A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX ODV.IRP170A0
    ON ODV.TRP170A1
     (RP17001               ASC,
      RP17002               ASC,
      RP17003               ASC,
      RP17004               ASC,
      RP17005               ASC,
      RP17006               ASC,
      RP17007               ASC,
      RP17008               ASC,
      RP17010               ASC,
      RP17011               ASC,
      RP17012               ASC,
      RP17013               ASC,
      RP17014               ASC,
      RP17015               ASC,
      RP17016               ASC,
      RP17017               ASC,
      RP17018               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP101A1 FOR ODV.TRP101A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP101A1 FOR ODV.TRP101A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP102A1 FOR ODV.TRP102A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP102A1 FOR ODV.TRP102A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP103A1 FOR ODV.TRP103A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP103A1 FOR ODV.TRP103A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP104A1 FOR ODV.TRP104A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP104A1 FOR ODV.TRP104A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP105A1 FOR ODV.TRP105A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP105A1 FOR ODV.TRP105A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP106A1 FOR ODV.TRP106A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP106A1 FOR ODV.TRP106A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP107A1 FOR ODV.TRP107A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP107A1 FOR ODV.TRP107A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP108A1 FOR ODV.TRP108A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP108A1 FOR ODV.TRP108A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP109A1 FOR ODV.TRP109A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP109A1 FOR ODV.TRP109A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP110A1 FOR ODV.TRP110A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP110A1 FOR ODV.TRP110A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP111A1 FOR ODV.TRP111A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP111A1 FOR ODV.TRP111A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP112A1 FOR ODV.TRP112A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP112A1 FOR ODV.TRP112A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP113A1 FOR ODV.TRP113A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP113A1 FOR ODV.TRP113A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP114A1 FOR ODV.TRP114A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP114A1 FOR ODV.TRP114A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP115A1 FOR ODV.TRP115A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP115A1 FOR ODV.TRP115A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP116A1 FOR ODV.TRP116A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP116A1 FOR ODV.TRP116A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP117A1 FOR ODV.TRP117A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.TRP117A1 FOR ODV.TRP117A1 ;
--
  COMMIT;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.TRP118A1 FOR ODV.TRP118A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP119A1 FOR ODV.TRP119A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP120A1 FOR ODV.TRP120A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP121A1 FOR ODV.TRP121A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP122A1 FOR ODV.TRP122A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP131A1 FOR ODV.TRP131A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP132A1 FOR ODV.TRP132A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP133A1 FOR ODV.TRP133A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP143A1 FOR ODV.TRP143A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP150A1 FOR ODV.TRP150A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP151A1 FOR ODV.TRP151A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP161A1 FOR ODV.TRP161A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP162A1 FOR ODV.TRP162A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP163A1 FOR ODV.TRP163A1 ;
--
  COMMIT;
--
  CREATE ALIAS OA1L.TRP170A1 FOR ODV.TRP170A1 ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP101A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP101A1V(I_GRPSP_ITM, I_GRPSP_T_SET,
      I_GRPSP_T_CODE, D_EFCTV, D_END, I_STATUS_SET, I_STATUS_CODE,
      I_RSPNSBL_FOR, C_SCND_SCY_CTGRY, I_EXTNL_RFT_NMBR, I_ATTR_ITM,
      I_DOMN_T_SET, I_DOMN_T_CODE, I_DOMN_ITM, I_DOMN_CODE,
      I_DOMN_LOWER_LMT, I_DOMN_UPPER_LMT, I_TCHNCL_T_SET,
      I_TCHNCL_T_CODE, I_DATA_STRCTR_ITM, I_DATA_T_SET, I_DATA_T_CODE,
      N_DATA_LNGTH, N_DATA_PRCSN, I_TCHNCL_NAME, I_MUTN_PID, D_MUTN,
      D_MUTN_TIME) AS
    SELECT ALL RP10101, RP10102, RP10103, RP10104, RP10105, RP10106,
           RP10107, RP10108, RP10109, RP10110, RP10111, RP10112,
           RP10113, RP10114, RP10115, RP10116, RP10117, RP10118,
           RP10119, RP10120, RP10121, RP10122, RP10123, RP10124,
           RP10125, RP10126, RP10127, RP10128
      FROM ODV.TRP101A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP101A1V FOR ODV.VRP101A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP101A1V FOR ODV.VRP101A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP102A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP102A1V(I_GRPSP_ITM, I_CODE, I_DESC_SET,
      I_DESC_CODE, I_LNG_SET, I_LNG_CODE, D_EFCTV, D_END, I_LINE,
      T_DESC, T_DESC_SRH, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP10201, RP10202, RP10203, RP10204, RP10205, RP10206,
           RP10207, RP10208, RP10209, RP10210, RP10211, RP10212,
           RP10213, RP10214
      FROM ODV.TRP102A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP102A1V FOR ODV.VRP102A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP102A1V FOR ODV.VRP102A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP103A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP103A1V(I_GRPSP_ITM_FROM, I_CODE_FROM, I_LINK_SET,
      I_LINK_CODE, I_GRPSP_ITM_TO, I_CODE_TO, D_EFCTV, D_END,
      N_LINK_SEQ, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP10301, RP10302, RP10303, RP10304, RP10305, RP10306,
           RP10307, RP10308, RP10309, RP10310, RP10311, RP10312
      FROM ODV.TRP103A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP103A1V FOR ODV.VRP103A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP103A1V FOR ODV.VRP103A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP104A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","S100447" ;
--
  CREATE VIEW ODV.VRP104A1V(I_SET_ITM, I_SET_CODE, D_EFCTV, D_END,
      N_CODE_SEQ, I_RSPNSBL_FOR, I_MUTN_PID, D_MUTN, D_MUTN_TIME,
      I_CODE_EXT) AS
    SELECT ALL RP10401, RP10402, RP10403, RP10404, RP10405, RP10406,
           RP10407, RP10408, RP10409, RP10410
      FROM ODV.TRP104A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP104A1V FOR ODV.VRP104A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP104A1V FOR ODV.VRP104A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP105A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP105A1V(I_GRPSP_ITM, I_ORG_UNIT, I_CODE_L,
      I_ENTRY_T_SET, I_ENTRY_T_CODE, I_GRPSP_ITM_1, I_CODE_1,
      I_GRPSP_ITM_2, I_CODE_2, D_EFCTV, D_END, T_DESC, T_DESC_SRH,
      I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP10501, RP10502, RP10503, RP10504, RP10505, RP10506,
           RP10507, RP10508, RP10509, RP10510, RP10511, RP10512,
           RP10513, RP10514, RP10515, RP10516
      FROM ODV.TRP105A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP105A1V FOR ODV.VRP105A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP105A1V FOR ODV.VRP105A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP106A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP106A1V(I_RPTG_POSTN, I_ENTRY_T_SET,
      I_ENTRY_T_CODE, I_MP_T_SET, I_MP_T_CODE, I_ORG_UNIT, D_EFCTV,
      D_END, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP10601, RP10602, RP10603, RP10604, RP10605, RP10606,
           RP10607, RP10608, RP10609, RP10610, RP10611
      FROM ODV.TRP106A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP106A1V FOR ODV.VRP106A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP106A1V FOR ODV.VRP106A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP107A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP107A1V(I_GRPMP_ITM, I_GRPMP_T_SET,
      I_GRPMP_T_CODE, D_EFCTV, D_END, I_STATUS_SET, I_STATUS_CODE,
      I_RSPNSBL_FOR, C_SCND_SCY_CTGRY, I_EXTNL_ITM_ID, I_STRCTR_ITM,
      I_SUB_T_SET, I_SUB_T_CODE, P_VARTN_LMT_ABS, P_VARTN_LMT,
      A_CTRL_LOWER_LMT, A_CTRL_UPPER_LMT, I_MUTN_PID, D_MUTN,
      D_MUTN_TIME) AS
    SELECT ALL RP10701, RP10702, RP10703, RP10704, RP10705, RP10706,
           RP10707, RP10708, RP10709, RP10710, RP10711, RP10712,
           RP10713, RP10714, RP10715, RP10716, RP10717, RP10718,
           RP10719, RP10720
      FROM ODV.TRP107A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP107A1V FOR ODV.VRP107A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP107A1V FOR ODV.VRP107A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP108A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP108A1V(I_GRPMP_ITM, I_DESC_SET, I_DESC_CODE,
      I_LNG_SET, I_LNG_CODE, D_EFCTV, D_END, I_LINE, T_DESC,
      T_DESC_SRH, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP10801, RP10802, RP10803, RP10804, RP10805, RP10806,
           RP10807, RP10808, RP10809, RP10810, RP10811, RP10812,
           RP10813
      FROM ODV.TRP108A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP108A1V FOR ODV.VRP108A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP108A1V FOR ODV.VRP108A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP109A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP109A1V(I_GRPMP_ITM_FROM, I_LINK_SET, I_LINK_CODE,
      I_GRPMP_ITM_TO, D_EFCTV, D_END, N_LINK_SEQ, I_MUTN_PID, D_MUTN,
      D_MUTN_TIME) AS
    SELECT ALL RP10901, RP10902, RP10903, RP10904, RP10905, RP10906,
           RP10907, RP10908, RP10909, RP10910
      FROM ODV.TRP109A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP109A1V FOR ODV.VRP109A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP109A1V FOR ODV.VRP109A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP110A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP110A1V(I_VIEW_ITM, I_FLD_ITM, N_COL_SEQ,
      I_SLCTN_DOMN, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP11001, RP11002, RP11003, RP11004, RP11005, RP11006,
           RP11007
      FROM ODV.TRP110A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP110A1V FOR ODV.VRP110A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP110A1V FOR ODV.VRP110A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP111A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP111A1V(I_VIEW_ITM, I_FLD_ITM, I_SLCTN, D_EFCTV,
      D_END, I_STATUS_SET, I_STATUS_CODE, N_ROW_SEQ, I_ENTRY_T_SET,
      I_ENTRY_T_CODE, I_GRPSP_ITM, I_CODE, I_MUTN_PID, D_MUTN,
      D_MUTN_TIME) AS
    SELECT ALL RP11101, RP11102, RP11103, RP11104, RP11105, RP11106,
           RP11107, RP11108, RP11109, RP11110, RP11111, RP11112,
           RP11113, RP11114, RP11115
      FROM ODV.TRP111A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP111A1V FOR ODV.VRP111A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP111A1V FOR ODV.VRP111A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP112A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP112A1V(I_VIEW_ITM, I_NMBR_OF_WCH, I_FLD_ITM,
      I_SLCTN) AS
    SELECT ALL RP11201, RP11202, RP11203, RP11204
      FROM ODV.TRP112A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP112A1V FOR ODV.VRP112A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP112A1V FOR ODV.VRP112A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP113A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP113A1V(I_RPTG_POSTN, I_POSTN_ITM, I_VIEW_ITM,
      I_NMBR_OF_WCH, I_ENTRY_T_SET, I_ENTRY_T_CODE) AS
    SELECT ALL RP11301, RP11302, RP11303, RP11304, RP11305, RP11306
      FROM ODV.TRP113A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP113A1V FOR ODV.VRP113A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP113A1V FOR ODV.VRP113A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP114A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP114A1V(I_POSTN_ITM, I_VIEW_ITM, I_FLD_ITM,
      I_SLCTN, D_EFCTV, D_END, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP11401, RP11402, RP11403, RP11404, RP11405, RP11406,
           RP11407, RP11408, RP11409
      FROM ODV.TRP114A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP114A1V FOR ODV.VRP114A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP114A1V FOR ODV.VRP114A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP115A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP115A1V(I_PROC_SET, I_PROC_CODE, I_ITM_FROM,
      I_CODE_FROM, I_ITM_TO, I_CODE_TO, I_LINK_SET, I_LINK_CODE,
      D_EFCTV, D_END, I_MUTN_PID, D_MUTN, D_MUTN_TIME, N_LINK_SEQ) AS
    SELECT ALL RP11501, RP11502, RP11503, RP11504, RP11505, RP11506,
           RP11507, RP11508, RP11509, RP11510, RP11511, RP11512,
           RP11513, RP11514
      FROM ODV.TRP115A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP115A1V FOR ODV.VRP115A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP115A1V FOR ODV.VRP115A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP116A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP116A1V(I_BILD_ID, I_FELD_ID, I_LAUF_NR,
      T_TITEL_D, T_TITEL_F, T_TITEL_I, T_TITEL_E, T_TITEL_S,
      I_GRPSP_ITM, V_SQL_STMT) AS
    SELECT ALL RP11601, RP11602, RP11603, RP11604, RP11605, RP11606,
           RP11607, RP11608, RP11609, RP11610
      FROM ODV.TRP116A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP116A1V FOR ODV.VRP116A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP116A1V FOR ODV.VRP116A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP117A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP117A1V(I_CTRL_ITM, I_LINK_SET, I_LINK_CODE,
      I_POSTN_ITM, I_VIEW_ITM, I_MIN_PACK_SET, I_MIN_PACK_T, D_EFCTV,
      D_END, N_LINK_SEQ, I_PERIOD_SET, I_PERIOD_CODE, I_MUTN_PID,
      D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP117001, RP117002, RP117003, RP117004, RP117005,
           RP117006, RP117007, RP117008, RP117009, RP117010, RP117011,
           RP117012, RP117013, RP117014, RP117015
      FROM ODV.TRP117A1 ;
--
  SET CURRENT SQLID='S100006';
--
  CREATE ALIAS S100006.VRP117A1V FOR ODV.VRP117A1V ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP117A1V FOR ODV.VRP117A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP118A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP118A1V(I_GRPSP_ITM, I_CONV_RULE_SET,
      I_CONV_RULE_CODE, D_EFCTV, D_END, N_SEQ, I_MUTN_PID, D_MUTN,
      D_MUTN_TIME) AS
    SELECT ALL RP11801, RP11802, RP11803, RP11804, RP11805, RP11806,
           RP11807, RP11808, RP11809
      FROM ODV.TRP118A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP118A1V FOR ODV.VRP118A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP119A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP119A1V(I_GRPSP_ITM, I_CONV_RULE_SET,
      I_CONV_RULE_CODE, I_CODE_L, D_EFCTV, D_END, I_CODE_L_EXT,
      I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP11901, RP11902, RP11903, RP11904, RP11905, RP11906,
           RP11907, RP11908, RP11909, RP11910
      FROM ODV.TRP119A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP119A1V FOR ODV.VRP119A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP120A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP120A1V(I_GRPSP_ITM, I_CONV_RULE_SET,
      I_CONV_RULE_CODE, I_CODE_L, I_DESC_SET, I_DESC_CODE, I_LNG_SET,
      I_LNG_CODE, D_EFCTV, D_END, T_DESC, T_DESC_SRH, I_MUTN_PID,
      D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP12001, RP12002, RP12003, RP12004, RP12005, RP12006,
           RP12007, RP12008, RP12009, RP12010, RP12011, RP12012,
           RP12013, RP12014, RP12015
      FROM ODV.TRP120A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP120A1V FOR ODV.VRP120A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP121A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP121A1V(I_GRPSP_ITM, I_CONV_RULE_SET,
      I_CONV_RULE_CODE, I_CODE_L, I_CONV_TO_SET, I_CONV_TO_CODE,
      D_EFCTV, D_END, F_CONV_DFLT, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP12101, RP12102, RP12103, RP12104, RP12105, RP12106,
           RP12107, RP12108, RP12109, RP12110, RP12111, RP12112
      FROM ODV.TRP121A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP121A1V FOR ODV.VRP121A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP122A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP122A1V(I_CONV_UNIT_SET, I_CONV_UNIT_CODE,
      I_GRPSP_ITM, I_CONV_RULE_SET, I_CONV_RULE_CODE, D_EFCTV, D_END,
      N_SEQ, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP12201, RP12202, RP12203, RP12204, RP12205, RP12206,
           RP12207, RP12208, RP12209, RP12210, RP12211
      FROM ODV.TRP122A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP122A1V FOR ODV.VRP122A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP131A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","GDB0057" ;
--
  CREATE VIEW ODV.VRP131A1V(I_STRCTR_ITM, I_VIEW_ITM, I_VAL_T,
      D_EFCTV, D_END, D_PROD_EFCTV, D_PROD_END, N_SEQ, I_MUTN_PID,
      D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP13101, RP13102, RP13103, RP13104, RP13105, RP13106,
           RP13107, RP13108, RP13109, RP13110, RP13111
      FROM ODV.TRP131A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP131A1V FOR ODV.VRP131A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP132A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","A188662" ;
--
  CREATE VIEW ODV.VRP132A1V(I_STRCTR_ITM, I_VIEW_ITM, I_VAL_T,
      I_DESC_SET, I_DESC_CODE, I_ASGN_SET, I_ASGN_CODE, D_EFCTV,
      D_END, T_DESC, T_DESC_SRH, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP13201, RP13202, RP13203, RP13204, RP13205, RP13206,
           RP13207, RP13208, RP13209, RP13210, RP13211, RP13212,
           RP13213, RP13214
      FROM ODV.TRP132A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP132A1V FOR ODV.VRP132A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP133A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP133A1V(I_STRCTR_ITM, I_VIEW_ITM, I_VAL_T,
      I_ATTR_SET, I_ATTR_CODE, I_ASGN_SET, I_ASGN_CODE, D_EFCTV,
      D_END, N_SEQ, I_REF_SET, I_REF_CODE, I_CODE_EXT, A_TOLRNC,
      I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP13301, RP13302, RP13303, RP13304, RP13305, RP13306,
           RP13307, RP13308, RP13309, RP13310, RP13311, RP13312,
           RP13313, RP13314, RP13315, RP13316, RP13317
      FROM ODV.TRP133A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP133A1V FOR ODV.VRP133A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP143A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","GDB0057" ;
--
  CREATE VIEW ODV.VRP143A1V(I_GRPMP_ITM, I_NMBR_OF_WCH, I_VAL_T,
      I_ATTR_SET, I_ATTR_CODE, I_ASGN_SET, I_ASGN_CODE, D_EFCTV,
      D_END, N_SEQ, I_REF_SET, I_REF_CODE, I_CODE_EXT, I_MUTN_PID,
      D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP14301, RP14302, RP14303, RP14304, RP14305, RP14306,
           RP14307, RP14308, RP14309, RP14310, RP14311, RP14312,
           RP14313, RP14314, RP14315, RP14316
      FROM ODV.TRP143A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP143A1V FOR ODV.VRP143A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP150A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","A188662" ;
--
  CREATE VIEW ODV.VRP150A1V(I_CHKGRP_ITM, I_CHECK_NR, I_GRPMP_ITM,
      I_VIEW_ITM, I_NMBR_OF_WCH, I_VAL_T, I_CELLGRP, D_EFCTV, D_END,
      A_FACTOR, I_FUNC_SET, I_FUNC_CODE, N_SEQ, I_MUTN_PID, D_MUTN,
      D_MUTN_TIME) AS
    SELECT ALL RP15001, RP15002, RP15003, RP15004, RP15005, RP15006,
           RP15007, RP15008, RP15009, RP15010, RP15011, RP15012,
           RP15013, RP15014, RP15015, RP15016
      FROM ODV.TRP150A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP150A1V FOR ODV.VRP150A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP151A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","GDB0057" ;
--
  CREATE VIEW ODV.VRP151A1V(I_GRPMP_ITM, I_VIEW_ITM, I_VAL_T,
      I_NMBR_OF_WCH, I_LINK_SET, I_LINK_CODE, I_IMPACT_A, I_IMPACT_B,
      D_EFCTV, D_END, N_SEQ, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP15101, RP15102, RP15103, RP15104, RP15105, RP15106,
           RP15107, RP15108, RP15109, RP15110, RP15111, RP15112,
           RP15113, RP15114
      FROM ODV.TRP151A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP151A1V FOR ODV.VRP151A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP161A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP161A1V(I_TEMP_ITM, D_BAL_PERIOD, I_TYPE_SET,
      I_TYPE_CODE, I_STAT_SET, I_STAT_CODE, D_EFCTV, D_END,
      D_PROD_EFCTV, D_PROD_END, I_MUTN_PID, D_MUTN, D_MUTN_TIME) AS
    SELECT ALL RP16101, RP16102, RP16103, RP16104, RP16105, RP16106,
           RP16107, RP16108, RP16109, RP16110, RP16111, RP16112,
           RP16113
      FROM ODV.TRP161A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP161A1V FOR ODV.VRP161A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP162A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP162A1V(I_TEMP_ITM, D_BAL_PERIOD, I_MUTN_NMBR,
      I_MUTN_NMBR_CLSE) AS
    SELECT ALL RP16201, RP16202, RP16203, RP16204
      FROM ODV.TRP162A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP162A1V FOR ODV.VRP162A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP163A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP163A1V(I_TEMP_ITM, D_BAL_PERIOD, I_MUTN_NMBR,
      I_LAUF_NR, V_DATA_ROW) AS
    SELECT ALL RP16301, RP16302, RP16303, RP16304, RP16305
      FROM ODV.TRP163A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP163A1V FOR ODV.VRP163A1V ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=ODV.VRP170A1V
------------------------------------------------------------------------
--
  SET CURRENT SQLID='ODV';
--
--
  CREATE VIEW ODV.VRP170A1V(I_FRGO_ACTU, I_FRGO_ACNT, I_FRGO_DIM_1,
      I_FRGO_DIM_2, I_FRGO_DIM_3, I_FRGO_DIM_4, I_FRGO_IC, D_EFCTV,
      D_END, I_VAL_T, I_POS_ITM, I_VIEW_ITM, I_VLI_INT, I_VLI_EXT,
      I_VIEW_FCT_SET, I_VIEW_FCT_CODE, I_VIEW_GRP_SET,
      I_VIEW_GRP_CODE, I_MAP_TYPE_SET, I_MAP_TYPE_CODE,
      I_SIGN_HAND_SET, I_SIGN_HAND_CODE, I_MUTN_PID, D_MUTN,
      D_MUTN_TIME) AS
    SELECT ALL RP17001, RP17002, RP17003, RP17004, RP17005, RP17006,
           RP17007, RP17008, RP17009, RP17010, RP17011, RP17012,
           RP17013, RP17014, RP17015, RP17016, RP17017, RP17018,
           RP17019, RP17020, RP17021, RP17022, RP17023, RP17024,
           RP17025
      FROM ODV.TRP170A1 ;
--
  SET CURRENT SQLID='OA1L';
--
  CREATE ALIAS OA1L.VRP170A1V FOR ODV.VRP170A1V ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP102A1 FOREIGN KEY CRP101A
     (RP10201)
    REFERENCES ODV.TRP101A1
     (RP10101)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP103A1 FOREIGN KEY CRP101A
     (RP10301)
    REFERENCES ODV.TRP101A1
     (RP10101)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP103A1 FOREIGN KEY CRP101B
     (RP10305)
    REFERENCES ODV.TRP101A1
     (RP10101)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP104A1 FOREIGN KEY CRP101A
     (RP10401)
    REFERENCES ODV.TRP101A1
     (RP10101)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP105A1 FOREIGN KEY CRP101A
     (RP10501)
    REFERENCES ODV.TRP101A1
     (RP10101)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP106A1 FOREIGN KEY CRP113A
     (RP10601)
    REFERENCES ODV.TRP113A1
     (RP11301)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP108A1 FOREIGN KEY CRP107A
     (RP10801)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP109A1 FOREIGN KEY CRP107A
     (RP10901)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP109A1 FOREIGN KEY CRP107B
     (RP10904)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP110A1 FOREIGN KEY CRP101A
     (RP11002)
    REFERENCES ODV.TRP101A1
     (RP10101)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP110A1 FOREIGN KEY CRP107A
     (RP11001)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP111A1 FOREIGN KEY CRP110A
     (RP11101,
      RP11102)
    REFERENCES ODV.TRP110A1
     (RP11001,
      RP11002)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP112A1 FOREIGN KEY CRP111A
     (RP11201,
      RP11203,
      RP11204)
    REFERENCES ODV.TRP111A1
     (RP11101,
      RP11102,
      RP11103)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP113A1 FOREIGN KEY CRP107A
     (RP11302)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP113A1 FOREIGN KEY CRP107B
     (RP11303)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP114A1 FOREIGN KEY CRP107A
     (RP11401)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP114A1 FOREIGN KEY CRP111A
     (RP11402,
      RP11403,
      RP11404)
    REFERENCES ODV.TRP111A1
     (RP11101,
      RP11102,
      RP11103)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP117A1 FOREIGN KEY CRP107A
     (RP117001)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP117A1 FOREIGN KEY CRP107B
     (RP117004)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP117A1 FOREIGN KEY CRP107C
     (RP117005)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP119A1 FOREIGN KEY CRP118A
     (RP11901,
      RP11902,
      RP11903)
    REFERENCES ODV.TRP118A1
     (RP11801,
      RP11802,
      RP11803)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP120A1 FOREIGN KEY CRP119A
     (RP12001,
      RP12002,
      RP12003,
      RP12004)
    REFERENCES ODV.TRP119A1
     (RP11901,
      RP11902,
      RP11903,
      RP11904)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP121A1 FOREIGN KEY CRP119A
     (RP12101,
      RP12102,
      RP12103,
      RP12104)
    REFERENCES ODV.TRP119A1
     (RP11901,
      RP11902,
      RP11903,
      RP11904)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP122A1 FOREIGN KEY CRP118A
     (RP12203,
      RP12204,
      RP12205)
    REFERENCES ODV.TRP118A1
     (RP11801,
      RP11802,
      RP11803)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP131A1 FOREIGN KEY CRP107A
     (RP13101)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP131A1 FOREIGN KEY CRP107B
     (RP13102)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP132A1 FOREIGN KEY CRP131A
     (RP13201,
      RP13202,
      RP13203)
    REFERENCES ODV.TRP131A1
     (RP13101,
      RP13102,
      RP13103)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP133A1 FOREIGN KEY CRP131A
     (RP13301,
      RP13302,
      RP13303)
    REFERENCES ODV.TRP131A1
     (RP13101,
      RP13102,
      RP13103)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP143A1 FOREIGN KEY CRP107A
     (RP14301)
    REFERENCES ODV.TRP107A1
     (RP10701)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP162A1 FOREIGN KEY CRP161A
     (RP16201,
      RP16202)
    REFERENCES ODV.TRP161A1
     (RP16101,
      RP16102)
    ON DELETE RESTRICT  ;
--
  COMMIT;
--
  ALTER TABLE ODV.TRP163A1 FOREIGN KEY CRP162A
     (RP16301,
      RP16302,
      RP16303)
    REFERENCES ODV.TRP162A1
     (RP16201,
      RP16202,
      RP16203)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
--  REBIND PACKAGE(FD.FD5900.(A12W000653))
--
--  REBIND PACKAGE(FD.FD5900.(ADAC000025))
--
--  REBIND PACKAGE(FD.FD5900.(ADAC000100))
--
--  REBIND PACKAGE(FD.FD5910.(ADAC000050))
--
--  REBIND PACKAGE(FD.FD5911.(ADAC000048))
--
--  REBIND PACKAGE(FD.FD7110.(A12P002571))
--
--  REBIND PACKAGE(FD.FD7110.(A12W000602))
--
--  REBIND PACKAGE(FD.FD7110.(A12W000630))
--
--  REBIND PACKAGE(FD.FD7110.(A12P002799))
--
--  REBIND PACKAGE(FD.FD7110.(ADAC000051))
--
--  REBIND PACKAGE(FD.FD7110.(ADAC000100))
--
--  REBIND PACKAGE(FD.FD7110.(ADAC000160))
--
--  REBIND PACKAGE(FD.FD7120.(A12P002571))
--
--  REBIND PACKAGE(FD.FD7120.(A12W000602))
--
--  REBIND PACKAGE(FD.FD7120.(A12W000625))
--
--  REBIND PACKAGE(FD.FD7120.(A12W000630))
--
--  REBIND PACKAGE(FD.FD7120.(A12P002799))
--
--  REBIND PACKAGE(FD.FD7120.(A12W000708))
--
--  REBIND PACKAGE(FD.FD7120.(A12W000720))
--
--  REBIND PACKAGE(FD.FD7120.(ADAC000051))
--
--  REBIND PACKAGE(FD.FD7120.(ADAC000100))
--
--  REBIND PACKAGE(FD.FD7120.(ADAC000155))
--
--  REBIND PACKAGE(FD.FD7120.(ADAC000160))
--
--  REBIND PACKAGE(FD.FD7120.(ADAC000175))
--
--  REBIND PACKAGE(FD.FD7130.(A12W000630))
--
--  REBIND PACKAGE(FD.FD7130.(A12W000648))
--
--  REBIND PACKAGE(FD.FD7130.(ADAC000030))
--
--  REBIND PACKAGE(FD.FD7130.(ADAC000051))
--
--  REBIND PACKAGE(FD.FD7230.(ADAC000048))
--
--  REBIND PACKAGE(FD.FD7230.(ADAC000098))
--
--  REBIND PACKAGE(FD.FD7230.(ADAC000125))
--
--  REBIND PACKAGE(FD.FD7250.(ADAC000048))
--
--  REBIND PACKAGE(FD.FD7250.(ADAC000105))
--
--  REBIND PACKAGE(FD.FD7250.(ADAC000108))
--
--  REBIND PACKAGE(FD.FD7250.(ADAC000102))
--
--  REBIND PACKAGE(FD.FD7250.(ADAC000125))
--
--  REBIND PACKAGE(FD.FD7250.(ADAC000152))
--
--  REBIND PACKAGE(FD.FD7250.(ADAC000173))
--
--  REBIND PACKAGE(FD.FD7251.(ADAC000123))
--
--  REBIND PACKAGE(FD.FD7251.(ADAC000152))
--
--  REBIND PACKAGE(FD.FD7270.(ADAC000048))
--
--  REBIND PACKAGE(FD.FD7270.(ADAC000100))
--
--  REBIND PACKAGE(FD.FD7270.(ADAC000125))
--
--  REBIND PACKAGE(FD.FD7290.(ADAC000067))
--
--  REBIND PACKAGE(FD.FD7290.(ADAC000125))
--
--  REBIND PACKAGE(FD.FD7291.(ADAC000123))
--
--  REBIND PACKAGE(HBDTEST.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(HBDTEST.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUQUB.(HPSV2AAUQUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HP1.AAZDUB.(HPSV2AAZDUB))
--
--  REBIND PACKAGE(HP1.AAZDUB.(HPSVP2AAZDUB))
--
--  REBIND PACKAGE(HP1.AAZEUB.(HPSV2AAZEUB))
--
--  REBIND PACKAGE(HP1.AAZEUB.(HPSVP2AAZEUB))
--
--  REBIND PACKAGE(HP1.AAZFUB.(HPSV2AAZFUB))
--
--  REBIND PACKAGE(HP1.AAZFUB.(HPSVP2AAZFUB))
--
--  REBIND PACKAGE(HP1.AAZGUB.(HPSV2AAZGUB))
--
--  REBIND PACKAGE(HP1.AAZGUB.(HPSVP2AAZGUB))
--
--  REBIND PACKAGE(HP1.AAZSUB.(HPSV2AAZSUB))
--
--  REBIND PACKAGE(HP1.AAZSUB.(HPSVP2AAZSUB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUQUB.(HPSV2AAUQUB))
--
--  REBIND PACKAGE(HP1.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUQUB.(HPSV2AAUQUB))
--
--  REBIND PACKAGE(HP1.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP1.AAUQUB.(HPSV2AAUQUB))
--
--  REBIND PACKAGE(HP1.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HP1.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HP1.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP1.AA6FR9.(HPSV2AA6FR9))
--
--  REBIND PACKAGE(HP1.AA6FR9.(HPSVP2AA6FR9))
--
--  REBIND PACKAGE(HP1.AA6FR9.(HPSVP1AA6FR9))
--
--  REBIND PACKAGE(HP1.AA6IR9.(HPSV2AA6IR9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HP1.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP1.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP1.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP1.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP1.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP1.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HP1.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AA72UB.(HPSV2AA72UB))
--
--  REBIND PACKAGE(HP1.AA72UB.(HPSVP1AA72UB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSV2AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSVP1AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP1.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSV2AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSVP1AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP1.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP1.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP1.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSV2AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSVP1AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP1.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSV2AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSVP1AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP1.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP1.AA78R9.(HPSV2AA78R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP1.ABVFSA.(HPSV2ABVFSA))
--
--  REBIND PACKAGE(HP1.ABVFSA.(HPSVP1ABVFSA))
--
--  REBIND PACKAGE(HP1.ABVFSA.(HPSVP2ABVFSA))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AB5KSA.(HPSVP2AB5KSA))
--
--  REBIND PACKAGE(HP1.AB5NSA.(HPSVP2AB5NSA))
--
--  REBIND PACKAGE(HP1.AB7RUB.(HPSV2AB7RUB))
--
--  REBIND PACKAGE(HPS.AA6IR9.(HPSV2AA6IR9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HPS.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HPS.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB7RUB.(HPSV2AB7RUB))
--
--  REBIND PACKAGE(HP1.AB7RUB.(HPSVP2AB7RUB))
--
--  REBIND PACKAGE(HP1.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP1.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP1.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP1.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP1.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HP1.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HP1.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP1.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSV2ACAJUB))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVI1ACAJUB))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP1.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP1.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP1.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP1.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP1.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP1.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP1.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP1.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP1.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP1.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP1.ADL9UB.(HPSVP2ADL9UB))
--
--  REBIND PACKAGE(HP1.ADMBUB.(HPSVP2ADMBUB))
--
--  REBIND PACKAGE(HP1.ADMCUB.(HPSVP2ADMCUB))
--
--  REBIND PACKAGE(HP1.ADMDUB.(HPSVP2ADMDUB))
--
--  REBIND PACKAGE(HP1.ADRDUC.(HPSV2ADRDUC))
--
--  REBIND PACKAGE(HP1.ADRDUC.(HPSVP2ADRDUC))
--
--  REBIND PACKAGE(HP1.ADRFUC.(HPSV2ADRFUC))
--
--  REBIND PACKAGE(HP1.ADRFUC.(HPSVP2ADRFUC))
--
--  REBIND PACKAGE(HP1.ADRHUC.(HPSV2ADRHUC))
--
--  REBIND PACKAGE(HP1.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP1.ADW1SA.(HPSVP2ADW1SA))
--
--  REBIND PACKAGE(HP1.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP1.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP1.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP1.AEYQOW.(HPSV2AEYQOW))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSV2AEYQOW))
--
--  REBIND PACKAGE(HP1.AEYQOW.(HPSVP1AEYQOW))
--
--  REBIND PACKAGE(HP1.AEYQOW.(HPSVP2AEYQOW))
--
--  REBIND PACKAGE(HP1.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP1.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZXSA.(HPSVP1AEZXSA))
--
--  REBIND PACKAGE(HP1.AEZXSA.(HPSVP2AEZXSA))
--
--  REBIND PACKAGE(HP1.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP1.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZXSA.(HPSVP1AEZXSA))
--
--  REBIND PACKAGE(HP1.AEZXSA.(HPSVP2AEZXSA))
--
--  REBIND PACKAGE(HP1.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP1.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP1.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP1.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZXSA.(HPSVP1AEZXSA))
--
--  REBIND PACKAGE(HP1.AEZXSA.(HPSVP2AEZXSA))
--
--  REBIND PACKAGE(HP1.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP1.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP1.AEZXSA.(HPSVP1AEZXSA))
--
--  REBIND PACKAGE(HP1.AEZXSA.(HPSVP2AEZXSA))
--
--  REBIND PACKAGE(HP1.AE2RUB.(HPSVP1AE2RUB))
--
--  REBIND PACKAGE(HP1.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HP1.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP1.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HP1.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP1.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HP1.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP1.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HP1.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP1.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP1.AFUUSA.(HPSVP2AFUUSA))
--
--  REBIND PACKAGE(HP1.AFW6SA.(HPSVP2AFW6SA))
--
--  REBIND PACKAGE(HP1.AFXASA.(HPSVP2AFXASA))
--
--  REBIND PACKAGE(HP1.AFXGSA.(HPSVP2AFXGSA))
--
--  REBIND PACKAGE(HP1.AFXJSA.(HPSVP2AFXJSA))
--
--  REBIND PACKAGE(HP1.AGAZSA.(HPSVP2AGAZSA))
--
--  REBIND PACKAGE(HP1.AGMVSA.(HPSVP2AGMVSA))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUTUB.(HPSVP2AGUTUB))
--
--  REBIND PACKAGE(HP1.AGUUUB.(HPSVP1AGUUUB))
--
--  REBIND PACKAGE(HP1.AGUUUB.(HPSVP2AGUUUB))
--
--  REBIND PACKAGE(HP1.AGUVUB.(HPSVP2AGUVUB))
--
--  REBIND PACKAGE(HP1.AGW7UB.(HPSVP1AGW7UB))
--
--  REBIND PACKAGE(HP1.AGW7UB.(HPSVP2AGW7UB))
--
--  REBIND PACKAGE(HP1.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP1.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP1.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP1.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP1.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP1.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP1.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP1.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP1.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP1.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP1.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP1.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP1.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP1.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP1.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP1.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP1.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP1.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP1.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.ANE3SA.(HPSVP2ANE3SA))
--
--  REBIND PACKAGE(HP1.ANJ7R9.(HPSVP2ANJ7R9))
--
--  REBIND PACKAGE(HP1.ANMWUB.(HPSVP2ANMWUB))
--
--  REBIND PACKAGE(HP1.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP1ARYFUB))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP1.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HP1.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HP1.A17VUB.(HPSVP2A17VUB))
--
--  REBIND PACKAGE(HP1.A25FUB.(HPSVP2A25FUB))
--
--  REBIND PACKAGE(HP1.A3ZYUB.(HPSVP2A3ZYUB))
--
--  REBIND PACKAGE(HP1.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP1.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP1.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP1.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A40AUB.(HPSVP2A40AUB))
--
--  REBIND PACKAGE(HP1.A40BUB.(HPSVP2A40BUB))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVI1ACAJUB))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP1.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP1.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP1.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP1.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP1ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLTUB.(HPSVP1ADLTUB))
--
--  REBIND PACKAGE(HP1.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HP1.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP1.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP1.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP1.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP1.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP1.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP1.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP1ARYFUB))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVI1ACAJUB))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP1.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP1.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP1.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP1.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP1ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLTUB.(HPSVP1ADLTUB))
--
--  REBIND PACKAGE(HP1.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HP1.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP1.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP1.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP1.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP1.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP1.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP1.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP1ARYFUB))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVI1ACAJUB))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP1.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP1.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP1.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP1.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP1ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP1.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP1.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP1ARYFUB))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVI1ACAJUB))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP1.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP1.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP1.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP1.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP1ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLTUB.(HPSVP1ADLTUB))
--
--  REBIND PACKAGE(HP1.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HP1.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP1.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP1.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP1.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP1.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP1.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP1.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP1ARYFUB))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVI1ACAJUB))
--
--  REBIND PACKAGE(HP1.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP1.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP1.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP1.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP1.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP1ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP1.ADLTUB.(HPSVP1ADLTUB))
--
--  REBIND PACKAGE(HP1.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HP1.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP1.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP1.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP1.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP1.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP1.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP1.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HP1.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP1.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP1ARYFUB))
--
--  REBIND PACKAGE(HP1.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP1.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVI1AEORUB))
--
--  REBIND PACKAGE(HP1.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP1.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP1.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVI1AEORUB))
--
--  REBIND PACKAGE(HP1.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP1.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP1.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVI1AEORUB))
--
--  REBIND PACKAGE(HP1.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP1.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVI1AEORUB))
--
--  REBIND PACKAGE(HP1.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP1.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP1.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP1.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP1.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP1.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP1.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP1.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP1.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP1.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP1.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP1.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP1.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP1.AEORUB.(HPSVI1AEORUB))
--
--  REBIND PACKAGE(HP1.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP1.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP1.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP1.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP1.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP1.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP1A4WRUB))
--
--  REBIND PACKAGE(HP1.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP1.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP1.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP1.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP1.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HP1.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HP1.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HP1.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP1.A8ZHHA.(HPSVP2A8ZHHA))
--
--  REBIND PACKAGE(HP1.A8ZIHA.(HPSVP2A8ZIHA))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP1.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP1.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP1.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP1.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP1.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP1.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP1.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP1.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP1.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP1.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP1.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP1.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP1.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP1.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP1.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP1.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP1.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP1.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP1.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP1.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP1.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP1.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP1.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP1.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP1.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP1.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP1.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP1.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP1.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP1.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP1AAB8X2))
--
--  REBIND PACKAGE(HP1.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP1.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP1.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP1.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVI1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP1.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP1.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP1.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP1.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP1.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP1.BEWFHA.(HPSVP1BEWFHA))
--
--  REBIND PACKAGE(HP1.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP1.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HP1.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HP1.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HP1.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP1.SIR338.(HPSVP1SIR338))
--
--  REBIND PACKAGE(HP1.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AAZDUB.(HPSVP2AAZDUB))
--
--  REBIND PACKAGE(HP3.AAZEUB.(HPSVP2AAZEUB))
--
--  REBIND PACKAGE(HP3.AAZFUB.(HPSVP2AAZFUB))
--
--  REBIND PACKAGE(HP3.AAZGUB.(HPSVP2AAZGUB))
--
--  REBIND PACKAGE(HP3.AAZSUB.(HPSVP2AAZSUB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP3AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP3.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HP3.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP3AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP3.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HP3.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP3AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP3.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP3AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP3.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HP3.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP2AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUOUB.(HPSVP3AAUOUB))
--
--  REBIND PACKAGE(HP3.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HP3.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HP3.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP3.AA6FR9.(HPSVP2AA6FR9))
--
--  REBIND PACKAGE(HP3.AA6FR9.(HPSVP1AA6FR9))
--
--  REBIND PACKAGE(HP3.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP3.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP3.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP3.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP3.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP3.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP3.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP3.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP3.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP3.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP3.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP3.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP3.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP3.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP3.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP3.AA6IR9.(HPSVP2AA6IR9))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAMLR9.(HPSVP2AAMLR9))
--
--  REBIND PACKAGE(HP3.AAWJUB.(HPSVP2AAWJUB))
--
--  REBIND PACKAGE(HP3.AAZBR9.(HPSVP2AAZBR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.AA72UB.(HPSVP1AA72UB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUMUB.(HPSVP1AAUMUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP3AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSV2AA72UB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUMUB.(HPSV2AAUMUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HP3.AA72UB.(HPSVP3AA72UB))
--
--  REBIND PACKAGE(HP3.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUMUB.(HPSVP1AAUMUB))
--
--  REBIND PACKAGE(HP3.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP3AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP3.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP3.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP3AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP3.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUMUB.(HPSVP1AAUMUB))
--
--  REBIND PACKAGE(HP3.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP3AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP3.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP1AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HP3.AAUMUB.(HPSVP1AAUMUB))
--
--  REBIND PACKAGE(HP3.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP3AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP1AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP1AAUUUB))
--
--  REBIND PACKAGE(HP3.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HP3.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP3ABUCSA))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP3.ABVFSA.(HPSVP3ABVFSA))
--
--  REBIND PACKAGE(HPS.AAZDUB.(HPSV2AAZDUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSV2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZFUB.(HPSV2AAZFUB))
--
--  REBIND PACKAGE(HPS.AAZGUB.(HPSV2AAZGUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSV2AAZSUB))
--
--  REBIND PACKAGE(HPS.ABVFSA.(HPSV2ABVFSA))
--
--  REBIND PACKAGE(HP3.ABVFSA.(HPSVP2ABVFSA))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSV2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSVP2AAZEUB))
--
--  REBIND PACKAGE(HPS.ABVFSA.(HPSV2ABVFSA))
--
--  REBIND PACKAGE(HP3.ABVFSA.(HPSVP2ABVFSA))
--
--  REBIND PACKAGE(HP3.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP3.AB5KSA.(HPSVP2AB5KSA))
--
--  REBIND PACKAGE(HP3.AB5NSA.(HPSVP2AB5NSA))
--
--  REBIND PACKAGE(HP3.AB7RUB.(HPSVP2AB7RUB))
--
--  REBIND PACKAGE(HP3.AB7VSA.(HPSVP3AB7VSA))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUQUB.(HPSV2AAUQUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HPS.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HPS.ACAJUB.(HPSV2ACAJUB))
--
--  REBIND PACKAGE(HP3.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP3.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP3.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP3.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP3.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP3ABRPSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP3.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP3.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP3.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP3.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP3.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP3ABRPSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP3.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP3.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP3.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP3.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP3ABRPSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP3.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP3.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP3.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP3.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP3.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP3ABRPSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP3.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HP3.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HP3.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HP3.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HP3.ABRJSA.(HPSVP2ABRJSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP3ABRPSA))
--
--  REBIND PACKAGE(HP3.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HP3.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP3.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP3ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP3AC8PSA))
--
--  REBIND PACKAGE(HP3.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP3AC8PSA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP3.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP3.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP3AC8PSA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP3.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP3AC8PSA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP3.AC86SA.(HPSVP2AC86SA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP3AC8PSA))
--
--  REBIND PACKAGE(HP3.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HP3.ADL9UB.(HPSVP2ADL9UB))
--
--  REBIND PACKAGE(HP3.ADMBUB.(HPSVP2ADMBUB))
--
--  REBIND PACKAGE(HP3.ADMCUB.(HPSVP2ADMCUB))
--
--  REBIND PACKAGE(HP3.ADMDUB.(HPSVP2ADMDUB))
--
--  REBIND PACKAGE(HP3.ADRDUC.(HPSVP2ADRDUC))
--
--  REBIND PACKAGE(HP3.ADRFUC.(HPSVP2ADRFUC))
--
--  REBIND PACKAGE(HP3.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP3ADWVUB))
--
--  REBIND PACKAGE(HP3.ADW1SA.(HPSVP2ADW1SA))
--
--  REBIND PACKAGE(HP3.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP3.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP3.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP3AERFUC))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA6FR9.(HPSV2AA6FR9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSV2AA78R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.ADRDUC.(HPSV2ADRDUC))
--
--  REBIND PACKAGE(HPS.ADRFUC.(HPSV2ADRFUC))
--
--  REBIND PACKAGE(HPS.ADRHUC.(HPSV2ADRHUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP3AERFUC))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP3.AEYQOW.(HPSVP1AEYQOW))
--
--  REBIND PACKAGE(HP3.AEYQOW.(HPSVP3AEYQOW))
--
--  REBIND PACKAGE(HP3.AEYQOW.(HPSVP2AEYQOW))
--
--  REBIND PACKAGE(HP3.AE0ASA.(HPSVP3AE0ASA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP3AEZ1SA))
--
--  REBIND PACKAGE(HP3.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP3AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZXSA.(HPSVP1AEZXSA))
--
--  REBIND PACKAGE(HP3.AEZXSA.(HPSVP2AEZXSA))
--
--  REBIND PACKAGE(HP3.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZXSA.(HPSVP1AEZXSA))
--
--  REBIND PACKAGE(HP3.AEZXSA.(HPSVP2AEZXSA))
--
--  REBIND PACKAGE(HP3.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP3AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP3.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP3AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZXSA.(HPSVP1AEZXSA))
--
--  REBIND PACKAGE(HP3.AEZXSA.(HPSVP2AEZXSA))
--
--  REBIND PACKAGE(HP3.AE0ASA.(HPSVP2AE0ASA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP3AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ1SA.(HPSVP2AEZ1SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP1AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZ4SA.(HPSVP2AEZ4SA))
--
--  REBIND PACKAGE(HP3.AEZXSA.(HPSVP1AEZXSA))
--
--  REBIND PACKAGE(HP3.AEZXSA.(HPSVP2AEZXSA))
--
--  REBIND PACKAGE(HP3.AE2RUB.(HPSVP3AE2RUB))
--
--  REBIND PACKAGE(HP3.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HP3.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP3.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HP3.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP3.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HP3.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP3.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HP3.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP3.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP3.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP3.AFUUSA.(HPSVP2AFUUSA))
--
--  REBIND PACKAGE(HP3.AFW6SA.(HPSVP2AFW6SA))
--
--  REBIND PACKAGE(HP3.AFXASA.(HPSVP2AFXASA))
--
--  REBIND PACKAGE(HP3.AFXGSA.(HPSVP2AFXGSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AFUUSA.(HPSVP2AFUUSA))
--
--  REBIND PACKAGE(HPS.AFXGSA.(HPSVP2AFXGSA))
--
--  REBIND PACKAGE(HP3.AFXGSA.(HPSVP2AFXGSA))
--
--  REBIND PACKAGE(HP3.AFXJSA.(HPSVP2AFXJSA))
--
--  REBIND PACKAGE(HP3.AGAZSA.(HPSVP2AGAZSA))
--
--  REBIND PACKAGE(HP3.AGMVSA.(HPSVP2AGMVSA))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HPS.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HP3.AGUTUB.(HPSVP2AGUTUB))
--
--  REBIND PACKAGE(HPS.ADW1SA.(HPSVP2ADW1SA))
--
--  REBIND PACKAGE(HPS.AGUTUB.(HPSVP2AGUTUB))
--
--  REBIND PACKAGE(HP3.AGUTUB.(HPSVP2AGUTUB))
--
--  REBIND PACKAGE(HP3.AGUUUB.(HPSVP1AGUUUB))
--
--  REBIND PACKAGE(HP3.AGUUUB.(HPSVP2AGUUUB))
--
--  REBIND PACKAGE(HP3.AGUVUB.(HPSVP2AGUVUB))
--
--  REBIND PACKAGE(HP3.AGW7UB.(HPSVP1AGW7UB))
--
--  REBIND PACKAGE(HP3.AGW7UB.(HPSVP2AGW7UB))
--
--  REBIND PACKAGE(HPS.ADW1SA.(HPSVP2ADW1SA))
--
--  REBIND PACKAGE(HPS.AGUTUB.(HPSVP2AGUTUB))
--
--  REBIND PACKAGE(HP3.AGW7UB.(HPSVP2AGW7UB))
--
--  REBIND PACKAGE(HPS.ADW1SA.(HPSVP2ADW1SA))
--
--  REBIND PACKAGE(HPS.AGUTUB.(HPSVP2AGUTUB))
--
--  REBIND PACKAGE(HP3.AGW7UB.(HPSVP2AGW7UB))
--
--  REBIND PACKAGE(HPS.ADW1SA.(HPSVP2ADW1SA))
--
--  REBIND PACKAGE(HPS.AGUTUB.(HPSVP2AGUTUB))
--
--  REBIND PACKAGE(HP3.AGW7UB.(HPSVP2AGW7UB))
--
--  REBIND PACKAGE(HPS.ADW1SA.(HPSVP2ADW1SA))
--
--  REBIND PACKAGE(HPS.AGUTUB.(HPSVP2AGUTUB))
--
--  REBIND PACKAGE(HP3.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA6FR9.(HPSV2AA6FR9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSV2AA78R9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.ADRDUC.(HPSV2ADRDUC))
--
--  REBIND PACKAGE(HPS.ADRFUC.(HPSV2ADRFUC))
--
--  REBIND PACKAGE(HPS.ADRHUC.(HPSV2ADRHUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA6FR9.(HPSV2AA6FR9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSV2AA78R9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.ADRDUC.(HPSV2ADRDUC))
--
--  REBIND PACKAGE(HPS.ADRFUC.(HPSV2ADRFUC))
--
--  REBIND PACKAGE(HPS.ADRHUC.(HPSV2ADRHUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA6FR9.(HPSV2AA6FR9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSV2AA78R9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.ADRDUC.(HPSV2ADRDUC))
--
--  REBIND PACKAGE(HPS.ADRFUC.(HPSV2ADRFUC))
--
--  REBIND PACKAGE(HPS.ADRHUC.(HPSV2ADRHUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA6FR9.(HPSV2AA6FR9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSV2AA78R9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.ADRDUC.(HPSV2ADRDUC))
--
--  REBIND PACKAGE(HPS.ADRFUC.(HPSV2ADRFUC))
--
--  REBIND PACKAGE(HPS.ADRHUC.(HPSV2ADRHUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA6FR9.(HPSV2AA6FR9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSV2AA78R9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.ADRDUC.(HPSV2ADRDUC))
--
--  REBIND PACKAGE(HPS.ADRFUC.(HPSV2ADRFUC))
--
--  REBIND PACKAGE(HPS.ADRHUC.(HPSV2ADRHUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSV2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA5JR9.(HPSVP2AA5JR9))
--
--  REBIND PACKAGE(HPS.AA6FR9.(HPSV2AA6FR9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSV2AA78R9))
--
--  REBIND PACKAGE(HPS.AA78R9.(HPSVP2AA78R9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.ADRDUC.(HPSV2ADRDUC))
--
--  REBIND PACKAGE(HPS.ADRFUC.(HPSV2ADRFUC))
--
--  REBIND PACKAGE(HPS.ADRHUC.(HPSV2ADRHUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP3AMTFSA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AGMVSA.(HPSVP2AGMVSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AA6IR9.(HPSV2AA6IR9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HPS.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HPS.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB7RUB.(HPSV2AB7RUB))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AAZDUB.(HPSV2AAZDUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSV2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSVP2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZFUB.(HPSV2AAZFUB))
--
--  REBIND PACKAGE(HPS.AAZGUB.(HPSV2AAZGUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSV2AAZSUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSVP2AAZSUB))
--
--  REBIND PACKAGE(HPS.ABVFSA.(HPSV2ABVFSA))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSVP2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSVP2AAZSUB))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AA6IR9.(HPSV2AA6IR9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HPS.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HPS.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB7RUB.(HPSV2AB7RUB))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AAZDUB.(HPSV2AAZDUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSV2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSVP2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZFUB.(HPSV2AAZFUB))
--
--  REBIND PACKAGE(HPS.AAZGUB.(HPSV2AAZGUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSV2AAZSUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSVP2AAZSUB))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AA6IR9.(HPSV2AA6IR9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HPS.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HPS.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB7RUB.(HPSV2AB7RUB))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AA6IR9.(HPSV2AA6IR9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HPS.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HPS.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB7RUB.(HPSV2AB7RUB))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AAZDUB.(HPSV2AAZDUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSV2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSVP2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZFUB.(HPSV2AAZFUB))
--
--  REBIND PACKAGE(HPS.AAZGUB.(HPSV2AAZGUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSV2AAZSUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSVP2AAZSUB))
--
--  REBIND PACKAGE(HPS.ABVFSA.(HPSV2ABVFSA))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AA6IR9.(HPSV2AA6IR9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAMLR9.(HPSV2AAMLR9))
--
--  REBIND PACKAGE(HPS.AAWJUB.(HPSV2AAWJUB))
--
--  REBIND PACKAGE(HPS.AAZBR9.(HPSV2AAZBR9))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB7RUB.(HPSV2AB7RUB))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AAZDUB.(HPSV2AAZDUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSV2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZEUB.(HPSVP2AAZEUB))
--
--  REBIND PACKAGE(HPS.AAZFUB.(HPSV2AAZFUB))
--
--  REBIND PACKAGE(HPS.AAZGUB.(HPSV2AAZGUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSV2AAZSUB))
--
--  REBIND PACKAGE(HPS.AAZSUB.(HPSVP2AAZSUB))
--
--  REBIND PACKAGE(HPS.ABVFSA.(HPSV2ABVFSA))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.AM3LSA.(HPSVP2AM3LSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP3.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP3AMTFSA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP3.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP3.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP3AMTFSA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP3.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP3.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HPS.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP3.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP3.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP3AMTFSA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP3.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HP3.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP3AMTFSA))
--
--  REBIND PACKAGE(HP3.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HP3.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.ANE3SA.(HPSVP2ANE3SA))
--
--  REBIND PACKAGE(HP3.ANJ7R9.(HPSVP2ANJ7R9))
--
--  REBIND PACKAGE(HP3.ANMWUB.(HPSVP2ANMWUB))
--
--  REBIND PACKAGE(HP3.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AFUUSA.(HPSVP2AFUUSA))
--
--  REBIND PACKAGE(HPS.AFW6SA.(HPSVP2AFW6SA))
--
--  REBIND PACKAGE(HPS.AFXGSA.(HPSVP2AFXGSA))
--
--  REBIND PACKAGE(HPS.AFXJSA.(HPSVP2AFXJSA))
--
--  REBIND PACKAGE(HPS.AGMVSA.(HPSVP2AGMVSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HP3.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AFUUSA.(HPSVP2AFUUSA))
--
--  REBIND PACKAGE(HPS.AFW6SA.(HPSVP2AFW6SA))
--
--  REBIND PACKAGE(HPS.AFXGSA.(HPSVP2AFXGSA))
--
--  REBIND PACKAGE(HPS.AFXJSA.(HPSVP2AFXJSA))
--
--  REBIND PACKAGE(HPS.AGMVSA.(HPSVP2AGMVSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HP3.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AFXJSA.(HPSVP2AFXJSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HP3.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AFUUSA.(HPSVP2AFUUSA))
--
--  REBIND PACKAGE(HPS.AFW6SA.(HPSVP2AFW6SA))
--
--  REBIND PACKAGE(HPS.AFXGSA.(HPSVP2AFXGSA))
--
--  REBIND PACKAGE(HPS.AFXJSA.(HPSVP2AFXJSA))
--
--  REBIND PACKAGE(HPS.AGMVSA.(HPSVP2AGMVSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HP3.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AFUUSA.(HPSVP2AFUUSA))
--
--  REBIND PACKAGE(HPS.AFW6SA.(HPSVP2AFW6SA))
--
--  REBIND PACKAGE(HPS.AFXGSA.(HPSVP2AFXGSA))
--
--  REBIND PACKAGE(HPS.AFXJSA.(HPSVP2AFXJSA))
--
--  REBIND PACKAGE(HPS.AGMVSA.(HPSVP2AGMVSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AOPRSA.(HPSVP2AOPRSA))
--
--  REBIND PACKAGE(HP3.AO1IPA.(HPSVP3AO1IPA))
--
--  REBIND PACKAGE(HP3.AO1JPA.(HPSVP3AO1JPA))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HPS.ADL9UB.(HPSVP2ADL9UB))
--
--  REBIND PACKAGE(HPS.ADMBUB.(HPSVP2ADMBUB))
--
--  REBIND PACKAGE(HPS.ADMCUB.(HPSVP2ADMCUB))
--
--  REBIND PACKAGE(HPS.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HPS.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HPS.ANMWUB.(HPSVP2ANMWUB))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HPS.ADL9UB.(HPSVP2ADL9UB))
--
--  REBIND PACKAGE(HPS.ADMBUB.(HPSVP2ADMBUB))
--
--  REBIND PACKAGE(HPS.ADMCUB.(HPSVP2ADMCUB))
--
--  REBIND PACKAGE(HPS.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HPS.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HPS.ANMWUB.(HPSVP2ANMWUB))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HPS.ADL9UB.(HPSVP2ADL9UB))
--
--  REBIND PACKAGE(HPS.ADMCUB.(HPSVP2ADMCUB))
--
--  REBIND PACKAGE(HPS.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HPS.ANMWUB.(HPSVP2ANMWUB))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HPS.ADL9UB.(HPSVP2ADL9UB))
--
--  REBIND PACKAGE(HPS.ADMBUB.(HPSVP2ADMBUB))
--
--  REBIND PACKAGE(HPS.ADMCUB.(HPSVP2ADMCUB))
--
--  REBIND PACKAGE(HPS.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HPS.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HPS.ANMWUB.(HPSVP2ANMWUB))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AC8PSA.(HPSVP2AC8PSA))
--
--  REBIND PACKAGE(HPS.ADL9UB.(HPSVP2ADL9UB))
--
--  REBIND PACKAGE(HPS.ADMBUB.(HPSVP2ADMBUB))
--
--  REBIND PACKAGE(HPS.ADMCUB.(HPSVP2ADMCUB))
--
--  REBIND PACKAGE(HPS.AE2RUB.(HPSVP2AE2RUB))
--
--  REBIND PACKAGE(HPS.AEI6UB.(HPSVP2AEI6UB))
--
--  REBIND PACKAGE(HPS.ANMWUB.(HPSVP2ANMWUB))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSV2AA72UB))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUMUB.(HPSV2AAUMUB))
--
--  REBIND PACKAGE(HPS.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HPS.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ANE3SA.(HPSVP2ANE3SA))
--
--  REBIND PACKAGE(HPS.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HPS.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ANE3SA.(HPSVP2ANE3SA))
--
--  REBIND PACKAGE(HPS.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSV2AA72UB))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HPS.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ANE3SA.(HPSVP2ANE3SA))
--
--  REBIND PACKAGE(HPS.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSV2AA72UB))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUMUB.(HPSV2AAUMUB))
--
--  REBIND PACKAGE(HPS.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HPS.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ANE3SA.(HPSVP2ANE3SA))
--
--  REBIND PACKAGE(HPS.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSV2AA72UB))
--
--  REBIND PACKAGE(HPS.AA72UB.(HPSVP2AA72UB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSV2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUCUB.(HPSVP2AAUCUB))
--
--  REBIND PACKAGE(HPS.AAUMUB.(HPSV2AAUMUB))
--
--  REBIND PACKAGE(HPS.AAUMUB.(HPSVP2AAUMUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSV2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUNUB.(HPSVP2AAUNUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSV2AAUUUB))
--
--  REBIND PACKAGE(HPS.AAUUUB.(HPSVP2AAUUUB))
--
--  REBIND PACKAGE(HPS.AM3TSA.(HPSVP2AM3TSA))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ANE3SA.(HPSVP2ANE3SA))
--
--  REBIND PACKAGE(HPS.ASZGR9.(HPSVP2ASZGR9))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUQUB.(HPSV2AAUQUB))
--
--  REBIND PACKAGE(HPS.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HPS.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HPS.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HPS.ACAJUB.(HPSV2ACAJUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HP3.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HPS.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HP3.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HPS.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HPS.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HPS.ACAJUB.(HPSV2ACAJUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HP3.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUQUB.(HPSV2AAUQUB))
--
--  REBIND PACKAGE(HPS.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HPS.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HPS.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HPS.ACAJUB.(HPSV2ACAJUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HP3.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AAUOUB.(HPSV2AAUOUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSV2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUPUB.(HPSVP2AAUPUB))
--
--  REBIND PACKAGE(HPS.AAUQUB.(HPSV2AAUQUB))
--
--  REBIND PACKAGE(HPS.AAUQUB.(HPSVP2AAUQUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSV2AAURUB))
--
--  REBIND PACKAGE(HPS.AAURUB.(HPSVP2AAURUB))
--
--  REBIND PACKAGE(HPS.AB7VSA.(HPSVP2AB7VSA))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSV2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABAKUB.(HPSVP2ABAKUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSV2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABOCUB.(HPSVP2ABOCUB))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSV2ABONSA))
--
--  REBIND PACKAGE(HPS.ABONSA.(HPSVP2ABONSA))
--
--  REBIND PACKAGE(HPS.ABRJSA.(HPSV2ABRJSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSV2ABRPSA))
--
--  REBIND PACKAGE(HPS.ABRPSA.(HPSVP2ABRPSA))
--
--  REBIND PACKAGE(HPS.ACAJUB.(HPSV2ACAJUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AM3QSA.(HPSVP2AM3QSA))
--
--  REBIND PACKAGE(HPS.AMEISA.(HPSVP2AMEISA))
--
--  REBIND PACKAGE(HPS.AMTFSA.(HPSVP2AMTFSA))
--
--  REBIND PACKAGE(HPS.AV4HUB.(HPSVP2AV4HUB))
--
--  REBIND PACKAGE(HP3.A17VUB.(HPSVP2A17VUB))
--
--  REBIND PACKAGE(HP3.A25FUB.(HPSVP2A25FUB))
--
--  REBIND PACKAGE(HP3.A3ZYUB.(HPSVP2A3ZYUB))
--
--  REBIND PACKAGE(HP3.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP3ADWVUB))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP3.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A40AUB.(HPSVP2A40AUB))
--
--  REBIND PACKAGE(HP3.A40BUB.(HPSVP2A40BUB))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP3.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP3.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP3ACOMSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP3.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP3.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP3.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HP3.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP3.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP3.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP3ADWVUB))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP3.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP3.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP3.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP3.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP3.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP3.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP3.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP3ACOMSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP3.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP3.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP3.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HP3.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP3.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP3.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP3.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP3.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP3.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP3.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP3.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP3.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP3.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP3ACOMSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP3.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP3.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP3.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP3.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP3.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP3.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP3.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP3.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP3.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP3.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP3ACOMSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP3.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP3.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP3.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HP3.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP3.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP3.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP3ADWVUB))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP3.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP3.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP3.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP3.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP3.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ACAJUB.(HPSVP2ACAJUB))
--
--  REBIND PACKAGE(HP3.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HP3.ACOGSA.(HPSVP2ACOGSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP3ACOMSA))
--
--  REBIND PACKAGE(HP3.ACOMSA.(HPSVP2ACOMSA))
--
--  REBIND PACKAGE(HP3.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HP3.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HP3.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HP3.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HP3.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HP3.ADRHUC.(HPSVP2ADRHUC))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP3ADWVUB))
--
--  REBIND PACKAGE(HP3.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HP3.AG2RSA.(HPSVP2AG2RSA))
--
--  REBIND PACKAGE(HP3.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HP3.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HP3.ACDHUB.(HPSVP2ACDHUB))
--
--  REBIND PACKAGE(HP3.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HP3.ACDLUB.(HPSVP2ACDLUB))
--
--  REBIND PACKAGE(HP3.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP3.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP3.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP3ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP3ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HP3.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP3AERFUC))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP3.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP3.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP3.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP3ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP3.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP3.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP3.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP3ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP3ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HP3.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP3.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP3.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP3.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP3ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP3ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HP3.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP3AERFUC))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP3.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HP3.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HP3.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP1AA59R9))
--
--  REBIND PACKAGE(HP3.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP1AA6VR9))
--
--  REBIND PACKAGE(HP3.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP1AAWLUB))
--
--  REBIND PACKAGE(HP3.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HP3.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HP3.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HP3.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP1ACECUB))
--
--  REBIND PACKAGE(HP3.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP1ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP3ACEJUB))
--
--  REBIND PACKAGE(HP3.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP3ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP1ACENUB))
--
--  REBIND PACKAGE(HP3.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HP3.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HP3.AEORUB.(HPSVP2AEORUB))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP3AERFUC))
--
--  REBIND PACKAGE(HP3.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HP3.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP3.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HP3.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HP3.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HP3.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HP3.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HP3.A8W6HA.(HPSVP3A8W6HA))
--
--  REBIND PACKAGE(HP3.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP3.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP3.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP3.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP3AA7XUB))
--
--  REBIND PACKAGE(HP3.AA7XUB.(HPSVP2AA7XUB))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HP3.AATZUB.(HPSVP2AATZUB))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.A8ZGHA.(HPSVP2A8ZGHA))
--
--  REBIND PACKAGE(HP3.A8ZHHA.(HPSVP2A8ZHHA))
--
--  REBIND PACKAGE(HP3.A8ZIHA.(HPSVP2A8ZIHA))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP3A8ZJHA))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP3.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP3.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP3ABUCSA))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP3.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP3.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP3.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP3.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP3.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP3.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP3.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP3.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP3.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP3.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP3.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP3ABUCSA))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP3.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP3.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP3.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP3.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP3.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP3.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP3ABUCSA))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP3.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP3.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP3.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP3.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.AB5SSA.(HPSVP2AB5SSA))
--
--  REBIND PACKAGE(HP3.AB8BSA.(HPSVP2AB8BSA))
--
--  REBIND PACKAGE(HP3.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HP3.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HP3.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HP3.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HP3.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HP3.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP1AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HP3.AA2ODA.(HPSVP3AA2ODA))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP3AAB8X2))
--
--  REBIND PACKAGE(HP3.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP3ABUCSA))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP1ABUCSA))
--
--  REBIND PACKAGE(HP3.ABUCSA.(HPSVP2ABUCSA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP1AFA8SA))
--
--  REBIND PACKAGE(HP3.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HP3.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP1AGUIUB))
--
--  REBIND PACKAGE(HP3.AGUIUB.(HPSVP2AGUIUB))
--
--  REBIND PACKAGE(HP3.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HP3.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HP3.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP3ASW0R9))
--
--  REBIND PACKAGE(HP3.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP3BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A17VUB.(HPSVP2A17VUB))
--
--  REBIND PACKAGE(HPS.A25FUB.(HPSVP2A25FUB))
--
--  REBIND PACKAGE(HPS.A3ZYUB.(HPSVP2A3ZYUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HPS.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HPS.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HPS.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HPS.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP5330.(19970505185844S101702A063724ARP5330))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A17VUB.(HPSVP2A17VUB))
--
--  REBIND PACKAGE(HPS.A25FUB.(HPSVP2A25FUB))
--
--  REBIND PACKAGE(HPS.A3ZYUB.(HPSVP2A3ZYUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HPS.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HPS.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HPS.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP5330.(19970505185844S101702A063724ARP5330))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A17VUB.(HPSVP2A17VUB))
--
--  REBIND PACKAGE(HPS.A3ZYUB.(HPSVP2A3ZYUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP5330.(19970505185844S101702A063724ARP5330))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A25FUB.(HPSVP2A25FUB))
--
--  REBIND PACKAGE(HPS.A3ZYUB.(HPSVP2A3ZYUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HPS.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HPS.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HPS.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A17VUB.(HPSVP2A17VUB))
--
--  REBIND PACKAGE(HPS.A25FUB.(HPSVP2A25FUB))
--
--  REBIND PACKAGE(HPS.A3ZYUB.(HPSVP2A3ZYUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HPS.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HPS.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HPS.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HPS.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP5330.(19970505185844S101702A063724ARP5330))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A8W6HA.(HPSVP2A8W6HA))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMLSW.(HPSVP2AEMLSW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.AMYKSA.(HPSVP2AMYKSA))
--
--  REBIND PACKAGE(HPS.AMYLSA.(HPSVP2AMYLSA))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HP3.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.A17VUB.(HPSVP2A17VUB))
--
--  REBIND PACKAGE(HPS.A25FUB.(HPSVP2A25FUB))
--
--  REBIND PACKAGE(HPS.A3ZYUB.(HPSVP2A3ZYUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A8ZJHA.(HPSVP2A8ZJHA))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ABUCSA.(HPSV2ABUCSA))
--
--  REBIND PACKAGE(HPS.AFA8SA.(HPSVP2AFA8SA))
--
--  REBIND PACKAGE(HPS.AG76SA.(HPSVP2AG76SA))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.AHA3SA.(HPSVP2AHA3SA))
--
--  REBIND PACKAGE(HPS.ANEJSA.(HPSVP2ANEJSA))
--
--  REBIND PACKAGE(HPS.ARP3UB.(HPSVP2ARP3UB))
--
--  REBIND PACKAGE(HPS.ASW0R9.(HPSVP2ASW0R9))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP5330.(19970505185844S101702A063724ARP5330))
--
--  REBIND PACKAGE(HP3.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ARIJSA.(HPSVP2ARIJSA))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ARIJSA.(HPSVP2ARIJSA))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ARIJSA.(HPSVP2ARIJSA))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ARIJSA.(HPSVP2ARIJSA))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAA0X2.(HPSVP2AAA0X2))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSV2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDFUB.(HPSVP2ACDFUB))
--
--  REBIND PACKAGE(HPS.ACDHUB.(HPSV2ACDHUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSV2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDJUB.(HPSVP2ACDJUB))
--
--  REBIND PACKAGE(HPS.ACDLUB.(HPSV2ACDLUB))
--
--  REBIND PACKAGE(HPS.AGMJUB.(HPSVP2AGMJUB))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ARIJSA.(HPSVP2ARIJSA))
--
--  REBIND PACKAGE(HPS.ARYFUB.(HPSVP2ARYFUB))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40AUB.(HPSVP2A40AUB))
--
--  REBIND PACKAGE(HPS.A40BUB.(HPSVP2A40BUB))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HPS.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HPS.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HPS.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HPS.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HPS.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HPS.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40AUB.(HPSVP2A40AUB))
--
--  REBIND PACKAGE(HPS.A40BUB.(HPSVP2A40BUB))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HPS.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HPS.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HPS.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HPS.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HPS.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HPS.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40AUB.(HPSVP2A40AUB))
--
--  REBIND PACKAGE(HPS.A40BUB.(HPSVP2A40BUB))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HPS.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HPS.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HPS.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HPS.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40AUB.(HPSVP2A40AUB))
--
--  REBIND PACKAGE(HPS.A40BUB.(HPSVP2A40BUB))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HPS.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HPS.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HPS.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HPS.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HPS.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HPS.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A41NUB.(HPSVP2A41NUB))
--
--  REBIND PACKAGE(HPS.A4GGUB.(HPSVP2A4GGUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSV2AA59R9))
--
--  REBIND PACKAGE(HPS.AA59R9.(HPSVP2AA59R9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSV2AA6VR9))
--
--  REBIND PACKAGE(HPS.AA6VR9.(HPSVP2AA6VR9))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSV2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAL6R9.(HPSVP2AAL6R9))
--
--  REBIND PACKAGE(HPS.AAWLUB.(HPSVP2AAWLUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSV2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AB4ZUB.(HPSVP2AB4ZUB))
--
--  REBIND PACKAGE(HPS.AC2ER9.(HPSVP2AC2ER9))
--
--  REBIND PACKAGE(HPS.ACDEUB.(HPSVP2ACDEUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSV2ACECUB))
--
--  REBIND PACKAGE(HPS.ACECUB.(HPSVP2ACECUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSV2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACEJUB.(HPSVP2ACEJUB))
--
--  REBIND PACKAGE(HPS.ACENUB.(HPSVP2ACENUB))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVH2ACNYV8))
--
--  REBIND PACKAGE(HPS.ACNYV8.(HPSVP2ACNYV8))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSV2AERFUC))
--
--  REBIND PACKAGE(HPS.AERFUC.(HPSVP2AERFUC))
--
--  REBIND PACKAGE(HPS.AFUBUC.(HPSVP2AFUBUC))
--
--  REBIND PACKAGE(HPS.ANP1R9.(HPSVP2ANP1R9))
--
--  REBIND PACKAGE(HPS.ASCCR9.(HPSVP2ASCCR9))
--
--  REBIND PACKAGE(HPS.AV1NUB.(HPSVP2AV1NUB))
--
--  REBIND PACKAGE(HPS.BPVLT4.(HPSVP2BPVLT4))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HPS.A40AUB.(HPSVP2A40AUB))
--
--  REBIND PACKAGE(HPS.A40BUB.(HPSVP2A40BUB))
--
--  REBIND PACKAGE(HPS.A40SUB.(HPSVP2A40SUB))
--
--  REBIND PACKAGE(HPS.A4R1UB.(HPSVP2A4R1UB))
--
--  REBIND PACKAGE(HPS.A4VKUB.(HPSVP2A4VKUB))
--
--  REBIND PACKAGE(HPS.A4WRUB.(HPSVP2A4WRUB))
--
--  REBIND PACKAGE(HPS.A4Y6UB.(HPSVP2A4Y6UB))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.ACLUSA.(HPSVP2ACLUSA))
--
--  REBIND PACKAGE(HPS.ADLRUB.(HPSVP2ADLRUB))
--
--  REBIND PACKAGE(HPS.ADLSUB.(HPSVP2ADLSUB))
--
--  REBIND PACKAGE(HPS.ADLTUB.(HPSVP2ADLTUB))
--
--  REBIND PACKAGE(HPS.ADLUUB.(HPSVP2ADLUUB))
--
--  REBIND PACKAGE(HPS.ADLVUB.(HPSVP2ADLVUB))
--
--  REBIND PACKAGE(HPS.ADWVUB.(HPSVP2ADWVUB))
--
--  REBIND PACKAGE(HPS.ALPFSA.(HPSVP2ALPFSA))
--
--  REBIND PACKAGE(HPS.BPXVT4.(HPSVP2BPXVT4))
--
--  REBIND PACKAGE(HP3.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSV2AEYQOW))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSVP2AEYQOW))
--
--  REBIND PACKAGE(HPS.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HP3.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSVP2AEYQOW))
--
--  REBIND PACKAGE(HPS.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HP3.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSV2AEYQOW))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSVP2AEYQOW))
--
--  REBIND PACKAGE(HPS.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HP3.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSV2AEYQOW))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSVP2AEYQOW))
--
--  REBIND PACKAGE(HPS.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HP3.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSV2AEYQOW))
--
--  REBIND PACKAGE(HPS.AEYQOW.(HPSVP2AEYQOW))
--
--  REBIND PACKAGE(HPS.BPYGX2.(HPSVP2BPYGX2))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP1SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(HP3.SIR338.(HPSVP2SIR338))
--
--  REBIND PACKAGE(HPS.AA2ODA.(HPSVP2AA2ODA))
--
--  REBIND PACKAGE(HPS.AA7XUB.(HPSV2AA7XUB))
--
--  REBIND PACKAGE(HPS.AAB8X2.(HPSVP2AAB8X2))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSV2AAT2UB))
--
--  REBIND PACKAGE(HPS.AAT2UB.(HPSVP2AAT2UB))
--
--  REBIND PACKAGE(HPS.AATZUB.(HPSV2AATZUB))
--
--  REBIND PACKAGE(HPS.AEKNSW.(HPSVP2AEKNSW))
--
--  REBIND PACKAGE(HPS.AEL2SW.(HPSVP2AEL2SW))
--
--  REBIND PACKAGE(HPS.AEMXSW.(HPSVP2AEMXSW))
--
--  REBIND PACKAGE(HPS.BEWFHA.(HPSVP2BEWFHA))
--
--  REBIND PACKAGE(HPS.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(HPS.SIR338.(HPSV2SIR338))
--
--  REBIND PACKAGE(NTA1P.CZA0258.(CRMB000570))
--
--  REBIND PACKAGE(NTA1P.CZA0258.(CRMB000615))
--
--  REBIND PACKAGE(NTA1P.CZA0258.(CRMB000653))
--
--  REBIND PACKAGE(NTA1P.CZA0258.(A02E00052354311616))
--
--  REBIND PACKAGE(NTA1P.RM7210.(CRMB000236))
--
--  REBIND PACKAGE(NTA1P.RM7210.(CRMB000438))
--
--  REBIND PACKAGE(RM.RM7210.(A12M004011))
--
--  REBIND PACKAGE(RM.RM7210.(A12M004713))
--
--  REBIND PACKAGE(RM.RM7210.(A12M006213))
--
--  REBIND PACKAGE(RM.RM7210.(A12M006451))
--
--  REBIND PACKAGE(RM.RM7210.(PARS000056))
--
--  REBIND PACKAGE(RM.YRMR102.(A12M006252537A3D95))
--
--  REBIND PACKAGE(RM.YRMR102.(PARS000036560AE817))
--
--  REBIND PACKAGE(RM.YRMR102.(PARS0000505666A32F))
--
--  REBIND PACKAGE(RP.RP5000.(19980710152938S101702A073782ARP5000))
--
--  REBIND PACKAGE(RP.RP5000.(A12W000066))
--
--  REBIND PACKAGE(RP.RP5000.(A12W000304))
--
--  REBIND PACKAGE(RP.RP5010.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5010.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP5010.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP5100.(19961106151732S101702A058507ARP5100))
--
--  REBIND PACKAGE(RP.RP5100.(19971001203824S101702Z336777ARP5100))
--
--  REBIND PACKAGE(RP.RP5100.(19980105165723S101702A069490ARP5100))
--
--  REBIND PACKAGE(RP.RP5110.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5110.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP5110.(ADAC000144))
--
--  REBIND PACKAGE(RP.RP5120.(19960308075739S101702A052605ARP5120))
--
--  REBIND PACKAGE(RP.RP5120.(19961114140319S101702M000742ARP5120))
--
--  REBIND PACKAGE(RP.RP5130.(A12W000054))
--
--  REBIND PACKAGE(RP.RP5130.(A12W000052))
--
--  REBIND PACKAGE(RP.RP5130.(A12W000056))
--
--  REBIND PACKAGE(RP.RP5140.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5140.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP5150.(A12W000165))
--
--  REBIND PACKAGE(RP.RP5150.(A12W000169))
--
--  REBIND PACKAGE(RP.RP5190.(A12W000619))
--
--  REBIND PACKAGE(RP.RP5190.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5190.(A12W000720))
--
--  REBIND PACKAGE(RP.RP5190.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP5190.(ADAC000154))
--
--  REBIND PACKAGE(RP.RP5200.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5200.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP5200.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP5210.(A12W000602))
--
--  REBIND PACKAGE(RP.RP5210.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5210.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP5210.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP5220.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5220.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP5240.(A12W000702))
--
--  REBIND PACKAGE(RP.RP5240.(A12W000724))
--
--  REBIND PACKAGE(RP.RP5240.(ADAC000024))
--
--  REBIND PACKAGE(RP.RP5240.(ADAC000039))
--
--  REBIND PACKAGE(RP.RP5240.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP5240.(ADAC000065))
--
--  REBIND PACKAGE(RP.RP5240.(ADAC000101))
--
--  REBIND PACKAGE(RP.RP5240.(ADAC000117))
--
--  REBIND PACKAGE(RP.RP5240.(ADAC000161))
--
--  REBIND PACKAGE(RP.RP5240.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP5310.(ADAC000111))
--
--  REBIND PACKAGE(RP.RP5310.(ADAC000161))
--
--  REBIND PACKAGE(RP.RP5320.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5320.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP5320.(ADAC000154))
--
--  REBIND PACKAGE(RP.RP5330.(A12W000223))
--
--  REBIND PACKAGE(RP.RP5330.(A12W000246))
--
--  REBIND PACKAGE(RP.RP5330.(A12W000304))
--
--  REBIND PACKAGE(RP.RP5420.(ADAC000065))
--
--  REBIND PACKAGE(RP.RP5420.(ADAC000172))
--
--  REBIND PACKAGE(RP.RP5610.(A12W000723))
--
--  REBIND PACKAGE(RP.RP5610.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP5610.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP5620.(A12W000723))
--
--  REBIND PACKAGE(RP.RP5620.(ADAC000065))
--
--  REBIND PACKAGE(RP.RP5620.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP5630.(A12W000723))
--
--  REBIND PACKAGE(RP.RP5630.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP5630.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP5640.(A12W000723))
--
--  REBIND PACKAGE(RP.RP5640.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP5640.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP5650.(A12W000723))
--
--  REBIND PACKAGE(RP.RP5650.(ADAC000062))
--
--  REBIND PACKAGE(RP.RP5650.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP5650.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP5660.(19960708130856S101702A055658ARP5660))
--
--  REBIND PACKAGE(RP.RP5660.(19960717170432S101702A055989ARP5660))
--
--  REBIND PACKAGE(RP.RP5670.(19960726170654S101702A056141ARP5670))
--
--  REBIND PACKAGE(RP.RP5670.(19960814205253S101702Z261768ARP5670))
--
--  REBIND PACKAGE(RP.RP5670.(19970523165200S101702A064133ARP5670))
--
--  REBIND PACKAGE(RP.RP5690.(A12W000723))
--
--  REBIND PACKAGE(RP.RP5690.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP5690.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP5840.(A12W000381))
--
--  REBIND PACKAGE(RP.RP5840.(A12W000432))
--
--  REBIND PACKAGE(RP.RP5840.(A12W000455))
--
--  REBIND PACKAGE(RP.RP5880.(19951129S101702A050049ARP5880))
--
--  REBIND PACKAGE(RP.RP5900.(A12W000546))
--
--  REBIND PACKAGE(RP.RP5910.(A12W000546))
--
--  REBIND PACKAGE(RP.RP5920.(A12W000546))
--
--  REBIND PACKAGE(RP.RP5930.(19950921S101702A047750ARP5930))
--
--  REBIND PACKAGE(RP.RP5930.(19960125S101702Z231357ARP5930))
--
--  REBIND PACKAGE(RP.RP5930.(19960126S101702Z231495ARP5930))
--
--  REBIND PACKAGE(RP.RP5930.(19960208S101702A051902ARP5930))
--
--  REBIND PACKAGE(RP.RP5940.(19970630160135S101702A064730ARP5940))
--
--  REBIND PACKAGE(RP.RP5940.(19971230202412S101702Z352979ARP5940))
--
--  REBIND PACKAGE(RP.RP5940.(19980203172522S101702A070172ARP5940))
--
--  REBIND PACKAGE(RP.RP5950.(19980507082018S101702Z373413ARP5950))
--
--  REBIND PACKAGE(RP.RP5950.(19980710152129S101702A073782ARP5950))
--
--  REBIND PACKAGE(RP.RP5950.(A12W000452))
--
--  REBIND PACKAGE(RP.RP5960.(19970428175538S101702A063582ARP5960))
--
--  REBIND PACKAGE(RP.RP5960.(A12W000295))
--
--  REBIND PACKAGE(RP.RP5960.(A12W000455))
--
--  REBIND PACKAGE(RP.RP5960.(A12W000497))
--
--  REBIND PACKAGE(RP.RP5970.(A12W000605))
--
--  REBIND PACKAGE(RP.RP5970.(A12W000630))
--
--  REBIND PACKAGE(RP.RP5970.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP5970.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP5980.(19961129133616S101702A059371ARP5980))
--
--  REBIND PACKAGE(RP.RP5980.(19961211004623S101702Z282954ARP5980))
--
--  REBIND PACKAGE(RP.RP5980.(19961213123230S101702A059902ARP5980))
--
--  REBIND PACKAGE(RP.RP5990.(A12W000605))
--
--  REBIND PACKAGE(RP.RP7120.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7120.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7130.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7130.(ADAC000039))
--
--  REBIND PACKAGE(RP.RP7140.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7140.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP7140.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7160.(19980217174757S101702A070552ARP7160))
--
--  REBIND PACKAGE(RP.RP7160.(A12W000363))
--
--  REBIND PACKAGE(RP.RP7160.(A12W000455))
--
--  REBIND PACKAGE(RP.RP7170.(A12W000583))
--
--  REBIND PACKAGE(RP.RP7170.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7170.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7170.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP7180.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7180.(A12W000701))
--
--  REBIND PACKAGE(RP.RP7180.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7180.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7220.(A12W000639))
--
--  REBIND PACKAGE(RP.RP7220.(A12W000650))
--
--  REBIND PACKAGE(RP.RP7220.(A12W000701))
--
--  REBIND PACKAGE(RP.RP7220.(A12W000723))
--
--  REBIND PACKAGE(RP.RP7220.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7230.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7230.(A12W000661))
--
--  REBIND PACKAGE(RP.RP7230.(ADAC000098))
--
--  REBIND PACKAGE(RP.RP7230.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP7240.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7240.(ADAC000039))
--
--  REBIND PACKAGE(RP.RP7240.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP7240.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7300.(A12W000619))
--
--  REBIND PACKAGE(RP.RP7300.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7300.(A12W000701))
--
--  REBIND PACKAGE(RP.RP7300.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP7300.(ADAC000154))
--
--  REBIND PACKAGE(RP.RP7300.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7310.(A12W000242))
--
--  REBIND PACKAGE(RP.RP7310.(A12W000374))
--
--  REBIND PACKAGE(RP.RP7310.(A12W000386))
--
--  REBIND PACKAGE(RP.RP7350.(A12W000592))
--
--  REBIND PACKAGE(RP.RP7350.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7350.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7350.(A12W000656))
--
--  REBIND PACKAGE(RP.RP7350.(A12W000723))
--
--  REBIND PACKAGE(RP.RP7350.(ADAC000026))
--
--  REBIND PACKAGE(RP.RP7350.(ADAC000039))
--
--  REBIND PACKAGE(RP.RP7350.(ADAC000059))
--
--  REBIND PACKAGE(RP.RP7350.(ADAC000043))
--
--  REBIND PACKAGE(RP.RP7350.(ADAC000065))
--
--  REBIND PACKAGE(RP.RP7350.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7350.(ADAC000116))
--
--  REBIND PACKAGE(RP.RP7350.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP7360.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7360.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7360.(ADAC000065))
--
--  REBIND PACKAGE(RP.RP7360.(ADAC000116))
--
--  REBIND PACKAGE(RP.RP7360.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP7370.(ADAC000026))
--
--  REBIND PACKAGE(RP.RP7370.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP7370.(ADAC000152))
--
--  REBIND PACKAGE(RP.RP7430.(A12W000640))
--
--  REBIND PACKAGE(RP.RP7430.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7430.(A12W000653))
--
--  REBIND PACKAGE(RP.RP7430.(ADAC000025))
--
--  REBIND PACKAGE(RP.RP7430.(ADAC000069))
--
--  REBIND PACKAGE(RP.RP7430.(ADAC000098))
--
--  REBIND PACKAGE(RP.RP7430.(ADAC000151))
--
--  REBIND PACKAGE(RP.RP7430.(ADAC000157))
--
--  REBIND PACKAGE(RP.RP7430.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7440.(A12W000581))
--
--  REBIND PACKAGE(RP.RP7440.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7440.(A12W000640))
--
--  REBIND PACKAGE(RP.RP7440.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7440.(ADAC000025))
--
--  REBIND PACKAGE(RP.RP7440.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7440.(ADAC000157))
--
--  REBIND PACKAGE(RP.RP7440.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7450.(A12W000581))
--
--  REBIND PACKAGE(RP.RP7450.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7450.(A12W000614))
--
--  REBIND PACKAGE(RP.RP7450.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7450.(A12W000718))
--
--  REBIND PACKAGE(RP.RP7450.(ADAC000099))
--
--  REBIND PACKAGE(RP.RP7450.(ADAC000137))
--
--  REBIND PACKAGE(RP.RP7450.(ADAC000157))
--
--  REBIND PACKAGE(RP.RP7450.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7460.(A12W000581))
--
--  REBIND PACKAGE(RP.RP7460.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7460.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7460.(ADAC000025))
--
--  REBIND PACKAGE(RP.RP7460.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP7460.(ADAC000157))
--
--  REBIND PACKAGE(RP.RP7460.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7470.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7470.(A12W000614))
--
--  REBIND PACKAGE(RP.RP7470.(A12W000640))
--
--  REBIND PACKAGE(RP.RP7470.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7470.(A12W000653))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000034))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000038))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000025))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000050))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000069))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000098))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000128))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000151))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000157))
--
--  REBIND PACKAGE(RP.RP7470.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7480.(A12W000316))
--
--  REBIND PACKAGE(RP.RP7480.(A12W000339))
--
--  REBIND PACKAGE(RP.RP7480.(A12W000359))
--
--  REBIND PACKAGE(RP.RP7490.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7490.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7490.(ADAC000045))
--
--  REBIND PACKAGE(RP.RP7490.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7490.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7500.(A12W000606))
--
--  REBIND PACKAGE(RP.RP7500.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7500.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7500.(A12W000656))
--
--  REBIND PACKAGE(RP.RP7500.(A12W000701))
--
--  REBIND PACKAGE(RP.RP7500.(ADAC000039))
--
--  REBIND PACKAGE(RP.RP7500.(ADAC000059))
--
--  REBIND PACKAGE(RP.RP7500.(ADAC000043))
--
--  REBIND PACKAGE(RP.RP7500.(ADAC000102))
--
--  REBIND PACKAGE(RP.RP7500.(ADAC000116))
--
--  REBIND PACKAGE(RP.RP7500.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP7510.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7510.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7510.(ADAC000144))
--
--  REBIND PACKAGE(RP.RP7520.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7520.(A12W000701))
--
--  REBIND PACKAGE(RP.RP7520.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7520.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP7520.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7540.(A12W000043))
--
--  REBIND PACKAGE(RP.RP7540.(A12W000427))
--
--  REBIND PACKAGE(RP.RP7540.(A12W000455))
--
--  REBIND PACKAGE(RP.RP7700.(A12W000608))
--
--  REBIND PACKAGE(RP.RP7700.(A12W000618))
--
--  REBIND PACKAGE(RP.RP7700.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7700.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP7700.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7710.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7710.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP7710.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7720.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7720.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP7720.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7730.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7730.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7740.(A12W000602))
--
--  REBIND PACKAGE(RP.RP7740.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7740.(A12W000701))
--
--  REBIND PACKAGE(RP.RP7740.(ADAC000065))
--
--  REBIND PACKAGE(RP.RP7740.(ADAC000116))
--
--  REBIND PACKAGE(RP.RP7750.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7750.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7760.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7760.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP7760.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7770.(A12W000610))
--
--  REBIND PACKAGE(RP.RP7770.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7770.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP7790.(19971203174107S101702A068836ARP7790))
--
--  REBIND PACKAGE(RP.RP7790.(19971230172715S101702A069434ARP7790))
--
--  REBIND PACKAGE(RP.RP7790.(19980105165720S101702A069490ARP7790))
--
--  REBIND PACKAGE(RP.RP7800.(A12W000639))
--
--  REBIND PACKAGE(RP.RP7800.(A12W000702))
--
--  REBIND PACKAGE(RP.RP7800.(A12W000723))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000024))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000029))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000035))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000039))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000065))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000101))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000117))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000161))
--
--  REBIND PACKAGE(RP.RP7800.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP7810.(ADAC000151))
--
--  REBIND PACKAGE(RP.RP7810.(ADAC000157))
--
--  REBIND PACKAGE(RP.RP7820.(ADAC000151))
--
--  REBIND PACKAGE(RP.RP7830.(ADAC000099))
--
--  REBIND PACKAGE(RP.RP7830.(ADAC000137))
--
--  REBIND PACKAGE(RP.RP7840.(ADAC000099))
--
--  REBIND PACKAGE(RP.RP7840.(ADAC000137))
--
--  REBIND PACKAGE(RP.RP7840.(ADAC000157))
--
--  REBIND PACKAGE(RP.RP7850.(ADAC000142))
--
--  REBIND PACKAGE(RP.RP7850.(ADAC000150))
--
--  REBIND PACKAGE(RP.RP7860.(A12W000101))
--
--  REBIND PACKAGE(RP.RP7860.(A12W000184))
--
--  REBIND PACKAGE(RP.RP7860.(A12W000316))
--
--  REBIND PACKAGE(RP.RP7920.(A12W000232))
--
--  REBIND PACKAGE(RP.RP7920.(A12W000241))
--
--  REBIND PACKAGE(RP.RP7920.(A12W000242))
--
--  REBIND PACKAGE(RP.RP7940.(A12W000241))
--
--  REBIND PACKAGE(RP.RP7940.(A12W000242))
--
--  REBIND PACKAGE(RP.RP7940.(A12W000310))
--
--  REBIND PACKAGE(RP.RP7950.(ADAC000067))
--
--  REBIND PACKAGE(RP.RP7950.(ADAC000119))
--
--  REBIND PACKAGE(RP.RP7950.(ADAC000152))
--
--  REBIND PACKAGE(RP.RP7960.(19980105165721S101702A069490ARP7960))
--
--  REBIND PACKAGE(RP.RP7960.(19980126165347S101702A070032ARP7960))
--
--  REBIND PACKAGE(RP.RP7960.(A12W000044))
--
--  REBIND PACKAGE(RP.RP7980.(19971230162852S101702Z352952ARP7980))
--
--  REBIND PACKAGE(RP.RP7980.(19971230170417S101702Z352952ARP7980))
--
--  REBIND PACKAGE(RP.RP7980.(19971230172716S101702A069434ARP7980))
--
--  REBIND PACKAGE(RP.RP7990.(A12W000630))
--
--  REBIND PACKAGE(RP.RP7990.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP9001.(A12W000702))
--
--  REBIND PACKAGE(RP.RP9001.(ADAC000024))
--
--  REBIND PACKAGE(RP.RP9001.(ADAC000039))
--
--  REBIND PACKAGE(RP.RP9001.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP9001.(ADAC000101))
--
--  REBIND PACKAGE(RP.RP9001.(ADAC000117))
--
--  REBIND PACKAGE(RP.RP9002.(A12W000702))
--
--  REBIND PACKAGE(RP.RP9002.(ADAC000024))
--
--  REBIND PACKAGE(RP.RP9002.(ADAC000039))
--
--  REBIND PACKAGE(RP.RP9002.(ADAC000051))
--
--  REBIND PACKAGE(RP.RP9002.(ADAC000101))
--
--  REBIND PACKAGE(RP.RP9002.(ADAC000117))
--
--  REBIND PACKAGE(RP.RP9002.(ADAC000161))
--
--  REBIND PACKAGE(RP.RP9002.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP9010.(19961210181748S101702A059742ARP9010))
--
--  REBIND PACKAGE(RP.RP9010.(19970122181857S101702A061163ARP9010))
--
--  REBIND PACKAGE(RP.RP9010.(19970422184816S101702A063443ARP9010))
--
--  REBIND PACKAGE(RP.RP9022.(A12W000701))
--
--  REBIND PACKAGE(RP.RP9022.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP9022.(ADAC000160))
--
--  REBIND PACKAGE(RP.RP9110.(A12W000630))
--
--  REBIND PACKAGE(RP.RP9110.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP9110.(ADAC000175))
--
--  REBIND PACKAGE(RP.RP9150.(A12W000630))
--
--  REBIND PACKAGE(RP.RP9150.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP9190.(A12W000630))
--
--  REBIND PACKAGE(RP.RP9190.(ADAC000100))
--
--  REBIND PACKAGE(RP.RP9260.(A12W000292))
--
--  REBIND PACKAGE(RP.RP9260.(A12W000293))
--
--  REBIND PACKAGE(RP.RP9320.(A12W000090))
--
--  REBIND PACKAGE(RP.RP9470.(A12W000201))
--
--  REBIND PACKAGE(RP.RP9470.(A12W000220))
--
--  REBIND PACKAGE(RP.RP9470.(A12W000316))
--
--  REBIND PACKAGE(RP.RP9500.(ADAC000065))
--
--  REBIND PACKAGE(RP.RP9500.(ADAC000116))
--
--  REBIND PACKAGE(RP.RP9530.(A12W000293))
--
--  REBIND PACKAGE(RP.RP9530.(A12W000427))
--
--  REBIND PACKAGE(RP.RP9530.(A12W000455))
--
--  REBIND PACKAGE(RP.RP9560.(19950918S101702A047776ARP9560))
--
--  REBIND PACKAGE(RP.RP9560.(19961115172202S101702A058895ARP9560))
--
--  REBIND PACKAGE(RP.RP9560.(19970428175555S101702A063582ARP9560))
--
--  REBIND PACKAGE(RP.RP9560.(A12W000455))
--
--  REBIND PACKAGE(RP.RP9570.(19960201S101702A051669ARP9570))
--
--  REBIND PACKAGE(RP.RP9570.(19960326173955S101702A053072ARP9570))
--
--  REBIND PACKAGE(RP.RP9570.(19960422175045S101702A053602ARP9570))
--
--  REBIND PACKAGE(RP.RP9610.(19950815S101702A046937ARP9610))
--
--  REBIND PACKAGE(RP.RP9610.(19950816S101702A046989ARP9610))
--
--  REBIND PACKAGE(RP.RP9610.(19951110S101702A049474ARP9610))
--
--  REBIND PACKAGE(RP.RP9760.(A12W000630))
--
--  REBIND PACKAGE(RP.RP9760.(ADAC000060))
--
--  REBIND PACKAGE(RP.RP9860.(A12W000118))
--
--  REBIND PACKAGE(RP.RP9860.(A12W000119))
--
--  REBIND PACKAGE(RP.RP9860.(A12W000316))
--
--  REBIND PACKAGE(RP.RP9910.(19971127072001S101702Z347203ARP9910))
--
--  REBIND PACKAGE(RP.RP9910.(19971130184536S101702Z347938ARP9910))
--
--  REBIND PACKAGE(RP.RP9910.(19971201173717S101702A068744ARP9910))
--
--  REBIND PACKAGE(RP.RP9950.(19970507141312S101702Z310274ARP9950))
--
--  REBIND PACKAGE(RP.RP9950.(19970718164916S101702A065439ARP9950))
--
--  REBIND PACKAGE(RP.RQ7250.(19980505123831S101702Z373107ARQ7250))
--
--  REBIND PACKAGE(RP.RQ7250.(19980505124745S101702Z373107ARQ7250))
--
--  REBIND PACKAGE(RP.RQ7250.(19980710152835S101702A073782ARQ7250))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP011F.(A12W000369))
--
--  REBIND PACKAGE(RP.YRP011F.(A12W000477))
--
--  REBIND PACKAGE(RP.YRP011F.(A12W000532))
--
--  REBIND PACKAGE(RP.YRP011F.(A12W000577))
--
--  REBIND PACKAGE(RP.YRP011F.(A12W000638))
--
--  REBIND PACKAGE(RP.YRP011F.(A12W000649))
--
--  REBIND PACKAGE(RP.YRP011F.(A12W000709))
--
--  REBIND PACKAGE(RP.YRP011N.(A12W000369))
--
--  REBIND PACKAGE(RP.YRP011N.(A12W000477))
--
--  REBIND PACKAGE(RP.YRP011N.(A12W000532))
--
--  REBIND PACKAGE(RP.YRP011N.(A12W000638))
--
--  REBIND PACKAGE(RP.YRP011N.(A12W000649))
--
--  REBIND PACKAGE(RP.YRP012F.(A12W000369))
--
--  REBIND PACKAGE(RP.YRP012F.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP012F.(A12W000532))
--
--  REBIND PACKAGE(RP.YRP012N.(A12W000369))
--
--  REBIND PACKAGE(RP.YRP012N.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP012N.(A12W000532))
--
--  REBIND PACKAGE(RP.YRP013.(A12W000369))
--
--  REBIND PACKAGE(RP.YRP013.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP013.(A12W000532))
--
--  REBIND PACKAGE(RP.YRP014.(A12W000369))
--
--  REBIND PACKAGE(RP.YRP014.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP014.(A12W000532))
--
--  REBIND PACKAGE(RP.YRP015.(A12W000369))
--
--  REBIND PACKAGE(RP.YRP015.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP015.(A12W000532))
--
--  REBIND PACKAGE(RP.YRP016.(A12W000369))
--
--  REBIND PACKAGE(RP.YRP016.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP016.(A12W000532))
--
--  REBIND PACKAGE(RP.YRP016.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP017.(A12W000556))
--
--  REBIND PACKAGE(RP.YRP021.(A12W000484))
--
--  REBIND PACKAGE(RP.YRP021.(A12W000530))
--
--  REBIND PACKAGE(RP.YRP021.(A12W000567))
--
--  REBIND PACKAGE(RP.YRP022.(A12W000480))
--
--  REBIND PACKAGE(RP.YRP022.(A12W000530))
--
--  REBIND PACKAGE(RP.YRP022.(A12W000567))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000483))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000492))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000507))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000530))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000568))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000571))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000619))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000639))
--
--  REBIND PACKAGE(RP.YRP023F.(A12W000701))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000483))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000492))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000507))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000530))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000568))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000571))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000619))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000639))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000701))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP023N.(A12W000701))
--
--  REBIND PACKAGE(RP.YRP024.(A12W000528))
--
--  REBIND PACKAGE(RP.YRP024.(A12W000567))
--
--  REBIND PACKAGE(RP.YRP025.(A12W000529))
--
--  REBIND PACKAGE(RP.YRP025.(A12W000566))
--
--  REBIND PACKAGE(RP.YRP025.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP025.(A12W000701))
--
--  REBIND PACKAGE(RP.YRPMADP.(A12W00063052D54C3C))
--
--  REBIND PACKAGE(RP.YRP025.(A12W000701))
--
--  REBIND PACKAGE(RP.YRPMADP.(A12W00063052D54C3C))
--
--  REBIND PACKAGE(RP.YRP025.(A12W000701))
--
--  REBIND PACKAGE(RP.YRPMADP.(A12W00063052D54C3C))
--
--  REBIND PACKAGE(RP.YRP025.(A12W000701))
--
--  REBIND PACKAGE(RP.YRPMADP.(A12W00063052D54C3C))
--
--  REBIND PACKAGE(RP.YRP025.(A12W000701))
--
--  REBIND PACKAGE(RP.YRPMADP.(A12W00063052D54C3C))
--
--  REBIND PACKAGE(RP.YRP031.(A12W000370))
--
--  REBIND PACKAGE(RP.YRP031.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP031.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP032.(A12W000370))
--
--  REBIND PACKAGE(RP.YRP032.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP032.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP033F.(A12W000370))
--
--  REBIND PACKAGE(RP.YRP033F.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP033F.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP033N.(A12W000370))
--
--  REBIND PACKAGE(RP.YRP033N.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP033N.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP034.(A12W000370))
--
--  REBIND PACKAGE(RP.YRP034.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP034.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP035.(A12W000370))
--
--  REBIND PACKAGE(RP.YRP035.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP035.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP035.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP036.(A12W000370))
--
--  REBIND PACKAGE(RP.YRP036.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP036.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP036.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP036.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP036.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP041.(A12W000371))
--
--  REBIND PACKAGE(RP.YRP041.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP041.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP042.(A12W000371))
--
--  REBIND PACKAGE(RP.YRP042.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP042.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000371))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000478))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP043.(A12W000630))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP051.(A12W000481))
--
--  REBIND PACKAGE(RP.YRP051.(A12W000507))
--
--  REBIND PACKAGE(RP.YRP051.(A12W000561))
--
--  REBIND PACKAGE(RP.YRP052.(A12W000481))
--
--  REBIND PACKAGE(RP.YRP052.(A12W000496))
--
--  REBIND PACKAGE(RP.YRP052.(A12W000507))
--
--  REBIND PACKAGE(RP.YRP052.(A12W000561))
--
--  REBIND PACKAGE(RP.YRP052.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP053.(A12W000485))
--
--  REBIND PACKAGE(RP.YRP053.(A12W000561))
--
--  REBIND PACKAGE(RP.YRP061.(A12W000490))
--
--  REBIND PACKAGE(RP.YRP061.(A12W000492))
--
--  REBIND PACKAGE(RP.YRP061.(A12W000507))
--
--  REBIND PACKAGE(RP.YRP061.(A12W000550))
--
--  REBIND PACKAGE(RP.YRP061.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP061.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP061.(A12W000639))
--
--  REBIND PACKAGE(RP.YRP061.(A12W000701))
--
--  REBIND PACKAGE(RP.YRP062.(A12W000482))
--
--  REBIND PACKAGE(RP.YRP062.(A12W000498))
--
--  REBIND PACKAGE(RP.YRP062.(A12W000540))
--
--  REBIND PACKAGE(RP.YRP062.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP063.(A12W000482))
--
--  REBIND PACKAGE(RP.YRP063.(A12W000498))
--
--  REBIND PACKAGE(RP.YRP063.(A12W000540))
--
--  REBIND PACKAGE(RP.YRP063.(A12W000547))
--
--  REBIND PACKAGE(RP.YRP063.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP063.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP063.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP064.(A12W000540))
--
--  REBIND PACKAGE(RP.YRP064.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP071.(A12W000543))
--
--  REBIND PACKAGE(RP.YRP071.(A12W000563))
--
--  REBIND PACKAGE(RP.YRP071.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP072.(A12W000538))
--
--  REBIND PACKAGE(RP.YRP072.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP073.(A12W000539))
--
--  REBIND PACKAGE(RP.YRP073.(A12W000557))
--
--  REBIND PACKAGE(RP.YRP073.(A12W000577))
--
--  REBIND PACKAGE(RP.YRP073.(A12W000619))
--
--  REBIND PACKAGE(RP.YRP073.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP074.(A12W000540))
--
--  REBIND PACKAGE(RP.YRP074.(A12W000547))
--
--  REBIND PACKAGE(RP.YRP074.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP075.(A12W000549))
--
--  REBIND PACKAGE(RP.YRP075.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP076.(A12W000634))
--
--  REBIND PACKAGE(RP.YRP081.(A12W000551))
--
--  REBIND PACKAGE(RP.YRP081.(A12W000578))
--
--  REBIND PACKAGE(RP.YRP081.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP081.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP081.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP081.(A12W000709))
--
--  REBIND PACKAGE(RP.YRP082.(A12W000552))
--
--  REBIND PACKAGE(RP.YRP082.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP082.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP082.(A12W000709))
--
--  REBIND PACKAGE(RP.YRP091.(A12W000542))
--
--  REBIND PACKAGE(RP.YRP091.(A12W000582))
--
--  REBIND PACKAGE(RP.YRP091.(A12W000608))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRP091.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP092.(A12W000545))
--
--  REBIND PACKAGE(RP.YRP092.(A12W000565))
--
--  REBIND PACKAGE(RP.YRP092.(A12W000577))
--
--  REBIND PACKAGE(RP.YRP093.(A12W000553))
--
--  REBIND PACKAGE(RP.YRP101.(A12W000555))
--
--  REBIND PACKAGE(RP.YRP101.(A12W000564))
--
--  REBIND PACKAGE(RP.YRP101.(A12W000580))
--
--  REBIND PACKAGE(RP.YRP101.(A12W000599))
--
--  REBIND PACKAGE(RP.YRP101.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP101.(A12W000702))
--
--  REBIND PACKAGE(RP.YRP101A.(A12W000555516D2C9D))
--
--  REBIND PACKAGE(RP.YRP101A.(A12W00058051E7E208))
--
--  REBIND PACKAGE(RP.YRP101A.(A12W00063052DCF49C))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP101A.(A12W00063052DCF49C))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP101A.(A12W00063052DCF49C))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP101B.(A12W00063052DCF4B2))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRP101C.(A12W000555516E7FE0))
--
--  REBIND PACKAGE(RP.YRP101C.(A12W00063052DCF4C6))
--
--  REBIND PACKAGE(RP.YRP102.(A12W000599))
--
--  REBIND PACKAGE(RP.YRP102.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP102.(A12W000627))
--
--  REBIND PACKAGE(RP.YRP102.(A12W000645))
--
--  REBIND PACKAGE(RP.YRP102.(A12W000702))
--
--  REBIND PACKAGE(RP.YRP102.(ADAC000024))
--
--  REBIND PACKAGE(RP.YRP102.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP102.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP102.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP102.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP102.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP102.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP103.(A12W000599))
--
--  REBIND PACKAGE(RP.YRP103.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP103.(A12W000627))
--
--  REBIND PACKAGE(RP.YRP103.(A12W000645))
--
--  REBIND PACKAGE(RP.YRP103.(A12W000658))
--
--  REBIND PACKAGE(RP.YRP103.(A12W000702))
--
--  REBIND PACKAGE(RP.YRP103.(ADAC000024))
--
--  REBIND PACKAGE(RP.YRP103.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP103.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRP104.(A12W000702))
--
--  REBIND PACKAGE(RP.YRP104.(ADAC000024))
--
--  REBIND PACKAGE(RP.YRP104.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP104.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRP111.(A12W000599))
--
--  REBIND PACKAGE(RP.YRP111.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP111.(A12W000627))
--
--  REBIND PACKAGE(RP.YRP111.(A12W000619))
--
--  REBIND PACKAGE(RP.YRP111.(A12W000645))
--
--  REBIND PACKAGE(RP.YRP111.(A12W000655))
--
--  REBIND PACKAGE(RP.YRP111.(A12W000702))
--
--  REBIND PACKAGE(RP.YRP111.(ADAC000024))
--
--  REBIND PACKAGE(RP.YRP111.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP111.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRP112.(A12W000599))
--
--  REBIND PACKAGE(RP.YRP112.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP112.(A12W000627))
--
--  REBIND PACKAGE(RP.YRP112.(A12W000645))
--
--  REBIND PACKAGE(RP.YRP112.(A12W000702))
--
--  REBIND PACKAGE(RP.YRP112.(A12W000706))
--
--  REBIND PACKAGE(RP.YRP112.(ADAC000024))
--
--  REBIND PACKAGE(RP.YRP112.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP112.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP112.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000599))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000599))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000608))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000620))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000627))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000619))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000645))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000655))
--
--  REBIND PACKAGE(RP.YRP113.(A12W000702))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000024))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPBJOB.(A12W00063052D54BF8))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00060852825D2D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00061952C97865))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W000655534BDEB9))
--
--  REBIND PACKAGE(RP.YRPNADJ.(ADAC00003954F1C840))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPBJOB.(A12W00063052D54BF8))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00060852825D2D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00061952C97865))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W000655534BDEB9))
--
--  REBIND PACKAGE(RP.YRPNADJ.(ADAC00003954F1C840))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPBJOB.(A12W00063052D54BF8))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00060852825D2D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00061952C97865))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W000655534BDEB9))
--
--  REBIND PACKAGE(RP.YRPNADJ.(ADAC00003954F1C840))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPBJOB.(A12W00063052D54BF8))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00060852825D2D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00061952C97865))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W000655534BDEB9))
--
--  REBIND PACKAGE(RP.YRPNADJ.(ADAC00003954F1C840))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP113.(ADAC000065))
--
--  REBIND PACKAGE(RP.YRPBJOB.(A12W00063052D54BF8))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00060852825D2D))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W00061952C97865))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W000655534BDEB9))
--
--  REBIND PACKAGE(RP.YRPNADJ.(ADAC00003954F1C840))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(ADAC000039))
--
--  REBIND PACKAGE(RP.YRP121.(A12W000677))
--
--  REBIND PACKAGE(RP.YRP122.(A12W000677))
--
--  REBIND PACKAGE(RP.YRP123.(A12W000677))
--
--  REBIND PACKAGE(RP.YRP124.(A12W000677))
--
--  REBIND PACKAGE(RP.YRP125.(A12W000677))
--
--  REBIND PACKAGE(RP.YRP126.(A12W000677))
--
--  REBIND PACKAGE(RP.YRP127.(A12W000677))
--
--  REBIND PACKAGE(RP.YRP128.(A12W000677))
--
--  REBIND PACKAGE(RP.YRP131.(A12W000689))
--
--  REBIND PACKAGE(RP.YRP131.(A12W000709))
--
--  REBIND PACKAGE(RP.YRP132.(A12W000689))
--
--  REBIND PACKAGE(RP.YRP132.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP133.(A12W000689))
--
--  REBIND PACKAGE(RP.YRP133.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP141.(A12W000689))
--
--  REBIND PACKAGE(RP.YRP141.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP142.(A12W000689))
--
--  REBIND PACKAGE(RP.YRP142.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP143.(A12W000689))
--
--  REBIND PACKAGE(RP.YRP143.(A12W000709))
--
--  REBIND PACKAGE(RP.YRP143.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRP151.(A12W000689))
--
--  REBIND PACKAGE(RP.YRP152.(A12W000689))
--
--  REBIND PACKAGE(RP.YRP152.(A12W000709))
--
--  REBIND PACKAGE(RP.YRP152.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP152.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP152.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP152.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP152.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRP161.(A12W000715))
--
--  REBIND PACKAGE(RP.YRP162.(A12W000715))
--
--  REBIND PACKAGE(RP.YRP163.(A12W000715))
--
--  REBIND PACKAGE(RP.YRP164.(A12W000715))
--
--  REBIND PACKAGE(RP.YRP165.(A12W000715))
--
--  REBIND PACKAGE(RP.YRP166.(A12W000715))
--
--  REBIND PACKAGE(RP.YRP171.(A12W000716))
--
--  REBIND PACKAGE(RP.YRP171.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP172.(A12W000716))
--
--  REBIND PACKAGE(RP.YRP172.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP173.(A12W000716))
--
--  REBIND PACKAGE(RP.YRP173.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP174.(A12W000716))
--
--  REBIND PACKAGE(RP.YRP174.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP176.(A12W000716))
--
--  REBIND PACKAGE(RP.YRP176.(ADAC000040))
--
--  REBIND PACKAGE(RP.YRP181.(A12W000717))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW173.(A12W000713548DA31A))
--
--  REBIND PACKAGE(RP.YRPW173.(ADAC00003654EC6C5A))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000253))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W000493507D9355))
--
--  REBIND PACKAGE(RP.YRPHH10.(A12W00063052D54A8B))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMMNR.(A12W00063052D54F1A))
--
--  REBIND PACKAGE(RP.YRPMVAL.(A12W00063052D54FBD))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPW162.(A12W000714547B2BB5))
--
--  REBIND PACKAGE(RP.YRPW163.(A12W000714547B2BBB))
--
--  REBIND PACKAGE(RP.YRPW164.(A12W000714547B2BC0))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPXLCV.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMDLP.(A12W00063052D54D2C))
--
--  REBIND PACKAGE(RP.YRPMORG.(A12W00063052D54F56))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW161.(A12W000714547B2BB1))
--
--  REBIND PACKAGE(RP.YRPW165.(A12W000714547B2BC4))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW172.(A12W000713548D987E))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC00003654EC6BB5))
--
--  REBIND PACKAGE(RP.YRPW172.(ADAC0001615739C356))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RP.YRPW175.(A12W000713548B1699))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00003654E8AC96))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC000046556C5741))
--
--  REBIND PACKAGE(RP.YRPW175.(ADAC00016157129C7C))
--
--  REBIND PACKAGE(RP.YRPW176.(A12W000713548D986B))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00003654E8ADC6))
--
--  REBIND PACKAGE(RP.YRPW176.(ADAC00016157129C8B))
--
--  REBIND PACKAGE(RP.YRPW181.(A12W000713548AE882))
--
--  REBIND PACKAGE(RP.YRPXRUK.(A12W000630))
--
--  REBIND PACKAGE(RP.YRP181.(ADAC000051))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000095))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000207))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000196))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000261))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000329))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W000463))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00049450A21A91))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00052551111741))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00058051E7E1D0))
--
--  REBIND PACKAGE(RP.YRPHA2O.(A12W00063052D549AF))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000232))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000242))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000288))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000374))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00049450A21C5F))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W0005255111173C))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W000555516E83AC))
--
--  REBIND PACKAGE(RP.YRPHAB8.(A12W00063052D54B33))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000338))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000350))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000366))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000427))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000455))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W000555516E773D))
--
--  REBIND PACKAGE(RP.YRPHEWF.(A12W00063052D54A60))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0006795404E5C7))
--
--  REBIND PACKAGE(RP.YRPICHK.(A12W0007095479BDDB))
--
--  REBIND PACKAGE(RP.YRPICHK.(ADAC00004054ECA97B))
--
--  REBIND PACKAGE(RP.YRPIPOS.(A12W0006795404E5CD))
--
--  REBIND PACKAGE(RP.YRPIPOS.(ADAC00004054ECA993))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0006795404E5D2))
--
--  REBIND PACKAGE(RP.YRPIREQ.(A12W0007095479BDED))
--
--  REBIND PACKAGE(RP.YRPISEL.(A12W0006795404E5DC))
--
--  REBIND PACKAGE(RP.YRPISEL.(ADAC00004054ECA9AA))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0006795404E5E1))
--
--  REBIND PACKAGE(RP.YRPISRH.(A12W0007095479BDFD))
--
--  REBIND PACKAGE(RP.YRPISRH.(ADAC00004054ECABFE))
--
--  REBIND PACKAGE(RP.YRPISTR.(A12W0006795404E5EC))
--
--  REBIND PACKAGE(RP.YRPISTR.(ADAC00004054ECACBB))
--
--  REBIND PACKAGE(RP.YRPIVIU.(A12W0006795404E5F1))
--
--  REBIND PACKAGE(RP.YRPIVIU.(ADAC00004054ECACBD))
--
--  REBIND PACKAGE(RP.YRPMCOD.(A12W00063052D54ED2))
--
--  REBIND PACKAGE(RP.YRPMCOD.(ADAC000175577530F2))
--
--  REBIND PACKAGE(RP.YRPMPOS.(A12W00063052D54F75))
--
--  REBIND PACKAGE(RP.YRPNADJ.(A12W0005985265399D))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00059852653B63))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00060852825D32))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00062752A72E31))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W00063052DCEAC3))
--
--  REBIND PACKAGE(RP.YRPNCAL.(A12W0007025410964E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00002454A148EB))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC00003954F1C843))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000101564B122E))
--
--  REBIND PACKAGE(RP.YRPNCAL.(ADAC000161573346F8))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00059852653B85))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00060852825D36))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00062752A72E3F))
--
--  REBIND PACKAGE(RP.YRPNFCK.(A12W00070254109655))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00002454A148F9))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC00003954F1C847))
--
--  REBIND PACKAGE(RP.YRPNFCK.(ADAC000101564B123B))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00059852653AF2))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00060852825D3C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W00062752A72E48))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W000645531458B9))
--
--  REBIND PACKAGE(RP.YRPNIMP.(A12W0007025410965A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00002454A1487C))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC00003954F1C84A))
--
--  REBIND PACKAGE(RP.YRPNIMP.(ADAC000101562D019A))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00059852653BB5))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W00060852825D42))
--
--  REBIND PACKAGE(RP.YRPNPVC.(A12W0007025410965F))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00003954F1C84D))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC000101564B1244))
--
--  REBIND PACKAGE(RP.YRPNPVC.(ADAC00011756A78B72))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00059852653C05))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00060852825D47))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W00064553137F0C))
--
--  REBIND PACKAGE(RP.YRPNVLB.(A12W0007025410966D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00002454A14916))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00003954F1C851))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC000101562D045D))
--
--  REBIND PACKAGE(RP.YRPNVLB.(ADAC00017557752F85))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00059852653A0C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(A12W00060852825D4F))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00002454A1497C))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00003954F1C854))
--
--  REBIND PACKAGE(RP.YRPNXAC.(ADAC00006555E59DD2))
--
--  REBIND PACKAGE(RP.YRPW121.(A12W0006965473511C))
--
--  REBIND PACKAGE(RP.YRPW122.(A12W000696547B277B))
--
--  REBIND PACKAGE(RP.YRPW123.(A12W000696547B2791))
--
--  REBIND PACKAGE(RP.YRPW124.(A12W000696546A1614))
--
--  REBIND PACKAGE(RP.YRPW125.(A12W000696547B27B3))
--
--  REBIND PACKAGE(RP.YRPW126.(A12W000696547B27D1))
--
--  REBIND PACKAGE(RP.YRPW126.(ADAC000087565B12CB))
--
--  REBIND PACKAGE(RP.YRPW127.(A12W0006965469D84B))
--
--  REBIND PACKAGE(RP.YRPW131.(ADAC00003654E31758))
--
--  REBIND PACKAGE(RP.YRPW132.(ADAC00003654E3175D))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00003654E31760))
--
--  REBIND PACKAGE(RP.YRPW133.(ADAC00016157127C6B))
--
--  REBIND PACKAGE(RP.YRPW141.(ADAC00003654E31765))
--
--  REBIND PACKAGE(RP.YRPW142.(ADAC00003654E3176D))
--
--  REBIND PACKAGE(RP.YRPW143.(ADAC00003654E31786))
--
--  REBIND PACKAGE(RP.YRPW152.(ADAC00003654E3178C))
--
--  REBIND PACKAGE(RP.YRPW171.(A12W000713548D9879))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC00003654EC6C4A))
--
--  REBIND PACKAGE(RP.YRPW171.(ADAC0001615739C32E))
--
--  REBIND PACKAGE(RP.YRPW174.(A12W000713548D9885))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC00003654EC6C6C))
--
--  REBIND PACKAGE(RP.YRPW174.(ADAC0001615739C3C4))
--
--  REBIND PACKAGE(RQ.RQ5000.(ADAC000114))
--
--  REBIND PACKAGE(RQ.RQ5020.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ5020.(A12W000661))
--
--  REBIND PACKAGE(RQ.RQ5020.(A12W000701))
--
--  REBIND PACKAGE(RQ.RQ5020.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ5050.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ5050.(A12W000647))
--
--  REBIND PACKAGE(RQ.RQ5050.(A12W000661))
--
--  REBIND PACKAGE(RQ.RQ5050.(A12W000694))
--
--  REBIND PACKAGE(RQ.RQ5050.(A12W000701))
--
--  REBIND PACKAGE(RQ.RQ5050.(A12W000720))
--
--  REBIND PACKAGE(RQ.RQ5050.(ADAC000039))
--
--  REBIND PACKAGE(RQ.RQ5050.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ5050.(ADAC000175))
--
--  REBIND PACKAGE(RQ.RQ5220.(A12W000602))
--
--  REBIND PACKAGE(RQ.RQ5220.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ5220.(A12W000661))
--
--  REBIND PACKAGE(RQ.RQ5220.(ADAC000039))
--
--  REBIND PACKAGE(RQ.RQ5220.(ADAC000051))
--
--  REBIND PACKAGE(RQ.RQ5220.(ADAC000160))
--
--  REBIND PACKAGE(RQ.RQ5250.(A12W000602))
--
--  REBIND PACKAGE(RQ.RQ5250.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ5250.(ADAC000160))
--
--  REBIND PACKAGE(RQ.RQ5250.(ADAC000175))
--
--  REBIND PACKAGE(RQ.RQ5312.(ADAC000121))
--
--  REBIND PACKAGE(RQ.RQ5315.(ADAC000121))
--
--  REBIND PACKAGE(RQ.RQ5320.(A12W000592))
--
--  REBIND PACKAGE(RQ.RQ5320.(A12W000602))
--
--  REBIND PACKAGE(RQ.RQ5320.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ5320.(A12W000650))
--
--  REBIND PACKAGE(RQ.RQ5320.(A12W000681))
--
--  REBIND PACKAGE(RQ.RQ5320.(A12W000684))
--
--  REBIND PACKAGE(RQ.RQ5320.(A12W000721))
--
--  REBIND PACKAGE(RQ.RQ5320.(A12W000720))
--
--  REBIND PACKAGE(RQ.RQ5320.(ADAC000030))
--
--  REBIND PACKAGE(RQ.RQ5320.(ADAC000047))
--
--  REBIND PACKAGE(RQ.RQ5320.(ADAC000052))
--
--  REBIND PACKAGE(RQ.RQ5320.(ADAC000067))
--
--  REBIND PACKAGE(RQ.RQ5320.(ADAC000152))
--
--  REBIND PACKAGE(RQ.RQ5320.(ADAC000154))
--
--  REBIND PACKAGE(RQ.RQ5322.(ADAC000122))
--
--  REBIND PACKAGE(RQ.RQ5322.(ADAC000152))
--
--  REBIND PACKAGE(RQ.RQ5325.(ADAC000122))
--
--  REBIND PACKAGE(RQ.RQ5325.(ADAC000152))
--
--  REBIND PACKAGE(RQ.RQ5420.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ5420.(A12W000701))
--
--  REBIND PACKAGE(RQ.RQ5420.(ADAC000051))
--
--  REBIND PACKAGE(RQ.RQ5420.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ5420.(ADAC000175))
--
--  REBIND PACKAGE(RQ.RQ5520.(ADAC000027))
--
--  REBIND PACKAGE(RQ.RQ5520.(ADAC000043))
--
--  REBIND PACKAGE(RQ.RQ5520.(ADAC000067))
--
--  REBIND PACKAGE(RQ.RQ5520.(ADAC000108))
--
--  REBIND PACKAGE(RQ.RQ5520.(ADAC000120))
--
--  REBIND PACKAGE(RQ.RQ5520.(ADAC000152))
--
--  REBIND PACKAGE(RQ.RQ5550.(ADAC000027))
--
--  REBIND PACKAGE(RQ.RQ5550.(ADAC000043))
--
--  REBIND PACKAGE(RQ.RQ5550.(ADAC000067))
--
--  REBIND PACKAGE(RQ.RQ5550.(ADAC000108))
--
--  REBIND PACKAGE(RQ.RQ5550.(ADAC000102))
--
--  REBIND PACKAGE(RQ.RQ5550.(ADAC000120))
--
--  REBIND PACKAGE(RQ.RQ5550.(ADAC000160))
--
--  REBIND PACKAGE(RQ.RQ7000.(ADAC000114))
--
--  REBIND PACKAGE(RQ.RQ7030.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ7030.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ7040.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ7060.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ7060.(A12W000661))
--
--  REBIND PACKAGE(RQ.RQ7060.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ7060.(ADAC000160))
--
--  REBIND PACKAGE(RQ.RQ7060.(ADAC000175))
--
--  REBIND PACKAGE(RQ.RQ7110.(A12P001974))
--
--  REBIND PACKAGE(RQ.RQ7110.(A12W000455))
--
--  REBIND PACKAGE(RQ.RQ7110.(A12W000463))
--
--  REBIND PACKAGE(RQ.RQ7120.(A12W000449))
--
--  REBIND PACKAGE(RQ.RQ7120.(A12W000455))
--
--  REBIND PACKAGE(RQ.RQ7120.(A12W000463))
--
--  REBIND PACKAGE(RQ.RQ7180.(A12W000322))
--
--  REBIND PACKAGE(RQ.RQ7180.(A12W000323))
--
--  REBIND PACKAGE(RQ.RQ7180.(A12W000330))
--
--  REBIND PACKAGE(RQ.RQ7220.(A12W000296))
--
--  REBIND PACKAGE(RQ.RQ7220.(A12W000384))
--
--  REBIND PACKAGE(RQ.RQ7220.(A12W000455))
--
--  REBIND PACKAGE(RQ.RQ7310.(A12W000242))
--
--  REBIND PACKAGE(RQ.RQ7310.(A12W000374))
--
--  REBIND PACKAGE(RQ.RQ7310.(A12W000386))
--
--  REBIND PACKAGE(RQ.RQ7316.(ADAC000121))
--
--  REBIND PACKAGE(RQ.RQ7323.(ADAC000122))
--
--  REBIND PACKAGE(RQ.RQ7323.(ADAC000152))
--
--  REBIND PACKAGE(RQ.RQ7324.(ADAC000122))
--
--  REBIND PACKAGE(RQ.RQ7324.(ADAC000152))
--
--  REBIND PACKAGE(RQ.RQ7326.(ADAC000122))
--
--  REBIND PACKAGE(RQ.RQ7326.(ADAC000152))
--
--  REBIND PACKAGE(RQ.RQ7500.(A12W000427))
--
--  REBIND PACKAGE(RQ.RQ7500.(A12W000439))
--
--  REBIND PACKAGE(RQ.RQ7500.(A12W000455))
--
--  REBIND PACKAGE(RQ.RQ7510.(A12W000395))
--
--  REBIND PACKAGE(RQ.RQ7510.(A12W000425))
--
--  REBIND PACKAGE(RQ.RQ7510.(A12W000455))
--
--  REBIND PACKAGE(RQ.RQ7520.(ADAC000027))
--
--  REBIND PACKAGE(RQ.RQ7520.(ADAC000043))
--
--  REBIND PACKAGE(RQ.RQ7520.(ADAC000125))
--
--  REBIND PACKAGE(RQ.RQ7530.(ADAC000027))
--
--  REBIND PACKAGE(RQ.RQ7530.(ADAC000043))
--
--  REBIND PACKAGE(RQ.RQ7530.(ADAC000067))
--
--  REBIND PACKAGE(RQ.RQ7530.(ADAC000108))
--
--  REBIND PACKAGE(RQ.RQ7530.(ADAC000102))
--
--  REBIND PACKAGE(RQ.RQ7530.(ADAC000120))
--
--  REBIND PACKAGE(RQ.RQ7540.(ADAC000027))
--
--  REBIND PACKAGE(RQ.RQ7540.(ADAC000043))
--
--  REBIND PACKAGE(RQ.RQ7540.(ADAC000067))
--
--  REBIND PACKAGE(RQ.RQ7540.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ7540.(ADAC000120))
--
--  REBIND PACKAGE(RQ.RQ7560.(ADAC000027))
--
--  REBIND PACKAGE(RQ.RQ7560.(ADAC000043))
--
--  REBIND PACKAGE(RQ.RQ7560.(ADAC000067))
--
--  REBIND PACKAGE(RQ.RQ7560.(ADAC000108))
--
--  REBIND PACKAGE(RQ.RQ7560.(ADAC000120))
--
--  REBIND PACKAGE(RQ.RQ7560.(ADAC000171))
--
--  REBIND PACKAGE(RQ.RQ7810.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ7810.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ7940.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ7940.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ7950.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ7950.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ7960.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ7960.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ7980.(A12W000589))
--
--  REBIND PACKAGE(RQ.RQ7980.(A12W000619))
--
--  REBIND PACKAGE(RQ.RQ7980.(A12W000630))
--
--  REBIND PACKAGE(RQ.RQ7980.(ADAC000100))
--
--  REBIND PACKAGE(RQ.RQ9180.(A12W000340))
--
--  REBIND PACKAGE(RQ.RQ9180.(A12W000455))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ011.(ADAC00000354E371C6))
--
--  REBIND PACKAGE(RQ.YRQ011.(ADAC000076561E73C1))
--
--  REBIND PACKAGE(RQ.YRQ012.(ADAC00000354DA2AA4))
--
--  REBIND PACKAGE(RQ.YRQ012.(ADAC000076561E73C3))
--
--  REBIND PACKAGE(RQ.YRQ013.(ADAC00000354DA2AC4))
--
--  REBIND PACKAGE(RQ.YRQ013.(ADAC000076561E73C6))
--
--  REBIND PACKAGE(RQ.YRQ014.(ADAC00000354DA2AD5))
--
--  REBIND PACKAGE(RQ.YRQ014.(ADAC000076561E73C9))
--
--  REBIND PACKAGE(RQ.YRQ015.(ADAC00000354DA2AF1))
--
--  REBIND PACKAGE(RQ.YRQ015.(ADAC000076561E73CB))
--
--  REBIND PACKAGE(RQ.YRQ016.(ADAC00000354DA2AFB))
--
--  REBIND PACKAGE(RQ.YRQ016.(ADAC000076561E73CE))
--
--  REBIND PACKAGE(RQ.YRQ017.(ADAC00000354DA2B08))
--
--  REBIND PACKAGE(RQ.YRQ017.(ADAC000076561E73D1))
--
--  REBIND PACKAGE(RQ.YRQ021.(ADAC00000454DB772F))
--
--  REBIND PACKAGE(RQ.YRQ021.(ADAC000077561E73DF))
--
--  REBIND PACKAGE(RQ.YRQ022.(ADAC00000454DB7733))
--
--  REBIND PACKAGE(RQ.YRQ022.(ADAC000077561E73E2))
--
--  REBIND PACKAGE(RQ.YRQ023.(ADAC00000454E37B50))
--
--  REBIND PACKAGE(RQ.YRQ023.(ADAC000077561E73E5))
--
--  REBIND PACKAGE(RQ.YRQ024.(ADAC00000454DB773A))
--
--  REBIND PACKAGE(RQ.YRQ024.(ADAC000077561E73EA))
--
--  REBIND PACKAGE(RQ.YRQ025.(ADAC00000454DB773F))
--
--  REBIND PACKAGE(RQ.YRQ025.(ADAC000077561E73EE))
--
--  REBIND PACKAGE(RQ.YRQ025.(ADAC00013256950262))
--
--  REBIND PACKAGE(RQ.YRQ031.(ADAC00000554DA2FAA))
--
--  REBIND PACKAGE(RQ.YRQ031.(ADAC000078561E73FD))
--
--  REBIND PACKAGE(RQ.YRQ032.(ADAC00000554DA2FB7))
--
--  REBIND PACKAGE(RQ.YRQ032.(ADAC000078561E7401))
--
--  REBIND PACKAGE(RQ.YRQ033.(ADAC00000554DA2FC5))
--
--  REBIND PACKAGE(RQ.YRQ033.(ADAC000078561E7403))
--
--  REBIND PACKAGE(RQ.YRQ034.(ADAC00000554DA2FD2))
--
--  REBIND PACKAGE(RQ.YRQ034.(ADAC000078561E7407))
--
--  REBIND PACKAGE(RQ.YRQ035.(ADAC00000554DA2FE1))
--
--  REBIND PACKAGE(RQ.YRQ035.(ADAC000078561E740B))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ035.(ADAC000078561E740B))
--
--  REBIND PACKAGE(RQ.YRQ036.(ADAC00000554DA2FEF))
--
--  REBIND PACKAGE(RQ.YRQ036.(ADAC000078561E740D))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ036.(ADAC000078561E740D))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ036.(ADAC000078561E740D))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ036.(ADAC000078561E740D))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ041.(ADAC00000654ED9BCD))
--
--  REBIND PACKAGE(RQ.YRQ041.(ADAC000079561E741D))
--
--  REBIND PACKAGE(RQ.YRQ041.(ADAC0001355695029A))
--
--  REBIND PACKAGE(RQ.YRQ042.(ADAC00000654ED9BDD))
--
--  REBIND PACKAGE(RQ.YRQ042.(ADAC000079561E7432))
--
--  REBIND PACKAGE(RQ.YRQ042.(ADAC000135569502A8))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC00000654ED9BF0))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000079561E743D))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ043.(ADAC000135569502AE))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ051.(ADAC00000754DA3218))
--
--  REBIND PACKAGE(RQ.YRQ051.(ADAC000080561E7921))
--
--  REBIND PACKAGE(RQ.YRQ052.(ADAC00000754DA3239))
--
--  REBIND PACKAGE(RQ.YRQ052.(ADAC00006455D49948))
--
--  REBIND PACKAGE(RQ.YRQ052.(ADAC00008056658B4D))
--
--  REBIND PACKAGE(RQ.YRQ052.(ADAC00014156BC5D5C))
--
--  REBIND PACKAGE(RQ.YRQ052.(ADAC00016157333E04))
--
--  REBIND PACKAGE(RQ.YRQ052.(ADAC00017557837186))
--
--  REBIND PACKAGE(RQ.YRQ053.(ADAC00000754DA3243))
--
--  REBIND PACKAGE(RQ.YRQ053.(ADAC000080563B427C))
--
--  REBIND PACKAGE(RQ.YRQ061.(ADAC00000854DA33CD))
--
--  REBIND PACKAGE(RQ.YRQ061.(ADAC000081565DC517))
--
--  REBIND PACKAGE(RQ.YRQ062.(ADAC00000854DA33E3))
--
--  REBIND PACKAGE(RQ.YRQ062.(ADAC000081565D99C4))
--
--  REBIND PACKAGE(RQ.YRQ062.(ADAC00016157333E9E))
--
--  REBIND PACKAGE(RQ.YRQ062.(ADAC00017357682504))
--
--  REBIND PACKAGE(RQ.YRQ063.(ADAC00000854F4962D))
--
--  REBIND PACKAGE(RQ.YRQ063.(ADAC000081565C72EF))
--
--  REBIND PACKAGE(RQ.YRQ063.(ADAC00016157333F43))
--
--  REBIND PACKAGE(RQ.YRQ064.(ADAC00000854DA3410))
--
--  REBIND PACKAGE(RQ.YRQ064.(ADAC000081561E7941))
--
--  REBIND PACKAGE(RQ.YRQ071.(ADAC00000954DA341D))
--
--  REBIND PACKAGE(RQ.YRQ071.(ADAC000082561E794A))
--
--  REBIND PACKAGE(RQ.YRQ072.(ADAC00000954DA3427))
--
--  REBIND PACKAGE(RQ.YRQ072.(ADAC000082561E794D))
--
--  REBIND PACKAGE(RQ.YRQ073.(ADAC00000954DA3432))
--
--  REBIND PACKAGE(RQ.YRQ073.(ADAC000046556B1687))
--
--  REBIND PACKAGE(RQ.YRQ073.(ADAC000082561E7953))
--
--  REBIND PACKAGE(RQ.YRQ074.(ADAC00000954DA343D))
--
--  REBIND PACKAGE(RQ.YRQ074.(ADAC000082561E7956))
--
--  REBIND PACKAGE(RQ.YRQ075.(ADAC00000954DA3447))
--
--  REBIND PACKAGE(RQ.YRQ075.(ADAC000082561E7959))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ075.(ADAC000082561E7959))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ075.(ADAC000082561E7959))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ075.(ADAC000082561E7959))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ075.(ADAC000082561E7959))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ075.(ADAC000082561E7959))
--
--  REBIND PACKAGE(RQ.YRQ076.(ADAC00000954DA346B))
--
--  REBIND PACKAGE(RQ.YRQ076.(ADAC000082561E7960))
--
--  REBIND PACKAGE(RQ.YRQ081.(ADAC00001054DA3724))
--
--  REBIND PACKAGE(RQ.YRQ081.(ADAC00006555C10F30))
--
--  REBIND PACKAGE(RQ.YRQ081.(ADAC000083561E796C))
--
--  REBIND PACKAGE(RQ.YRQ082.(ADAC00001054DA3738))
--
--  REBIND PACKAGE(RQ.YRQ082.(ADAC000083561E796E))
--
--  REBIND PACKAGE(RQ.YRQ091.(ADAC00001154E37FFA))
--
--  REBIND PACKAGE(RQ.YRQ091.(ADAC000084561F7F33))
--
--  REBIND PACKAGE(RQ.YRQ092.(ADAC00001154E38071))
--
--  REBIND PACKAGE(RQ.YRQ092.(ADAC000084561F7F36))
--
--  REBIND PACKAGE(RQ.YRQ093.(ADAC00001154E38141))
--
--  REBIND PACKAGE(RQ.YRQ093.(ADAC000084565C52FB))
--
--  REBIND PACKAGE(RQ.YRQ102.(ADAC00001254F37CE8))
--
--  REBIND PACKAGE(RQ.YRQ102.(ADAC000085562E1FCA))
--
--  REBIND PACKAGE(RQ.YRQ103.(ADAC00001254F37CEC))
--
--  REBIND PACKAGE(RQ.YRQ103.(ADAC000085562E1FB7))
--
--  REBIND PACKAGE(RQ.YRQ104.(ADAC00001254F37CF0))
--
--  REBIND PACKAGE(RQ.YRQ104.(ADAC000085564B15C3))
--
--  REBIND PACKAGE(RQ.YRQ111.(ADAC00001354F4AF6D))
--
--  REBIND PACKAGE(RQ.YRQ111.(ADAC000086562E200C))
--
--  REBIND PACKAGE(RQ.YRQ112.(ADAC00001354FC720C))
--
--  REBIND PACKAGE(RQ.YRQ112.(ADAC000041550AF457))
--
--  REBIND PACKAGE(RQ.YRQ112.(ADAC00006555F6D743))
--
--  REBIND PACKAGE(RQ.YRQ112.(ADAC000086562E2059))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC00001355049D1E))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC000041550AC03B))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC00004555255630))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC000046556B1696))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC00006555F6D792))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC000086562E2092))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC000134569502E1))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC00014956E9384B))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC00016157331433))
--
--  REBIND PACKAGE(RQ.YRQ113.(ADAC000178577E6956))
--
--  REBIND PACKAGE(RQ.YRQ121.(ADAC00001454F5DFC4))
--
--  REBIND PACKAGE(RQ.YRQ121.(ADAC000087561F7F8A))
--
--  REBIND PACKAGE(RQ.YRQ122.(ADAC00001454F5DFD5))
--
--  REBIND PACKAGE(RQ.YRQ122.(ADAC000087561F7F8D))
--
--  REBIND PACKAGE(RQ.YRQ123.(ADAC00001454F5E02A))
--
--  REBIND PACKAGE(RQ.YRQ123.(ADAC000087561F7F90))
--
--  REBIND PACKAGE(RQ.YRQ124.(ADAC00001454F5E043))
--
--  REBIND PACKAGE(RQ.YRQ124.(ADAC000087561F7F93))
--
--  REBIND PACKAGE(RQ.YRQ125.(ADAC00001454F5E051))
--
--  REBIND PACKAGE(RQ.YRQ125.(ADAC000087561F7FED))
--
--  REBIND PACKAGE(RQ.YRQ126.(ADAC00001454F5E06E))
--
--  REBIND PACKAGE(RQ.YRQ126.(ADAC000087565B1303))
--
--  REBIND PACKAGE(RQ.YRQ126.(ADAC0001615712812D))
--
--  REBIND PACKAGE(RQ.YRQ127.(ADAC00001454F5E07F))
--
--  REBIND PACKAGE(RQ.YRQ127.(ADAC0000875655CA2F))
--
--  REBIND PACKAGE(RQ.YRQ128.(ADAC00001454F5E097))
--
--  REBIND PACKAGE(RQ.YRQ128.(ADAC000087561F7FF5))
--
--  REBIND PACKAGE(RQ.YRQ131.(ADAC00001554EDB5DA))
--
--  REBIND PACKAGE(RQ.YRQ131.(ADAC000088561F8040))
--
--  REBIND PACKAGE(RQ.YRQ132.(ADAC00001554EDB5EF))
--
--  REBIND PACKAGE(RQ.YRQ132.(ADAC000088561F8043))
--
--  REBIND PACKAGE(RQ.YRQ133.(ADAC00001554EDB5FF))
--
--  REBIND PACKAGE(RQ.YRQ133.(ADAC000088561F805D))
--
--  REBIND PACKAGE(RQ.YRQ133.(ADAC000161571280F8))
--
--  REBIND PACKAGE(RQ.YRQ141.(ADAC00001654EDB613))
--
--  REBIND PACKAGE(RQ.YRQ141.(ADAC000089565B15DF))
--
--  REBIND PACKAGE(RQ.YRQ142.(ADAC00001654EDB622))
--
--  REBIND PACKAGE(RQ.YRQ142.(ADAC000089561F807F))
--
--  REBIND PACKAGE(RQ.YRQ143.(ADAC00001654EDB62F))
--
--  REBIND PACKAGE(RQ.YRQ143.(ADAC000089561F80DE))
--
--  REBIND PACKAGE(RQ.YRQ143.(ADAC00016157128006))
--
--  REBIND PACKAGE(RQ.YRQ151.(ADAC00001754E3181A))
--
--  REBIND PACKAGE(RQ.YRQ151.(ADAC000090561F80E8))
--
--  REBIND PACKAGE(RQ.YRQ152.(ADAC00001754EDB64D))
--
--  REBIND PACKAGE(RQ.YRQ152.(ADAC000090561F80EB))
--
--  REBIND PACKAGE(RQ.YRQ152.(ADAC0001615712804B))
--
--  REBIND PACKAGE(RQ.YRQ161.(ADAC00001854F5E171))
--
--  REBIND PACKAGE(RQ.YRQ161.(ADAC000091561F8110))
--
--  REBIND PACKAGE(RQ.YRQ162.(ADAC00001854F5E1B7))
--
--  REBIND PACKAGE(RQ.YRQ162.(ADAC000091561F8112))
--
--  REBIND PACKAGE(RQ.YRQ163.(ADAC00001854F5E1DF))
--
--  REBIND PACKAGE(RQ.YRQ163.(ADAC000091561F8115))
--
--  REBIND PACKAGE(RQ.YRQ164.(ADAC00001854F5E208))
--
--  REBIND PACKAGE(RQ.YRQ164.(ADAC000091561F8119))
--
--  REBIND PACKAGE(RQ.YRQ165.(ADAC00001854F5E217))
--
--  REBIND PACKAGE(RQ.YRQ165.(ADAC000091561F811C))
--
--  REBIND PACKAGE(RQ.YRQ166.(ADAC00001854F5E23D))
--
--  REBIND PACKAGE(RQ.YRQ166.(ADAC000091561F811E))
--
--  REBIND PACKAGE(RQ.YRQ171.(ADAC00001954EDB689))
--
--  REBIND PACKAGE(RQ.YRQ171.(ADAC000092561F812B))
--
--  REBIND PACKAGE(RQ.YRQ171.(ADAC0001615739C3E6))
--
--  REBIND PACKAGE(RQ.YRQ172.(ADAC00001954EDB696))
--
--  REBIND PACKAGE(RQ.YRQ172.(ADAC000092561F8133))
--
--  REBIND PACKAGE(RQ.YRQ172.(ADAC0001615739C473))
--
--  REBIND PACKAGE(RQ.YRQ173.(ADAC00001954EDB6A8))
--
--  REBIND PACKAGE(RQ.YRQ173.(ADAC000092561F8136))
--
--  REBIND PACKAGE(RQ.YRQ173.(ADAC0001615739C48F))
--
--  REBIND PACKAGE(RQ.YRQ174.(ADAC00001954EDB6B4))
--
--  REBIND PACKAGE(RQ.YRQ174.(ADAC000092561F8139))
--
--  REBIND PACKAGE(RQ.YRQ174.(ADAC0001615739C4CD))
--
--  REBIND PACKAGE(RQ.YRQ176.(ADAC00001954E9DD7F))
--
--  REBIND PACKAGE(RQ.YRQ176.(ADAC000092561F8141))
--
--  REBIND PACKAGE(RQ.YRQ176.(ADAC00016157129CB9))
--
--  REBIND PACKAGE(RQ.YRQ181.(ADAC00002054DB2A54))
--
--  REBIND PACKAGE(RQ.YRQ181.(ADAC000093561F8155))
--
--  REBIND PACKAGE(RQ.YRQ191.(ADAC00005655E468B8))
--
--  REBIND PACKAGE(RQ.YRQ191.(ADAC000094561F8161))
--
--  REBIND PACKAGE(RQ.YRQ192.(ADAC00005655BF54A2))
--
--  REBIND PACKAGE(RQ.YRQ192.(ADAC000094561F8164))
--
--  REBIND PACKAGE(RQ.YRQ201.(ADAC00005755DC80F9))
--
--  REBIND PACKAGE(RQ.YRQ201.(ADAC0000955630F681))
--
--  REBIND PACKAGE(RQ.YRQ202.(ADAC00005755DDE891))
--
--  REBIND PACKAGE(RQ.YRQ202.(ADAC000095565C6F9B))
--
--  REBIND PACKAGE(RQ.YRQ203.(ADAC00005755DDE894))
--
--  REBIND PACKAGE(RQ.YRQ203.(ADAC000095561F8C56))
--
--  REBIND PACKAGE(RQ.YRQ211.(ADAC00005855DDD6B9))
--
--  REBIND PACKAGE(RQ.YRQ211.(ADAC000096562CD72E))
--
--  REBIND PACKAGE(RQ.YRQ211.(ADAC00016157388433))
--
--  REBIND PACKAGE(RQ.YRQ212.(ADAC00005855DDE231))
--
--  REBIND PACKAGE(RQ.YRQ212.(ADAC0000965639F484))
--
--  REBIND PACKAGE(RQ.YRQ212.(ADAC00016157388412))
--
--  REBIND PACKAGE(RQ.YRQ213.(ADAC00005855DDE6F1))
--
--  REBIND PACKAGE(RQ.YRQ213.(ADAC000096565DA2D9))
--
--  REBIND PACKAGE(RQ.YRQ213.(ADAC0001615739D306))
--
--  REBIND PACKAGE(RQ.YRQ221.(ADAC00010356545D0D))
--
--  REBIND PACKAGE(RQ.YRQ221.(ADAC000161575007E9))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC00014056BCC86A))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00003754E10292))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(RQ.YRQ231.(ADAC000161573C34E4))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000043557C9A52))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00006755E4A453))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC000108564DB034))
--
--  REBIND PACKAGE(RQ.YRQFLD1.(ADAC00011956ACE3DD))
--
--  REBIND PACKAGE(V7PATHS.YRPW152.(ADAC00003654E3178C))
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(RTS) cre=2006-10-27 mod=2007-12-18-13.59.10 F540769 -------
select s.dbname, s.name, sum(s.totalrows) "rts rows",
      sum(nActive) active, sum(space) space,   count(*) "rts count",
       min(s.updatestatstime), max(s.updatestatstime)
    from sysibm.tablespacestats s
    where s.dbname = 'DGDB9998'
    group by dbName, name
    order by 5 desc
    ;
    group by s.dbname, s.name
select s.dbname, s.name, sum(s.totalrows) "rts rows",
              count(*) "rts count",
       -- min(partition), max(partition),
       min(s.updatestatstime), max(s.updatestatstime)
    from sysibm.tablespacestats s, sysibm.sysDatabase d
    where s.dbid = d.dbid
          and  d.name = 'TSTNAKBJ'
    group by s.dbname, s.name
union select i.dbname, i.indexspace name,
       sum(i.totalentries) "rts rows", count(*) "rts count",
       -- min(partition), max(partition),
       min(i.updatestatstime), max(i.updatestatstime)
    from sysibm.indexspacestats i, sysibm.sysDatabase d
    where i.dbid = d.dbid
          and  d.name = 'TSTNAKBJ'
    group by dbname, indexspace
    order by 1, 2
;
x
select dbname, indexspace name, totalentries,partition,
           updatestatstime
    from sysibm.indexspacestats
    where dbname like 'NZ06A%' and indexspace like 'INZ241%'
    order by dbname, name, partition
;
select dbname, name, sum(totalrows), count(*),
       min(partition), max(partition),
       min(updatestatstime), max(updatestatstime)
    from sysibm.tablespacestats
    where dbname = 'NZ06A1A' and name like 'A241%'
    group by dbname, name
union select dbname, indexspace name, sum(totalentries), count(*),
       min(partition), max(partition),
       min(updatestatstime), max(updatestatstime)
    from sysibm.indexspacestats
    where dbname like 'NZ06A%' and indexspace like 'INZ241%'
    group by dbname, indexspace
    order by dbname, name
;
x
select partition, totalrows, updatestatstime,
    strip(t.creator) || '.' || strip(t.name)
    || ' ' || strip(t.dbName) || '.' || strip(t.tsName)
    from sysibm.tablespacestats s, sysibm.sysTables t
    where s.dbname = t.dbname  and s.name = t.tsname
           AND T.NAME = 'TFI022A1'
    with ur
;
x
explain plan set queryno = 987654321 for
select dbname, name, sum(totalrows),
       count(*), min(partition), max(partition),
       min(updatestatstime), max(updatestatstime)
    from sysibm.tablespacestats
    where dbname = 'DA540769' -- and name = 'A242A'
    group by dbname, name
    order by dbname, name
;
commit
;
x
select dbname, indexspace, sum(totalentries), count(*),
       min(updatestatstime), max(updatestatstime)
    from sysibm.indexspacestats
    where dbname = 'DA540769' -- and indexspace = 'INZ242A1'
    group by dbname, indexspace
    order by dbname, indexspace
;
x
select partition, totalrows, updatestatstime
    from sysibm.tablespacestats
    where dbname = 'DA540769' and name = 'A242A'
;
select partition, totalentries, updatestatstime
    from sysibm.indexspacestats
    where dbname = 'DA540769' and indexspace = 'INZ242A1'
;
}¢--- A540769.WK.SQL(RTSCNT) cre=2011-01-11 mod=2011-01-11-14.58.15 A540769 ----
select sum(totalRows), sum(space), count(*), max(totalRows)
    from sysibm.sysTableSpaceStats
    where dbName = 'XC01A1P' and name like 'A200A0%'
    group by dbName, name
    order by dbName, name
}¢--- A540769.WK.SQL(RTSINS) cre=2011-04-18 mod=2011-04-18-12.09.31 A540769 ----
select current timestamp from sysibm.sysDummy1;
insert into A540769.rtsHistTs
    select r.*, current timestamp insertTst
        from sysibm.sysTableSpaceStats r
        where dbName like 'NI02%'
;
select current timestamp from sysibm.sysDummy1;
commit;
select current timestamp from sysibm.sysDummy1;
insert into A540769.rtsHistIx
    select r.*, current timestamp insertTst
        from sysibm.sysIndexSpaceStats r
        where dbName like 'NI02%'
;
select current timestamp from sysibm.sysDummy1;
commit;
select current timestamp from sysibm.sysDummy1;
;;,
select count(*)
    from sysibm.sysIndexSpaceStats
    where dbName like 'NI02%'
    ;
select count(*)
    from sysibm.sysTableSpaceStats
    where dbName like 'NI02%'
set current sqlid = 'S100447';
CREATE TABLESPACE rtsHiTs
  IN DA540769
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  FREEPAGE 10 PCTFREE 5
  GBPCACHE CHANGED
  TRACKMOD YES
  LOGGED
  BUFFERPOOL BP2
  LOCKSIZE ANY
  LOCKMAX SYSTEM
  CLOSE YES
  COMPRESS YES
  CCSID      unicode
  DEFINE YES
  MAXROWS 255;
create table A540769.rtsHistTS
    as (select r.*, current timestamp insertTst
            from sysibm.sysTableSpaceStats r
       ) with no data
    in DA540769.rtsHiTs
;
CREATE        INDEX A540769.IrtsHiTs1
  ON A540769.rtsHistTS
   (dbName    asc
   ,name      asc
   ,partition asc
   ,insertTst asc
   )
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  ERASE  NO
  FREEPAGE 10 PCTFREE 5
  GBPCACHE CHANGED
  CLUSTER
  COMPRESS NO
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFER NO
  DEFINE YES
  ;
CREATE TABLESPACE rtsHiIx
  IN DA540769
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  FREEPAGE 10 PCTFREE 5
  GBPCACHE CHANGED
  TRACKMOD YES
  LOGGED
  BUFFERPOOL BP2
  LOCKSIZE ANY
  LOCKMAX SYSTEM
  CLOSE YES
  COMPRESS YES
  CCSID      unicode
  DEFINE YES
  MAXROWS 255;
create table A540769.rtsHistIx
    as (select r.*, current timestamp insertTst
            from sysibm.sysIndexSpaceStats r
       ) with no data
    in DA540769.rtsHiIx
;
CREATE        INDEX A540769.IrtsHiIx1
  ON A540769.rtsHistIx
   (dbName    asc
   ,indexSpace asc
   ,partition asc
   ,insertTst asc
   )
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  ERASE  NO
  FREEPAGE 10 PCTFREE 5
  GBPCACHE CHANGED
  CLUSTER
  COMPRESS NO
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFER NO
  DEFINE YES
  ;
commit
;
select current timestamp from sysibm.sysDummy1;
select count(*)
    from sysibm.sysIndexSpaceStats
    where dbName like 'NI02%'
    ;
select count(*)
    from sysibm.sysTableSpaceStats
    where dbName like 'NI02%'
}¢--- A540769.WK.SQL(RTSINSJ) cre=2011-04-18 mod=2011-04-18-12.15.15 A540769 ---
//YRTSINSP JOB (CP00,KE50),'DB2 RTS',                                   00010000
//         MSGCLASS=E,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//*MAIN CLASS=LOG                                                       00040000
//SUBTORR2   EXEC PGM=IEBGENER
//SYSPRINT   DD SYSOUT=*
//SYSUT2     DD SUBSYS=(CSM,'SYSTEM=RR2,SYSOUT=(A,INTRDR)')
//SYSUT1     DD *,DLM='}e'
//YRTSINSP JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=E,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//YRTSINSP JOB (CP00,KE50),'DB2 RTS',                                   00010000
//         MSGCLASS=E,TIME=1440,
//         NOTIFY=A540769
//*MAIN CLASS=DBOF ,SYSTEM=S12
//S01      EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99                       00020001
//SYSTSIN  DD *
    DSN SYSTEM(DBOF)
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSIN    DD *
select current timestamp from sysibm.sysDummy1;
insert into A540769.rtsHistTs
    select r.*, current timestamp insertTst
        from sysibm.sysTableSpaceStats r
        where dbName like 'NI02%'
;
select current timestamp from sysibm.sysDummy1;
commit;
select current timestamp from sysibm.sysDummy1;
insert into A540769.rtsHistIx
    select r.*, current timestamp insertTst
        from sysibm.sysIndexSpaceStats r
        where dbName like 'NI02%'
;
select current timestamp from sysibm.sysDummy1;
commit;
select current timestamp from sysibm.sysDummy1;
}e         end of job to $toRz ****************************************
}¢--- A540769.WK.SQL(RTSI10) cre= mod= -----------------------------------------
.CONNECT DP4G


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE "SYSIBM".SYSINDEXSPACESTATS
        (UPDATESTATSTIME TIMESTAMP (6) WITHOUT TIME ZONE
                                                        NOT NULL
  WITH DEFAULT
        ,NLEVELS SMALLINT
  WITH DEFAULT NULL
        ,NPAGES INTEGER
  WITH DEFAULT NULL
        ,NLEAF INTEGER
  WITH DEFAULT NULL
        ,NACTIVE INTEGER
  WITH DEFAULT NULL
        ,SPACE INTEGER
  WITH DEFAULT NULL
        ,EXTENTS SMALLINT
  WITH DEFAULT NULL
        ,LOADRLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REBUILDLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REORGLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REORGINSERTS INTEGER
  WITH DEFAULT NULL
        ,REORGDELETES INTEGER
  WITH DEFAULT NULL
        ,REORGAPPENDINSERT INTEGER
  WITH DEFAULT NULL
        ,REORGPSEUDODELETES INTEGER
  WITH DEFAULT NULL
        ,REORGMASSDELETE INTEGER
  WITH DEFAULT NULL
        ,REORGLEAFNEAR INTEGER
  WITH DEFAULT NULL
        ,REORGLEAFFAR INTEGER
  WITH DEFAULT NULL
        ,REORGNUMLEVELS INTEGER
  WITH DEFAULT NULL
        ,STATSLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,STATSINSERTS INTEGER
  WITH DEFAULT NULL
        ,STATSDELETES INTEGER
  WITH DEFAULT NULL
        ,STATSMASSDELETE INTEGER
  WITH DEFAULT NULL
        ,COPYLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,COPYUPDATEDPAGES INTEGER
  WITH DEFAULT NULL
        ,COPYCHANGES INTEGER
  WITH DEFAULT NULL
        ,COPYUPDATELRSN CHARACTER(6) FOR BIT DATA
  WITH DEFAULT NULL
        ,COPYUPDATETIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,LASTUSED DATE
  WITH DEFAULT NULL
        ,IBMREQD CHARACTER(1) FOR MIXED DATA
                                                        NOT NULL
        ,DBID SMALLINT
                                                        NOT NULL
        ,"ISOBID" SMALLINT
                                                        NOT NULL
        ,"PSID" SMALLINT
                                                        NOT NULL
        ,"PARTITION" SMALLINT
                                                        NOT NULL
        ,INSTANCE SMALLINT
                                                        NOT NULL
  WITH DEFAULT 1
        ,TOTALENTRIES BIGINT
  WITH DEFAULT NULL
        ,DBNAME VARCHAR(24) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,"NAME" VARCHAR(128) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,CREATOR VARCHAR(128) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,INDEXSPACE VARCHAR(24) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,REORGINDEXACCESS BIGINT
  WITH DEFAULT NULL
        ,DRIVETYPE CHARACTER(3) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT 'HDD'
        ,STATS101 BIGINT
  WITH DEFAULT NULL
        ,CONSTRAINT DSNISS_INSTANCE CHECK
        (INSTANCE = 1 OR INSTANCE = 2
        )
        )
        IN DSNDB06.SYSRTSTS
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE NONE
   AUDIT NONE
   CCSID UNICODE;

}¢--- A540769.WK.SQL(RTSI11) cre= mod= -----------------------------------------
.CONNECT DBTC


 SET CURRENT SQLID = 'A540769';


    CREATE TABLE "SYSIBM".SYSINDEXSPACESTATS
        (UPDATESTATSTIME TIMESTAMP (6) WITHOUT TIME ZONE
                                                        NOT NULL
  WITH DEFAULT
        ,NLEVELS SMALLINT
  WITH DEFAULT NULL
        ,NPAGES INTEGER
  WITH DEFAULT NULL
        ,NLEAF INTEGER
  WITH DEFAULT NULL
        ,NACTIVE INTEGER
  WITH DEFAULT NULL
        ,SPACE INTEGER
  WITH DEFAULT NULL
        ,EXTENTS SMALLINT
  WITH DEFAULT NULL
        ,LOADRLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REBUILDLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REORGLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REORGINSERTS INTEGER
  WITH DEFAULT NULL
        ,REORGDELETES INTEGER
  WITH DEFAULT NULL
        ,REORGAPPENDINSERT INTEGER
  WITH DEFAULT NULL
        ,REORGPSEUDODELETES INTEGER
  WITH DEFAULT NULL
        ,REORGMASSDELETE INTEGER
  WITH DEFAULT NULL
        ,REORGLEAFNEAR INTEGER
  WITH DEFAULT NULL
        ,REORGLEAFFAR INTEGER
  WITH DEFAULT NULL
        ,REORGNUMLEVELS INTEGER
  WITH DEFAULT NULL
        ,STATSLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,STATSINSERTS INTEGER
  WITH DEFAULT NULL
        ,STATSDELETES INTEGER
  WITH DEFAULT NULL
        ,STATSMASSDELETE INTEGER
  WITH DEFAULT NULL
        ,COPYLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,COPYUPDATEDPAGES INTEGER
  WITH DEFAULT NULL
        ,COPYCHANGES INTEGER
  WITH DEFAULT NULL
        ,COPYUPDATELRSN CHARACTER(10) FOR BIT DATA
  WITH DEFAULT NULL
        ,COPYUPDATETIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,LASTUSED DATE
  WITH DEFAULT NULL
        ,IBMREQD CHARACTER(1) FOR MIXED DATA
                                                        NOT NULL
        ,DBID SMALLINT
                                                        NOT NULL
        ,"ISOBID" SMALLINT
                                                        NOT NULL
        ,"PSID" SMALLINT
                                                        NOT NULL
        ,"PARTITION" SMALLINT
                                                        NOT NULL
        ,INSTANCE SMALLINT
                                                        NOT NULL
  WITH DEFAULT 1
        ,TOTALENTRIES BIGINT
  WITH DEFAULT NULL
        ,DBNAME VARCHAR(24) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,"NAME" VARCHAR(128) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,CREATOR VARCHAR(128) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,INDEXSPACE VARCHAR(24) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,REORGINDEXACCESS BIGINT
  WITH DEFAULT NULL
        ,DRIVETYPE CHARACTER(3) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT 'HDD'
        ,STATS101 BIGINT
  WITH DEFAULT NULL
        ,CONSTRAINT DSNISS_INSTANCE CHECK
        (INSTANCE = 1 OR INSTANCE = 2
        )
        )
        IN DSNDB06.SYSTSISS
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE NONE
   AUDIT NONE
   CCSID UNICODE
   PARTITION BY SIZE EVERY 64G;

}¢--- A540769.WK.SQL(RTSLAST) cre=2007-12-21 mod=2008-03-04-14.17.54 F540769 ---
select r, l, count(*)
    from (select
        case when reorgLastTime is not null then 'R' else 'N' end r,
        case when loadRLastTime is not null then 'L' else 'n' end l
        from sysibm.tablespacestats ) s
        where db like 'MF01%'
    group by r, l
;
select count(*), count(reorgLastTime), count(loadRLastTime),
         count(max(reorgLastTime, loadRLastTime)),
         count(coalesce(reorgLastTime, loadRLastTime))
    from sysibm.tablespacestats
;
x
select * from
    sysibm.tablespacestats where
         copyLastTime < LOADRLASTTIME  or
         copyLastTime < REORGLASTTIME

}¢--- A540769.WK.SQL(RTSLASTU) cre=2012-02-01 mod=2015-05-18-14.47.48 A540769 ---
--- unbenutzte indexe --------------------------------------------------
--- index nach last used in rts und package und unqique ---------------
set current path oa1p;
with i0 as (                       -- last built from rts
select
      max(value(date(LOADRLASTTIME  ), '01.01.0001')
         ,value(date(REBUILDLASTTIME), '01.01.0001')
         ,value(date(REORGLASTTIME  ), '01.01.0001')) laBui
    , real(totalEntries) entries
    , space * real(1024) space
    , real(reorgInserts + reorgDeletes)  insDel
    , lastUsed
    , creator cr
    , Name    ix
    from sysibm.sysIndexSpaceStats
 -- where Name like 'IMF%' and creator = 'OA1P'
)
, i1 as
(                                  -- partitionen aggregieren
select count(*) parts
    , value(max(lastUsed), '01.01.0001') lastUsed
    , sum(entries) entries
    , sum(space  ) space
    , sum(real(insDel) / max(1, days(current date)-days(laBui))) updDay
    , cr
    , ix
    from i0
    group by cr, ix
)
, p1 as                            -- package lastUsed joinen
(
  select bQualifier cr, bName ix
     , max(timestamp(lastUsed), pcTimestamp, timestamp) pLast
     , p.*
          from SYSIBM.SYSPACKDEP d
            join sysibm.sysPackage p
              on       d.dLocation = p.location
                   and d.dCollid = p.collid
                   and d.dName = p.name
                   and d.dContoken = p.contoken
          where d.bType = 'I'
)
, p2 as
(
  select row_number() over ( partition by cr, ix
                             order by pLast desc) rn
      , p1.*
    from p1
)
, i2 as
(                          -- package mit neuestem lastUsed joinen
select j.dbName db, i1.cr, i1.ix
  --, case when uniqueRule = 'D' then 'D' else 'U' end uniq
    , uniqueRule uniq
    , i1.lastUsed
    , parts
    , entries
    , i1.space
    , updDay
    , p2.collid
    , p2.name pkg
    , p2.version
    , p2.timestamp pkgCreated
    , p2.pcTimestamp
    , p2.lastUsed  pkgLastUse
    from i1
    join sysibm.sysindexes j
      on i1.cr = j.creator and i1.ix = j.name
    left join p2
      on i1.cr = p2.cr and i1.ix = p2.ix and rn = 1
    where i1.lastUsed < '01.01.2010'
)
select substr(db, 1, 8) db
      , substr(cr, 1, 12) cr
      , substr(ix, 1, 40) ix
      , uniq
      , lastUsed
      , parts
      , substr(fosFmte7(entries), 1, 7) entries
      , substr(fosFmtE7(space),   1, 7) space
      , substr(fosFmte7(updDay), 1, 7) "upd/day"
      , substr(collid, 1, 8) collid
      , substr(pkg   , 1, 8) pkg
      , substr(version , 1, 40) version
      , pkgCreated
      , pcTimestamp
      , pkgLastUse
    from i2
    where pkg is null
        or (     pkgLastUse  < '01.01.2010'
             and pkgCreated  < '2010-01-01-00.00.00'
             and pcTimestamp < '2010-01-01-00.00.00'
           )
    order by db, cr, ix
;x;
(
  select max( value(lastUsed, '01.01.0001')
            , value(pLast   , '01.01.0001')
            ) last
       , i2.*
     from i2
)
, y as
(
select year(last)  y
    , uniq
    , count(*) ix
    , sum(parts) parts
    , sum(entries) entries
    , sum(space) space
    , sum(updDay) updDay
    from i3
    group by year(last), uniq
)
, t1 as
(
select 9998  y
    , uniq
    , sum(ix) ix
    , sum(parts) parts
    , sum(entries) entries
    , sum(space) space
    , sum(updDay) updDay
    from y
    group by uniq
)
, t2 as
(
select 9999  y
    , '*' uniq
    , sum(ix) ix
    , sum(parts) parts
    , sum(entries) entries
    , sum(space) space
    , sum(updDay) updDay
    from t1
)
, u as
(
  select * from t2
  union all select * from t1
  union all select * from y
)
select case when y > 9900 then 'total' else '' || y end lastY
    , uniq, ix
    , parts
    , substr(fosFmtE7(entries), 1, 7) entries
    , substr(fosFmtE7(space  ), 1, 7) space
    , substr(fosFmtE7(updDay ), 1, 7) "upd/Day"
    from u
    order by Y desc, uniq
;X;
, y as
    order by 1 desc, uniq
;x;
;;;;
;;;
select *
     from i3
     order by creator, name
;X,
select lastUsed, '01.01.0001')
          , value(pLast   , '01.01.0001')
          , value(date(pCre) , '01.01.0001')
          ) last
, g as
(
select lasty, uniq
    , count(*) ix
    , sum(parts) parts
    , sum(entries) entries
    , sum(space  ) space
    , sum(updDay ) updDay
    from i2
    group by lastY, uniq
)
, tU as
(
select 9998 lastY, uniq
    , sum(ix) ix, sum(parts) parts, sum(entries) entries
    , sum(space) space, sum(updDay) updDay
    from g
    group by uniq
)
, to as
(
select 9999 lastY, '*' uniq
    , sum(ix) ix, sum(parts) parts, sum(entries) entries
    , sum(space) space, sum(updDay) updDay
    from tU
)
, u as
(
  select * from to
  union all select * from tU
  union all select * from g
)
select case when lasty > 9900 then 'total' else '' || lastY end lastY
    , uniq, ix
    , parts
    , substr(fosFmtE7(entries), 1, 7) entries
    , substr(fosFmtE7(space  ), 1, 7) space
    , substr(fosFmtE7(updDay ), 1, 7) "upd/Day"
    from u
    order by lastY desc, uniq
;y;
--- unbenutzte indexe --------------------------------------------------
--- index nach last used year und unique -------------------------------

set current path = oa1p;
with i0 as (
select
      case when lastUsed is Null then 0 else year(lastUsed) end lastY
    , max(value(date(LOADRLASTTIME  ), '01.01.0001')
         ,value(date(REBUILDLASTTIME), '01.01.0001')
         ,value(date(REORGLASTTIME  ), '01.01.0001')) laBui
    , real(totalEntries) entries
    , space * real(1024) space
    , real(reorgInserts + reorgDeletes)  insDel
    , lastUsed
    , creator
    , Name
    from sysibm.sysIndexSpaceStats
 -- where Name like 'INI%' and creator = 'OA1P'
)
, i1 as
(
select count(*) parts
    , max(lastY)   lastY
    , sum(entries) entries
    , sum(space  ) space
    , sum(real(insDel) / max(1, days(current date)-days(laBui))) updDay
    , creator
    , name
    from i0
    group by creator, name
)
, i2 as
(
select lasty
    , case when uniqueRule = 'D' then 'D' else 'U' end uniq
    , parts
    , entries
    , i1.space
    , updDay
    from i1
    join sysibm.sysindexes j
    on i1.creator = j.creator and i1.name = j.name
)
, g as
(
select lasty, uniq
    , count(*) ix
    , sum(parts) parts
    , sum(entries) entries
    , sum(space  ) space
    , sum(updDay ) updDay
    from i2
    group by lastY, uniq
)
, tU as
(
select 9998 lastY, uniq
    , sum(ix) ix, sum(parts) parts, sum(entries) entries
    , sum(space) space, sum(updDay) updDay
    from g
    group by uniq
)
, to as
(
select 9999 lastY, '*' uniq
    , sum(ix) ix, sum(parts) parts, sum(entries) entries
    , sum(space) space, sum(updDay) updDay
    from tU
)
, u as
(
  select * from to
  union all select * from tU
  union all select * from g
)
select case when lasty > 9900 then 'total' else '' || lastY end lastY
    , uniq, ix
    , parts
    , substr(fosFmtE7(entries), 1, 7) entries
    , substr(fosFmtE7(space  ), 1, 7) space
    , substr(fosFmtE7(updDay ), 1, 7) "upd/Day"
    from u
    order by lastY desc, uniq
;
--- indexe ohne RTS ---------------------------------------------------
select strip(creator) || '.' || name, i.*
    from sysibm.sysIndexes i
    where not exists ( select 1
        from sysibm.sysIndexSpaceStats r
        where i.creator = r.creator and i.name = r.name )
;;
select * from i
;;; select insDel / max(1, days(current date) - days(laBui))
         , i0.*
        from i0 i0;;
)
select count(*) ix
    , sum(parts) parts
    , sum(case when year(lastU) = 2012 then 1 else 0 end) c12
    , sum(case when year(lastU) = 2011 then 1 else 0 end) c11
    , sum(case when year(lastU) < 2011 then 1 else 0 end) c10sma
    , sum(case when lastU       is null then 1 else 0 end) cNull
    , sum(c12) c12
    , sum(c11) c11
    , sum(c10sma) c10sma
    , sum(cnull) cnull
    , min(lastU)
    , max(lastU)
    from i
;;;
with i as (
select count(*) parts
    , sum(case when year(lastUsed) = 2012 then 1 else 0 end) c12
    , sum(case when year(lastUsed) = 2011 then 1 else 0 end) c11
    , sum(case when year(lastUsed) < 2011 then 1 else 0 end) c10sma
    , sum(case when lastUsed      is null then 1 else 0 end) cNull
    , max(lastUsed) lastU
    , Name
    from sysibm.sysIndexSpaceStats
--  where Name like 'INI%'
    group by Creator, Name
)
select count(*) ix
    , sum(parts) parts
    , sum(case when year(lastU) = 2012 then 1 else 0 end) c12
    , sum(case when year(lastU) = 2011 then 1 else 0 end) c11
    , sum(case when year(lastU) < 2011 then 1 else 0 end) c10sma
    , sum(case when lastU       is null then 1 else 0 end) cNull
    , sum(c12) c12
    , sum(c11) c11
    , sum(c10sma) c10sma
    , sum(cnull) cnull
    , min(lastU)
    , max(lastU)
    from i
;;;
--  order by lastUsed desc
   ;;;
select count(*) parts
    , sum(case when year(lastUsed) = 2012 then 1 else 0 end) c12
    , sum(case when lastUsed is null      then 1 else 0 end) cNull
    , max(lastUsed) lastU
    , Name
    from sysibm.sysIndexSpaceStats
    where Name like 'INI%'
    group by Creator, Name
--  order by lastUsed desc
   ;;;
select count(*), lastused
    from sysibm.sysIndexSpaceStats
    group by lastUsed
    order by lastUsed desc
   ;;;
select count(*), lastused
    from sysibm.sysTableSpaceStats
    group by lastUsed
    order by lastUsed desc
    ;;
}¢--- A540769.WK.SQL(RTSREORG) cre=2007-01-04 mod=2007-01-04-12.46.58 F540769 ---
select case when unIns   >  10 then 'u' else ' ' end
    || case when farInd  >   5 then 'f' else ' ' end
    || case when nearInd >   5 then 'n' else ' ' end
    || case when extents > 100 then 'e' else ' ' end threshold,
    t.*
  from
    (select dbname, name, partition,
         case when totalRows = 0 then 0
              else int(real(REORGUNCLUSTINS) * 100    / real(totalRows))
              end unIns,
         case when totalRows = 0 then 0
              else int(real(REORGFARINDREF)  * 100    / real(totalRows))
              end farInd,
         case when totalRows = 0 then 0
              else int(real(REORGNEARINDREF)  * 100   / real(totalRows))
              end nearInd,
         extents,
         totalrows, nActive, space, reorgLastTime, updatestatstime
       from sysibm.tablespacestats
       where dbname = 'WQ01A1P'
    ) t
  order by dbname, name, partition
;
select case when paSplit >  10 then 'p' else ' ' end
    || case when extents > 100 then 'e' else ' ' end threshold,
    i.*
  from
    (select dbname, indexspace, partition,
         case when totalEntries = 0 then 0
              else int(real(REORGLEAFFAR) * 100   / real(totalEntries))
              end paSplit,
         extents,
         totalEntries, nActive, space, reorgLastTime, updatestatstime
       from sysibm.indexspacestats
       where dbname = 'WQ01A1P'
    ) i
    order by dbname, indexspace
;
x
select * from oa1p.tadm08a1
    where db_name = 'NZ06A1P' and ts_name in ('A244A', 'A241A')
;
select count(*), dssize
    from sysibm.systablespace
    group by dssize
    order by dssize
;
x
select dbname, name, sum(totalrows),
       count(*), min(partition), max(partition),
       min(updatestatstime), max(updatestatstime)
    from sysibm.tablespacestats
    where dbname = 'DA540769' -- and name = 'A242A'
    group by dbname, name
    order by dbname, name
;
x
select partition, totalentries, updatestatstime
    from sysibm.indexspacestats
    where dbname = 'DA540769' and indexspace = 'INZ242A1'
;
}¢--- A540769.WK.SQL(RTSSPACE) cre=2006-11-21 mod=2008-03-28-11.47.17 F540769 ---
with sp (ty, db, ts, alloc, act , #ts, #pa) as
(   select 'tsCat', dbname, name ,
            spaceF * 1024,
            real(nActive) * pgSize* 1024,
            1,
            case when partitions = 0 then 1 else partitions end
        from sysibm.sysTableSpace
    union ( select 'tsRts', r.dbname, r.name ,
            sum(real(r.space) * 1024),
            sum(real(r.nActive) * s.pgSize * 1024),
            1,
            count(*)
        from sysibm.TableSpaceStats r , sysibm.sysTableSpace s
            where r.dbid = s.dbid  and r.psid = s.psid
                    and r.dbName= s.dbName  and r.name = s.name
            group by r.dbName, r.name
           )
    union ( select 'ixCat', i.dbname, i.indexSpace,
            max(i.spaceF * 1024),
            max(real(i.nLeaf) * i.pgSize),
            1,
            count(*)
        from sysIbm.sysIndexes i, sysIbm.sysIndexPart p
                where p.ixCreator = i.creator and p.ixName = i.name
            group by i.dbName, i.indexSpace -- ,i.creator, i.name

          )
    union ( select 'ixRts', r.dbname, r.indexSpace ,
            sum(real(r.space) * 1024),
            sum(real(r.nActive) * i.pgSize),
            1,
            count(*)
        from sysibm.IndexSpaceStats r , sysibm.sysIndexes i
            where r.dbid = i.dbid  and r.isobid = i.isobid
                    and r.dbName=i.dbName and r.indexSpace=i.indexSpace
            group by r.dbName, r.indexSpace
           )
)
select ty, db,
     sum(alloc) alloc, sum(act) act, sum(#ts) #ts, sum(#pa) #pa
    from sp
--  where db like 'MF%'
    group by ty, db
    order by 4 desc
;
            max(s.spaceF * 1024) cSpa,
            sum(real(r.space) * 1024) rSpa,
            sum(real(r.nActive) * s.pgSize * 1024) rAct
        from sysibm.tablespacestats r, sysibm.sysTablespace s
        where r.dbid = s.dbid  and r.psid = s.psid
             and r.dbName= s.dbName  and r.name = s.name
          group by s.dbid, s.psid, s.dbname, s.name
)
with tsDet as
(   select s.dbname db, s.name ts,
            max(real(s.nActive) * s.pgSize* 1024) cAct,
            max(s.spaceF * 1024) cSpa,
            sum(real(r.space) * 1024) rSpa,
            sum(real(r.nActive) * s.pgSize * 1024) rAct
        from sysibm.tablespacestats r, sysibm.sysTablespace s
        where r.dbid = s.dbid  and r.psid = s.psid
             and r.dbName= s.dbName  and r.name = s.name
          group by s.dbid, s.psid, s.dbname, s.name
)
select sum(cAct), sum(cSpa), sum(rSpa), sum(rAct) from tsDet;
select * from tsDet; -- where db like 'MF01%'
;
x
with ixDet as
(   select  i.creator cr, i.name ix, i.dbName db,
            sum(max(real(nLeaf) * i.pgSize * 1024, 0)) cLeaf,
            sum(max(i.spacef * 1024, 0)) cSpa,
            sum(real(s.space) * 1024) rSpa,
            sum(real(s.nActive) * i.pgSize * 1024) rAct
        from sysibm.sysindexes i
            left join sysibm.indexSpaceStats s
            on s.dbid = i.dbid  and s.isobid = i.isobid
               and s.dbName = i.dbName and s.indexSpace = i.indexSpace
        group by i.creator, i.name, i.dbName, i.dbId, i.isobid,
                 i.indexSpace
)
select * from ixDet where db like 'MF01%'
;
select sum(cLeaf), sum(cSpa), sum(rSpa) rSpa, sum(rAct)
         from ixDet where db like 'MF01%'
;
x
select count(*) from
(
select i.creator, i.name, i.spacef, sum(p.spacef) from
    sysibm.sysIndexes i, sysIbm.sysIndexPart p
    where i.creator = p.ixCreator and i.name = p.ixName
        and i.dbName like '%'
    group by i.creator, i.name, i.spacef
    having i.spacef = sum(p.spacef)
         or (i.spacef < 0 and sum(p.spacef) < 0)
) x
;
select i.creator, i.name, i.spacef, sum(p.spacef) from
    sysibm.sysIndexes i, sysIbm.sysIndexPart p
    where i.creator = p.ixCreator and i.name = p.ixName
        and i.dbName like '%'
    group by i.creator, i.name, i.spacef
    having i.spacef <> sum(p.spacef) and
           (i.spacef >= 0 or sum(p.spacef) >= 0)
;
X
    select  i.creator, i.name, i.dbname, i.indexspace, p.partition,
            sum(real(s.space)) rSpa, count(s.space) rSpaCnt,
            sum(real(s.nActive) * i.pgSize * 1024) rAct,
                                     , count(s.nActive) rActCnt,
             , 0,
            1, sum(s.totalEntries),
            count(*), sum(s.extents)
        from sysibm.indexspacestats s, sysibm.sysIndexes i
        where s.dbid = i.dbid  and s.isobid = i.isobid
        group by s.dbid, s.isobid, s.dbName, s.indexSpace
with st (db, name, alloc, active, ts, rows, ix, entries, part, ext) as
(   select  s.dbname, s.indexspace,
            sum(s.space), sum(s.nActive * i.pgSize / 1024),
            0, 0,
            1, sum(s.totalEntries),
            count(*), sum(s.extents)
        from sysibm.indexspacestats s, sysibm.sysIndexes i
        where s.dbid = i.dbid  and s.isobid = i.isobid
        group by s.dbid, s.isobid, s.dbName, s.indexSpace
    union select s.dbname, s.name,
            sum(s.space), sum(s.nActive * p.pgSize),
            1, sum(s.totalRows),
            0, 0,
            count(*), sum(s.extents)
        from sysibm.tablespacestats s, sysibm.sysTablespace p
        where s.dbid = p.dbid  and s.psid = p.psid
        group by s.dbid, s.psid, s.dbname, s.name
)
select  db,
        sum(alloc) "alloc kb", sum(active) "active kb",
        sum(ts) "ts #", sum(rows) "ts rows",
        sum(ix) "ix #", sum(entries) "ix entries",
        sum(part) "partitions", sum(ext) "extents"
    from st
 -- where db like 'WL%'
    where db = 'DA540769' and(name like 'IWK001A%' or name = 'A001A')
    group by db
    with ur
;
x
select s.dbname,
       s.name,
  --     s.partition,
       count(*) "total part",
       sum(s.totalRows) "rows",
       sum(s.nActive * p.pgSize) "active kb",
       sum(s.space) "alloc kb"
       -- updateStatsTime , strip(p.dbName) || '.' || p.name
    from sysibm.tablespacestats s, sysibm.sysTablespace p
    where s.dbid = p.dbid  and s.psid = p.psid
           AND s.dbNAME = 'DGDB9998'
    group by s.dbname, s.name
    with ur
;
select s.dbname,
       s.indexspace,
  --     s.partition,
       count(*) "total part",
       sum(s.totalEntries) "entries",
       sum(s.nActive * i.pgSize / 1024) "active kb",
       sum(s.space) "alloc kb",
       sum(s.extents) "extents"
       -- updateStatsTime , strip(p.dbName) || '.' || p.name
    from sysibm.indexspacestats s, sysibm.sysIndexes i
    where s.dbid = i.dbid  and s.isobid = i.isobid
           AND s.dbNAME = 'DGDB9998'
    group by s.dbname, s.indexspace
    with ur
;
}¢--- A540769.WK.SQL(RTSTIC) cre=2010-04-26 mod=2010-04-26-10.31.30 A540769 ----
--        find reorgLastTime / timestamp
--            from tableSpaceStats, indexSpaceStats, sysCopy
--            order by db, ts partition
--
with u (db, ts, is, ty, pa, reoLa) as
(
select s.dbName, s.name ts, '', 'tss', partition, reorgLastTime
    from sysibm.sysTablespace s, sysIbm.sysTableSpaceStats r
    where
            s.dbName = r.dbName and s.name = r.Name
        and s.dbid   = r.dbid and s.psid = r.psid
union all select t.dbName, t.tsName, i.indexSpace,
          'iss', partition, reorgLastTime
    from sysIbm.sysTables t, sysibm.sysIndexes i,
               sysIbm.sysIndexSpaceStats r
    where
            t.dbName = i.dbName
        and t.creator = i.tbCreator and t.name = i.tbName
        and i.creator = r.Creator and i.name = r.Name
        and i.dbid = r.dbid and i.isobid = r.isobid
union all select c.dbName, c.tsName, '', 'cop', dsNum, max(timestamp)
    from sysibm.sysCopy c where icType = 'W'
    group by dbName, tsName, dsNum
)
select *
    from u
    where db  = 'MF01A1T' and ts = 'A150H'
order by 1, 2, 5, 4 desc, 3
;
x;
select s.dbName, s.name ts, indexSpace is
    from sysibm.sysTablespace s, sysIbm.sysTables t, sysibm.sysIndexes i
    where s.DBNAME = 'MF01A1T' and s.name like 'A150A'
        and s.dbName = t.dbName and s.name = t.tsName
        and s.dbName = i.dbName and s.name = t.tsName
        and t.creator = i.tbCreator and t.name = i.tbName
;   where
x;
select dbName, name,
       oa1t.fOsFmtE7(sum(totalRows)) rows,
       oa1t.fOsFmtE7(sum(space)) space,
       oa1t.fOsFmtE7(sum(case when partition <= 120
                         then totalRows else 0 end)) rows120,
       oa1t.fOsFmtE7(sum(case when partition <= 120
                         then space     else 0 end)) space120
    from sysIbm.sysTableSpaceStats
    where DBNAME = 'MF01A1T' and name like 'A150%'
    group by dbName, name
    with ur
}¢--- A540769.WK.SQL(RTST10) cre= mod= -----------------------------------------
.CONNECT DP4G


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE "SYSIBM".SYSTABLESPACESTATS
        (UPDATESTATSTIME TIMESTAMP (6) WITHOUT TIME ZONE
                                                        NOT NULL
  WITH DEFAULT
        ,NACTIVE INTEGER
  WITH DEFAULT NULL
        ,NPAGES INTEGER
  WITH DEFAULT NULL
        ,EXTENTS SMALLINT
  WITH DEFAULT NULL
        ,LOADRLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REORGLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REORGINSERTS INTEGER
  WITH DEFAULT NULL
        ,REORGDELETES INTEGER
  WITH DEFAULT NULL
        ,REORGUPDATES INTEGER
  WITH DEFAULT NULL
        ,REORGUNCLUSTINS INTEGER
  WITH DEFAULT NULL
        ,REORGDISORGLOB INTEGER
  WITH DEFAULT NULL
        ,REORGMASSDELETE INTEGER
  WITH DEFAULT NULL
        ,REORGNEARINDREF INTEGER
  WITH DEFAULT NULL
        ,REORGFARINDREF INTEGER
  WITH DEFAULT NULL
        ,STATSLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,STATSINSERTS INTEGER
  WITH DEFAULT NULL
        ,STATSDELETES INTEGER
  WITH DEFAULT NULL
        ,STATSUPDATES INTEGER
  WITH DEFAULT NULL
        ,STATSMASSDELETE INTEGER
  WITH DEFAULT NULL
        ,COPYLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,COPYUPDATEDPAGES INTEGER
  WITH DEFAULT NULL
        ,COPYCHANGES INTEGER
  WITH DEFAULT NULL
        ,COPYUPDATELRSN CHARACTER(6) FOR BIT DATA
  WITH DEFAULT NULL
        ,COPYUPDATETIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,IBMREQD CHARACTER(1) FOR MIXED DATA
                                                        NOT NULL
        ,DBID SMALLINT
                                                        NOT NULL
        ,"PSID" SMALLINT
                                                        NOT NULL
        ,"PARTITION" SMALLINT
                                                        NOT NULL
        ,INSTANCE SMALLINT
                                                        NOT NULL
  WITH DEFAULT 1
        ,SPACE BIGINT
  WITH DEFAULT NULL
        ,TOTALROWS BIGINT
  WITH DEFAULT NULL
        ,DATASIZE BIGINT
  WITH DEFAULT NULL
        ,UNCOMPRESSEDDATASIZE BIGINT
  WITH DEFAULT NULL
        ,DBNAME VARCHAR(24) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,"NAME" VARCHAR(24) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,REORGCLUSTERSENS BIGINT
  WITH DEFAULT NULL
        ,REORGSCANACCESS BIGINT
  WITH DEFAULT NULL
        ,REORGHASHACCESS BIGINT
  WITH DEFAULT NULL
        ,HASHLASTUSED DATE
  WITH DEFAULT NULL
        ,DRIVETYPE CHARACTER(3) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT 'HDD'
        ,LPFACILITY CHARACTER(1) FOR MIXED DATA
  WITH DEFAULT NULL
        ,STATS01 BIGINT
  WITH DEFAULT NULL
        ,CONSTRAINT DSNTSS_INSTANCE CHECK
        (INSTANCE = 1 OR INSTANCE = 2
        )
        )
        IN DSNDB06.SYSRTSTS
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE NONE
   AUDIT NONE
   CCSID UNICODE;

}¢--- A540769.WK.SQL(RTST11) cre= mod= -----------------------------------------
.CONNECT DBTC


 SET CURRENT SQLID = 'A540769';


    CREATE TABLE "SYSIBM".SYSTABLESPACESTATS
        (UPDATESTATSTIME TIMESTAMP (6) WITHOUT TIME ZONE
                                                        NOT NULL
  WITH DEFAULT
        ,NACTIVE INTEGER
  WITH DEFAULT NULL
        ,NPAGES INTEGER
  WITH DEFAULT NULL
        ,EXTENTS SMALLINT
  WITH DEFAULT NULL
        ,LOADRLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REORGLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,REORGINSERTS INTEGER
  WITH DEFAULT NULL
        ,REORGDELETES INTEGER
  WITH DEFAULT NULL
        ,REORGUPDATES INTEGER
  WITH DEFAULT NULL
        ,REORGUNCLUSTINS INTEGER
  WITH DEFAULT NULL
        ,REORGDISORGLOB INTEGER
  WITH DEFAULT NULL
        ,REORGMASSDELETE INTEGER
  WITH DEFAULT NULL
        ,REORGNEARINDREF INTEGER
  WITH DEFAULT NULL
        ,REORGFARINDREF INTEGER
  WITH DEFAULT NULL
        ,STATSLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,STATSINSERTS INTEGER
  WITH DEFAULT NULL
        ,STATSDELETES INTEGER
  WITH DEFAULT NULL
        ,STATSUPDATES INTEGER
  WITH DEFAULT NULL
        ,STATSMASSDELETE INTEGER
  WITH DEFAULT NULL
        ,COPYLASTTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,COPYUPDATEDPAGES INTEGER
  WITH DEFAULT NULL
        ,COPYCHANGES INTEGER
  WITH DEFAULT NULL
        ,COPYUPDATELRSN CHARACTER(10) FOR BIT DATA
  WITH DEFAULT NULL
        ,COPYUPDATETIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,IBMREQD CHARACTER(1) FOR MIXED DATA
                                                        NOT NULL
        ,DBID SMALLINT
                                                        NOT NULL
        ,"PSID" SMALLINT
                                                        NOT NULL
        ,"PARTITION" SMALLINT
                                                        NOT NULL
        ,INSTANCE SMALLINT
                                                        NOT NULL
  WITH DEFAULT 1
        ,SPACE BIGINT
  WITH DEFAULT NULL
        ,TOTALROWS BIGINT
  WITH DEFAULT NULL
        ,DATASIZE BIGINT
  WITH DEFAULT NULL
        ,UNCOMPRESSEDDATASIZE BIGINT
  WITH DEFAULT NULL
        ,DBNAME VARCHAR(24) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,"NAME" VARCHAR(24) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT
        ,REORGCLUSTERSENS BIGINT
  WITH DEFAULT NULL
        ,REORGSCANACCESS BIGINT
  WITH DEFAULT NULL
        ,REORGHASHACCESS BIGINT
  WITH DEFAULT NULL
        ,HASHLASTUSED DATE
  WITH DEFAULT NULL
        ,DRIVETYPE CHARACTER(3) FOR MIXED DATA
                                                        NOT NULL
  WITH DEFAULT 'HDD'
        ,LPFACILITY CHARACTER(1) FOR MIXED DATA
  WITH DEFAULT NULL
        ,STATS01 BIGINT
  WITH DEFAULT NULL
        ,UPDATESIZE BIGINT
  WITH DEFAULT NULL
        ,LASTDATACHANGE TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CONSTRAINT DSNTSS_INSTANCE CHECK
        (INSTANCE = 1 OR INSTANCE = 2
        )
        )
        IN DSNDB06.SYSTSTSS
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE NONE
   AUDIT NONE
   CCSID UNICODE
   PARTITION BY SIZE EVERY 64G;

}¢--- A540769.WK.SQL(RTSXX) cre=2007-06-06 mod=2007-06-08-14.16.30 F540769 -----
with tm as
( select t.*, s.psid,
      char(case when s.nTables = 1 then ''
               when s.nTables > 999 then '****'
               else    right('****' || strip(char(nTables)), 4)
          end, 4) mult
      from sysibm.sysTables t, sysibm.systablespace s
          where t.type = 'T'
                and t.dbName = s.dbName and t.tsname = s.name
)
select char(tm.name, 16) "tb", mult, decimal(cardf, 15) "runStatsCardF"
    from tm
    where dbname in ('DBJ01', 'DED02')
;
with tm as
( select t.*, s.psid,
      char(case when s.nTables = 1 then ''
               when s.nTables > 999 then '****'
               else    right('****' || strip(char(nTables)), 4)
          end, 4) mult
      from sysibm.sysTables t, sysibm.systablespace s
          where t.type = 'T'
                and t.dbName = s.dbName and t.tsname = s.name
)
select char(tm.name, 16) "tb", mult,
          decimal(sum(r.totalrows), 15) "rtsRows"
    from tm
        left join sysibm.tablespacestats r
        on r.dbid = tm.dbid and r.psid = tm.psid
    where tm.dbname in ('DBJ01', 'DED02')
    group by tm.creator, tm.name, mult
;
with tm as
( select t.*, s.psid,
      char(case when s.nTables = 1 then ''
               when s.nTables > 999 then '****'
               else    right('****' || strip(char(nTables)), 4)
          end, 4) mult
      from sysibm.sysTables t, sysibm.systablespace s
          where t.type = 'T'
                and t.dbName = s.dbName and t.tsname = s.name
)
select char(tm.name, 16) "tb", mult,
     decimal(cnt.cnt, 15) "sqlCount"
    from tm
        left join
        (       select 'ODV', 'TBJ317A1', count(*) from odv.TBJ317A1
          union select 'ODV', 'TBJ318A1', count(*) from odv.TBJ318A1
          union select 'ODV', 'TBJ319A1', count(*) from odv.TBJ319A1
          union select 'ODV', 'TBJ320A1', count(*) from odv.TBJ320A1
          union select 'ODV', 'TBJ321A1', count(*) from odv.TBJ321A1
          union select 'ODV', 'TBJ322A1', count(*) from odv.TBJ322A1
          union select 'ODV', 'TBJ323A1', count(*) from odv.TBJ323A1
          union select 'ODV', 'TED021A1', count(*) from odv.TED021A1
          union select 'ODV', 'TED021K1', count(*) from odv.TED021K1
          union select 'ODV', 'TED021X1', count(*) from odv.TED021X1
          union select 'ODV', 'TED021Y1', count(*) from odv.TED021Y1
          union select 'ODV', 'TED022A1', count(*) from odv.TED022A1
          union select 'ODV', 'TED022K1', count(*) from odv.TED022K1
          union select 'ODV', 'TED022X1', count(*) from odv.TED022X1
          union select 'ODV', 'TED022Y1', count(*) from odv.TED022Y1
          union select 'ODV', 'TED023A1', count(*) from odv.TED023A1
          union select 'ODV', 'TED024A1', count(*) from odv.TED024A1
          union select 'ODV', 'TED025A1', count(*) from odv.TED025A1
          union select 'ODV', 'TED026A1', count(*) from odv.TED026A1
          union select 'ODV', 'TED026K1', count(*) from odv.TED026K1
          union select 'ODV', 'TED028A1', count(*) from odv.TED028A1
        ) as cnt (cr, tb, cnt)
        on tm.creator = cnt.cr and tm.name = cnt.tb
    where tm.dbname in ('DBJ01', 'DED02')
 ;
x-----
with ts as
( select ts.*,
       ( select min(name)
           from sysibm.sysTables tb
           where tb.dbname = ts.dbName and tb.tsName = ts.name) tb
    from sysibm.systablespace ts
    where ts.dbname = 'DED02'
)
select char(ts.tb, 12) "ts for tb",
       min(nTables) "nTables",
       min(partitions) "parts",
       sum(s.totalrows) "rts rows",
       count(*) "rts count",
       case when min(s.name) is null then '*** no RTS'
            when max(partitions) <= 1 and count(*) = 1 then ''
            when count(*) = 1 then '***count0'
            when max(partitions) = count(*) then ''
            else                   '***missRTS'
       end "rtsSta"
    from ts
        left join sysibm.tablespacestats s
        on s.dbid = ts.dbid and s.psid = ts.psid
    group by ts.dbname, ts.name, ts.tb
    order by 1
;
with ts as
( select ts.*,
       ( select min(name)
           from sysibm.sysTables tb
           where tb.dbname = ts.dbName and tb.tsName = ts.name) tb
    from sysibm.systablespace ts
    where ts.dbname = 'DED02'
)
select char(ts.tb, 12) "for tb",
       char(ts.dbName, 8) "db",
       char(ts.name, 8) "ts",
       s.updatestatstime
    from ts
        left join sysibm.tablespacestats s
        on s.dbid = ts.dbid and s.psid = ts.psid
    where s.updatestatstime is null
          or s.updatestatstime < current timestamp + 1 day
    order by 4 asc
;
select char(t.name, 12) "tb",
       char(t.dbName, 8) "db",
       char(t.TSname, 8) "ts",
       t.statstime
    from sysibm.sysTables t
    where t.type = 'T' and t.dbname = 'DED02'
    order by 4 asc
;
x
select dbname, name, partition, s.updatestatstime
    from sysibm.tablespacestats s, sysibm.sysDatabase d
    where s.dbid = d.dbid
          and  d.name in ('DED02', 'DED05', 'DED06', 'DGM01', 'DRE01')
    order by s.updatestatstime asc
;
union select i.dbname, i.indexspace name,
--        and  ts.dbName = 'DED02'
    group by ts.dbname, ts.name, ts.tb
--    where s.dbname = 'DED02'
union select char(ts.tb, 12), '', 'marker', partitions, nTables, '
    from ts
order by 1, 2
;
x
select s.dbname, s.name, sum(s.totalrows) "rts rows",
              count(*) "rts count",
       -- min(partition), max(partition),
       min(s.updatestatstime), max(s.updatestatstime)
    from sysibm.tablespacestats s, sysibm.sysDatabase d
    where s.dbid = d.dbid
          and  d.name in ('DED02', 'DED05', 'DED06', 'DGM01', 'DRE01')
    group by s.dbname, s.name
union select i.dbname, i.indexspace name,
       sum(i.totalentries) "rts rows", count(*) "rts count",
       -- min(partition), max(partition),
       min(i.updatestatstime), max(i.updatestatstime)
    from sysibm.indexspacestats i, sysibm.sysDatabase d
    where i.dbid = d.dbid
          and  d.name in ('DED02', 'DED05', 'DED06', 'DGM01', 'DRE01')
    group by dbname, indexspace
    order by 1, 2
;
select char(dbname, 8) "db", char(name, 12) "name",
    cardf "(fukey)Card", spacef "runStats space", statstime
    from sysibm.sysTables
    where type = 'T' and dbname in ('DED02', 'DED05', 'DED06', 'DGM01',
        'DRE01')
union select char(t.dbname, 8) "db", char(i.name, 12) "name",
    i.fullKeyCardf "(fukey)Card", i.spacef "runStats space",
        i.statstime
    from sysibm.sysTables t, sysibm.sysIndexes i
    where i.tbCreator = t.creator and i.tbName = t.name
             and t.dbname in ('DED02', 'DED05', 'DED06', 'DGM01',
        'DRE01')
    order by  5 desc
;
}¢--- A540769.WK.SQL(RUEDI) cre= mod= ------------------------------------------
ALTER  TABLE    GDB0444.TPO003A1
   DROP PRIMARY KEY;
ALTER  TABLE    GDB0444.TPO003A1
ADD  CONSTRAINT PO003_BUID           PRIMARY KEY (PO003_BUID          ,
                                             PO003_BKST          ,
                                             PO003_LIST          ,
                                             PO003_SQNR          ) ;
}¢--- A540769.WK.SQL(RUNSTATS) cre=2007-05-22 mod=2007-05-22-14.32.08 F540769 ---
select char(dbname, 8) "db", char(name, 12) "name",
    cardf "(fukey)Card", spacef "runStats space", statstime
    from sysibm.sysTables
    where type = 'T' and dbname = 'TSTNAKBJ'
union select char(t.dbname, 8) "db", char(i.name, 12) "name",
    i.fullKeyCardf "(fukey)Card", i.spacef "runStats space", i.statstime
    from sysibm.sysTables t, sysibm.sysIndexes i
    where i.tbCreator = t.creator and i.tbName = t.name
             and t.dbname = 'TSTNAKBJ'
    order by  5 desc
;
}¢--- A540769.WK.SQL(RUNUPD) cre=2009-12-03 mod=2009-12-03-10.28.50 A540769 ----
select t.card, t.cardf, t.nPages, t.nPagesF, t.spacef, t.AVGROWLEN,
                        sum(r.totalRows), sum(r.statsInserts),
                        sum(r.nPages) "nP",
                        sum(r.space)  "sp",
                        sum(coalesce(r.totalRows, r.statsInserts, 0)),
        t.name, t.creator
    from sysibm.systables t
        join sysibm.systableSpace s
        on t.dbName = s.dbName and t.tsName = s.name
            and t.dbid = s.dbId
        left join sysibm.sysTableSpaceStats r
        on t.dbName = r.dbName and t.tsName = r.name
            and t.dbid = r.dbId and s.psid = r.psid
    where t.name = 'TMF150A1' and t.creator = 'OA1T'
    group by t.creator, t.name, t.card, t.cardf,
                       t.nPages, t.nPagesF, t.spacef, t.AVGROWLEN
;
update
         sysibm.systables t
    set card = 162982084    , cardf = 162982084,
        nPages = 7285306    ,
        nPagesF= 7285306    , spaceF=       31510800,
        AVGROWLEN = 200     ,
        statstime = current timestamp
    where t.name = 'TMF150A1' and t.creator = 'OA1T'
;
select card, cardf, nPages, nPagesF, spacef, AVGROWLEN
    from sysibm.systables  t
    where t.name = 'TMF150A1' and t.creator = 'OA1T'
;
}¢--- A540769.WK.SQL(RUNUPDS) cre=2009-12-03 mod=2009-12-03-11.05.34 A540769 ---
select -- t.card, t.cardf, t.nPages, t.nPagesF, t.spacef, t.AVGROWLEN,
       s.space, s.spacef, s.nActive, s.nActiveF,
                        sum(r.totalRows), sum(r.statsInserts),
                        sum(r.nPages) "nP",
                        sum(r.space)  "sp",
                        sum(coalesce(r.totalRows, r.statsInserts, 0)),
        t.name, t.creator
    from sysibm.systables t
        join sysibm.systableSpace s
        on t.dbName = s.dbName and t.tsName = s.name
            and t.dbid = s.dbId
        left join sysibm.sysTableSpaceStats r
        on t.dbName = r.dbName and t.tsName = r.name
            and t.dbid = r.dbId and s.psid = r.psid
    where t.name = 'TMF150A1' and t.creator = 'OA1T'
    group by t.creator, t.name, t.card, t.cardf,
                       s.space, s.spacef, s.nActive, s.nActiveF
;
update
         sysibm.systablePart p
    set


                                spaceF=       3151080

    where p.tsname = 'A150A' and p.dbName  = 'MF01A1T'
;
select        space, spacef,  s.nActive, s.nActiveF
    from sysibm.systableSpace s
    where s.name = 'A150A' and s.dbName  = 'MF01A1T'
;
-- rollback
}¢--- A540769.WK.SQL(RUSC) cre=2006-06-12 mod=2006-06-12-11.57.16 F540769 ------
-- SET CURRENT SQLID = 'S100447';
SELECT COUNT(*)
FROM OA1A.VCZ433A1V
;
SELECT *
FROM OA1A.VCZ323A1V A
    ,OA1A.VCZ433A1V B
WHERE A.I_DCMNTN_ITEM = B.I_DCMNTN_ITEM
AND   A.C_STS_DMS = '0'
ORDER BY A.I_DCMNTN_ITEM, I_VERSION_PAPYRUS, N_SEQUENCE_SI
}¢--- A540769.WK.SQL(RUSCHDRO) cre=2006-07-07 mod=2006-07-07-12.07.44 F540769 ---
SET CURRENT SQLID = 'S100447';
DROP TABLESPACE SV01A1Z.A018A;
DROP TABLESPACE SV10A1Z.A120A;
DROP TABLESPACE SV10B1Z.A120B;
}¢--- A540769.WK.SQL(RUSCHIX) cre=2006-07-07 mod=2006-07-07-08.16.09 F540769 ---
SET CURRENT SQLID = 'S100447';
CREATE UNIQUE INDEX OA1A.ISV132B0
       ON OA1A.TSV132B1
     ( SV13201T             ASC  ,
       SV13201N             ASC  ,
       SV13201B             ASC  ,
       SV13201I             ASC  ,
       SV13201E             ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
                                                                      ;
CREATE INDEX OA1A.ISV132B1
       ON OA1A.TSV132B1
     ( SV13214              ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
                                                                      ;
CREATE INDEX OA1A.ISV132B2
       ON OA1A.TSV132B1
     ( SV13216              ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
                                                                      ;
CREATE INDEX OA1A.ISV132B3
       ON OA1A.TSV132B1
     ( SV13211              ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
                                                                      ;
CREATE INDEX OA1A.ISV132B4
       ON OA1A.TSV132B1
     ( SV13201B             ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
                                                                      ;
CREATE INDEX OA1A.ISV132B5
       ON OA1A.TSV132B1
     ( SV13201I             ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
                                                                      ;
CREATE INDEX OA1A.ISV132B6
       ON OA1A.TSV132B1
     ( SV13201E             ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
                                                                      ;
CREATE INDEX OA1A.ISV132B7
       ON OA1A.TSV132B1
     ( SV13213              ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
                                                                      ;
}¢--- A540769.WK.SQL(RUSCH120) cre=2006-07-06 mod=2006-08-22-09.55.33 F540769 ---
SET CURRENT SQLID = 'S100447';
CREATE       TABLESPACE A120T    IN SV10A1L
       USING STOGROUP GSMS
             PRIQTY 48
             SECQTY 7200
             ERASE NO
             FREEPAGE   0
             PCTFREE 10
             COMPRESS YES
             GBPCACHE CHANGED
             TRACKMOD YES
       BUFFERPOOL BP2
       LOCKSIZE ANY
       LOCKMAX SYSTEM
       CCSID EBCDIC
       MAXROWS 255
       CLOSE YES
       SEGSIZE 64
                                                                      ;
CREATE TABLE    OA1L.TSV120T1
   (SV12001T INTEGER                             NOT NULL             ,
    SV12001N TIMESTAMP                           NOT NULL             ,
    SV12002 SMALLINT                             NOT NULL             ,
    SV12003 CHAR(4)                              NOT NULL             ,
    SV12004 DATE                                 NOT NULL             ,
    SV12005 DATE                                 NOT NULL             ,
    SV12006 CHAR(3)                              NOT NULL             ,
    SV12007 CHAR(12)                             NOT NULL             ,
    SV12008 CHAR(4)                              NOT NULL             ,
    SV12010 CHAR(20)                             NOT NULL             ,
    SV12011 SMALLINT                             NOT NULL             ,
    SV12012 CHAR(1)                              NOT NULL             ,
    SV12013 SMALLINT                             NOT NULL             ,
    SV12014 CHAR(1)                              NOT NULL             ,
    SV12015 CHAR(1)                              NOT NULL             ,
    SV12016 SMALLINT                             NOT NULL             ,
    SV12017 TIMESTAMP                            NOT NULL             ,
    SV12018 CHAR(7)                              NOT NULL             ,
    SV12019 CHAR(20)                             NOT NULL             ,
    SV12020 DATE                                 NOT NULL             ,
    SV12022 CHAR(12)                             NOT NULL             ,
    SV12023 CHAR(10)                             NOT NULL             ,
    SV12024 CHAR(10)                             NOT NULL             ,
    SV12025 CHAR(10)                             NOT NULL             ,
    SV12026 CHAR(10)                             NOT NULL             ,
    SV12027 CHAR(10)                             NOT NULL             ,
    SV12028 CHAR(10)                             NOT NULL             ,
    SV12029 CHAR(10)                             NOT NULL             ,
    SV12030 CHAR(10)                             NOT NULL             ,
    SV12031 CHAR(10)                             NOT NULL
                                                                      )
       IN SV10A1L.A120T
       AUDIT NONE
       CCSID EBCDIC
                                                                      ;
 CREATE INDEX OA1L.ISV120T1
        ON OA1L.TSV120T1
      ( SV12007              ASC  )
        USING STOGROUP GSMS
              PRIQTY      48
              SECQTY    7200
        ERASE NO
        FREEPAGE  10
        PCTFREE 10
        GBPCACHE CHANGED
        BUFFERPOOL BP1
        CLOSE YES
        PIECESIZE 2       G
        COPY NO

}¢--- A540769.WK.SQL(RUSCH18) cre=2006-07-06 mod=2006-08-22-09.54.53 F540769 ---
SET CURRENT SQLID = 'S100447';
CREATE       TABLESPACE A018T    IN SV01A1L
       USING STOGROUP GSMS
             PRIQTY 48
             SECQTY 7200
             ERASE NO
             FREEPAGE   0
             PCTFREE 10
             COMPRESS YES
             GBPCACHE CHANGED
             TRACKMOD YES
       BUFFERPOOL BP2
       LOCKSIZE ANY
       LOCKMAX SYSTEM
       CCSID EBCDIC
       MAXROWS 255
       CLOSE YES
       SEGSIZE 64
                                                                      ;
CREATE TABLE    OA1L.TSV018T1
   (SV01801U CHAR(20)                            NOT NULL             ,
    SV01801N TIMESTAMP                           NOT NULL             ,
    SV01802 SMALLINT                             NOT NULL             ,
    SV01806 CHAR(20)                             NOT NULL             ,
    SV01807 CHAR(12)                             NOT NULL             ,
    SV01808 CHAR(3)                              NOT NULL             ,
    SV01809A CHAR(1)                             NOT NULL             ,
    SV01809B CHAR(2)                             NOT NULL             ,
    SV01809C SMALLINT                            NOT NULL             ,
    SV01810 SMALLINT                             NOT NULL             ,
    SV01811 SMALLINT                             NOT NULL             ,
    SV01812 CHAR(20)                             NOT NULL             ,
    SV01813 CHAR(20)                             NOT NULL             ,
    SV01814A CHAR(1)                             NOT NULL             ,
    SV01814B DATE                                NOT NULL             ,
    SV01815A CHAR(1)                             NOT NULL             ,
    SV01815B DATE                                NOT NULL             ,
    SV01816A CHAR(1)                             NOT NULL             ,
    SV01816B DATE                                NOT NULL             ,
    SV01817A CHAR(1)                             NOT NULL             ,
    SV01817B CHAR(4)                             NOT NULL             ,
    SV01818 CHAR(1)                              NOT NULL             ,
    SV01819A CHAR(1)                             NOT NULL             ,
    SV01819B SMALLINT                            NOT NULL             ,
    SV01820 SMALLINT                             NOT NULL             ,
    SV01821 TIMESTAMP                            NOT NULL             ,
    SV01822 CHAR(20)                             NOT NULL             ,
    SV01823 DATE                                 NOT NULL             ,
    SV01824 CHAR(7)                              NOT NULL             ,
    SV01825 CHAR(4)                              NOT NULL             ,
    SV01826 CHAR(16)                             NOT NULL             ,
    SV01827 CHAR(16)                             NOT NULL             ,
    SV01890 CHAR(11)                             NOT NULL             ,
    SV01891 CHAR(10)                             NOT NULL             ,
    SV01892 CHAR(10)                             NOT NULL             ,
    SV01893 DATE                                 NOT NULL             ,
    SV01894 DATE                                 NOT NULL             ,
    SV01895 DATE                                 NOT NULL             ,
    SV01896 SMALLINT                             NOT NULL             ,
    SV01897 SMALLINT                             NOT NULL             ,
    SV01898 SMALLINT                             NOT NULL             ,
    SV01899 SMALLINT                             NOT NULL
                                                                      )
       IN SV01A1L.A018T
       AUDIT NONE
       CCSID EBCDIC
                                                                      ;
CREATE INDEX OA1L.ISV018T1
       ON OA1L.TSV018T1
     ( SV01807              ASC  )
       USING STOGROUP GSMS
             PRIQTY      48
             SECQTY    7200
       ERASE NO
       FREEPAGE  10
       PCTFREE 10
       GBPCACHE CHANGED
       BUFFERPOOL BP1
       CLOSE YES
       PIECESIZE 2       G
       COPY NO
;
}¢--- A540769.WK.SQL(RZ1SQL2) cre=2012-06-18 mod=2012-06-18-18.02.57 A540769 ---
--************************************************************
--?? ts mit pri/secQty <> -1 oder zuvielen extents
--************************************************************

 SELECT SUBSTR(PT.DBNAME,1,8) "db"
       ,SUBSTR(PT.TSNAME,1,8) "ts"
       ,PT.PARTITION "part"
       ,pt.pQty "priQty"
       ,pt.sQty "secQty"
       ,r.extents
       , case when pt.pQty = -1
           then '--' || pt.dbname || '.' || pt.tsName || ' already -1'
           else 'alter tablespace ' || strip(pt.dbname)
               || '.' || strip(pt.tsName) || ' priQty  -1;'
           end "alter priQty"
       , case when pt.sQty = -1
           then '--' || pt.dbname || '.' || pt.tsName || ' already -1'
           else 'alter tablespace ' || strip(pt.dbname)
               || '.' || strip(pt.tsName) || ' secQty  -1;'
           end "alter secQty"
 FROM
      SYSIBM.SYSTABLESpace s
   join   SYSIBM.SYSTABLEPART pt
     on pt.dbName = s.dbName and pt.tsname = s.name
   left join sysibm.sysTableSpaceStats r
     on    pt.dbNAME = r.DBNAME
       AND pt.tsName = r.NAME
       AND s.dbid      = r.dbid
       AND s.psid      = r.psid
       AND pt.partition = r.partition
 WHERE (pt.pQty <> -1 or pt.sQty <> -1 or r.extents > 300)

   ---------  START EXCLUDE LIST -------------------------------

   -- COMMON SECTION: EXCLUDE LIST SAVE PROCEDURE --
   AND NOT (PT.DBNAME = 'DSNDB06')              -- DB2 CATALOG
   AND NOT (PT.DBNAME = 'DSNDB01')              -- DB2 DIRECTORY
   AND NOT (PT.DBNAME = 'DSNDB04')              -- DB2 SAMPLE DB
   AND NOT (PT.DBNAME = 'DSNTESQ')              -- DB2 CATALOG CLONE
   AND NOT (PT.DBNAME LIKE 'WKDBD%')            -- DB2 WORK DATABASE
   AND NOT (PT.DBNAME LIKE 'DSN8%')             -- IBM TEST DB
   AND NOT (PT.DBNAME LIKE 'DB2MAPP%')          -- REORG MAPPING TABLES
   AND NOT (PT.DBNAME LIKE 'DGDB%')             -- PROTOTYPEN
   AND NOT (PT.DBNAME LIKE 'DA0%')              -- USER DB'S
   AND NOT (PT.DBNAME LIKE 'DA1%')
   AND NOT (PT.DBNAME LIKE 'DA2%')
   AND NOT (PT.DBNAME LIKE 'DA3%')
   AND NOT (PT.DBNAME LIKE 'DA4%')
   AND NOT (PT.DBNAME LIKE 'DA5%')
   AND NOT (PT.DBNAME LIKE 'DA6%')
   AND NOT (PT.DBNAME LIKE 'DA7%')
   AND NOT (PT.DBNAME LIKE 'DA8%')
   AND NOT (PT.DBNAME LIKE 'DA9%')
   AND NOT (PT.DBNAME LIKE 'DF0%')
   AND NOT (PT.DBNAME LIKE 'DF1%')
   AND NOT (PT.DBNAME LIKE 'DF2%')
   AND NOT (PT.DBNAME LIKE 'DF3%')
   AND NOT (PT.DBNAME LIKE 'DF4%')
   AND NOT (PT.DBNAME LIKE 'DF5%')
   AND NOT (PT.DBNAME LIKE 'DF6%')
   AND NOT (PT.DBNAME LIKE 'DF7%')
   AND NOT (PT.DBNAME LIKE 'DF8%')
   AND NOT (PT.DBNAME LIKE 'DF9%')
   AND NOT (PT.DBNAME LIKE 'DS1%')
   AND NOT (PT.DBNAME LIKE 'DW0%')
   AND NOT (PT.DBNAME LIKE 'DX0%')
   AND NOT (PT.DBNAME LIKE 'DX1%')
   AND NOT (PT.DBNAME LIKE 'DX2%')
   AND NOT (PT.DBNAME LIKE 'DX3%')
   AND NOT (PT.DBNAME LIKE 'DX4%')
   AND NOT (PT.DBNAME LIKE 'DX5%')
   AND NOT (PT.DBNAME LIKE 'DX6%')
   AND NOT (PT.DBNAME LIKE 'DX7%')
   AND NOT (PT.DBNAME LIKE 'DX8%')
   AND NOT (PT.DBNAME LIKE 'DX9%')
   AND NOT (PT.DBNAME LIKE 'DY0%')
   AND NOT (PT.DBNAME LIKE 'DY1%')
   AND NOT (PT.DBNAME LIKE 'DY2%')
   AND NOT (PT.DBNAME LIKE 'DY3%')
   AND NOT (PT.DBNAME LIKE 'DY4%')
   AND NOT (PT.DBNAME LIKE 'DY5%')
   AND NOT (PT.DBNAME LIKE 'DY6%')
   AND NOT (PT.DBNAME LIKE 'DY7%')
   AND NOT (PT.DBNAME LIKE 'DY8%')
   AND NOT (PT.DBNAME LIKE 'DY9%')
   AND NOT (PT.DBNAME LIKE 'DI017%')
   -- END COMMON SECTION (START SUBSYSTEM SPECIFIC EXEPTIONS)

   AND NOT (PT.DBNAME LIKE 'DGO%')              -- PROTOTYPEN
   AND NOT (PT.DBNAME LIKE 'OE02%')             -- Mail Ivo Eichmann
   AND NOT (PT.DBNAME LIKE 'DACME%')            -- Mail Heinz Bühler
   AND NOT (PT.DBNAME LIKE 'CSQ%')              -- M-QUEUE DATENBANK
   AND NOT (PT.DBNAME LIKE 'DAU%')              -- Schulung Gerrit
   AND NOT (PT.DBNAME LIKE '%A1X%')             -- Neue Prototypen
   AND NOT (PT.DBNAME LIKE 'DB2ALA%')           -- P.Lehmann
   AND NOT (PT.DBNAME LIKE '?MAREC%')           -- P.Lehmann


   ---------  END EXCLUDE LIST -------------------------------

 ORDER BY pt.DBNAME, pt.tsNAME, PT.PARTITION
 WITH UR;

--************************************************************
--?? ts mit pri/secQty <> -1 oder zuvielen extents
--************************************************************

SELECT SUBSTR(Ip.CREATOR,1,8) AS CREATOR
      ,SUBSTR(Ip.NAME,1,16) AS IXNAME
      ,IP.PARTITION
      ,ip.pQty "priQty"
      ,ip.sQty "secQty"
      ,ip.extents
       , case when ip.pQty = -1
           then '--' || ip.ixcreator ||'.'|| ip.ixName || ' already -1'
           else 'alter index ' || strip(ip.ixCreator)
               || '.' || strip(ip.ixName) || ' priQty  -1;'
           end "alter priQty"
FROM
    SYSIBM.SYSINDEXPART IP
  left join SYSIBM.SYSINDEXSpaceStats r
    on ip.creator = r.creator and ip.name = r.creator
       and ip.partition = r.partition
 WHERE (pt.pQty <> -1 or pt.sQty <> -1 or r.extents > 300)

   ---------  START EXCLUDE LIST -------------------------------

   -- COMMON SECTION: EXCLUDE LIST SAVE PROCEDURE --
   AND NOT (PT.DBNAME = 'DSNDB06')              -- DB2 CATALOG
   AND NOT (PT.DBNAME = 'DSNDB01')              -- DB2 DIRECTORY
   AND NOT (PT.DBNAME = 'DSNDB04')              -- DB2 SAMPLE DB
   AND NOT (PT.DBNAME = 'DSNTESQ')              -- DB2 CATALOG CLONE
   AND NOT (PT.DBNAME LIKE 'WKDBD%')            -- DB2 WORK DATABASE
   AND NOT (PT.DBNAME LIKE 'DSN8%')             -- IBM TEST DB
   AND NOT (PT.DBNAME LIKE 'DB2MAPP%')          -- REORG MAPPING TABLES
   AND NOT (PT.DBNAME LIKE 'DGDB%')             -- PROTOTYPEN
   AND NOT (PT.DBNAME LIKE 'DA0%')              -- USER DB'S
   AND NOT (PT.DBNAME LIKE 'DA1%')
   AND NOT (PT.DBNAME LIKE 'DA2%')
   AND NOT (PT.DBNAME LIKE 'DA3%')
   AND NOT (PT.DBNAME LIKE 'DA4%')
   AND NOT (PT.DBNAME LIKE 'DA5%')
   AND NOT (PT.DBNAME LIKE 'DA6%')
   AND NOT (PT.DBNAME LIKE 'DA7%')
   AND NOT (PT.DBNAME LIKE 'DA8%')
   AND NOT (PT.DBNAME LIKE 'DA9%')
   AND NOT (PT.DBNAME LIKE 'DF0%')
   AND NOT (PT.DBNAME LIKE 'DF1%')
   AND NOT (PT.DBNAME LIKE 'DF2%')
   AND NOT (PT.DBNAME LIKE 'DF3%')
   AND NOT (PT.DBNAME LIKE 'DF4%')
   AND NOT (PT.DBNAME LIKE 'DF5%')
   AND NOT (PT.DBNAME LIKE 'DF6%')
   AND NOT (PT.DBNAME LIKE 'DF7%')
   AND NOT (PT.DBNAME LIKE 'DF8%')
   AND NOT (PT.DBNAME LIKE 'DF9%')
   AND NOT (PT.DBNAME LIKE 'DS1%')
   AND NOT (PT.DBNAME LIKE 'DW0%')
   AND NOT (PT.DBNAME LIKE 'DX0%')
   AND NOT (PT.DBNAME LIKE 'DX1%')
   AND NOT (PT.DBNAME LIKE 'DX2%')
   AND NOT (PT.DBNAME LIKE 'DX3%')
   AND NOT (PT.DBNAME LIKE 'DX4%')
   AND NOT (PT.DBNAME LIKE 'DX5%')
   AND NOT (PT.DBNAME LIKE 'DX6%')
   AND NOT (PT.DBNAME LIKE 'DX7%')
   AND NOT (PT.DBNAME LIKE 'DX8%')
   AND NOT (PT.DBNAME LIKE 'DX9%')
   AND NOT (PT.DBNAME LIKE 'DY0%')
   AND NOT (PT.DBNAME LIKE 'DY1%')
   AND NOT (PT.DBNAME LIKE 'DY2%')
   AND NOT (PT.DBNAME LIKE 'DY3%')
   AND NOT (PT.DBNAME LIKE 'DY4%')
   AND NOT (PT.DBNAME LIKE 'DY5%')
   AND NOT (PT.DBNAME LIKE 'DY6%')
   AND NOT (PT.DBNAME LIKE 'DY7%')
   AND NOT (PT.DBNAME LIKE 'DY8%')
   AND NOT (PT.DBNAME LIKE 'DY9%')
   AND NOT (PT.DBNAME LIKE 'DI017%')
   -- END COMMON SECTION (START SUBSYSTEM SPECIFIC EXEPTIONS)

   AND NOT (PT.DBNAME LIKE 'DGO%')              -- PROTOTYPEN
   AND NOT (PT.DBNAME LIKE 'OE02%')             -- Mail Ivo Eichmann
   AND NOT (PT.DBNAME LIKE 'DACME%')            -- Mail Heinz Bühler
   AND NOT (PT.DBNAME LIKE 'CSQ%')              -- M-QUEUE DATENBANK
   AND NOT (PT.DBNAME LIKE 'DAU%')              -- Schulung Gerrit
   AND NOT (PT.DBNAME LIKE '%A1X%')             -- Neue Prototypen
   AND NOT (PT.DBNAME LIKE 'DB2ALA%')           -- P.Lehmann
   AND NOT (PT.DBNAME LIKE '?MAREC%')           -- P.Lehmann


   ---------  END EXCLUDE LIST -------------------------------

 ORDER BY pt.DBNAME, pt.tsNAME, PT.PARTITION
 WITH UR;

}¢--- A540769.WK.SQL(SAM15) cre=2007-08-07 mod=2007-08-07-13.18.13 F540769 -----
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBOF (810)     Extract time : 2007-08-07 13:16 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=N AL=N LB=Y CM=Y FK=Y  --
--            TG=N UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=SAM15090 In Database DA540769 --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DA540769  Stogroup=GSMS
-- Tablespace=DA540769.SAM15090
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE SAM15090
    IN DA540769
    USING STOGROUP GSMS
    PRIQTY 90000 SECQTY 273600
    ERASE  NO
    FREEPAGE 11 PCTFREE 30
    GBPCACHE CHANGED
    TRACKMOD YES
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=A540769.CAURTSM In DA540769.SAM15090
------------------------------------------------------------------------
--
  SET CURRENT SQLID='A540769';
--
  CREATE TABLE A540769.CAURTSM
     ("CAURTS-ACTSTA"      CHAR(1) FOR SBCS DATA NOT NULL,
      "CAURTS-SAM-ID"      CHAR(8) FOR SBCS DATA NOT NULL,
      "CAURTSM-CLASS"      CHAR(8) FOR SBCS DATA NOT NULL,
      "CAURTSM-STAMP"      TIMESTAMP NOT NULL,
      "CAURTSM-ART-KEY"    CHAR(11) FOR SBCS DATA NOT NULL,
      "CAURTSM-MSG-ID"     CHAR(8) FOR SBCS DATA NOT NULL,
      "CAURTSM-MSG-1"      VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-MSG-2"      VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-MSG-3"      VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-MSG-4"      VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-ATTR-1"     VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-ATTR-2"     VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-ATTR-3"     VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-ATTR-4"     VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-ATTR-5"     VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAURTSM-ATTR-6"     VARCHAR(78) FOR SBCS DATA NOT NULL,
      "CAUR-CRE-STAMP"     TIMESTAMP NOT NULL,
      "CAUR-CRE-ID"        CHAR(32) FOR SBCS DATA NOT NULL,
      "CAUR-LUP-STAMP"     TIMESTAMP NOT NULL,
      "CAUR-LUP-ID"        CHAR(32) FOR SBCS DATA NOT NULL,
      CONSTRAINT "CAURTS-ACTSTA"
      PRIMARY KEY ("CAURTS-ACTSTA",
                   "CAURTS-SAM-ID",
                   "CAURTSM-CLASS",
                   "CAURTSM-STAMP",
                   "CAURTSM-ART-KEY"))
    IN DA540769.SAM15090
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IND_CAURTSM On A540769.CAURTSM
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX A540769.IND_CAURTSM
    ON A540769.CAURTSM
     ("CAURTS-ACTSTA"       ASC,
      "CAURTS-SAM-ID"       ASC,
      "CAURTSM-CLASS"       ASC,
      "CAURTSM-STAMP"       ASC,
      "CAURTSM-ART-KEY"     ASC)
    USING STOGROUP GSMS
    PRIQTY 360000 SECQTY 86400
    ERASE  NO
    FREEPAGE 11 PCTFREE 30
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IND_CAURTSM_D On A540769.CAURTSM
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX A540769.IND_CAURTSM_D
    ON A540769.CAURTSM
     ("CAURTS-ACTSTA"       DESC,
      "CAURTS-SAM-ID"       DESC,
      "CAURTSM-CLASS"       DESC,
      "CAURTSM-STAMP"       DESC,
      "CAURTSM-ART-KEY"     DESC)
    USING STOGROUP GSMS
    PRIQTY 360000 SECQTY 64800
    ERASE  NO
    FREEPAGE 11 PCTFREE 30
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(SATY) cre=2006-06-13 mod=2006-06-13-10.04.07 F540769 ------
SET CURRENT SQLID = 'S100447';
CREATE ALIAS VDPS.XPS_VTRFE000 FOR VDPS2.XPS_VTRFE000;
CREATE ALIAS VDPS.XPS_VTRUS000 FOR VDPS2.XPS_VTRUS000;
COMMIT;
CREATE ALIAS VDPS.XPS_VCOMP000 FOR VDPS2.XPS_VCOMP000;
CREATE ALIAS VDPS.XPS_VDOMI000 FOR VDPS2.XPS_VDOMI000;
CREATE ALIAS VDPS.XPS_VEQUI000 FOR VDPS2.XPS_VEQUI000;
CREATE ALIAS VDPS.XPS_VGEUC000 FOR VDPS2.XPS_VGEUC000;
CREATE ALIAS VDPS.XPS_VINAC002 FOR VDPS2.XPS_VINAC002;
CREATE ALIAS VDPS.XPS_VINSH001 FOR VDPS2.XPS_VINSH001;
CREATE ALIAS VDPS.XPS_VINST010 FOR VDPS2.XPS_VINST010;
CREATE ALIAS VDPS.XPS_VISRG002 FOR VDPS2.XPS_VISRG002;
CREATE ALIAS VDPS.XPS_VPOBE000 FOR VDPS2.XPS_VPOBE000;
CREATE ALIAS VDPS.XPS_VPOCG001 FOR VDPS2.XPS_VPOCG001;
CREATE ALIAS VDPS.XPS_VPOGR000 FOR VDPS2.XPS_VPOGR000;
CREATE ALIAS VDPS.XPS_VROPP000 FOR VDPS2.XPS_VROPP000;
CREATE ALIAS VDPS.XPS_VTRAD000 FOR VDPS2.XPS_VTRAD000;
}¢--- A540769.WK.SQL(SATYA) cre=2006-10-20 mod=2006-10-20-16.24.14 F540769 -----
 DECLARE C279 CURSOR FOR SELECT * FROM VDPS.XPS_VCFAM000_V02 WHERE
 IDSYMBOL = :H AND AMTDEFIDSYMBOL = :H AND ACTUALPAYDATE = :H WITH UR
 OPTIMIZE FOR 10 ROWS FOR FETCH ONLY
}¢--- A540769.WK.SQL(SCAN) cre=2008-06-12 mod=2008-06-12-12.02.14 F540769 ------
select  5-      -- com

    -- com
       1e2
    -- com
   --    e
    -- com
     --  +
    -- com
       --1
    -- com
    from -- sdf

         -- sdf

                                                                   "SYSI
BM"
         -- sdf

         .-- com

         -- com
               sysDummy1
}¢--- A540769.WK.SQL(SCHLEG) cre=2006-08-11 mod=2006-08-11-13.03.22 F540769 ----
   drop          TABLESPACE  DGDB0366.A162A ;
   drop          TABLESPACE  DGDB0366.A163A ;
   drop          TABLESPACE  DGDB0366.A164A ;
   drop          TABLESPACE  DGDB0366.A165A ;
   drop          TABLESPACE  DGDB0366.A166A ;
   drop          TABLESPACE  DGDB0366.A167A ;
   drop          TABLESPACE  DGDB0366.A180A ;
   drop          TABLESPACE  DGDB0366.A181A ;
}¢--- A540769.WK.SQL(SEL) cre=2006-02-23 mod=2006-09-15-16.56.55 F540769 -------
-- alter table dgdb9998.TWK001A                                         00010018
--    add constraint c1 check (wk001t1 in ('a', 'b', 'c'));             00020018
-- commit;                                                              00030026
select a.*                                                              00040024
           -- , 'x' || WK001T1 || 'y',   hex(wk001t1)                   00050024
         , timestamp('1956-04-01 6:00:00')                              00060029
         , real(3.141e12)                                               00070031
         from A540769.TWK001A a;                                        00080034
--       from DGDB9998.TWK001A a;                                       00090033
}¢--- A540769.WK.SQL(SELPART) cre= mod= ----------------------------------------
 SELECT COUNT(*) FROM DGDB0211.TID155A1;
 SELECT TID155TST, TID155UUI,TID155CHA FROM  DGDB0211.TID155A1;
}¢--- A540769.WK.SQL(SEL150) cre= mod= -----------------------------------------
 SELECT COUNT(*) FROM DGDB0211.TID150A1;
 SELECT TID150TST, TID150UUI,TID150CHA FROM  DGDB0211.TID150A1;
}¢--- A540769.WK.SQL(SEL2) cre=2006-03-08 mod=2006-03-08-17.59.59 F540769 ------
-- alter table dgdb9998.TWK001A                                         00010000
--    add constraint c1 check (wk001t1 in ('a', 'b', 'c'));             00020000
-- commit;                                                              00030000
select *        from oa1A.TSV132A1                                      00040001
           -- , 'x' || WK001T1 || 'y',   hex(wk001t1)                   00050000
--       , timestamp('1956-04-01 6:00:00')                              00060000
--       , real(3.141e12)                                               00070000
--       from A540769.TWK001A a;                                        00080002
--       from DGDB9998.TWK001A a;                                       00090000
}¢--- A540769.WK.SQL(SERVER) cre=2008-09-08 mod=2008-09-08-11.18.45 F540769 ----
call sqlConnect dbaf
call sqlExec 'set :cuse = current server'
$£ 'current server' cuse'.'
call sqlDisconnect
$***out            20080908 10:52:29
current server CHSKA000DBAF    .
$***out            20080908 10:52:04
$***out            20080908 10:51:56
$***out
}¢--- A540769.WK.SQL(SET) cre=2008-10-24 mod=2008-10-24-13.57.53 F540769 -------
call sqlConnect dbaf
abc = 'a und b und c'
$;
$<<eof
    user
    left(user, 4) || 'undSoWeiter'
    session_user
    getvariable('SYSIBM.VERSION')
eof $@{
    $@for v $@{
        v = strip($v)
        $£ v
        call sqlPreAllCl 1, 'select' v 'from sysibm.sysdummy1', st,':r'
        $£ 'fetch' m.st.0 r
        res = sqlExec( 'set   :q  =  ' v ' ', '*')
        $£ 'set' res q
        if res <> 0 then
            call errSay sqlMsg()
        $}
    $}
$***out            20081024 13:57:08
user
fetch 1 S100447
set 0 S100447
left(user, 4) || 'undSoWeiter'
fetch 1 S100undSoWeiter
set -104 S100447
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 S100447
$***out            20081024 13:56:15
user
fetch 1 S100447
set -104 S100447
left(user, 4) || 'undSoWeiter'
fetch 1 S100undSoWeiter
set -104 S100undSoWeiter
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 13:55:51
user
fetch 1 S100447
set -104 S100447
left(user, 4) || 'undSoWeiter'
fetch 1 S100undSoWeiter
set -104 S100undSoWeiter
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 13:55:01
user
fetch 1 S100447
set 0 S100447
left(user, 4) || 'undSoWeiter'
fetch 1 S100undSoWeiter
set -104 S100undSoWeiter
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 13:53:51
user
fetch 1 S100447
set 0 S100447
left(user, 4) || 'undSoWeiter'
fetch 1 S100undSoWeiter
set -104 S100undSoWeiter
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 09:13:57
user
fetch 1 S100447
set 0 S100447
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 09:13:41
user
fetch 1 S100447
set -104 S100447
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 09:12:48
user
fetch 1 S100447
set -104 S100447
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 09:12:13
left(?, 5)
$***out            20081024 09:11:16
left(:abc, 5)
$***out            20081024 09:10:59
$***out            20081024 09:10:38
$***out            20081024 08:48:25
user
fetch 1 S100447
set -104 S100447
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 08:48:04
user
fetch 1 S100447
set -104 S100447
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 08:47:36
user
fetch 1 S100447
set -104 S100447
session_user
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 08:46:33
user
fetch 1 S100447
set 0 S100447
(session_user)
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 08:45:56
user
fetch 1 S100447
set 0 S100447
(session_user)
fetch 1 S100447
set -104 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
set -104 DSN09015
$***out            20081024 08:45:21
$***out            20081024 08:43:54
user
fetch 1 S100447
session_user
fetch 1 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
$***out            20081024 08:43:35
user
fetch 1 S100447
getvariable('SYSIBM.VERSION')
fetch 1 DSN09015
$***out            20081024 08:43:11
user
$***out            20081024 08:42:48
$***out            20081024 08:42:15
$***out            20081024 08:40:14
user
getvariable('SYSIBM.VERSION')
$***out            20081024 08:39:25
eins
zwei
$***out            20081024 08:39:08
eins
zwei
$***out            20081024 08:39:01
$***out
}¢--- A540769.WK.SQL(SETVAR) cre=2011-05-23 mod=2011-05-23-14.44.33 A540769 ----
$#=
set  current path = "SYSIBM","SYSFUN","SYSPROC","A540769";
set  :flaasdf=current path
$#out                                              20110523 14:43:53
sqlCode 0: set  current path = "SYSIBM","SYSFUN","SYSPROC","A540769"
sqlCode 0 FLAASDF="SYSIBM","SYSFUN","SYSPROC","A540769"
$#out                                              20110523 14:42:47
sqlCode 0 varUnbekannt=VARUNBEKANNT: set  : asdfa  = current path
$#out                                              20110523 14:42:40
sqlCode 0 ASDFA="SYSIBM","SYSFUN","SYSPROC","A540769"
$#out                                              20110523 14:42:26
*** run error sqlCode -104 ILLEGAL SYMBOL ?1#=
warnings
state ,INSE
stmt =  execSql 1#=
with asdfa = ASDFA
$#out                                              20110523 14:42:05
*** run error sqlCode -104 ILLEGAL SYMBOL ?1#=
warnings  2=p ?, 3=a ?, 4=t ?, 5=h ?, 6=Ÿ ?, 7=F ?, 8=E ?, 9=T ?, 10=C ?
state H,INS
stmt =  execSql 1#=
$#out                                              20110523 14:40:41
sqlCode 0 FLALA="SYSIBM","SYSFUN","SYSPROC","A540769"
$#out                                              20110523 14:38:02
sqlCode 0 flala="SYSIBM","SYSFUN","SYSPROC","A540769"
$#out                                              20110523 14:37:31
sqlCode 0 flala=FLALA: set  : flala  = current path
$#out                                              20110523 14:36:54
*** run error sqlCode -104 ILLEGAL SYMBOL ?SCHEMA?. SOME SYMBOLS THAT MIGHT BE L
warnings
state 42601
stmt =  execSql set  : flala  = current schema
$#out                                              20110523 14:36:24
sqlCode 0 v=2011-05-23-14.36.24.853392: set  :v  = current timestamp
$#out                                              20110523 14:30:31
sqlCode 0: set  :v  = current timestamp
$#out                                              20110523 14:30:16
*** run error sqlCode -312 VARIABLE V IS NOT DEFINED OR NOT USABLE
warnings
state 42618
stmt =  execSql values     'abc' into :v
with v = V
$#out                                              20110523 13:40:59
}¢--- A540769.WK.SQL(SMHBEIL) cre= mod= ----------------------------------------
select b.TID118CNT,  b.TID118KRI
  from DGDB0211.TID118A1 b
    join DGDB0211.TID119A1 m
    on    b.TID118BUI = m.TID119BUI
      and b.TID118HUI = m.TID119HUI
  where   b.TID118FRM = 'PDF'
      and m.TID119DPR <= current date
      and m.TID119BID = 'Beilage?'
      and m.TID119BLN = '?'
  order by b.TID118CNT;
}¢--- A540769.WK.SQL(SOERAL) cre=2006-06-09 mod=2006-06-09-16.49.55 F540769 ----
SET CURRENT SQLID = 'S100447';
CREATE ALIAS GDBA237.VNI200A101B FOR GDB0237.VNI200A101B ;
CREATE ALIAS GDBB237.VNI200A101B FOR GDB0237.VNI200A101B ;
}¢--- A540769.WK.SQL(SOERENS) cre=2008-05-27 mod=2008-05-27-11.32.08 F540769 ---
    SELECT
            NI750POS_TYP
          , NI750ASSET_CLASS
          , NI750ABS_VAL_VC
     FROM OA1A.TNI750A1 --
     WHERE NI750REP_COMP_ID=3100
       AND NI750PART_ID=8
       AND NI750REP_ORDER_ID = 'TEST0000000000000001'
  --   AND NI750REP_ORDER_ID >= 'TEST0000000000000001'
     ORDER BY--NI750POS_TYP
               CAST(NI750POS_TYP AS DECIMAL (31, 8))
             , ABS(NI750ABS_VAL_VC) DESC
             ,NI750ASSET_CLASS
     FOR FETCH ONLY



}¢--- A540769.WK.SQL(SOUNDEX) cre=2011-01-11 mod=2011-01-11-16.05.06 A540769 ---
SELECT SOUNDEX('KELLER'), SOUNDEX('KELLLER'), SOUNDEX('KEHLR')          00010000
    FROM SYSIBM.SYSDUMMY1                                               00020000
}¢--- A540769.WK.SQL(SPACE) cre=2009-08-10 mod=2009-08-10-16.25.28 A540769 -----
         select 'taRun',    sum(spacef * 1024) sp, count(*) cnt,
                  min(statstime) minTi, max(statstime) maxTi
             from sysibm.systablepart
 union   select 'ixRun'     , sum(ip.spacef * 1024) sp,
                  count(*) cnt,
                  min(ip.statstime) minTi, max(ip.statstime) maxTi
             from sysibm.sysIndexPart ip
 union   select 'taReal', sum(float(space) * 1024) sp, count(*) cnt,
                min(updatestatstime) minTi, max(updatestatstime) maxTi
            from sysIbm.tableSpaceStats
 union   select 'ixReal' , sum(float(q.space)* 1024) sp, count(*) cnt,
                min(updatestatstime) minTi, max(updatestatstime) maxTi
            from sysIbm.indexSpaceStats q
 with ur
}¢--- A540769.WK.SQL(SPACEIX) cre=2007-05-14 mod=2007-05-14-18.23.02 F540769 ---
select t.dbName, t.tsName, char(min(t.name), 12),
    sum(t.spacef)*1024 "tsSp", sum(t.cardf) "tsC",
    count(*) "indexes", sum(i.spacef)*1024, sum(i.nLeaf) "leaf"
    from sysibm.systables t
    left join sysibm.sysindexes i
    on i.tbcreator = t.creator and i.tbName = t.name
    where t.type = 'T' and t.dbName = 'TSTNAKNE'
    group by t.dbName, t.tsName
}¢--- A540769.WK.SQL(SPAHIST) cre=2006-12-08 mod=2010-01-04-14.17.09 A540769 ---
select sum(hi_u_rba), datum
    from OA1Z.TADM09A1
    where datum >= '25.12.2009'
    and db_name like 'NI02%'
    and ts_name like 'A250%'
    group by datum
    order by datum
    with ur
;
x
                                  and partitions_nr = 60
)
select hi_u_rba "bytes used",
       int(100 * hi_u_rba / 4 / 1024 / 1024 / 1024) "% used",
       datum "ab"
with a as
( select hi_u_rba, datum
    from OA1P.TADM09A1
    where db_name = 'NZ06A1P' and ts_name = 'A244A'
                                  and partitions_nr = 60
)
select hi_u_rba "bytes used",
       int(100 * hi_u_rba / 4 / 1024 / 1024 / 1024) "% used",
       datum "ab"
    from a a1
    where not exists (select * from a a2 where a2.datum < a1.datum)
          or a1.hi_u_rba <> (select max(hi_u_rba) from a a3
                            where a3.datum =
                                 (select max(datum) from a a4
                                      where a4.datum < a1.datum))
    order by datum asc
;
xelect hi_u_rba "bytes used",
       int(100 * hi_u_rba / 4 / 1024 / 1024 / 1024) "% used",
       min(datum) "von", max(datum) "bis"
    from OA1P.TADM09A1
    where db_name = 'NZ06A1P' and ts_name = 'A244A'
                                  and partitions_nr = 60
    group by hi_u_rba
    order by min(datum) asc
;
xelect *
    from OA1P.TADM09A1
    where db_name = 'NZ06A1P' and ts_name = 'A244A'
                                  and partitions_nr = 60
    order by datum desc
;   x
select count(*), count(distinct datum), min(datum), max(datum)
    from OA1P.TADM09A1
    where db_name = 'NZ06A1P' and ts_name = 'A244A'
                                  and partitions_nr = 60
;
}¢--- A540769.WK.SQL(SPC) cre=2007-03-02 mod=2007-03-02-18.28.42 F540769 -------
select coalesce (ts.db, rs.db, ix.db),
        ts.sp "cat.ts.space", rs.sp "rts.ts.space",
        ix.sp "cat.ix.space", ri.sp "rts.ix.space",
        ts.cnt "cat.ts.cnt", ts.minTi, ts.maxTi,
        rs.cnt "rts.ts.cnt", rs.minTi, rs.maxTi,
        ix.cnt "cat.ix.cnt", ix.minTi, ix.maxTi,
        ri.cnt "rts.ix.cnt", ri.minTi, ri.maxTi
    from
        (select dbname db, sum(spacef * 1024) sp, count(*) cnt,
                  min(statstime) minTi, max(statstime) maxTi
             from sysibm.systablepart
             group by dbname
        ) ts
        left join
        (select dbname db, sum(float(space) * 1024) sp, count(*) cnt,
                min(updatestatstime) minTi, max(updatestatstime) maxTi
            from sysIbm.tableSpaceStats
            group by dbName
        ) rs
          on rs.db = ts.db
        left join
        (select ix.dbname db, sum(ip.spacef * 1024) sp,
                  count(*) cnt,
                  min(ip.statstime) minTi, max(ip.statstime) maxTi
             from sysibm.sysIndexes ix, sysibm.sysIndexPart ip
             where ix.name = ip.ixName and ix.creator = ip.ixCreator
             group by dbname
        ) ix
          on ix.db = ts.db
        left join
        (select dbname db, sum(float(q.space)* 1024) sp, count(*) cnt,
                min(updatestatstime) minTi, max(updatestatstime) maxTi
            from sysIbm.indexSpaceStats q
            group by dbName
        ) ri
          on ri.db = ts.db
    where ts.db in (
                   'XBA5B001',
                   'XBA5C001',
                   'XBA5C002',
                   'XBA5D001',
                   'XBA5D002',
                   'XBA5D003',
                   'XBA5E001',
                   'XBA5E002',
                   'XBA5F001',
                   'XBA5F002',
                   'XBA5F003',
                   'XBA5F004',
                   'XBA5G001',
                   'XBA5G002',
                   'XBA5G003',
                   'XBA5G004',
                   'XBA5G005',
                   'XBA5G006',
                   'XBA5G007',
                   'XBA5G008',
                   'XBA5G009',
                   'XBA5G010',
                   'XBA5G011',
                   'XBA5G012',
                   'XBA5G013',
                   'XBA5G014',
                   'XBA5G015',
                   'XBA5G016',
                   'XBA5G017',
                   'XBA5G018',
                   'XBA5G019',
                   'XBA5G020',
                   'XBA5G021',
                   'XBA5G022',
                   'XBA5G023',
                   'XBA5G024',
                   'XBA5G025',
                   'XBA5G026',
                   'XBA5G027',
                   'XBA5G028',
                   'XBA5G029',
                   'XBA5H001',
                   'XBA5H002',
                   'XBA5H003',
                   'XBA5H004',
                   'XBA5H005',
                   'XBA5H006',
                   'XBA5H007',
                   'XBA5H008',
                   'XBA5H009',
                   'XBA5H010',
                   'XBA5H011',
                   'XBA5H012',
                   'XBA5H013',
                   'XBA5H014',
                   'XBA5H015',
                   'XBA5H016',
                   'XBA5H017',
                   'XBA5H018',
                   'XBA5H019',
                   'XBA5H020',
                   'XBA5H021',
                   'XBA5H022',
                   'XBA5H023',
                   'XBA5H024',
                   'XBA5H025',
                   'XBA5H026',
                   'XBA5H027',
                   'XBA5I001',
                   'XBA53001',
                   'XBA53002',
                   'XBA53003',
                   'XBA53004',
                   'XBA53005',
                   'XBA53006',
                   'XBA53007',
                   'XBA53008',
                   'XBA53009',
                   'XBA53010',
                   'XBA53011',
                   'XBA53012',
                   'XBA53013',
                   'XBA53014',
                   'XBA53015',
                   'XBA53016',
                   'XBA53017',
                   'XBA53018',
                   'XBA53019',
                   'XBA53020',
                   'XBA53021',
                   'XBA53022',
                   'XBA53023',
                   'XBA53024',
                   'XBA53025',
                   'XBA53026',
                   'XBA53027',
                   'XBA53028',
                   'XBA53029',
                   'XBA53030',
                   'XBA53031',
                   'XBA53032',
                   'XBA53033',
                   'XBA53034',
                   'XBA53035',
                   'XBA53036',
                   'XBA53037',
                   'XBA53038',
                   'XBA53039',
                   'XBA53040',
                   'XBA53041',
                   'XBA53042',
                   'XBA53043',
                   'XBA53044',
                   'XBA53045',
                   'XBA53046',
                   'XBA53047',
                   'XBA53048',
                   'XBA53049',
                   'XBA53050',
                   'XBA53051',
                   'XBA53052',
                   'XBA53053',
                   'XBA53054',
                   'XBA53055',
                   'XBA53056',
                   'XBA53057',
                   'XBA53058',
                   'XBA53059',
                   'XBA53060',
                   'XBA53061',
                   'XBA53062',
                   'XBA53063',
                   'XBA53064',
                   'XBA53065',
                   'XBA53066',
                   'XBA53067',
                   'XBA53068',
                   'XBA53069',
                   'XBA53070',
                   'XBA53071',
                   'XBA53072',
                   'XBA53073',
                   'XBA53074',
                   'XBA53075',
                   'XBA53076',
                   'XBA53077',
                   'XBA53078',
                   'XBA53079',
                   'XBA53080',
                   'XBA53081',
                   'XBA53082',
                   'XBA53083',
                   'XBA53084',
                   'XBA53085',
                   'XBA53086',
                   'XBA53087',
                   'XBA53088',
                   'XBA53089',
                   'XBA53090',
                   'XBA53091',
                   'XBA53092',
                   'XBA53093',
                   'XBA53094',
                   'XBA53095',
                   'XBA53096',
                   'XBA53097',
                   'XBA53098',
                   'XBA53099',
                   'XBA53100',
                   'XBA53101',
                   'XBA53102',
                   'XBA53103',
                   'XBA53104',
                   'XBA53105',
                   'XBA53106',
                   'XBA53107',
                   'XBA53108',
                   'XBA53109',
                   'XBA53110',
                   'XBA53111',
                   'XBA53112',
                   'XBA53113',
                   'XBA53114',
                   'XBA53115',
                   'XBA53116',
                   'XBA53117',
                   'XBA53118',
                   'XBA53119',
                   'XBA53120',
                   'XBA53121',
                   'XBA53122',
                   'XBA53123',
                   'XBA53124',
                   'XBA53125',
                   'XBA53126',
                   'XBA53127',
                   'XBA53128',
                   'XBA53129',
                   'XBA53130',
                   'XBA53131',
                   'XBA53132',
                   'XBA53133',
                   'XBA53134',
                   'XBA53135',
                   'XBA53136',
                   'XBA53137',
                   'XBA53138',
                   'XBA53139',
                   'XBA53140',
                   'XBA53141',
                   'XBA53142',
                   'XBA53143',
                   'XBA53144',
                   'XBA53145',
                   'XBA53146',
                   'XBA53147',
                   'XBA53148',
                   'XBA53149',
                   'XBA53150',
                   'XBA53151',
                   'XBA53152',
                   'XBA53153',
                   'XBA53154',
                   'XBA53155',
                   'XBA53156',
                   'XBA53157',
                   'XBA53158',
                   'XBA53159',
                   'XBA53160',
                   'XBA53161',
                   'XBA53162',
                   'XBA53163',
                   'XBA53164',
                   'XBA53165',
                   'XBA53166',
                   'XBA53167',
                   'XBA53168',
                   'XBA53169',
                   'XBA53170',
                   'XBA53171',
                   'XBA53172',
                   'XBA53173',
                   'XBA53174',
                   'XBA53175',
                   'XBA53176',
                   'XBA53177',
                   'XBA53178',
                   'XBA53179',
                   'XBA53180',
                   'XBA53181',
                   'XBA53182',
                   'XBA53183',
                   'XBA53184',
                   'XBA53185',
                   'XBA53186',
                   'XBA53187',
                   'XBA53188',
                   'XBA53189',
                   'XBA53190',
                   'XBA54001',
                   'XBA54002',
                   'XBA54003',
                   'XBA54004',
                   'XBA54005',
                   'XBA54006',
                   'XBA54007',
                   'XBA54008',
                   'XBA54009',
                   'XBA54010',
                   'XBA54011',
                   'XBA54012',
                   'XBA54013',
                   'XBA54014',
                   'XBA54015',
                   'XBA54016',
                   'XBA54017',
                   'XBA54018',
                   'XBA54019',
                   'XBA54020',
                   'XBA54021',
                   'XBA54022',
                   'XBA54023',
                   'XBA54024',
                   'XBA54025',
                   'XBA54026',
                   'XBA54027',
                   'XBA54028',
                   'XBA54029',
                   'XBA54030',
                   'XBA54031',
                   'XBA54032',
                   'XBA54033',
                   'XBA54034',
                   'XBA54035',
                   'XBA54036',
                   'XBA54037',
                   'XBA54038',
                   'XBA54039',
                   'XBA54040',
                   'XBA54041',
                   'XBA54042',
                   'XBA54043',
                   'XBA54044',
                   'XBA54045',
                   'XBA54046',
                   'XBA54047',
                   'XBA54048',
                   'XBA54049',
                   'XBA54050',
                   'XBA54051',
                   'XBA54052',
                   'XBA54053',
                   'XBA54054',
                   'XBA54055',
                   'XBA54056',
                   'XBA54057',
                   'XBA54058',
                   'XBA54059',
                   'XBA54060',
                   'XBA54061',
                   'XBA54062',
                   'XBA54063',
                   'XBA54064',
                   'XBA54065',
                   'XBA54066',
                   'XBA54067',
                   'XBA54068',
                   'XBA54069',
                   'XBA54070',
                   'XBA54071',
                   'XBA54072',
                   'XBA54073',
                   'XBA54074',
                   'XBA54075',
                   'XBA54076',
                   'XBA54077',
                   'XBA54078',
                   'XBA54079',
                   'XBA54080',
                   'XBA54081',
                   'XBA54082',
                   'XBA54083',
                   'XBA54084',
                   'XBA54085',
                   'XBA54086',
                   'XBA54087',
                   'XBA54088',
                   'XBA54089',
                   'XBA54090',
                   'XBA54091',
                   'XBA54092',
                   'XBA54093',
                   'XBA54094',
                   'XBA54095',
                   'XBA54096',
                   'XBA54097',
                   'XBA54098',
                   'XBA54099',
                   'XBA54100',
                   'XBA54101',
                   'XBA54102',
                   'XBA54103',
                   'XBA54104',
                   'XBA54105',
                   'XBA54106',
                   'XBA54107',
                   'XBA54108',
                   'XBA54109',
                   'XBA54110',
                   'XBA54111',
                   'XBA54112',
                   'XBA54113',
                   'XBA54114',
                   'XBA54115',
                   'XBA54116',
                   'XBA54117',
                   'XBA54118',
                   'XBA54119',
                   'XBA54120',
                   'XBA54121',
                   'XBA54122',
                   'XBA54123',
                   'XBA54124',
                   'XBA54125',
                   'XBA54126',
                   'XBA54127',
                   'XBA54128',
                   'XBA54129',
                   'XBA54130',
                   'XBA54131',
                   'XBA54132',
                   'XBA54133',
                   'XBA54134',
                   'XBA54135',
                   'XBA54136',
                   'XBA55001',
                   'XBA55002',
                   'XBA55003',
                   'XBA55004',
                   'XBA55005',
                   'XBA55006',
                   'XBA55007',
                   'XBA55008',
                   'XBA55009',
                   'XBA55010',
                   'XBA55011',
                   'XBA55012',
                   'XBA55013',
                   'XBA55014',
                   'XBA55015',
                   'XBA55016',
                   'XBA55017',
                   'XBA55018',
                   'XBA55019',
                   'XBA55020',
                   'XBA55021',
                   'XBA55022',
                   'XBA55023',
                   'XBA55024',
                   'XBA55025',
                   'XBA55026',
                   'XBA55027',
                   'XBA55028',
                   'XBA55029',
                   'XBA55030',
                   'XBA55031',
                   'XBA55032',
                   'XBA55033',
                   'XBA55034',
                   'XBA55035',
                   'XBA55036',
                   'XBA55037',
                   'XBA55038',
                   'XBA55039',
                   'XBA55040',
                   'XBA55041',
                   'XBA55042',
                   'XBA55043',
                   'XBA56001',
                   'XBA56002',
                   'XBA56003',
                   'XBA56004',
                   'XBA56005',
                   'XBA56006',
                   'XBA56007',
                   'XBA56008',
                   'XBA56009',
                   'XBA56010',
                   'XBA56011',
                   'XBA56012',
                   'XBA56013',
                   'XBA56014',
                   'XBA56015',
                   'XBA56016',
                   'XBA56017',
                   'XBA56018',
                   'XBA56019',
                   'XBA56020',
                   'XBA56021',
                   'XBA56022',
                   'XBA56023',
                   'XBA56024',
                   'XBA56025',
                   'XBA56026',
                   'XBA56027',
                   'XBA57001',
                   'XBA59001',
                   'XBA60001',
                   'XBA60002',
                   'XBA60003',
                   'XBA60004',
                   'XBA60005',
                   'XBA60006',
                   'XBA60007',
                   'XBA60008',
                   'XBA60009',
                   'XBA60010',
                   'XBA60011',
                   'XBA60012',
                   'XBA60013',
                   'XBA60014',
                   'XBA60015',
                   'XBA60016',
                   'XBA60017',
                   'XBA60018',
                   'XBA60019',
                   'XBA60020',
                   'XBA60021',
                   'XBA60022',
                   'XBA60023',
                   'XBA60024',
                   'XBA60025',
                   'XBA60026',
                   'XBA60027',
                   'XBA60028',
                   'XBA60029',
                   'XBA60030',
                   'XBA60031',
                   'XBA61001',
                   'XBA64001',
                   'XBA67001',
                   'XBA67002',
                   'XBA67003',
                   'XBA67004',
                   'XBA67005',
                   'XBA67006',
                   'XBA67007',
                   'XBA67008',
                   'XBA67009',
                   'XBA67010',
                   'XBA67011',
                   'XBA67012',
                   'XBA67013',
                   'XBA67014',
                   'XBA67015',
                   'XBA67016',
                   'XBA67017',
                   'XBA67018',
                   'XBA67019',
                   'XBA67020',
                   'XBA67021',
                   'XBA67022',
                   'XBA67023',
                   'XBA67024',
                   'XBA67025',
                   'XBA67026',
                   'XBA67027',
                   'XBA67028',
                   'XBA67029',
                   'XBA67030',
                   'XBA67031',
                   'XBA67032',
                   'XBA67033',
                   'XBA67034',
                   'XBA67035',
                   'XBA67036',
                   'XBA67037',
                   'XBA67038',
                   'XBA67039',
                   'XBA67040',
                   'XBA67041',
                   'XBA67042',
                   'XBA67043',
                   'XBA67044',
                   'XBA67045',
                   'XBA67046',
                   'XBA67047',
                   'XBA67048',
                   'XBA67049',
                   'XBA67050',
                   'XBA67051',
                   'XBA67052',
                   'XBA67053',
                   'XBA67054',
                   'XBA67055',
                   'XBA67056',
                   'XBA67057',
                   'XBA67058',
                   'XBA67059',
                   'XBA67060',
                   'XBA67061',
                   'XBA67062',
                   'XBA67063',
                   'XBA67064',
                   'XBA67065',
                   'XBA67066',
                   'XBA67067',
                   'XBA68001',
                   'XBA68002',
                   'XBA68003',
                   'XBA68004',
                   'XBA68005',
                   'XBA68006',
                   'XBA68007',
                   'XBA68008',
                   'XBA68009',
                   'XBA68010',
                   'XBA68011',
                   'XBA68012',
                   'XBA68013',
                   'XBA68014',
                   'XBA68015',
                   'XBA68016',
                   'XBA68017',
                   'XBA68018',
                   'XBA68019',
                   'XBA68020',
                   'XBA68021',
                   'XBA68022',
                   'XBA68023',
                   'XBA68024',
                   'XBA68025'
                   )
    order by ts.db
;
xxx
    select dbname, count(*), sum(float(space) * 1024),
                  min(updatestatstime), max(updatestatstime)
        from sysIbm.tableSpaceStats
    where dbName in ('XBA67057',
                     'XBA67058')
    group by dbName
    order by dbName
;
    SELECT DB_NAME dbName, count(*), sum(float(HI_U_RBA)) tsAdm09
         from oa1p.TADM09A1
         where datum = current date   - 1 day
               and db_name in ('XBA67057',
                               'XBA67058')
         group by  DB_NAME
         order by  DBNAME
  ;
select dbname, count(*), sum(spacef), min(statstime), max(statstime)
    from sysibm.systablepart
    where dbName in ('XBA67057',
                     'XBA67058')
    group by dbName
    order by dbName
}¢--- A540769.WK.SQL(SPCDIFF) cre=2010-01-05 mod=2010-01-11-12.01.14 A540769 ---
-- Diff: Differenz des benutzten DB2-TS Spaces zwischen zwei Daten
--         neues Datum im where von n eingeben
--         altes Datum im where von o eingeben
--         weitere Selektion (db, ts) im where von n UND o eingeben
--
--         für Gruppierung auf TS Ebene alle
--              auskommentierten TS-Ausdrücke aktivieren
--
--         Sortierung: absteigen nach diff oder ration
--
--
--         Output:
--             ratio = Verhältnis Grösse neu zu alte in %  (100=gleich)
--             diff  = Differenz  Grösse neu - alt  in Bytes
--             nDSNs = Anzahl Datasets neu
--             nSpc  = benutzer Space neu in Bytes
--             oDSNs = Anzahl Datasets alt
--             oSpc  = benutzer Space alt in Bytes
--
-- benutzt:  table oa1?.tadm09A1: tabelle mit historischen Space Daten
--           udf oa1?.fosFmtE8/E7: Formatierung siehe fosFmtE8
--
--  6. 1.09 W. Keller neu
--
with n as   -- n = new
(
select db_name nDb,
        -- ts_name nTs,
        count(*) nCn, sum(hi_u_rba) nSp
    from oa1a.tadm09A1
    where
       -- datum = current date
       datum = '05.01.2010'
       -- and db_name like 'M%'
       -- and ts_name like 'A%'
    group by db_name
       --  , ts_name
)
, o as      -- o = old
(
select db_name oDb,
        -- ts_name oTs,
        count(*) oCn, sum(hi_u_rba) oSp
    from oa1a.tadm09A1
    where
       -- datum = current date - 7 days
       datum = '01.01.2010'
       -- and db_name like 'M%'
       -- and ts_name like 'A%'
    group by db_name
       --  , ts_name
)
, diff as
(
select coalesce(oDb, nDb) db,
    -- coalesce(oTs, nTs) ts,
       smallint(case when oSp is null or oSp < 1 then 9999
            else min(9999, coalesce(nSp, 0) * 100 / oSp) end) ratio,
       coalesce(nSp, 0) - coalesce(oSp, 0) diff,
       oCn, oSp, nCn, nSp
    from o
    full join n
        on oDb = nDb
        -- and oTs = nTs
)
select db,
       -- ts,
       ratio "ratio %",
       oa1a.fosFmtE8(diff) "  diff B",
       nCn              "nDSNs",
       oa1a.fosFmtE7(nSp)  " nSpc B",
       oCn              "oDSNs",
       oa1a.fosFmtE7(oSp)  " oSpc B"
    from diff
    order by diff desc
    with ur
;
}¢--- A540769.WK.SQL(SPCPRT) cre=2007-04-27 mod=2007-04-27-14.38.02 F540769 ----
-- report space realtimestatistics (RTS)
--      group by tablespace and show
--      sum and maximum over partitions
select char(strip(coalesce(s.db, i.db))
                   ||'.'|| coalesce (s.ts, i.ts), 24) "db.ts",
        s.parts, i.parts,
        s.ss "TSsumSpace", s.sm "TSmaxSpace",
        i.ss "IXsumSpace", i.sm "IXmaxSpace",
        s.cnt "TS.cnt", s.minTi, s.maxTi,
        i.cnt "IX.cnt", i.minTi, i.maxTi
    from
        (select dbname db, name ts, max(partition) parts, count(*) cnt,
              sum(float(space) * 1024) ss, max(float(space) * 1024)sm,
              min(updatestatstime) minTi, max(updatestatstime) maxTi
            from sysIbm.tableSpaceStats
            group by dbName, name
        ) s
        left join
        (select t.dbname db, t.tsName ts,
                 max(q.partition) parts, count(*) cnt,
                 sum(float(q.space)* 1024) ss,
                 max(float(q.space)* 1024) sm,
                 min(q.updatestatstime) minTi,
                 max(q.updateStatstime) maxTi
             from sysibm.sysTables t
                 join sysibm.sysIndexes i
                 on i.tbCreator = t.creator and i.tbName = t.name
                 join sysIbm.indexSpaceStats q
                 on q.dbName = t.dbname
                          and q.indexspace = i.indexspace
             group by t.dbname, t.tsName
        ) i
        on i.db = s.db and i.ts = s.ts
     where  s.db like 'DF5407%'
     ;
     where  s.db like 'DBJ%' or s.db like 'DED%'or s.db like 'DGM%'
         or s.db like 'DRE%' or s.db like 'DNF%'or s.db like 'DSA%'
         or s.db like 'DWB%'
    order by s.db, s.ts
}¢--- A540769.WK.SQL(SPCTPA) cre=2010-07-19 mod=2010-07-19-15.45.11 A540769 ----
set current path = 'OA1T';
with r as
( select s.dbName db, s.name ts, p.partition part, 1 cPa,
      coalesce(real(r.space),
           case when p.spacef < 0 then 0 else p.spacef end) * 1024 spc,
      real(r.space) * 1024 rtsSpc,
      case when r.space is null then 0 else 1 end rtsSpcCnt,
      case when p.spacef >= 0 then p.spacef else 0 end *1024 paSpc,
      case when p.spacef >= 0 then 1 else 0 end paSpcCnt
     --  sum(real(max(space, 0))*1024) spRts
    from sysIbm.sysTableSpace s
        left join sysIbm.sysTablePart p
        on p.dbName = s.dbName and p.tsName = s.name
        left join sysIbm.sysTableSpaceStats r
        on r.dbName = s.dbName and r.name = s.name
                               and r.partition = p.partition
            and r.dbId = s.dbid and r.psid = s.psid
  --  where s.dbName like 'MF%'
  --    group by s.dbName, s.name
), t as
(  select count(*) cnt,
          sum(spc) spc, min(spc) spcMin, max(spc) spcMax,
          sum(cPa) cPa
       from r
       group by int(3 * log10(max(1, spc)))
)
select cnt,
    substr(fosFmte7(spc), 1, 7) spc,
    substr(fosFmte7(spcMin), 1, 7) spcMin,
    substr(fosFmte7(spcMax), 1, 7) spcMax,
    cPa
    from t order by t.spcMax
    with ur
;x;
with r as
( select s.dbName db, s.name ts, p.partition part, 1 cPa,
      coalesce(real(r.space),
           case when p.spacef < 0 then 0 else p.spacef end) * 1024 spc,
      real(r.space) * 1024 rtsSpc,
      case when r.space is null then 0 else 1 end rtsSpcCnt,
      case when p.spacef >= 0 then p.spacef else 0 end *1024 paSpc,
      case when p.spacef >= 0 then 1 else 0 end paSpcCnt
     --  sum(real(max(space, 0))*1024) spRts
    from sysIbm.sysTableSpace s
        left join sysIbm.sysTablePart p
        on p.dbName = s.dbName and p.tsName = s.name
        left join sysIbm.sysTableSpaceStats r
        on r.dbName = s.dbName and r.name = s.name
                               and r.partition = p.partition
            and r.dbId = s.dbid and r.psid = s.psid
  --  where s.dbName like 'DA54076%'
  --    group by s.dbName, s.name
), t as
(
select * from r
union all select '*' db, '*' ts, 0 part, sum(cPa) cPa,
    sum(spc) spc, sum(rtsSpc) rtsSpc, sum(rtsSpcCnt) rtsSpcCnt,
    sum(paSpc) paSpc, sum(paSpcCnt) paSpcCnt
 from r
)
select substr(strip(db) || '.' || strip(ts), 1, 16),smallInt(part)part,
     substr(fosFmte7(spc), 1, 7) spc, cPa,
     substr(fosFmte7(rtsSpc), 1, 7) rtsSpc, rtsSpcCnt,
     substr(fosFmte7(paSpc), 1, 7) paSpc, paSpcCnt
     from t
order by t.spc desc
fetch first 100 rows only
with ur
;x;
    from sysIbm.tableSpaceStats
    group by dbName, name, dbId, psId
)
, ixRts as
( select creator cr, name ix, dbId, isobId,
        sum(real(max(space, 0))*1024) spRts
    from sysIbm.indexSpaceStats
    group by creator, name, dbId, isobId
)
, tsIx as
( select t.dbName db, t.tsName ts, count(*) indexs,
        sum(max(x.spacef, 0) * 1024) spRun, sum(spRts) spRts
    from sysIbm.sysTables t
        join sysIbm.sysIndexes x
        on x.tbCreator = t.creator and x.tbName = t.name
        left join ixRts r
        on x.creator = r.cr and x.name = r.ix
           and x.dbid = r.dbid and x.isobId = r.isobId
    group by t.dbName, t.tsName
)
, ts as
( select s.dbName db , s.name ts, max(partitions, 1) tParts,
        max(s.spacef, 0) * 1024 tSpRun,
        coalesce(r.SpRts, 0) tSpRts,
        i.indexs, i.spRun iSpRUn, i.spRts iSpRts
      from sysibm.sysTableSpace s
      left join tsRts r
      on s.dbName = r.db and s.name = r.ts
         and s.dbId = r.dbId and s.psId = r.psId
      left join tsIx  i
      on i.db = s.dbName and i.ts = s.name
)
select char(db, 8) "db", char(ts, 8) "ts",
        tParts "tParts",
        char(fosFmtE7(tSpRun), 7) "tSpRun",
        char(fosFmtE7(tSpRts), 7) "tSpRts",
        coalesce(indexs, 0) "indexs",
        char(fosFmtE7(coalesce(iSpRun, 0)), 7) "iSpRun",
        char(fosFmtE7(coalesce(iSpRts, 0)), 7) "iSpRts"
    from ts
    where db like 'DA540769%'
    order by tSpRts desc
    fetch first 100 rows only
    with ur
;
}¢--- A540769.WK.SQL(SPCTS) cre=2010-07-19 mod=2010-07-19-17.13.17 A540769 -----
set current path = 'OA1T';
with r as
( select s.dbName db, s.name ts, p.partition part, 1 cPa,
      coalesce(real(r.space),
           case when p.spacef < 0 then 0 else p.spacef end) * 1024 spc,
      real(r.space) * 1024 rtsSpc,
      case when r.space is null then 0 else 1 end rtsSpcCnt,
      case when p.spacef >= 0 then p.spacef else 0 end *1024 paSpc,
      case when p.spacef >= 0 then 1 else 0 end paSpcCnt
    from sysIbm.sysTableSpace s
        left join sysIbm.sysTablePart p
        on p.dbName = s.dbName and p.tsName = s.name
        left join sysIbm.sysTableSpaceStats r
        on r.dbName = s.dbName and r.name = s.name
                               and r.partition = p.partition
            and r.dbId = s.dbid and r.psid = s.psid
    -- where s.dbName like 'MF%'
), t as
(  select db, ts, sum(cPa) cPa,
        sum(spc) spc, sum(rtsSpc) rtsSpc, sum(rtsSpcCnt) rtsSpcCnt,
        sum(paSpc) paSpc, sum(paSpcCnt) paSpcCnt
    from r
    group by db, ts
), u as
(  select * from t
union all select '*' db, strip(char(count(*))) ts, sum(cPa) cPa,
    sum(spc) spc, sum(rtsSpc) rtsSpc, sum(rtsSpcCnt) rtsSpcCnt,
    sum(paSpc) paSpc, sum(paSpcCnt) paSpcCnt
     from t
)
select substr(strip(db) || '.' || strip(ts), 1, 16),
     substr(fosFmte7(spc), 1, 7) spc, cPa,
     substr(fosFmte7(rtsSpc), 1, 7) rtsSpc, rtsSpcCnt,
     substr(fosFmte7(paSpc), 1, 7) paSpc, paSpcCnt
     from u
order by u.spc desc
fetch first 100 rows only
with ur
;
with r as
( select s.dbName db, s.name ts, p.partition part, 1 cPa,
      coalesce(real(r.space),
           case when p.spacef < 0 then 0 else p.spacef end) * 1024 spc,
      real(r.space) * 1024 rtsSpc,
      case when r.space is null then 0 else 1 end rtsSpcCnt,
      case when p.spacef >= 0 then p.spacef else 0 end *1024 paSpc,
      case when p.spacef >= 0 then 1 else 0 end paSpcCnt
     --  sum(real(max(space, 0))*1024) spRts
    from sysIbm.sysTableSpace s
        left join sysIbm.sysTablePart p
        on p.dbName = s.dbName and p.tsName = s.name
        left join sysIbm.sysTableSpaceStats r
        on r.dbName = s.dbName and r.name = s.name
                               and r.partition = p.partition
            and r.dbId = s.dbid and r.psid = s.psid
    -- where s.dbName like 'MF%'
), t as
(  select db, ts, sum(cPa) cPa,
        sum(spc) spc, sum(rtsSpc) rtsSpc, sum(rtsSpcCnt) rtsSpcCnt,
        sum(paSpc) paSpc, sum(paSpcCnt) paSpcCnt
    from r
    group by db, ts
), u as
( select  sum(spc) spc, min(spc) spcMin, max(spc) spcMax,
          count(*) cTs, sum(cPa) cPa
       from t
       group by int(3 * log10(max(1, spc)))
)
select cTs,
    substr(fosFmte7(spc), 1, 7) spc,
    substr(fosFmte7(spcMin), 1, 7) spcMin,
    substr(fosFmte7(spcMax), 1, 7) spcMax,
    cPa
    from u order by u.spcMax
    with ur
;
}¢--- A540769.WK.SQL(SPCTS1) cre=2010-01-26 mod=2010-01-26-12.56.02 A540769 ----
set current path = 'OA1A';
with tsRts as
( select dbName db, name ts, dbId, psId,
         sum(real(max(space, 0))*1024) spRts
    from sysIbm.tableSpaceStats
    group by dbName, name, dbId, psId
)
, ixRts as
( select creator cr, name ix, dbId, isobId,
        sum(real(max(space, 0))*1024) spRts
    from sysIbm.indexSpaceStats
    group by creator, name, dbId, isobId
)
, tsIx as
( select t.dbName db, t.tsName ts, count(*) indexs,
        sum(max(x.spacef, 0) * 1024) spRun, sum(spRts) spRts
    from sysIbm.sysTables t
        join sysIbm.sysIndexes x
        on x.tbCreator = t.creator and x.tbName = t.name
        left join ixRts r
        on x.creator = r.cr and x.name = r.ix
           and x.dbid = r.dbid and x.isobId = r.isobId
    group by t.dbName, t.tsName
)
, ts as
( select s.dbName db , s.name ts, max(partitions, 1) tParts,
        max(s.spacef, 0) * 1024 tSpRun,
        coalesce(r.SpRts, 0) tSpRts,
        i.indexs, i.spRun iSpRUn, i.spRts iSpRts
      from sysibm.sysTableSpace s
      left join tsRts r
      on s.dbName = r.db and s.name = r.ts
         and s.dbId = r.dbId and s.psId = r.psId
      left join tsIx  i
      on i.db = s.dbName and i.ts = s.name
)
select char(db, 8) "db", char(ts, 8) "ts",
        tParts "tParts",
        char(fosFmtE7(tSpRun), 7) "tSpRun",
        char(fosFmtE7(tSpRts), 7) "tSpRts",
        coalesce(indexs, 0) "indexs",
        char(fosFmtE7(coalesce(iSpRun, 0)), 7) "iSpRun",
        char(fosFmtE7(coalesce(iSpRts, 0)), 7) "iSpRts"
    from ts
    where db like 'DA540769%'
    order by tSpRts desc
    fetch first 100 rows only
    with ur
;
}¢--- A540769.WK.SQL(SPUFISCA) cre=2012-04-02 mod=2012-04-03-12.31.46 A540769 ---
-- spufi comments
--
 -- 1) wrap over endofLine
select d.*   ,                                                       'ab
cd'      from                                                        sys
ibm.sysdummy1 d;
 -- 2) -- comment not allowed in tokens
select *                                                       from-- '
sysibm.sysdummy1;
 -- 3) /* ... */ comment over several lines
 select * from/*
     dsfg '
     */sysibm.sysdummy1 ;
 -- 4) /* ... */ ' ", nesting, /* and -- ignored
 select * from/*         und gesch'  <elt
        dsfg                  /*
      '
  --  */sysibm.sysdummy1  ;
--  5) set terminator uppercase und --#SET ohne space|
select *
from
--#SET    TERMINATOR ?
sysibm.sysdummy1?
}¢--- A540769.WK.SQL(SQLCATRT) cre=2012-12-11 mod=2012-12-11-17.06.12 A540769 ---
$#@                                                                     00010001
$>. fEdit('::v')                                                        00020001
call sqlrxconnect dbaf                                                  00030001
call sqlcattsstats "dbname = 'DSNDB06' and name = 'SYSTSTAB'"           00040001
call sqlcattsstats "dbname = 'MF01A1A' and name = 'A150A'"              00050004
call sqlcatIXStats "creator= 'OA1A'    and name LIKE 'IMF150%'"         00060005
call sqlcatTB sysibm.systables, "name like 'TMF10%'", name              00070006
$#out                                              20121211 17:04:27    00080006
$#out                                              20121211 17:04:15    00090006
*** run error ***                                                       00100006
tsoAlloc rc 12 for alloc dd(CAT1) NEW  recfm(V b) lrecl(32756) block(32700110006
$#out                                              20121211 12:53:11    00120005
}¢--- A540769.WK.SQL(SQLERR) cre=2014-09-18 mod=2014-09-18-09.38.24 A540769 ----
select current timestamp "jetzt" from sysibm.sysDummy1;
select current timestamp  fehler from sysibm.sysError1;
select current timestamp "nachher" from sysibm.sysDummy1;
}¢--- A540769.WK.SQL(SQLPARM) cre=2006-06-13 mod=2006-06-21-17.00.27 F540769 ---
SELECT *
    FROM SSXX28Q0.DB2_BIND_PARMS
  --WHERE PGM LIKE 'PC0580I%'
    WHERE PGM LIKE 'YPC0760%'
  --WHERE PGM LIKE 'YPC0580%'
  --      AND COLLID = 'AV01' AND QUALIFIER LIKE '%02%'
;
INSERT INTO SSXX28Q0.DB2_BIND_PARMS
         (  APPL          ,
            RZ            ,
            PGM           ,
            SSID          ,
            "COLLID"      ,
            LOCATION      ,
            OWNER         ,
            QUALIFIER     ,
            ISOLATION     ,
            EXPLAIN       ,
            CURRENTDATA   ,
            "RELEASE"     ,
            DBPROTOCOL    ,
            DEGREE        ,
            DYNAMICRULES  ,
            KEEPDYNAMIC   ,
            REOPT         ,
            OPTHINT       ,
            IMMEDWRITE    ,
            FLAG
         )
    SELECT
            APPL          ,
            RZ            ,
            'YPC0760'     ,
            SSID          ,
            "COLLID"      ,
            LOCATION      ,
            OWNER         ,
            QUALIFIER     ,
            ISOLATION     ,
            EXPLAIN       ,
            CURRENTDATA   ,
            "RELEASE"     ,
            DBPROTOCOL    ,
            DEGREE        ,
            DYNAMICRULES  ,
            KEEPDYNAMIC   ,
            REOPT         ,
            OPTHINT       ,
            IMMEDWRITE    ,
            FLAG
    FROM SSXX28Q0.DB2_BIND_PARMS
    WHERE PGM = 'YPC0580';
    COMMIT;
SELECT *
    FROM SSXX28Q0.DB2_BIND_PARMS
  --WHERE PGM LIKE 'PC0580I%'
    WHERE PGM LIKE 'YPC0760%'
  --WHERE PGM LIKE 'YPC0580%'
  --      AND COLLID = 'AV01' AND QUALIFIER LIKE '%02%'
;
XELECT DISTINCT  COLLID, SUBSTR(QUALIFIER,5 ,2)
    FROM SSXX28Q0.DB2_BIND_PARMS
    WHERE PGM LIKE 'YAV0%'
;
SELECT COUNT(*), PGM
    FROM SSXX28Q0.DB2_BIND_PARMS
    WHERE PGM LIKE 'YAV0%'
    GROUP BY PGM
    ORDER BY PGM
;
SELECT COUNT(*), PGM, RZ, SSID
    FROM SSXX28Q0.DB2_BIND_PARMS
    WHERE PGM LIKE 'YAV0%'
    GROUP BY PGM, RZ, SSID
    ORDER BY PGM, RZ, SSID
;
}¢--- A540769.WK.SQL(STATUS) cre= mod= -----------------------------------------
select u.*, COUNT(*), tid104des
  from OA1T.tid104a1,
    (  select       '02 Beleg' na,   tid102ugr gr, tid102uva va
          from OA1T.tid102a1
       union ALL select '03 Status' na,     tid103sgr gr, tid103sva va
          from OA1T.tid103a1
       union ALL select '11 Accounting' na, tid111ugr gr, tid111uva va
          from OA1T.tid111a1
    ) u
  WHERE u.gr = tid104GRP and u.va = tid104val
  group by u.na, u.gr, u.va , TID104DES
  ORDER by u.na, u.gr, u.va
;
select '06 Recovery' na, tid106sta sta, count(*)
     from OA1T.tid106a1
     group by    tid106sta
     order by na, sta
;
select * from oa1t.tid104a1
     order by tid104val;
}¢--- A540769.WK.SQL(STOR) cre=2006-08-02 mod=2006-08-02-11.52.45 F540769 ------
select 'alter tablespace ' || strip(dbname) || '.' || strip(tsname)
     || ' alter partition ' || char(partition)
     || ' priqty 720;'
    from sysibm.systablepart
    where dbname = 'PW01A1P' and pqty = 12
    order by dbname asc, tsname asc, partition asc
;
x
select dbname, tsname, partition, pqty, sqty,
        pqty * 4 / spacef pp, sqty * 4 / spacef sp,
        spacef, cardf
    from sysibm.systablepart
    where dbname = 'PW01A1P'
    order by pqty asc, pp asc
;
x
select dbname, tsname, partition, pqty, sqty, space, spacef,
          dsnum, extents,
          card, cardf, avgrowlen, cardf*avgrowlen / spacef / 1000
    from sysibm.systablepart
    where dbname = 'PW01A1T'
    order by dbname asc, tsname asc, partition asc
}¢--- A540769.WK.SQL(STPR) cre=2011-05-20 mod=2011-07-25-16.36.47 A540769 ------
$>.fEdit('~wk.texv(out)')
$<=¢
set current sqlid = 's100447' ;
   drop   procedure A540769.P1;
   drop   procedure A540769.P2;
   drop   procedure A540769.P22;
   drop   procedure A540769.P3;
   drop   procedure A540769.P4;
commit;
terminator    } ;
create procedure A540769.P1(in fnd varchar(100), in src varchar(100),
                            out  cnt int)
        deterministic contains sql
    begin
    set cnt = length(strip(fnd)) + length(strip(src));
    end
}
create procedure A540769.P2(in fnd varchar(100), in src varchar(100),
            out cnt int,    out  dat date)
        deterministic contains sql
    begin
    declare cnt int;
    call A540769.P1(fnd, src, cnt);
    set dat = '01.04.1956';
    end
}
create procedure A540769.P22(in ci varchar(100), out co varchar(200))
        deterministic contains sql
    begin
    set co = 'abc def ci=<' || strip(ci) || '>' ;
    end
}
create procedure A540769.P3(out ve char(4))
        version v1 deterministic contains sql
    set ve = 'p3V1'
}
alter  procedure A540769.P3 add version v2 (out ve char(4))
                   deterministic contains sql
    set ve = 'p3V2'
}
create procedure A540769.P4(in ci varchar(100), out da date,
                            out ve varchar(100))
        version v1
        deterministic contains sql
    begin
    set da = current date + 1 day;
    call A540769.P3(ve);
    set ve = 'p4 v1 - curr=''' || current routine version|| ''', '||ve;

    end
}
alter  procedure A540769.P4 add version v2
        (in ci varchar(100), out da date,
                            out ve varchar(100))
        deterministic contains sql
    begin
    set da = current date + 2 day;
    call A540769.P3(ve);
    set ve = 'p4 v2 - curr=''' || current routine version||''', '||ve;
    end
}
alter  procedure A540769.P4 add version v3
        (in ci varchar(100), out da date,
                            out ve varchar(100))
        deterministic contains sql
    begin
    set da = current date + 3 day;
    call A540769.P3(ve);
    set ve = 'p4 v3 - curr=''' || current routine version || ''', '||ve;
    end
}
terminator ; }
$=eins=wie geht es dir?
call A540769.P4(wie geht es Dir Konstäntchen?   oder   , :res,);
set current routine version v1;
call A540769.P4(wie geht es Dir v1?   , :res,);
set current routine version v2;
call A540769.P4(wie geht es Dir v2?   , :res,);
set current routine version v3;
call A540769.P4(wie geht es Dir v3?   , :res,);
set current routine version = '';
call A540769.P4(wie geht es Dir v empty?   , :res,);
alter  procedure A540769.P4 activate version v3;
call A540769.P4(wie geht es Dir Konstäntchen?   oder   , :res,);
set current routine version v1;
call A540769.P4(wie geht es Dir v1?   , :res,);
set current routine version v2;
call A540769.P4(wie geht es Dir v2?   , :res,);
set current routine version v3;
call A540769.P4(wie geht es Dir v3?   , :res,);
set current routine version = '';
call A540769.P4(wie geht es Dir v empty?   , :res,);
alter  procedure A540769.P4 activate version v2;
call A540769.P4(wie geht es Dir Konstäntchen?   oder   , :res,);
set current routine version v1;
call A540769.P4(wie geht es Dir v1?   , :res,);
set current routine version v2;
call A540769.P4(wie geht es Dir v2?   , :res,);
set current routine version v3;
call A540769.P4(wie geht es Dir v3?   , :res,);
set current routine version = '';
call A540769.P4(wie geht es Dir v empty?   , :res,);
set current routine version = 'V9';
call A540769.P4(wie geht es Dir v empty?   , :res,);
--call A540769.P1(?, ?, ?);
--call A540769.P1(WIE geht es dir konstante? , :zwei, :res);
rollback;
$! call sqlStmtsOpt
$#out                                              20110725 16:36:00
$#out                                              20110725 16:28:47
$#out                                              20110524 16:54:03
$#out                                              20110524 16:53:44
*** run error sqlCode -204 A540769.P22 IS AN UNDEFINED NAME
warnings
state 42704
stmt =  execSql drop   procedure A540769.P22
$#out                                              20110524 16:53:31
*** run error sqlCode -204 A540769.P1 IS AN UNDEFINED NAME
warnings
state 42704
stmt =  execSql drop   procedure A540769.P1
$#out                                              20110524 16:52:58
*** run error sqlCode -204 A540769.P3 IS AN UNDEFINED NAME
warnings
state 42704
stmt =  execSql drop   procedure A540769.P3
$#out                                              20110524 16:52:41
*** run error sqlCode -601 THE NAME (VERSION OR VOLUME SERIAL NUMBER) OF THE OBJ
warnings
state 42710
stmt =  execSql create procedure A540769.P22(in ci varchar(100), out co varchar(
$#out                                              20110524 16:51:49
*** run error sqlCode -713 THE REPLACEMENT VALUE FOR CURRENT ROUTINE VERSION IS
warnings
state 42815
stmt =  execSql execute immediate :ggSrc
with ggSrc = set current routine version = 'v9'
$#out                                              20110524 16:47:57
$#out                                              20110524 16:45:38
$#out                                              20110524 15:37:55
$#out                                              20110524 15:33:45
}¢--- A540769.WK.SQL(STPRDBTF) cre=2011-05-30 mod=2011-06-08-14.39.19 A540769 ---
$#@
call sqlConnect dbtf
$;
$** $>.fEdit('~wk.texv(out)')
$<=¢
call CHSKA000DBAF.gdb9998.versP2(wie geht es aus DBTF? oder , :res,);
call CHSKA000DBAF.gdb9998.versPx(wie geht es aus DBTF? oder , :res,);
$! call sqlStmtsOpt
$#out                                              20110608 14:38:39
--- called CHSKA000DBAF.GDB9998.VERSP2, sqlCode 0
  parm 1 i CI = wie geht es aus DBTF? oder
  parm 2 o DA $res = 10.06.2011
  parm 3 o VE = p2 v2 - curr='', p1V1
sqlCode 0: call CHSKA000DBAF.gdb9998.versP2(wie geht es aus DBTF? oder ...
*** run error ***
0 routines found for schema = 'GDB9998' and name = 'VERSPX'
}¢--- A540769.WK.SQL(STPRDIAG) cre=2011-06-27 mod=2011-06-28-10.43.36 A540769 ---
$#@
$>.fEdit('~wk.texv(stprdiag)')
$<=¢
set current sqlid = 's100447' ;
drop   procedure gdb9998.diag1;
drop   procedure gdb9998.diag2;
terminator    } ;
create procedure gdb9998.DIAG1(in fun int, out diag varchar(32000))
        reads sql data                                       
    begin                                                    
    declare c1  varchar(20) default '-123';                  
    declare i1, i2 int default -99;                          
    declare sqlCode int default 0;                           
    declare prCu cursor for                                  
        select version, parm_count                           
        from sysibm.sysRoutines r                            
        where r.name = 'DIAG1';                              
    declare continue handler for sqlException begin          
        declare cSt, cCd, cCc varchar(1000) default '';      
        declare sSt, sCd, sCc varchar(1000) default '';      
        declare no, cLN, sLN int default -999;               
        declare tst timestamp;
        set tst = current timestamp;
        set diag = diag || ' handler@' || char(tst);
        get current diagnostics cSt = all statement;         
        get current diagnostics cCd = all condition;         
        get current diagnostics condition 1 cLn = db2_line_number;
        get current diagnostics cCc = all connection;        
        get stacked diagnostics sSt = all statement;         
        get stacked diagnostics condition 1 sLn = db2_line_number;
        get stacked diagnostics sCd = all condition;         
        get stacked diagnostics sCc = all connection;        
        set diag = diag || ' currentStmt>>> '   || cSt       
            || ' currentConndi>>> lNo='||strip(char(cLN)) ||',' || cCd
                        || ' currentConnec>>> ' || cCc;      
        if cSt <> sSt then
            set diag = diag  || ' stackedStmt>>> '   || sSt; 
            end if;
        if cCd <> sCd or cLn <> sLn then
            set diag = diag                                  
            || ' stackedConndi>>> lNo='||strip(char(sLN)) ||',' || sCd;
            end if;
        if cCc <> sCc then
            set diag = diag || ' stackedConnec>>> ' || sCc;  
            end if;
        end;                                                 
    set diag = 'beginFun=' || strip(char(fun));              
    set i1 = 22 / (fun-99);                                  
    set i1 = 22 / fun;                                       
    set diag = diag || ' l0=' || strip(char(i1));            
    if fun = 1 or fun = 99 then                              
        set c1 = 'fun1';                                     
        end if;                                              
    set i2 = int(c1);                                        
    set diag = diag || ' l1=' || strip(char(i2));            
    open prCu;                                               
    set diag = diag || ' l2=Open1';                          
    if fun = 2 or fun = 99 then                              
        open prCu;                                           
        set diag = diag || ' l2=Open2';                      
        end if;                                              
    set diag = diag || ' l99=end';
    return;
    end
}
terminator ; }
commit;
call gdb9998.DIAG1(-1, DIA1);
call gdb9998.DIAG1(0, DIA0);
call gdb9998.DIAG1(1, DIA1);
call gdb9998.DIAG1(2, DIA1);
call gdb9998.DIAG1(3, DIA1);
call gdb9998.DIAG1(99, DIA1);
$! call sqlStmtsOpt
$#out                                              20110628 09:23:28
$#out                                              20110628 09:19:21
}¢--- A540769.WK.SQL(STPRDRS) cre=2011-06-03 mod=2011-06-10-14.23.23 A540769 ---
$#@
$<=¢
set current sqlid = 's100447' ;
drop   procedure A540769.resP1;
drop   procedure A540769.resP2;
drop   procedure A540769.DRSP1;
drop   procedure A540769.DRSP2;
drop   procedure gdb9998.resP1;
drop   procedure gdb9998.resP2;
drop   procedure gdb9998.DRSP1;
drop   procedure gdb9998.DRSP2;
terminator    } ;
create procedure gdb9998.DRSP1(in name varchar(20))
        reads sql data dynamic result sets 3
    begin
    declare vrs  varchar(20);
    declare paC  int;
    declare eof int default 0;
    declare sqlCode int default 0;
    declare prCu cursor with return for
        select version, parm_count
        from sysibm.sysRoutines r
        where r.name = DRSP1.name;
    declare paCu cursor with return for
        select *
        from sysibm.sysParms p
          join sysibm.sysRoutines r
            on    p.SCHEMA       = r.SCHEMA
              and p.SPECIFICNAME = r.SPECIFICNAME
              and p.ROUTINETYPE  = r.ROUTINETYPE
              and p.VERSION      = r.VERSION
        where r.name = DRSP1.name and r.active = 'Y'
        order by ordinal;
    --  open paCu;     -- um resignal im Handler zu testen
    begin
       declare continue handler for sqlException begin
           if sqlCode = -502 then
               resignal sqlstate 'HHI01'
                   set message_text = 'sqlcode '
                        || strip(char(sqlCode))
                        || ' opening prCu 1';
               end if;
           end;
        open prCu;
        end;
    begin
       declare continue handler for sqlException begin
           declare old int;
           set old = sqlCode;
           if old     = -502 then
               resignal sqlstate 'HHI02'
                   set message_text = 'sqlcode '
                        || strip(char(sqlCode))
                        || ' old ' || strip(char(old))
                        || ' opening paCu 2';
               end if;
           end;
        open paCu;
        end;
    return;
    end
}
--- macht noch nichts|
create procedure gdb9998.DRSP2(in name varchar(20),out out varchar(500))
        reads sql data
    begin
    declare vrs  varchar(20);
    declare paC  int;
    declare eof int default 0;
    declare sqlCode int default 0;
    declare prCu cursor for
        select version, parm_count
        from sysibm.sysRoutines r
        where r.name = DRSP2.name;
    set out = 'begin';
    open prCu;
    set out = out || ' open';
        begin
        declare exit handler for not found
            set out = out || ' notFound=' || strip(char(sqlCode));
        loop
            fetch prCu into vrs, paC;
            set out = out || ' =' || strip(vrs);
            end loop;
        end;
    set out = out || ' endLoop';
    close prCu;
    set out = out || ' close';
    end
}
terminator ; }
call gdb9998.DRSP1(FETP1 );
call gdb9998.DRSP1(VERSP1);
call gdb9998.DRSP1(xxxYY );
--call gdb9998.DRSP2(FETP1 );
--call gdb9998.DRSP2(VERSP1);
--call gdb9998.DRSP2(xxxYY );
commit;
$! call sqlStmtsOpt
$#out                                              20110610 14:21:40
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure A540769.resP1
sqlCode -204: drop   procedure A540769.resP2
sqlCode -204: drop   procedure A540769.DRSP1
sqlCode -204: drop   procedure A540769.DRSP2
sqlCode -204: drop   procedure gdb9998.resP1
sqlCode -204: drop   procedure gdb9998.resP2
sqlCode 0: drop   procedure gdb9998.DRSP1
sqlCode 0: drop   procedure gdb9998.DRSP2
sqlCode 0: create procedure gdb9998.DRSP1(in name varchar(20)) reads sql d...
sqlCode 0: create procedure gdb9998.DRSP2(in name varchar(20),out out varc...
*** run error ***
sqlCode SQLCODE not numeric
sqlCode SQLCODE sqlState=SQLSTATE
    errMC=SQLERRMC
    warnings= 0=SQLWARN.0 1=SQLWARN.1 2=SQLWARN.2 3=SQLWARN.3 4=SQLWARN.4 5=SQLW
    errD.1=SQLERRD.1 2=SQLERRD.2 3=SQLERRD.3
    errD.4=SQLERRD.4 5=SQLERRD.5 6=SQLERRD.6
stmt =  execSql call GDB9998.DRSP1 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110608 14:34:51
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure A540769.resP1
sqlCode -204: drop   procedure A540769.resP2
sqlCode 0: drop   procedure A540769.DRSP1
sqlCode 0: drop   procedure A540769.DRSP2
sqlCode -204: drop   procedure gdb9998.resP1
sqlCode -204: drop   procedure gdb9998.resP2
sqlCode -204: drop   procedure gdb9998.DRSP1
sqlCode -204: drop   procedure gdb9998.DRSP2
sqlCode 0: create procedure gdb9998.DRSP1(in name varchar(20))         ...
sqlCode 0: create procedure gdb9998.DRSP2(in name varchar(20),out out v...
--- called GDB9998.DRSP1, sqlCode 466
  parm 1 i NAME = FETP1
  dynamic result set 1 PRCU locator=1
  dynamic result set 2 PACU locator=2
--- begin of dynamic result set 1=PRCU of GDB9998.DRSP1
VE T
V1 2
--- 1 rows fetched from dynamic result set 1=PRCU of GDB9998.DRSP1
--- begin of dynamic result set 2=PACU of GDB9998.DRSP1
SCHEMA  OWNER   NAME  SPECI R C PARM NEID R L TYPESC TYPENAM EID D L T O GTH E S
A540769 s100447 FETP1 FETP1 P N NAME 1443 P 1 SYSIBM VARCHAR 449 0 N N 0  20 0 S
A540769 s100447 FETP1 FETP1 P N OUT  1443 O 2 SYSIBM VARCHAR 449 0 N N 0 500 0 S
--- 2 rows fetched from dynamic result set 2=PACU of GDB9998.DRSP1
sqlCode 466: call gdb9998.DRSP1(FETP1 )
--- called GDB9998.DRSP1, sqlCode 466
  parm 1 i NAME = VERSP1
  dynamic result set 1 PRCU locator=3
  dynamic result set 2 PACU locator=4
--- begin of dynamic result set 1=PRCU of GDB9998.DRSP1
VE T
V1 1
V2 1
--- 2 rows fetched from dynamic result set 1=PRCU of GDB9998.DRSP1
--- begin of dynamic result set 2=PACU of GDB9998.DRSP1
SCHEMA  OWNER   NAME   SPECIF R C PA NEID R L TYPESC TYPE EID D L T O H E S SID
A540769 s100447 VERSP1 VERSP1 P N VE 1437 O 1 SYSIBM CHAR 453 0 N N 0 4 0 S 500
--- 1 rows fetched from dynamic result set 2=PACU of GDB9998.DRSP1
sqlCode 466: call gdb9998.DRSP1(VERSP1)
--- called GDB9998.DRSP1, sqlCode 466
  parm 1 i NAME = xxxYY
  dynamic result set 1 PRCU locator=5
  dynamic result set 2 PACU locator=6
--- begin of dynamic result set 1=PRCU of GDB9998.DRSP1
--- 0 rows fetched from dynamic result set 1=PRCU of GDB9998.DRSP1
--- begin of dynamic result set 2=PACU of GDB9998.DRSP1
--- 0 rows fetched from dynamic result set 2=PACU of GDB9998.DRSP1
sqlCode 466: call gdb9998.DRSP1(xxxYY )
sqlCode 0: commit
$#out                                              20110603 18:26:42
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure gdb9998.resP1
sqlCode -204: drop   procedure gdb9998.resP2
sqlCode 0: drop   procedure gdb9998.DRSP1
sqlCode 0: drop   procedure gdb9998.DRSP2
sqlCode 0: create procedure gdb9998.DRSP1(in name varchar(20))         ...
sqlCode 0: create procedure gdb9998.DRSP2(in name varchar(20),out out v...
--- called gdb9998.DRSP1, sqlCode 466
  parm 1 i NAME = FETP1
  dynamic result set 1 PRCU locator=1
  dynamic result set 2 PACU locator=2
--- begin of dynamic result set 1=PRCU of gdb9998.DRSP1
VE T
V1 2
--- 1 rows fetched from dynamic result set 1=PRCU of gdb9998.DRSP1
--- begin of dynamic result set 2=PACU of gdb9998.DRSP1
SCHEMA  OWNER   NAME  SPECI R C PARM NEID R L TYPESC TYPENAM EID D L T O GTH E S
gdb9998 s100447 FETP1 FETP1 P N NAME 1443 P 1 SYSIBM VARCHAR 449 0 N N 0  20 0 S
gdb9998 s100447 FETP1 FETP1 P N OUT  1443 O 2 SYSIBM VARCHAR 449 0 N N 0 500 0 S
--- 2 rows fetched from dynamic result set 2=PACU of gdb9998.DRSP1
sqlCode 466: call gdb9998.DRSP1(FETP1 )
--- called gdb9998.DRSP1, sqlCode 466
  parm 1 i NAME = VERSP1
  dynamic result set 1 PRCU locator=3
  dynamic result set 2 PACU locator=4
--- begin of dynamic result set 1=PRCU of gdb9998.DRSP1
VE T
V1 1
V2 1
--- 2 rows fetched from dynamic result set 1=PRCU of gdb9998.DRSP1
--- begin of dynamic result set 2=PACU of gdb9998.DRSP1
SCHEMA  OWNER   NAME   SPECIF R C PA NEID R L TYPESC TYPE EID D L T O H E S SID
gdb9998 s100447 VERSP1 VERSP1 P N VE 1437 O 1 SYSIBM CHAR 453 0 N N 0 4 0 S 500
--- 1 rows fetched from dynamic result set 2=PACU of gdb9998.DRSP1
sqlCode 466: call gdb9998.DRSP1(VERSP1)
--- called gdb9998.DRSP1, sqlCode 466
  parm 1 i NAME = xxxYY
  dynamic result set 1 PRCU locator=5
  dynamic result set 2 PACU locator=6
--- begin of dynamic result set 1=PRCU of gdb9998.DRSP1
--- 0 rows fetched from dynamic result set 1=PRCU of gdb9998.DRSP1
--- begin of dynamic result set 2=PACU of gdb9998.DRSP1
--- 0 rows fetched from dynamic result set 2=PACU of gdb9998.DRSP1
sqlCode 466: call gdb9998.DRSP1(xxxYY )
sqlCode 0: commit
$#out                                              20110603 18:25:47
sqlCode 0: set current sqlid = 's100447'
sqlCode 0: drop   procedure gdb9998.resP1
sqlCode 0: drop   procedure gdb9998.resP2
sqlCode -204: drop   procedure gdb9998.DRSP1
sqlCode -204: drop   procedure gdb9998.DRSP2
sqlCode 0: create procedure gdb9998.DRSP1(in name varchar(20))         ...
sqlCode 0: create procedure gdb9998.DRSP2(in name varchar(20),out out v...
*** run error ***
SQLCODE =   -438, SQLSTATE = HHI02, UNKNOWN SQLSTATE TYPE FROM SQL
    ROUTINE TOKENS sqlcode 0 old -502 opening paCu 2
stmt =  execSql call gdb9998.DRSP1 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110603 18:01:13
}¢--- A540769.WK.SQL(STPRFET) cre=2011-05-30 mod=2011-06-08-21.08.41 A540769 ---
$#@
call sqlConnect DBTF
$;
$<=¢
set current sqlid = 's100447' ;
drop   procedure A540769.fetP1;
drop   procedure A540769.fetP2;
drop   procedure gdb9998.fetP1;
drop   procedure gdb9998.fetP2;
terminator    } ;
create procedure gdb9998.fetP1(in name varchar(20),out out varchar(500))
        reads sql data
    begin
    declare vrs  varchar(20);
    declare paC  int;
    declare eof int default 0;
    declare sqlCode int default 0;
    declare prCu cursor for
        select version, parm_count
        from sysibm.sysRoutines r
        where r.name = fetP1.name;
    declare continue handler for not found
        begin
        set out = out || ' notFound=' || strip(char(sqlCode));
        set eof = 1;
        end;
    set out = 'begin';
    open prCu;
    set out = out || ' open';
    l1: loop
        fetch prCu into vrs, paC;
        if eof = 1 then
            set out = out || ' leave';
            leave l1;
            end if;
        set out = out || ' =' || strip(vrs);
        end loop l1;
    set out = out || ' endLoop';
    close prCu;
    set out = out || ' close';
    end
}
create procedure gdb9998.fetP2(in name varchar(20),out out varchar(500))
        reads sql data
    begin
    declare vrs  varchar(20);
    declare paC  int;
    declare eof int default 0;
    declare sqlCode int default 0;
    declare prCu cursor for
        select version, parm_count
        from sysibm.sysRoutines r
        where r.name = fetP2.name;
    set out = 'begin';
    open prCu;
    set out = out || ' open';
        begin
        declare exit handler for not found
            set out = out || ' notFound=' || strip(char(sqlCode));
        loop
            fetch prCu into vrs, paC;
            set out = out || ' =' || strip(vrs);
            end loop;
        end;
    set out = out || ' endLoop';
    close prCu;
    set out = out || ' close';
    end
}
terminator ; }
call gdb9998.fetP1(FETP1,  :o);
call gdb9998.fetP1(VERSP1, :o);
call gdb9998.fetP1(xxxYY,  :o);
call gdb9998.fetP2(FETP1,  :o);
call gdb9998.fetP2(VERSP1, :o);
call gdb9998.fetP2(xxxYY,  :o);
commit;
$! call sqlStmtsOpt
$#out                                              20110608 21:05:52
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure A540769.fetP1
sqlCode -204: drop   procedure A540769.fetP2
sqlCode -204: drop   procedure gdb9998.fetP1
sqlCode -204: drop   procedure gdb9998.fetP2
sqlCode 0: create procedure gdb9998.fetP1(in name varchar(20),out o...
sqlCode 0: create procedure gdb9998.fetP2(in name varchar(20),out o...
--- called GDB9998.FETP1, sqlCode 0
  parm 1 i NAME = FETP1
  parm 2 o OUT $o = begin open =V1 notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(FETP1,  :o)
--- called GDB9998.FETP1, sqlCode 0
  parm 1 i NAME = VERSP1
  parm 2 o OUT $o = begin open notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(VERSP1, :o)
--- called GDB9998.FETP1, sqlCode 0
  parm 1 i NAME = xxxYY
  parm 2 o OUT $o = begin open notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(xxxYY,  :o)
--- called GDB9998.FETP2, sqlCode 0
  parm 1 i NAME = FETP1
  parm 2 o OUT $o = begin open =V1 notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(FETP1,  :o)
--- called GDB9998.FETP2, sqlCode 0
  parm 1 i NAME = VERSP1
  parm 2 o OUT $o = begin open notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(VERSP1, :o)
--- called GDB9998.FETP2, sqlCode 0
  parm 1 i NAME = xxxYY
  parm 2 o OUT $o = begin open notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(xxxYY,  :o)
sqlCode 0: commit
$#out                                              20110608 21:05:04
*** run error ***
sqlCode SQLCODE not numeric
sqlCode SQLCODE sqlState=SQLSTATE
    errMC=SQLERRMC
    warnings= 0=SQLWARN.0 1=SQLWARN.1 2=SQLWARN.2 3=SQLWARN.3 4=SQLWARN.4 5=SQLW
    errD.1=SQLERRD.1 2=SQLERRD.2 3=SQLERRD.3
    errD.4=SQLERRD.4 5=SQLERRD.5 6=SQLERRD.6
stmt =  execSql call GDB9998.FETP1 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110608 14:36:10
sqlCode 0: set current sqlid = 's100447'
sqlCode 0: drop   procedure A540769.fetP1
sqlCode 0: drop   procedure A540769.fetP2
sqlCode -204: drop   procedure gdb9998.fetP1
sqlCode -204: drop   procedure gdb9998.fetP2
sqlCode 0: create procedure gdb9998.fetP1(in name varchar(20),out out v...
sqlCode 0: create procedure gdb9998.fetP2(in name varchar(20),out out v...
--- called GDB9998.FETP1, sqlCode 0
  parm 1 i NAME = FETP1
  parm 2 o OUT $o = begin open =V1 notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(FETP1,  :o)
--- called GDB9998.FETP1, sqlCode 0
  parm 1 i NAME = VERSP1
  parm 2 o OUT $o = begin open =V1 =V2 notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(VERSP1, :o)
--- called GDB9998.FETP1, sqlCode 0
  parm 1 i NAME = xxxYY
  parm 2 o OUT $o = begin open notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(xxxYY,  :o)
--- called GDB9998.FETP2, sqlCode 0
  parm 1 i NAME = FETP1
  parm 2 o OUT $o = begin open =V1 notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(FETP1,  :o)
--- called GDB9998.FETP2, sqlCode 0
  parm 1 i NAME = VERSP1
  parm 2 o OUT $o = begin open =V1 =V2 notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(VERSP1, :o)
--- called GDB9998.FETP2, sqlCode 0
  parm 1 i NAME = xxxYY
  parm 2 o OUT $o = begin open notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(xxxYY,  :o)
sqlCode 0: commit
$#out                                              20110603 18:19:44
sqlCode 0: set current sqlid = 's100447'
sqlCode 0: drop   procedure gdb9998.fetP1
sqlCode 0: drop   procedure gdb9998.fetP2
sqlCode 0: create procedure gdb9998.fetP1(in name varchar(20),out out v...
sqlCode 0: create procedure gdb9998.fetP2(in name varchar(20),out out v...
--- called gdb9998.FETP1, sqlCode 0
  parm 1 i NAME = FETP1
  parm 2 o OUT $o = begin open =V1 notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(FETP1,  :o)
--- called gdb9998.FETP1, sqlCode 0
  parm 1 i NAME = VERSP1
  parm 2 o OUT $o = begin open =V1 =V2 notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(VERSP1, :o)
--- called gdb9998.FETP1, sqlCode 0
  parm 1 i NAME = xxxYY
  parm 2 o OUT $o = begin open notFound=100 leave endLoop close
sqlCode 0: call gdb9998.fetP1(xxxYY,  :o)
--- called gdb9998.FETP2, sqlCode 0
  parm 1 i NAME = FETP1
  parm 2 o OUT $o = begin open =V1 notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(FETP1,  :o)
--- called gdb9998.FETP2, sqlCode 0
  parm 1 i NAME = VERSP1
  parm 2 o OUT $o = begin open =V1 =V2 notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(VERSP1, :o)
--- called gdb9998.FETP2, sqlCode 0
  parm 1 i NAME = xxxYY
  parm 2 o OUT $o = begin open notFound=100 endLoop close
sqlCode 0: call gdb9998.fetP2(xxxYY,  :o)
sqlCode 0: commit
$#out                                              20110602 13:37:12
}¢--- A540769.WK.SQL(STPRPATH) cre=2011-05-25 mod=2011-07-26-18.35.01 A540769 ---
$** $>.fEdit('~wk.texv(out)')
call sqlConnect dbaf
$;
$<=¢
set current sqlid = 's100447' ;
   drop   procedure a540769A.pathP1;
   drop   procedure a540769B.pathP1;
   drop   procedure a540769.pathP2;
   drop   procedure a540769.pathP3;
   drop   procedure a540769.pathFak;
   drop   procedure gdb9998.pathP1;
   drop   procedure gdb9998A.pathP1;
   drop   procedure gdb9998B.pathP1;
   drop   procedure gdb9998.pathP2;
   drop   procedure gdb9998.pathP3;
   drop   procedure gdb9998.pathFak;
   drop   procedure gdb9998.pathLoUp;
terminator    } ;
create procedure gdb9998A.pathP1(out scNa varchar(20))
        deterministic contains sql
    set scNa = 'gdb9998A.pathP1'
}
create procedure gdb9998B.pathP1(out scNa varchar(20))
        deterministic contains sql
    set scNa = 'gdb9998B.pathP1'
}
create procedure gdb9998.pathP2(out scNa varchar(60))
        deterministic contains sql
        qualifier gdb9998A
    begin
    declare vA, vB, vX varchar(20) ;
    call gdb9998A.pathP1(vA);
    call gdb9998B.pathP1(vB);
    call          pathP1(vX);
    set scNa = 'gdb9998.pathP2: ?=' || vX
           || ', A=' || vA || ', B=' || vB;
    end
}
create procedure gdb9998.pathp3(out scNa varchar(60))
        deterministic contains sql
        sql path gdb9998X, gdb9998A, gdb9998B, gdb9998Z
    begin
    declare vA, vB, vX varchar(20) ;
    call gdb9998A.pathP1(vA);
    call gdb9998B.pathP1(vB);
    call          pathP1(vX);
    set scNa = 'gdb9998.pathp3: ?=' || vX
           || ', A=' || vA || ', B=' || vB;
    end
}
create procedure gdb9998.pathFak(in i int, out fak bigInt)
        deterministic contains sql
    begin
    set i = i - 1;
    if i <  1 then
        set fak = 1;
    else
        call pathFak(i, fak);
        set fak = (i+1) * fak;
    end if;
    end
}
create procedure gdb9998.pathLoUp(inOut txt varchar( 70))
        deterministic contains sql
    begin
    declare res varchar(100);
    set txt = left(lower(txt) || ' <== ' || upper(txt)
              || ' <== ' || txt,  min(70,3*length(txt)+10));
    end
}
terminator ; }
call gdb9998.pathLoUp('einsZwei Drei');
call gdb9998.pathLoUp(
   'Null Eins Zwei Drei Vier Fuenf Sechs Sieben');
call gdb9998A.pathP1() ;
call gdb9998.pathP2() ;
alter procedure gdb9998.pathP2
     qualifier gdb9998B;
call gdb9998.pathP2() ;
call gdb9998.pathP3() ;
alter procedure gdb9998.pathP3
     sql path gdb9998Y, gdb9998B, gdb9998A, gdb9998Z;
call gdb9998.pathP3() ;
commit;
call gdb9998.pathP2() ;
call gdb9998.pathP3() ;
set current path gdb9998Y, gdb9998A, gdb9998B;
set current schema gdb9998A;
call gdb9998.pathP2() ;
commit;
call gdb9998.pathP2() ;
call gdb9998.pathP3() ;
commit;
drop procedure gdb9998B.pathP1;
commit;
$*(
call gdb9998.pathP3() ;
call gdb9998.pathP2() ;
call gdb9998.pathP3() ;
call gdb9998.pathFak(4,) ;
call gdb9998.pathFak(9,) ;
call gdb9998.pathFak(19,) ;
call gdb9998.pathFak(29,) ;
$*)
terminator    } ;
create procedure gdb9998B.pathP1(out scNa varchar(20))
        deterministic contains sql
    set scNa = 'gdb9998B.pathP1 e2'
}
create procedure gdb9998.pathP1(out scNa varchar(20))
        deterministic contains sql
    set scNa = 'gdb9998.pathP1 e2'
}
commit
$! call sqlStmtsOpt
$#out                                              20110726 18:23:12
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode 0: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode 0: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: drop   procedure gdb9998.pathLoUp
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
sqlCode 0: create procedure gdb9998.pathLoUp(inOut txt varchar( 70)) deter...
--- called GDB9998.PATHLOUP, sqlCode 0
  parm 1 b TXT = einszwei drei <== EINSZWEI DREI <== einsZwei Drei
sqlCode 0: call gdb9998.pathLoUp('einsZwei Drei')
--- called GDB9998.PATHLOUP, sqlCode 0
  parm 1 b TXT = null eins zwei drei vier fuenf sechs sieben <== NULL EINS ZWEI
sqlCode 0: call gdb9998.pathLoUp( 'Null Eins Zwei Drei Vier Fuenf Sechs Si...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2 qualifier gdb9998B
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3 sql path gdb9998Y, gdb9998B, gdb...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP1(out scNa varchar(20)) determini...
sqlCode 0: commit
$#out                                              20110726 17:56:16
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode 0: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: drop   procedure gdb9998.pathLoUp
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
sqlCode 0: create procedure gdb9998.pathLoUp(inOut txt varchar( 70)) deter...
--- called GDB9998.PATHLOUP, sqlCode 0
  parm 1 b TXT = einszwei drei <== EINSZWEI DREI <== einsZwei Drei
sqlCode 0: call gdb9998.pathLoUp('einsZwei Drei')
--- called GDB9998.PATHLOUP, sqlCode 0
  parm 1 b TXT = null eins zwei drei vier fuenf sechs sieben <== NULL EINS ZWEI
sqlCode 0: call gdb9998.pathLoUp( 'Null Eins Zwei Drei Vier Fuenf Sechs Si...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2 qualifier gdb9998B
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3 sql path gdb9998Y, gdb9998B, gdb...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP1(out scNa varchar(20)) determini...
sqlCode 0: commit
$#out                                              20110726 17:55:58
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode 0: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode 0: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
*** run error ***
SQLCODE = -601: THE NAME (VERSION OR VOLUME SERIAL NUMBER)
    OF THE OBJECT TO BE DEFINED OR THE TARGET OF A RENAME STATEMENT IS
    IDENTICAL TO THE EXISTING NAME (VERSION OR VOLUME SERIAL NUMBER)
    GDB9998.PATHLOUP OF THE OBJECT TYPE PROCEDURE
stmt =  execSql create procedure gdb9998.pathLoUp(inOut txt varchar( 70))
$#out                                              20110726 17:54:17
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode 0: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
sqlCode 0: create procedure gdb9998.pathLoUp(inOut txt varchar(100)) deter...
--- called GDB9998.PATHLOUP, sqlCode 0
  parm 1 b TXT = einszwei drei <== EINSZWEI DREI <== einsZwei Drei
sqlCode 0: call gdb9998.pathLoUp('einsZwei Drei')
--- called GDB9998.PATHLOUP, sqlCode 0
  parm 1 b TXT = null eins zwei drei vier fuenf sechs sieben acht neun zehn elf
sqlCode 0: call gdb9998.pathLoUp( 'Null Eins Zwei Drei Vier Fuenf Sechs Si...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2 qualifier gdb9998B
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3 sql path gdb9998Y, gdb9998B, gdb...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP1(out scNa varchar(20)) determini...
sqlCode 0: commit
$#out                                              20110726 17:50:52
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode 0: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
*** run error ***
SQLCODE = -199: ILLEGAL USE OF KEYWORD END.  TOKEN
    MICROSECONDS MICROSECOND SECONDS SECOND MINUTES MINUTE HOURS WAS
    EXPECTED
src          create procedure gdb9998.pathLoUp(inOut txt varchar(100)) d
  + eterministic contains sql begin declare res varchar(100); set txt =
  + left(lower(txt) || ' <== ' || upper(txt) || ' <== ' || txt, 100) end
  >                                               >>>pos 435 of 510>>>
stmt =  execSql create procedure gdb9998.pathLoUp(inOut txt varchar(100))
$#out                                              20110726 17:50:19
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode 0: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
*** run error ***
SQLCODE = -104: ILLEGAL SYMBOL "=". SOME SYMBOLS THAT MIGHT
    BE LEGAL ARE: :
src                                                          create proc
  + edure gdb9998.pathLoUp(inOut txt varchar(100)) deterministic contain
  + s sql begin declare res varchar(100); txt = left(lower(txt) || ' ...
  >                        >>>pos 309 of 510>>>
stmt =  execSql create procedure gdb9998.pathLoUp(inOut txt varchar(100))
$#out                                              20110726 17:49:44
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode 0: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode 0: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
*** run error ***
SQLCODE = -104: ILLEGAL SYMBOL "VARCHAR". SOME SYMBOLS THAT
    MIGHT BE LEGAL ARE: INOUT OUT IN , ) . ( CHECK UNIQUE NOT FOR
    PRIMARY AS UPDATE
src  create procedure gdb9998.pathLoUp(io txt varchar(100)) determini...
  >                         >>>pos 42 of 510>>>
stmt =  execSql create procedure gdb9998.pathLoUp(io txt varchar(100))
$#out                                              20110725 17:16:20
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2 qualifier gdb9998B
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3 sql path gdb9998Y, gdb9998B, gdb...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP1(out scNa varchar(20)) determini...
sqlCode 0: commit
$#out                                              20110725 17:14:25
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2 qualifier gdb9998B
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3 sql path gdb9998Y, gdb9998B, gdb...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP1(out scNa varchar(20)) determini...
sqlCode 0: commit
$#out                                              20110725 17:12:24
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2 qualifier gdb9998B
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3 sql path gdb9998Y, gdb9998B, gdb...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
*** run error ***
SQLCODE = -440: NO PROCEDURE BY THE NAME GDB9998B.PATHP1
    HAVING COMPATIBLE ARGUMENTS WAS FOUND IN THE CURRENT PATH
stmt =  execSql call GDB9998.PATHP3 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110725 17:11:17
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998.pathP1
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) determin...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) determini...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) determini...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt) de...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2 qualifier gdb9998B
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3 sql path gdb9998Y, gdb9998B, gdb...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
*** run error ***
SQLCODE = -440: NO PROCEDURE BY THE NAME GDB9998B.PATHP1
    HAVING COMPATIBLE ARGUMENTS WAS FOUND IN THE CURRENT PATH
stmt =  execSql call GDB9998.PATHP3 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110609 11:09:48
*** run error ***
SQLCODE = -724: THE ACTIVATION OF THE PROCEDURE OBJECT
    GDB9998.PATHFAK WOULD EXCEED THE MAXIMUM LEVEL OF INDIRECT SQL
    CASCADING
stmt =  execSql call GDB9998.PATHFAK using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110609 11:09:02
--- called GDB9998.PATHFAK, sqlCode 0
  parm 1 i I = 9
  parm 2 o FAK = 362880
sqlCode 0: call gdb9998.pathFak(9,)
$#out                                              20110609 11:08:45
*** run error ***
sqlCode SQLCODE not numeric
sqlCode SQLCODE sqlState=SQLSTATE
    errMC=SQLERRMC
    warnings= 0=SQLWARN.0 1=SQLWARN.1 2=SQLWARN.2 3=SQLWARN.3 4=SQLWARN.4 5=SQLW
    errD.1=SQLERRD.1 2=SQLERRD.2 3=SQLERRD.3
    errD.4=SQLERRD.4 5=SQLERRD.5 6=SQLERRD.6
stmt =  execSql call GDB9998A.PATHP1 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110609 11:06:54
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode -204: drop   procedure gdb9998.pathP2
sqlCode -204: drop   procedure gdb9998.pathP3
sqlCode -204: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) d...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) d...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) de...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) de...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak big...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2 qualifier gdb9998B
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3 sql path gdb9998Y, gdb999...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
*** run error ***
SQLCODE = -440: NO PROCEDURE BY THE NAME GDB9998B.PATHP1
    HAVING COMPATIBLE ARGUMENTS WAS FOUND IN THE CURRENT PATH
stmt =  execSql call GDB9998.PATHP3 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110609 11:06:25
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) d...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) d...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) de...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) de...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak big...
*** run error ***
sqlCode SQLCODE not numeric
sqlCode SQLCODE sqlState=SQLSTATE
    errMC=SQLERRMC
    warnings= 0=SQLWARN.0 1=SQLWARN.1 2=SQLWARN.2 3=SQLWARN.3 4=SQLWARN.4 5=SQLW
    errD.1=SQLERRD.1 2=SQLERRD.2 3=SQLERRD.3
    errD.4=SQLERRD.4 5=SQLERRD.5 6=SQLERRD.6
stmt =  execSql call GDB9998A.PATHP1 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110609 09:42:04
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) d...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) d...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) de...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) de...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak big...
*** run error ***
sqlCode SQLCODE not numeric
sqlCode SQLCODE sqlState=SQLSTATE
    errMC=SQLERRMC
    warnings= 0=SQLWARN.0 1=SQLWARN.1 2=SQLWARN.2 3=SQLWARN.3 4=SQLWARN.4 5=SQLW
    errD.1=SQLERRD.1 2=SQLERRD.2 3=SQLERRD.3
    errD.4=SQLERRD.4 5=SQLERRD.5 6=SQLERRD.6
stmt =  execSql call GDB9998A.PATHP1 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110609 09:41:37
sqlCode 0: set current sqlid = 's100447'
sqlCode -204: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode -204: drop   procedure a540769.pathP2
sqlCode -204: drop   procedure a540769.pathP3
sqlCode -204: drop   procedure a540769.pathFak
sqlCode 0: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode 0: drop   procedure gdb9998.pathP2
sqlCode 0: drop   procedure gdb9998.pathP3
sqlCode 0: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20)) d...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20)) d...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60)) de...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60)) de...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak big...
*** run error ***
sqlCode SQLCODE not numeric
sqlCode SQLCODE sqlState=SQLSTATE
    errMC=SQLERRMC
    warnings= 0=SQLWARN.0 1=SQLWARN.1 2=SQLWARN.2 3=SQLWARN.3 4=SQLWARN.4 5=SQLW
    errD.1=SQLERRD.1 2=SQLERRD.2 3=SQLERRD.3
    errD.4=SQLERRD.4 5=SQLERRD.5 6=SQLERRD.6
stmt =  execSql call GDB9998A.PATHP1 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110608 14:36:41
sqlCode 0: set current sqlid = 's100447'
sqlCode 0: drop   procedure a540769A.pathP1
sqlCode -204: drop   procedure a540769B.pathP1
sqlCode 0: drop   procedure a540769.pathP2
sqlCode 0: drop   procedure a540769.pathP3
sqlCode 0: drop   procedure a540769.pathFak
sqlCode -204: drop   procedure gdb9998A.pathP1
sqlCode -204: drop   procedure gdb9998B.pathP1
sqlCode -204: drop   procedure gdb9998.pathP2
sqlCode -204: drop   procedure gdb9998.pathP3
sqlCode -204: drop   procedure gdb9998.pathFak
sqlCode 0: create procedure gdb9998A.pathP1(out scNa varchar(20))      ...
sqlCode 0: create procedure gdb9998B.pathP1(out scNa varchar(20))      ...
sqlCode 0: create procedure gdb9998.pathP2(out scNa varchar(60))       ...
sqlCode 0: create procedure gdb9998.pathp3(out scNa varchar(60))       ...
SQLCODE = 440, WARNING:  NO PROCEDURE BY THE NAME PATHFAK HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql create procedure gdb9998.pathFak(in i int, out fak bigInt)
sqlCode 440: create procedure gdb9998.pathFak(in i int, out fak bigInt)  ...
--- called GDB9998A.PATHP1, sqlCode 0
  parm 1 o SCNA = gdb9998A.pathP1
sqlCode 0: call gdb9998A.pathP1()
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: alter procedure gdb9998.pathP2                              ...
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: alter procedure gdb9998.pathP3                              ...
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998A.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: set current path gdb9998Y, gdb9998A, gdb9998B
sqlCode 0: set current schema gdb9998A
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
sqlCode 0: commit
--- called GDB9998.PATHP2, sqlCode 0
  parm 1 o SCNA = gdb9998.pathP2: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP2()
--- called GDB9998.PATHP3, sqlCode 0
  parm 1 o SCNA = gdb9998.pathp3: ?=gdb9998B.pathP1, A=gdb9998A.pathP1, B=gdb9
sqlCode 0: call gdb9998.pathP3()
sqlCode 0: commit
sqlCode 0: drop procedure gdb9998B.pathP1
sqlCode 0: commit
*** run error ***
SQLCODE = -440: NO PROCEDURE BY THE NAME GDB9998B.PATHP1
    HAVING COMPATIBLE ARGUMENTS WAS FOUND IN THE CURRENT PATH
stmt =  execSql call GDB9998.PATHP3 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110525 17:44:25
}¢--- A540769.WK.SQL(STPRREBI) cre=2011-06-27 mod=2016-11-03-09.26.26 A540769 ---
$#@
call sqlConnect DBAF
if 1 then $@¢
$@do forever $@¢
    call sqlStmtsOpt 'call gdb9998.reBi()'
    say 'called gdb9998.reBi()'
    call sleep 10
    call sqlStmtsOpt 'commit'
    $!
$! else $@¢
$<=¢
set current sqlid = 's100447' ;
drop   procedure gdb9998.ReBi;
terminator    } ;
create procedure gdb9998.reBi()
        reads sql data
        dynamic result sets 1
    begin
    declare prCu cursor with return for
        select *
            from A540769.twk982a1
            fetch first 10 rows only
        ;
    open prCu;
    end
}
terminator ; }
commit;
call gdb9998.reBi();
commit;
$! call sqlStmtsOpt
$!
$#out                                              20110627 11:32:34
--- called GDB9998.REBI, sqlCode 466
  dynamic result set 1 PRCU locator=1
--- begin of dynamic result set 1=PRCU of GDB9998.REBI
T TEXT
0 text 10002 TIMESTAMP
0 text 10005 STARTNUMMER
0 text 10008 DATUM_ZEIT
0 text 10011 ZIELNUMMER
0 text 10014 ANRUFER
0 text 10017 KATEGORIE_ID
0 text 1002 PREDNO
0 text 10020 KATEGORIE_ID
0 text 10023 NAME
0 text 10026 KUNDENNAME
--- 10 rows fetched from dynamic result set 1=PRCU of GDB9998.REBI
sqlCode 466: call gdb9998.reBi()
sqlCode 0: commit
}¢--- A540769.WK.SQL(STPRREBK) cre=2011-06-27 mod=2011-06-27-11.14.34 A540769 ---
select * from sysibm.sysPackDep
     where                    dName = 'REBI'
alter table A540769.twk982a1
-- generating rebinds in DBAF at 11:08:32 27/06/11 for A540769
-- for 0 tablespace, 1 table, 0 view, 0 index, 0 alias, 0 synonym
--     table      A540769.TWK982A1
}¢--- A540769.WK.SQL(STPRSEL) cre=2011-05-30 mod=2011-06-08-14.37.54 A540769 ---
$<=¢
set current sqlid = 's100447' ;
drop   procedure A540769.selP1;
drop   procedure A540769.selP2;
drop   procedure gdb9998.selP1;
drop   procedure gdb9998.selP2;
terminator    } ;
create procedure gdb9998.selP1(in name varchar(20), out cnt int
                  , out vers varchar(20), out aPrm varchar(30))
        version v1 deterministic reads sql data
    begin
    declare sqlCode int default 0;
    declare exit handler for not found
        begin
        set aPrm = 'not found ' || char(sqlCode);
        end;
    select count(*), min(version) into cnt, vers
        from sysibm.sysRoutines r
        where r.name = selP1.name;
    select char(parm_count)  into aPrm
        from sysibm.sysRoutines r
        where r.name = selP1.name
        and   active = 'Y';
    end
}
terminator ; }
call gdb9998.selP1(SELP1,  :c, :v, :p);
call gdb9998.selP1(VERSP1, :c, :v, :p);
call gdb9998.selP1(xxxYY,  :c, :v, :p);
commit;
$! call sqlStmtsOpt
$#out                                              20110608 14:37:51
sqlCode 0: set current sqlid = 's100447'
sqlCode 0: drop   procedure A540769.selP1
sqlCode -204: drop   procedure A540769.selP2
sqlCode -204: drop   procedure gdb9998.selP1
sqlCode -204: drop   procedure gdb9998.selP2
sqlCode 0: create procedure gdb9998.selP1(in name varchar(20), out cnt ...
--- called GDB9998.SELP1, sqlCode 0
  parm 1 i NAME = SELP1
  parm 2 o CNT $c = 1
  parm 3 o VERS $v = V1
  parm 4 o APRM $p = 4
sqlCode 0: call gdb9998.selP1(SELP1,  :c, :v, :p)
--- called GDB9998.SELP1, sqlCode 0
  parm 1 i NAME = VERSP1
  parm 2 o CNT $c = 2
  parm 3 o VERS $v = V1
  parm 4 o APRM $p = 1
sqlCode 0: call gdb9998.selP1(VERSP1, :c, :v, :p)
--- called GDB9998.SELP1, sqlCode 0
  parm 1 i NAME = xxxYY
  parm 2 o CNT $c = 0
  parm 3 o VERS $v =
  parm 4 o APRM $p = not found 100
sqlCode 0: call gdb9998.selP1(xxxYY,  :c, :v, :p)
sqlCode 0: commit
$#out                                              20110603 18:17:24
sqlCode 0: set current sqlid = 's100447'
sqlCode 0: drop   procedure gdb9998.selP1
sqlCode -204: drop   procedure gdb9998.selP2
sqlCode 0: create procedure gdb9998.selP1(in name varchar(20), out cnt ...
--- called gdb9998.SELP1, sqlCode 0
  parm 1 i NAME = SELP1
  parm 2 o CNT $c = 1
  parm 3 o VERS $v = V1
  parm 4 o APRM $p = 4
sqlCode 0: call gdb9998.selP1(SELP1,  :c, :v, :p)
--- called gdb9998.SELP1, sqlCode 0
  parm 1 i NAME = VERSP1
  parm 2 o CNT $c = 2
  parm 3 o VERS $v = V1
  parm 4 o APRM $p = 1
sqlCode 0: call gdb9998.selP1(VERSP1, :c, :v, :p)
--- called gdb9998.SELP1, sqlCode 0
  parm 1 i NAME = xxxYY
  parm 2 o CNT $c = 0
  parm 3 o VERS $v =
  parm 4 o APRM $p = not found 100
sqlCode 0: call gdb9998.selP1(xxxYY,  :c, :v, :p)
sqlCode 0: commit
$#out                                              20110530 11:13:45
}¢--- A540769.WK.SQL(STPRVERS) cre=2011-05-24 mod=2011-06-08-20.13.48 A540769 ---
$>.fEdit('~wk.texv(out)')
$<=¢
set current sqlid = 's100447' ;
drop   procedure A540769.versP1;
drop   procedure A540769.versP2;
drop   procedure gdb9998.versP1;
drop   procedure gdb9998.versP2;
terminator    } ;
create procedure gdb9998.versP1(out ve char(4))
        version v1 deterministic contains sql
    set ve = 'p1V1'
}
alter  procedure gdb9998.versP1 add version v2 (out ve char(4))
                   deterministic contains sql
    set ve = 'p1V2'
}
create procedure gdb9998.versP2(in ci varchar(100), out da date,
                            out ve varchar(100))
        version v1
        deterministic contains sql
    begin
    set da = current date + 1 day;
    call gdb9998.versP1(ve);
    set ve = 'p2 v1 - curr=''' || current routine version|| ''', '||ve;

    end
}
alter  procedure gdb9998.versP2 add version v2
        (in ci varchar(100), out da date,
                            out ve varchar(100))
        deterministic contains sql
    begin
    set da = current date + 2 day;
    call gdb9998.versP1(ve);
    set ve = 'p2 v2 - curr=''' || current routine version||''', '||ve;
    end
}
alter  procedure gdb9998.versP2 add version v3
        (in ci varchar(100), out da date,
                            out ve varchar(100))
        deterministic contains sql
    begin
    set da = current date + 3 day;
    call gdb9998.versP1(ve);
    set ve = 'p2 v3 - curr=''' || current routine version || ''', '||ve;
    end
}
terminator ; }
$=eins=wie geht es dir?
call gdb9998.versP2(wie geht es Dir Konstäntchen? oder , :res,);
set current routine version v1;
call gdb9998.versP2(wie geht es Dir v1? , :res,);
set current routine version v2;
call gdb9998.versP2(wie geht es Dir v2? , :res,);
set current routine version v3;
call gdb9998.versP2(wie geht es Dir v3? , :res,);
set current routine version = '';
call gdb9998.versP2(wie geht es Dir v empty? , :res,);
alter  procedure gdb9998.versP2 activate version v3;
call gdb9998.versP2(wie geht es Dir Konstäntchen? oder , :res,);
set current routine version v1;
call gdb9998.versP2(wie geht es Dir v1? , :res,);
set current routine version v2;
call gdb9998.versP2(wie geht es Dir v2? , :res,);
set current routine version v3;
call gdb9998.versP2(wie geht es Dir v3? , :res,);
set current routine version = '';
call gdb9998.versP2(wie geht es Dir v empty? , :res,);
alter  procedure gdb9998.versP2 activate version v2;
call gdb9998.versP2(wie geht es Dir Konstäntchen? oder , :res,);
set current routine version v1;
call gdb9998.versP2(wie geht es Dir v1? , :res,);
set current routine version v2;
call gdb9998.versP2(wie geht es Dir v2? , :res,);
set current routine version v3;
call gdb9998.versP2(wie geht es Dir v3? , :res,);
set current routine version = '';
call gdb9998.versP2(wie geht es Dir v empty? , :res,);
set current routine version = 'V9';
call gdb9998.versP2(wie geht es Dir v empty? , :res,);
--call gdb9998.P1(?, ?, ?);
--call gdb9998.P1(WIE geht es dir konstante? , :zwei, :res);
commit;
$! call sqlStmtsOpt
$#out                                              20110608 20:11:21
*** run error ***
sqlCode SQLCODE not numeric
sqlCode SQLCODE sqlState=SQLSTATE
    errMC=SQLERRMC
    warnings= 0=SQLWARN.0 1=SQLWARN.1 2=SQLWARN.2 3=SQLWARN.3 4=SQLWARN.4 5=SQLW
    errD.1=SQLERRD.1 2=SQLERRD.2 3=SQLERRD.3
    errD.4=SQLERRD.4 5=SQLERRD.5 6=SQLERRD.6
stmt =  execSql call GDB9998.VERSP2 using descriptor :M.SQLSTMTCALL
with M.SQLSTMTCALL = M.SQLSTMTCALL
$#out                                              20110608 14:38:06
$#out                                              20110603 18:07:48
$#out                                              20110530 09:55:59
$#out                                              20110524 17:27:35
$#out                                              20110524 17:26:03
$#out                                              20110524 17:21:09
$#out                                              20110524 17:03:44
}¢--- A540769.WK.SQL(STPRWSH) cre=2016-06-07 mod=2016-06-08-12.50.08 A540769 ---
set current sqlid = 'S100447' ;
drop   procedure qz91WshTst1.proc1;
commit;
terminator} ;
create procedure qz91WshTst1.proc1
       (in a1 varchar(20), inOut cnt int, out res varchar(20))
        version v1 not deterministic reads sql data
        dynamic result sets 3
    begin
    declare prC1 cursor with return for
        select 'cur1' cur, name, colType, length, left(a1, 5) a1
        from sysibm.sysColumns
        where tbCreator = 'SYSIBM' and tbName = 'SYSTABLES'
        order by colNo
        fetch first 1 rows only;
    declare prC2 cursor with return for
        select 'cur2' cur, name, colType, left(a1, 5) a2
        from sysibm.sysColumns
        where tbCreator = 'SYSIBM' and tbName = 'SYSTABLES'
        order by colNo
        fetch first 3 rows only;
    declare prC3 cursor with return for
        select 'cur3' cur, name, left(a1, 5) a3
        from sysibm.sysColumns
        where tbCreator = 'SYSIBM' and tbName = 'SYSTABLES'
        order by colNo
        fetch first 3 rows only;
    if cnt >= 3 or cnt = -3 then
        open prC3;
        end if;
    if cnt >= 2 or cnt = -2 then
        open prC2;
        end if;
    if cnt >= 1 or cnt = -1 then
        open prC1;
        end if;
    set res = strip(left(a1, 10)) || ' ' || cnt;
    set cnt = cnt + 1;
/*  declare exit handler for not found
        begin
        set aPrm = 'not found ' || char(sqlCode);
        end;
    select count(*), min(version) into cnt, vers
        from sysibm.sysRoutines r
        where r.name = selP1.name;
    select char(parm_count)  into aPrm
        from sysibm.sysRoutines r
        where r.name = selP1.name
        and   active = 'Y';
*/  end
}
terminator; }
call qz91WshTst1.proc1('arg1istLängeroder',   123
       , und                             bis);
rollback;
call qz91WshTst1.proc1('callEinsP1',  :c, :v);
call gdb9998.selP1(VERSP1, :c, :v, :p);
call gdb9998.selP1(xxxYY,  :c, :v, :p);
rollback;
}¢--- A540769.WK.SQL(STPR1) cre=2012-05-22 mod=2012-05-23-12.03.42 A540769 -----
$#@
$*(
set current sqlid = 'S100447';
create procedure A540769.stpr2(
          in  c1 char(4), in i2 int, out o3 varchar(30))
        version v1 deterministic contains sql
    set o3 = 'out from c1=' || c1 || ', i2=' || strip(char(i2)) || '?'
;
$*)
call sqlConnect dbaf
p1 = 'vier'
p2 = 987655
p3 = left('vorher', 30)'xyz'
say 'p1='p1', p2='p2', p3='p3
call sqlExec 'call A540769.stpr2(:p1, :p2, :p3)'
say 'p1='p1', p2='p2', p3='p3
call sqlExImm 'call A540769.stpr2(:p1, :p2, :p3)'
say 'p1='p1', p2='p2', p3='p3
sql = 'call A540769.stpr2(?, ?, ?)'
call sqlExec 'prepare s1 from :sql'
call sqlExec 'describe input s1 into :m.ii'
say m.ii.sqld
do dx=1 to m.ii.sqld
    say dx m.ii.sqlName.dx m.ii.sqlType.dx
    end
$#out                                              20120522 17:10:52
*** run error ***
SQLCODE = -312: VARIABLE P1 IS NOT DEFINED OR NOT USABLE
src call A540769.stpr2(:p1, :p2, :p3)
  >    >>>pos 21 of 33>>>
stmt = execute immediate :ggSrc
with immediate :ggSrc = call A540769.stpr2(:p1, :p2, :p3)
$#out                                              20120522 16:58:08
*** run error ***
SQLCODE = -084: UNACCEPTABLE SQL STATEMENT
src call A540769.stpr2(?, ?, ?)
  > <<<pos 1 of 27<<<
stmt = prepare s1 from :sql
with from :sql = call A540769.stpr2(?, ?, ?)
subsys = M.call A540769.stpr2(?, ?, ?).CONHOST/M.call A540769.stpr2(?, ?, ?).CON
$#out                                              20120522 16:57:12
*** run error ***
SQLCODE = -104: ILLEGAL SYMBOL "?". SOME SYMBOLS THAT MIGHT
    BE LEGAL ARE: <IDENTIFIER>
src call A540769.stpr2(:?, :?, :?)
  >    >>>pos 21 of 30>>>
stmt = prepare s1 from :sql
with from :sql = call A540769.stpr2(:?, :?, :?)
subsys = M.call A540769.stpr2(:?, :?, :?).CONHOST/M.call A540769.stpr2(:?, :?, :
$#out                                              20120522 16:32:07
$#out                                              20120522 16:31:07
SQLCODE = 000,  SUCCESSFUL EXECUTION
warnings  1=W var truncated
stmt =  execSql call A540769.stpr2(:p1, :p2, :p3)
with  :p1 = vier
      :p2 = 987655
      :p3 = out fr
$#out
}¢--- A540769.WK.SQL(SU01ORI) cre= mod= ----------------------------------------

.CONNECT DBOL

--#SET TERMINATOR ;


 SET CURRENT SQLID = 'S100447';


    CREATE STOGROUP "GSMS    "
          VOLUMES
          ("*     "
          )
    VCAT DBOL;


 SET CURRENT SQLID = 'S100447';


    CREATE DATABASE SU01A1P
           BUFFERPOOL BP2
           INDEXBP    BP1
           STOGROUP "GSMS    "
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCMD
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCMD
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CMDLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CMDMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CMDJOB# INTEGER
  WITH DEFAULT NULL
        ,CMDJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CMDRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CMDCMD CHARACTER(124) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCMD
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCMD
         IS 'JCL - COMMAND Statements';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.CMDLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.CMDMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.CMDJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.CMDJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.CMDRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMD.CMDCMD
         IS 'Command            ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCMD0
           ON OA1P.XXRTCMD
          (CMDJN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCMD1
           ON OA1P.XXRTCMD
          (CMDMEMB ASC
          ,CMDLIB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCMT
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCMT
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CMTLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CMTMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CMTJOB# INTEGER
  WITH DEFAULT NULL
        ,CMTJOBN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CMTRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CMTLINE CHARACTER(80) FOR SBCS DATA
                                                        NOT NULL
        ,CMTORD# INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSCMT
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCMT
         IS 'JCL - Comment Cards';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.CMTLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.CMTMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.CMTJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.CMTJOBN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.CMTRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.CMTLINE
         IS 'Comment Card       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCMT.CMTORD#
         IS 'JCL Line Number    ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCMT0
           ON OA1P.XXRTCMT
          (CMTJOBN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCMT1
           ON OA1P.XXRTCMT
          (CMTMEMB ASC
          ,CMTLIB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCX1
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCX1
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX1CTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX1TAB CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX1GROUP CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX1MEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX1JOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX1DATETIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CX1ELHHMMSS CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CX1ELAPSED INTEGER
  WITH DEFAULT NULL
        ,CX1CPUTIME INTEGER
  WITH DEFAULT NULL
        ,CX1NODEID CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,CX1LASTELHHMMSS CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CX1LASTELAPSED INTEGER
  WITH DEFAULT NULL
        ,CX1LASTSTART TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CX1LASTEND TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSCX1
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCX1
         IS 'CTM - Average Job Duration';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1CTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1TAB
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1GROUP
         IS 'GROUP              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1MEMNAME
         IS 'MEMNAME            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1JOBNAME
         IS 'JOBNAME            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1DATETIME
         IS '1st Run Start Time ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1ELHHMMSS
         IS 'Avg. Dur. (HHMMSS) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1ELAPSED
         IS 'Avg. Dur. (Sec.)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1CPUTIME
         IS 'CPUTIME (Sek.)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1NODEID
         IS 'NODEID             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1LASTELHHMMSS
         IS 'Last Dur. (HHMMSS) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1LASTELAPSED
         IS 'Last Dur. (Sec.)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1LASTSTART
         IS 'Last Job Start Time';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX1.CX1LASTEND
         IS 'Last Job End Time  ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCX10
           ON OA1P.XXRTCX1
          (CX1MEMNAME ASC
          ,CX1TAB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCX11
           ON OA1P.XXRTCX1
          (CX1DATETIME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCX2
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCX2
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX2ID INTEGER
  WITH DEFAULT NULL
        ,CX2ODATE DATE
  WITH DEFAULT NULL
        ,CX2FIXTIME TIME
  WITH DEFAULT NULL
        ,CX2ELAPSED INTEGER
  WITH DEFAULT NULL
        ,CX2PLANSTART TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CX2PLANEND TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CX2MEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX2TAB CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX2CTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX2JOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCX2
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCX2
         IS 'CTM - Forecast';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2ID
         IS 'ID                 ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2ODATE
         IS 'Order Date         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2FIXTIME
         IS 'Time               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2ELAPSED
         IS 'Planned Dur.(Sek.) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2PLANSTART
         IS 'Planned Start      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2PLANEND
         IS 'Planned End        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2MEMNAME
         IS 'MEMNAME/Jobname    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2TAB
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2CTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX2.CX2JOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCX2
           ON OA1P.XXRTCX2
          (CX2MEMNAME ASC
          ,CX2TAB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCX3
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCX3
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX3CTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX3LDATETIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CX3URGENT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CX3TYPE CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CX3MSGID CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,CX3MEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX3ORDERID CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,CX3ODATE DATE
  WITH DEFAULT NULL
        ,CX3MESSAGE CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CX3JOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX3NODEID CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,CX3TASKTYPE CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CX3USER CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CX3JOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CX3GROUP CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX3JOBID CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,CX3ZJOBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCX3
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCX3
         IS 'CTM - IOALOG';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3CTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3LDATETIME
         IS 'Date/Time          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3URGENT
         IS 'Urgent (z/OS)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3TYPE
         IS 'TYPE/SUBSYS        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3MSGID
         IS 'MSGID              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3MEMNAME
         IS 'MEMNAME            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3ORDERID
         IS 'Order-ID           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3ODATE
         IS 'Order-Date         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3MESSAGE
         IS 'Message            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3JOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3NODEID
         IS 'Nodeid             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3TASKTYPE
         IS 'Tasktype           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3USER
         IS 'Userid             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3JOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3GROUP
         IS 'Group              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3JOBID
         IS 'CTM JobID (z/OS)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX3.CX3ZJOBNAME
         IS 'Jobname (z/OS)     ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCX30
           ON OA1P.XXRTCX3
          (CX3MEMNAME ASC
          ,CX3JOBNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCX31
           ON OA1P.XXRTCX3
          (CX3LDATETIME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCX4
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCX4
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX4MEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX4START TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CX4END TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CX4STAT CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CX4ERRC CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,CX4ELHHMMSS CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CX4ELAPSED INTEGER
  WITH DEFAULT NULL
        ,CX4CTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX4TAB CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX4GROUP CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX4APPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX4ORDERID CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,CX4ODATE DATE
  WITH DEFAULT NULL
        ,CX4JOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX4NODEID CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,CX4TASKTYPE CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CX4USER CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CX4JOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CX4JOBID CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,CX4ZJOBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCX4
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCX4
         IS 'CTM - Job History';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4MEMNAME
         IS 'MEMNAME            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4START
         IS 'Job Start Time     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4END
         IS 'Job End Time       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4STAT
         IS 'Status             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4ERRC
         IS 'Error Code         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4ELHHMMSS
         IS 'ELAPSED (HHMMSS)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4ELAPSED
         IS 'ELAPSED (Sek.)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4CTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4TAB
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4GROUP
         IS 'Group              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4APPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4ORDERID
         IS 'Order-ID           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4ODATE
         IS 'Order-Date         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4JOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4NODEID
         IS 'Nodeid             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4TASKTYPE
         IS 'Tasktype           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4USER
         IS 'Userid             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4JOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4JOBID
         IS 'CTM JobID (z/OS)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX4.CX4ZJOBNAME
         IS 'Jobname (z/OS)     ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCX40
           ON OA1P.XXRTCX4
          (CX4MEMNAME ASC
          ,CX4TAB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCX41
           ON OA1P.XXRTCX4
          (CX4START ASC
          ,CX4END ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCX5
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCX5
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX5CTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CX5TABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX5GROUP CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX5APPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX5MEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX5JOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CX5JOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CX5LINE INTEGER
                                                        NOT NULL
        ,CX5CONTENT CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCX5
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCX5
         IS 'CTM - Job Script/JCL';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5CTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5TABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5GROUP
         IS 'Group              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5APPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5MEMNAME
         IS 'MEMNAME            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5JOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5JOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5LINE
         IS 'Line Number        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCX5.CX5CONTENT
         IS 'Line content       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCX5
           ON OA1P.XXRTCX5
          (CX5MEMNAME ASC
          ,CX5TABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXB
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXB
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXBKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXBKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXBAPPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXBKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXBKEYTYP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXBKEYNUM INTEGER
                                                        NOT NULL
        ,CXBMEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXBSCDTAG CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXBSCDTAGNUM CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CXBSCDTREL CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXBDATES CHARACTER(48) FOR SBCS DATA
                                                        NOT NULL
        ,CXBDAYS CHARACTER(160) FOR SBCS DATA
                                                        NOT NULL
        ,CXBDCAL CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXBWDAYS CHARACTER(53) FOR SBCS DATA
                                                        NOT NULL
        ,CXBWCAL CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXBRELATION CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXBMONTHS CHARACTER(12) FOR SBCS DATA
                                                        NOT NULL
        ,CXBCONFCAL CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXBSHIFT CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,CXBRETRO CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXBMAXWAIT INTEGER
  WITH DEFAULT NULL
        ,CXBJOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CXBJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXBDAILYNAM CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXB
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXB
         IS 'CTM - Scheduling';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBKEYCTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBAPPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBKEYTYP
         IS 'Type (Job/Table)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBMEMNAME
         IS 'MEMNAME/Filename   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBSCDTAG
         IS 'Schedule Tag / RBC ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBSCDTAGNUM
         IS 'Current Tag Number ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBSCDTREL
         IS 'Schedule Tag Rel   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBDATES
         IS 'DATES              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBDAYS
         IS 'Month-DAYS         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBDCAL
         IS 'Calendar           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBWDAYS
         IS 'Week-Days          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBWCAL
         IS 'WEEK-Calendar      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBRELATION
         IS 'Relation days/wdays';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBMONTHS
         IS 'Months             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBCONFCAL
         IS 'Confcal            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBSHIFT
         IS 'Shift              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBRETRO
         IS 'Retroactive sel.   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBMAXWAIT
         IS 'Maxwait            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBJOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXB.CXBDAILYNAM
         IS 'DAILYNAM           ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXB0
           ON OA1P.XXRTCXB
          (CXBMEMNAME ASC
          ,CXBKEYTABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXB1
           ON OA1P.XXRTCXB
          (CXBKEYNUM ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXD
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXD
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXDKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXDKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXDAPPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXDKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXDKEYTYP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXDKEYNUM INTEGER
                                                        NOT NULL
        ,CXDMEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXDCONDNAME CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXDSOCDATE CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,CXDOPTION CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXDOWNER CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXDTASKTYPE CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,CXDGROUP CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXDDESC CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXDJOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CXDJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXD
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXD
         IS 'CTM - IN-/OUT-Conditions';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDKEYCTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDAPPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDKEYTYP
         IS 'Type (Job/Table)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDMEMNAME
         IS 'MEMNAME/Filename   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDCONDNAME
         IS 'Condition-Name     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDSOCDATE
         IS 'Occurrence-Date    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDOPTION
         IS 'Option             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDOWNER
         IS 'Owner              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDTASKTYPE
         IS 'Tasktype           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDGROUP
         IS 'Group              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDDESC
         IS 'Description        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDJOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXD.CXDJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXD0
           ON OA1P.XXRTCXD
          (CXDMEMNAME ASC
          ,CXDKEYTABLE ASC
          ,CXDKEYNUM ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXD1
           ON OA1P.XXRTCXD
          (CXDCONDNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXG
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXG
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXGKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXGKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXGAPPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGKEYTYP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXGKEYNUM INTEGER
                                                        NOT NULL
        ,CXGMEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGNODEID CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,CXGMEMLIB CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXGOWNER CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXGAUTHOR CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGTASKTYPE CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCYCLIC CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXGGROUP CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGDESC CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXGOVRLIB CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXGADJCOND CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXGDOCMEM CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGDOCLIB CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXGTIMFROM TIME
  WITH DEFAULT NULL
        ,CXGTIMUNTIL CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,CXGPRIOR CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,CXGDUEOUT TIME
  WITH DEFAULT NULL
        ,CXGCONFIRM CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXGMAXRERUN INTEGER
  WITH DEFAULT NULL
        ,CXGMAXRUNS INTEGER
  WITH DEFAULT NULL
        ,CXGRERUNMEM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXGINTERVAL CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CXGSYSOUTOP CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXGSYSOPARM CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCRITICAL CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXGDATEMEM CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXGPLATFORM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCMDLINE CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXGMAXDAYS INTEGER
  WITH DEFAULT NULL
        ,CXGNODEGRP CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,CXGAJF CHARACTER(13) FOR SBCS DATA
                                                        NOT NULL
        ,CXGUNKOWN CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCTBSTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCTBSNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCTBSARGS CHARACTER(45) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCTBETYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCTBENAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCTBEARGS CHARACTER(45) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCATEGORY CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXGMINIMUM CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,CXGPDS CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXGJOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CXGCDATE DATE
  WITH DEFAULT NULL
        ,CXGCTIME TIME
  WITH DEFAULT NULL
        ,CXGCUSER CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGLDATE DATE
  WITH DEFAULT NULL
        ,CXGLTIME TIME
  WITH DEFAULT NULL
        ,CXGLUSER CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXGSCHENV CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,CXGSYSID CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,CXGRETDAYS INTEGER
  WITH DEFAULT NULL
        ,CXGRETGEN INTEGER
  WITH DEFAULT NULL
        ,CXGAUTOARCHIVE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXGSYSDB CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXGSTARTENDCYCIND CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXGPARENTTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXG
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXG
         IS 'CTM - Jobdefinitions';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGKEYCTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGAPPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGKEYTYP
         IS 'Type (Job/Table)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGMEMNAME
         IS 'MEMNAME/Filename   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGNODEID
         IS 'Nodeid             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGMEMLIB
         IS 'Library            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGOWNER
         IS 'Owner              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGAUTHOR
         IS 'Author             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGTASKTYPE
         IS 'Tasktype           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCYCLIC
         IS 'Cyclic             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGGROUP
         IS 'Group              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGDESC
         IS 'Description        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGOVRLIB
         IS 'Overriding Library ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGADJCOND
         IS 'Adjust Condition   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGDOCMEM
         IS 'Doc-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGDOCLIB
         IS 'Doc-Library        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGTIMFROM
         IS 'Time From          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGTIMUNTIL
         IS 'Time Until         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGPRIOR
         IS 'Priority           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGDUEOUT
         IS 'Time Due-Out       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCONFIRM
         IS 'Confirm            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGMAXRERUN
         IS 'Max Rerun          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGMAXRUNS
         IS 'Max Runs           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGRERUNMEM
         IS 'Rerun-Member       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGINTERVAL
         IS 'Interval           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGSYSOUTOP
         IS 'Sysout Option      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGSYSOPARM
         IS 'Sysout Parm        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCRITICAL
         IS 'Critical           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGDATEMEM
         IS 'Datemem            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGPLATFORM
         IS 'Platform           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCMDLINE
         IS 'CMDLINE            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGMAXDAYS
         IS 'Maxdays            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGNODEGRP
         IS 'Nodegroup          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGAJF
         IS 'AJFSONSTR          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGUNKOWN
         IS 'Unknowntime        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCTBSTYPE
         IS 'CTB Start Type     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCTBSNAME
         IS 'CTB Start Name     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCTBSARGS
         IS 'CTB Start Args     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCTBETYPE
         IS 'CTB End Type       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCTBENAME
         IS 'CTB End Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCTBEARGS
         IS 'CTB End Args       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCATEGORY
         IS 'CTD Category       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGMINIMUM
         IS 'Minimum tracks     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGPDS
         IS 'PDS                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGJOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCDATE
         IS 'Create Date        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCTIME
         IS 'Create Time        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGCUSER
         IS 'Create User        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGLDATE
         IS 'Last Update Date   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGLTIME
         IS 'Last Update Time   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGLUSER
         IS 'Last Update User   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGSCHENV
         IS 'SCHENV             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGSYSID
         IS 'System id          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGRETDAYS
         IS 'Num of Days to Keep';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGRETGEN
         IS 'Num of Generations ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGAUTOARCHIVE
         IS 'Autoarchive        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGSYSDB
         IS 'SYSDB              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGSTARTENDCYCIND
         IS 'Start/End Cyclic   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXG.CXGPARENTTABLE
         IS 'Parent Table       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXG0
           ON OA1P.XXRTCXG
          (CXGMEMNAME ASC
          ,CXGKEYTABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXG1
           ON OA1P.XXRTCXG
          (CXGKEYNUM ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXJ
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXJ
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXJLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXJMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXJJOB# INTEGER
  WITH DEFAULT NULL
        ,CXJVARNAME CHARACTER(63) FOR SBCS DATA
                                                        NOT NULL
        ,CXJVARVAL CHARACTER(62) FOR SBCS DATA
                                                        NOT NULL
        ,CXJDEFMEM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXJDEFDSN CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXJORIGIN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXJ
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXJ
         IS 'JCL - Control-M Variables';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.CXJLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.CXJMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.CXJJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.CXJVARNAME
         IS 'Variable Name      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.CXJVARVAL
         IS 'Substitution Value ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.CXJDEFMEM
         IS 'Defined in Member  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.CXJDEFDSN
         IS 'Defined in DSN     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXJ.CXJORIGIN
         IS 'Origin/Type        ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXJ
           ON OA1P.XXRTCXJ
          (CXJMEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXN
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXN
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXNKEYDMY CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXNPID INTEGER
  WITH DEFAULT NULL
        ,CXNSID INTEGER
  WITH DEFAULT NULL
        ,CXNCONDNAME CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXNOPTION CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSMEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSKEYTYP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSTASKTYPE CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSAPPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSGROUP CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSOWNER CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSDESC CHARACTER(80) FOR SBCS DATA
                                                        NOT NULL
        ,CXNKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSOCDATE CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,CXNDEP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXNSKEYNUM INTEGER
  WITH DEFAULT NULL
        ,CXNLINK CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXNJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXNNODEID CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,CXNPGMST CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXNPROCST CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXNCODES CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXNACTION CHARACTER(15) FOR SBCS DATA
                                                        NOT NULL
        ,CXNJOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CXNELHHMMSS CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CXNELAPSED INTEGER
  WITH DEFAULT NULL
        ,CXNSPARENTTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXNLASTELHHMMSS CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CXNLASTELAPSED INTEGER
  WITH DEFAULT NULL
        ,CXNLASTSTART TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,CXNLASTEND TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSCXN
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXN
         IS 'CTM - Job-Graphic';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNKEYDMY
         IS 'Dummy              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNPID
         IS 'Pred-ID            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSID
         IS 'Succ-ID            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNCONDNAME
         IS 'Condition Name     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNOPTION
         IS 'Option             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSMEMNAME
         IS 'MEMNAME/Filename   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSKEYTYP
         IS 'Job/Grp/Table/CTD  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSTASKTYPE
         IS 'Tasktype           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSAPPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSGROUP
         IS 'Group              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSOWNER
         IS 'Owner              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSDESC
         IS 'Description        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNKEYCTM
         IS 'CTM-System         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSOCDATE
         IS 'Occurrence-Date    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNDEP
         IS 'G=Global-Condition ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNLINK
         IS 'Linktype           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNNODEID
         IS 'Nodeid             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNPGMST
         IS 'PGMST              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNPROCST
         IS 'PROCST             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNCODES
         IS 'CODES              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNACTION
         IS 'Action             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNJOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNELHHMMSS
         IS 'Avg. Dur. (HHMMSS) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNELAPSED
         IS 'Avg. Dur. (Sec.)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNSPARENTTABLE
         IS 'Parent Table       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNLASTELHHMMSS
         IS 'Last Dur. (HHMMSS) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNLASTELAPSED
         IS 'Last Dur. (Sec.)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNLASTSTART
         IS 'Last Job Start Time';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXN.CXNLASTEND
         IS 'Last Job End Time  ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXN0
           ON OA1P.XXRTCXN
          (CXNSMEMNAME ASC
          ,CXNSKEYTABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXN1
           ON OA1P.XXRTCXN
          (CXNSID ASC
          ,CXNPID ASC
          ,CXNSKEYNUM ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXO
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE NO
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXO
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXOKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXOKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXOKEYTABLE CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXOKEYNUM INTEGER
                                                        NOT NULL
        ,CXOMEMNAME CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXOJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXOORDERTYP CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,CXOORDER CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,CXOMEMLIB CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXOORDERLIB CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXONODEID CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXO
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXO
         IS 'CTM - Userdaily';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOKEYCTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOMEMNAME
         IS 'Member/Jobname     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOORDERTYP
         IS 'Order-Typ          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOORDER
         IS 'Order              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOMEMLIB
         IS 'Library            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXOORDERLIB
         IS 'Order-Lib          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXO.CXONODEID
         IS 'Nodeid             ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXO0
           ON OA1P.XXRTCXO
          (CXOMEMNAME ASC
          ,CXOKEYTABLE ASC
          ,CXOORDERTYP ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE NO
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXO1
           ON OA1P.XXRTCXO
          (CXOKEYTABLE ASC
          ,CXOMEMNAME ASC
          ,CXOORDERTYP ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE NO
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXP
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXP
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXPKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXPKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXPAPPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXPKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXPKEYTYP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXPKEYNUM INTEGER
                                                        NOT NULL
        ,CXPMEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXPSTEPR CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,CXPFPGM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPFPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPTPGM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPTPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPSTMT CHARACTER(132) FOR SBCS DATA
                                                        NOT NULL
        ,CXPPGMST CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPPROCST CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPCODES CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXPANDOR CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXPACTION CHARACTER(15) FOR SBCS DATA
                                                        NOT NULL
        ,CXPCOND CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXPDATER CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,CXPOPT CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXPTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXPJOB CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXPDATE CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,CXPLIBR CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXPMRER CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXPRERUNM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPINTERV CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,CXPVAR CHARACTER(63) FOR SBCS DATA
                                                        NOT NULL
        ,CXPVALUE CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXPDEST CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,CXPURGENCY CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXPMSG CHARACTER(70) FOR SBCS DATA
                                                        NOT NULL
        ,CXPSOPT CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXPPRM CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXPFRM CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXPFPGMIF CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPFPRCIF CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPTPGMIF CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPTPRCIF CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CXPJOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CXPJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXPMAILADDRESS CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXPMAILSUBJECT CHARACTER(99) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXP
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXP
         IS 'CTM - ON PGMST';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPKEYCTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPAPPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPKEYTYP
         IS 'Type (Job/Table)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPMEMNAME
         IS 'MEMNAME/Filename   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPSTEPR
         IS 'Step Range         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPFPGM
         IS 'From PGM           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPFPROC
         IS 'From PROC          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPTPGM
         IS 'To PGM             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPTPROC
         IS 'To PROC            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPSTMT
         IS 'Statement          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPPGMST
         IS 'ON-PGMST           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPPROCST
         IS 'PROCST             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPCODES
         IS 'Codes              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPANDOR
         IS 'And/Or             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPACTION
         IS 'Action (do cond,..)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPCOND
         IS 'Condion            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPDATER
         IS 'Dateref            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPOPT
         IS 'Add-/Delete-Option ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPTABLE
         IS 'Force-Table        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPJOB
         IS 'ForceJob           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPDATE
         IS 'ForceJob-Date      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPLIBR
         IS 'Library            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPMRER
         IS 'Max.rerun          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPRERUNM
         IS 'Rerun-Member       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPINTERV
         IS 'Interval           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPVAR
         IS 'Variable Name      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPVALUE
         IS 'Value              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPDEST
         IS 'Destination        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPURGENCY
         IS 'Urgency            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPMSG
         IS 'Message            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPSOPT
         IS 'Opt                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPPRM
         IS 'PRM (Sysout)       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPFRM
         IS 'FRM (From Clas)    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPFPGMIF
         IS 'IFRERUN From-Pgm   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPFPRCIF
         IS 'IFRERUN From-Prc   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPTPGMIF
         IS 'IFRERUN To-Pgm     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPTPRCIF
         IS 'IFRERUN To-Prc     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPJOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPMAILADDRESS
         IS 'Mail Recipient     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXP.CXPMAILSUBJECT
         IS 'Mail Subject       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXP0
           ON OA1P.XXRTCXP
          (CXPMEMNAME ASC
          ,CXPKEYTABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXP1
           ON OA1P.XXRTCXP
          (CXPKEYNUM ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXR
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXR
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXRKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXRKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXRAPPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXRKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXRKEYTYP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXRKEYNUM INTEGER
                                                        NOT NULL
        ,CXRMEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXRRESOURCE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXRSTATE CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXRQUANTITY INTEGER
  WITH DEFAULT NULL
        ,CXRTYPE CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,CXRJOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CXRJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXR
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXR
         IS 'CTM - Resources';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRKEYCTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRAPPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRKEYTYP
         IS 'Type (Job/Table)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRMEMNAME
         IS 'MEMNAME/Filename   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRRESOURCE
         IS 'Resource-Name      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRSTATE
         IS 'State/Mode         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRQUANTITY
         IS 'Quantity           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRTYPE
         IS 'Type (QR/CTL)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRJOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXR.CXRJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXR0
           ON OA1P.XXRTCXR
          (CXRMEMNAME ASC
          ,CXRKEYTABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXR1
           ON OA1P.XXRTCXR
          (CXRKEYNUM ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXS
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXS
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXSKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXSKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXSAPPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXSKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXSKEYTYP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXSKEYNUM INTEGER
                                                        NOT NULL
        ,CXSMEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXSSHTWHEN CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,CXSDEST CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,CXSURGENCY CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXSMSG CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXSSTIME CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,CXSEXPARM CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,CXSEXTYPE CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXSEXOPER CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXSJOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CXSJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXS
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXS
         IS 'CTM - Shout When';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSKEYCTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSAPPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSKEYTYP
         IS 'Type (Job/Table)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSMEMNAME
         IS 'MEMNAME/Filename   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSSHTWHEN
         IS 'Shout-When         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSDEST
         IS 'Destination        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSURGENCY
         IS 'Urgency            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSMSG
         IS 'Message            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSSTIME
         IS 'Shouttime          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSEXPARM
         IS 'EXECPARM           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSEXTYPE
         IS 'EXECTYPE           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSEXOPER
         IS 'EXECOPER           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSJOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXS.CXSJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXS
           ON OA1P.XXRTCXS
          (CXSMEMNAME ASC
          ,CXSKEYTABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXT
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXT
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXTKEYDMY CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXTPKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXTPKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXTPKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXTPID INTEGER
  WITH DEFAULT NULL
        ,CXTSKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXTSKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXTSKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXTSID INTEGER
  WITH DEFAULT NULL
        ,CXTDEP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXTSTABTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXTSPARENTTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXT
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXT
         IS 'CTM - Table-Graphic';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTKEYDMY
         IS 'Dummy              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTPKEYCTM
         IS 'P-CTM-System       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTPKEYLIB
         IS 'P-Schedule-Library ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTPKEYTABLE
         IS 'P-Table            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTPID
         IS 'P-ID               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTSKEYCTM
         IS 'CTM-System         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTSKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTSKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTSID
         IS 'ID                 ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTDEP
         IS 'Cond.Type (Global) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTSTABTYPE
         IS 'Table Type (Sub)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXT.CXTSPARENTTABLE
         IS 'Parent Table       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXT0
           ON OA1P.XXRTCXT
          (CXTSKEYTABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXT1
           ON OA1P.XXRTCXT
          (CXTPID ASC
          ,CXTSID ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSCXV
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTCXV
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATJOBID CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXVKEYCTM CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXVKEYLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,CXVAPPL CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXVKEYTABLE CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXVKEYTYP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CXVKEYNUM INTEGER
                                                        NOT NULL
        ,CXVMEMNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,CXVVARNAME CHARACTER(63) FOR SBCS DATA
                                                        NOT NULL
        ,CXVVARVAL CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,CXVVARSCOPE CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,CXVVARTYPE CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,CXVJOBNO CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,CXVJOBNAME CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSCXV
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTCXV
         IS 'CTM - Setvar';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.XXRDATJOBID
         IS 'XXR-Jobid          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVKEYCTM
         IS 'Subsys/Datacenter  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVKEYLIB
         IS 'Schedule-Library   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVAPPL
         IS 'Application        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVKEYTABLE
         IS 'Table              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVKEYTYP
         IS 'Type (Job/Table)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVKEYNUM
         IS 'Unique Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVMEMNAME
         IS 'MEMNAME/Filename   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVVARNAME
         IS 'Variable Name      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVVARVAL
         IS 'Value/Expr.        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVVARSCOPE
         IS 'Scope              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVVARTYPE
         IS 'Setvartype         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVJOBNO
         IS 'CTM Jobno          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTCXV.CXVJOBNAME
         IS 'DS-Jobname         ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXV0
           ON OA1P.XXRTCXV
          (CXVMEMNAME ASC
          ,CXVKEYTABLE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXCXV1
           ON OA1P.XXRTCXV
          (CXVKEYNUM ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD21
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD21
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D21SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D21COLLID CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D21PACKAGE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D21CONTOKEN CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,D21BQUALIFIER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D21BNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D21BTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD21
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD21
         IS 'DB2 - Cat: SYSPACKDEP';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.D21SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.D21COLLID
         IS 'CollID             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.D21PACKAGE
         IS 'Package            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.D21CONTOKEN
         IS 'ConToken (Hex)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.D21BQUALIFIER
         IS 'Creator/Database   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.D21BNAME
         IS 'Dependend Object   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD21.D21BTYPE
         IS 'Object Type        ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD210
           ON OA1P.XXRTD21
          (D21PACKAGE ASC
          ,D21COLLID ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD211
           ON OA1P.XXRTD21
          (D21BNAME ASC
          ,D21BQUALIFIER ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD22
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD22
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D22SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D22DBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D22TSNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D22TNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D22CREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D22TYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D22COLCOUNT INTEGER
  WITH DEFAULT NULL
        ,D22RECLENGTH INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD22
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD22
         IS 'DB2 - Cat: SYSTABLES';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.D22SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.D22DBNAME
         IS 'DataBase           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.D22TSNAME
         IS 'Tablespace         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.D22TNAME
         IS 'Table Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.D22CREATOR
         IS 'Creator            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.D22TYPE
         IS 'Type               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.D22COLCOUNT
         IS 'No. of Columns     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD22.D22RECLENGTH
         IS 'Max. Record Length ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD220
           ON OA1P.XXRTD22
          (D22TNAME ASC
          ,D22CREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD221
           ON OA1P.XXRTD22
          (D22TSNAME ASC
          ,D22DBNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD23
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD23
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D23SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D23DBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D23TSNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D23STATUS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D23NTABLES INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD23
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD23
         IS 'DB2 - Cat: SYSTABLESPACE';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD23.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD23.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD23.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD23.D23SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD23.D23DBNAME
         IS 'DataBase           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD23.D23TSNAME
         IS 'Tablespace         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD23.D23STATUS
         IS 'Status             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD23.D23NTABLES
         IS 'No. of Tables      ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD23
           ON OA1P.XXRTD23
          (D23TSNAME ASC
          ,D23DBNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD24
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD24
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D24SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D24LOCATION CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,D24PLAN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D24QUALIFIER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D24PLENTRIES INTEGER
  WITH DEFAULT NULL
        ,D24ISOLATION CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D24EXPLAN CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D24BOUNDBY CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D24BOUNDTS TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD24
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD24
         IS 'DB2 - Cat: SYSPLAN';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24LOCATION
         IS 'Location           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24PLAN
         IS 'Plan               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24QUALIFIER
         IS 'Qualifier          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24PLENTRIES
         IS 'PackList-Entries   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24ISOLATION
         IS 'Isolation Level    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24EXPLAN
         IS 'Explain Y/N        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24BOUNDBY
         IS 'BoundBy            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD24.D24BOUNDTS
         IS 'BoundTS            ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD24
           ON OA1P.XXRTD24
          (D24PLAN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD25
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD25
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D25SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D25PLAN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D25LOCATION CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,D25COLLID CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D25PACKAGE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D25TIMESTAMP TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD25
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD25
         IS 'DB2 - Cat: SYSPACKLIST';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.D25SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.D25PLAN
         IS 'Plan               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.D25LOCATION
         IS 'Location           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.D25COLLID
         IS 'CollID             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.D25PACKAGE
         IS 'Package            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD25.D25TIMESTAMP
         IS 'TimeStamp          ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD250
           ON OA1P.XXRTD25
          (D25PLAN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD251
           ON OA1P.XXRTD25
          (D25PACKAGE ASC
          ,D25COLLID ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD26
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD26
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D26SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D26PACKAGE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D26COLLID CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D26CONTOKEN CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,D26QUALIFIER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D26QUOTE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D26COMMA CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D26VALID CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D26HOSTLANG CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D26BINDTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,D26VERSION CHARACTER(122) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD26
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD26
         IS 'DB2 - Cat: SYSPACKAGE';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26PACKAGE
         IS 'Package            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26COLLID
         IS 'CollID             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26CONTOKEN
         IS 'ConToken           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26QUALIFIER
         IS 'Qualifier          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26QUOTE
         IS 'Quote              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26COMMA
         IS 'Comma              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26VALID
         IS 'Valid              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26HOSTLANG
         IS 'HostLanguage       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26BINDTIME
         IS 'BindTime           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD26.D26VERSION
         IS 'Version            ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD26
           ON OA1P.XXRTD26
          (D26PACKAGE ASC
          ,D26COLLID ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD27
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD27
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D27SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D27NAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D27CREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D27TBNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D27TBCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D27UNIQUERULE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D27COLCOUNT INTEGER
  WITH DEFAULT NULL
        ,D27CLUSTERING CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D27DBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D27INDEXSPACE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D27FIRSTKEYCARD INTEGER
  WITH DEFAULT NULL
        ,D27FULLKEYCARD INTEGER
  WITH DEFAULT NULL
        ,D27NLEAF INTEGER
  WITH DEFAULT NULL
        ,D27NLEVELS INTEGER
  WITH DEFAULT NULL
        ,D27BPOOL CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D27ERASERULE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D27SPACE INTEGER
  WITH DEFAULT NULL
        ,D27CLUSTERRATIO INTEGER
  WITH DEFAULT NULL
        ,D27FIRSTKEYCARDF FLOAT(53)
  WITH DEFAULT NULL
        ,D27FULLKEYCARDF FLOAT(53)
  WITH DEFAULT NULL
        ,D27STATSTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,D27ALTEREDTS TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD27
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD27
         IS 'DB2 - Cat: SYSINDEXES';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27NAME
         IS 'Index-Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27CREATOR
         IS 'Index-Creator      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27TBNAME
         IS 'Table-Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27TBCREATOR
         IS 'Table-Creator      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27UNIQUERULE
         IS 'Unique-Rule        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27COLCOUNT
         IS 'No. of Cols        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27CLUSTERING
         IS 'Clustering Y/N     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27DBNAME
         IS 'DBName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27INDEXSPACE
         IS 'IndexSpace         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27FIRSTKEYCARD
         IS 'FirstKeyCard       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27FULLKEYCARD
         IS 'FullKeyCard        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27NLEAF
         IS 'No. of Leafs       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27NLEVELS
         IS 'No. of Levels      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27BPOOL
         IS 'BPOOL              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27ERASERULE
         IS 'EraseRule          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27SPACE
         IS 'Space in KB        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27CLUSTERRATIO
         IS 'ClusterRatio       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27FIRSTKEYCARDF
         IS 'FirstKeyCard(Float)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27FULLKEYCARDF
         IS 'FullKeyCard (Float)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27STATSTIME
         IS 'StatsTime          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD27.D27ALTEREDTS
         IS 'Alter/Create TS    ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD270
           ON OA1P.XXRTD27
          (D27NAME ASC
          ,D27CREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD271
           ON OA1P.XXRTD27
          (D27TBNAME ASC
          ,D27TBCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD28
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD28
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D28SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D28IXNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D28IXCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D28COLNAME CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,D28COLNO INTEGER
  WITH DEFAULT NULL
        ,D28COLSEQ INTEGER
  WITH DEFAULT NULL
        ,D28ORDERING CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD28
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD28
         IS 'DB2 - Cat: SYSKEYS';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.D28SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.D28IXNAME
         IS 'Index-Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.D28IXCREATOR
         IS 'Index-Creator      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.D28COLNAME
         IS 'ColName            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.D28COLNO
         IS 'ColNo (Pos in Tab) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.D28COLSEQ
         IS 'ColSeq (Pos in Key)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD28.D28ORDERING
         IS 'Asc/Desc Order     ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD28
           ON OA1P.XXRTD28
          (D28IXNAME ASC
          ,D28IXCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD29
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD29
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D29SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D29PLNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D29PLCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D29DBRMNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D29QUOTE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D29COMMA CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D29HOSTLANG CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD29
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD29
         IS 'DB2 - Cat: SYSDBRM';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.D29SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.D29PLNAME
         IS 'Plan               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.D29PLCREATOR
         IS 'Plan-Creator       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.D29DBRMNAME
         IS 'DBRM               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.D29QUOTE
         IS 'Quote              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.D29COMMA
         IS 'Comma              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD29.D29HOSTLANG
         IS 'HostLanguage       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD29
           ON OA1P.XXRTD29
          (D29PLNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2A
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2A
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2ASUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2APLAN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2ABQUALIFIER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2ABNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2ABTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD2A
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2A
         IS 'DB2 - Cat: SYSPLANDEP';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2A.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2A.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2A.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2A.D2ASUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2A.D2APLAN
         IS 'Plan               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2A.D2ABQUALIFIER
         IS 'Creator/Database   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2A.D2ABNAME
         IS 'Dependend Object   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2A.D2ABTYPE
         IS 'Object Type        ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2A0
           ON OA1P.XXRTD2A
          (D2APLAN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2A1
           ON OA1P.XXRTD2A
          (D2ABNAME ASC
          ,D2ABQUALIFIER ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2B
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2B
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2BSUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2BGRANTEE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2BTCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2BTTNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2BCOLLID CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2BCONTOKEN CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,D2BGRANTEETYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BACCESS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BGRANTOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2BDBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2BSCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2BSTNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2BAUTHHOWGOT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BUPDATECOLS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BALTERAUTH CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BDELETEAUTH CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BINDEXAUTH CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BINSERTAUTH CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BSELECTAUTH CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BUPDATEAUTH CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BREFERENCESAUTH CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BREFCOLS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2BGRANTEDTS TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD2B
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2B
         IS 'DB2 - Cat: SYSTABAUTH';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BSUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BGRANTEE
         IS 'Grantee            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BTCREATOR
         IS 'TCreator           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BTTNAME
         IS 'TTName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BCOLLID
         IS 'CollID             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BCONTOKEN
         IS 'ConToken           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BGRANTEETYPE
         IS 'GranteeType        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BACCESS
         IS 'Access (Read/Upd.) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BGRANTOR
         IS 'Grantor            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BDBNAME
         IS 'DBName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BSCREATOR
         IS 'SCreator           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BSTNAME
         IS 'STName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BAUTHHOWGOT
         IS 'AuthHowGot         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BUPDATECOLS
         IS 'UpdateCols         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BALTERAUTH
         IS 'AlterAuth          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BDELETEAUTH
         IS 'DeleteAuth         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BINDEXAUTH
         IS 'IndexAuth          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BINSERTAUTH
         IS 'InsertAuth         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BSELECTAUTH
         IS 'SelectAuth         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BUPDATEAUTH
         IS 'UpdateAuth         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BREFERENCESAUTH
         IS 'ReferencesAuth     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BREFCOLS
         IS 'RefCols            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2B.D2BGRANTEDTS
         IS 'GrantedTS          ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2B0
           ON OA1P.XXRTD2B
          (D2BTTNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2B1
           ON OA1P.XXRTD2B
          (D2BGRANTEE ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2C
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2C
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2CSUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2CNAME CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,D2CTBNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2CTBCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2CCOLNO INTEGER
                                                        NOT NULL
        ,D2CCOLTYPE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2CLENGTH INTEGER
                                                        NOT NULL
        ,D2CSCALE INTEGER
                                                        NOT NULL
        ,D2CNULLS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2CDEFAULT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2CLABEL CHARACTER(90) FOR SBCS DATA
                                                        NOT NULL
        ,D2CDEFAULTVALUE CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD2C
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2C
         IS 'DB2 - Cat: SYSCOLUMNS';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CSUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CNAME
         IS 'Column Name        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CTBNAME
         IS 'Table Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CTBCREATOR
         IS 'Table Creator      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CCOLNO
         IS 'Column Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CCOLTYPE
         IS 'Type               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CLENGTH
         IS 'Length             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CSCALE
         IS 'Scale              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CNULLS
         IS 'NULLS Y/N          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CDEFAULT
         IS 'DEFAULT Y/N        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CLABEL
         IS 'Label              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2C.D2CDEFAULTVALUE
         IS 'Default-Value      ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2C0
           ON OA1P.XXRTD2C
          (D2CNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2C1
           ON OA1P.XXRTD2C
          (D2CTBNAME ASC
          ,D2CTBCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2D
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS NO
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2D
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2DSUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2DNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2DCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2DSTGROUP CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2DBPOOL CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2DCREATEDBY CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2DCREATEDTS TIMESTAMP (6) WITHOUT TIME ZONE
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD2D
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2D
         IS 'DB2 - Cat: SYSDATABASE';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.D2DSUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.D2DNAME
         IS 'Name               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.D2DCREATOR
         IS 'Creator            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.D2DSTGROUP
         IS 'StGroup            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.D2DBPOOL
         IS 'BPOOL              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.D2DCREATEDBY
         IS 'CreatedBy          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2D.D2DCREATEDTS
         IS 'CreatedTS          ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2D
           ON OA1P.XXRTD2D
          (D2DNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2F
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2F
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2FSUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2FCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2FTBNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2FRELNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2FCOLNAME CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,D2FCOLNO INTEGER
  WITH DEFAULT NULL
        ,D2FCOLSEQ INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD2F
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2F
         IS 'DB2 - Cat: SYSFOREIGNKEYS';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.D2FSUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.D2FCREATOR
         IS 'Creator            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.D2FTBNAME
         IS 'TBName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.D2FRELNAME
         IS 'RelName            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.D2FCOLNAME
         IS 'ColName            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.D2FCOLNO
         IS 'ColNo (Pos in Tab) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2F.D2FCOLSEQ
         IS 'ColSeq (Pos in Key)';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2F0
           ON OA1P.XXRTD2F
          (D2FTBNAME ASC
          ,D2FCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2F1
           ON OA1P.XXRTD2F
          (D2FRELNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2G
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2G
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,"PARTITION" INTEGER
  WITH DEFAULT NULL
        ,TSNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IXNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,IXCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PQTY INTEGER
  WITH DEFAULT NULL
        ,SQTY INTEGER
  WITH DEFAULT NULL
        ,STORTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,STORNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,VCATNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CARD INTEGER
  WITH DEFAULT NULL
        ,FARINDREF INTEGER
  WITH DEFAULT NULL
        ,NEARINDREF INTEGER
  WITH DEFAULT NULL
        ,PERCACTIVE INTEGER
  WITH DEFAULT NULL
        ,PERCDROP INTEGER
  WITH DEFAULT NULL
        ,IBMREQD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,LIMITKEY CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,FREEPAGE INTEGER
  WITH DEFAULT NULL
        ,PCTFREE INTEGER
  WITH DEFAULT NULL
        ,CHECKFLAG CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CHECKRID CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,SPACE INTEGER
  WITH DEFAULT NULL
        ,COMPRESS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,PAGESAVE INTEGER
  WITH DEFAULT NULL
        ,STATSTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,GBPCACHE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,CHECKRID5B CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD2G
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2G
         IS 'DB2 - Cat: SYSTABLEPART';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G."PARTITION"
         IS 'Partition          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.TSNAME
         IS 'TSName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.DBNAME
         IS 'DBName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.IXNAME
         IS 'IXName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.IXCREATOR
         IS 'IXCreator          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.PQTY
         IS 'PQTY               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.SQTY
         IS 'SQTY               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.STORTYPE
         IS 'StorType           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.STORNAME
         IS 'StorName           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.VCATNAME
         IS 'VCATName           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.CARD
         IS 'Card               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.FARINDREF
         IS 'FarIndRef          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.NEARINDREF
         IS 'NearIndRef         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.PERCACTIVE
         IS 'Active %           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.PERCDROP
         IS 'Drop %             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.IBMREQD
         IS 'IBMREQD            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.LIMITKEY
         IS 'LimitKey           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.FREEPAGE
         IS 'Freepage           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.PCTFREE
         IS 'Free %             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.CHECKFLAG
         IS 'CheckFlag          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.CHECKRID
         IS 'CheckRID           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.SPACE
         IS 'Space              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.COMPRESS
         IS 'Compress           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.PAGESAVE
         IS 'PageSave %         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.STATSTIME
         IS 'StatsTime          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.GBPCACHE
         IS 'GBPCache           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2G.CHECKRID5B
         IS 'CheckRID5B         ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2G0
           ON OA1P.XXRTD2G
          (TSNAME ASC
          ,DBNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2G1
           ON OA1P.XXRTD2G
          (IXNAME ASC
          ,IXCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2I
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2I
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,"PARTITION" INTEGER
  WITH DEFAULT NULL
        ,IXNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,IXCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PQTY INTEGER
  WITH DEFAULT NULL
        ,SQTY INTEGER
  WITH DEFAULT NULL
        ,STORTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,STORNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,VCATNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,CARD INTEGER
  WITH DEFAULT NULL
        ,FAROFFPOS INTEGER
  WITH DEFAULT NULL
        ,LEAFDIST INTEGER
  WITH DEFAULT NULL
        ,NEAROFFPOS INTEGER
  WITH DEFAULT NULL
        ,IBMREQD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,LIMITKEY CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,FREEPAGE CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,PCTFREE INTEGER
  WITH DEFAULT NULL
        ,SPACE INTEGER
  WITH DEFAULT NULL
        ,STATSTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,GBPCACHE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,FAROFFPOSF FLOAT(53)
  WITH DEFAULT NULL
        ,NEAROFFPOSF FLOAT(53)
  WITH DEFAULT NULL
        ,CARDF FLOAT(53)
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD2I
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2I
         IS 'DB2 - Cat: SYSINDEXPART';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.SUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I."PARTITION"
         IS 'Partition          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.IXNAME
         IS 'Index-Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.IXCREATOR
         IS 'Index-Creator      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.PQTY
         IS 'PQTY               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.SQTY
         IS 'SQTY               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.STORTYPE
         IS 'StorType           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.STORNAME
         IS 'StorName           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.VCATNAME
         IS 'VCATName           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.CARD
         IS 'Card               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.FAROFFPOS
         IS 'FarOffPos          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.LEAFDIST
         IS 'LeafDist           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.NEAROFFPOS
         IS 'NearOffPos         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.IBMREQD
         IS 'IBMREQD            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.LIMITKEY
         IS 'LimitKey           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.FREEPAGE
         IS 'Freepage           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.PCTFREE
         IS 'Free %             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.SPACE
         IS 'Space              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.STATSTIME
         IS 'Statstime          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.GBPCACHE
         IS 'GBPCache           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.FAROFFPOSF
         IS 'FarOffPos (Float)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.NEAROFFPOSF
         IS 'NearOffPos (Float) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2I.CARDF
         IS 'Card (Float)       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2I
           ON OA1P.XXRTD2I
          (IXNAME ASC
          ,IXCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2P
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2P
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2PLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,D2PMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2PJOB# INTEGER
  WITH DEFAULT NULL
        ,D2PJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2PSTEP# INTEGER
  WITH DEFAULT NULL
        ,D2PSUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2PPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2PPLANN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD2P
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2P
         IS 'DB2 - Job/Pgm/Plan';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.D2PLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.D2PMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.D2PJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.D2PJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.D2PSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.D2PSUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.D2PPGMN
         IS 'Programname        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2P.D2PPLANN
         IS 'Plan               ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2P
           ON OA1P.XXRTD2P
          (D2PJN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2R
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS NO
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2R
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2RSUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2RCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2RTBNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2RRELNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2RREFTBNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2RREFTBCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2RCOLCOUNT INTEGER
  WITH DEFAULT NULL
        ,D2RDELETERULE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,D2RTIMESTAMP TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD2R
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2R
         IS 'DB2 - Cat: SYSRELS';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RSUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RCREATOR
         IS 'Creator            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RTBNAME
         IS 'TBName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RRELNAME
         IS 'RelName            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RREFTBNAME
         IS 'RefTBName          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RREFTBCREATOR
         IS 'RefTBCreator       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RCOLCOUNT
         IS 'ColCount           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RDELETERULE
         IS 'DeleteRule         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2R.D2RTIMESTAMP
         IS 'TimeStamp          ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2R0
           ON OA1P.XXRTD2R
          (D2RTBNAME ASC
          ,D2RCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2R1
           ON OA1P.XXRTD2R
          (D2RRELNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2S
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS NO
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2S
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2SSUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2SNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2SCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2SVCATNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2SSPACE INTEGER
  WITH DEFAULT NULL
        ,D2SCREATEDBY CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2SSTATSTIME TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSD2S
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2S
         IS 'DB2 - Cat: SYSSTOGROUP';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.D2SSUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.D2SNAME
         IS 'Name               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.D2SCREATOR
         IS 'Creator            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.D2SVCATNAME
         IS 'VCatName           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.D2SSPACE
         IS 'Space (KB)         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.D2SCREATEDBY
         IS 'CreatedBy          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2S.D2SSTATSTIME
         IS 'StatsTime          ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2S
           ON OA1P.XXRTD2S
          (D2SNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2U
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2U
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2ULIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,D2UMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2UJOB# INTEGER
  WITH DEFAULT NULL
        ,D2UJOBN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2USTEP# INTEGER
  WITH DEFAULT NULL
        ,D2UUTIL CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,D2USPGM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2USUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2UDBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2UTSNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2UCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2UTNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2UACC CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,D2UCALCMETHOD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD2U
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2U
         IS 'DB2 - Job/Pgm/Table';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2ULIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UJOBN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2USTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UUTIL
         IS 'Utility/Pgm        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2USPGM
         IS 'Sub-Program        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2USUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UDBNAME
         IS 'Database           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UTSNAME
         IS 'Tablespace         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UCREATOR
         IS 'Creator            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UTNAME
         IS 'Table Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UACC
         IS 'Access             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2U.D2UCALCMETHOD
         IS 'Method Flag        ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2U0
           ON OA1P.XXRTD2U
          (D2UJOBN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2U1
           ON OA1P.XXRTD2U
          (D2UTNAME ASC
          ,D2UCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSD2V
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTD2V
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2VSUBS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,D2VVCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2VVNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,D2VTCREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,D2VTNAME CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSD2V
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTD2V
         IS 'DB2 - View/Table';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2V.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2V.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2V.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2V.D2VSUBS
         IS 'Subsystem          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2V.D2VVCREATOR
         IS 'View Creator       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2V.D2VVNAME
         IS 'View Name          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2V.D2VTCREATOR
         IS 'Table Creator      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTD2V.D2VTNAME
         IS 'Table Name         ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2V0
           ON OA1P.XXRTD2V
          (D2VVNAME ASC
          ,D2VVCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXD2V1
           ON OA1P.XXRTD2V
          (D2VTNAME ASC
          ,D2VTCREATOR ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSDDF
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTDDF
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,DDFMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFJOB# INTEGER
  WITH DEFAULT NULL
        ,DDFJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFSTEP# INTEGER
  WITH DEFAULT NULL
        ,DDFPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDDN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFCC# INTEGER
  WITH DEFAULT NULL
        ,DDFX694 CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,DDFCALLEDPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFCALLEDLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,DDFRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDUMMY1 CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDSN CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDSMEMBER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDSTYPE CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,DDFBLKSIZE INTEGER
  WITH DEFAULT NULL
        ,DDFDSORG CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,DDFKEYLEN INTEGER
  WITH DEFAULT NULL
        ,DDFLRECL INTEGER
  WITH DEFAULT NULL
        ,DDFRECFM CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDCB CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDISP CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,DDFUNIT CHARACTER(12) FOR SBCS DATA
                                                        NOT NULL
        ,DDFACCODE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFAMP CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,DDFAVGREC CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,DDFCHKPT CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,DDFCNTL CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDATACLAS CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDDNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDLM CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDSID CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,DDFDSNTYPE CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,DDFEXPDT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFFREE CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,DDFKEYOFF INTEGER
  WITH DEFAULT NULL
        ,DDFLABEL CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,DDFLIKE CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,DDFMGMTCLAS CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFPROTECT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,DDFQNAME CHARACTER(17) FOR SBCS DATA
                                                        NOT NULL
        ,DDFRECORG CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,DDFREFDD CHARACTER(28) FOR SBCS DATA
                                                        NOT NULL
        ,DDFRETPD INTEGER
  WITH DEFAULT NULL
        ,DDFSECMODEL CHARACTER(52) FOR SBCS DATA
                                                        NOT NULL
        ,DDFSPACE CHARACTER(40) FOR SBCS DATA
                                                        NOT NULL
        ,DDFSTORCLAS CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDFSUBSYS CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,DDFTERM CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,DDFVOLUME CHARACTER(40) FOR SBCS DATA
                                                        NOT NULL
        ,DDFVOLSER1 CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,DDFVOLSER2 CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,DDFVOLCODED INTEGER
  WITH DEFAULT NULL
        ,DDFBLKSZLIM INTEGER
  WITH DEFAULT NULL
        ,DDFCCSID INTEGER
  WITH DEFAULT NULL
        ,DDFFILEDATA CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,DDFKEYLABL1 CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,DDFKEYLABL2 CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,DDFKEYENCD1 CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,DDFKEYENCD2 CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,DDFLGSTREAM CHARACTER(26) FOR SBCS DATA
                                                        NOT NULL
        ,DDFRLS CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,DDFEATTR CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSDDF
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTDDF
         IS 'JCL - DSN';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFPGMN
         IS 'Programname        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDDN
         IS 'DD-Name (Stmt)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFCC#
         IS 'Concat-Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFX694
         IS 'X694-Key           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFCALLEDPROC
         IS 'Called Procedure   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFCALLEDLIB
         IS 'Proclib (called)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDUMMY1
         IS 'Dummy (unused)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDSN
         IS 'Dataset Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDSMEMBER
         IS 'Member/Generation  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDSTYPE
         IS 'Dataset Type       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFBLKSIZE
         IS 'BLKSIZE            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDSORG
         IS 'DSORG              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFKEYLEN
         IS 'KEYLEN             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFLRECL
         IS 'LRECL              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFRECFM
         IS 'RECFM              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDCB
         IS 'DCB (Rest)         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDISP
         IS 'Disposition        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFUNIT
         IS 'UNIT               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFACCODE
         IS 'ACCODE             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFAMP
         IS 'AMP                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFAVGREC
         IS 'AVGREC             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFCHKPT
         IS 'CHKPT              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFCNTL
         IS 'CNTL               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDATACLAS
         IS 'DATACLAS           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDDNAME
         IS 'DDNAME (Parm)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDLM
         IS 'DLM                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDSID
         IS 'DSID               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFDSNTYPE
         IS 'DSNTYPE            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFEXPDT
         IS 'EXPDT              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFFREE
         IS 'FREE               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFKEYOFF
         IS 'KEYOFF             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFLABEL
         IS 'LABEL              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFLIKE
         IS 'LIKE               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFMGMTCLAS
         IS 'MGMTCLAS           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFPROTECT
         IS 'PROTECT            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFQNAME
         IS 'QNAME              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFRECORG
         IS 'RECORG             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFREFDD
         IS 'REFDD              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFRETPD
         IS 'RETPD              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFSECMODEL
         IS 'SECMODEL           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFSPACE
         IS 'SPACE              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFSTORCLAS
         IS 'STORCLAS           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFSUBSYS
         IS 'SUBSYS             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFTERM
         IS 'TERM               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFVOLUME
         IS 'VOLUME (as in JCL) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFVOLSER1
         IS 'VOLSER 1           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFVOLSER2
         IS 'VOLSER 2           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFVOLCODED
         IS 'Num of VOLSER      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFBLKSZLIM
         IS 'BLKSZLIM           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFCCSID
         IS 'CCSID              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFFILEDATA
         IS 'FILEDATA           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFKEYLABL1
         IS 'KEYLABL1           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFKEYLABL2
         IS 'KEYLABL2           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFKEYENCD1
         IS 'KEYENCD1           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFKEYENCD2
         IS 'KEYENCD2           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFLGSTREAM
         IS 'LGSTREAM           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFRLS
         IS 'RLS                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDF.DDFEATTR
         IS 'EATTR              ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXDDF0
           ON OA1P.XXRTDDF
          (DDFJN ASC
          ,DDFLIB ASC
          ,DDFMEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXDDF1
           ON OA1P.XXRTDDF
          (DDFDSN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSDDH
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTDDH
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDHLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,DDHMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDHJOB# INTEGER
  WITH DEFAULT NULL
        ,DDHJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDHSTEP# INTEGER
  WITH DEFAULT NULL
        ,DDHPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDHDDN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDHCC# INTEGER
  WITH DEFAULT NULL
        ,DDHX694 CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,DDHCALLEDPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDHCALLEDLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,DDHRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,DDHDUMMY1 CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,DDHBLKSIZE INTEGER
  WITH DEFAULT NULL
        ,DDHDSORG CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,DDHKEYLEN INTEGER
  WITH DEFAULT NULL
        ,DDHLRECL INTEGER
  WITH DEFAULT NULL
        ,DDHRECFM CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,DDHDCB CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,DDHDUMMY CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,DDHDSNTYPE CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,DDHFILEDATA CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,DDHPATH CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,DDHPATHDISP CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,DDHPATHMODE CHARACTER(98) FOR SBCS DATA
                                                        NOT NULL
        ,DDHPATHOPTS CHARACTER(55) FOR SBCS DATA
                                                        NOT NULL
        ,DDHTERM CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSDDH
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTDDH
         IS 'JCL - HFS';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHPGMN
         IS 'Programname        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHDDN
         IS 'DD-Name (Stmt)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHCC#
         IS 'Concat-Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHX694
         IS 'X694-Key           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHCALLEDPROC
         IS 'Called Procedure   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHCALLEDLIB
         IS 'Proclib (called)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHDUMMY1
         IS 'Dummy (unused)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHBLKSIZE
         IS 'BLKSIZE            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHDSORG
         IS 'DSORG              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHKEYLEN
         IS 'KEYLEN             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHLRECL
         IS 'LRECL              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHRECFM
         IS 'RECFM              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHDCB
         IS 'DCB (Rest)         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHDUMMY
         IS 'DUMMY              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHDSNTYPE
         IS 'DSNTYPE            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHFILEDATA
         IS 'FILEDATA           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHPATH
         IS 'PATH               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHPATHDISP
         IS 'PATHDISP           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHPATHMODE
         IS 'PATHMODE           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHPATHOPTS
         IS 'PATHOPTS           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDH.DDHTERM
         IS 'TERM               ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXDDH
           ON OA1P.XXRTDDH
          (DDHJN ASC
          ,DDHLIB ASC
          ,DDHMEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSDDP
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTDDP
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDPLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,DDPMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDPJOB# INTEGER
  WITH DEFAULT NULL
        ,DDPJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDPSTEP# INTEGER
  WITH DEFAULT NULL
        ,DDPPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDPDDN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDPCC# INTEGER
  WITH DEFAULT NULL
        ,DDPX694 CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,DDPCALLEDPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDPCALLEDLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,DDPRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,DDPOUTPUTID INTEGER
                                                        NOT NULL
        ,DDPSYSOC CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,DDPSYSOW CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDPSYSOF CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DDPFCB CHARACTER(14) FOR SBCS DATA
                                                        NOT NULL
        ,DDPFLASH CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,DDPDEST CHARACTER(17) FOR SBCS DATA
                                                        NOT NULL
        ,DDPCOPIE CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,DDPCHARS CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,DDPDCB CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,DDPBURST CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,DDPHOLD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,DDPLRECL CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,DDPMODIFY CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,DDPOUTLIM INTEGER
  WITH DEFAULT NULL
        ,DDPOUTPUT CHARACTER(28) FOR SBCS DATA
                                                        NOT NULL
        ,DDPRECFM CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,DDPREFDD CHARACTER(28) FOR SBCS DATA
                                                        NOT NULL
        ,DDPSEGMENT INTEGER
  WITH DEFAULT NULL
        ,DDPSPIN CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,DDPSUBSYS CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,DDPUCS CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSDDP
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTDDP
         IS 'JCL - SYSOUT';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPPGMN
         IS 'Programname        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPDDN
         IS 'DD-Name (Stmt)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPCC#
         IS 'Concat-Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPX694
         IS 'X694-Key           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPCALLEDPROC
         IS 'Procedure          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPCALLEDLIB
         IS 'Proclib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPOUTPUTID
         IS 'Output-Stmt ID     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPSYSOC
         IS 'SYSOUT CLASS       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPSYSOW
         IS 'SYSOUT WRITER      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPSYSOF
         IS 'SYSOUT FORM        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPFCB
         IS 'FCB                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPFLASH
         IS 'FLASH              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPDEST
         IS 'DEST               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPCOPIE
         IS 'COPIES             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPCHARS
         IS 'CHARS              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPDCB
         IS 'DCB                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPBURST
         IS 'BURST              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPHOLD
         IS 'HOLD               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPLRECL
         IS 'LRECL              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPMODIFY
         IS 'MODIFY             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPOUTLIM
         IS 'OUTLIM             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPOUTPUT
         IS 'OUTPUT             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPRECFM
         IS 'RECFM              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPREFDD
         IS 'REFDD              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPSEGMENT
         IS 'SEGMENT            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPSPIN
         IS 'SPIN               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPSUBSYS
         IS 'SUBSYS             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTDDP.DDPUCS
         IS 'UCS                ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXDDP
           ON OA1P.XXRTDDP
          (DDPJN ASC
          ,DDPMEMB ASC
          ,DDPLIB ASC
          ,DDPOUTPUTID ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSEXE
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTEXE
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXELIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,EXEMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXEJOB# INTEGER
  WITH DEFAULT NULL
        ,EXEJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXESTEP# INTEGER
  WITH DEFAULT NULL
        ,EXEPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXESTMTN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXEPROCN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXEJOBSN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXECALLEDLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,EXEPGMNAMEORIG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXECALLINGNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,EXECALLINGLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,EXETYPE CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,EXEPROCFOUND CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,EXERESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,EXEDPRTY CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,EXEPARM CHARACTER(102) FOR SBCS DATA
                                                        NOT NULL
        ,EXEREGIO INTEGER
  WITH DEFAULT NULL
        ,EXETIME CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,EXEACCT CHARACTER(40) FOR SBCS DATA
                                                        NOT NULL
        ,EXEADDRSPC CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,EXECOND CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,EXEDYNAMNBR INTEGER
  WITH DEFAULT NULL
        ,EXEPERFORM INTEGER
  WITH DEFAULT NULL
        ,EXERD CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,EXECCSID INTEGER
  WITH DEFAULT NULL
        ,EXEMEMLIMIT FLOAT(53)
  WITH DEFAULT NULL
        ,EXERLSTMOUT INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSEXE
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTEXE
         IS 'JCL - EXEC Statements';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXELIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXESTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEPGMN
         IS 'Programname (repl.)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXESTMTN
         IS 'ProcStepname       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEPROCN
         IS 'Procedurename      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEJOBSN
         IS 'JobStepname        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXECALLEDLIB
         IS 'Proclib (called)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEPGMNAMEORIG
         IS 'Programname (orig.)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXECALLINGNAME
         IS 'Calling Procedure  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXECALLINGLIB
         IS 'Proclib (calling)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXETYPE
         IS 'Type (PROC/PGM)    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEPROCFOUND
         IS 'Proc found (Y/N)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXERESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEDPRTY
         IS 'DPRTY              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEPARM
         IS 'PARM               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEREGIO
         IS 'REGION             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXETIME
         IS 'TIME               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEACCT
         IS 'ACCT               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEADDRSPC
         IS 'ADDRSPC            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXECOND
         IS 'COND               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEDYNAMNBR
         IS 'DYNAMNBR           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEPERFORM
         IS 'PERFORM            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXERD
         IS 'RD (Restart Def.)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXECCSID
         IS 'CCSID              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXEMEMLIMIT
         IS 'MEMLIMIT           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTEXE.EXERLSTMOUT
         IS 'RLSTMOUT           ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXEXE0
           ON OA1P.XXRTEXE
          (EXEJN ASC
          ,EXELIB ASC
          ,EXEMEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXEXE1
           ON OA1P.XXRTEXE
          (EXEPGMN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSFLJ
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTFLJ
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLJSYSID CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,FLJPREDKEY CHARACTER(13) FOR SBCS DATA
                                                        NOT NULL
        ,FLJSUCCKEY CHARACTER(13) FOR SBCS DATA
                                                        NOT NULL
        ,FLJWLINKTYP CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLJMEMBERNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLJJOBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLJJOBNO CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,FLJDSNAME CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,FLJDSMEMBER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLJDISP CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,FLJLIBKEY CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,FLJDB2SUBSYSTEM CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,FLJDB2CREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLJDB2TABLE CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,FLJDB2ACCTYPE CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,FLJIMSDBDNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLJIMSPSB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLJIMSPROCOPT CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,FLJSYMBOLTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSFLJ
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTFLJ
         IS 'JCL - Job Diagram';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJSYSID
         IS 'Dummy SYSID        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJPREDKEY
         IS 'Pred.Key           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJSUCCKEY
         IS 'Succ.Key           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJWLINKTYP
         IS 'Link Typ           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJMEMBERNAME
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJJOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJJOBNO
         IS 'Job No.            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJDSNAME
         IS 'Data Set Name      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJDSMEMBER
         IS 'Data Set Member    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJDISP
         IS 'Disposition        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJLIBKEY
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJDB2SUBSYSTEM
         IS 'DB2 SubSystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJDB2CREATOR
         IS 'DB2 Creator        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJDB2TABLE
         IS 'DB2 Table          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJDB2ACCTYPE
         IS 'DB2 Access Typ     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJIMSDBDNAME
         IS 'IMS DBD Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJIMSPSB
         IS 'IMS PSB Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJIMSPROCOPT
         IS 'IMS Proc Option    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLJ.FLJSYMBOLTYPE
         IS 'Symbol Type        ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXFLJ0
           ON OA1P.XXRTFLJ
          (FLJSUCCKEY ASC
          ,FLJPREDKEY ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXFLJ1
           ON OA1P.XXRTFLJ
          (FLJJOBNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSFLO
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTFLO
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLOSYSID CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,FLOPREDKEY CHARACTER(13) FOR SBCS DATA
                                                        NOT NULL
        ,FLOSUCCKEY CHARACTER(13) FOR SBCS DATA
                                                        NOT NULL
        ,FLOWLINKTYP CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLOMEMBERNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLOJOBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLOJOBNO CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,FLOWSTEPNO INTEGER
  WITH DEFAULT NULL
        ,FLODDNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLOWPGMNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLOCC# INTEGER
  WITH DEFAULT NULL
        ,FLOCALLEDPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLODSNAME CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,FLODSMEMBER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLODSNTYP CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,FLODISP CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,FLOLIBKEY CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,FLODB2SUBSYSTEM CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,FLODB2CREATOR CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLODB2TABLE CHARACTER(128) FOR SBCS DATA
                                                        NOT NULL
        ,FLODB2ACCTYPE CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,FLOIMSDBDNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLOIMSPSB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FLOIMSPROCOPT CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,FLOSYMBOLTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSFLO
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTFLO
         IS 'JCL - Data Flow';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOSYSID
         IS 'FLOSYSID           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOPREDKEY
         IS 'Pred.Key           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOSUCCKEY
         IS 'Succ.Key           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOWLINKTYP
         IS 'Link Typ           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOMEMBERNAME
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOJOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOJOBNO
         IS 'Job No.            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOWSTEPNO
         IS 'Step No.           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODDNAME
         IS 'DDName             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOWPGMNAME
         IS 'Program Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOCC#
         IS 'Concat Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOCALLEDPROC
         IS 'Called Procedure   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODSNAME
         IS 'Data Set Name      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODSMEMBER
         IS 'Data Set Member    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODSNTYP
         IS 'Data Set Typ       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODISP
         IS 'Disposition        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOLIBKEY
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODB2SUBSYSTEM
         IS 'DB2 SubSystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODB2CREATOR
         IS 'DB2 Creator        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODB2TABLE
         IS 'DB2 Table          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLODB2ACCTYPE
         IS 'DB2 Access Typ     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOIMSDBDNAME
         IS 'IMS DBD Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOIMSPSB
         IS 'IMS PSB Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOIMSPROCOPT
         IS 'IMS Proc Option    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTFLO.FLOSYMBOLTYPE
         IS 'Symbol Type        ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXFLO0
           ON OA1P.XXRTFLO
          (FLOSUCCKEY ASC
          ,FLOPREDKEY ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXFLO1
           ON OA1P.XXRTFLO
          (FLOJOBNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIFS
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIFS
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IFSLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IFSMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IFSJOB# INTEGER
  WITH DEFAULT NULL
        ,IFSJOBN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IFSRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,IFSLINE CHARACTER(80) FOR SBCS DATA
                                                        NOT NULL
        ,IFSORDNO INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSIFS
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIFS
         IS 'JCL - IF Statements';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.IFSLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.IFSMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.IFSJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.IFSJOBN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.IFSRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.IFSLINE
         IS 'Line               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIFS.IFSORDNO
         IS 'Sort-ID            ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIFS
           ON OA1P.XXRTIFS
          (IFSJOBN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIM0
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIM0
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM0IMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM0MEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM0LIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IM0DBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM0ACCESS CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,IM0PART CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM0PASSWD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM0VERS CHARACTER(64) FOR SBCS DATA
                                                        NOT NULL
        ,IM0DATXEXIT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM0RMNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM0RMRAPS INTEGER
  WITH DEFAULT NULL
        ,IM0RMHDRBN INTEGER
  WITH DEFAULT NULL
        ,IM0RMHDB INTEGER
  WITH DEFAULT NULL
        ,IM0NOLEV INTEGER
  WITH DEFAULT NULL
        ,IM0NOLCH INTEGER
  WITH DEFAULT NULL
        ,IM0NOSEG INTEGER
  WITH DEFAULT NULL
        ,IM0NODSG INTEGER
  WITH DEFAULT NULL
        ,IM0NOAREAS INTEGER
  WITH DEFAULT NULL
        ,IM0NOEXTDBD INTEGER
  WITH DEFAULT NULL
        ,IM0NUMAREAS INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSIM0
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIM0
         IS 'IMS - DBD - General Info';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0IMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0MEMB
         IS 'DBD-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0LIB
         IS 'DBDLIB             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0DBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0ACCESS
         IS 'DBD Access Type    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0PART
         IS 'Partitioned (Y/N)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0PASSWD
         IS 'Password (Y/N)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0VERS
         IS 'Version Info       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0DATXEXIT
         IS 'Exit Usage (Y/N)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0RMNAME
         IS 'Rand Module Name   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0RMRAPS
         IS 'ROOT Anchor Points ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0RMHDRBN
         IS 'Max Rel Block No   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0RMHDB
         IS 'Max Bytes          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0NOLEV
         IS 'No Levels          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0NOLCH
         IS 'No Log.Children    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0NOSEG
         IS 'No Segments        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0NODSG
         IS 'No DS Groups       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0NOAREAS
         IS 'No Areas           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0NOEXTDBD
         IS 'No Ext DBD Entries ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM0.IM0NUMAREAS
         IS 'Total No Areas     ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM0
           ON OA1P.XXRTIM0
          (IM0DBD ASC
          ,IM0MEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIM1
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIM1
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM1IMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM1MEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM1LIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IM1DBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM1LOGICAL CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM1ID INTEGER
  WITH DEFAULT NULL
        ,IM1DD1 CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM1DD2 CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM1OVFLW CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM1BLKSIZE1 INTEGER
  WITH DEFAULT NULL
        ,IM1BLKSIZE2 INTEGER
  WITH DEFAULT NULL
        ,IM1RECLEN1 INTEGER
  WITH DEFAULT NULL
        ,IM1RECLEN2 INTEGER
  WITH DEFAULT NULL
        ,IM1RECFM CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,IM1MAXRECSZ INTEGER
  WITH DEFAULT NULL
        ,IM1MINRECSZ INTEGER
  WITH DEFAULT NULL
        ,IM1SCANCYLS INTEGER
  WITH DEFAULT NULL
        ,IM1FBFF INTEGER
  WITH DEFAULT NULL
        ,IM1FSPF INTEGER
  WITH DEFAULT NULL
        ,IM1SEARCHA CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM1RELATED CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,IM1NSGA INTEGER
  WITH DEFAULT NULL
        ,IM1LSL INTEGER
  WITH DEFAULT NULL
        ,IM1SSL INTEGER
  WITH DEFAULT NULL
        ,IM1LKL INTEGER
  WITH DEFAULT NULL
        ,IM1SKL INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSIM1
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIM1
         IS 'IMS - DBD - DS Group';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1IMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1MEMB
         IS 'DBD-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1LIB
         IS 'DBDLIB             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1DBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1LOGICAL
         IS 'Logical (Y/N)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1ID
         IS 'DS Group ID        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1DD1
         IS 'Input DD Name 1    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1DD2
         IS 'Input DD Name 2    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1OVFLW
         IS 'Overflow DD Name   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1BLKSIZE1
         IS 'Block Size 1       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1BLKSIZE2
         IS 'Block Size 2       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1RECLEN1
         IS 'Record Lenth 1     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1RECLEN2
         IS 'Record Lenth 2     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1RECFM
         IS 'Record Format      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1MAXRECSZ
         IS 'Max Record Size    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1MINRECSZ
         IS 'Min Record Size    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1SCANCYLS
         IS 'Scan Cylinders     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1FBFF
         IS 'Free Blck. Freq.   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1FSPF
         IS 'Free Spc. Perctg.  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1SEARCHA
         IS 'Search Algorithm   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1RELATED
         IS 'MSDB Term.-Related ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1NSGA
         IS 'No Segments        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1LSL
         IS 'Longest Seg. Len.  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1SSL
         IS 'Shortest Seg. Len. ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1LKL
         IS 'Longest Key Len.   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM1.IM1SKL
         IS 'Shortest Key Len.  ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM1
           ON OA1P.XXRTIM1
          (IM1DBD ASC
          ,IM1MEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIM2
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIM2
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2IMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM2MEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IM2DBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2SEGID INTEGER
  WITH DEFAULT NULL
        ,IM2SEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2PARSEGID INTEGER
  WITH DEFAULT NULL
        ,IM2PARSEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2PCPTYP CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LPSEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LPCKST CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LPEDB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LEVEL INTEGER
  WITH DEFAULT NULL
        ,IM2NOCHLD INTEGER
  WITH DEFAULT NULL
        ,IM2NOFLD INTEGER
  WITH DEFAULT NULL
        ,IM2SRCSEG1 CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2SRCTYP1 CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM2SRCEDB1 CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2SRCSEG2 CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2SRCTYP2 CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM2SRCEDB2 CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LEN INTEGER
  WITH DEFAULT NULL
        ,IM2FREQ INTEGER
  WITH DEFAULT NULL
        ,IM2CTR CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2PTWINF CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2PTWINB CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2PPARNT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LTWINF CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LTWINB CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2LPARNT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2HIERAR CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2PAIRED CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2TYPE CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,IM2RULEI CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2RULED CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2RULER CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2RULEP CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,IM2DSGNO CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2COMRT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM2COMKEY CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2COMINI CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2COMVL CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM2COMMAX INTEGER
  WITH DEFAULT NULL
        ,IM2COMPAD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIM2
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIM2
         IS 'IMS - DBD - Segment';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2IMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2MEMB
         IS 'DBD-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LIB
         IS 'DBDLIB             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2DBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2SEGID
         IS 'Segment ID         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2SEG
         IS 'Segment Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2PARSEGID
         IS 'Parent Seg. ID     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2PARSEG
         IS 'Parent Seg. Name   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2PCPTYP
         IS 'Ph. Chld. Ptr. Type';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LPSEG
         IS 'Log. Par. Seg. Name';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LPCKST
         IS 'LPCK Storage       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LPEDB
         IS 'Log. Par. Ext. DB  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LEVEL
         IS 'Level              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2NOCHLD
         IS 'No Log. Children   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2NOFLD
         IS 'No Fields+XDFLDS   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2SRCSEG1
         IS 'Source Segment 1   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2SRCTYP1
         IS 'Source Type 1      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2SRCEDB1
         IS 'Source Ext. DB 1   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2SRCSEG2
         IS 'Source Segment 2   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2SRCTYP2
         IS 'Source Type 2      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2SRCEDB2
         IS 'Source Ext. DB 2   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LEN
         IS 'Length             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2FREQ
         IS 'Frequency          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2CTR
         IS 'Counter (Y/N)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2PTWINF
         IS 'Phy. Fwd ptr. (Y/N)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2PTWINB
         IS 'Phy. Bwd ptr. (Y/N)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2PPARNT
         IS 'Phy. Parent (Y/N)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LTWINF
         IS 'Log. Fwd ptr. (Y/N)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LTWINB
         IS 'Log. Bwd ptr. (Y/N)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2LPARNT
         IS 'Log. Parent (Y/N)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2HIERAR
         IS 'Hierarchy (Y/N)    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2PAIRED
         IS 'Paired (Y/N)       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2TYPE
         IS 'DEDB Segment Type  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2RULEI
         IS 'Insert Rules (Y/N) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2RULED
         IS 'Delete Rules (Y/N) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2RULER
         IS 'Update Rules (Y/N) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2RULEP
         IS 'Insert Position    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2DSGNO
         IS 'DS Group No (A-J)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2COMRT
         IS 'Compress Routine   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2COMKEY
         IS 'Compress Key (Y/N) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2COMINI
         IS 'Compress Init (Y/N)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2COMVL
         IS 'Com. Var. Len.(Y/N)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2COMMAX
         IS 'Com. Increase Max B';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM2.IM2COMPAD
         IS 'Com. Pading (Y/N)  ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM20
           ON OA1P.XXRTIM2
          (IM2DBD ASC
          ,IM2MEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM21
           ON OA1P.XXRTIM2
          (IM2SEGID ASC
          ,IM2SEG ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIM3
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIM3
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM3IMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM3MEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM3LIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IM3DBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM3SEGID INTEGER
  WITH DEFAULT NULL
        ,IM3SEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM3FLDNM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM3FLDSEQ CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM3FLDUNI CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM3FLDBYTES INTEGER
  WITH DEFAULT NULL
        ,IM3FLDSTART INTEGER
  WITH DEFAULT NULL
        ,IM3FLDTYPE CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIM3
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIM3
         IS 'IMS - DBD - Field';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3IMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3MEMB
         IS 'DBD-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3LIB
         IS 'DBDLIB             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3DBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3SEGID
         IS 'Segment ID         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3SEG
         IS 'Segment Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3FLDNM
         IS 'Field Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3FLDSEQ
         IS 'Sequence Field(Y/N)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3FLDUNI
         IS 'Unique (Y/N)       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3FLDBYTES
         IS 'Bytes              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3FLDSTART
         IS 'Start              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM3.IM3FLDTYPE
         IS 'Type               ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM30
           ON OA1P.XXRTIM3
          (IM3DBD ASC
          ,IM3MEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM31
           ON OA1P.XXRTIM3
          (IM3SEGID ASC
          ,IM3SEG ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIM4
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIM4
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM4IMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM4MEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM4LIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IM4DBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM4SEGID INTEGER
  WITH DEFAULT NULL
        ,IM4SEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM4NAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM4STMT CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM4SKEY CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM4SDATA CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM4SPATH CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM4SCASC CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM4SCASCK CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM4SCASCD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM4SCASCP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IM4LOG CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIM4
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIM4
         IS 'IMS - DBD - Exit';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4IMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4MEMB
         IS 'DBD-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4LIB
         IS 'DBDLIB             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4DBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SEGID
         IS 'Segment ID         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SEG
         IS 'Segment Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4NAME
         IS 'Exit Name          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4STMT
         IS 'Statement Source   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SKEY
         IS 'Key (Y/N)          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SDATA
         IS 'Data (Y/N)         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SPATH
         IS 'Path (Y/N)         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SCASC
         IS 'Cascsde (Y/N)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SCASCK
         IS 'Cascsde Key (Y/N)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SCASCD
         IS 'Cascsde Data (Y/N) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4SCASCP
         IS 'Cascsde Path (Y/N) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM4.IM4LOG
         IS 'Log (Y/N)          ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM40
           ON OA1P.XXRTIM4
          (IM4DBD ASC
          ,IM4MEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM41
           ON OA1P.XXRTIM4
          (IM4SEGID ASC
          ,IM4SEG ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIM5
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIM5
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM5IMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM5MEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM5LIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IM5DBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM5SEGID INTEGER
  WITH DEFAULT NULL
        ,IM5SEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM5LCHNM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM5DBNM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM5PTR CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM5LPCKST CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM5PAIRSEGID INTEGER
  WITH DEFAULT NULL
        ,IM5PAIRSEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM5RULES CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,IM5INDEX CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIM5
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIM5
         IS 'IMS - DBD - LCHILD';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5IMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5MEMB
         IS 'DBD-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5LIB
         IS 'DBDLIB             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5DBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5SEGID
         IS 'Segment ID         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5SEG
         IS 'Segment Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5LCHNM
         IS 'Log. Child Name    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5DBNM
         IS 'Database Name      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5PTR
         IS 'Pointer            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5LPCKST
         IS 'LPCK Storage       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5PAIRSEGID
         IS 'Pair Segment ID    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5PAIRSEG
         IS 'Pair Segment Name  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5RULES
         IS 'Rules              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM5.IM5INDEX
         IS 'Index Field Name   ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM50
           ON OA1P.XXRTIM5
          (IM5DBD ASC
          ,IM5MEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM51
           ON OA1P.XXRTIM5
          (IM5SEGID ASC
          ,IM5SEG ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIM6
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIM6
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6IMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM6MEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6LIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IM6DBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6SEGID INTEGER
  WITH DEFAULT NULL
        ,IM6SEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6XDFLDNM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6IDXSEGID INTEGER
  WITH DEFAULT NULL
        ,IM6IDXSEG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6CONST CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,IM6LINENR INTEGER
  WITH DEFAULT NULL
        ,IM6SRCH CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6SUBSEQ CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6DDATA CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM6NULLVAL CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,IM6EXIT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIM6
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIM6
         IS 'IMS - DBD - XDFLD';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6IMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6MEMB
         IS 'DBD-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6LIB
         IS 'DBDLIB             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6DBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6SEGID
         IS 'Segment ID         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6SEG
         IS 'Segment Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6XDFLDNM
         IS 'XDFLD Name         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6IDXSEGID
         IS 'Idx Segment ID     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6IDXSEG
         IS 'Idx Segment Name   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6CONST
         IS 'Pading Const (HEX) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6LINENR
         IS 'Line Number        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6SRCH
         IS 'Search Item        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6SUBSEQ
         IS 'Subsequence Item   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6DDATA
         IS 'Dupl. Data Item    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6NULLVAL
         IS 'Null Value (HEX)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM6.IM6EXIT
         IS 'Exit Routine Name  ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM60
           ON OA1P.XXRTIM6
          (IM6DBD ASC
          ,IM6MEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM61
           ON OA1P.XXRTIM6
          (IM6SEGID ASC
          ,IM6SEG ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIM7
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIM7
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM7IMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IM7MEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM7LIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IM7DBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM7AREAID INTEGER
  WITH DEFAULT NULL
        ,IM7DD1NM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IM7SIZE INTEGER
  WITH DEFAULT NULL
        ,IM7LRECL INTEGER
  WITH DEFAULT NULL
        ,IM7UOWN INTEGER
  WITH DEFAULT NULL
        ,IM7UOWO INTEGER
  WITH DEFAULT NULL
        ,IM7ROOTN INTEGER
  WITH DEFAULT NULL
        ,IM7ROOTO INTEGER
  WITH DEFAULT NULL
        ,IM7NOSEG INTEGER
  WITH DEFAULT NULL
        ,IM7LKL INTEGER
  WITH DEFAULT NULL
        ,IM7SKL INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSIM7
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIM7
         IS 'IMS - DBD - Area';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7IMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7MEMB
         IS 'DBD-Member         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7LIB
         IS 'DBDLIB             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7DBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7AREAID
         IS 'Area ID            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7DD1NM
         IS 'DD1 Name           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7SIZE
         IS 'Size               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7LRECL
         IS 'LRECL              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7UOWN
         IS 'UOW Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7UOWO
         IS 'UOW Overflow       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7ROOTN
         IS 'Root Number        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7ROOTO
         IS 'Root Overflow      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7NOSEG
         IS 'Number of Segments ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7LKL
         IS 'Longest Key        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIM7.IM7SKL
         IS 'Shortest Key       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIM7
           ON OA1P.XXRTIM7
          (IM7DBD ASC
          ,IM7MEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIMD
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIMD
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMDID CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IMDPSB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMDDBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMDPOPT CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IMDSENS CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMDEXDBD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,IMDGSAMPCB CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIMD
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIMD
         IS 'IMS - PSB/DBD';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.IMDID
         IS 'Id                 ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.IMDPSB
         IS 'PSB                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.IMDDBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.IMDPOPT
         IS 'Proc Option        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.IMDSENS
         IS 'Sensitive Segment  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.IMDEXDBD
         IS 'Index-DBD (Y/N)    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMD.IMDGSAMPCB
         IS 'GSAM PCB (Y/N)     ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIMD0
           ON OA1P.XXRTIMD
          (IMDPSB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIMD1
           ON OA1P.XXRTIMD
          (IMDDBD ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIMJ
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIMJ
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMJLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IMJMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMJJOB# INTEGER
  WITH DEFAULT NULL
        ,IMJJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMJSTEP# INTEGER
  WITH DEFAULT NULL
        ,IMJPGMT CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,IMJPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMJPSB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMJIMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IMJDB2 CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IMJDBD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMJPOPT CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IMJGSAMPCB CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIMJ
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIMJ
         IS 'IMS - JOB/DBD';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJPGMT
         IS 'Program Type       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJPGMN
         IS 'Program Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJPSB
         IS 'PSB                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJIMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJDB2
         IS 'DB2 Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJDBD
         IS 'DBD                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJPOPT
         IS 'Proc Option        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMJ.IMJGSAMPCB
         IS 'GSAM PCB (Y/N)     ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIMJ
           ON OA1P.XXRTIMJ
          (IMJJN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIMP
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIMP
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMPLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,IMPMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMPJOB# INTEGER
  WITH DEFAULT NULL
        ,IMPJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMPSTEP# INTEGER
  WITH DEFAULT NULL
        ,IMPPGMT CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,IMPPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMPPSB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,IMPIMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,IMPDB2 CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIMP
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIMP
         IS 'IMS - PGM/PSB';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPPGMT
         IS 'Program Type       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPPGMN
         IS 'Program Name       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPPSB
         IS 'PSB                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPIMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMP.IMPDB2
         IS 'DB2 Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIMP
           ON OA1P.XXRTIMP
          (IMPJN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSIMT
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS NO
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTIMT
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBIMS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBPSB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBGPSB CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBLANG CHARACTER(9) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBRESIDENT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBSCHDTYPE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBPGMTYPE CHARACTER(5) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBTRANSACT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBMSGTYPE CHARACTER(25) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBMAXRGN INTEGER
  WITH DEFAULT NULL
        ,TPSBSEGNO INTEGER
  WITH DEFAULT NULL
        ,TPSBSEGSZ INTEGER
  WITH DEFAULT NULL
        ,TPSBSPASZ INTEGER
  WITH DEFAULT NULL
        ,TPSBMODE CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,TPSBEDIT CHARACTER(14) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSIMT
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTIMT
         IS 'IMS - PSB/Transaction';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBIMS
         IS 'IMS Subsystem      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBPSB
         IS 'PSB                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBGPSB
         IS 'GPSB (Y/N)         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBLANG
         IS 'Language           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBRESIDENT
         IS 'Resident (Y/N)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBSCHDTYPE
         IS 'Scheduling Type    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBPGMTYPE
         IS 'Program Type       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBTRANSACT
         IS 'Transaction Code   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBMSGTYPE
         IS 'Message Type       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBMAXRGN
         IS 'Max No Regions     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBSEGNO
         IS 'Max No Segments    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBSEGSZ
         IS 'Segment Size       ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBSPASZ
         IS 'SPA Size           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBMODE
         IS 'Mode               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTIMT.TPSBEDIT
         IS 'Edit               ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIMT0
           ON OA1P.XXRTIMT
          (TPSBPSB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXIMT1
           ON OA1P.XXRTIMT
          (TPSBTRANSACT ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSJES
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTJES
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JESLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,JESMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JESJOB# INTEGER
  WITH DEFAULT NULL
        ,JESJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JESRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,JESCMD CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,JESLN CHARACTER(80) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSJES
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTJES
         IS 'JCL - JES Statements';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.JESLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.JESMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.JESJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.JESJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.JESRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.JESCMD
         IS 'Command            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJES.JESLN
         IS 'JES Command Line   ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXJES0
           ON OA1P.XXRTJES
          (JESJN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXJES1
           ON OA1P.XXRTJES
          (JESMEMB ASC
          ,JESLIB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSJLB
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTJLB
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JLBLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,JLBMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JLBJOB# INTEGER
  WITH DEFAULT NULL
        ,JLBJOBN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JLBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JLBRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,JLBPOSITION INTEGER
  WITH DEFAULT NULL
        ,JLBDSN CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSJLB
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTJLB
         IS 'JCL - JCLLIB-Statements';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.JLBLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.JLBMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.JLBJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.JLBJOBN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.JLBNAME
         IS 'Name               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.JLBRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.JLBPOSITION
         IS 'Position           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLB.JLBDSN
         IS 'DSN                ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXJLB0
           ON OA1P.XXRTJLB
          (JLBJOBN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXJLB1
           ON OA1P.XXRTJLB
          (JLBMEMB ASC
          ,JLBLIB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSJOB
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTJOB
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JOBLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,JOBMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JOBJOB# INTEGER
  WITH DEFAULT NULL
        ,JOBJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JOBRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,JOBACCT CHARACTER(40) FOR SBCS DATA
                                                        NOT NULL
        ,JOBPGMR CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,JOBCLASS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,JOBMSGCL CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,JOBNOTIF CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JOBPRTY CHARACTER(2) FOR SBCS DATA
                                                        NOT NULL
        ,JOBREGIO INTEGER
  WITH DEFAULT NULL
        ,JOBRESTA CHARACTER(17) FOR SBCS DATA
                                                        NOT NULL
        ,JOBTYPRU CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,JOBUSER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JOBADDRSPC CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,JOBBYTES CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,JOBCARDS CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,JOBCOND CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,JOBGROUP CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JOBLINES CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,JOBMSGLEVEL CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,JOBPAGES CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,JOBPERFORM INTEGER
  WITH DEFAULT NULL
        ,JOBRD CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,JOBSECLABEL CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JOBTIME CHARACTER(9) FOR SBCS DATA
                                                        NOT NULL
        ,JOBSCHENV CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,JOBCCSID INTEGER
  WITH DEFAULT NULL
        ,JOBJESLOG CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JOBMEMLIMIT FLOAT(53)
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSJOB
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTJOB
         IS 'JCL - JOB Statements';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBACCT
         IS 'Account            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBPGMR
         IS 'Programmers Name   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBCLASS
         IS 'CLASS              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBMSGCL
         IS 'MSGCLASS           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBNOTIF
         IS 'NOTIFY             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBPRTY
         IS 'PRIORITY           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBREGIO
         IS 'REGION             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBRESTA
         IS 'RESTART            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBTYPRU
         IS 'TYPRUN             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBUSER
         IS 'USER               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBADDRSPC
         IS 'ADDRSPC            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBBYTES
         IS 'BYTES              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBCARDS
         IS 'CARDS              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBCOND
         IS 'COND               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBGROUP
         IS 'GROUP              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBLINES
         IS 'LINES              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBMSGLEVEL
         IS 'MSGLEVEL           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBPAGES
         IS 'PAGES              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBPERFORM
         IS 'PERFORM            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBRD
         IS 'RD (Restart Def.)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBSECLABEL
         IS 'SECLABEL           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBTIME
         IS 'TIME               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBSCHENV
         IS 'SCHENV             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBCCSID
         IS 'CCSID              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBJESLOG
         IS 'JESLOG             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJOB.JOBMEMLIMIT
         IS 'MEMLIMIT           ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXJOB0
           ON OA1P.XXRTJOB
          (JOBJN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXJOB1
           ON OA1P.XXRTJOB
          (JOBMEMB ASC
          ,JOBLIB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSOUT
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTOUT
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,OUTMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTJOB# INTEGER
  WITH DEFAULT NULL
        ,OUTJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTSTEP# INTEGER
  WITH DEFAULT NULL
        ,OUTPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTSTMTN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTCALLEDPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTCALLEDLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,OUTRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,OUTOUTPUTID INTEGER
                                                        NOT NULL
        ,OUTCHARS CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,OUTCLASS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,OUTCOPIE CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,OUTDEST CHARACTER(17) FOR SBCS DATA
                                                        NOT NULL
        ,OUTFLASH CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,OUTFORMD CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTFORMS CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTNAME CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,OUTPAGED CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,OUTWRITE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTADDRESS CHARACTER(60) FOR SBCS DATA
                                                        NOT NULL
        ,OUTBUILDING CHARACTER(60) FOR SBCS DATA
                                                        NOT NULL
        ,OUTBURST CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,OUTCKPTLINE INTEGER
  WITH DEFAULT NULL
        ,OUTCKPTPAGE INTEGER
  WITH DEFAULT NULL
        ,OUTCKPTSEC INTEGER
  WITH DEFAULT NULL
        ,OUTCOMPACT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTCONTROL CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,OUTDATACK CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,OUTDEFAULT CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,OUTDEPT CHARACTER(60) FOR SBCS DATA
                                                        NOT NULL
        ,OUTDPAGELBL CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,OUTFCB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTGROUPID CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTINDEX INTEGER
  WITH DEFAULT NULL
        ,OUTJESDS CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,OUTLINDEX INTEGER
  WITH DEFAULT NULL
        ,OUTLINECT INTEGER
  WITH DEFAULT NULL
        ,OUTMODIFY CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,OUTNOTIFY CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,OUTOUTDISP CHARACTER(11) FOR SBCS DATA
                                                        NOT NULL
        ,OUTPIMSG CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,OUTPRMODE CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTPRTY INTEGER
  WITH DEFAULT NULL
        ,OUTROOM CHARACTER(60) FOR SBCS DATA
                                                        NOT NULL
        ,OUTSYSAREA CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,OUTTHRESHLD INTEGER
  WITH DEFAULT NULL
        ,OUTTITLE CHARACTER(60) FOR SBCS DATA
                                                        NOT NULL
        ,OUTTRC CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,OUTUCS CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,OUTUSERDATA CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        ,OUTUSERLIB CHARACTER(60) FOR SBCS DATA
                                                        NOT NULL
        ,OUTAFPSTATS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,OUTCOLORMAP CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTCOMSETUP CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTDUPLEX CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,OUTFORMLEN CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,OUTFSSDATA CHARACTER(127) FOR SBCS DATA
                                                        NOT NULL
        ,OUTINTRAY INTEGER
  WITH DEFAULT NULL
        ,OUTOFFSETXB CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,OUTOFFSETXF CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,OUTOFFSETYB CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,OUTOFFSETYF CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,OUTOUTBIN INTEGER
  WITH DEFAULT NULL
        ,OUTOVERLAYB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTOVERLAYF CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,OUTOVFL CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,OUTPORTNO INTEGER
  WITH DEFAULT NULL
        ,OUTPRTATTRS CHARACTER(127) FOR SBCS DATA
                                                        NOT NULL
        ,OUTPRTERROR CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,OUTPRTOPTNS CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,OUTPRTQUEUE CHARACTER(127) FOR SBCS DATA
                                                        NOT NULL
        ,OUTRESFMT CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,OUTRETAINS CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,OUTRETAINF CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        ,OUTRETRYL INTEGER
  WITH DEFAULT NULL
        ,OUTRETRYT CHARACTER(10) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSOUT
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTOUT
         IS 'JCL - OUTPUT Statements';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPGMN
         IS 'Programname        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTSTMTN
         IS 'OutName            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCALLEDPROC
         IS 'Called Procedure   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCALLEDLIB
         IS 'Proclib (called)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOUTPUTID
         IS 'Output-Stmt ID     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCHARS
         IS 'CHARS              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCLASS
         IS 'CLASS              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCOPIE
         IS 'COPIES             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTDEST
         IS 'DEST               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTFLASH
         IS 'FLASH              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTFORMD
         IS 'FORMDEF            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTFORMS
         IS 'FORMS              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTNAME
         IS 'NAME               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPAGED
         IS 'PAGEDEF            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTWRITE
         IS 'WRITER             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTADDRESS
         IS 'ADDRESS            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTBUILDING
         IS 'BUILDING           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTBURST
         IS 'BURST              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCKPTLINE
         IS 'CKPTLINE           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCKPTPAGE
         IS 'CKPTPAGE           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCKPTSEC
         IS 'CKPTSEC            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCOMPACT
         IS 'COMPACT            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCONTROL
         IS 'CONTROL            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTDATACK
         IS 'DATACK             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTDEFAULT
         IS 'DEFAULT            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTDEPT
         IS 'DEPT               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTDPAGELBL
         IS 'DPAGELBL           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTFCB
         IS 'FCB                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTGROUPID
         IS 'GROUPID            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTINDEX
         IS 'INDEX              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTJESDS
         IS 'JESDS              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTLINDEX
         IS 'LINDEX             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTLINECT
         IS 'LINECT             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTMODIFY
         IS 'MODIFY             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTNOTIFY
         IS 'NOTIFY             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOUTDISP
         IS 'OUTDISP            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPIMSG
         IS 'PIMSG              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPRMODE
         IS 'PRMODE             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPRTY
         IS 'PRTY               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTROOM
         IS 'ROOM               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTSYSAREA
         IS 'SYSAREA            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTTHRESHLD
         IS 'THRESHLD           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTTITLE
         IS 'TITLE              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTTRC
         IS 'TRC                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTUCS
         IS 'UCS                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTUSERDATA
         IS 'USERDATA           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTUSERLIB
         IS 'USERLIB            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTAFPSTATS
         IS 'AFPSTATS           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCOLORMAP
         IS 'COLORMAP           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTCOMSETUP
         IS 'COMSETUP           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTDUPLEX
         IS 'DUPLEX             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTFORMLEN
         IS 'FORMLEN            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTFSSDATA
         IS 'FSSDATA            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTINTRAY
         IS 'INTRAY             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOFFSETXB
         IS 'OFFSETXB           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOFFSETXF
         IS 'OFFSETXF           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOFFSETYB
         IS 'OFFSETYB           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOFFSETYF
         IS 'OFFSETYF           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOUTBIN
         IS 'OUTBIN             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOVERLAYB
         IS 'OVERLAYB           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOVERLAYF
         IS 'OVERLAYF           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTOVFL
         IS 'OVFL               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPORTNO
         IS 'PORTNO             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPRTATTRS
         IS 'PRTATTRS           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPRTERROR
         IS 'PRTERROR           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPRTOPTNS
         IS 'PRTOPTNS           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTPRTQUEUE
         IS 'PRTQUEUE           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTRESFMT
         IS 'RESFMT             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTRETAINS
         IS 'RETAINS            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTRETAINF
         IS 'RETAINF            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTRETRYL
         IS 'RETRYL             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTOUT.OUTRETRYT
         IS 'RETRYT             ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXOUT
           ON OA1P.XXRTOUT
          (OUTJN ASC
          ,OUTMEMB ASC
          ,OUTLIB ASC
          ,OUTOUTPUTID ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSPRC
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTPRC
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PRCLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,PRCMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PRCJOB# INTEGER
  WITH DEFAULT NULL
        ,PRCJOBN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PRCRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,PRCCALLINGNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PRCCALLINGLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,PRCCALLEDNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PRCCALLEDLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,PRCLEVEL INTEGER
  WITH DEFAULT NULL
        ,PRCTYPE CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,PRCVARNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PRCVARVALUE CHARACTER(102) FOR SBCS DATA
                                                        NOT NULL
        ,PRCVALORIGIN CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,PRCSTEPNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,PRCSTEP# INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSPRC
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTPRC
         IS 'JCL - Procedure Parameters';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCJOBN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCCALLINGNAME
         IS 'Calling Proc/Inc   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCCALLINGLIB
         IS 'Proclib (calling)  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCCALLEDNAME
         IS 'Called Proc/Inc    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCCALLEDLIB
         IS 'Proclib (called)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCLEVEL
         IS 'Call Level         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCTYPE
         IS 'Type (PROC/INC)    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCVARNAME
         IS 'Variable           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCVARVALUE
         IS 'Variable Value     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCVALORIGIN
         IS 'Origin of Value    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCSTEPNAME
         IS 'Step Name          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTPRC.PRCSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXPRC0
           ON OA1P.XXRTPRC
          (PRCJOBN ASC
          ,PRCLIB ASC
          ,PRCMEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXPRC1
           ON OA1P.XXRTPRC
          (PRCCALLEDNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSSET
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTSET
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SETLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,SETMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SETJOB# INTEGER
  WITH DEFAULT NULL
        ,SETJOBN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SETRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,SETPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SETPROCLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,SETTYPE CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,SETNO INTEGER
  WITH DEFAULT NULL
        ,SETVARNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SETVARVALUE CHARACTER(102) FOR SBCS DATA
                                                        NOT NULL
        ,SETSTEPNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SETSTEP# INTEGER
  WITH DEFAULT NULL
        )
        IN SU01A1P.XXRSSET
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTSET
         IS 'JCL - SET JCL Variables';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETJOBN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETPROC
         IS 'Procedure/Include  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETPROCLIB
         IS 'Proclib (called)   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETTYPE
         IS 'Type (INC/PROC)    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETNO
         IS 'Setnumber          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETVARNAME
         IS 'Variable           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETVARVALUE
         IS 'Variable Value     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETSTEPNAME
         IS 'Step Name          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSET.SETSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSET0
           ON OA1P.XXRTSET
          (SETJOBN ASC
          ,SETLIB ASC
          ,SETMEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSET1
           ON OA1P.XXRTSET
          (SETPROC ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSSIN
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTSIN
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SINLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,SINMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SINJOB# INTEGER
  WITH DEFAULT NULL
        ,SINJOBN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SINSTEP# INTEGER
  WITH DEFAULT NULL
        ,SINPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SINDDNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SINRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,SINLINE CHARACTER(80) FOR SBCS DATA
                                                        NOT NULL
        ,SINORD# INTEGER
  WITH DEFAULT NULL
        ,SINDATDSN CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,SINDATMEM CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSSIN
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTSIN
         IS 'JCL - SYSIN Content';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINJOBN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINPGMN
         IS 'Programname        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINDDNAME
         IS 'DD-Name (Stmt)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINLINE
         IS 'Line               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINORD#
         IS 'Line number        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINDATDSN
         IS 'SYSIN-DSN          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSIN.SINDATMEM
         IS 'SYSIN-Member       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSIN0
           ON OA1P.XXRTSIN
          (SINJOBN ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSIN1
           ON OA1P.XXRTSIN
          (SINMEMB ASC
          ,SINLIB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSSMD
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTSMD
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMDJOBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMDJOBSID CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,SMDSTARTTS TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,SMDDDNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMDMODE CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        ,SMDOPENTS TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,SMDCLOSETS TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,SMDDSNAME CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,SMDDURATION INTEGER
  WITH DEFAULT NULL
        ,SMDGDGGEN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMDJESNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMDSTEPNUM INTEGER
  WITH DEFAULT NULL
        ,SMDPRGNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,DELFLAG CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,SMDONDASD CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,SMDDISP CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,SMD1STVOL CHARACTER(6) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSSMD
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTSMD
         IS 'SMF - Dataset Usage';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDJOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDJOBSID
         IS 'System ID          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDSTARTTS
         IS 'Submit Time        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDDDNAME
         IS 'DD-Name            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDMODE
         IS 'Usage              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDOPENTS
         IS 'Open Timestamp     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDCLOSETS
         IS 'Close Timestamp    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDDSNAME
         IS 'DSN                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDDURATION
         IS 'Usage Duration (s) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDGDGGEN
         IS 'Member/Generation  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDJESNAME
         IS 'Jesname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDSTEPNUM
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDPRGNAME
         IS 'Program            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.DELFLAG
         IS 'Deleted (Y/N)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDONDASD
         IS 'DASD (Y/N)         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMDDISP
         IS 'DISP (N,O,S,M, )   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMD.SMD1STVOL
         IS 'VOLSER (1st)       ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSMD0
           ON OA1P.XXRTSMD
          (SMDJOBNAME ASC
          ,SMDSTARTTS ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSMD1
           ON OA1P.XXRTSMD
          (SMDDSNAME ASC
          ,SMDPRGNAME ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSSMF
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTSMF
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMFJOBNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMFJESNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMFSTEPNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMFSTEPNUM INTEGER
  WITH DEFAULT NULL
        ,SMFJOBSID CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,SMFJOBRC CHARACTER(7) FOR SBCS DATA
                                                        NOT NULL
        ,SMFSTARTTS TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,SMFENDTS TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,SMFDURATION INTEGER
  WITH DEFAULT NULL
        ,SMFTWAIT INTEGER
  WITH DEFAULT NULL
        ,SMFTCPU INTEGER
  WITH DEFAULT NULL
        ,SMFEXCP INTEGER
  WITH DEFAULT NULL
        ,SMFSUBMIT TIMESTAMP (6) WITHOUT TIME ZONE
  WITH DEFAULT NULL
        ,SMFJOBSTEPNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMFPRGNAME CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMFWAITENQ INTEGER
  WITH DEFAULT NULL
        ,SMFWAITDEV INTEGER
  WITH DEFAULT NULL
        ,SMFJOBOWNER CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMFJOBACCNT CHARACTER(30) FOR SBCS DATA
                                                        NOT NULL
        ,SMFJOBCLASS CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,DELFLAG CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,SMFSTORB16 INTEGER
  WITH DEFAULT NULL
        ,SMFSTORB16SYS INTEGER
  WITH DEFAULT NULL
        ,SMFSTORA16 INTEGER
  WITH DEFAULT NULL
        ,SMFSTORA16SYS INTEGER
  WITH DEFAULT NULL
        ,SMFSCHEDENV CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,SMFSERVCLASS CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SMFCSUSRVU FLOAT(53)
  WITH DEFAULT NULL
        ,SMFSRBSRVU FLOAT(53)
  WITH DEFAULT NULL
        ,SMFIOSRVU FLOAT(53)
  WITH DEFAULT NULL
        ,SMFTCPUZAAP INTEGER
  WITH DEFAULT NULL
        ,SMFTCPUZIIP INTEGER
  WITH DEFAULT NULL
        ,SMFWORKTYPE CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSSMF
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTSMF
         IS 'SMF - Job/Step Information';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFJOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFJESNAME
         IS 'Jesname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSTEPNAME
         IS 'Stepname           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSTEPNUM
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFJOBSID
         IS 'System ID          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFJOBRC
         IS 'Return-Code        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSTARTTS
         IS 'Start Time         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFENDTS
         IS 'End Time           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFDURATION
         IS 'Duration (sec)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFTWAIT
         IS 'Time since Submit  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFTCPU
         IS 'CPU-Time (sec)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFEXCP
         IS 'EXCP               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSUBMIT
         IS 'Submit Time        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFJOBSTEPNAME
         IS 'JobStepName        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFPRGNAME
         IS 'Program            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFWAITENQ
         IS 'Wait for Enqueue   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFWAITDEV
         IS 'Wait for Device    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFJOBOWNER
         IS 'Owner              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFJOBACCNT
         IS 'Account            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFJOBCLASS
         IS 'Class              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.DELFLAG
         IS 'Deleted (Y/N)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSTORB16
         IS 'Pgm-Stor. below(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSTORB16SYS
         IS 'Sys-Stor. below(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSTORA16
         IS 'Pgm-Stor. above(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSTORA16SYS
         IS 'Sys-Stor. above(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSCHEDENV
         IS 'JCL SCHEDENV Value ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSERVCLASS
         IS 'Service Class      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFCSUSRVU
         IS 'CPU Service Units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFSRBSRVU
         IS 'SRB Service Units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFIOSRVU
         IS 'I/O Service Units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFTCPUZAAP
         IS 'CPU-Time zAAP (sec)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFTCPUZIIP
         IS 'CPU-Time zIIP (sec)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSMF.SMFWORKTYPE
         IS 'Work Type          ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSMF0
           ON OA1P.XXRTSMF
          (SMFJOBNAME ASC
          ,SMFSUBMIT ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSMF1
           ON OA1P.XXRTSMF
          (SMFSTARTTS ASC
          ,SMFENDTS ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSSUB
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS NO
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTSUB
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SUBLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,SUBMEMB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SUBJOB# INTEGER
  WITH DEFAULT NULL
        ,SUBJN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SUBSTEP# INTEGER
  WITH DEFAULT NULL
        ,SUBPGMN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SUBDDN CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SUBCC# INTEGER
  WITH DEFAULT NULL
        ,SUBX694 CHARACTER(4) FOR SBCS DATA
                                                        NOT NULL
        ,SUBCALLEDPROC CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,SUBCALLEDLIB CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,SUBRESERVED CHARACTER(20) FOR SBCS DATA
                                                        NOT NULL
        ,SUBSUBPARM CHARACTER(255) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSSUB
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTSUB
         IS 'JCL - SUBSYS';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBLIB
         IS 'JCL-Lib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBMEMB
         IS 'Member             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBJOB#
         IS 'Job Number         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBJN
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBSTEP#
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBPGMN
         IS 'Programname        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBDDN
         IS 'DD-Name (Stmt)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBCC#
         IS 'Concat-Number      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBX694
         IS 'X694-Key           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBCALLEDPROC
         IS 'Procedure          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBCALLEDLIB
         IS 'Proclib            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBRESERVED
         IS 'Additional Info    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTSUB.SUBSUBPARM
         IS 'SUBSYS             ';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.XXRXSUB
           ON OA1P.XXRTSUB
          (SUBJN ASC
          ,SUBLIB ASC
          ,SUBMEMB ASC
          )
           INCLUDE NULL KEYS
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE XXRSJLS
           IN SU01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 4
           FREEPAGE 0
           PCTFREE 0
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS NO
           LOCKSIZE ANY
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.XXRTJLS
        (XXRDATCLIENT CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATENV CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,XXRDATINFO CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,JLSDSN CHARACTER(44) FOR SBCS DATA
                                                        NOT NULL
        ,JLSLIB CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        )
        IN SU01A1P.XXRSJLS
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRTJLS
         IS 'JCL - Libraries';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLS.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLS.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLS.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLS.JLSDSN
         IS 'Library DSN        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRTJLS.JLSLIB
         IS 'JCL Library Key    ';


 SET CURRENT SQLID = 'S100447';


CREATE VIEW OA1P.XXRVSMI
        ( XXRDATCLIENT
        , XXRDATENV
        , XXRDATINFO
        , SMDJOBNAME
        , SMDJOBSID
        , SMDSTARTTS
        , SMDDDNAME
        , SMDMODE
        , SMDOPENTS
        , SMDCLOSETS
        , SMDDSNAME
        , SMDDURATION
        , SMDGDGGEN
        , SMDJESNAME
        , SMDSTEPNUM
        , SMDPRGNAME
        , DELFLAG
        , SMDONDASD
        , SMDDISP
        , SMD1STVOL
        ) AS
SELECT "XXRDATCLIENT" , "XXRDATENV" , "XXRDATINFO" , "SMDJOBNAME" ,
  "SMDJOBSID" , "SMDSTARTTS" , "SMDDDNAME" , "SMDMODE" , "SMDOPENTS" ,
  "SMDCLOSETS" , "SMDDSNAME" , "SMDDURATION" , "SMDGDGGEN" ,
  "SMDJESNAME" , "SMDSTEPNUM" , "SMDPRGNAME" , "DELFLAG" , "SMDONDASD"
  , "SMDDISP" , "SMD1STVOL" FROM OA1P.XXRTSMD WHERE "DELFLAG" <> 'Y'
;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRVSMI
         IS 'SMF - Dataset Usage (V)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDJOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDJOBSID
         IS 'System ID          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDSTARTTS
         IS 'Submit Time        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDDDNAME
         IS 'DD-Name            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDMODE
         IS 'Usage              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDOPENTS
         IS 'Open Timestamp     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDCLOSETS
         IS 'Close Timestamp    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDDSNAME
         IS 'DSN                ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDDURATION
         IS 'Usage Duration (s) ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDGDGGEN
         IS 'Member/Generation  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDJESNAME
         IS 'Jesname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDSTEPNUM
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDPRGNAME
         IS 'Program            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.DELFLAG
         IS 'Deleted (Y/N)      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDONDASD
         IS 'DASD (Y/N)         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMDDISP
         IS 'DISP (N,O,S,M, )   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMI.SMD1STVOL
         IS 'VOLSER (1st)       ';


 SET CURRENT SQLID = 'S100447';


CREATE VIEW OA1P.XXRVSMJ
        ( XXRDATCLIENT
        , XXRDATENV
        , XXRDATINFO
        , SMFJOBNAME
        , SMFJESNAME
        , SMFJOBSID
        , SMFJOBRC
        , SMFSTARTTS
        , SMFENDTS
        , SMFDURATION
        , SMFTWAIT
        , SMFTCPU
        , SMFEXCP
        , SMFSUBMIT
        , SMFWAITENQ
        , SMFWAITDEV
        , SMFJOBOWNER
        , SMFJOBACCNT
        , SMFJOBCLASS
        , SMFSTORB16
        , SMFSTORB16SYS
        , SMFSTORA16
        , SMFSTORA16SYS
        , SMFSCHEDENV
        , SMFSERVCLASS
        , SMFCSUSRVU
        , SMFSRBSRVU
        , SMFIOSRVU
        , SMFTCPUZAAP
        , SMFTCPUZIIP
        , SMFWORKTYPE
        ) AS
SELECT "XXRDATCLIENT" , "XXRDATENV" , "XXRDATINFO" , "SMFJOBNAME" ,
  "SMFJESNAME" , "SMFJOBSID" , "SMFJOBRC" , "SMFSTARTTS" , "SMFENDTS"
  , "SMFDURATION" , "SMFTWAIT" , "SMFTCPU" , "SMFEXCP" , "SMFSUBMIT" ,
  "SMFWAITENQ" , "SMFWAITDEV" , "SMFJOBOWNER" , "SMFJOBACCNT" ,
  "SMFJOBCLASS" , "SMFSTORB16" , "SMFSTORB16SYS" , "SMFSTORA16" ,
  "SMFSTORA16SYS" , "SMFSCHEDENV" , "SMFSERVCLASS" , "SMFCSUSRVU" ,
  "SMFSRBSRVU" , "SMFIOSRVU" , "SMFTCPUZAAP" , "SMFTCPUZIIP" ,
  "SMFWORKTYPE" FROM OA1P.XXRTSMF WHERE "SMFSTEPNUM" IS NULL AND
  "DELFLAG" <> 'Y'
;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRVSMJ
         IS 'SMF - Job Info (V)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFJOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFJESNAME
         IS 'Jesname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFJOBSID
         IS 'System ID          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFJOBRC
         IS 'Return-Code        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSTARTTS
         IS 'Start Time         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFENDTS
         IS 'End Time           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFDURATION
         IS 'Duration (sec)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFTWAIT
         IS 'Wait for Initiator ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFTCPU
         IS 'CPU-Time (sec)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFEXCP
         IS 'EXCP               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSUBMIT
         IS 'Submit Time        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFWAITENQ
         IS 'Waits for Enqueue  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFWAITDEV
         IS 'Waits for Device   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFJOBOWNER
         IS 'Owner              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFJOBACCNT
         IS 'Account            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFJOBCLASS
         IS 'Class              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSTORB16
         IS 'Pgm-Stor. below(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSTORB16SYS
         IS 'Sys-Stor. below(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSTORA16
         IS 'Pgm-Stor. above(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSTORA16SYS
         IS 'Sys-Stor. above(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSCHEDENV
         IS 'JCL SCHEDENV Value ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSERVCLASS
         IS 'Service Class      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFCSUSRVU
         IS 'CPU service units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFSRBSRVU
         IS 'SRB service units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFIOSRVU
         IS 'I/O service units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFTCPUZAAP
         IS 'CPU-Time zAAP (sec)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFTCPUZIIP
         IS 'CPU-Time zIIP (sec)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMJ.SMFWORKTYPE
         IS 'Work Type          ';


 SET CURRENT SQLID = 'S100447';


CREATE VIEW OA1P.XXRVSMS
        ( XXRDATCLIENT
        , XXRDATENV
        , XXRDATINFO
        , SMFJOBNAME
        , SMFJESNAME
        , SMFSTEPNAME
        , SMFSTEPNUM
        , SMFJOBSID
        , SMFJOBRC
        , SMFSTARTTS
        , SMFENDTS
        , SMFDURATION
        , SMFTWAIT
        , SMFTCPU
        , SMFEXCP
        , SMFSUBMIT
        , SMFJOBSTEPNAME
        , SMFPRGNAME
        , SMFWAITENQ
        , SMFWAITDEV
        , SMFJOBOWNER
        , SMFSTORB16
        , SMFSTORB16SYS
        , SMFSTORA16
        , SMFSTORA16SYS
        , SMFSCHEDENV
        , SMFSERVCLASS
        , SMFCSUSRVU
        , SMFSRBSRVU
        , SMFIOSRVU
        , SMFTCPUZAAP
        , SMFTCPUZIIP
        , SMFWORKTYPE
        ) AS
SELECT "XXRDATCLIENT" , "XXRDATENV" , "XXRDATINFO" , "SMFJOBNAME" ,
  "SMFJESNAME" , "SMFSTEPNAME" , "SMFSTEPNUM" , "SMFJOBSID" ,
  "SMFJOBRC" , "SMFSTARTTS" , "SMFENDTS" , "SMFDURATION" , "SMFTWAIT"
  , "SMFTCPU" , "SMFEXCP" , "SMFSUBMIT" , "SMFJOBSTEPNAME" ,
  "SMFPRGNAME" , "SMFWAITENQ" , "SMFWAITDEV" , "SMFJOBOWNER" ,
  "SMFSTORB16" , "SMFSTORB16SYS" , "SMFSTORA16" , "SMFSTORA16SYS" ,
  "SMFSCHEDENV" , "SMFSERVCLASS" , "SMFCSUSRVU" , "SMFSRBSRVU" ,
  "SMFIOSRVU" , "SMFTCPUZAAP" , "SMFTCPUZIIP" , "SMFWORKTYPE" FROM
  OA1P.XXRTSMF WHERE "SMFSTEPNUM" IS NOT NULL AND "DELFLAG" <> 'Y'
;


 SET CURRENT SQLID = 'S100447';


    LABEL ON TABLE OA1P.XXRVSMS
         IS 'SMF - Step Info (V)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.XXRDATCLIENT
         IS 'Client             ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.XXRDATENV
         IS 'Environment        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.XXRDATINFO
         IS 'DatAddInfo         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFJOBNAME
         IS 'Jobname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFJESNAME
         IS 'Jesname            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSTEPNAME
         IS 'Stepname           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSTEPNUM
         IS 'Stepnumber         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFJOBSID
         IS 'System ID          ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFJOBRC
         IS 'Return-Code        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSTARTTS
         IS 'Start Time         ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFENDTS
         IS 'End Time           ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFDURATION
         IS 'Duration (sec)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFTWAIT
         IS 'Time since Submit  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFTCPU
         IS 'CPU-Time (sec)     ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFEXCP
         IS 'EXCP               ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSUBMIT
         IS 'Submit Time        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFJOBSTEPNAME
         IS 'JobStepName        ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFPRGNAME
         IS 'Program            ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFWAITENQ
         IS 'Wait for Enqueue   ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFWAITDEV
         IS 'Wait for Device    ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFJOBOWNER
         IS 'Owner              ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSTORB16
         IS 'Pgm-Stor. below(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSTORB16SYS
         IS 'Sys-Stor. below(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSTORA16
         IS 'Pgm-Stor. above(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSTORA16SYS
         IS 'Sys-Stor. above(KB)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSCHEDENV
         IS 'JCL SCHEDENV Value ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSERVCLASS
         IS 'Service Class      ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFCSUSRVU
         IS 'CPU service units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFSRBSRVU
         IS 'SRB service units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFIOSRVU
         IS 'I/O service units  ';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFTCPUZAAP
         IS 'CPU-Time zAAP (sec)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFTCPUZIIP
         IS 'CPU-Time zIIP (sec)';


 SET CURRENT SQLID = 'S100447';


    LABEL ON COLUMN OA1P.XXRVSMS.SMFWORKTYPE
         IS 'Work Type          ';

}¢--- A540769.WK.SQL(SU03DROP) cre=2016-07-29 mod=2016-07-29-16.41.00 A540769 ---
select 'drop tablespace '
       || strip(dbName) || '.' || strip(tsName)
       || '; commit; -- '
       || strip(creator) || '.' || strip(name)
     from sysibm.sysTables
     where type not in ('A', 'V')
         and dbName = 'SU03A1P'
$#out                                              20160729 15:42:52
COL1
drop tablespace SU03A1P.SSUXCMD; commit; -- OA1P.TSUXCMD
drop tablespace SU03A1P.SSUXCMT; commit; -- OA1P.TSUXCMT
drop tablespace SU03A1P.SSUXCX1; commit; -- OA1P.TSUXCX1
drop tablespace SU03A1P.SSUXCX2; commit; -- OA1P.TSUXCX2
drop tablespace SU03A1P.SSUXCX3; commit; -- OA1P.TSUXCX3
drop tablespace SU03A1P.SSUXCX4; commit; -- OA1P.TSUXCX4
drop tablespace SU03A1P.SSUXCX5; commit; -- OA1P.TSUXCX5
drop tablespace SU03A1P.SSUXCXB; commit; -- OA1P.TSUXCXB
drop tablespace SU03A1P.SSUXCXD; commit; -- OA1P.TSUXCXD
drop tablespace SU03A1P.SSUXCXG; commit; -- OA1P.TSUXCXG
drop tablespace SU03A1P.SSUXCXJ; commit; -- OA1P.TSUXCXJ
drop tablespace SU03A1P.SSUXCXN; commit; -- OA1P.TSUXCXN
drop tablespace SU03A1P.SSUXCXP; commit; -- OA1P.TSUXCXP
drop tablespace SU03A1P.SSUXCXR; commit; -- OA1P.TSUXCXR
drop tablespace SU03A1P.SSUXCXS; commit; -- OA1P.TSUXCXS
drop tablespace SU03A1P.SSUXCXT; commit; -- OA1P.TSUXCXT
drop tablespace SU03A1P.SSUXCXV; commit; -- OA1P.TSUXCXV
drop tablespace SU03A1P.SSUXD21; commit; -- OA1P.TSUXD21
drop tablespace SU03A1P.SSUXD22; commit; -- OA1P.TSUXD22
drop tablespace SU03A1P.SSUXD23; commit; -- OA1P.TSUXD23
drop tablespace SU03A1P.SSUXD24; commit; -- OA1P.TSUXD24
drop tablespace SU03A1P.SSUXD25; commit; -- OA1P.TSUXD25
drop tablespace SU03A1P.SSUXD26; commit; -- OA1P.TSUXD26
drop tablespace SU03A1P.SSUXD27; commit; -- OA1P.TSUXD27
drop tablespace SU03A1P.SSUXD28; commit; -- OA1P.TSUXD28
drop tablespace SU03A1P.SSUXD29; commit; -- OA1P.TSUXD29
drop tablespace SU03A1P.SSUXD2A; commit; -- OA1P.TSUXD2A
drop tablespace SU03A1P.SSUXD2B; commit; -- OA1P.TSUXD2B
drop tablespace SU03A1P.SSUXD2C; commit; -- OA1P.TSUXD2C
drop tablespace SU03A1P.SSUXD2D; commit; -- OA1P.TSUXD2D
drop tablespace SU03A1P.SSUXD2F; commit; -- OA1P.TSUXD2F
drop tablespace SU03A1P.SSUXD2G; commit; -- OA1P.TSUXD2G
drop tablespace SU03A1P.SSUXD2I; commit; -- OA1P.TSUXD2I
drop tablespace SU03A1P.SSUXD2P; commit; -- OA1P.TSUXD2P
drop tablespace SU03A1P.SSUXD2R; commit; -- OA1P.TSUXD2R
drop tablespace SU03A1P.SSUXD2S; commit; -- OA1P.TSUXD2S
drop tablespace SU03A1P.SSUXD2U; commit; -- OA1P.TSUXD2U
drop tablespace SU03A1P.SSUXD2V; commit; -- OA1P.TSUXD2V
drop tablespace SU03A1P.SSUXDDF; commit; -- OA1P.TSUXDDF
drop tablespace SU03A1P.SSUXDDH; commit; -- OA1P.TSUXDDH
drop tablespace SU03A1P.SSUXDDP; commit; -- OA1P.TSUXDDP
drop tablespace SU03A1P.SSUXEXE; commit; -- OA1P.TSUXEXE
drop tablespace SU03A1P.SSUXFLJ; commit; -- OA1P.TSUXFLJ
drop tablespace SU03A1P.SSUXFLO; commit; -- OA1P.TSUXFLO
drop tablespace SU03A1P.SSUXIFS; commit; -- OA1P.TSUXIFS
drop tablespace SU03A1P.SSUXIM0; commit; -- OA1P.TSUXIM0
drop tablespace SU03A1P.SSUXIM1; commit; -- OA1P.TSUXIM1
drop tablespace SU03A1P.SSUXIM2; commit; -- OA1P.TSUXIM2
drop tablespace SU03A1P.SSUXIM3; commit; -- OA1P.TSUXIM3
drop tablespace SU03A1P.SSUXIM4; commit; -- OA1P.TSUXIM4
drop tablespace SU03A1P.SSUXIM5; commit; -- OA1P.TSUXIM5
drop tablespace SU03A1P.SSUXIM6; commit; -- OA1P.TSUXIM6
drop tablespace SU03A1P.SSUXIM7; commit; -- OA1P.TSUXIM7
drop tablespace SU03A1P.SSUXIMD; commit; -- OA1P.TSUXIMD
drop tablespace SU03A1P.SSUXIMJ; commit; -- OA1P.TSUXIMJ
drop tablespace SU03A1P.SSUXIMP; commit; -- OA1P.TSUXIMP
drop tablespace SU03A1P.SSUXIMT; commit; -- OA1P.TSUXIMT
drop tablespace SU03A1P.SSUXJES; commit; -- OA1P.TSUXJES
drop tablespace SU03A1P.SSUXJLB; commit; -- OA1P.TSUXJLB
drop tablespace SU03A1P.SSUXJLS; commit; -- OA1P.TSUXJLS
drop tablespace SU03A1P.SSUXJOB; commit; -- OA1P.TSUXJOB
drop tablespace SU03A1P.SSUXOUT; commit; -- OA1P.TSUXOUT
drop tablespace SU03A1P.SSUXPRC; commit; -- OA1P.TSUXPRC
drop tablespace SU03A1P.SSUXSET; commit; -- OA1P.TSUXSET
drop tablespace SU03A1P.SSUXSIN; commit; -- OA1P.TSUXSIN
drop tablespace SU03A1P.SSUXSMD; commit; -- OA1P.TSUXSMD
drop tablespace SU03A1P.SSUXSMF; commit; -- OA1P.TSUXSMF
drop tablespace SU03A1P.SSUXSUB; commit; -- OA1P.TSUXSUB
68 rows fetched: select 'drop tablespace ' || strip(dbName) || '.' || stri...
$#out                                              20160729 15:38:40
}¢--- A540769.WK.SQL(SV31REST) cre=2011-05-31 mod=2011-05-31-16.24.49 A540769 ---
set current sqlid = 'S100447';
select count (*) from OA1A.TSV310A1;
select count (*) from OA1A.TSV311A1;
select count (*) from OA1A.TSV312A1;
select count (*) from OA1A.TSV313A1;
select count (*) from OA1A.TSV314A1;
select count (*) from OA1A.TSV315A1;
select count (*) from OA1A.TSV316A1;
select count (*) from OA1A.TSV317A1;
select count (*) from OA1A.TSV318A1;
select count (*) from OA1A.TSV319A1;

alter table OA1A.TSV310A1 alter BUSINESSUNITID restart with 1;
alter table OA1A.TSV311A1 alter TAXCLIENTID restart with 1;
alter table OA1A.TSV312A1 alter SECURITYID restart with 1;
alter table OA1A.TSV313A1 alter SECPOSID restart with 1;
alter table OA1A.TSV314A1 alter SECTXID restart with 1;
alter table OA1A.TSV315A1 alter MMPOSID restart with 1;
alter table OA1A.TSV316A1 alter MMINCOMEID restart with 1;
alter table OA1A.TSV317A1 alter SACID restart with 1;
alter table OA1A.TSV318A1 alter SACINCOMEID restart with 1;
alter table OA1A.TSV319A1 alter FEEID restart with 1;

commit;
;;;
with c as
(  select *
    from sysibm.sysColumns c
    where tbName like 'TSV31%' and tbCreator = 'OA1A'
         and default between 'D' and 'J'
)
select 'select count (*) from '
       || strip(tbCreator) || '.' || strip(tbName) || ';' , c.*
       from c
union all
select 'alter table ' || strip(tbCreator) || '.' || strip(tbName)
       || ' alter ' || strip(name) || ' restart with 1;', c.*
    from c
    order by 1
;;;
select count(*) FROM OA1A.TSV310A1;
ALTER TABLE OA1A.TSV310A1
    alter BUSINESSUNITID restart with 1;
rollback;
}¢--- A540769.WK.SQL(SYSCOAL0) cre=2006-05-12 mod=2006-05-12-17.48.52 F540769 ---
SELECT DBNAME, NAME                                                     00012006
    FROM SYSIBM.SYSTABLESPACE  T                                        00015000
    WHERE NOT EXISTS                                                    00015106
        (SELECT *                                                       00015206
            FROM SYSIBM.SYSCOPY C                                       00015306
            WHERE C.DBNAME = T.DBNAME AND C.TSNAME = T.NAME)            00015406
      AND DBNAME IN(                                                    00016007
       'XB9O8117',                                                      00017000
       'XB9O9015',                                                      00018000
       'XB9O8116',                                                      00019000
       'XB9PI001',                                                      00020000
       'XB9PI002',                                                      00030000
       'XB9PI003',                                                      00040000
       'XB9P2001',                                                      00050000
       'XB9P2002',                                                      00060000
       'XB9P2003',                                                      00070000
       'XB9P2004',                                                      00080000
       'XB9P2005',                                                      00090000
       'XB9P2006',                                                      00100000
       'XB9P2007',                                                      00110000
       'XB9OM001',                                                      00120000
       'XB9OM002',                                                      00130000
       'XB9OM003',                                                      00140000
       'XB9O6001',                                                      00150000
       'XB9O6002',                                                      00160000
       'XB9O6003',                                                      00170000
       'XB9OZ001',                                                      00180000
       'XB9OZ002',                                                      00190000
       'XB9OZ003',                                                      00200000
       'XB9OJ001',                                                      00210000
       'XB9OJ002',                                                      00220000
       'XB9OJ003',                                                      00230000
       'XB9OT001',                                                      00240000
       'XB9OT002',                                                      00250000
       'XB9OT003',                                                      00260000
       'XB9OD001',                                                      00270000
       'XB9OD002',                                                      00280000
       'XB9P7001',                                                      00290000
       'XB9P7002',                                                      00300000
       'XB9OR001',                                                      00310000
       'XB9OR002',                                                      00320000
       'XB9OR003',                                                      00330000
       'XB9OB001',                                                      00340000
       'XB9OB002',                                                      00350000
       'XB9OB003',                                                      00360000
       'XB9NV001',                                                      00370000
       'XB9NV002',                                                      00380000
       'XB9P3001',                                                      00390000
       'XB9P3002',                                                      00400000
       'XB9P3003',                                                      00410000
       'XB9P3004',                                                      00420000
       'XB9ON001',                                                      00430000
       'XB9ON002',                                                      00440000
       'XB9ON003',                                                      00450000
       'XB9ON004',                                                      00460000
       'XB9ON005',                                                      00470000
       'XB9ON006',                                                      00480000
       'XB9ON007',                                                      00490000
       'XB9ON008',                                                      00500000
       'XB9ON009',                                                      00510000
       'XB9ON010',                                                      00520000
       'XB9ON011',                                                      00530000
       'XB9ON012',                                                      00540000
       'XB9ON013',                                                      00550000
       'XB9ON014',                                                      00560000
       'XB9ON015',                                                      00570000
       'XB9ON016',                                                      00580000
       'XB9ON017',                                                      00590000
       'XB9ON018',                                                      00600000
       'XB9ON019',                                                      00610000
       'XB9ON020',                                                      00620000
       'XB9ON021',                                                      00630000
       'XB9ON022',                                                      00640000
       'XB9ON023',                                                      00650000
       'XB9ON024',                                                      00660000
       'XB9ON025',                                                      00670000
       'XB9ON026',                                                      00680000
       'XB9ON027',                                                      00690000
       'XB9ON028',                                                      00700000
       'XB9ON029',                                                      00710000
       'XB9ON030',                                                      00720000
       'XB9ON031',                                                      00730000
       'XB9ON032',                                                      00740000
       'XB9ON033',                                                      00750000
       'XB9ON034',                                                      00760000
       'XB9ON035',                                                      00770000
       'XB9ON036',                                                      00780000
       'XB9ON037',                                                      00790000
       'XB9ON038',                                                      00800000
       'XB9ON039',                                                      00810000
       'XB9ON040',                                                      00820000
       'XB9ON041',                                                      00830000
       'XB9ON042',                                                      00840000
       'XB9ON043',                                                      00850000
       'XB9ON044',                                                      00860000
       'XB9O7001',                                                      00870000
       'XB9O7002',                                                      00880000
       'XB9O7003',                                                      00890000
       'XB9O7004',                                                      00900000
       'XB9O7005',                                                      00910000
       'XB9O7006',                                                      00920000
       'XB9O7007',                                                      00930000
       'XB9O7008',                                                      00940000
       'XB9O7009',                                                      00950000
       'XB9O7010',                                                      00960000
       'XB9O7011',                                                      00970000
       'XB9O7012',                                                      00980000
       'XB9O7013',                                                      00990000
       'XB9O7014',                                                      01000000
       'XB9O7015',                                                      01010000
       'XB9NR001',                                                      01020000
       'XB9NR002',                                                      01030000
       'XB9NR003',                                                      01040000
       'XB9P8001',                                                      01050000
       'XB9P8002',                                                      01060000
       'XB9OS001',                                                      01070000
       'XB9OS002',                                                      01080000
       'XB9OS003',                                                      01090000
       'XB9OC001',                                                      01100000
       'XB9OC002',                                                      01110000
       'XB9OC003',                                                      01120000
       'XB9PA001',                                                      01130000
       'XB9PA002',                                                      01140000
       'XB9PA003',                                                      01150000
       'XB9OU001',                                                      01160000
       'XB9OU002',                                                      01170000
       'XB9OU003',                                                      01180000
       'XB9OU004',                                                      01190000
       'XB9OU005',                                                      01200000
       'XB9OU006',                                                      01210000
       'XB9OE001',                                                      01220000
       'XB9OE002',                                                      01230000
       'XB9OE003',                                                      01240000
       'XB9OE004',                                                      01250000
       'XB9NY001',                                                      01260000
       'XB9NY002',                                                      01270000
       'XB9NY003',                                                      01280000
       'XB9PB001',                                                      01290000
       'XB9PB002',                                                      01300000
       'XB9PB003',                                                      01310000
       'XB9OV001',                                                      01320000
       'XB9OV002',                                                      01330000
       'XB9OV003',                                                      01340000
       'XB9OF001',                                                      01350000
       'XB9OF002',                                                      01360000
       'XB9OF003',                                                      01370000
       'XB9NZ001',                                                      01380000
       'XB9NZ002',                                                      01390000
       'XB9NZ003',                                                      01400000
       'XBAXF001',                                                      01410000
       'XBAXE001',                                                      01420000
       'XBAXD001',                                                      01430000
       'XBAXC001',                                                      01440000
       'XBAOQ001',                                                      01450000
       'XBAOQ002',                                                      01460000
       'XBAOQ003',                                                      01470000
       'XBAOP001',                                                      01480000
       'XBAOP002',                                                      01490000
       'XBAOP003',                                                      01500000
       'XBAOO001',                                                      01510000
       'XBAOO002',                                                      01520000
       'XBAON001',                                                      01530000
       'XBAON002',                                                      01540000
       'XBAON003',                                                      01550000
       'XB9ZV001',                                                      01560000
       'XB9ZV002',                                                      01570000
       'XB9ZV003',                                                      01580000
       'XB9ZU001',                                                      01590000
       'XB9ZU002',                                                      01600000
       'XB9ZU003',                                                      01610000
       'XB9ZT001',                                                      01620000
       'XB9ZT002',                                                      01630000
       'XB9ZT003',                                                      01640000
       'XB9OX001',                                                      01650000
       'XB9OX002',                                                      01660000
       'XB9OX003',                                                      01670000
       'XB9OH001',                                                      01680000
       'XB9OH002',                                                      01690000
       'XB9OH003',                                                      01700000
       'XB9O1001',                                                      01710000
       'XB9O1002',                                                      01720000
       'XB9P4001',                                                      01730000
       'XB9P4002',                                                      01740000
       'XB9P4003',                                                      01750000
       'XB9P4004',                                                      01760000
       'XB9P4005',                                                      01770000
       'XB9P4006',                                                      01780000
       'XB9P4007',                                                      01790000
       'XB9P4008',                                                      01800000
       'XB9OO001',                                                      01810000
       'XB9OO002',                                                      01820000
       'XB9OO003',                                                      01830000
       'XB9OO004',                                                      01840000
       'XB9OO005',                                                      01850000
       'XB9OO006',                                                      01860000
       'XB9OO007',                                                      01870000
       'XB9OO008',                                                      01880000
       'XB9OO009',                                                      01890000
       'XB9OO010',                                                      01900000
       'XB9OO011',                                                      01910000
       'XB9OO012',                                                      01920000
       'XB9OO013',                                                      01930000
       'XB9OO014',                                                      01940000
       'XB9OO015',                                                      01950000
       'XB9OO016',                                                      01960000
       'XB9OO017',                                                      01970000
       'XB9OO018',                                                      01980000
       'XB9OO019',                                                      01990000
       'XB9OO020',                                                      02000000
       'XB9OO021',                                                      02010000
       'XB9OO022',                                                      02020000
       'XB9OO023',                                                      02030000
       'XB9OO024',                                                      02040000
       'XB9OO025',                                                      02050000
       'XB9OO026',                                                      02060000
       'XB9OO027',                                                      02070000
       'XB9OO028',                                                      02080000
       'XB9OO029',                                                      02090000
       'XB9OO030',                                                      02100000
       'XB9OO031',                                                      02110000
       'XB9OO032',                                                      02120000
       'XB9OO033',                                                      02130000
       'XB9OO034',                                                      02140000
       'XB9OO035',                                                      02150000
       'XB9OO036',                                                      02160000
       'XB9OO037',                                                      02170000
       'XB9OO038',                                                      02180000
       'XB9OO039',                                                      02190000
       'XB9OO040',                                                      02200000
       'XB9OO041',                                                      02210000
       'XB9OO042',                                                      02220000
       'XB9OO043',                                                      02230000
       'XB9OO044',                                                      02240000
       'XB9OO045',                                                      02250000
       'XB9OO046',                                                      02260000
       'XB9OO047',                                                      02270000
       'XB9OO048',                                                      02280000
       'XB9OO049',                                                      02290000
       'XB9OO050',                                                      02300000
       'XB9OO051',                                                      02310000
       'XB9OO052',                                                      02320000
       'XB9OO053',                                                      02330000
       'XB9OO054',                                                      02340000
       'XB9OO055',                                                      02350000
       'XB9OO056',                                                      02360000
       'XB9OO057',                                                      02370000
       'XB9OO058',                                                      02380000
       'XB9OO059',                                                      02390000
       'XB9OO060',                                                      02400000
       'XB9OO061',                                                      02410000
       'XB9OO062',                                                      02420000
       'XB9OO063',                                                      02430000
       'XB9OO064',                                                      02440000
       'XB9OO065',                                                      02450000
       'XB9OO066',                                                      02460000
       'XB9OO067',                                                      02470000
       'XB9OO068',                                                      02480000
       'XB9OO069',                                                      02490000
       'XB9OO070',                                                      02500000
       'XB9OO071',                                                      02510000
       'XB9OO072',                                                      02520000
       'XB9OO073',                                                      02530000
       'XB9OO074',                                                      02540000
       'XB9OO075',                                                      02550000
       'XB9OO076',                                                      02560000
       'XB9OO077',                                                      02570000
       'XB9OO078',                                                      02580000
       'XB9OO079',                                                      02590000
       'XB9OO080',                                                      02600000
       'XB9OO081',                                                      02610000
       'XB9OO082',                                                      02620000
       'XB9OO083',                                                      02630000
       'XB9OO084',                                                      02640000
       'XB9OO085',                                                      02650000
       'XB9OO086',                                                      02660000
       'XB9OO087',                                                      02670000
       'XB9OO088',                                                      02680000
       'XB9OO089',                                                      02690000
       'XB9OO090',                                                      02700000
       'XB9OO091',                                                      02710000
       'XB9OO092',                                                      02720000
       'XB9OO093',                                                      02730000
       'XB9OO094',                                                      02740000
       'XB9OO095',                                                      02750000
       'XB9OO096',                                                      02760000
       'XB9OO097',                                                      02770000
       'XB9OO098',                                                      02780000
       'XB9OO099',                                                      02790000
       'XB9OO100',                                                      02800000
       'XB9OO101',                                                      02810000
       'XB9OO102',                                                      02820000
       'XB9OO103',                                                      02830000
       'XB9OO104',                                                      02840000
       'XB9OO105',                                                      02850000
       'XB9OO106',                                                      02860000
       'XB9OO107',                                                      02870000
       'XB9OO108',                                                      02880000
       'XB9OO109',                                                      02890000
       'XB9OO110',                                                      02900000
       'XB9OO111',                                                      02910000
       'XB9OO112',                                                      02920000
       'XB9OO113',                                                      02930000
       'XB9OO114',                                                      02940000
       'XB9OO115',                                                      02950000
       'XB9OO116',                                                      02960000
       'XB9OO117',                                                      02970000
       'XB9OO118',                                                      02980000
       'XB9OO119',                                                      02990000
       'XB9OO120',                                                      03000000
       'XB9OO121',                                                      03010000
       'XB9OO122',                                                      03020000
       'XB9OO123',                                                      03030000
       'XB9OO124',                                                      03040000
       'XB9OO125',                                                      03050000
       'XB9OO126',                                                      03060000
       'XB9OO127',                                                      03070000
       'XB9OO128',                                                      03080000
       'XB9OO129',                                                      03090000
       'XB9OO130',                                                      03100000
       'XB9OO131',                                                      03110000
       'XB9OO132',                                                      03120000
       'XB9OO133',                                                      03130000
       'XB9OO134',                                                      03140000
       'XB9OO135',                                                      03150000
       'XB9OO136',                                                      03160000
       'XB9OO137',                                                      03170000
       'XB9OO138',                                                      03180000
       'XB9OO139',                                                      03190000
       'XB9OO140',                                                      03200000
       'XB9OO141',                                                      03210000
       'XB9OO142',                                                      03220000
       'XB9OO143',                                                      03230000
       'XB9OO144',                                                      03240000
       'XB9OO145',                                                      03250000
       'XB9OO146',                                                      03260000
       'XB9OO147',                                                      03270000
       'XB9OO148',                                                      03280000
       'XB9OO149',                                                      03290000
       'XB9OO150',                                                      03300000
       'XB9OO151',                                                      03310000
       'XB9OO152',                                                      03320000
       'XB9OO153',                                                      03330000
       'XB9OO154',                                                      03340000
       'XB9OO155',                                                      03350000
       'XB9OO156',                                                      03360000
       'XB9OO157',                                                      03370000
       'XB9OO158',                                                      03380000
       'XB9OO159',                                                      03390000
       'XB9OO160',                                                      03400000
       'XB9OO161',                                                      03410000
       'XB9OO162',                                                      03420000
       'XB9OO163',                                                      03430000
       'XB9OO164',                                                      03440000
       'XB9OO165',                                                      03450000
       'XB9OO166',                                                      03460000
       'XB9OO167',                                                      03470000
       'XB9OO168',                                                      03480000
       'XB9OO169',                                                      03490000
       'XB9OO170',                                                      03500000
       'XB9OO171',                                                      03510000
       'XB9OO172',                                                      03520000
       'XB9OO173',                                                      03530000
       'XB9OO174',                                                      03540000
       'XB9OO175',                                                      03550000
       'XB9OO176',                                                      03560000
       'XB9OO177',                                                      03570000
       'XB9OO178',                                                      03580000
       'XB9OO179',                                                      03590000
       'XB9OO180',                                                      03600000
       'XB9OO181',                                                      03610000
       'XB9OO182',                                                      03620000
       'XB9OO183',                                                      03630000
       'XB9OO184',                                                      03640000
       'XB9OO185',                                                      03650000
       'XB9OO186',                                                      03660000
       'XB9OO187',                                                      03670000
       'XB9OO188',                                                      03680000
       'XB9OO189',                                                      03690000
       'XB9OO190',                                                      03700000
       'XB9OO191',                                                      03710000
       'XB9OO192',                                                      03720000
       'XB9OO193',                                                      03730000
       'XB9OO194',                                                      03740000
       'XB9OO195',                                                      03750000
       'XB9OO196',                                                      03760000
       'XB9OO197',                                                      03770000
       'XB9OO198',                                                      03780000
       'XB9OO199',                                                      03790000
       'XB9OO200',                                                      03800000
       'XB9OO201',                                                      03810000
       'XB9OO202',                                                      03820000
       'XB9OO203',                                                      03830000
       'XB9OO204',                                                      03840000
       'XB9OO205',                                                      03850000
       'XB9OO206',                                                      03860000
       'XB9OO207',                                                      03870000
       'XB9OO208',                                                      03880000
       'XB9OO209',                                                      03890000
       'XB9OO210',                                                      03900000
       'XB9OO211',                                                      03910000
       'XB9OO212',                                                      03920000
       'XB9OO213',                                                      03930000
       'XB9OO214',                                                      03940000
       'XB9OO215',                                                      03950000
       'XB9OO216',                                                      03960000
       'XB9OO217',                                                      03970000
       'XB9OO218',                                                      03980000
       'XB9OO219',                                                      03990000
       'XB9OO220',                                                      04000000
       'XB9OO221',                                                      04010000
       'XB9OO222',                                                      04020000
       'XB9OO223',                                                      04030000
       'XB9OO224',                                                      04040000
       'XB9OO225',                                                      04050000
       'XB9OO226',                                                      04060000
       'XB9OO227',                                                      04070000
       'XB9OO228',                                                      04080000
       'XB9OO229',                                                      04090000
       'XB9O8001',                                                      04100000
       'XB9O8002',                                                      04110000
       'XB9O8003',                                                      04120000
       'XB9O8004',                                                      04130000
       'XB9O8005',                                                      04140000
       'XB9O8006',                                                      04150000
       'XB9O8007',                                                      04160000
       'XB9O8008',                                                      04170000
       'XB9O8009',                                                      04180000
       'XB9O8010',                                                      04190000
       'XB9O8011',                                                      04200000
       'XB9O8012',                                                      04210000
       'XB9O8013',                                                      04220000
       'XB9O8014',                                                      04230000
       'XB9O8015',                                                      04240000
       'XB9O8016',                                                      04250000
       'XB9O8017',                                                      04260000
       'XB9O8018',                                                      04270000
       'XB9O8019',                                                      04280000
       'XB9O8020',                                                      04290000
       'XB9O8021',                                                      04300000
       'XB9O8022',                                                      04310000
       'XB9O8023',                                                      04320000
       'XB9O8024',                                                      04330000
       'XB9O8025',                                                      04340000
       'XB9O8026',                                                      04350000
       'XB9O8027',                                                      04360000
       'XB9O8028',                                                      04370000
       'XB9O8029',                                                      04380000
       'XB9O8030',                                                      04390000
       'XB9O8031',                                                      04400000
       'XB9O8032',                                                      04410000
       'XB9O8033',                                                      04420000
       'XB9O8034',                                                      04430000
       'XB9O8035',                                                      04440000
       'XB9O8036',                                                      04450000
       'XB9O8037',                                                      04460000
       'XB9O8038',                                                      04470000
       'XB9O8039',                                                      04480000
       'XB9O8040',                                                      04490000
       'XB9O8041',                                                      04500000
       'XB9O8042',                                                      04510000
       'XB9O8043',                                                      04520000
       'XB9O8044',                                                      04530000
       'XB9O8045',                                                      04540000
       'XB9O8046',                                                      04550000
       'XB9O8047',                                                      04560000
       'XB9O8048',                                                      04570000
       'XB9O8049',                                                      04580000
       'XB9O8050',                                                      04590000
       'XB9O8051',                                                      04600000
       'XB9O8052',                                                      04610000
       'XB9O8053',                                                      04620000
       'XB9O8054',                                                      04630000
       'XB9O8055',                                                      04640000
       'XB9O8056',                                                      04650000
       'XB9O8057',                                                      04660000
       'XB9O8058',                                                      04670000
       'XB9O8059',                                                      04680000
       'XB9O8060',                                                      04690000
       'XB9O8061',                                                      04700000
       'XB9O8062',                                                      04710000
       'XB9O8063',                                                      04720000
       'XB9O8064',                                                      04730000
       'XB9O8065',                                                      04740000
       'XB9O8066',                                                      04750000
       'XB9O8067',                                                      04760000
       'XB9O8068',                                                      04770000
       'XB9O8069',                                                      04780000
       'XB9O8070',                                                      04790000
       'XB9O8071',                                                      04800000
       'XB9O8072',                                                      04810000
       'XB9O8073',                                                      04820000
       'XB9O8074',                                                      04830000
       'XB9O8075',                                                      04840000
       'XB9O8076',                                                      04850000
       'XB9O8077',                                                      04860000
       'XB9O8078',                                                      04870000
       'XB9O8079',                                                      04880000
       'XB9O8080',                                                      04890000
       'XB9O8081',                                                      04900000
       'XB9O8082',                                                      04910000
       'XB9O8083',                                                      04920000
       'XB9O8084',                                                      04930000
       'XB9O8085',                                                      04940000
       'XB9O8086',                                                      04950000
       'XB9O8087',                                                      04960000
       'XB9O8088',                                                      04970000
       'XB9O8089',                                                      04980000
       'XB9O8090',                                                      04990000
       'XB9O8091',                                                      05000000
       'XB9O8092',                                                      05010000
       'XB9O8093',                                                      05020000
       'XB9O8094',                                                      05030000
       'XB9O8095',                                                      05040000
       'XB9O8096',                                                      05050000
       'XB9O8097',                                                      05060000
       'XB9O8098',                                                      05070000
       'XB9O8099',                                                      05080000
       'XB9O8100',                                                      05090000
       'XB9O8101',                                                      05100000
       'XB9O8102',                                                      05110000
       'XB9O8103',                                                      05120000
       'XB9O8104',                                                      05130000
       'XB9O8105',                                                      05140000
       'XB9O8106',                                                      05150000
       'XB9O8107',                                                      05160000
       'XB9O8108',                                                      05170000
       'XB9O8109',                                                      05180000
       'XB9O8110',                                                      05190000
       'XB9O8111',                                                      05200000
       'XB9O8112',                                                      05210000
       'XB9O8113',                                                      05220000
       'XB9O8114',                                                      05230000
       'XB9O8115',                                                      05240000
       'XB9NS001',                                                      05250000
       'XB9NS002',                                                      05260000
       'XB9NS003',                                                      05270000
       'XB9NS004',                                                      05280000
       'XB9NS005',                                                      05290000
       'XB9NS006',                                                      05300000
       'XB9NS007',                                                      05310000
       'XB9NS008',                                                      05320000
       'XB9NS009',                                                      05330000
       'XB9P5001',                                                      05340000
       'XB9P5002',                                                      05350000
       'XB9P5003',                                                      05360000
       'XB9P5004',                                                      05370000
       'XB9OP001',                                                      05380000
       'XB9OP002',                                                      05390000
       'XB9OP003',                                                      05400000
       'XB9OP004',                                                      05410000
       'XB9OP005',                                                      05420000
       'XB9OP006',                                                      05430000
       'XB9OP007',                                                      05440000
       'XB9OP008',                                                      05450000
       'XB9OP009',                                                      05460000
       'XB9OP010',                                                      05470000
       'XB9OP011',                                                      05480000
       'XB9OP012',                                                      05490000
       'XB9OP013',                                                      05500000
       'XB9OP014',                                                      05510000
       'XB9OP015',                                                      05520000
       'XB9OP016',                                                      05530000
       'XB9OP017',                                                      05540000
       'XB9OP018',                                                      05550000
       'XB9OP019',                                                      05560000
       'XB9OP020',                                                      05570000
       'XB9OP021',                                                      05580000
       'XB9OP022',                                                      05590000
       'XB9OP023',                                                      05600000
       'XB9OP024',                                                      05610000
       'XB9OP025',                                                      05620000
       'XB9OP026',                                                      05630000
       'XB9OP027',                                                      05640000
       'XB9OP028',                                                      05650000
       'XB9OP029',                                                      05660000
       'XB9OP030',                                                      05670000
       'XB9OP031',                                                      05680000
       'XB9OP032',                                                      05690000
       'XB9OP033',                                                      05700000
       'XB9OP034',                                                      05710000
       'XB9OP035',                                                      05720000
       'XB9OP036',                                                      05730000
       'XB9OP037',                                                      05740000
       'XB9OP038',                                                      05750000
       'XB9OP039',                                                      05760000
       'XB9OP040',                                                      05770000
       'XB9OP041',                                                      05780000
       'XB9OP042',                                                      05790000
       'XB9OP043',                                                      05800000
       'XB9OP044',                                                      05810000
       'XB9OP045',                                                      05820000
       'XB9OP046',                                                      05830000
       'XB9OP047',                                                      05840000
       'XB9OP048',                                                      05850000
       'XB9OP049',                                                      05860000
       'XB9OP050',                                                      05870000
       'XB9OP051',                                                      05880000
       'XB9OP052',                                                      05890000
       'XB9OP053',                                                      05900000
       'XB9OP054',                                                      05910000
       'XB9OP055',                                                      05920000
       'XB9OP056',                                                      05930000
       'XB9OP057',                                                      05940000
       'XB9OP058',                                                      05950000
       'XB9OP059',                                                      05960000
       'XB9OP060',                                                      05970000
       'XB9OP061',                                                      05980000
       'XB9OP062',                                                      05990000
       'XB9OP063',                                                      06000000
       'XB9OP064',                                                      06010000
       'XB9OP065',                                                      06020000
       'XB9OP066',                                                      06030000
       'XB9OP067',                                                      06040000
       'XB9OP068',                                                      06050000
       'XB9OP069',                                                      06060000
       'XB9OP070',                                                      06070000
       'XB9OP071',                                                      06080000
       'XB9OP072',                                                      06090000
       'XB9OP073',                                                      06100000
       'XB9OP074',                                                      06110000
       'XB9OP075',                                                      06120000
       'XB9OP076',                                                      06130000
       'XB9OP077',                                                      06140000
       'XB9OP078',                                                      06150000
       'XB9OP079',                                                      06160000
       'XB9OP080',                                                      06170000
       'XB9OP081',                                                      06180000
       'XB9OP082',                                                      06190000
       'XB9OP083',                                                      06200000
       'XB9OP084',                                                      06210000
       'XB9OP085',                                                      06220000
       'XB9OP086',                                                      06230000
       'XB9OP087',                                                      06240000
       'XB9OP088',                                                      06250000
       'XB9OP089',                                                      06260000
       'XB9OP090',                                                      06270000
       'XB9OP091',                                                      06280000
       'XB9OP092',                                                      06290000
       'XB9OP093',                                                      06300000
       'XB9OP094',                                                      06310000
       'XB9OP095',                                                      06320000
       'XB9OP096',                                                      06330000
       'XB9OP097',                                                      06340000
       'XB9OP098',                                                      06350000
       'XB9OP099',                                                      06360000
       'XB9OP100',                                                      06370000
       'XB9OP101',                                                      06380000
       'XB9OP102',                                                      06390000
       'XB9OP103',                                                      06400000
       'XB9OP104',                                                      06410000
       'XB9OP105',                                                      06420000
       'XB9OP106',                                                      06430000
       'XB9OP107',                                                      06440000
       'XB9OP108',                                                      06450000
       'XB9OP109',                                                      06460000
       'XB9OP110',                                                      06470000
       'XB9OP111',                                                      06480000
       'XB9O9001',                                                      06490000
       'XB9O9002',                                                      06500000
       'XB9O9003',                                                      06510000
       'XB9O9004',                                                      06520000
       'XB9O9005',                                                      06530000
       'XB9O9006',                                                      06540000
       'XB9O9007',                                                      06550000
       'XB9O9008',                                                      06560000
       'XB9O9009',                                                      06570000
       'XB9O9010',                                                      06580000
       'XB9O9011',                                                      06590000
       'XB9O9012',                                                      06600000
       'XB9O9013',                                                      06610000
       'XB9O9014',                                                      06620000
       'XB9NT001',                                                      06630000
       'XB9NT002',                                                      06640000
       'XB9NT003',                                                      06650000
       'XB9P6001',                                                      06660000
       'XB9P6002',                                                      06670000
       'XB9P6003',                                                      06680000
       'XB9OQ001',                                                      06690000
       'XB9OQ002',                                                      06700000
       'XB9OQ003',                                                      06710000
       'XB9OA001',                                                      06720000
       'XB9OA002',                                                      06730000
       'XB9OA003',                                                      06740000
       'XB9NU001',                                                      06750000
       'XB9NU002',                                                      06760000
       'XB9NU003')                                                      06770000
ORDER BY DBNAME, NAME                                                   06800006
}¢--- A540769.WK.SQL(SYSCOLDI) cre=2006-12-15 mod=2006-12-15-13.43.50 F540769 ---
SELECT * FROM SYSIBM.SYSCOLDIST
    wHERE TBOWNER = 'OA1A' AND TBNAME = 'TWM005A1'
}¢--- A540769.WK.SQL(SYSCOPTB) cre=2008-03-11 mod=2008-03-11-18.18.57 F540769 ---
 set current sqlid = 'S100447';
  drop   INDEX A540769.DSNUCX03;
  commit;
  xREATE INDEX A540769.DSNUCX03
    ON A540769.SYSCOPY
     (dbName                ASC,
      tsName                ASC,
      dsNum                 ASC,
      timestamp             desc,
      icType                asc)
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP0
    CLOSE NO
    COPY NO
    DEFINE YES;
  commit;
--
  COMMIT;
    CREATE TABLESPACE SYSCOPY
      IN DA540769
      USING STOGROUP GSMS
      PRIQTY -1 SECQTY -1
      GBPCACHE CHANGED
      TRACKMOD YES
      seGsize 64
      BUFFERPOOL BP2
      LOCKSIZE ANY
      LOCKMAX SYSTEM
      CLOSE YES
      COMPRESS YES
      CCSID      EBCDIC
      DEFINE YES
      MAXROWS 255;
  CREATE TABLE A540769.SYSCOPY
     (DBNAME               CHAR(8) FOR SBCS DATA NOT NULL,
      TSNAME               CHAR(8) FOR SBCS DATA NOT NULL,
      DSNUM                INTEGER NOT NULL,
      ICTYPE               CHAR(1) FOR SBCS DATA NOT NULL,
      ICDATE               CHAR(6) FOR SBCS DATA NOT NULL,
      START_RBA            CHAR(6) FOR BIT DATA NOT NULL,
      FILESEQNO            INTEGER NOT NULL,
      DEVTYPE              CHAR(8) FOR SBCS DATA NOT NULL,
      IBMREQD              CHAR(1) FOR SBCS DATA NOT NULL,
      DSNAME               CHAR(44) FOR SBCS DATA NOT NULL,
      ICTIME               CHAR(6) FOR SBCS DATA NOT NULL,
      SHRLEVEL             CHAR(1) FOR SBCS DATA NOT NULL,
      DSVOLSER             VARCHAR(1784) FOR SBCS DATA NOT NULL,
      TIMESTAMP            TIMESTAMP NOT NULL WITH DEFAULT,
      ICBACKUP             CHAR(2) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      ICUNIT               CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      STYPE                CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      PIT_RBA              CHAR(6) FOR BIT DATA NOT NULL WITH DEFAULT,
      GROUP_MEMBER         CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      OTYPE                CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT 'T',
      LOWDSNUM             INTEGER NOT NULL WITH DEFAULT,
      HIGHDSNUM            INTEGER NOT NULL WITH DEFAULT,
      COPYPAGESF           FLOAT NOT NULL WITH DEFAULT -1,
      NPAGESF              FLOAT NOT NULL WITH DEFAULT -1,
      CPAGESF              FLOAT NOT NULL WITH DEFAULT -1,
      JOBNAME              CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      AUTHID               CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      OLDEST_VERSION       SMALLINT NOT NULL WITH DEFAULT,
      LOGICAL_PART         INTEGER NOT NULL WITH DEFAULT)
    IN DA540769.SYSCOPY
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=SYSIBM.DSNUCX01 On SYSIBM.SYSCOPY
------------------------------------------------------------------------
--
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=SYSIBM.DSNUCH01 On SYSIBM.SYSCOPY
------------------------------------------------------------------------
--
  CREATE INDEX A540769.DSNUCH01
    ON A540769.SYSCOPY
     (DBNAME                ASC,
      TSNAME                ASC,
      START_RBA             DESC,
      TIMESTAMP             DESC)
--  VCAT "00000001" -- DB2 catalog index
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP0
    CLOSE NO
    COPY NO
    DEFINE YES;
--
  COMMIT;
--
}¢--- A540769.WK.SQL(SYSCOPY) cre=2006-05-16 mod=2007-05-22-12.19.42 F540769 ---
SELECT JOBNAME, ICTYPE, COUNT(*), MAX(TIMESTAMP)                        00010005
    FROM SYSIBM.SYSCOPY C                                               00011005
    WHERE DBNAME = 'TSTNAKBJ'                                           00012005
    GROUP BY JOBNAME, ICTYPE                                            00012105
    ORDER BY 1, 2                                                       00012206
;                                                                       00012305
X                                                                       00012405
SELECT DBNAME, TSNAME, ICTYPE, TIMESTAMP, JOBNAME                       00013000
    FROM SYSIBM.SYSCOPY C                                               00014000
    WHERE C.ICTYPE IN ('B', 'W', 'X')                                   00015000
          AND JOBNAME NOT LIKE 'QR%'                                    00016001
    ORDER BY JOBNAME                                                    00017003
--  ORDER BY TIMESTAMP                                                  00018004
}¢--- A540769.WK.SQL(SYSTPSPA) cre=2006-11-21 mod=2006-11-21-17.42.30 F540769 ---
select  left(dbname, 8),
        sum(space),-- sum(nActive * pgSize),
        sum(card),
        count(*),
        sum(extents)
    from sysibm.sysTablepart
    where dbName like 'WL%'
    group by dbname
    with ur
}¢--- A540769.WK.SQL(SYSTSSPA) cre=2006-11-21 mod=2006-11-21-17.34.03 F540769 ---
select  left(dbname, 8),
        sum(space), sum(nActive * pgSize),
        count(*),
        sum(partitions)
    from sysibm.sysTablespace
    where dbName like 'WL%'
    group by dbname
    with ur
}¢--- A540769.WK.SQL(SYSVIEWS) cre=2008-09-09 mod=2008-09-09-18.12.43 F540769 ---
select *
    from sysibm.sysviews
    where name = 'IDS_VINRG145' and creator = 'VDPSX'
}¢--- A540769.WK.SQL(T) cre=2014-11-12 mod=2016-06-17-12.42.23 A540769 ---------
set current sqlid = 'S100447';
create database abcdef123;
rollback;
select hex(cast('UTS' as char(3) ccsid ebcdic))
     , hex(cast('UTS' as char(3) ccsid unicode))
    from sysibm.sysDummy1
;x;
set current sqlid = 'S100447';
create table oa1p.ganzLllllllllllllllllllllllllllllllllllllllllllang
( c1lllllllllllllllllllllllllllllllllllllllllllllllang
char(1) )
;
rollback
}¢--- A540769.WK.SQL(T@) cre=2010-01-21 mod=2010-01-21-16.06.01 A540769 --------
hier @
}¢--- A540769.WK.SQL(TA) cre=2009-07-22 mod=2009-07-22-08.29.18 A540769 --------
set current sqlid = 'S100447';
alter table OA1A.TWL704A1
    alter column WL704012B01
                   set  DEFAULT '   ' ;
alter table OA1A.TWL704A1
    alter column WL704012B02
                   set  DEFAULT '   ' ;
commit;
}¢--- A540769.WK.SQL(TADM) cre=2013-09-10 mod=2013-09-10-14.25.55 A540769 ------
select substr(strip(creator) || '.' || strip(name), 1, 24) tb
     , substr(strip(dbName) || '.' || strip(tsName), 1, 17) ts
    from sysibm.sysTables
    where dbName in ('DB2ADMIN', 'DB2BINDP'
                   , 'DB2NR', 'DB2REO', 'DB2REORG')
        and type not in ('A', 'V')
    order by name, creator
}¢--- A540769.WK.SQL(TADMCMD) cre=2014-03-26 mod=2014-08-06-15.39.32 A540769 ---
select count(*), system, dbMbr, min(tst), max(tst)
 -- from oa1p.tadmCmd
    from oa1p.tqz050Cmd
--  where tst between '2014-03-01-00.00.00'
--                and '2014-04-24-00.00.00'
    group by dbMbr, system -- , trunc_timestamp(tst, 'mon')
    order by 2, 3, 4
    with ur
;x;
select count(*), system, dbMbr, min(timestamp), max(timestamp)
    from oa1p.tadmCmd
 -- from oa1p.tqz050Cmd
    where timestamp between '2014-03-01-00.00.00'
                  and '2014-04-24-00.00.00'
    group by dbMbr, system, trunc_timestamp(timestamp, 'mon')
    order by 2, 3, 4
    with ur
;x;
select smallint(row_number() over ()), c.*
    from oa1p.tadmCmd c
    where timestamp between '2014-04-01-00.00.00'
                  and '2014-04-22-22.00.00'
          and system='S21' and dbMbr = 'DOF1'
    order by system,dbMbr, timestamp
    with ur
;;;;;;;;
select count(*), dbMbr, system, min(timestamp), max(timestamp)
    from oa1p.tadmCmd
    where timestamp between '2013-10-01-00.00.00'
                  and '2014-04-22-12.00.00'
    group by dbMbr, system, trunc_timestamp(timestamp, 'mon')
    order by 2, 3, 4
    with ur
;;;;;;;;
}¢--- A540769.WK.SQL(TADM08) cre=2007-01-15 mod=2007-01-15-10.07.02 F540769 ----
select count(*), datum
    from oa1a.tadm08a1
    group by datum
}¢--- A540769.WK.SQL(TADM09) cre=2010-07-09 mod=2011-03-04-08.45.42 A540769 ----
select dayOfWeek(datum), Datum, DB_NAME, TS_NAME, PARTITIONS_NR,
       sum(real(HI_U_RBA)) used,
       count(*) cnt
    from OA1T.TADM09A1
    where db_Name = 'DG01A1T' and ts_Name = 'A121A'
        and partitions_nr = 15
    group by  DB_NAME, TS_NAME, PARTITIONS_NR, DATUM
    order by datum desc
    with ur
;elect DB_NAME, TS_NAME, PARTITIONS_NR,
    order by 5     desc
    with ur
}¢--- A540769.WK.SQL(TADM09EX) cre=2011-06-20 mod=2011-06-20-13.48.03 A540769 ---
------------------------------------------------------------------------
--
--  extrapolation space Bedarf aus tadm09A1
--       heute     = heutige Grösse in Bytes
--       heute+20% = heute + 20%
--       ext1mon   = Extrapolation aus letztem Monat auf ZielDatum
--       ext3mon   = Extrapolation aus letzten  3 Monaten auf ZielDatum
--       ext1year  = Extrapolation aus letztem Jahr auf ZielDatum
--
--       Extrapolation = lineares Wachstum mit (max - min) / Periode
--       Zieldatum = 01.04.2012
--
------------------------------------------------------------------------
set current path oa1p;
with v as
( select DB_NAME                 db
       , substr(TS_NAME, 1, 8)   TS
       , min(PARTITIONS_TOTAL)   parts
       , smallint(PARTITIONS_NR) PA
       , min(DS_SIZE)            dssize
       , min(large)              LARGE
       , sum(HI_U_RBA)           HI_U_RBA
       , DATUM                   DATUM
  from OA1P.TADM09A1
  group by DB_NAME, TS_NAME, PARTITIONS_NR, datum
), w as
(
select db, ts, pa
       , max(case when datum = current date
                 then hi_u_rba else -999 end)  heute
       , min(case when datum > current date - 1 month
                 then hi_u_rba else -999 end) min1mon
       , max(case when datum > current date - 1 month
                 then hi_u_rba else -999 end) max1mon
       , min(case when datum > current date - 3 month
                 then hi_u_rba else -999 end) min3mon
       , max(case when datum > current date - 3 month
                 then hi_u_rba else -999 end) max3mon
       , min(case when datum > current date - 1 year
                 then hi_u_rba else -999 end) min1year
       , max(case when datum > current date - 1 year
                 then hi_u_rba else -999 end) max1year
    from v
    where datum > current date - 1 year
    group by DB, ts, pa
)
select db, ts, pa
      , fosfmte7(heute) "heute"
      , fosfmte7(1.2 * heute) "heute+20%"
      , fosfmte7(max1mon + (max1Mon-min1mon)
              / (days(current date)-day(current date - 1 month))
              * (days('01.04.2012') - days(current date))) "ext1mon"
      , fosfmte7(max3mon + (max3Mon-min3mon)
              / (days(current date)-day(current date - 3 month))
              * (days('01.04.2012') - days(current date))) "ext3mon"
      , fosfmte7(max1year + (max1year-min1year)
              / (days(current date)-day(current date - 1 year ))
              * (days('01.04.2012') - days(current date))) "ext1year"
    from w
    where db = 'SN01A1P' -- and ts_Name = 'SXBE141'
    order by db, ts, pa
    with ur
;                            ;;;
}¢--- A540769.WK.SQL(TADM31) cre=2006-10-20 mod=2006-10-20-12.00.23 F540769 ----
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBTF (810)     Extract time : 2006-10-20 10:44 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=Y TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=A031A In Database DA267167    --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DA267167   Stogroup=GSMS
-- Tablespace=DA267167.A031A
------------------------------------------------------------------------
--
  DROP   TABLESPACE DA267167.A031A;
  commit;
  CREATE TABLESPACE A031A
    IN DA267167
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
------------------------------------------------------------------------
--    Table=A267167.TADM31A1 In DA267167.A031A
------------------------------------------------------------------------
--
  CREATE TABLE A267167.TADM31A1
     (DB_NAME              CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      DD_NAME              CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      RUNTIME              TIMESTAMP NOT NULL WITH DEFAULT,
      RNMNAME              CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      HI_ALLOC             DECIMAL(15, 0) NOT NULL WITH DEFAULT,
      HI_ALLOC2            DECIMAL(15, 0) ,
      BLKSIZE              INTEGER NOT NULL WITH DEFAULT,
      IFREESPC              DECIMAL(15, 0),
      IFREESPCP             DECIMAL(10, 2),
      EFREESPC              DECIMAL(15, 0),
      EFREESPCP             DECIMAL(10, 2),
      FREESPC              DECIMAL(15, 0) NOT NULL WITH DEFAULT,
      FREESPCP             DECIMAL(10, 2) NOT NULL WITH DEFAULT,
      TRK_PRIM             INTEGER NOT NULL WITH DEFAULT,
      TRK_SEC              INTEGER NOT NULL WITH DEFAULT,
      SPC_SEC              INTEGER ,
      EXTENTS              SMALLINT NOT NULL WITH DEFAULT,
      HI_CISPLIT           INTEGER NOT NULL WITH DEFAULT,
      HI_CASPLIT           INTEGER NOT NULL WITH DEFAULT,
      DB_TYP               CHAR(6) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      DB_ACCESS            CHAR(4) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      DB_USE               CHAR(12) FOR SBCS DATA NOT NULL
        WITH DEFAULT)
    IN DA267167.A031A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE A267167.TADM31A1 IS 'SPACEWERTE IMS AUS PCP';
--
  LABEL ON A267167.TADM31A1
   (DB_USE IS 'VERWENDUNG',
    DB_ACCESS IS 'DB-ACCESS',
    DB_TYP IS 'DATENBANKTYP',
    HI_CASPLIT IS 'ANZAHL CA-SPLITS',
    HI_CISPLIT IS 'ANZAHL CI-SPLITS',
    EXTENTS IS 'ANZAHL EXTENTS',
    TRK_SEC IS 'SECONDARY ALLOCATED TRACKS',
    TRK_PRIM IS 'PRIMARY ALLOCATED TRACKS',
    FREESPCP IS 'TOTAL FREESPACE IN %',
    FREESPC IS 'TOTAL BYTES FREESPACE',
    BLKSIZE IS 'BLOCKSIZE',
    HI_ALLOC IS 'HIGH ALLOCATED BYTES',
    RNMNAME IS 'RANDOMIZER NAME',
    RUNTIME IS 'RUNTIME',
    DD_NAME IS 'DD NAME',
    DB_NAME IS 'DB NAME');
--
------------------------------------------------------------------------
-- Database=DA267167
--    Index=A267167.IADM31A1 On A267167.TADM31A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX A267167.IADM31A1
    ON A267167.TADM31A1
     (DB_NAME               ASC,
      DD_NAME               ASC,
      RUNTIME               ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(TADM33) cre=2015-09-16 mod=2015-09-16-10.17.32 A540769 ----
delete -- db_name, dd_name, runtime
    from oa1p.tadm33a1
    where (db_name, dd_name, runtime) in
    ( select db_name, dd_name, runtime
         from
         ( select db_name, dd_name, runtime
                -- numeriere vom neuesten zu ältesten
               , row_number() over ( partition by db_name, dd_name
                                     order by runtime desc) rn
             from oa1p.tadm33a1
         ) t3
         where rn > 10   -- erste 10 Utilities behalten
         fetch first 10 rows only
    )
;
rollback
}¢--- A540769.WK.SQL(TADM60) cre=2008-03-10 mod=2014-03-17-08.22.01 A540769 ----
with r as
(
  select
      trunc_timestamp(timestamp, 'hh')
          + (smallint(minute(timestamp) /  5) *  5) minutes tst
    , type, event_type
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%UU440%'
               or name like '%UU02A1P%A440A%'
             )
    and timestamp  > '2013-11-01-00.00.00'
)
, s as
(
  select tst, count(*) total
      , sum(case when type = 'TS-PAGE' then 1 else 0 end) tsPage
      , sum(case when type = 'TS-RID' then 1 else 0 end) tsRid
      , sum(case when type = 'DBID/OBID' then 1 else 0 end) dbidObid
      , sum(case when event_type = 'T' then 1 else 0 end) timeout
      , sum(case when event_type = 'D' then 1 else 0 end) deadlock
    from r
    group by tst
)
select date(trunc_timestamp(tst, 'iw'))
   , smallint(count(distinct
         case when total    > 0 then tst else null end)) total
   , smallint(count(distinct
         case when tsPage   > 0 then tst else null end)) tsPage
   , smallint(count(distinct
         case when tsRid    > 0 then tst else null end)) tsRid
   , smallint(count(distinct
         case when dbidObid > 0 then tst else null end)) dbidObid
   , smallint(count(distinct
         case when timeout   > 0 then tst else null end)) timeout
   , smallint(count(distinct
         case when deadlock > 0 then tst else null end)) deadlock
   from s
    group by trunc_timestamp(tst, 'iw')
    order by 1 desc
;
with s as
(
select date(trunc_timestamp(timestamp, 'iw')) tst, count(*) total
   , sum(case when type = 'TS-PAGE' then 1 else 0 end) tsPage
   , sum(case when type = 'TS-RID' then 1 else 0 end) tsRid
   , sum(case when type = 'DBID/OBID' then 1 else 0 end) dbidObid
   , sum(case when event_type = 'T' then 1 else 0 end) timeout
   , sum(case when event_type = 'D' then 1 else 0 end) deadlock
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%UU440%'
               or name like '%UU02A1P%A440A%'
             )
    and timestamp  > '2013-11-01-00.00.00'
    group by trunc_timestamp(timestamp, 'iw')
)
select date(tst), total
   , smallint(tsPage  ) tsPage
   , smallint(tsRid   ) tsRid
   , smallint(dbidObid) dbidObid                                        id
   , smallint(timeout ) timeout
   , smallint(deadlock) deadlock
   from s
    order by 1 desc
 ;;;;;;;;
select date(trunc_timestamp(timestamp, 'iw')), count(*) total
   , smallint(sum(case when type = 'TS-PAGE' then 1 else 0 end))tsPage
   , smallint(sum(case when type = 'TS-RID' then 1 else 0 end))tsRid
   , smallint(sum(case when type = 'DBID/OBID' then 1 else 0 end))dbidObid
   , smallint(sum(case when event_type = 'T' then 1 else 0 end))timeout
   , smallint(sum(case when event_type = 'D' then 1 else 0 end))deadlock
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%UU440%'
               or name like '%UU02A1P%A440A%'
             )
    and timestamp  > '2013-11-01-00.00.00'
    group by trunc_timestamp(timestamp, 'iw')
    order by 1 desc
 ;;;;;;;;
select  source_plan, victim_plan, count(*)
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%UU440%'
               or name like '%UU02A1P%A440A%'
             )
    and timestamp  > '2013-01-14-00.00.00'
    group by source_plan, victim_plan
    order by 1, 2
 ;;;;;;;;
select     (trunc_timestamp(timestamp, 'hh')), count(*) total
       , sum(case when type = 'TS-PAGE' then 1 else 0 end) tsPage
       , sum(case when type = 'TS-RID' then 1 else 0 end) tsRid
       , sum(case when type = 'DBID/OBID' then 1 else 0 end) dbidObid
       , sum(case when event_type = 'T' then 1 else 0 end) timeout
       , sum(case when event_type = 'D' then 1 else 0 end) deadlock
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%UU440%'
               or name like '%UU02A1P%A440A%'
             )
    and timestamp  > '2013-11-01-00.00.00'
    group by trunc_timestamp(timestamp, 'hh')
    order by 1 desc
 ;;;;;;;;
select *
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%UU440%'
               or name like '%UU02A1P%A440A%'
             )
    and timestamp  > '2013-11-01-00.00.00'
    order by timestamp desc
 ;;;;;;;;
select count(*), type, min(timestamp), max(timestamp)
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%UU440%'
               or name like '%UU02A1P%A440A%'
             )
    and timestamp  > '2014-01-01-00.00.00'
    group by trunc_timestamp(timestamp, 'dd'), type
    order by 3 desc, 2
 ;;;;;;;;
select count(*), source_plan, victim_plan
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%WI02A1P%'
             )
    and timestamp  > '2013-04-01-00.00.00'
    group by source_plan, victim_plan
    order by 1 desc
 ;;;;;;;;

select count(*), substr(min(strip(name)), 1, 35), max(strip(name))
    from OA1p.TADM60A1
    where ssid like 'DOF%'
         and (    name like '%WI02A1P%'
             )
    and timestamp  > '2013-04-01-00.00.00'
    group by left(strip(name), 16)
    order by 1 desc
 ;;;;;;;;

select reason_code, event_type, count(*)
    from OA1p.TADM60A1
    group by reason_code , event_type
    order by reason_code , event_type
;x;
select reason_code, min(event_type), max(event_type), count(*)
    from OA1p.TADM60A1
    group by reason_code
;x;
select reason_code, min(event_type), max(event_type), count(*)
    from OA1p.TADM60A1
    group by reason_code
;x;
select date(trunc_timestamp(timestamp, 'MON')),
       smallint(count(*)) "anz",
       type,
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       count(distinct left(name, 14)) "anz tb",
       substr(min(case when name = '' then '9' else name end),1, 20),
       max(name),
       min(timestamp), max(timestamp)
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
    and timestamp > current timestamp - 800 days
    group by trunc_timestamp(timestamp, 'MON'), type
    order by min(timestamp) desc , type
;;;
select
       smallint(count(*)) "anz",
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       left(name, 14)  "tb",
       substr(min(case when name = '' then '9' else name end),1, 20),
       max(name),
       min(timestamp), max(timestamp)
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
    and timestamp  -- > '2011-07-25-00.00.00'
                      > current timestamp - 1 month
    group by left(name, 14)
    order by 1 desc
;;;;
select *
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
    order by timestamp desc
    fetch first 100 rows only
  ;;;
select count(*), date(min(timestamp))
    from OA1p.TADM60A1
    where ( VICTIM_PLAN like 'SN0100%'
            or source_PLAN like 'SN0100%'
          )
    and timestamp  > '2010-01-01-00.00.00'
    group by trunc_timestamp(timestamp, 'mon')
    order by trunc_timestamp(timestamp, 'mon') desc
 ;;;;;;;;
select *
    from OA1p.TADM60A1
    where   name like 'SN01A1P .A187A%'
 --   where ( VICTIM_PLAN like 'SN0100%'
 --           or source_PLAN like 'SN0100%'
 --         )
    and timestamp  > '2011-09-20-00.00.00'
    order by timestamp desc
 ;;;;;;;;
select count(*), VICTIM_PLAN, source_PLAN
    from OA1p.TADM60A1
    where ( VICTIM_PLAN like 'SN0100%'
            or source_PLAN like 'SN0100%'
          )
    and timestamp  > '2011-08-28-00.00.00'
    group by VICTIM_PLAN, source_PLAN
    order by 1 desc
 ;;;;;;;;
select
       smallint(count(*)) "anz",
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       left(name, 14)  "tb",
       substr(min(case when name = '' then '9' else name end),1, 20),
       max(name),
       min(timestamp), max(timestamp)
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
    and timestamp  -- > '2011-07-25-00.00.00'
                      > current timestamp - 1 month
    group by left(name, 14)
    order by 1 desc
;;;;
    group by area, left(name, 14)
select date(trunc_timestamp(timestamp, 'WW')),
       smallint(count(*)) "anz",
       type,
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       count(distinct left(name, 14)) "anz tb",
       substr(min(case when name = '' then '9' else name end),1, 20),
       max(name),
       min(timestamp), max(timestamp)
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
    and timestamp > current timestamp - 800 days
    group by trunc_timestamp(timestamp, 'WW'), type
    order by min(timestamp) desc , type
;
select *
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%' -- and name = ''
    and timestamp > current timestamp - 800 days
    order by     timestamp  desc
    fetch first 100 rows only
;;;
select date(trunc_timestamp(timestamp, 'WW')),
       smallint(count(*)) "anz",
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       count(distinct left(name, 14)) "anz tb",
       substr(min(case when name = '' then '9' else name end),1, 20),
       max(name),
       min(timestamp), max(timestamp)
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
    and timestamp > current timestamp - 800 days
    group by trunc_timestamp(timestamp, 'WW')
    order by min(timestamp) desc
;;;
select current date from sysibm.sysdummy1;
with g as
(
select count(*) dup, min(timestamp) timestamp, max(timestamp) tstMax,
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      REASON_CODE, type, name
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
   -- and timestamp > current timestamp - 500 days
    group by
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      REASON_CODE, type, name,
                      time(timestamp),
                      trunc_timestamp(timestamp, 'mon')
)
, f as
(
select case when timestamp > '2011-05-14-00.00.00' then '20110514'
            when timestamp > '2011-01-31-00.00.00' then '20110131'
            else substr(char(year(timestamp)),1, 4) end area,
         g.*
    from g
    where VICTIM_PLAN like 'VV5720%'
  --and timestamp > current timestamp -  300 days
)
select area, count(*),
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       substr(min(name),1,30), substr(max(name), 1,30),
       min(timestamp), max(timestamp)
    from f
    group by area, left(name, 14)
    order by area desc, min(name)
;;;
with g as
(
select count(*) dup, min(timestamp) timestamp, max(timestamp) tstMax,
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      REASON_CODE, type, name
    from OA1p.TADM60A1
    where -- VICTIM_PLAN like 'VV5720%'
          source_PLAN like 'DSNU%'  and source_corr_id like 'QR%'
      and timestamp > current timestamp - 300 days
    group by
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      REASON_CODE, type, name,
                      time(timestamp),
                      trunc_timestamp(timestamp, 'mon')
)
select date(timestamp),
substr(case dayofweek(date(timestamp))
              when 1 then 'So' when 2 then 'Mo' when 3 then 'Di'
              when 4 then 'Mi' when 5 then 'Do' when 6 then 'Fr'
              when 7 then 'Sa' end, 1, 2),
    smallint(COUNT(*)),
    source_plan , min(source_corr_id), max(source_corr_id)
    from g
    group  by date(timestamp), source_plan
    order  by date(timestamp) desc, source_plan
;;;;;;;
with g as
(
select count(*) dup, min(timestamp) timestamp, max(timestamp) tstMax,
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      REASON_CODE, type, name
    from OA1p.TADM60A1
    where -- VICTIM_PLAN like 'VV5720%'
    -- or source_PLAN like 'VV5720%'
   -- and timestamp > current timestamp - 500 days
    group by
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      REASON_CODE, type, name,
                      time(timestamp),
                      trunc_timestamp(timestamp, 'mon')
)
select date(trunc_timestamp(timestamp, 'WW')),
       smallint(count(*)) "anz",
       smallint(sum(case when left(name, 12)  = 'VV20A1P .A70'
                    and substr(name, 13, 2) in ('1A', '3A', '9A')
                    then 1 else 0 end)) tb139,
  --   smallint(sum(dup)) "dup",
  --   max(days(tstMax)-days(timestamp)) "diffMax",
       smallint(sum(case when source_plan like 'VV5720%'
             then 0 else 1 end)) oth,
       smallint(count(distinct left(name, 14))) "anz tb",
       substr(min(case when name = '' then '9' else name end),1, 20),
       max(name),
       min(timestamp), max(timestamp)
    from g
    group by trunc_timestamp(timestamp, 'WW')
    order by min(timestamp) desc
;;;
;;;
;;;
with g as
(
select count(*) dup, min(timestamp) timestamp, max(timestamp) tstMax,
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      REASON_CODE, type, name
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'V%'
--  where VICTIM_PLAN like 'VV5720%'
   -- and timestamp > current timestamp - 500 days
    group by
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      REASON_CODE, type, name,
                      time(timestamp),
                      trunc_timestamp(timestamp, 'mon')
)
select date(trunc_timestamp(timestamp, 'WW')),
       smallint(count(*)) "anz",
       smallint(sum(dup)) "dup",
       max(days(tstMax)-days(timestamp)) "diffMax",
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       count(distinct left(name, 14)) "anz tb",
       substr(min(case when name = '' then '9' else name end),1, 20),
       max(name),
       min(timestamp), max(timestamp)
    from g
    group by trunc_timestamp(timestamp, 'WW')
    order by min(timestamp) desc
;;;
select *
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
      and timestamp > current timestamp - 7 days
    and time(timestamp) in          ('21.50.04'
                                    ,'13.26.47'
                                    ,'22.37.44'
                                    ,'21.50.07'
                                    ,'19.33.41'
                                    ,'14.01.11'
                                    ,'21.50.13'
                                    ,'19.33.41'
                                    ,'22.49.03'
                                    ,'14.06.50'
                                    ,'22.37.40'
                                    ,'20.17.46'
                                    ,'20.17.46'
                                    ,'14.08.20'
                                    ,'20.17.46'
                                    ,'14.52.11'
                                    ,'14.28.53'
                                    ,'22.45.32'
                                    )
    order by time(timestamp), timestamp, ssid
 -- fetch first 100 rows only
;;;
select count(*), min(timestamp), max(timestamp),
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
      and timestamp > current timestamp - 5 days
    group by
    SSID, EVENT_TYPE, VICTIM_PLAN, VICTIM_CORR_ID, VICTIM_CONN_ID,
                      source_PLAN, source_CORR_ID, source_CONN_ID,
                      time(timestamp)
    order by  1             desc
    fetch first 100 rows only
;;;
select current date from sysibm.sysdummy1;
select *
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%' -- and name = ''
    and timestamp > current timestamp - 800 days
    order by     timestamp  desc
    fetch first 100 rows only
;;;
with g as
(
select case when timestamp > '2011-05-14-00.00.00' then '20110514'
            when timestamp > '2011-01-31-00.00.00' then '20110131'
            else substr(char(year(timestamp)),1, 4) end area,
         g.*
    from OA1p.TADM60A1 g
    where VICTIM_PLAN like 'VV5720%'
  --and timestamp > current timestamp -  300 days
)
select area, count(*),
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       substr(min(name),1,30), substr(max(name), 1,30),
       min(timestamp), max(timestamp)
    from g
    group by area, left(name, 14)
    order by area desc, min(name)
;;;
select count(*),
       sum(case when source_plan like 'VV5720%' then 0 else 1 end) oth,
       min(timestamp), max(timestamp),
       substr(min(name),1,30), substr(max(name), 1,30)
    from OA1p.TADM60A1
    where VICTIM_PLAN like 'VV5720%'
    and timestamp > current timestamp -  30 days
    group by left(name, 14)
    order by 1 desc
;;;
select count(*), min(timestamp), max(timestamp)
    from OA1A.TADM60A1
;
select event_type, count(*), min(timestamp), max(timestamp)
    from OA1A.TADM60A1
    group by event_type
;
select left(ssid, 3), count(*), min(timestamp), max(timestamp)
    from OA1A.TADM60A1
    group by left(ssid, 3)
    order by left(ssid, 3)
select *
    from OA1p.TADM60A1
    fetch first 5 rows only
;;;
}¢--- A540769.WK.SQL(TADM62) cre=2009-12-22 mod=2010-01-14-17.23.23 A540769 ----
select year(timestamp), week(timestamp), sum(altSize)
    from oa1p.tadm62a1
    group by year(timestamp), week(timestamp)
    order by year(timestamp) desc, week(timestamp) desc
;
select timestamp, newCount+altCount+oldCount, t.*
    from oa1p.tadm62a1 t
    order by timestamp desc
    with ur
}¢--- A540769.WK.SQL(TADM63) cre=2014-05-13 mod=2014-05-13-10.21.44 A540769 ----
with g as
(
select count(*) c, timestamp, ssid, event_type, plan_name, conn_id,
                 corrid_id, authid, logRec
    from oa1p.tadm63a1
    where timestamp >= '2014-04-01-00.00.00'
    group by  timestamp, ssid, event_type, plan_name, conn_id,
              corrid_id, authid, logRec
)
select trunc_timestamp(timestamp, 'dd'), count(*) cnt
    , sum(case when c > 1 then 1 else 0 end) mult
    , sum(case when c > 1 then c else 0 end) multSum
    from g
    group by trunc_timestamp(timestamp, 'dd')
    order by 1 desc
    with ur
}¢--- A540769.WK.SQL(TADZ) cre=2014-08-21 mod=2014-08-21-15.56.42 A540769 ------
WITH U AS
(
SELECT P.VENDOR_NAME                AS VENDOR
     , P.ALT_PRODUCT_NAME           AS PRODUCT
     , 'V'¨¨RTRIM(CHAR(P.VERSION))  AS VERSION
     , COALESCE(P.FEATURE_NAME, '') AS FEATURE
     , SUM(PU.EVENT_CNT)            AS EVENTS
     , MAX(PU.PERIOD)               AS LASTUSED
  FROM OS11A1P.PRODUCT_INSTALL AS PI
  JOIN OS11A1P.PRODUCT        AS P  ON P.SW_KEY      = PI.SW_KEY
  JOIN OS11A1P.SYSTEM         AS S  ON S.SYSTEM_KEY  = PI.SYSTEM_KEY
  JOIN OS11A1P.PRODUCT_USE    AS PU ON PU.SW_KEY     = PI.SW_KEY
                                   AND PU.SYSTEM_KEY = PI.SYSTEM_KEY
  LEFT OUTER JOIN OS11A1P.NODE AS N ON N.NODE_KEY = PU.HW_NODE_KEY
   WHERE PI.UNINSTALL_DATE IS NULL
     AND P.ALT_PRODUCT_NAME <> 'SCRT_ONLY'
     AND P.SW_TYPE = 'FEATURE'
     AND PU.PERIOD >= '2014-01-01'
  GROUP BY P.VENDOR_NAME
         , P.ALT_PRODUCT_NAME
         , P.VERSION
         , P.FEATURE_NAME, P.EID
UNION ALL
SELECT P.VENDOR_NAME                AS VENDOR
     , P.ALT_PRODUCT_NAME           AS PRODUCT
     , 'V'¨¨RTRIM(CHAR(P.VERSION))  AS VERSION
     , COALESCE(P.FEATURE_NAME, '') AS FEATURE
     , SUM(PU.EVENT_CNT)            AS EVENTS
     , MAX(PU.PERIOD)               AS LASTUSED
  FROM OS12A1P.PRODUCT_INSTALL AS PI
  JOIN OS12A1P.PRODUCT        AS P  ON P.SW_KEY      = PI.SW_KEY
  JOIN OS12A1P.SYSTEM         AS S  ON S.SYSTEM_KEY  = PI.SYSTEM_KEY
  JOIN OS12A1P.PRODUCT_USE    AS PU ON PU.SW_KEY     = PI.SW_KEY
                                   AND PU.SYSTEM_KEY = PI.SYSTEM_KEY
  LEFT OUTER JOIN OS12A1P.NODE AS N ON N.NODE_KEY = PU.HW_NODE_KEY
   WHERE PI.UNINSTALL_DATE IS NULL
     AND P.ALT_PRODUCT_NAME <> 'SCRT_ONLY'
     AND P.SW_TYPE = 'FEATURE'
     AND PU.PERIOD >= '2014-01-01'
  GROUP BY P.VENDOR_NAME
         , P.ALT_PRODUCT_NAME
         , P.VERSION
         , P.FEATURE_NAME, P.EID
 )
 SELECT COUNT(*), BIGINT(SUM(EVENTS)) EVENTS
       , VENDOR, PRODUCT, VERSION, FEATURE
       , MAX(LASTUSED) LASTUSED
     FROM U
     GROUP BY VENDOR, PRODUCT, VERSION, FEATURE
  ORDER BY UPPER(VENDOR)
         , UPPER(PRODUCT)
         , VERSION
         , UPPER(FEATURE) -- , P.EID;
}¢--- A540769.WK.SQL(TAV401) cre=2006-09-26 mod=2006-09-26-15.32.27 F540769 ----
  set current sqlid = 'S100447';

  drop   TABLESPACE dgdb9998.A401A01
  ;
  commit;
  CREATE TABLESPACE A401A01
    IN Dgdb9998
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
------------------------------------------------------------------------
--    Table=gdb9998.TAV401A1 In Dgdb9998.A401A01
------------------------------------------------------------------------
--
  CREATE TABLE gdb9998.TAV401A1
     (AV401001             CHAR(16) FOR SBCS DATA NOT NULL,
      AV401002             CHAR(3) FOR SBCS DATA NOT NULL,
      AV401003             CHAR(12) FOR SBCS DATA NOT NULL,
      AV401004             CHAR(5) FOR SBCS DATA NOT NULL,
      AV401005             DECIMAL(15, 3) WITH DEFAULT NULL,
      AV401006             DECIMAL(15, 3) WITH DEFAULT NULL,
      AV401007             DECIMAL(15, 3) NOT NULL,
      AV401008             CHAR(1) FOR SBCS DATA NOT NULL,
      AV401009             CHAR(4) FOR SBCS DATA NOT NULL,
      AV401010             CHAR(2) FOR SBCS DATA NOT NULL,
      AV401011             DECIMAL(15, 6) WITH DEFAULT NULL,
      AV401012             DATE WITH DEFAULT NULL,
      AV401013             CHAR(4) FOR SBCS DATA NOT NULL,
      AV401014             CHAR(4) FOR SBCS DATA NOT NULL,
      AV401015             DECIMAL(15, 6) WITH DEFAULT NULL,
      AV401016             DECIMAL(15, 6) NOT NULL,
      AV401017             CHAR(3) FOR SBCS DATA NOT NULL,
      AV401018             DECIMAL(15, 6) NOT NULL,
      AV401019             DECIMAL(15, 3) NOT NULL,
      AV401020             DECIMAL(15, 3) NOT NULL,
      AV401021             DATE WITH DEFAULT NULL,
      AV401022             DECIMAL(15, 6) NOT NULL,
      AV401023             DECIMAL(15, 6) NOT NULL,
      AV401024             DECIMAL(15, 3) NOT NULL,
      AV401025             DECIMAL(15, 3) NOT NULL,
      AV401026             DECIMAL(15, 3) NOT NULL,
      AV401027             DATE WITH DEFAULT NULL,
      AV401028             DECIMAL(15, 6) WITH DEFAULT NULL,
      AV401029             DECIMAL(15, 6) NOT NULL,
      AV401030             DECIMAL(15, 6) NOT NULL,
      AV401031             DATE WITH DEFAULT NULL,
      AV401032             DECIMAL(15, 6) NOT NULL,
      AV401033             DECIMAL(15, 6) NOT NULL,
      AV401034             DECIMAL(15, 6) NOT NULL,
      AV401035             DATE WITH DEFAULT NULL,
      AV401036             DECIMAL(15, 6) NOT NULL,
      AV401037             DATE WITH DEFAULT NULL,
      AV401038             DECIMAL(15, 3) NOT NULL,
      AV401039             DECIMAL(15, 6) NOT NULL,
      AV401040             DECIMAL(15, 3) NOT NULL,
      AV401041             CHAR(7) FOR SBCS DATA NOT NULL,
      AV401042             CHAR(1) FOR SBCS DATA NOT NULL,
      AV401043             DATE WITH DEFAULT NULL,
      AV401044             DECIMAL(15, 3) NOT NULL,
      AV401045             CHAR(1) FOR SBCS DATA NOT NULL,
      AV401046             CHAR(4) FOR SBCS DATA NOT NULL,
      AV401047             CHAR(2) FOR SBCS DATA NOT NULL,
      AV401048             DATE WITH DEFAULT NULL,
  --  AV401048ZZ           DATE WITH DEFAULT NULL,
      AV401049             DECIMAL(15, 6) NOT NULL,
      AV401050             DECIMAL(15, 3) NOT NULL,
      AV401051             CHAR(3) FOR SBCS DATA NOT NULL,
      AV401052             DECIMAL(15, 3) NOT NULL,
      AV401053             CHAR(1) FOR SBCS DATA NOT NULL,
      AV401054             DECIMAL(15, 3) NOT NULL,
      AV401055             CHAR(1) FOR SBCS DATA NOT NULL,
      AV401056             DECIMAL(15, 6) NOT NULL,
      AV401057             CHAR(1) FOR SBCS DATA NOT NULL,
      AV401058             DECIMAL(15, 6) NOT NULL,
      AV401059             DECIMAL(15, 3) NOT NULL,
      AV401060             DECIMAL(15, 3) NOT NULL,
      CONSTRAINT AV401001
      PRIMARY KEY (AV401001,
                   AV401002,
                   AV401003,
                   AV401004))
    IN Dgdb9998.A401A01
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE gdb9998.TAV401A1 IS 'Safekeeping Security';
--
  LABEL ON gdb9998.TAV401A1
   (AV401060 IS 'CollateralValue2CHF         ',
    AV401059 IS 'CollateralValue2ValCurr     ',
    AV401058 IS 'CollateralRatio2Base        ',
    AV401057 IS 'CollateralRatio2Type        ',
    AV401056 IS 'Interest-Rate               ',
    AV401055 IS 'CollateralRatioTyp          ',
    AV401054 IS 'Agio for Redemption         ',
    AV401053 IS 'AvgPurchPriceType           ',
    AV401052 IS 'CollateralValueCHF          ',
    AV401051 IS 'AnalysisCountryCd           ',
    AV401050 IS 'NonRealPLValueTotal         ',
    AV401049 IS 'NonRealPLPercTotal          ',
    AV401047 IS 'InterestFreqCd              ',
    AV401046 IS 'Analysis CurrCd             ',
    AV401045 IS 'Booking Type Cd             ',
    AV401044 IS 'MarketValue Pos Curr        ',
    AV401043 IS 'Maturity Date               ',
    AV401042 IS 'Dynamic Text Flag           ',
    AV401041 IS 'CSLife Fund Policy No       ',
    AV401040 IS 'CollateralValueValCurr      ',
    AV401039 IS 'CollateralRatio             ',
    AV401038 IS 'ExpEarnValCurr              ',
    AV401037 IS 'PriceYrLowDate              ',
    AV401036 IS 'PriceYrLow                  ',
    AV401035 IS 'PriceYrHighDate             ',
    AV401034 IS 'PriceYrHigh                 ',
    AV401033 IS 'YieldPercCP                 ',
    AV401032 IS 'YieldPercMP                 ',
    AV401031 IS 'ExchangeRateDate            ',
    AV401030 IS 'ExchangeRateCHF             ',
    AV401029 IS 'ExchangeRateCurr            ',
    AV401028 IS 'ContractStrikePrice         ',
    AV401027 IS 'ContractExpiryDate          ',
    AV401026 IS 'ContractSize                ',
    AV401025 IS 'NonRealPLValPrice           ',
    AV401024 IS 'NonRealPLValCurr            ',
    AV401023 IS 'NonRealPLPercPrice          ',
    AV401022 IS 'NonRealPLPercCurr           ',
    AV401021 IS 'AccruedInterestDate         ',
    AV401020 IS 'AccruedInterestCHF          ',
    AV401019 IS 'AccruedInterestValCurr      ',
    AV401018 IS 'Duration                    ',
    AV401017 IS 'StockExchangeCd             ',
    AV401016 IS 'AvgPurchPriceCurrExRate     ',
    AV401015 IS 'AvgPurchPrice               ',
    AV401014 IS 'AvgPurchPriceCurrCd         ',
    AV401013 IS 'SecurityPriceCurrCd         ',
    AV401012 IS 'SecurityPriceDate           ',
    AV401011 IS 'SecurityPrice               ',
    AV401010 IS 'SecurityPriceType           ',
    AV401009 IS 'AssetClass                  ',
    AV401008 IS 'ValueType                   ',
    AV401007 IS 'NominalNo                   ',
    AV401006 IS 'MarketValueCHF              ',
    AV401005 IS 'MarketValueValCurr          ',
    AV401004 IS 'Security Sequence No        ',
    AV401003 IS 'Security No                 ',
    AV401002 IS 'Sequence No                 ',
    AV401001 IS 'Safekeeping Acc No          ');
--
------------------------------------------------------------------------
-- Database=Dgdb9998
--    Index=gdb9998.IAV401A0 On gdb9998.TAV401A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX gdb9998.IAV401A0
    ON gdb9998.TAV401A1
     (AV401001              ASC,
      AV401002              ASC,
      AV401003              ASC,
      AV401004              ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
------------------------------------------------------------------------
-- Database=Dgdb9998
--    Index=gdb9998.IAV401A1 On gdb9998.TAV401A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX gdb9998.IAV401A1
    ON gdb9998.TAV401A1
     (AV401003              ASC,
      AV401001              ASC,
      AV401002              ASC,
      AV401004              ASC,
      AV401007              ASC,
      AV401014              ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(TBE05) cre=2009-04-16 mod=2009-04-16-12.40.56 F540769 -----
select * from OA1T02.TBE005A1
     where be005001 =  1 and be005002 = '0003024286540000'
;
delete   from OA1T02.TBE005A1
     where be005001 =  1 and be005002 = '0003024286540000';
;
select * from OA1T02.TBE005A1
     where be005001 =  1 and be005002 = '0003024286540000'
 ;
 rollback
 ;
}¢--- A540769.WK.SQL(TECSV) cre=2013-10-04 mod=2013-10-04-21.40.33 A540769 -----
select instance, count(*)
    from sysibm.sysCopy
    group by instance
    with ur
;x;
xelect current timestamp from sysibm.sysDummy1
;
-- #HCCD (TS) FULL IMAGE COPY > 7 DAYS
-- SELECT  'DI,PI,PA,IN' , DBID , PSID , PARTITION , INST
 xelect what, count(*)
  from
   ( select s.dbName, s.name, p.partition
       , c.inst, s.dbid, s.psid
       , case when c.inst is null
                  then raise_Error(70001, 'c.inst null '
                     || s.dbName || '.' || s.name)
              when s.nTables < 1 then 'n noTables ' || s.nTables
              when p.space < 0      then 'n defineNo ' || s.space
              when f.icType is null then 'f f.icType null'
              when f.icType <> 'F'  then 'f f.logDiscontinuity'
              when f.timestamp < current timestamp-7 days then 'f week'
              when i.icType is null then 'f i.icType null'
              when i.icType not in ('I','F') then 'f i.logDiscontinuity'
              when r.updateStatsTime is null then 'f noRts'
              when r.copyLastTime is null then 'f r.copyLast null'
              when i.timestamp < r.copyLastTime - 60 seconds
                     then 'f i << r.copyLast'
              when r.nactive * 0.1 <= r.copyupdatedpages
                     then 'f updates'
              when r.copyupdatedpages > 0 then 'i updates'
              when r.copyChanges > 0 then 'i changes'
              when r.copyUpdateLRSN is not null then 'i openUpdate'
              else 'n noUpdates'
         end what
    from sysibm.sysTablespace s
      left join  -- clone handling: add instances
          ( select           'N', 1, 1, '-' from sysibm.sysDummy1
            union all select 'Y', 1, 1, 'B' cl from sysibm.sysDummy1
            union all select 'Y', 1, 2, 'C' cl from sysibm.sysDummy1
            union all select 'Y', 2, 1, 'C' cl from sysibm.sysDummy1
            union all select 'Y', 2, 2, 'B' cl from sysibm.sysDummy1
          ) c (sC, sI, inst, cln)
        on s.clone = c.sC and s.instance = c.sI
      join sysibm.sysTablePart p
        on s.dbName = p.dbName and s.name = p.tsName
      left join sysibm.sysTableSpaceStats r
        on    s.dbName = r.dbName and s.name = r.name
          and s.dbid = r.dbid and s.psid = r.psid
          and p.partition = r.partition and r.instance = c.inst
      left join -- newest incremental or full copy or log discontinuity
         ( select c.*
             , row_number() over(partition by dbName, tsName, dsNum
                                           , instance
                                order by timestamp desc) rn
             from sysibm.sysCopy c
             where c.icType not in ('D', 'M', 'Q', 'R', 'T', 'X', 'Z')
         ) i on i.rn = 1
                and s.dbName = i.dbName and s.Name = i.tsName
                and p.partition = i.dsNum
                and i.instance = c.inst
      left join -- newest full copy or log discontinuity
         ( select c.*
             , row_number() over(partition by dbName, tsName, dsNum
                                           , instance
                                order by timestamp desc) rn
             from sysibm.sysCopy c
             where c.icType not in ('D','I','M','Q', 'R', 'T', 'X', 'Z')
         ) f on f.rn = 1
                and s.dbName = f.dbName and s.Name = f.tsName
                and p.partition = f.dsNum
                and f.instance = c.inst
    ) q
  group by what
/*  where (what is null or what = '' or left(what, 1) not in (' ','i'))
   and s.dbName = 'DA540769'
   and dbName = 'DA540769'
-- AND NOT TRANSLATE(DBNAME, '999999999AAAAAA', '012345678FISWXY')
--         = 'DA999999'                         -- USER DATENBANKEN
   AND NOT (DBNAME ='CSQDBAF' AND NAME ='TSBLOB1') -- MQ LOB
   AND NOT (DBNAME ='CSQDBAF' AND NAME ='TSBLOB2') -- MQ LOB
   AND NOT (DBNAME ='CSQDBAF' AND NAME ='TSBLOB3') -- MQ LOB
   AND NOT (DBNAME ='CSQDBAF' AND NAME ='TSBLOB4') -- MQ LOB
   AND NOT (DBNAME ='CSQDBAF$' AND NAME ='TSBLOB1') -- MQ LOB
   AND NOT (DBNAME ='CSQDBAF$' AND NAME ='TSBLOB2') -- MQ LOB
   AND NOT (DBNAME ='CSQDBAF$' AND NAME ='TSBLOB3') -- MQ LOB
   AND NOT (DBNAME ='CSQDBAF$' AND NAME ='TSBLOB4') -- MQ LOB
   AND NOT (DBNAME LIKE 'DACME%%')              -- MAIL HEINZ BÜHLER
   AND NOT (DBNAME LIKE 'DAU%%')                -- SCHULUNG GERRIT
   AND NOT (DBNAME LIKE 'DB2ALA%%')             -- MAREC  GENERATED
   AND NOT (DBNAME LIKE 'DB2MAPP%%')            -- REORG MAPPING TABLES
   AND NOT (DBNAME LIKE 'DB2PLAN%%')            -- EXPLAIN TABLES
   AND NOT (DBNAME LIKE 'DGDB%%')               -- PROTOTYPEN
   AND NOT (DBNAME LIKE 'DGO%%')                -- PROTOTYPEN
   AND NOT (DBNAME LIKE 'DI017%%')              -- PROTOTYPEN
   AND NOT (DBNAME LIKE 'DSNDB%%')              -- DB2 CATALOG
   AND NOT (DBNAME = 'DSNTESQ')                 -- DB2 CATALOG CLONE
   AND NOT (DBNAME LIKE 'DSN8%%')               -- IBM TEST DB
   AND NOT (DBNAME LIKE '%%MAREC%%')            -- MAREC GENERATED
   AND NOT (DBNAME LIKE '%%A1X%%')              -- NEUE PROTOTYPEN
   AND NOT (DBNAME LIKE 'OE02%%')               -- MAIL IVO EICHMANN
   AND NOT (DBNAME LIKE 'WKDBD%%')              -- DB2 WORK DATABASE
 */
 ;
select current timestamp from sysibm.sysDummy1
;
}¢--- A540769.WK.SQL(TECSVCOP) cre=2015-12-17 mod=2015-12-18-09.50.07 A540769 ---
/* #HCCD (TS) RTS full IMAGE COPY
-- tecSv full copy
--   FICDDBOF für RZ2/DBOF für Job QGS400FP
--   generiert als FICD#BF um 2015-12-17-12.48.51
--     durch rz4/dsn.source.tecSv(conSumGe) >>> alle Aenderung da <<<
SELECT  'DI,PI,PA,IN' , DBID , PSID , PA , INST   */
  /* tecsvCop sql: what copy is needed? full, incremental or none
     18.12.15 walter: part=0 wieder eingebaut, inc raus
              ignore icType T (term util) and J (compr Dict)
  */
select  substr(dbName, 1, 8) db
      , substr(name, 1, 8) ts
      , pa
      , substr(inst || ' ' || insTxt, 1, 7) instanc
      , what
      , basTy b
      , basPa
      , basTst
    from
( -- r: why and how to copy, join sysTableSpaceStats
  select q.*
    , overlay(case
        when inst is null
            then raise_Error(70001, 'inst null '
                             || q.dbName || '.' || q.name)
        when nTables < 1 then 'n noTables ' || nTables
            -- let utility figure out define no or yes
            -- but dbAnalyzer always produces RTS not found messages
            -- ==> unfortunately not a good idea |
        when pSpace = -1     then 'n defineNo ' || pSpace
        when basTy <> 'F'  then 'f basIcType ' || basTy
        when basPa <> pa   then 'f multiPart'
        when basTst < current timestamp-7 days then 'f week'
        when r.updateStatsTime is null then 'f noRts'
        when r.copyLastTime is null then 'f r.copyLast null'
        when r.nactive * 0.1 <= r.copyupdatedpages
               then 'f updates'
  /*    when incTst < r.copyLastTime - 60 seconds
               then 'f i << r.copyLast'
        when incTy not in ('I','F') then 'i incIcType ' || incTy */
        when r.copyupdatedpages <> 0 then 'i updates'
        when r.copyChanges <> 0 then 'i changes'
        when r.copyUpdateLRSN is not null then 'i updLRSN'
        when r.copyUpdateTime is not null then 'i updTime'
        else 'n noUpdates'
        end, left(' ' || insTxt, 6), 2, 0, octets) what
    from
( -- q decode bas and inc fields
  select p.*
      , timestamp(substr(bas, 1, 26)) basTst
      , substr(bas, 27, 1) basTy
      , smallint(substr(bas, 28)) basPa
  /*  , timestamp(substr(inc, 1, 26)) incTst
      , substr(inc, 27, 1) incTy
      , smallint(substr(inc, 28)) incPa */
    from
( -- p tablespace, instance, tablePart
    select s.*
       , p.partition pa
       , p.space pSpace
       , max(value(s.bas0, ''), value(
         ( select char(timestamp) || icType || dsNum
             from sysibm.sysCopy c
             where s.dbName = c.dbName and s.name = c.tsName
                and p.partition = c.dsNum and p.partition > 0
                and s.inst = c.instance
               and c.icType not
                   IN ('A', 'B', 'C', 'D', 'I', 'J', 'M', 'Q', 'T')
               order by c.timestamp desc
               fetch first 1 rows only
         ) , ''), '1111-11-11-11.11.11.111111-0' ) bas
    /* , max(value(s.inc0, ''), value(
         ( select char(timestamp) || icType || dsNum
             from sysibm.sysCopy c
             where s.dbName = c.dbName and s.name = c.tsName
                and p.partition = c.dsNum and p.partition > 0
                and s.inst = c.instance
               and c.icType not
                   IN ('A', 'B', 'C', 'D',      'J', 'M', 'Q', 'T')
               order by c.timestamp desc
               fetch first 1 rows only
         ) , ''), '1111-11-11-11.11.11.111111-0' ) inc  */
      from
( -- s tablespace and instance
   select dbName, name, partitions parts
       , dbId, psId, nTables
       , i.inst
       , case when s.clone <> 'Y'      then '     '
              when s.instance = i.inst then 'base '
                                       else 'clone' end insTxt
       , ( select char(timestamp) || icType || dsNum
             from sysibm.sysCopy c
             where s.dbName = c.dbName and s.Name = c.tsName
                and 0 = c.dsNum and i.inst = c.instance
               and c.icType not
                   IN ('A', 'B', 'C', 'D', 'I', 'J', 'M', 'Q', 'T')
               order by c.timestamp desc
               fetch first 1 rows only
         ) bas0
   /*  , ( select char(timestamp) || icType || dsNum
             from sysibm.sysCopy c
             where s.dbName = c.dbName and s.Name = c.tsName
                and 0 = c.dsNum and i.inst = c.instance
               and c.icType not
                   IN ('A', 'B', 'C', 'D',      'J', 'M', 'Q', 'T')
               order by c.timestamp desc
               fetch first 1 rows only
         ) inc0   */
    from sysibm.sysTablespace s
      left join  -- clone handling: add instances
          ( select           1 from sysibm.sysDummy1
            union all select 2 from sysibm.sysDummy1
          ) i (inst)
        on s.instance = i.inst or s.clone = 'Y'
) s
      join sysibm.sysTablePart p
        on s.dbName = p.dbName and s.name = p.tsName
) p
) q
      left join sysibm.sysTableSpaceStats r
        on    q.dbName = r.dbName and q.name = r.name
          and q.dbid = r.dbid and q.psid = r.psid
          and q.pa = r.partition and q.inst = r.instance
) r
    where what like '$tsF%%' -- doppelte % fuer ca dbAnalyser
   and
----- begin @proc exclude: excludes --- S --------------------------
       NOT (dbName LIKE 'WKDB%%')             -- DB2 WORK DATABASE
   AND NOT (dbName LIKE '%%MAREC%%')           -- marec generated
   AND NOT (dbName LIKE 'DACME%%')            -- Mail Heinz Bühler
   AND NOT (dbName LIKE 'QZ91%%')             -- test klem 43
   AND NOT (dbName LIKE 'QZ92%%')             -- test klem 43
   and not translate(dbName, '999999999AAAAAA', '012345678FISWXY')
           = 'DA999999'                         -- user datenbanken
   AND NOT (dbName LIKE 'DB2ALA%%')           -- marec  generated
   AND NOT (dbName LIKE 'DB2POOL%%')          -- DB2 STOR.POOL WIESI
   AND NOT (dbName LIKE 'DB2MAPP%%')          -- REORG MAPPING TABLES
   AND NOT (dbName LIKE 'DB2PLAN%%'           -- explain tables
       and translate(left(name, 7), '999999999AA', '012345678FG')
           =  'A999999'                   -- user explain tables
           )
   AND NOT (dbName like 'DSNDB%%')            -- DB2 CATALOG
   AND NOT (dbName LIKE 'DSN8%%')             -- IBM TEST DB
   AND NOT (dbName = 'DSNTESQ')              -- DB2 CATALOG CLONE
   AND NOT (dbName like 'CSQ%%' AND name like 'TSBLOB%%' )
                                                -- M-QUEUE DATENBANK
   AND NOT (dbName = 'XC01A1P' and name <> 'A500A'
            and (name LIKE 'A2%%'or name LIKE 'A5%%'))
                                                -- EOS: Armin Breyer
   AND NOT (dbName = 'XR01A1P' AND name LIKE 'A2%%' )
                                                -- ERET: Armin Breyer
   AND NOT
   (dbName = 'BE01A1P' and name like 'A0%%' -- BE save
    or dbName = 'CD02A1P' and name = 'A600A')
----- end   @proc exclude: excludes --- S --------------------------
    and dbName = 'QZ01A1P' and name like 'A%' --??
    order by dbName, name, pa, inst
;
}¢--- A540769.WK.SQL(TECSVDDL) cre=2015-09-26 mod=2016-09-28-13.44.27 A540769 ---
$#@
$*(
    create views
        oa1p.vQZ005Recover current recover Info
        oa1p.vQZ005RecovDelta  same but ignore logDiscontinuities
                                in last 10 minutes
    if xDocs additionally
        oa1p.tQZ005TecSvUnload   table for unloads of Elar, EOS, eRet
        oa1p.vQZ005RecovLoad     recovery incl. load of xDoc tables
        oa1p.vQZ005RecovDeltaLoad incl. load of xDoc tables

    if useLgRn additionally
        OA1P.tqz004tecSvLgRn     table for sysLgRnX extract
        oa1p.vQZ005RecovDeltaLoadLgRn incl.  lastlgRn

28. 9.16 Walter cols spc=size in bytes, spcU=estimate of unload size
22. 9.16 Walter allow copies in stage UL, remove rtsLastEq, cleanup
 8. 4.16 Walter Cleanup
 8.12.15 Walter Nov Zuegelschub EOS/eRet
24. 9.15 Walter neu
$*)
$>. fEdit()
$=cr=OA1P
$=dropCreTb = 0
$=creDb = 0
$=deltaTime = 10 minutes
$= lEnd = sLrsn
$= lEnd = endTst
call iiIni
if 0 then $@¢
    call iiPut 'RZ2/DVBP'
    $@ddlOne
$! else $@/allRZ/
    $@jobHead
    oldRz = ''
    $do ix=1 while iiIxPut(ix) $@/envLoop/
        if $rz <> oldRz then $@¢
            if oldRz <> '' then
                $$ }{
            $@jobSub
            oldRz = $rz
            $!
       $@jobSql
       $@ddlOne
       $@ if $dropCreTb & $xDocs then
           $@loadUnload
$/envLoop/
$/allRZ/

$****** generate ddl for one rz/dbSys *********************************
$proc $@=/ddlOne/
$= xDocs  =- wordPos($dbSys, 'DVBP DBOF') > 0 $*+
         | ($rz=RZZ & wordPos($dbSys, 'DE0G DEVG') > 0)
          $** is instance in index of sysCopy ?
$=useLgRn = $xDocs
$=useInst =- wordPos($rz, 'RZ2 RZ4') < 1
--- ddl for tecsv recovery for $rz/$dbSys ----------------------------
--  generated by rz4/DSN.SOURCE.TECSV(TECSVDDL) alle Aenderungen dort
--  xDocs=$xDocs isElar=$dbSysElar useLgRn=$useLgRn useInst=$useInst
----------------------------------------------------------------------
set current sqlid = 'S100447';
drop   view $cr.vqz005Recover;
drop   view $cr.vqz005RecovDelta;
       $@ if $xDocs & $cr == 'OA1P' then
           $@tLastEqDrop
       $@ if $dropCreTb then $@/dropCreate/
           if $xDocs then
               $@tUnloadDrop
           if $useLgRn then
               $@tLgRnDrop
           if $xDocs | $useLgRn then
               $$ commit;
           if $creDb & ($xDocs | $useLgRn) then $@=¢
CREATE DATABASE QZ01A1P
       BUFFERPOOL BP2
       INDEXBP    BP1
       STOGROUP GSMS
       CCSID EBCDIC
;
commit;
               $!
           $/dropCreate/
--#SET MAXERRORS 0
       $@ if $dropCreTb then $@¢
           if $xDocs then
               $@tUnload
           if $useLgRn then
               $@tLgRn
           $!
       $@% vRecover vqz005Recover
       $@% vRecover vqz005RecovDelta $deltaTime
       $@ if $xDocs then $@¢
           $@% vRecovLoad vqz005RecovLoad vqz005Recover
           $@% vRecovLoad vqz005RecovDeltaLoad $*+
                     vqz005RecovDelta
           $@ if $useLgRn then $@¢
               $@% vRecovLoadLgRn vqz005RecovLoadLgRn $*+
                                   vqz005RecovLoad
               $@% vRecovLoadLgRn vqz005RecovDeltaLoadLgRn $*+
                                   vqz005RecovDeltaLoad
               $!
           $!
$/ddlOne/

$****** recoverView: pro partition/instance/newest sysCopy ***********
$proc $@=/vRecover/
$arg view logDisMin
create view $cr.$view as
with two (i) as
( -- do not use sysDummy1 and union all
  -- optimizer would choose very bad accessPath |||
  select row_number() over () from sysibm.sysDatabase
  fetch first 2 rows only
)
, s2 as -- tablespace with 1 or 2 instances
(
  select char(s.dbName, 8) db, char(s.name, 8) ts
      , s.instance instBa
      , smallInt(value(two.i, s.instance)) inst
      , char(value(case
          when s.clone = 'N' and s.instance = 1 then '1'
$@ if $useInst then $@=¢
          when s.clone = 'N'                    then '2only'
          when s.instance = two.i               then two.i || 'base'
          else                                       two.i || 'clone'
$! $@ else $@=¢
          when s.clone = 'N'                    then '2only?'
          when s.instance = two.i               then two.i || 'base?'
          else                                       two.i || 'clon?'
$!
          end, '?clo??'), 6) insTxt
      , s.pgSize, s.dbId, s.psId , s.nTables
      , smallInt(value(case
            when dssize <> 0 then real(dssize) / 1048576
            when type in ('G', 'O', 'P', 'R', 'L') then 4
            when partitions = 0     then  64
            when partitions > 254 then    pgSize
            when partitions > 64    then   4
            when partitions > 32    then   1
            when partitions > 16    then   2
                                    else   4
        end, -99)) dsGB
    from sysibm.sysTableSpace s
      left join two on s.clone = 'Y'
)
, s as -- tableSpace/instance + lastCopy of partition 0
(
  select s2.*
         -- lastCopy of partition 0
      $@% selCopy s2.db s2.ts 0 s2.inst ic0 $logDisMin
    from s2
)
, p2 as -- ts/instance/partition + lastCopy of pa
(
  select s.*, p.partition pa
      , value(p.space, 0) pSpc
      , value(p.pageSave, 0) pgSv
      -- last copy of partition pa
      $@% selCopy s.db s.ts p.partition s.inst icPa $logDisMin
    from s
      join sysibm.sysTablePart p
        on s.db = p.dbName and s.ts = p.tsName
)
, p3 as -- newer of lastcopy of partition pa or 0
(
  select db, ts, pa, inst, insTxt
      , pgSize, nTables, dbId, psId, dsGb, pSpc, pgSv, instBa
      , max(value(substr(icPa, 33, 32),'1111-11-11-11.11.11.111111--1')
           ,value(substr(ic0 , 33, 32),'1111-11-11-11.11.11.111111--1')
           , '1111-11-11-11.11.11.111111--1') basTTP

      , max(value(substr(icPa,  1, 32),'1111-11-11-11.11.11.111111--1')
           ,value(substr(ic0 ,  1, 32),'1111-11-11-11.11.11.111111--1')
           , '1111-11-11-11.11.11.111111--1') incTTP
    from p2
)
, p4 as -- decode TTP into timestamp, type and partition
(
  select p3.*
      , substr(basTTP, 27, 1) basTy
      , smallInt(substr(basTTP, 28, 5)) basPa
      , timestamp(substr(basTTP, 1, 26)) basTst
      , substr(incTTP, 27, 1) incTy
      , smallInt(substr(incTTP, 28, 5)) incPa
      , timestamp(substr(incTTP, 1, 26)) incTst
    from p3
)
, p as -- add recover state and text for baseType
(
  select p4.*
      , char(case when pSpc = -1 then 'defNo'
             when nTables = 0 then 'noTb'
             when basTy not in ('A','C','F','R','X') then 'logDisc'
             when basTst < current timestamp - 23 days then 'tooOld'
             when basTst < current timestamp - 8 days then 'older8d'
             else 'ok' end, 8) recover
      , basTy || case basTy
                     when '-' then '=missing'
                     when 'A' then '=addPart'
                     when 'C' then '=create'
                     when 'F' then '=fulCopy'
                     when 'I' then '=incCopy'
                     when 'P' then '=recPIT'
                     when 'R' then '=LoaRpLog'
                     when 'S' then '=LoaRpLoNo'
                     when 'W' then '=ReorgLoNo'
                     when 'X' then '=ReorgLog'
                     when 'Y' then '=LoaRsLoNo'
                     else          '=???' end basTyTx
    from p4
)
select db, ts, pa, inst, recover
    $@vRecCols
    from p
;
$/vRecover/

$****** column list for recovery info ********************************
$proc $@=/vRecCols/
      , basTyTx, basPa, basTst, basTy
      , incTy, incPa, incTst
      , pgSize, pSpc, pgSv, dsGB, dbId, psId, insTxt, instBa
$/vRecCols/

$****** select newest copy for part/inst *****************************
$proc $@=/selCopy/
$arg selCopyDb selCopyTs selCopyPa selCopyInst selCopyAl selCopyDe
          -- 1) encode timestamp, type, part in one string (sortable)
          -- 2) for a=lastIncremental and b=recover base
      , ( select max( substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5))
              || max(case when icType <> 'I'
                 then substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5) else '' end )
            from sysibm.sysCopy c
            where $selCopyDb = c.dbName
                and $selCopyTs = c.tsName
$@ if $selCopyPa = 0 then $@=¢
                and c.dsNum = $selCopyPa
$! $@ else $@=¢
                and c.dsNum = $selCopyPa and $selCopyPa > 0
$!
                and icType in ('A','C','F','R','X'      -- logBase
                                      ,'P','S','W','Y'  -- logDiscontinu
                              ,'I')
                and (icType <> 'A' or sType = 'A')
$@ if $useInst then $@=¢
                and (c.instance = $selCopyInst or icType in ('A', 'C'))
$!
$@ if  $selCopyDe <> '' then $@=¢
                -- ignore discontinuities in the last few minutes
                and not (ICTYPE in('P','S','W','Y')
                   and c.timestamp > current timestamp  - $selCopyDe )
$!
        ) $selCopyAl
$/selCopy/

$****** view for recover by copy/log OR load unload ******************
$proc $@=/vRecovLoad/
$arg view vRec gg
create view $cr.$view as
with u as -- join unloads
(
  select p.*
      , char(value(stage, ''), 2) stage
      , value(staUpd, '1111-11-11-11.11.11') staUpd
      , char(value(staTb, ''), 2) staTb
      , value(unlTst, '1111-11-11-11.11.11') unlTst
      , value(case when trunc_timestamp(unlTst, 'ddd') = unlTst
           then (unlTst + 1 day) - 0.000001 seconds else unlTst end
             , '1111-11-11-11.11.11') unlTsUp
      , value(unl, '') unl
      , value(punTst, '1111-11-11-11.11.11') punTst
      , value(pun, '') pun
      , value(u.info, '') unlInfo
      , strip(value(u.err, '')
          || case when stage = 'IN' and unl <> ''
                          and staUpd < current timestamp - 24 hour
                      then ' stillUnlAft24h'
                  when stage = 'RD' and unl <> ''
                          and staUpd < current timestamp - 48 hour
                      then ' RDolder48h'
                  else '' end) unlErr
    from $cr.$vRec p
      left join oa1p.tqz005TecSvUnload u
        on u.db = char(p.db, 8)
          and u.ts = char(p.ts, 8)
          and u.pa = p.pa and u.pa >= 0
)
, e2 as
(
  select u.*
      , 1024.0 * min(1048576.0
                         * case when dsGb > 0 then dsGb else 64 end
                    , max(0, value(pSpc, 0)
                         , value(real(r.nActive) * u.pgSize, 0))) spc
      , char(case when stage = '' then 'r' -- load, recovery or both?
$@ if $dbSysElar then $@=¢
             when stage in ('UL', 'DL', '-w') then 'l'
$! $@ else $@=¢
          when stage in ('IN', 'RD', 'UL') then '2'
$!
          else 'r'
      end, 1) recLR
      , case -- is load the unload valid or not, check metadata/syscopy
            when unl = '' then 'noUnload'
            when unlTst < '1919-01-01-00.00.00' then 'unlTstNull'
$*( --------------- ok, we now allow copies after unload --------------
            when BasTst > unlTsUp
$@ if $dbSysElar then $@=¢
              and not (BasTy = 'F' and basTst > '2015-12-01-00.00.00')
$! $@ else $@=¢
              and (basTy <> 'F' or (date(incTst) <> '18.05.2015'
                     and basTst <= '2015-12-01-00.00.00') )
$!
               then 'unl<base=' || basTyTx
--------------------------------------------------------------------$*)
            when incTy='I'
$@ if \ $dbSysElar then
      and date(incTst) not in ('18.05.2015','19.05.2015','10.12.2015')
                then 'incCopy'
            when basTy <> 'F' then 'base=' || basTyTx
            else ''
        end recLoad
      , case -- is load the unload valid or not, check rts
            when unl = '' then ''
            when r.dbName is null then 'noRTS'
            when r.lastDataChange > u.unlTsUp then 'dataChange>unl'
            when r.copyChanges <> 0 then 'copyChanges<>0'
            when r.copyUpdatedPages <> 0 then 'updatedPages<>0'
            when r.copyUpdatetime is not null then 'copyUpdateNotNull'
            when r.lastDataChange >u.BasTst
$@ if \ $dbSysElar then
                   and basTst > '2015-09-12-12.00.00'
                then 'dataChange>base=' || basTyTx
            when r.lastDataChange is null and unl <> '' and unlTst
                  < '2015-04-15-00.00.00' then 'dataChangeV11>unl'
            else ''
        end rtsLoad
      , lastDataChange, copyUpdateTime, copyChanges, copyUpdatedPages
    from u
      left join sysibm.sysTableSpaceStats r
        on u.dbId = r.dbId and u.psId = r.psId
        and u.pa = r.partition -- and u.inst = r.instance
        and u.db = r.dbName and u.ts = r.name
)
, e3 as
(
   select e2.*
      , spc * 100 / min(max(1, 100 - value(pgSv, 0)), 300) spcU
      , char(case when ( recLoad =  ''
$@ if $dbSysElar then $@=¢
                  or (recLoad in ( 'base=A=addPart'
                                 , 'base=C=create'
                                 , 'base=S=LoaRpLoNo'
                                 , 'base=Y=LoaRsLoNo'
                                 ) and basTst < '2014-05-01-00.00.00' )
$!
                  ) and rtsLoad in ('', 'dataChangeV11>unl')
             then 'l' else '?' end, 1) recLok
    from e2
)
select db, ts, pa, inst, recover
      , char(case when recLR in ('r', '2')
                            and recover in ('defNo', 'noTb') then '-'
             when recLR in ('r', '2') and recover = 'ok'     then 'r'
             when recLR in ('l', '2') and recLok = 'l'       then 'l'
             else '?' end, 1) fun
      , recLok lok
      , trim(trim(recLoad || ' ' || rtsLoad) || ' ' || unlErr) load
      $@vRecLoadCols
    from e3
;
$/vRecovLoad/

$proc $@=/vRecLoadCols/
      $@vRecCols
      , stage, staUpd, staTb, unlTst, unlTsUp, unl, punTst, pun
      , unlInfo, unlErr, recLR
      , lastDataChange, copyUpdateTime, copyChanges, copyUpdatedPages
      , spc, spcU
$/vRecLoadCols/

$****** view for recover use rts plus sysLgRnX ************************
$proc $@=/vRecovLoadLgRn/
$arg view vRec gg
create view $cr.$view as
with l2 as
(
  select r.*
      , case when unl = '' -- lgRn after unload?
                   or unlTst < '1919-01-01-00.00.00' then ''
             when l.$lEnd > unlTst then 'lgRn>unl'
             when l.$lEnd > basTst then 'lgRn>base'
             when l.$lEnd is null then 'lgRnNone'
             else ''
        end lgRnLoad
      , l.$lEnd lgRnEnd
    from $cr.$vRec r
      left join oa1p.tqz004TecSvLgRn l
      on r.db = l.db and r.ts = l.ts and r.pa = l.pa
)
, l3 as
(
  select l2.*
      , char(case when lgRnLoad in ('', 'lgRnNone')
        or (lgRnLoad ='lgRn>base' and lgRnEnd <'2015-06-01-00.00.00')
           then lok else '?' end, 1) lgRnLok
    from l2
)
select db, ts, pa, inst, recover
      , case when fun <> 'l' then fun else lgRnLok end fun
      , lgRnLok lok
      , trim(load || ' ' || lgRnLoad) load
      $@vRecLoadCols
      , lgRnEnd
    from l3
;
$/vRecovLoadLgRn/

$****** drop tqz005TecSvUnload ****************************************
$proc $@=/tUnloadDrop/
alter table oa1p.tQz005TecSvUnload drop restrict on drop;
drop tablespace qz01a1p.a005a;
$/tUnloadDrop/

$****** create tqz005TecSvUnload **************************************
$proc $@=/tUnload/
----- ddl tecSv: xDocs: unload DSNs fuer ControlSummary ---------------
CREATE TABLESPACE a005a
    IN QZ01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64 DSSIZE 4G MAXPARTITIONS 10
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255;
CREATE TABLE OA1P.tqz005tecSvUnload
  ( db        char(8)  not null
  , ts        char(8)  not null
  , pa        smallint not null
  , stage     char(2)  not null
  , staUpd    timestamp not null
  , staTb     char(2) not null
  , unlTst    timestamp not null
  , unl       char(44) not null
  , punTst    timestamp not null
  , pun       char(44) not null
  , info      varchar(70) not null
  , err       varchar(70) not null
  )
  in qz01a1p.a005a
    AUDIT NONE
    DATA CAPTURE changes
    CCSID      unicode
    WITH RESTRICT ON DROP
    NOT VOLATILE;

CREATE UNIQUE INDEX oa1p.iQZ005a1
  ON oa1p.tqz005TecSvUnload
   (db, ts, pa)
   include(stage)
  USING STOGROUP GSMS
  ERASE  NO
  GBPCACHE CHANGED
  CLUSTER
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFINE YES
;
$/tUnload/

$proc $@=/tLgRnDrop/
alter table oa1p.tQz004TecSvLgRn drop restrict on drop;
drop tablespace qz01a1p.a004a;
$/tLgRnDrop/

$****** create tqz004TecSvLgRn ****************************************
$proc $@=/tLgRn/
CREATE TABLESPACE a004a
    IN QZ01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64 DSSIZE 4G MAXPARTITIONS 10
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255;
;
CREATE TABLE OA1P.tqz004tecSvLgRn
  ( db        char(8)  not null
  , ts        char(8)  not null
  , pa        smallint not null
  , $lEnd     timestamp not null
  )
  in qz01a1p.a004a
    AUDIT NONE
    DATA CAPTURE changes
    CCSID      unicode
    WITH RESTRICT ON DROP
    NOT VOLATILE;

CREATE UNIQUE INDEX oa1p.iQZ004a1
  ON oa1p.tqz004TecSvLgRn
   (db, ts, pa)
   include($lEnd)
  USING STOGROUP GSMS
  ERASE  NO
  GBPCACHE CHANGED
  CLUSTER
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFINE YES
;
$/tLgRn/

$****** drop tqz005TecSvRtsLastEq *************************************
$proc $@=/tLastEqDrop/
----- ddl tecSv: xDocs: last rts timestamp with eq data ---------------
ALTER  TABLE OA1P.tqz005tecSvRtsLastEq DROP RESTRICT ON DROP ;
DROP   TABLESPACE QZ01A1P.a005r;
$/tLastEqDrop/

$****** load tqz004TecSvUnload ****************************************
$proc $@=/loadUnload/
//L$dbSys    EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
//             PARM='%tecSvUnl $dbSys'
//SYSTSPRT   DD SYSOUT=*
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTERM    DD DUMMY
//SYSPROC    DD DISP=SHR,DSN=DSN.DB2.EXEC
//SYSTSIN    DD DUMMY
//U$dbSys    EXEC PGM=DSNUTILB,TIME=1440,REGION=0M,
//             PARM=($dbSys,'TECSVDDL.RUNSTA')
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSOUT     DD SYSOUT=*
//SYSIN      DD *
     LISTDEF LST INCLUDE TABLESPACE QZ01A1P.A005A PARTLEVEL
   RUNSTATS TABLESPACE  LIST LST
     INDEX(ALL)
     REPORT NO  UPDATE ALL
     SHRLEVEL CHANGE
$/loadUnload/

$****** output job header *********************************************
$proc $@=/jobHead/
//TECSVDDL JOB (CP00,KE50),'DB2 DDL',
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2ALL
$/jobHead/

$****** step for submit job to rz *************************************
$proc $@=/jobSub/
//***** submit job to $rz *****************************************
//SUB$rz  EXEC PGM=IEBGENER
//SYSPRINT   DD SYSOUT=*
//SYSUT2     DD SUBSYS=(CSM,'SYSTEM=$rz,SYSOUT=(A,INTRDR)')
//SYSUT1     DD DATA,DLM='}{'
$@jobHead
$/jobSub/

$****** step for sql execution ****************************************
$proc $@=/jobSql/
//*---- execute ddl in $rz/$dbSys isElar=$dbSysElar ------------------
//S$dbSys   EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSTSIN    DD *
  DSN SYSTEM($dbSys)
    RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT   DD SYSOUT=*
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTERM    DD DUMMY
//SYSIN      DD *
$/jobSql/
}¢--- A540769.WK.SQL(TECSVDDO) cre=2015-05-29 mod=2015-09-10-13.47.29 A540769 ---
       -- ddl tecSv: unload DSNs fuer ControlSummary
       --
set current sqlid = 'S100447';
-- alter  TABLE OA1P.tqz005tecSvUnload drop restrict on drop;
drop   tablespace QZ01A1P.A004A ;
drop   tablespace QZ01A1P.A005A ;
commit;
CREATE TABLESPACE a005a
    IN QZ01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255;
;
CREATE TABLESPACE a004a
    IN QZ01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255;
;
CREATE TABLE OA1P.tqz004tecSvLgRn
  ( db        char(8)  not null
  , ts        char(8)  not null
  , pa        smallint not null
  , start     timestamp not null
  , sLrsn     timestamp not null
  , cnt       int not null
  )
  in qz01a1p.a004a
    AUDIT NONE
    DATA CAPTURE changes
    CCSID      unicode
    WITH RESTRICT ON DROP
    NOT VOLATILE;

CREATE UNIQUE INDEX oa1p.iQZ004a1
  ON oa1p.tqz004TecSvLgRn
   (db, ts, pa)
   include(start)
  USING STOGROUP GSMS
  ERASE  NO
  GBPCACHE CHANGED
  CLUSTER
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFINE YES
;
CREATE TABLE OA1P.tqz005tecSvUnload
  ( db        char(8)  not null
  , ts        char(8)  not null
  , pa        smallint not null
  , stage     char(2)  not null
  , staUpd    timestamp not null
  , staTb     char(2) not null
  , unlTst    timestamp not null
  , unl       char(44) not null
  , punTst    timestamp not null
  , pun       char(44) not null
  , info      varchar(70) not null
  , err       varchar(70) not null
  )
  in qz01a1p.a005a
    AUDIT NONE
    DATA CAPTURE changes
    CCSID      unicode
    WITH RESTRICT ON DROP
    NOT VOLATILE;

CREATE UNIQUE INDEX oa1p.iQZ005a1
  ON oa1p.tqz005TecSvUnload
   (db, ts, pa)
   include(stage)
  USING STOGROUP GSMS
  ERASE  NO
  GBPCACHE CHANGED
  CLUSTER
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFINE YES
;
commit
}¢--- A540769.WK.SQL(TECSVDDT) cre=2016-09-20 mod=2016-09-20-13.40.41 A540769 ---
select count(*), recover, inst, insTxt, basTyTx, incTy
    from A540769.vqz005Recover
    group by     recover, inst, insTxt, basTyTx, incTy
;
select count(*), recover, inst, insTxt, basTyTx, incTy
    from OA1P.vqz005Recover
    group by     recover, inst, insTxt, basTyTx, incTy
;
select count(*), fun, lok, recover, load, basTyTx, incTy
    from OA1P.vqz005RecovLoad
    group by fun, lok, recover, load, basTyTx, incTy
}¢--- A540769.WK.SQL(TECSVDDX) cre=2015-09-15 mod=2015-09-15-14.12.47 A540769 ---
set current sqlid = 'S100447';
drop   view oa1p.vqz005RecovLoad ;
create view oa1p.vqz005RecovLoad as
with two (i) as
(
  select 1 from sysibm.sysDummy1
  union all select 2 from sysibm.sysDummy1
)
, p2 as
(
  select s.dbName db, s.name ts, p.partition pa, two.i inst
      , p.space pSpc
      , value(stage, '') stage
      , value(staUpd, '1111-11-11-11.11.11') staUpd
      , value(staTb, '') staTb
      , value(unlTst, '1111-11-11-11.11.11') unlTst
      , value(unl, '') unl
      , value(punTst, '1111-11-11-11.11.11') punTst
      , value(pun, '') pun
      , value(u.info, '') infoUnl
      , value(u.err, '') errUnl
      , r.dbName rDb
      , r.lastDataChange
      , r.copyUpdatetime
      , r.copychanges
      , r.copyupdatedpages
      , case when s.instance = 1 and s.clone = 'N' then '1'
             when s.clone = 'N' then '' || s.instance || 'only'
             when s.instance = two.i then '' || two.i || 'base'
             else '' || two.i || 'clone' end insTxt
      , ( select max( substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5))
              || max(case when icType <> 'I'
                 then substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5) else '' end )
            from sysibm.sysCopy c
            where s.dbName = c.dbName
                and s.name = c.tsName
                and c.dsNum = p.partition
      --???     and c.instance = two.i
                and icType in ('A','C','F','R','X'      -- logBase
                                      ,'P','S','W','Y'  -- logDiscontinu
                              ,'I')
                and (icType <> 'A' or sType = 'A')
        ) icPa
      , ( select max(substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5))
             || max(case when icType <> 'I'
                  then substr(char(timestamp), 1, 26) ||char(icType, 1)
                          || right('    ' || dsNum, 5) else '' end )
            from sysibm.sysCopy c
            where s.dbName = c.dbName
                and s.name = c.tsName
                and c.dsNum = 0 and p.partition <> 0
      --???     and c.instance = two.i
                and icType in ('A','C','F','R','X'      -- logBase
                                      ,'P','S','W','Y'  -- logDiscontinu
                              ,'I')
                and (icType <> 'A' or sType = 'A')
        ) ic0
    from sysibm.sysTableSpace s
      join two on s.instance = two.i or s.clone = 'Y'
      join sysibm.sysTablePart p
        on s.dbName = p.dbName and s.name = p.tsName
      left join oa1p.tqz005TecSvUnload u
        on u.db = s.dbName and u.ts = s.name and u.pa = p.partition
          and u.pa >= 0
      left join sysibm.sysTableSpaceStats r
        on s.dbId = r.dbId and s.psId = r.psId
        and p.partition = r.partition and two.i = r.instance
        and s.dbName = r.dbName and s.name = r.name
)
, p3 as
(
  select p2.*
      , max(value(substr(icPa, 33, 32), '1111-11-11-11.11.11.111111- ')
           ,value(substr(ic0 , 33, 32), '1111-11-11-11.11.11.111111- ')
           , '1111-11-11-11.11.11.111111- ') basTTP

      , max(value(substr(icPa,  1, 32), '1111-11-11-11.11.11.111111- ')
           ,value(substr(ic0 ,  1, 32), '1111-11-11-11.11.11.111111- ')
           , '1111-11-11-11.11.11.111111- ') incTTP
    from p2
)
, p4 as
(
  select p3.*
      , substr(basTTP, 27, 1) basTy
      , substr(basTTP, 28, 5) basPa
      , timestamp(substr(basTTP, 1, 26)) basTst
      , substr(incTTP, 27, 1) incTy
      , substr(incTTP, 28, 5) incPa
      , timestamp(substr(incTTP, 1, 26)) incTst
    from p3
)
, p as
(
  select p4.*
      , case when pSpc = -1 then 'okDefNo'
             when basTy not in ('A','C','F','R','X') then 'logDisc'
             when basTst < current timestamp - 23 days then 'tooOld'
             else 'ok' end recov
      , basTy || case basTy
                     when '-' then '=missing'
                     when 'A' then '=addPart'
                     when 'C' then '=create'
                     when 'F' then '=fulCopy'
                     when 'I' then '=incCopy'
                     when 'P' then '=recPIT'
                     when 'R' then '=LoaRpLog'
                     when 'S' then '=LoaRpLoNo'
                     when 'W' then '=ReorgLoNo'
                     when 'X' then '=ReorgLog'
                     when 'Y' then '=LoaRsLoNo'
                     else          '=???' end basTyTx
    from p4
)
, e2 as
(
  select p.*
      , case when recov = 'okDefNo' then ''
             when recov = 'tooOld' or ( left(recov, 2) = 'ok'
                     and basTst < current timestamp - 15 day)
                 then 'older15d' || ':' || basTyTx
             when left(recov, 2) = 'ok'
                     and basTst < current timestamp -8 day
                 then 'older8d' || ':' || basTyTx
             when left(recov, 2) = 'ok' then ''
             else recov || ':' || basTyTx
        end erReD
      , strip(case
             when unl = '' then 'noUnload'
             when unlTst < current timestamp-100 year
                 then 'unlTstNull'
             when rDb is null then 'noRTS'
             when lastDataChange > p.unlTst then 'dataChange>unl'
             when copyUpdatetime > unlTst then 'copyUpdate>unlTst'
             when BasTst > unlTst
                   and (date(incTst) <> '18.05.2015' or basTy <> 'F')
               then 'unlTst<ful='||basTyTx
           when incTy='I' and unlTst < incTst
                   and date(incTst) <> '18.05.2015'
               then 'unlTst<incCopy'
           when copyChanges <> 0 then 'copyChanges<>0'
           when copyUpdatedPages <> 0 then 'updatedPages<>0'
           when copyUpdatetime is not null then 'copyUpdateNotNull'
           when lastDataChange > p.BasTst and p.basTy not in('A','-')
                   and unlTst > '2015-09-12-12.00.00'
               then 'dataChange>ful='||basTyTx
           when basTy <> 'F' then 'lastFul=' || basTyTx
           when incTy = 'I' and incTst > unlTst
                   and date(incTst) <> '18.05.2015'
               then 'incTst>unlTst'
           when lastDataChange is null and unlTst
                  < '2015-04-15-00.00.00' then 'dataChangeV11>unl'
           when lastDataChange is null
                  and p.incTst < '2015-04-15-00.00.00'
               then 'dataChangeV11>incCopy'
           when incTy = 'I' and incTst > unlTst
                   and date(incTst) = '18.05.2015'
               then 'inc180515>unl'
           else ''
      end) erReU
    from p
)
, e as
(
  select e2.*
    , strip(case
          when stage = '' then recov || ':' || basTyTx
          when stage in ('IN', 'UL')
               and erReD <> '' and erReU <> ''
              then erReU || ' ' || erReD
          when stage = 'IN' and unl <> '' and
                         staUpd < current timestamp - 24 hour
              then 'stillUnlAft24h'
          when stage not in ('IN', 'UL') and erReD <> '' then erReD
          else ''
      end ) erRec
    from e2
)
select *
    from e
;
}¢--- A540769.WK.SQL(TECSVDDY) cre=2015-09-26 mod=2015-09-26-20.28.43 A540769 ---
$#@
$*(                     Versuch mit einer View mit/ohne Delta
                        geht zwar aber zu komplex |||
    create views
        oa1p.vQZ005Recover recover Info
    if xDocs additionally
        oa1p.tQZ005TecSvUnload   table for unloads of Elar, EOS, eRet
        oa1p.vQZ005RecovLoad     recovery incl. load of xDoc tables
        oa1p.vQZ005RecovLoadLgRn plus lgRn check

24. 9.15 Walter neu
$*)
$>. fEdit()
$=useLgRn = 1
$=useInst = 0  $** 1 = if instance in index of sysCopy otherwise 0
$=dropCreTb = 0
$=logDisDelta = 10 minutes
call iiIni
if 0 then $@=¢
set current sqlid = 'S100447';
drop   view oa1p.vqz002Recover;
drop   view oa1p.vqz005ConSum;
drop   view oa1p.vqz005Recover;
    $=isElar = 0
    $=dbSys=DBOF
    $@vRecover
    $@vRecovLoad
$! else $@=/allRZ/
    $@jobHead
    $@ oldRz = ''
    $do ix=1 while iiIxvPut(ix) $@=/envLoop/
       $@ if $rz <> oldRz then $@¢
           if oldRz <> '' then
               $$ }{
           $@jobSub
           oldRz = $rz
           $!
       $= xDocs  =- wordPos($dbSys, 'DVBP DBOF') > 0  $*+
                     | ($dbSys = DEVG & $rz = RZZ)
       $= isElar =- $dbSys = 'DVBP'
       $@jobSql
set current sqlid = 'S100447';
drop   view oa1p.vqz005Recover;
drop   view oa1p.vqz005ConSum;
       $@ if $dropCreTb then $@¢
           if $xDocs then
               $@tUnloadDrop
           if $useLgRn then
               $@tLgRnDrop
           if $xDocs | $useLgRn then
               $$ commit;
           $!
--#SET MAXERRORS 0
       $@ if $dropCreTb then $@¢
           if $xDocs then
               $@tUnload
           if $useLgRn then
               $@tLgRn
           $!
       $@vRecover
       $@ if $xDocs then
           $@vRecovLoad
       $@ if $dropCreTb & $xDocs then
           $@loadUnload
$/envLoop/
$/allRZ/

$proc $@=/vRecover/
create view oa1p.vqz005Recover as
with two (i) as
( -- do not use sysDummy1 and union all
  -- optimizer would choose very bad accessPath |||
  select row_number() over () from sysibm.sysDatabase
  fetch first 2 rows only
)
, s2 as
(
  select s.dbName db, s.name ts
      , s.instance instBa
      , two.i inst
      , s.pgSize, s.dbId, s.psId , s.nTables
      , clone
    from sysibm.sysTableSpace s
      join two on s.clone = 'Y' or two.i = s.instance
)
, s as
(
  select s2.*
$@ if $useInst then $@=¢
      , substr(case
          when inst = 1 and clone = 'N' then '1'
          when clone = 'N' then '' || inst || 'only'
          when instBa = inst then '' || inst || 'base'
          else '' || inst || 'clone' end, 1, 6) insTxt
$! $@ else $@=¢
      , substr(case
          when inst = 1 and clone = 'N' then '1'
          when clone = 'N' then '' || inst || 'only?'
          when instBa = inst then '' || inst || 'base?'
          else '' || inst || 'clon?' end, 1, 6) insTxt
$!
      , (
        $@% selCopy s2.db s2.ts 0 s2.inst $logDisDelta
        ) ic0
    from s2
)
, p2 as
(
  select s.*, p.partition pa
      , value(p.space, 0) pSpc
      , (
        $@% selCopy s.db s.ts p.partition two.i $logDisDelta
        ) icPa
    from s
      join sysibm.sysTablePart p
        on s.db = p.dbName and s.ts = p.tsName
)
, p3 as
(
  select db, ts, pa, inst, insTxt
      , pgSize, nTables, dbId, psId, pSpc, instBa
      , max(value(substr(icPa, 33, 32), '1111-11-11-11.11.11.111111- ')
           ,value(substr(ic0 , 33, 32), '1111-11-11-11.11.11.111111- ')
           , '1111-11-11-11.11.11.111111- ') basTTP

      , max(value(substr(icPa,  1, 32), '1111-11-11-11.11.11.111111- ')
           ,value(substr(ic0 ,  1, 32), '1111-11-11-11.11.11.111111- ')
           , '1111-11-11-11.11.11.111111- ') incTTP
    from p2
)
, p4 as
(
  select p3.*
      , substr(basTTP, 27, 1) basTy
      , substr(basTTP, 28, 5) basPa
      , timestamp(substr(basTTP, 1, 26)) basTst
      , substr(incTTP, 27, 1) incTy
      , substr(incTTP, 28, 5) incPa
      , timestamp(substr(incTTP, 1, 26)) incTst
    from p3
)
, p5 as
(
  select p4.*
      , case when pSpc = -1 then 'defNo'
             when nTables = 0 then 'noTb'
             when basTy not in ('A','C','F','R','X') then 'logDisc'
             when basTst < current timestamp - 23 days then 'tooOld'
             else 'ok' end recov
      , basTy || case basTy
                     when '-' then '=missing'
                     when 'A' then '=addPart'
                     when 'C' then '=create'
                     when 'F' then '=fulCopy'
                     when 'I' then '=incCopy'
                     when 'P' then '=recPIT'
                     when 'R' then '=LoaRpLog'
                     when 'S' then '=LoaRpLoNo'
                     when 'W' then '=ReorgLoNo'
                     when 'X' then '=ReorgLog'
                     when 'Y' then '=LoaRsLoNo'
                     else          '=???' end basTyTx
    from p4
)
, d2 as
(
  select p5.*
    , case when recov <> 'logDisc'
               or basTst < current timestamp - 10 minutes then basTTP
           else value ( (
               $@% selCopy p5.db p5.ts p5.pa p5.inst 10 minutes
               ) , '1111-11-11-11.11.11.111111- ') end deltaTTP
    from p5
)
, d3 as
(
  select d2.*
      , substr(deltaTTP, 27, 1) deltaTy
      , substr(deltaTTP, 28, 5) deltaPa
      , timestamp(substr(deltaTTP, 1, 26)) deltaTst
      , case when deltaTTP = basTTP
             then basTyTx else substr(deltaTTP, 27, 1) end deltaTyTx
    from d2
)
, d4 as
(
  select d3.*
      , case when basTTP = deltaTTP then recov
             when deltaTy not in ('A','C','F','R','X') then 'logDisc'
             when deltaTst < current timestamp - 23 days then 'tooOld'
             else 'ok' end delta
    from d3
)
select db, ts, pa, inst, recov, delta
      , basTyTx, basPa, basTst, basTy
      , incTy, incPa, incTst
      , deltaPa, deltaTst, deltaTy, deltaTyTx
      , pgSize, pSpc, dbId, psId, insTxt, instBa
    from d4
;
$/vRecover/

$proc $@=/selCopy/
$arg selCopyDb selCopyTs selCopyPa selCopyInst selCopyDelta
          select max( substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5))
              || max(case when icType <> 'I'
                 then substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5) else '' end )
            from sysibm.sysCopy c
            where $selCopyDb = c.dbName
                and $selCopyTs = c.tsName
$@ if $selCopyPa = 0 then $@=¢
                and c.dsNum = $selCopyPa
$! $@ else $@=¢
                and c.dsNum = $selCopyPa and $selCopyPa > 0
$!
                and icType in ('A','C','F','R','X'      -- logBase
                                      ,'P','S','W','Y'  -- logDiscontinu
                              ,'I')
                and (icType <> 'A' or sType = 'A')
$@ if $useInst then $@=¢
                and (c.instance = $selCopyInst or icType in ('A', 'C'))
$!
$@ if  $selCopyDelta <> '' then $@=¢
                and not (ICTYPE in('P','S','W','Y')
                    and c.timestamp > current timestamp
                       - $selCopyDelta)
$!
$/selCopy/

$proc $@=/vRecovLoad/
create view oa1p.vQz005RecovLoad as
with u as
(
  select p.*
      , value(stage, '') stage
      , value(staUpd, '1111-11-11-11.11.11') staUpd
      , value(staTb, '') staTb
      , value(unlTst, '1111-11-11-11.11.11') unlTst
      , value(case when trunc_timestamp(unlTst, 'ddd') = unlTst
           then (unlTst + 1 day) - 0.000001 seconds else unlTst end
             , '1111-11-11-11.11.11') unlTsUp
      , value(unl, '') unl
      , value(punTst, '1111-11-11-11.11.11') punTst
      , value(pun, '') pun
      , value(u.info, '') infoUnl
      , value(u.err, '') errUnl
    from oa1p.vQZ005Recover p
      left join oa1p.tqz005TecSvUnload u
        on u.db = char(p.db, 8)
          and u.ts = char(p.ts, 8)
          and u.pa = p.pa and u.pa >= 0
)
, e2 as
(
  select u.*
      , value(real(r.nActive) * u.pgSize, 0) rSpc
      , case when recov = 'ok' and basTst < current timestamp - 8 day
                then 'older8d' else recov end rec8d
      , case when delta = 'ok' and deltaTst < current timestamp - 8 day
                then 'older8d' else delta end delta8d
      , case when stage = '' then 'r'
$@ if $isElar then $@=¢
             when ts in  -- gestoppte TS, im Loeschprozess
                     ( 'SF710141'
                     , 'SF710142'
                     , 'SF710143'
                     , 'SF71014H'
                     , 'SF760141'
                     , 'SF760142'
                     , 'SF760143'
                     , 'SF76014H'
                     ) then '-'
       --    when stage = '-w' then '-m'
             when stage in ('UL', 'DL', '-w') then 'l'
$! $@ else $@=¢
          when stage in ('IN', 'UL') then '2'
$!
          else 'r'
      end recLR
      , case
            when unl = '' then 'noUnload'
            when unlTst < current timestamp-100 year
                then 'unlTstNull'
            when r.dbName is null then 'noRTS'
            when r.lastDataChange > u.unlTsUp then 'dataChange>unl'
            when r.copyUpdatetime > unlTsUp then 'copyUpdate>unlTst'
            when BasTst > unlTsUp
$@ if \ $isElar then $@=¢
                   and (date(incTst) <> '18.05.2015' or basTy <> 'F')
$!
               then 'unlTst<ful='||basTyTx
            when incTy='I' and unlTsUp < incTst
$@ if \ $isElar then $@=¢
                   and date(incTst) <> '18.05.2015'
$!
                then 'unlTst<incCopy'
            when r.copyChanges <> 0 then 'copyChanges<>0'
            when r.copyUpdatedPages <> 0 then 'updatedPages<>0'
$*(
            when r.copyUpdatetime > BasTst and basTy = 'F'
                then 'copyUpdate>ful='||basTyTx
            when r.copyUpdatetime > incTst and incTy = 'I'
                then 'copyUpdate>incCopy'
$*)
            when r.copyUpdatetime is not null then 'copyUpdateNotNull'
            when r.lastDataChange > u.BasTst and u.basTy not in('A','-')
$@ if \ $isElar then $@=¢
                   and unlTst > '2015-09-12-12.00.00'
$!
                then 'dataChange>ful='||basTyTx
            when basTy <> 'F' then 'lastFul=' || basTyTx
            when incTy = 'I' and incTst > unlTsUp
$@ if \ $isElar then $@=¢
                   and date(incTst) <> '18.05.2015'
$!
                then 'incTst>unlTst'
            when r.lastDataChange is null and unlTst
                  < '2015-04-15-00.00.00' then 'dataChangeV11>unl'
            when lastDataChange is null
                  and u.incTst < '2015-04-15-00.00.00'
               then 'dataChangeV11>incCopy'
$@ if \ $isElar then $@=¢
            when incTy = 'I' and incTst > unlTsUp
                   and date(incTst) = '18.05.2015'
                then 'inc180515>unl'
$!
            else 'ok'
        end recUnl
    from u
      left join sysibm.sysTableSpaceStats r
        on u.dbId = r.dbId and u.psId = r.psId
        and u.pa = r.partition -- and u.inst = r.instance
        and u.db = r.dbName and u.ts = r.name
)
, e3 as
(
  select e2.*
      , case when recUnl in ( 'dataChangeV11>unl'
                            , 'dataChangeV11>incCopy'
$@ if $isElar then $@=¢
                            , 'lastFul=A=addPart'
                            , 'lastFul=C=create'
                            , 'lastFul=S=LoaRpLoNo'
                            , 'lastFul=Y=LoaRsLoNo'
$!
                           ) then 'ok ' || recUnl else recUnl end
      || case when stage = 'IN' and unl <> '' and
                         staUpd < current timestamp - 24 hour
                  then ' stillUnlAft24h' else '' end okUnl
    from e2
)
, e4 as
(
  select e3.*
      , case when recLR = '-'                               then '-'
            when recLR in ('r', '2')
                and recov in ('defNo', 'noTb')              then '-'
            when recLR in ('r', '2') and rec8d = 'ok'       then 'r'
            when recLR in ('2', 'l') and left(okUnl,2)='ok' then 'l'
            else '?'
        end recFun
    from e3
)
, e5 as
(
  select e4.*
      , case when recLr in ('r', '2') and delta8d = 'ok'
                 then 'r' else recFun end deltaFun
    from e4
)
, e as
(
  select e5.*
      , strip(recFun || ' ' || case
            when recFun = '-' then ''
            when recFun = 'r' then rec8d ||':'|| basTyTx
            when recFun = 'l' then recUnl
            when recFun <> '?' then '???recFun???'
            when recLR = '2' then recUnl || ' ' || rec8d||':'|| basTyTx
            when recLR = 'r' then rec8d
            when recLR = 'l' then recUnl
            else recLR ||'?'|| recUnl ||'?' || rec8d ||':'|| basTyTx
        end
        || case  when stage = 'IN' and unl <> '' and
                         staUpd < current timestamp - 24 hour
              then ' stillUnlAft24h' else ''
        end  || ' ' || errUnl) conSum
      , recFun || case when recLR in ('r', '2')
                       then ' ' || rec8d || ':' || basTyTx else '' end
               || case when recLR in ('l', '2') then  ' ' || okUnl
                       else '' end || ' ' || errUnl recErr
      , deltaFun || case when recLR in ('r', '2')
                         then ' ' || delta8d || ':' || deltaTyTx
                       else '' end
               || case when recLR in ('l', '2') then  ' ' || okUnl
                       else '' end || ' ' || errUnl deltaErr
    from e5
)
select *
    from e
;
$@ if $useLgRn then $@=¢
create view oa1p.vqz005RecovLoadLgRn as
with l2 as
(
  select r.*
      , case when unl = ''
                   or unlTst < current timestamp - 100 years then ''
             when l.start > unlTst then 'lgRn>unl'
             when l.start is null then 'lgRnNone'
             else ''
        end lgRn
    from oa1p.vqz005RecovLoad r
      left join oa1p.tqz004TecSvLgRn l
      on r.db = l.db and r.ts = l.ts and r.pa = l.pa
)
, l3 as
(
  select l2.*
      , case when recFun = 'l' and lgRn not in ('', 'lgRnNone')
                 then '?' else recFun end lgRecFun
      , case when deltaFun = 'l' and lgRn not in ('', 'lgRnNone')
                 then '?' else deltaFun end lgDeltaFun
    from l2
)
select db, ts, pa, stage, staUpd, staTb, pSpc, rSpc, basTy, basTst
       , recLr, recov, lgRn
       , unl, unlTst
       , strip(recUnl || ' ' || lgRn) recUnl
       , lgRecFun recFun
       , lgDeltaFun deltaFun
       , strip(lgRecFun || substr(recErr, 2)
           || case
                 when recFun = 'l' or (recFun = '?' and recLR <> 'r')
                     then ' ' || lgRn else '' end) recErr
       , strip(lgDeltaFun || substr(deltaErr, 2)
           || case
                 when deltaFun = 'l' or (deltaFun='?' and recLR <> 'r')
                     then ' ' || lgRn else '' end) deltaErr
    from l3
;
$!
$/vRecovLoad/

$proc $@=/tUnloadDrop/
alter table oa1p.tQz005TecSvUnload drop restrict on drop;
drop tablespace qz01a1p.a005a;
$/tUnloadDrop/

$proc $@=/tUnload/
----- ddl tecSv: xDocs: unload DSNs fuer ControlSummary ---------------
CREATE TABLESPACE a005a
    IN QZ01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255;
CREATE TABLE OA1P.tqz005tecSvUnload
  ( db        char(8)  not null
  , ts        char(8)  not null
  , pa        smallint not null
  , stage     char(2)  not null
  , staUpd    timestamp not null
  , staTb     char(2) not null
  , unlTst    timestamp not null
  , unl       char(44) not null
  , punTst    timestamp not null
  , pun       char(44) not null
  , info      varchar(70) not null
  , err       varchar(70) not null
  )
  in qz01a1p.a005a
    AUDIT NONE
    DATA CAPTURE changes
    CCSID      unicode
    WITH RESTRICT ON DROP
    NOT VOLATILE;

CREATE UNIQUE INDEX oa1p.iQZ005a1
  ON oa1p.tqz005TecSvUnload
   (db, ts, pa)
   include(stage)
  USING STOGROUP GSMS
  ERASE  NO
  GBPCACHE CHANGED
  CLUSTER
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFINE YES
;
$/tUnload/

$proc $@=/tLgRnDrop/
alter table oa1p.tQz004TecSvLgRn drop restrict on drop;
drop tablespace qz01a1p.a004a;
$/tLgRnDrop/

$proc $@=/tLgRn/
CREATE TABLESPACE a004a
    IN QZ01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255;
;
CREATE TABLE OA1P.tqz004tecSvLgRn
  ( db        char(8)  not null
  , ts        char(8)  not null
  , pa        smallint not null
  , start     timestamp not null
  , sLrsn     timestamp not null
  , cnt       int not null
  )
  in qz01a1p.a004a
    AUDIT NONE
    DATA CAPTURE changes
    CCSID      unicode
    WITH RESTRICT ON DROP
    NOT VOLATILE;

CREATE UNIQUE INDEX oa1p.iQZ004a1
  ON oa1p.tqz004TecSvLgRn
   (db, ts, pa)
   include(start)
  USING STOGROUP GSMS
  ERASE  NO
  GBPCACHE CHANGED
  CLUSTER
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFINE YES
;
$/tLgRn/

$proc $@=/loadUnload/
//L$dbSys    EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
//             PARM='%tecSvUnl $dbSys'
//SYSTSPRT   DD SYSOUT=*
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTERM    DD DUMMY
//SYSPROC    DD DISP=SHR,DSN=DSN.DB2.EXEC
//SYSTSIN    DD DUMMY
//U$dbSys    EXEC PGM=DSNUTILB,TIME=1440,REGION=0M,
//             PARM=($dbSys,'TECSVDDL.RUNSTA')
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSOUT     DD SYSOUT=*
//SYSIN      DD *
     LISTDEF LST INCLUDE TABLESPACE QZ01A1P.A005A PARTLEVEL
   RUNSTATS TABLESPACE  LIST LST
     INDEX(ALL)
     REPORT NO  UPDATE ALL
     SHRLEVEL CHANGE
$/loadUnload/

$proc $@=/jobHead/
//TECSVDDL JOB (CP00,KE50),'DB2 DDL',
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
$/jobHead/
$proc $@=/jobSub/
//***** submit job to $rz *****************************************
//SUB$rz  EXEC PGM=IEBGENER
//SYSPRINT   DD SYSOUT=*
//SYSUT2     DD SUBSYS=(CSM,'SYSTEM=$rz,SYSOUT=(A,INTRDR)')
//SYSUT1     DD *,DLM='}{'
$@jobHead
$/jobSub/
$proc $@=/jobSql/
//*---- execute ddl in $rz/$dbSys isElar=$isElar ------------------
//S$dbSys   EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSTSIN    DD *
  DSN SYSTEM($dbSys)
    RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT   DD SYSOUT=*
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTERM    DD DUMMY
//SYSIN      DD *
$/jobSql/
}¢--- A540769.WK.SQL(TECSVDD3) cre=2015-09-14 mod=2015-09-22-14.04.18 A540769 ---
$#@
$>. fEdit()
$=useLgRn = 0
$=dropCreTb = 0
call iiIni
if 0 then $@=¢
set current sqlid = 'S100447';
drop   view oa1p.vqz005Recover;
    $=isElar = 0
    $=dbSys=DBOF
    $@vRecover
    $@vRecovLoad
$! else $@=/allRZ/
    $@jobHead
    $@ oldRz = ''
    $do ix=1 while iiIxvPut(ix) $@=/envLoop/
       $@ if $rz <> oldRz then $@¢
           if oldRz <> '' then
               $$ }{
           $@jobSub
           oldRz = $rz
           $!
       $= xDocs  =- wordPos($dbSys, 'DVBP DBOF DP4G') > 0
       $= isElar =- $dbSys = 'DVBP'
       $@jobSql
set current sqlid = 'S100447';
drop   view oa1p.vqz005Recover;
       $@ if $dropCreTb then $@¢
           if $xDocs then
               $@tUnloadDrop
           if $useLgRn then
               $@tLgRnDrop
           if $xDocs | $useLgRn then
               $$ commit;
           $!
--#SET MAXERRORS 0
       $@ if $dropCreTb then $@¢
           if $xDocs then
               $@tUnload
           if $useLgRn then
               $@tLgRn
           $!
       $@vRecover
       $@ if $xDocs then
           $@vRecovLoad
       $@ if $dropCreTb & $xDocs then
           $@loadUnload
$/envLoop/
$/allRZ/

$proc $@=/vRecover/
create view oa1p.vqz005Recover as
with two (i) as
(
  select 1 from sysibm.sysDummy1
  union all select 2 from sysibm.sysDummy1
)
, p2 as
(
  select s.dbName db, s.name ts, p.partition pa
      , s.instance instBa
   $*(, two.i inst
      , case when s.instance = 1 and s.clone = 'N' then '1'
             when s.clone = 'N' then '' || s.instance || 'only'
             when s.instance = two.i then '' || two.i || 'base'
             else '' || two.i || 'clone' end insTxt
   $*)
      , s.pgSize pgSize
      , s.nTables nTb
      , value(p.space, 0) pSpc, s.dbId, s.psId
      , case when s.instance = 1 and s.clone = 'N' then ''
             when s.clone = 'N' then 'only' || s.instance
             else 'base' || s.instance end instBaTx
      , ( select max( substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5))
              || max(case when icType <> 'I'
                 then substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5) else '' end )
            from sysibm.sysCopy c
            where s.dbName = c.dbName
                and s.name = c.tsName
                and c.dsNum = p.partition
      --???     and c.instance = two.i
                and icType in ('A','C','F','R','X'      -- logBase
                                      ,'P','S','W','Y'  -- logDiscontinu
                              ,'I')
                and (icType <> 'A' or sType = 'A')
        ) icPa
      , ( select max(substr(char(timestamp), 1, 26) || char(icType, 1)
                          || right('    ' || dsNum, 5))
             || max(case when icType <> 'I'
                  then substr(char(timestamp), 1, 26) ||char(icType, 1)
                          || right('    ' || dsNum, 5) else '' end )
            from sysibm.sysCopy c
            where s.dbName = c.dbName
                and s.name = c.tsName
                and c.dsNum = 0 and p.partition <> 0
      --???     and c.instance = two.i
                and icType in ('A','C','F','R','X'      -- logBase
                                      ,'P','S','W','Y'  -- logDiscontinu
                              ,'I')
                and (icType <> 'A' or sType = 'A')
        ) ic0
    from sysibm.sysTableSpace s
   -- join two on s.instance = two.i or s.clone = 'Y'
      join sysibm.sysTablePart p
        on s.dbName = p.dbName and s.name = p.tsName
)
, p3 as
(
  select db, ts, pa, instBa, instBaTx
      , pgSize, nTb, dbId, psId, pSpc
      , max(value(substr(icPa, 33, 32), '1111-11-11-11.11.11.111111- ')
           ,value(substr(ic0 , 33, 32), '1111-11-11-11.11.11.111111- ')
           , '1111-11-11-11.11.11.111111- ') basTTP

      , max(value(substr(icPa,  1, 32), '1111-11-11-11.11.11.111111- ')
           ,value(substr(ic0 ,  1, 32), '1111-11-11-11.11.11.111111- ')
           , '1111-11-11-11.11.11.111111- ') incTTP
    from p2
)
, p4 as
(
  select p3.*
      , substr(basTTP, 27, 1) basTy
      , substr(basTTP, 28, 5) basPa
      , timestamp(substr(basTTP, 1, 26)) basTst
      , substr(incTTP, 27, 1) incTy
      , substr(incTTP, 28, 5) incPa
      , timestamp(substr(incTTP, 1, 26)) incTst
    from p3
)
, p as
(
  select p4.*
      , case when pSpc = -1 then 'defNo'
             when nTb  =  0 then 'noTb'
             when basTy not in ('A','C','F','R','X') then 'logDisc'
             when basTst < current timestamp - 23 days then 'tooOld'
             else 'ok' end recov
      , basTy || case basTy
                     when '-' then '=missing'
                     when 'A' then '=addPart'
                     when 'C' then '=create'
                     when 'F' then '=fulCopy'
                     when 'I' then '=incCopy'
                     when 'P' then '=recPIT'
                     when 'R' then '=LoaRpLog'
                     when 'S' then '=LoaRpLoNo'
                     when 'W' then '=ReorgLoNo'
                     when 'X' then '=ReorgLog'
                     when 'Y' then '=LoaRsLoNo'
                     else          '=???' end basTyTx
    from p4
)
select db, ts, pa, recov
      , basTyTx, basPa, basTst, basTy
      , incTy, incPa, incTst
      , instBa, instBaTx
      , pgSize, pSpc, dbId, psId
    from p
;
$/vRecover/

$proc $@=/vRecovLoad/
create view oa1p.vqz005RecovLoad as
with u as
(
  select p.*
      , value(stage, '') stage
      , value(staUpd, '1111-11-11-11.11.11') staUpd
      , value(staTb, '') staTb
      , value(unlTst, '1111-11-11-11.11.11') unlTst
      , value(case when trunc_timestamp(unlTst, 'ddd') = unlTst
           then (unlTst + 1 day) - 0.000001 seconds else unlTst end
             , '1111-11-11-11.11.11') unlTsUp
      , value(unl, '') unl
      , value(punTst, '1111-11-11-11.11.11') punTst
      , value(pun, '') pun
      , value(u.info, '') infoUnl
      , value(u.err, '') errUnl
    from oa1p.vqz005Recover p
      left join oa1p.tqz005TecSvUnload u
        on u.db = char(p.db, 8)
          and u.ts = char(p.ts, 8)
          and u.pa = p.pa and u.pa >= 0
)
, e2 as
(
  select u.*
      , value(real(r.nActive) * u.pgSize, 0) rSpc
      , case when recov = 'ok' and basTst < current timestamp - 8 day
                then strip(substr(recov, 3) || ' older8d')
           else recov
        end rec8d
      , case when stage = '' then 'r'
$@ if $isElar then $@=¢
             when ts in  -- gestoppte TS, im Loeschprozess
                     ( 'SF710141'
                     , 'SF710142'
                     , 'SF710143'
                     , 'SF71014H'
                     , 'SF760141'
                     , 'SF760142'
                     , 'SF760143'
                     , 'SF76014H'
                     ) then '-'
       --    when stage = '-w' then '-m'
             when stage in ('UL', 'DL', '-w') then 'l'
$! $@ else $@=¢
          when stage in ('IN', 'UL') then '2'
$!
          else 'r'
      end recLR
      , case
            when unl = '' then 'noUnload'
            when unlTst < current timestamp-100 year
                then 'unlTstNull'
            when r.dbName is null then 'noRTS'
            when r.lastDataChange > u.unlTsUp then 'dataChange>unl'
            when r.copyUpdatetime > unlTsUp then 'copyUpdate>unlTst'
            when BasTst > unlTsUp
$@ if \ $isElar then $@=¢
                   and (date(incTst) <> '18.05.2015' or basTy <> 'F')
$!
               then 'unlTst<ful='||basTyTx
            when incTy='I' and unlTsUp < incTst
$@ if \ $isElar then $@=¢
                   and date(incTst) <> '18.05.2015'
$!
                then 'unlTst<incCopy'
            when r.copyChanges <> 0 then 'copyChanges<>0'
            when r.copyUpdatedPages <> 0 then 'updatedPages<>0'
$*(
            when r.copyUpdatetime > BasTst and basTy = 'F'
                then 'copyUpdate>ful='||basTyTx
            when r.copyUpdatetime > incTst and incTy = 'I'
                then 'copyUpdate>incCopy'
$*)
            when r.copyUpdatetime is not null then 'copyUpdateNotNull'
            when r.lastDataChange > u.BasTst and u.basTy not in('A','-')
$@ if \ $isElar then $@=¢
                   and unlTst > '2015-09-12-12.00.00'
$!
                then 'dataChange>ful='||basTyTx
            when basTy <> 'F' then 'lastFul=' || basTyTx
            when incTy = 'I' and incTst > unlTsUp
$@ if \ $isElar then $@=¢
                   and date(incTst) <> '18.05.2015'
$!
                then 'incTst>unlTst'
            when r.lastDataChange is null and unlTst
                  < '2015-04-15-00.00.00' then 'dataChangeV11>unl'
            when lastDataChange is null
                  and u.incTst < '2015-04-15-00.00.00'
               then 'dataChangeV11>incCopy'
$@ if \ $isElar then $@=¢
            when incTy = 'I' and incTst > unlTsUp
                   and date(incTst) = '18.05.2015'
                then 'inc180515>unl'
$!
            else 'ok'
        end recUnl
    from u
      left join sysibm.sysTableSpaceStats r
        on u.dbId = r.dbId and u.psId = r.psId
        and u.pa = r.partition -- and u.inst = r.instance
        and u.db = r.dbName and u.ts = r.name
)
, e3 as
(
  select e2.*
      , case when recLR = '-'                               then '-'
            when recLR in ('r', '2')
                and recov in ('defNo', 'noTb')              then '-'
            when recLR = 'r' and recov = 'ok'               then 'r'
            when recLR = '2' and rec8d = 'ok'               then 'r'
            when recLR = 'r'                                then '?'
            when recUnl in ( 'ok'
                           , 'dataChangeV11>unl'
                           , 'dataChangeV11>incCopy'
$@ if $isElar then $@=¢
                           , 'lastFul=A=addPart'
                           , 'lastFul=C=create'
                           , 'lastFul=S=LoaRpLoNo'
                           , 'lastFul=Y=LoaRsLoNo'
$!
                           ) then 'l'
            else '?'
        end recFun
    from e2
)
, e as
(
  select e3.*
      , strip(recFun || ' ' || case
            when recFun = '-' then ''
            when recFun = 'r' then rec8d ||':'|| basTyTx
            when recFun = 'l' then recUnl
            when recFun <> '?' then '???recFun???'
            when recLR = '2' then recUnl || ' ' || rec8d||':'|| basTyTx
            when recLR = 'r' then rec8d
            when recLR = 'l' then recUnl
            else recLR ||'?'|| recUnl ||'?' || rec8d ||':'|| basTyTx
        end
        || case  when stage = 'IN' and unl <> '' and
                         staUpd < current timestamp - 24 hour
              then ' stillUnlAft24h' else ''
        end  || ' ' || errUnl) conSum
    from e3
)
select *
    from e
;
$@ if $useLgRn then $@=¢
create view oa1p.vqz005RecovLoadLgRn as
with l2 as
(
  select r.*
      , case when unl = ''
                   or unlTst < current timestamp - 100 years then ''
             when l.start > unlTst then 'lgRn>unl'
             when l.start is null then 'lgRnNone'
             else ''
        end lgRn
    from oa1p.vqz005RecovLoad r
      left join oa1p.tqz004TecSvLgRn l
      on r.db = l.db and r.ts = l.ts and r.pa = l.pa
)
, l3 as
(
  select l2.*
      , case when recFun = 'l' and lgRn not in ('', 'lgRnNone')
                 then '?' else recFun end lgFun
    from l2
)
select db, ts, pa, stage, staUpd, staTb, pSpc, rSpc, basTy, basTst
       , recLr, recov, lgRn
       , unl, unlTst
       , strip(recUnl || ' ' || lgRn) recUnl
       , lgFun recFun
       , strip(lgFun || substr(conSum, 2)
           || case
                 when recFun = 'l' or (recFun = '?' and recLR <> 'r')
                     then ' ' || lgRn else '' end) conSum
    from l3
;
$!
$/vRecovLoad/

$proc $@=/tUnloadDrop/
alter table oa1p.tQz005TecSvUnload drop restrict on drop;
drop tablespace qz01a1p.a005a;
$/tUnloadDrop/

$proc $@=/tUnload/
----- ddl tecSv: xDocs: unload DSNs fuer ControlSummary ---------------
CREATE TABLESPACE a005a
    IN QZ01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255;
CREATE TABLE OA1P.tqz005tecSvUnload
  ( db        char(8)  not null
  , ts        char(8)  not null
  , pa        smallint not null
  , stage     char(2)  not null
  , staUpd    timestamp not null
  , staTb     char(2) not null
  , unlTst    timestamp not null
  , unl       char(44) not null
  , punTst    timestamp not null
  , pun       char(44) not null
  , info      varchar(70) not null
  , err       varchar(70) not null
  )
  in qz01a1p.a005a
    AUDIT NONE
    DATA CAPTURE changes
    CCSID      unicode
    WITH RESTRICT ON DROP
    NOT VOLATILE;

CREATE UNIQUE INDEX oa1p.iQZ005a1
  ON oa1p.tqz005TecSvUnload
   (db, ts, pa)
   include(stage)
  USING STOGROUP GSMS
  ERASE  NO
  GBPCACHE CHANGED
  CLUSTER
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFINE YES
;
$/tUnload/

$proc $@=/tLgRnDrop/
alter table oa1p.tQz004TecSvLgRn drop restrict on drop;
drop tablespace qz01a1p.a004a;
$/tLgRnDrop/

$proc $@=/tLgRn/
CREATE TABLESPACE a004a
    IN QZ01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255;
;
CREATE TABLE OA1P.tqz004tecSvLgRn
  ( db        char(8)  not null
  , ts        char(8)  not null
  , pa        smallint not null
  , start     timestamp not null
  , sLrsn     timestamp not null
  , cnt       int not null
  )
  in qz01a1p.a004a
    AUDIT NONE
    DATA CAPTURE changes
    CCSID      unicode
    WITH RESTRICT ON DROP
    NOT VOLATILE;

CREATE UNIQUE INDEX oa1p.iQZ004a1
  ON oa1p.tqz004TecSvLgRn
   (db, ts, pa)
   include(start)
  USING STOGROUP GSMS
  ERASE  NO
  GBPCACHE CHANGED
  CLUSTER
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFINE YES
;
$/tLgRn/

$proc $@=/loadUnload/
//L$dbSys    EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
//             PARM='%tecSvUnl $dbSys'
//SYSTSPRT   DD SYSOUT=*
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTERM    DD DUMMY
//SYSPROC    DD DISP=SHR,DSN=DSN.DB2.EXEC
//SYSTSIN    DD DUMMY
//U$dbSys    EXEC PGM=DSNUTILB,TIME=1440,REGION=0M,
//             PARM=($dbSys,'TECSVDDL.RUNSTA')
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSOUT     DD SYSOUT=*
//SYSIN      DD *
     LISTDEF LST INCLUDE TABLESPACE QZ01A1P.A005A PARTLEVEL
   RUNSTATS TABLESPACE  LIST LST
     INDEX(ALL)
     REPORT NO  UPDATE ALL
     SHRLEVEL CHANGE
$/loadUnload/

$proc $@=/jobHead/
//TECSVDDL JOB (CP00,KE50),'DB2 DDL',
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
$/jobHead/
$proc $@=/jobSub/
//***** submit job to $rz *****************************************
//SUB$rz  EXEC PGM=IEBGENER
//SYSPRINT   DD SYSOUT=*
//SYSUT2     DD SUBSYS=(CSM,'SYSTEM=$rz,SYSOUT=(A,INTRDR)')
//SYSUT1     DD *,DLM='}{'
$@jobHead
$/jobSub/
$proc $@=/jobSql/
//*---- execute ddl in $rz/$dbSys isElar=$isElar ------------------
//S$dbSys   EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSTSIN    DD *
  DSN SYSTEM($dbSys)
    RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT   DD SYSOUT=*
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTERM    DD DUMMY
//SYSIN      DD *
$/jobSql/
}¢--- A540769.WK.SQL(TECSVEXP) cre=2015-09-15 mod=2015-09-24-15.50.41 A540769 ---
--- temporary explain --------------------------------------------------
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_STATEMNT_TABLE;
delete from A540769.DSN_DetCost_TABLE ;
delete from A540769.dsn_filter_Table  ;
delete from A540769.dsn_predicat_table;
explain plan set queryno = 3   for
select rc.* --case when erReD = '' then 'r' when erReU = '' then 'l'
   --   else '?' end fun, rc.*
  from oa1p.vQZ005ConSumLoad  rc
    where    rc.db =   'QZ01A1P' --d rc.ts = 'A005A'--, 'DB2ADMIN')
/*where   (rc.db, rc.ts) in
  (select ts.dbName, ts.name
    from sysIbm.sysTableSpace ts
    where  (ts.dbName, ts.name) in
    (select t.dbName, t.tsName
      from sysIbm.sysTables t
      where t.type not in ('A', 'V') and  t.name like 'TQZ004%'
   ) )
*/ order by rc.db, rc.ts, rc.pa, rc.inst
;
select * from  plan_view1
    order by -- collid, progName, version, explain_time,
             queryNo, qblockno, planno, mixOpSeq
;
select * from  plan_view2
    order by -- collid, progName, version, explain_time,
             queryNo, qblockno, planno, mixOpSeq
;
select * from  plan_view2det
    order by -- collid, progName, version, explain_time,
             queryNo, qblockno, planno, mixOpSeq
;
select *
    from plan_viewPred
    order by collid, progName, explain_time,
             queryNo, qBlockNo, predNo, orderNo, mixOpSeqNo
    with ur
;
rollback
;;;;
}¢--- A540769.WK.SQL(TECSVLGL) cre=2015-09-10 mod=2015-09-28-08.28.52 A540769 ---
//A540769L JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2                          00030003
//*MAIN CLASS=LOG                                                       00040003
//S1       EXEC PGM=DSNUTILB,PARM='DBOF,A540769L.LOAD'                  00020001
//SYSMAP   DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSERR   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL  DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
EXEC SQL
  DECLARE CUR1 CURSOR FOR
    WITH G AS
    (
      SELECT OA1P.FQZC2I2(LGRDBID)DBID
         , OA1P.FQZC2I2(LGRPSID) PSID
         , LGRPART PA
         , COUNT(*) CNT
         , MAX(TIMESTAMP(TRANSLATE('20YZ-MN-DE-', LGRUCDT, 'MNDEYZ')
               || TRANSLATE('HI.MN.ST.UV', LGRUCTM, 'HIMNSTUV'))) START
         , MAX(TIMESTAMP(SUBSTR(LGRSLRSN, 2, 8))) SLRSN
        FROM SYSIBM.SYSLGRNX
        GROUP BY LGRDBID, LGRPSID, LGRPART
    )
    SELECT DBNAME DB, NAME TS, PA
         , VALUE(START, '1111-11-11-11.11.11') START
         , VALUE(SLRSN, '1111-11-11-11.11.11') SLRSN
         , CNT
       FROM G
         JOIN SYSIBM.SYSTABLESPACE S
         ON G.DBID = S.DBID AND G.PSID = S.PSID
    WITH UR
ENDEXEC
LOAD DATA INCURSOR CUR1  LOG NO RESUME NO REPLACE
     COPYDDN TCOPYS STATISTICS INDEX ALL KEYCARD
 SORTDEVT DISK
 WORKDDN(TSYUTS,TSOUTS)
 INTO TABLE  OA1P.TQZ004TECSVLGRN
}¢--- A540769.WK.SQL(TECSVLOL) cre=2015-09-10 mod=2015-09-10-13.47.16 A540769 ---
//A540769L JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2                          00030003
//*MAIN CLASS=LOG                                                       00040003
//S1       EXEC PGM=DSNUTILB,PARM='DP4G,A540769L.LOAD'                  00020001
//SYSMAP   DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSERR   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL  DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
EXEC SQL
  DECLARE CUR1 CURSOR FOR
    WITH G AS
    (
      SELECT OA1P.FQZC2I2(LGRDBID)DBID
         , OA1P.FQZC2I2(LGRPSID) PSID
         , LGRPART PA
         , COUNT(*) CNT
         , MAX(TIMESTAMP(TRANSLATE('20YZ-MN-DE-', LGRUCDT, 'MNDEYZ')
               || TRANSLATE('HI.MN.ST.UV', LGRUCTM, 'HIMNSTUV'))) START
         , MAX(TIMESTAMP(SUBSTR(LGRSLRSN, 2, 8))) SLRSN
        FROM SYSIBM.SYSLGRNX
        GROUP BY LGRDBID, LGRPSID, LGRPART
    )
    SELECT DBNAME DB, NAME TS, PA
         , VALUE(START, '1111-11-11-11.11.11') START
         , VALUE(SLRSN, '1111-11-11-11.11.11') SLRSN
         , CNT
       FROM G
         JOIN SYSIBM.SYSTABLESPACE S
         ON G.DBID = S.DBID AND G.PSID = S.PSID
    WITH UR
ENDEXEC
LOAD DATA INCURSOR CUR1  LOG NO RESUME NO REPLACE
     COPYDDN TCOPYS STATISTICS INDEX ALL KEYCARD
 SORTDEVT DISK
 WORKDDN(TSYUTS,TSOUTS)
 INTO TABLE  OA1P.TQZ004TECSVLGRN
}¢--- A540769.WK.SQL(TECSVPTA) cre=2012-09-07 mod=2012-09-07-15.09.37 A540769 ---
with frTo as
(
select case when strip(min(dbName)) like '_*' and min(dbName) > 'A*'
            then left(min(dbName), 1) else ''
       end fr,
       case when strip(max(dbName)) like '_*'
            then left(max(dbName), 1) else ''
       end || x'FFFF' to
    FROM DLC.OBJECTS_V13
    WHERE EXCLUDE='I' AND    NAME='QDDBOF INCL EXCLUDES'
)
select count(*), min(name), max(name)
    from sysibm.sysDatabase, frTo
    where name >= fr and name <= to
 -- order by name
;X;
}¢--- A540769.WK.SQL(TECSVSB1) cre=2016-01-25 mod=2016-01-25-21.33.37 A540769 ---
--- statistic and list of parts with stage errors --------------------
select count(*), stage, err, info
    from oa1p.tqz005tecsvunload
    where stage <> '-r'
    group by stage, err, info
;
select db, ts, pa, stage, err, u.*
    from oa1p.tqz005tecsvunload u
    where stage <> '-r' and err <> ''
    order by db, ts, pa
}¢--- A540769.WK.SQL(TECSVSB2) cre=2016-01-25 mod=2016-03-14-16.33.22 A540769 ---
--- statistics and list of partitions
---       versus policy lastDataChange < fullCopy < unl --------------
set current application compatibility 'V11R1';
with c as
(
  select
        basTy  || case
           when value(lastDataChange, '2015-04-15-00.00.00')
                 <  basTst then 'c'

           when value(lastDataChange, '2015-04-15-00.00.00')
                 <  basTst + 1 day then '1'
           else '>' end
           || case when basTst <  unltst then 'b'
                   when basTst <  unltst + 1 day then '1'
                   else '>' end cat
         , v.*
    from oa1p.VQZ005RECOVDELTALOAD v
    where stage = 'UL' and unlTst > '2016-01-01-00.00.00'
)
select date(unlTst) unl, count(*) cnt
    , sum(case when cat = 'Fcb' then 1 else 0 end) "Fcb"
    , sum(case when cat = 'F>b' then 1 else 0 end) "F>b"
    , sum(case when cat = 'A1b' then 1 else 0 end) "A1b"
    , sum(case when cat = 'Y>b' then 1 else 0 end) "Y>b"
    , sum(case when cat in ('Fcb', 'F>b','A1b','Y>b')
    then 0 else 1 end)other
    from c
    group by rollup(date(unlTst))
    order by 1 desc
    with ur
;
with c as
(
  select
        basTy  || case
           when value(lastDataChange, '2015-04-15-00.00.00')
                 <  basTst then 'c'

           when value(lastDataChange, '2015-04-15-00.00.00')
                 <  basTst + 1 day then '1'
           else '>' end
           || case when basTst <  unltst then 'b'
                   when basTst <  unltst + 1 day then '1'
                   else '>' end cat
         , v.*
    from oa1p.VQZ005RECOVDELTALOAD v
    where stage = 'UL' and unlTst > '2016-01-01-00.00.00'
)
select unlTst, c.*
    from c
    where cat <> 'Fcb'
    order by unlTst, db, ts, pa
}¢--- A540769.WK.SQL(TECSVSEL) cre=2015-06-16 mod=2015-07-06-21.49.42 A540769 ---
with a (db, ts, pa, stage, unl, err) as
(
  select db, ts, pa, stage, unl, 'refresh older 1 secs'
    from OA1P.TQZ005TECSVUNLOAD
    where stage = 'r' and unlTst < current timestamp - 2 seconds
  union all select db, ts, pa, stage, unl, info
    from OA1P.TQZ005TECSVUNLOAD
    where stage <> 'r' and info <> ''
)
select *
     from a
     order by case when stage = 'r' then 0 else 1 end, db, ts, pa
;x;
select *
    from OA1P.TQZ005TECSVUNLOAD
    where info <> ''
    order by db, ts, pa
;x;
select count(*), err
    from OA1P.TQZ005TECSVUNLOAD
    group by err
}¢--- A540769.WK.SQL(TECSVUNB) cre=2015-11-30 mod=2015-11-30-10.14.54 A540769 ---
insert into oa1p.tqz005TecSvUnload
with sU (area, n, seg, pa, stage, sTb, hkTS) as
(
  select storageArea, storageArea_N, segment, partNumber, stage
      , 'i', LASTHKTS
    from  BUA.TXBI003 R
  union all select '?', enStorAr, right('000' || enSeg, 3), 1, '-a'
      , 'a', cast(null as timestamp)
    from bua.txba201
)
, sC (area, areaN, areaC, seg, pa, stage, sTb, hkTs) as
(               /* xba201 may contain storArea Numbers
                   missing in xbi003, thus calculate area from areaN */
  select area, n
       , case when n <= 999 then right('000' || n, 3)
              when n <= 35657                /*  1296 = 36**2 */
                then substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , (n + 10998) / 1296 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 1296) / 36 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 36) + 1, 1)
         end
       , seg, pa, stage, sTb, hkTS
    from sU
)
, seg (seg, t8, pa, stage, sTb, hkTS, err) as
(
  select areaC || seg, 'XB' || areaC || seg, pa, max(stage)
      , max(sTb), max(hkTS)
      , case when min(areaN) <> max(areaN)
                 then 'areaC=' || areaC || ' >1 Nums'
                               || min(sTb) || '-' || max(sTb)
             when max(case when area <> '?' and area <> areaC
                        then 1 else 0 end) = 1
                  then max(case when area <> '?' and area <> areaC
                        then 'area=' || area || ' <> calc=' || areaC
                        else '' end)
             when sum(case when sTb = 'i' then 1 else 0 end) > 1
                 then '>1 xbi003' || areaC || seg || ' ' || pa
             when sum(case when sTb = 'a' then 1 else 0 end) > 1
                 then '>1 xba201' || areaC || seg || ' ' || pa
             else '' end
    from sC
    group by areaC, seg, pa
)
, uU as
(
  select substr(earess, 4, 8)  db
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))  ts
        , partNumber pa, eaRess, 'c' sTb
    from BUA.TXBC021 t
    where EYRESS =  5000 and ESRESS =  0
  union all select substr(earess, 4, 8)  db
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))  ts
        , partNumber pa, eaRess, 's' sTb
    from BUA.TXBC021s t
    where EYRESS =  5000 and ESRESS =  0
)
, unl (db, ts, pa, unl, sTb, err) as
(
  select db, ts, pa, max(eaRess) eaRess, max(sTb)
      , case when count(*) <> 1
                 then 'duplicates ' || min(sTb) || '-' || max(sTb)
        else max(
            case when earess not like 'XB.XB%' then 'eaRess not XB.XB%'
                 when locate('.', earess, 4) <> 12 then 'eaRess db len'
                 when locate('.', earess, 13) not between 14 and 21
                    then 'eaRess ts len'
            else '' end) end err
    from uU
    group by db, ts, pa
)
, tp (db, ts, pa, t8, err) as
(
  select t.dbName, t.tsName, partition, max(left(t.name, 8))
      , case when max(left(t.name, 8)) <> min(left(t.name, 8))
           then 'multipleTables' else '' end
    from sysibm.sysTables t
      join sysibm.sysTablePart p on
         t.dbName = p.dbName and t.tsName = p.tsName
    where t.dbName like 'XB%'
        and t.type not in ('A', 'V')
    group by t.dbName, t.tsName, partition
)
, j (db, ts, pa, stage, unl, pun, sTb, hkts, err) as
(
  select value(tp.db, unl.db, '?noDB')
      , value(tp.ts, unl.ts, seg.seg, '?noTS')
      , value(tp.pa, unl.pa, seg.pa, -999)
      , case when seg.stage is not null then seg.stage
             when tp.ts like '%WWW%' then '-w'
             else '-m' end
      , value(unl.unl, '')
      , case when unl is null or unl = '' then ''
             when locate_in_string(unl, '.', -1, 2) < 1 then ''
             when substr(unl, locate_in_string(unl, '.', -1, 2) + 1
                            , locate_in_string(unl, '.', -1, 1)
                            - locate_in_string(unl, '.', -1, 2) - 1)
                  <> 'SYSREC' then ''
             else left(unl, locate_in_string(unl, '.', -1, 2) )
                || 'SYSPCH'
             end
      , value(seg.sTb, '') || value(unl.sTb, '')
      , hkTS
      , case when tp.db is null then 'notInDB2 ' else '' end
      ||case when seg.stage not in
                 ('RW', 'CL', 'UL', 'DL', '-m', '-a', '-w', '-r')
                 then 'badStage=' || stage || ' '
             when seg.stage in ('UL', 'DL') and unl is null or unl=''
                 then 'noUnload '
             when seg.stage not in ('CL', 'DL', 'UL') and unl <> ''
                 then 'UnloadInBadStage '
             else '' end
      ||case when seg.stage is not null then seg.err || ' '
             when tp.ts like '%WWW%' then ''
             else 'notIn xbi003/xba201 ' end
      ||case when unl is null or unl = '' then ''
             when locate_in_string(unl, '.', -1, 2) < 1 then 'unl<2q '
             when substr(unl, locate_in_string(unl, '.', -1, 2) + 1
                            , locate_in_string(unl, '.', -1, 1)
                            - locate_in_string(unl, '.', -1, 2) - 1)
                  <> 'SYSREC' then 'sysrecNotInUnl '
             else ''
             end
      || value(unl.err, '') || value(tp.err, '')
                             /* missing in TXBI003? correct stage? */
    from tp
      full outer join seg
          on tp.t8 = seg.t8 and tp.pa = seg.pa
      full outer join unl
          on tp.db = unl.db and tp.ts = unl.ts  and tp.pa = unl.pa
)
select db, ts, pa, stage
      , '1111-11-11-11.11.11.111111'
      , value(sTb, '')
      , value(hkts, '1111-11-11-11.11.11.111111')
      , unl
      , '1111-11-11-11.11.11.111111'
      , pun
      , ''
      , err
    from j
}¢--- A540769.WK.SQL(TECSVUNL) cre=2016-01-25 mod=2016-01-26-08.22.51 A540769 ---
-- insert into oa1p.tqz005TecSvUnload
with sU (area, n, seg, pa, stage, sTb, hkTS, laIm) as
( --- union of segments and infos for new tables --------------------
  select storageArea, storageArea_N, segment, partNumber, stage
      , 'i', LASTHKTS, lastImport
    from  BUA.TXBI003 R
  union all select '?', enStorAr, right('000' || enSeg, 3), 1, '-a'
      , 'a', cast(null as timestamp), cast(null as timestamp)
    from bua.txba201
)
, sG (area, n, areaC, seg, pa, stage, sTb, hkTS, laIm, err) as
( --- group numeric Area, seg and pa
  ---       compute alpha area from numeric area -------------------
  select min(area), n
       , case when n <= 999 then right('000' || n, 3)
              when n <= 35657                /*  1296 = 36**2 */
                then substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , (n + 10998) / 1296 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 1296) / 36 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 36) + 1, 1)
         end
       , seg, pa
       , max(stage)
       , max(sTb)
       , max(hkTS)
       , max(laIm)
       , case when sum(case when sTb = 'i' then 1 else 0 end) > 1
                 then ' multiXbi003' else '' end
       ||case when sum(case when sTb = 'a' then 1 else 0 end) > 1
                 then ' multiXba201' else '' end
    from sU
    group by n, seg, pa
)
, seg(t8, pa, stage, sTb, hkTs, laIm, err) as
( --- compute t8 = eaDba = 'XB' || area || seg ----------------------
  select 'XB' || areaC || seg
      , smallInt(pa), stage, sTb, hkTs, laIm
      , case when area <> '?' and area <> areaC
                     then ' areaC<>' || area else '' end || err
    from sG
)
, uU (eaDba, db, ts, pa, unl, sTb) as
( --- union of both unload tables -----------------------------------
  select eaDba, substr(earess, 4, 8)
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))
        , partNumber pa, eaRess, 'c'
    from BUA.TXBC021 t
    where EYRESS =  5000 and ESRESS =  0
  union all select eaDba, substr(earess, 4, 8)
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))
        , partNumber pa, eaRess, 's'
    from BUA.TXBC021s t
    where EYRESS =  5000 and ESRESS =  0
)
, uG (eaDba, db, ts, pa, unl, sTb, err) as
( --- group uU -----------------------------------------------------
  select max(eaDba), db, ts, pa, max(unl), max(sTb)
      , case when count(*) <> 1
                 then ' multiUnl-' || min(sTb) || '-' || max(sTb)
             else '' end
    from uU
    group by db, ts, pa
    --- without fetch first or order by we get
    ---  SQLCODE = -171: THE DATA TYPE, LENGTH, OR VALUE OF ARGUMENT
    ---     1 OF INSTR OR LOCATE_IN_STRING IS INVALID   ------------
    fetch first 2147483647 rows only
)
, unl(eaDba, db, ts, pa, unl, pun, sTb, err) as
( --- check unl, derive pun ----------------------------------------
  select eaDba, db, ts, pa
      , value(unl, '')
      , case when unl is null or unl = '' then ''
             when locate_in_string(unl, '.', -1, 2) < 1 then ''
             when substr(unl, locate_in_string(unl, '.', -1, 2) + 1
                            , locate_in_string(unl, '.', -1, 1)
                            - locate_in_string(unl, '.', -1, 2) - 1)
                  <> 'SYSREC' then ''
             else left(unl, locate_in_string(unl, '.', -1, 2) )
                || 'SYSPCH'
             end
      , sTb
      , case when unl is null or unl = '' then ''
             when unl not like 'XB.XB%' then ' unlNotXB.XB%'
             when locate('.', unl, 4) <> 12 then ' unlDbLen'
             when locate('.', unl, 13) not between 14 and 21
                    then ' unlTsLen'
             when locate_in_string(unl, '.', -1, 2) <1 then ' unl<2q'
             when substr(unl, locate_in_string(unl, '.', -1, 2) +1
                            , locate_in_string(unl, '.', -1, 1)
                            - locate_in_string(unl, '.', -1, 2) - 1)
                  <> 'SYSREC' then ' sysrecNotInUnl'
            else ''
        end || err
    from uG
)
, tp (db, ts, pa, t8, err) as
( --- tablePart and tables from db2 catalog -------------------------
  select t.dbName, t.tsName, partition, max(left(t.name, 8))
      , case when max(left(t.name, 8)) <> min(left(t.name, 8))
           then ' multiTables' else '' end
    from sysibm.sysTables t
      join sysibm.sysTablePart p on
         t.dbName = p.dbName and t.tsName = p.tsName
    where t.dbName like 'XB%'
        and t.type not in ('A', 'V')
    group by t.dbName, t.tsName, partition
)
, j2 (db, ts, pa, t8, unl, pun, sTb, err) as
( --- join unl and tp ------------------------------------------------
  select value(tp.db, unl.db)
      , value(tp.ts, unl.ts)
      , value(tp.pa, unl.pa)
      , value(tp.t8, unl.eaDba) eaDba
      , unl.unl
      , unl.pun
      , unl.sTb
      , case when tp.db is null then ' notInDB2' else '' end
      || case when tp.t8 <> unl.eaDba then ' t8<>eaDba=' || unl.eaDba
              else '' end
      || value(unl.err, '') || value(tp.err, '')
    from tp
      full outer join unl
          on tp.db = unl.db and tp.ts = unl.ts and tp.pa = unl.pa
)
--- select count(*), err from j2 group by err;x;
, j3 (db, ts, pa, t8, stage, unl, pun, sTb, hkts, err) as
( --- join segments -------------------------------------------------
  select char(value(j2.db, '-noDB-'), 8)
      , char(value(j2.ts, j2.t8, seg.t8, '-noTsT8-'), 8) --- avoid dups
      , smallInt(value(j2.pa, seg.pa, -99))
      , char(value(j2.t8, seg.t8, '-noT8-'), 8)
      , case when seg.stage is null and j2.ts like '%WWW%' then '-w'
             else value(seg.stage, '-m') end
      , case when seg.stage is null and j2.ts like '%WWW%'
                 then 'XB.MIG.U.' || db || '.' || ts
                     || '.P' || right('0000'|| j2.pa, 5)||'.REC.D15338'
             else value(j2.unl, '') end
      , case when seg.stage is null and j2.ts like '%WWW%'
                 then 'XB.MIG.U.' || db || '.' || ts  || '.PUN.D15338'
             else value(j2.pun, '') end
      , value(seg.sTb, '') || value(j2.sTb, '')
      , value(seg.hkts, '1111-11-11-11.11.11.111111')
      , case when j2.db is null then ' notInDB2' else '' end
        || value(seg.err, '') || value(j2.err, '')
    from j2
      full outer join seg
          on j2.t8 = seg.t8 and j2.pa = seg.pa
)
, j (db, ts, pa, stage, unlTst, unl, pun, sTb, t8, err) as
( --- final values and errors ---------------------------------------
    select db, ts,pa, stage
      , case when stage = '-w' then '2015-12-04-16.00.00.000000'
                  else hkts end
      , unl, pun, sTb, t8
      , strip(case when stage = '-m' then ' notInXbi003,Xba201'
             when stage not in ('RW', 'CL', 'UL', 'DL', '-a', '-w')
                 then ' badStage=' || stage
             when stage in ('UL', 'DL', '-w') and unl = ''
                 then ' noUnload '
             when stage not in ('CL', 'DL', 'UL', '-w') and unl <> ''
                 then ' unloadInBadStage'
             else '' end
      ||case when left(unl, 21) <> left(pun, 21) then ' prefUnl<>Pun'
             else '' end || err)
    from j3
)
select db, ts, pa, stage
      , '1111-11-11-11.11.11.111111'
      , value(sTb, '')
      , unlTst
      , unl
      , '1111-11-11-11.11.11.111111'
      , pun
      , ''
      , err
    from j
;x;
select *
    from j
    where db like '-%' or ts like '-%'
;x;
select count(*), db, ts, pa
    from j
    group by db,ts,pa
    order by 1 desc
    fetch first 1000 rows only
;x;
}¢--- A540769.WK.SQL(TECSVUNM) cre=2016-01-22 mod=2016-01-22-05.37.53 A540769 ---
-- insert into oa1p.tqz005TecSvUnload
with sU (area, n, seg, pa, stage, sTb, hkTS, laIm) as
(
  select storageArea, storageArea_N, segment, partNumber, stage
      , 'i', LASTHKTS, lastImport
    from  BUA.TXBI003 R
  union all select '?', enStorAr, right('000' || enSeg, 3), 1, '-a'
      , 'a', cast(null as timestamp), cast(null as timestamp)
    from bua.txba201
)
, sC (area, areaN, areaC, seg, pa, stage, sTb, hkTs, laIm) as
(               /* xba201 may contain storArea Numbers
                   missing in xbi003, thus calculate area from areaN */
  select area, n
       , case when n <= 999 then right('000' || n, 3)
              when n <= 35657                /*  1296 = 36**2 */
                then substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , (n + 10998) / 1296 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 1296) / 36 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 36) + 1, 1)
         end
       , seg, pa, stage, sTb, hkTS, laIm
    from sU
)
, seg (seg, t8, pa, stage, sTb, hkTS, laIm, err) as
(
  select areaC || seg, 'XB' || areaC || seg, pa, max(stage)
      , max(sTb), max(hkTS), max(laIm)
      , case when min(areaN) <> max(areaN)
                 then 'areaC=' || areaC || ' >1 Nums'
                               || min(sTb) || '-' || max(sTb)
             when max(case when area <> '?' and area <> areaC
                        then 1 else 0 end) = 1
                  then max(case when area <> '?' and area <> areaC
                        then 'area=' || area || ' <> calc=' || areaC
                        else '' end)
             when sum(case when sTb = 'i' then 1 else 0 end) > 1
                 then '>1 xbi003' || areaC || seg || ' ' || pa
             when sum(case when sTb = 'a' then 1 else 0 end) > 1
                 then '>1 xba201' || areaC || seg || ' ' || pa
             else '' end
    from sC
    group by areaC, seg, pa
)
, uU as
(
  select substr(earess, 4, 8)  db
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))  ts
        , partNumber pa, eaRess, 'c' sTb
    from BUA.TXBC021 t
    where EYRESS =  5000 and ESRESS =  0
  union all select substr(earess, 4, 8)  db
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))  ts
        , partNumber pa, eaRess, 's' sTb
    from BUA.TXBC021s t
    where EYRESS =  5000 and ESRESS =  0
)
, unl (db, ts, pa, unl, sTb, err) as
(
  select db, ts, pa, max(eaRess) eaRess, max(sTb)
      , case when count(*) <> 1
                 then 'duplicates ' || min(sTb) || '-' || max(sTb)
        else max(
            case when earess not like 'XB.XB%' then 'eaRess not XB.XB%'
                 when locate('.', earess, 4) <> 12 then 'eaRess db len'
                 when locate('.', earess, 13) not between 14 and 21
                    then 'eaRess ts len'
            else '' end) end err
    from uU
    group by db, ts, pa
)
, tp (db, ts, pa, t8, mig, err) as
(
  select t.dbName, t.tsName, partition, max(left(t.name, 8))
      , ''
 /*   , case when exists ( select 1 from bua.txbmg104 m
                             where m.eanTabName = t.name
                             and m.ennPart = p.partition)
                    then 'm' else '-' end
 */
      , case when max(left(t.name, 8)) <> min(left(t.name, 8))
           then 'multipleTables' else '' end
    from sysibm.sysTables t
      join sysibm.sysTablePart p on
         t.dbName = p.dbName and t.tsName = p.tsName
    where t.dbName like 'XB%'
        and t.type not in ('A', 'V')
    group by t.dbName, t.tsName, partition
)
, j2 (db, ts, pa, stage, unl, sTb, hkts, err) as
(
  select value(tp.db, unl.db, '?segT8')
      , value(tp.ts, unl.ts, seg.t8, '?noTST8')
      , value(tp.pa, unl.pa, seg.pa, -999)
      , case when seg.stage is not null then seg.stage
             when tp.ts like '%WWW%' then '-w'
             else '-m' end
      , unl.unl
      , value(seg.sTb, '') || value(unl.sTb, '')
      , hkTS
      , case when seg.sTb = 'i' and laIm is null and mig='m'
                  then 'mig ' else '' end
      ||case when tp.db is null then 'notInDB2 ' else '' end
      ||case when seg.stage is null or seg.err = '' then ''
                  else strip(seg.err) || ' ' end
      ||case when unl is null or unl = '' then ''
             when locate_in_string(unl, '.', -1, 2) < 1 then 'unl<2q '
             when substr(unl, locate_in_string(unl, '.', -1, 2) + 1
                            , locate_in_string(unl, '.', -1, 1)
                            - locate_in_string(unl, '.', -1, 2) - 1)
                  <> 'SYSREC' then 'sysrecNotInUnl '
             else ''
             end
      || value(unl.err, '') || value(tp.err, '')
                             /* missing in TXBI003? correct stage? */
    from tp
      full outer join seg
          on tp.t8 = seg.t8 and tp.pa = seg.pa
      full outer join unl
          on tp.db = unl.db and tp.ts = unl.ts  and tp.pa = unl.pa
)
, j3 (db, ts, pa, stage, unl, pun, sTb, hkts, err) as
(
  select db, ts, pa, stage
      , case when stage = '-w'
                 then 'XB.MIG.U.' || db || '.' || ts
                      || '.P' || right('0000' || pa, 5) || '.REC.D15338'
             when unl is null or unl = '' then '' else unl end
      , case when stage = '-w'
                 then 'XB.MIG.U.' || db || '.' || ts  || '.PUN.D15338'
             when unl is null or unl = '' then ''
             when locate_in_string(unl, '.', -1, 2) < 1 then ''
             when substr(unl, locate_in_string(unl, '.', -1, 2) + 1
                            , locate_in_string(unl, '.', -1, 1)
                            - locate_in_string(unl, '.', -1, 2) - 1)
                  <> 'SYSREC' then ''
             else left(unl, locate_in_string(unl, '.', -1, 2) )
                || 'SYSPCH'
             end
      , sTb, hkTs, err
    from j2
)
, j (db, ts, pa, stage, unlTst, unl, pun, sTb, err) as
(
    select db, ts, pa, stage
      , case when stage = '-w' then '2015-12-04-16.00.00.000000'
                  else value(hkts, '1111-11-11-11.11.11.111111') end
      , unl, pun, sTb
      , case when stage = '-m' then 'notIn xbi003/xba201 '
             when stage not in ('RW', 'CL', 'UL', 'DL', '-a', '-w')
                 then 'badStage=' || stage || ' '
             when stage in ('UL', 'DL', '-w') and unl = ''
                 then 'noUnload '
             when stage not in ('CL', 'DL', 'UL', '-w') and unl <> ''
                 then 'UnloadInBadStage '
             else '' end || err
    from j3
)
select count(*), stage, err
    from j
    group by stage, err
;x;
select db, ts, pa, stage
      , '1111-11-11-11.11.11.111111'
      , value(sTb, '')
      , unlTst
      , unl
      , '1111-11-11-11.11.11.111111'
      , pun
      , ''
      , err
    from j
    order by db, ts, pa
;x;
with uU as
(
  select eaDBa, substr(earess, 4, 8)  db
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))  ts
        , partNumber pa, eaRess, 'c' sTb
    from BUA.TXBC021 t
    where EYRESS =  5000 and ESRESS =  0
  union all select eaDba, substr(earess, 4, 8)  db
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))  ts
        , partNumber pa, eaRess, 's' sTb
    from BUA.TXBC021s t
    where EYRESS =  5000 and ESRESS =  0
)
, g as
(
  select db, ts, count(*) cnt, min(eaDBa) eaDba, max(eaDba) eaDbaMx
    from uU
    group by db, ts
)
, t as
(
  select g.*, t.name tb
    from g left join sysibm.sysTables t
      on g.db = t.dbName and g.ts = t.tsName
 )
select count(*), sum(cnt) from t;
select * from t where tb is null or left(tb, 8) <> eaDba
;x;
    like '%ZDEVG%'
      and db in ( 'XBF3O001', 'XBAI4001', 'XBA8X001'
                , 'XBA1J001', 'XBA00001', 'XBCQR001'
                , 'XBB6N001', 'XBANK001', 'XBFGZ001'
                , 'XBEND001', 'XB9YR001', 'XB9ET001'
                , 'XB726001', 'XB722001', 'XB721001'
                , 'XB720001', 'XB719001', 'XBANK001'
              )         )
      and ( db is null or ts is null or pa is null or stage is null
               or pun is null or err is null
select count(*),  db, ts, pa
    from j
    group by db, ts, pa
    order by 1 desc
    fetch first 100 rows only
;X;
          )
;x;
select count(*), err
    from j
    group by err
;x;
 */
/*--- load partition stage info from table into stem SG -------------*/
elarDelIns: procedure expose m.
    call sqlUpdate , 'delete from' m.uTb
    call sqlUpdate 1, mCat(mapInline('elarIns'), ' ')
    call insRefreshCommit 'elar' m.sql.1.updateCount 'inserts'
    return
endProcedure elarIns

/*--- delete and reload partition table -----------------------------*/
delInsert: procedure expose m.
    call sqlUpdate , 'delete from' m.uTb
    call sqlUpdatePrepare 7, 'insert into' m.uTb,
         'values (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)'
    cUnl = 0
    cTru = 0
    cErr = 0
    do dx=1 to m.sg_errX
        o = 'SG.'dx
        ii = space(m.o.info, 1)
        ee = space(m.o.err , 1)
        cUnl = cUnl + (m.o.unl <> '')
        cErr = cErr + (ee <> '')
        if length(ii) > 70 then do
            ii = left(ii, 67)'...'
            ee = 'truncInfo' ee
            cTru = cTru + 1
            end
        if length(ee) > 70 then do
            ee = left('truncErr' ee, 67)'...'
            cTru = cTru + 1
            end
        call sqlUpdateExecute 7 , m.o.db, m.o.ts, m.o.pa ,
                  , m.o.stage, m.o.staUpd, m.o.staTb ,
                  , m.o.unlTst, m.o.unl, m.o.punTst, m.o.pun ,
                  , ii, ee
        end
    call insRefreshCommit m.sg.0 "parts," cUnl "unloads," ,
                       cErr "errors, "cTru "truncates"
    say now "reload:" m.sg.0 "parts," cUnl "unloads," ,
              cErr "errors," cTru "truncates"
    return
endProcedure delInsert

insRefreshCommit: procedure expose m.
parse arg info, err
    now = timestampNow()
    call sqlUpdate , "insert into" m.uTb ,
             "values('', '', -99, '-r', '"m.strt"', ''" ,
                 || ", '"m.strt"', 'refresh begin'" ,
                 || ", '"now"', 'refresh end'" ,
                 || ", '"info"', '"err"')"
    call sqlCommit
    return
endProcedure insRefreshCommit

/* copy dsnList begin **************************************************
     csi interface: see dfs managing catalogs chapt. 11
         returncode/reason see message IDC3009I
**********************************************************************/
/*--- specify dsn mask and fields to start a csi catalog search --------
      arguments:
          m       objectPointer
          dsnMask specifies the dsns with wildcards:
              %  1 character
              *  0 - n character in one level
              ** 0 - n levels
          fields a (space separated) list of field names -------------*/
csiOpen: procedure expose m.
parse arg m, dsnMask, fields
    m.m.fld.0 = words(fields)
    ffix = d2c(m.m.fld.0, 2)
    do x=1 to m.m.fld.0
        m.m.fld.x = translate(word(fields, x))
        ffix = ffix || left(m.m.fld.x, 8)
        end
    if dsnMask \== '' & right(dsnMask, 1) \== ' ' ,
          & pos('*', dsnMask) < 1 & length(dsnMask) < 42 then
        dsnMask = dsnMask'.**'
    m.m.filt = left(dsnMask, 149) ,
             || left('Y', 3) ,        /* resume offset 149      */
             || ffix                  /* csiNumEn offset 152    */

    WORKLEN = 1024 * 64
    m.m.work = D2C(WORKLEN,4) || COPIES('00'X,WORKLEN-4)
    m.m.pos = workLen + 1
    return
endProcedure csiOpen

/*--- put the next dsn into m.o and m.o.* (for other fields)
      return 1 if next dsn exists 0 otherwise ------------------------*/
csiNext: procedure expose m.
parse arg m, o
    usedL = C2D(SUBSTR(m.m.work,9,4)) /* GET AMOUNT OF WORK AREA USED */
    px = m.m.pos
    do forever
        if px > usedL then do
            if substr(m.m.filt, 150, 1) \== 'Y' then do
                m.m.pos = px
                m.o = ''
                return 0
                end
            reason = left('', 4)
            ADDRESS LINKPGM 'IGGCSI00  reason m.'m'.filt  m.'m'.work'
            if rc == 0 & substr(reason, 3, 2) == '0000'x then
                nop
            else if rc == 4 & substr(reason, 3, 2) == '0464'x then
                say 'data set entry with error'
            else
                call err 'call csi returns' rc,
                             'rc' c2d(substr(reason, 4,1)),
                             'reason' c2d(substr(reason, 3,1)),
                             'module' substr(reason, 1,2)
            usedL = C2D(SUBSTR(m.m.work,9,4)) /* GET WORK AREA USED */
            numFD = C2D(SUBSTR(m.m.work,13,2)) /* no flds + 1 */
            if numFd <> m.m.fld.0 + 1 then
                call err 'csiNumFd' numFd 'not' m.m.fld.0 '+' 1
            px = 15
            iterate
            end
        eType =  substr(m.m.work, px+1, 1)
        m.o = strip(substr(m.m.work, px+2, 44), 't')
        flag = substr(m.m.work, px, 1)
        /* say 'eType' eType m.o 'flag' c2x(flag) */
        if eType == '0' then do
            if flag \== '00'x & flag \== '40'x then
                call err 'flag' c2x(flag) 'for catalog' m.o
            px = px + 50    /* length of catalog entry  */
            iterate
            end
        else do
            if \ abbrev(x2b(c2x(flag)), '101') then
                call err 'call csi entry flag' x2b(c2x(flag)),
                             'rc' c2d(substr(m.m.work, px+49,1)),
                             'reason' c2d(substr(m.m.work, px+48,1)),
                             'module' substr(m.m.work, px+46, 2),
                             'for entry' m.o,
                             'see qw IDC3009I'
            py = px + 46
            tl = c2d(substr(m.m.work, py, 2))
            pl = py + 4
            pf = py + m.m.fld.0 * 2 + 4
            do fx = 1 to m.m.fld.0
                fi = m.m.fld.fx
                fl = c2d(substr(m.m.work, pl, 2))
                m.o.fi = substr(m.m.work, pf, fl)
                if fi = 'MGMTCLAS' then
                    m.o.fi = substr(m.o.fi, 3, c2d(left(m.o.fi ,2)))
                else if wordPos(fi, 'COMUDSIZ NOBYTTRK') > 0 then
                    m.o.fi = utc2d(m.o.fi)
                pf = pf + fl
                pl = pl + 2
                end
            if py + tl <> pf then
                call err 'length mismatch for entry' m.o
            m.m.pos = pf
            return 1
            end
        end
endProcedure csiNext
/*--- if dsn is arcived return 'arcive'
      if dsn is tape return 'tape'
      otherwise return managment class ------------------------------*/
csiArcTape: procedure expose m.
parse arg vo, cl, dt, dsn
        if vo = '' then
            say err '||| no volume for dsn' dsn
        else if vo = 'ARCIVE' then
            res = 'arcive'
        else if cl <> '' then
            res = cl
        else if abbrev(vo, 'SHR') then
            res = 'SHR'
        else
            res = 'tape'
        if   res = 'arcive' then
            return res
      /*if   abbrev(res, 'ar') \= abbrev(dt, '00'x) , */
        if   abbrev(res, 'ta') \= abbrev(c2x(left(dt, 1)), '7') ,
           | (left(res, 1) >= 'A') \= abbrev(dt, '30'x) then
           say '||| mismatch cl' cl 'vo' vo 'dt' c2x(dt) 'dsn' dsn
        return res
endProcedure csiArcTape
/*--- mbrList with  listDS -----------------------------------------*/
mbrList: procedure expose m.
parse arg m, pds
    msk = strip(dsnGetMbr(pds))
    if msk == '*' then
        msk = ''
    parse value dsnCsmSys(dsnSetMbr(pds)) with sys '/' dsn
    if sys == '*' then do
        call adrTso listDS "'"dsn"'" members
        oy = m.tso_trap.0 + 99
        mFound = 0
        mx = 0
        do ox=1 to m.tso_trap.0
            if mFound then do
                if msk \== '' then
                    if \ match(strip(m.tso_trap.ox), msk) then
                        iterate
                mx = mx +1
                m.m.mx = strip(m.tso_trap.ox)
                end
            else
                mFound = m.tso_trap.ox == '--MEMBERS--'
            end
        end
    else do
        if msk <> '' then
            msk = 'member('translate(msk, '%', '?')')'
        mbr_name.0 = -99
        call adrCsm "mbrList system("sys") dataset('"dsn"')" msk ,
                "index(' ') short"
        do mx=1 to mbr_name.0
            m.m.mx = strip(mbr_name.mx)
            end
        mx = mbr_name.0
        end
    m.m.0 = mx
    return mx
endProcedure mbrList
/* copy dsnList end   ************************************************/
/* copy sort begin ****************************************************/
sortComparator: procedure expose m.
parse arg cmp, le, ri
    if cmp == '' then
        cmp = '<<='
    if length(cmp) < 6 then
        m.sort_comparator = 'cmp =' le cmp ri
    else if pos(';', cmp) < 1 then
        m.sort_comparator = "aLe =" le"; aRi =" ri"; cmp =" cmp
    else
        m.sort_comparator = "aLe =" le "; aRi =" ri";" cmp
    return
endProcedure sort

sortWords: procedure expose m.
parse arg wrds, cmp
    if words(wrds) <= 1 then
        return strip(wrds)
    m.sort_ii.0 = words(wrds)
    do sx=1 to m.sort_ii.0
        m.sort_ii.sx = word(wrds, sx)
        end
    call sort sort_ii, sort_oo, cmp
    r = m.sort_oo.1
    do sx=2 to m.sort_oo.0
        r = r m.sort_oo.sx
        end
    return r
endProcedure sortWords

sortWordsQ: procedure expose m.
parse arg wrds, cmp
    call sortComparator cmp, 'word(le, lx)', 'word(ri, rx)'
    return strip(sortWord1(wrds))
endProcedure sortWordsQ

sortWord1: procedure expose m.
parse arg wrds
    if words(wrds) <= 1 then
        return wrds
    h = words(wrds) % 2
    le = sortWord1(subWord(wrds, 1, h))
    ri = sortWord1(subWord(wrds, h+1))
    lx = 1
    rx = 1
    res = ''
    do forever
        interpret m.sort_comparator
        if cmp then do
            res = res word(le, lx)
            if lx >= words(le) then
                return res subword(ri, rx)
            lx = lx + 1
            end
        else do
            res = res word(ri, rx)
            if rx >= words(ri) then
                return res subword(le, lx)
            rx = rx + 1
            end
        end
endProcedure sortWord1

sort: procedure expose m.
parse arg i, o, cmp
    call sortComparator cmp, 'm.l.l0', 'm.r.r0'
    call sort1 i, 1, m.i.0, o, 1, sort_work, 1
    m.o.0 = m.i.0
    return
endProcedure sort

sort1: procedure expose m.
parse arg i, i0, le, o, o0, w, w0
    if le <= 3 then do
        if le = 3 then do
            call sortMerge i, i0, i0+1, i, i0+1, i0+2, w, w0
            call sortMerge i, i0+2, i0+3, w, w0, w0+2, o, o0
            end
        else if le = 2 then
            call sortMerge i, i0, i0+1, i, i0+1, i0+2, o, o0
        else if le = 1 then
            m.o.o0 = m.i.i0
        return
        end
    h = (le + 1) % 2
    call sort1 i, i0,   h,    o, o0+le-h, w, w0
    call sort1 i, i0+h, le-h, w, w0,      o, o0
    call sortMerge o, o0+le-h, o0+le, w, w0, w0+le-h, o, o0
    return
endProcedure sort1

sortMerge: procedure expose m.
parse arg l, l0, le, r, r0, re, o, o0
    do while l0 < le & r0 < re
        interpret m.sort_comparator
        if cmp then do
            m.o.o0 = m.l.l0
            l0 = l0 + 1
            end
        else do
            m.o.o0 = m.r.r0
            r0 = r0 + 1
            end
        o0 = o0 + 1
        end
    do while l0 < le
        m.o.o0 = m.l.l0
        l0 = l0 + 1
        o0 = o0 + 1
        end
    do while r0 < re
        m.o.o0 = m.r.r0
        r0 = r0 + 1
        o0 = o0 + 1
        end
    return
endProcedure sortMerge
/* copy sort end   ****************************************************/
/* copy map begin ******************************************************
    a map stores values at keys
    it may also maintain a list of keys
    the basic ideas are similar to the java Interface java.util.Map
    contrary to stems we also handle keys longer then 250 bytes
***********************************************************************/
/*--- initialize the module ------------------------------------------*/
mapIni: procedure expose m.
    if m.map_ini = 1 then
        return
    m.map_ini = 1
    call mIni
    m.map.0 = 0
    m.map_inlineSearch = 1
    call mapReset map_inlineName, map_inline
    return
endProcedure mapIni

mapInline: procedure expose m.
parse arg pName, opt
    if mapHasKey(map_inlineName, pName) then do
        im = mapGet(map_inlineName, pName)
        if pos('l', opt) < 1 & symbol('m.im.0') \== 'VAR' then do
            m.im.0 =  m.im.lEnd - m.im.lBegin - 1
            do ix=1 to m.im.0
                m.im.ix = strip(sourceline(ix+m.im.lBegin), 't')
                end
            end
        return im
        end
    name = '/'
    do lx = m.map_inlineSearch to sourceline()
        if \ abbrev(sourceline(lx), '$') then
            iterate
        li = sourceline(lx)
        s1 = pos('/', li)+ 1
        if s1 < 3 | s1 > 4 then
            iterate
        s2 = pos('/', li, s1)
        if s2 <= s1 then
            iterate
        if s1 == 3 then do
            if name \== substr(li, s1, s2-s1) then
                iterate
            im = 'map_inline.' || (m.map_inline.0+1)
            call mapAdd map_inlineName, name, im
            m.im.lBegin = lBeg
            m.im.lEnd = lx
            m.im.mark = mrk
            if name == pName then do
                m.map_inlineSearch = lx+1
                return mapInline(pName)
                end
            name = '/'
            end
        else if \ mapHasKey(map_inlineName,
                , substr(li, s1, s2-s1)) then do
            lBeg = lx
            mrk = substr(li, 2, s1-3)
            name = substr(li, s1, s2-s1)
            end
        else do
            name = '/'
            end
        end
    if pos('r', opt) > 0 then
        return ''
    return err('no inline data /'pName'/ found')
endProcedure mapInline

/*--- create a new map ----------------------------------------------*/
mapNew: procedure expose m.
parse arg opt
    m.map.0 = m.map.0 + 1
    return mapReset('MAP.'m.map.0 , opt)
endProcedure mapNew

/*--- make an empty map, if opt <> '' maintain stem of keys
                ('K' in map_keys, '=' in a else in opt) --------------*/
mapReset: procedure expose m.
    parse arg a, opt
    if symbol('m.map_keys.a') == 'VAR' then
        call mapClear a
    if opt = '=' then
        st = a
    else if translate(opt) = 'K' then
        st = 'MAP_KEYS.'a
    else
        st = opt
    m.map_keys.a = st
    if st \== '' then
        m.st.0 = 0
    return a
endProcedure

/*--- add a new key value pair to the map ----------------------------*/
mapAdd: procedure expose m.
parse arg a, ky, val
    vv = mapAdr(a, ky, 'a')
    if vv == '' then
        return err('duplicate in mapAdd('a',' ky',' val')')
    m.vv = val
    return val
endProcedure mapAdd

/*--- change the value at a key or add key value ---------------------*/
mapPut: procedure expose m.
parse arg a, ky, val
    vv = mapAdr(a, ky, 'p')
    m.vv = val
    return val
endProcedure mapPut

/*--- return 1 if key ky exists in map a, 0 otherwise ----------------*/
mapHasKey: procedure expose m.
parse arg a, ky
    return mapAdr(a, ky, 'g') \== ''
endProcedure mapHasKey

/*--- return the value of key ky in map a if it exists,
          else if called with a third argument return third argument
          else issue an error ----------------------------------------*/
mapGet: procedure expose m.
parse arg a, ky
    vv =  mapAdr(a, ky, 'g')
    if vv \== '' then
        return m.vv
    else if arg() > 2 then
        return arg(3)
    else
        return err('missing key in mapGet('a',' ky')')
endProcedure mapGet

/*--- return a stem of all keys --------------------------------------*/
mapKeys: procedure expose m.
parse arg a
    if m.map_keys.a == '' then
        call err 'mapKeys('a') with no keys'
     return m.map_keys.a
endProcedure mapKeys

/*--- remove a key from the map, do nothing if it is missing ---------*/
mapRemove: procedure expose m.
parse arg a, ky
    vv = mapAdr(a, ky, 'g')
    if vv == '' then
        return ''
    if m.map_keys.a \== '' then do
        trace ?R /* not tested yet ???wkTest */
        k = m.map_keys.a
        mx = m.k.0
        do i=1 to mx
            if m.k.i == ky then do
                m.k.i = m.k.mx
                m.k.0 = mx - 1
                return
                end
            end
        end
    val = m.vv
    drop m.a.ky
    return val
endProcedure mapRemove

/*--- remove all entries ---------------------------------------------*/
mapClear: procedure expose m.
parse arg a
    st = mapKeys(a)
    liLe = 247 - length(a)
    do kx=1 to m.st.0
        ky = m.st.kx
        drop m.st.kx
        if length(ky) < liLe then do
            drop m.a.ky
            end
        else do
            adr = mapAdr(a, ky, 'g')
            if adr \== '' then do
                ha = left(adr, length(adr) - 2)
                do i = 1 to m.ha.0
                     vv = ha'v'i
                     drop m.ha.i m.vv
                     end
                 drop m.ha.0
                 end
            end
        end
    m.st.0 = 0
    return a
endProcedure mapClear

/*--- return the value pointer for a key, '' if non existing
    f = 'g' return address if exists otherwise ''
        'p' return address if exists otherwise newly added address
        'a' return ''      if exists otherwise newly added address ---*/
mapAdr: procedure expose m.
parse arg a, ky, f
    if length(ky) + length(a) < 247 then do
        res = a'.'ky
        if symbol('m.res') == 'VAR' then
            return copies(res, f \== 'a')
        else if f == 'g' then
            return ''
        end
    else do
        len = length(ky)
        q = len % 2
        ha = a'.'len || left(ky, 80) || substr(ky,
            , len % 2 - 40, 85-length(len)-length(a)) || right(ky, 80)
        if symbol('M.ha.0') == 'VAR' then do
            do i=1 to m.ha.0
                if m.ha.i == ky then
                    return copies(ha'v'i, f \== 'a')
                end
            end
        else do
            i = 1
            end
        if f == 'g' then
            return ''
        if i > 9 then
            call err 'overflow long key' y 'in map' a 'hash' ha'.K.'i
        m.ha.0 = i
        m.ha.i = ky
        res = ha'v'i
        end
    if m.map_keys.a \== '' then
        call mAdd m.map_keys.a, ky
    return res
endProcedure mapAdr

/* copy map end *******************************************************/
/* copy m begin ********************************************************
  we use variables as follows
    m. stem m: all global data and object data that must survive
               a procedure call  (m for memory in Memoria of B5000)
    m.<mbr>.** and m.<mbr>_**: every rexx Module (copy) should only
               allocate these addresses to avoid address conficts
               with <mbr> the name of therexx module
        we pass parameters around (e.g. a=address, m=memory, st=stem)
            and the called function may use m.a or m.a.subField etc.
    gg*: local variable in subroutines without procedure
    everything else: temporary data within procedure

  every subroutine is declared as procedure expose m.
        (also if no m. variable is used, because e.g. of error handling)
  the few subroutines that cannot use procedure, should use only
        variables starting with gg
***********************************************************************/
/*---make an area -----*/

mNewArea: procedure expose m.
parse arg nm, adr
    ax = m.m_area.0 + 1
    m.m_area.0 = ax
    m.m_area.ax = nm
    if adr == '=' then
        adr = nm
    else if adr == '' then
        adr = 'M.'ax
    if symbol('m.m_2a.nm') == 'VAR' then
        call err 'area name' nm 'already used'
    if symbol('m.m_2a.adr') == 'VAR' then
        call err 'adr' adr 'for area' nm 'already used'
    m.m_2a.adr = adr
    m.m_2a.nm  = adr
    m.adr.0 = 0
    m.m_free.adr.0 = 0
    return nm
endProcedure mNewArea

mNew: procedure expose m. ggArea
parse arg name
    if symbol('m.m_2a.name') \== 'VAR' then
        call err 'area' name 'does not exists'
    adr = m.m_2a.name
    if m.m_free.adr.0 > 0 then do
        fx = m.m_free.adr.0
        m.m_free.adr.0 = fx-1
        return m.m_free.adr.fx
        end
    m.adr.0 = m.adr.0 + 1
    return adr'.'m.adr.0
endProcedure mNew

mFree: procedure expose m.
parse arg m
    adr = left(m, lastPos('.', m)-1)
    fx = m.m_free.adr.0 + 1
    m.m_free.adr.0  = fx
    m.m_free.adr.fx = m
    return ''
endProcedure mFree
/*--- iterate over all allocate elements of an area ------------------*/
mIterBegin: procedure expose m.
parse arg nm
    return m.m_2a.nm'.0'
endProcedure mIterBegin

mIter: procedure expose m.
parse arg cur
    if cur == '' then
        return ''
    lx = lastPos('.', cur)
    adr = left(cur, lx-1)
    ix = substr(cur, lx+1)
    do ix=ix+1 to m.adr.0
        n = adr'.'ix
        do fx=1 to m.m_free.adr.0 while m.m_free.adr.fx \== n
            end
        if fx > m.m_free.adr.0 then
            return n
        end
    return ''
endProcedure mIter

/*--- get m.a --------------------------------------------------------*/
mGet: procedure expose m.
parse arg a
    return m.a
endProcedure mGet

/*--- put value v into m.a -------------------------------------------*/
mPut: procedure expose m.
parse arg a, v
    m.a = v
    return v
endProcedure mPut

/*--- cut stem a to length len ---------------------------------------*/
mCut: procedure expose m.
parse arg a, len
    m.a.0 = len
    return a
endProcedure mCut

/*--- add one or several arguments to stem m.a -----------------------*/
mAdd: procedure expose m.
parse arg a
    ix = m.a.0
    do ax = 2 to arg()
        ix = ix + 1
        m.a.ix = arg(ax)
        end
    m.a.0 = ix
    return a'.'ix
endProcedure mAdd

/*--- pop last element from stem m.a ---------------------------------*/
mPop: procedure expose m.
parse arg a
    ix = m.a.0
    if ix < 1 then
        call err 'pop from empty stem' a
    m.a.0 = ix-1
    return m.a.ix
endProcedure mPop

/*--- create the inverse map of a stem -------------------------------*/
mInverse: procedure expose m.
parse arg a, i
    do x=1 to m.a.0
        v = m.a.x
        m.i.v = x
        end
    return m.a.0
endProcedure inverse

/*--- add to m.dst.* a (sub)sequence of m.src.* ----------------------*/
mAddSt: procedure expose m.
    parse arg dst, src, fx , tx
    dx = m.dst.0
    if fx == '' then
        fx = 1
    if tx == '' then
        tx = m.src.0
    do sx = fx to tx
        dx = dx + 1
        m.dst.dx = m.src.sx
        end
    m.dst.0 = dx
    return
endProcedure mAddSt

/*--- find position of first occurrence of ele in stem m,
        return 0 if nonemove a part of a stem -----------------------*/
mPos: procedure expose m.
parse arg m, ele, sx
    if sx == '' then
        sx = 1
    do x=sx to m.m.0
        if m.m.x = ele then
            return x
        end
    return 0
endProcedure mPos

/*--- move a part of a stem ------------------------------------------*/
mMove: procedure expose m.
parse arg m, sx, dx
    if dx < sx then do
        y = dx
        do x=sx to m.m.0
            m.m.y = m.m.x
            y = y + 1
            end
        end
    else if dx > sx then do
        y = m.m.0 + dx - sx
        do x=m.m.0 by -1 to sx
            m.m.y = m.m.x
            y = y - 1
            end
        end
    m.m.0 = m.m.0 + dx - sx
    return
endProcedure mMove

/*--- insert a stem into another ------------------------------------*/
mInsert: procedure expose m.
parse arg m, tx, st
    call mMove m, tx, tx+m.st.0
    do sx=1 to m.st.0
        dx = tx-1+sx
            m.m.dx = m.st.sx
            end
    return
endProcedure mInsert

/*--- strip all elements of a stem -----------------------------------*/
mStrip: procedure expose m.
parse arg st, opt
    if opt == '' then
        opt = 'b'
    do x=1 to m.st.0
        m.st.x = strip(m.st.x, opt)
        end
    return st
endProcedure mStrip

/* cat the lines of a stem with separator ---------------------------*/
mCat: procedure expose m.
parse arg st, sep
    if m.st.0 < 1 then
        return ''
    res = m.st.1
    do sx=2 to m.st.0
        res = res || sep || m.st.sx
        end
    return res
endProcedure mCat

mIni: procedure expose m.
    if m.m_ini == 1 then
        return
    m.m_ini = 1
    call utIni
    m.m_area.0 = 0
    call mNewArea
    return
endProcedure mIni

/* copy m end *********************************************************/
/* copy time begin ****************************************************
 timestamp format yz34-56-78-hi.mn.st.abcdef
 11.12.14 wk: added lrsn2uniq
 11.05.13 wk: numeric digits transparent: in jeder Procedure drin
              time2jul, tst externalisiert
**********************************************************************/
/*--- timestamp to julian --------------------------------------------*/
time2jul: procedure expose m.
parse arg yyyy '-' mm '-' dd '-'
    if yyyy < 1100 then
        yyyy = 11 || right(yyyy, 2, 0)
        /* date function cannot convert to julian, only from julian
           use b (days since start of time epoch) instead     */
    return right(yyyy, 2) ,
         || right(date('b', yyyy || mm || dd, 's') ,
                - date('b', yyyy-1 || '1231', 's') , 3, 0)
endProcedure time2jul

/*--- current timestamp ---------------------------------------------*/
timestampNow: procedure expose m.
    parse value date('s') time('l') with y 5 m 7 d t
    return y'-'m'-'d'-'translate(t, '.', ':')

/*--- timestamp expand: expand to timestamp of 26 chars -------------*/
timestampExp: procedure expose m.
parse arg tst .
    if length(tst) < m.timeStamp_Len then
        return overlay(tst, m.timeStamp_01)
    else
        return left(tst, timeStamp_Len)
endProcedure tiemstampExp

/*--- timestamp check return '' if correct or error text ------------*/
timestampcheck: procedure expose m.
parse arg tst
    if length(tst) < m.timestamp_d0Len | \ abbrev(m.timestamp_11,
             , translate(tst, '111111111', '023456789')) then
        return 'bad timestamp' tst
    parse arg yyyy '-' mo '-' dd '-' hh '.' mm '.' ss '.' u
    if mo < 1 | mo > 12 then
        return 'bad month in timestamp' tst
    if dd < 1 | dd > 3 || substr('101010110101', mo, 1) then
        return 'bad day in timestamp' tst
    if mo = 2 then
        if dd > date('d', yyyy'0301', 's') - 32 then
            return 'bad day in timestamp' tst
    if hh > 23 & \ abbrev(24 00 00 000000, hh mm ss u) then
        return 'bad hour in timestamp' tst
    if mm > 59 then
        return 'bad minute in timestamp' tst
    if ss > 59 then
        return 'bad second in timestamp' tst
    return ''
endProcedure timestampCheck

/*--- timestamp to days since 1.1.0001 ------------------------------*/
timestamp2days: procedure expose m.
parse arg yyyy '-' mo '-' dd '-' hh '.' mm '.' ss
numeric digits 15
    return date('b', yyyy || mo || dd, 's') ,
                + (((hh * 60) + mm) * 60 + ss) / 86400

/*--- timestamp diff in days ----------------------------------------*/
timestampDiff: procedure expose m.
parse arg t1, t2
numeric digits 15
    return timestamp2days(t1) - timestamp2Days(t2)

/*--- convert 2 digit year to 4 digit -------------------------------*/
timeYear24: procedure expose m.
parse arg s
    y = left(date('S'), 4)
    s4 = left(y, 2)right(s, 2, 0)
    if s4 > y + 30 then
        return (left(y, 2) - 1)substr(s4, 3)
    else if s4 < y - 69 then
        return (left(y, 2) + 1)substr(s4, 3)
    else
        return s4
endProcedure timeYear24

/*--- convert 2 or 4 digit year Y (A=0...T=19) ----------------------*/
timeYear2Y: procedure expose m.
parse arg y
    return substr('ABCDEFGHIJKLMNOPQRST' , ((y + 10) // 20) + 1, 1)

/*--- convert 2 or 4 digit year Y (A=0...T=19) ----------------------*/
timeY2Year: procedure expose m.
parse arg i
    j = pos(i, 'ABCDEFGHIJKLMNOPQRST') - 1
    if j < 0 then
        call err 'timeYearY24 bad input' i
    y = left(date('S'), 4)
    r = y - (y+10) // 20 + j
    if r < y - 15 then
        return r + 20
    else if r > y + 4 then
        return r - 20
    else
        return r
endProcedure timeY2Year

/*--- convert numeric month to M (Jan=B=1, dec=12=M) ----------------*/
timeMonth2M: procedure expose m.
parse arg m
    return substr('BCDEFGHIJKLM', m, 1)

/*--- convert M to numeric Month (Jan=B=1, dec=12=M) ----------------*/
timeM2Month: procedure expose m.
parse arg m
    p = pos(m, 'BCDEFGHIJKLM')
    if p= 0 then
        call err 'bad M month' m
    return right(p, 2, 0)

/*--- convert numeric hour 78 to H8 (A=0..D=3) ----------------------*/
timeHour2H: procedure expose m.
parse arg h
    h = right(h, 2, 0)
    return substr('ABCD', left(h, 1)+1, 1)substr(h, 2)

/*--- convert H8 to numeric Hour 78 (A=0..D=3) ----------------------*/
timeH2Hour: procedure expose m.
parse arg h
    p = pos(left(h, 1), 'ABCD') - 1
    if p < 0 | length(h) \== 2 then
        call err 'bad H hour' h
    return p || substr(h, 2)

/*--- read timeZoneOffset and leapSeconds registers
        and set variables for uniq ----------------------------------*/
timeIni: procedure expose m.
parse arg debug
    numeric digits 25
    /* offsets documented in z/OS Data Areas  Vol.1 */
    cvtOH      = '00000010'          /* cvt control block Address */
    cvtext2O   = x2d('00000560') /* offset  to extension 2    */
    cvtldtoO   = x2d('00000038') /* offset to timezone    */
    cvtlsoO    = x2d('00000050') /* offset to leapSeconds */

    /* CVT CB        address               + extention2   */
    cvtExt2A       = C2D(STORAGE(cvtOH,4)) + cvtext2O
    /* cvtLdto timeZone              address +offset      */
    m.time_Zone    = c2d(STORAGE(d2x(cvtext2A+cvtldtoO, 8), 8))
    m.time_StckUnit = 1e-6 / 256 / 16
    /* cvtLso LeapSecs               address +offset      */
    m.time_Leap    = c2d(STORAGE(d2x(cvtext2A+cvtlsoO, 8), 8))
    m.time_LZT_TAI10_us16 = (m.time_zone - m.time_leap) % 256
    m.time_UQDigits = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ012345678'
                         /* find lrsn of day 0, 0 out last 6 bits  */
    m.time_UQZero = x2d(left(timeTAI102Lrsn( ,
                 '2004-12-31-00.00.22.000000'), 14)) % 64 * 64
    m.timeStamp_01 = '0001-01-01-00.00.00.000000'
    m.timeStamp_11 = '1111-11-11-11.11.11.111111'
    m.timeStamp_99 = '9999-12-31-23.59.59.999999'
    m.timeStamp_len = length(m.timestamp_11)
    m.timeStamp_d0Llen = m.timestamp_len - 7
    m.time_ini = 1
    return
endSubroutine timeIni

/*--- TAI10 timestamp yyyy-mm.... -> stckE value char(16)
         BLSUETID is described in z/OS MVS IPCS Customization -------*/
timeTAI102stckE: procedure expose m.
                        /* timestamp must include microSeconds |||*/
    parse arg year'-'mo'-'da'-'hh'.'mm'.'secs
    tDate = mo'/'da'/'year hh':'mm'.'secs
    ACC=left('', 16, '00'x)
    ADDRESS LINKPGM "BLSUETID TDATE ACC"
    RETURN acc
endProcedure timeTAI102stckE

timeTAI102lrsn: procedure expose m.
parse arg tst
    return c2x(left(timeTAI102StckE(tst), 10))

timeLZT2stckE: procedure expose m.
parse arg tst
    numeric digits 23
    s =timeTAI102StckE(tst)
    return d2c(c2d(left(s, 8)) - m.time_lzt_TAI10_us16,8) || substr(s,9)
endProcedure timeLZT2stckE

timeLZT2lrsn: procedure expose m.
parse arg tst
    return c2x(left(timeLZT2StckE(tst), 10))

/*--- expand lrsn to 20 hexDigits -------------------------------*/
timeLrsnExp: procedure expose m.
parse arg s
    return left(copies('00', length(s) <= 12 & \abbrev(s, 0))s, 20,0)

/*--- expand stcK(e) to 16 Byte ---------------------------------*/
timeStckExp: procedure expose m.
parse arg s
    return left(copies('00'x, length(s) <= 8 & s >> '09'x)s, 16,'00'x)

/*--- conversion from StckE Clock Value to TAI10 Timestamp
        BLSUETOD is described in z/OS MVS IPCS Customization --------*/
timeStckE2TAI10: PROCEDURE expose m.
parse arg stck      /* must be 16 characters ||||| */
  TDATE = left('' , 26)
  ADDRESS LINKPGM "BLSUETOD stck TDATE"
  /* return format   : mo/dd/yyyy hh:mm:ss.uuuuuu */
  /* Timestamp format: yyyy-mm-dd-hh.mm.ss.uuuuuu */
  parse var TDATE mo '/' dd '/' yyyy hh ':' mm ':' secs
RETURN yyyy'-'mo'-'dd'-'hh'.'mm'.'secs
endProcedure timeStckE2TAI10

/*--- conversion from Lrsn Clock Value to TAI10 Timestamp ----------*/
timeLrsn2TAI10:
    return timeStckE2TAI10(x2c(arg(1))'000000000000'x)

/*--- conversion from Lrsn Clock Value to LZT Local Zurich Time -----*/
timeStckE2LZT: procedure expose m.
parse arg s
    numeric digits 23
    return timeStckE2TAI10(d2c(c2d(left(s, 8)) ,
                + m.time_LZT_TAI10_us16, 8) || substr(s, 9))
endProcedure timeStckE2LZT

/*--- conversion from Lrsn Clock Value to LZT Local Zurich Time -----*/
timeLrsn2LZT: procedure expose m.
parse arg lrsn
    return timeStckE2LZT(x2c(lrsn) || '000000000000'x)

/* convert a lrsn to the uniq variable ********************************/
timeLrsn2uniq: procedure expose m.
parse arg lrsn
    /* unique are bits 0:41 of the TodClock value
              minus 31.12.2004 represented
              by base 35 by 'ABC...YZ01..8'
    */
    lrsn = left(timeLrsnExp(lrsn), 14)
    numeric digits 20
    diff = x2d(lrsn) - m.time_UQZero
    if diff < 0 then
        return'< 2005'
    return right(i2q(diff % 64, m.time_UQDigits), 8, 'A')
endProcedure timeLrsn2Uniq

/* convert a uniq variable to lrsn ************************************/
timeUniq2lrsn: procedure expose m.
parse arg uniq
    numeric digits 15
    u1 = q2i(left(uniq, 8, 'A'), m.time_UQDigits) * 64
    lrsn = '00'right(d2x(u1 + m.time_UQZero), 12, 0)'000000'
    return lrsn
endProcedure uniq2lrsn

/*--- translate a number in q-system to decimal
       arg digits givs the digits corresponding to 012.. in the q sysem
       q = length(digits) --------------------------------------------*/
q2i: procedure expose m.
parse arg v, digits
    b = length(digits)
    i = 0
    do x = 1 to length(v)
        q = substr(v, x, 1)
        r = pos(q, digits)
        if r < 1 then
            call err 'bad digit' q 'in' v 'valid digits' digits
        i = i * b + r - 1
        end
    return i
endProcedure q2i
/*--- translate a decimal number to q-system - inverse of q2i --------*/
i2q: procedure expose m.
parse arg i, digits
    if i = 0 then
        return left(digits, 1)
    b = length(digits)
    v = ''
    do while i > 0
        v = substr(digits, 1 + (i // b), 1) || v
        i = i % b
        end
    return v
endProcedure i2q
/* copy time end -----------------------------------------------------*/
/* copy SQL begin ***************************************************
       Achtung: inc generiert sql aus sqlRx, Aenderungen nur in sqlRx|
    sql interface
***********************************************************************/
/*--- initialize sql -----------------------------------------------*/
sqlIni: procedure expose m.
    if m.sql_ini == 1 then
        return
    m.sql_ini = 1
    call utIni
    m.sqlNull = '---'
    m.sqlInd = 'sqlInd'
    m.sql_defCurs= 49
    m.sqlCAMsg = 0
    m.sqlSuMsg = 2
    m.sql_dbSys = ''
    m.sql_csmhost = ''
    isInProd = wordPos(sysvar(sysNode), 'RZ2') > 0
    m.sql_retOk   = 'dne' copies('rod', \ isInProd)
    return 0
endProcedure sqlIni

/*--- get default db2System ------------------------------------------*/
sqlDefaultSys: procedure expose m.
parse arg
    if sysvar(sysnode) == 'RZ1' then
        return 'DBAF'
    else if sysvar(sysnode) == 'RZ4' then
        return 'DP4G'
    else if sysvar(sysnode) == 'RZX' then
        return 'DX0G'
    else
        call err 'no default subsys for' sysvar(sysnode)
endProcedure sqlDefaultSys

/*--- connect to the db2 subsystem sys -----------------------------*/
sqlConnect: procedure expose m.
parse upper arg sys, ggRetOk
    call sqlIni
    address tso "SUBCOM DSNREXX"
    if rc <> 0 then do
       sRc = RXSUBCOM('ADD','DSNREXX','DSNREXX') /* ADD HOST CMD ENV  */
       if sRc <> 0 then
           call err 'rc' sRc 'from RXSUBCOM(ADD, DSNREXX, DSNREXX)'
       end
    if sys = '-' then
        return 0
    if sys == '' then
        sys = sqlDefaultSys()
    m.sql_dbSys = sys
    ggSqlStmt =  'connect' sys
    address dsnRexx ggSqlStmt
    if rc = 0 then
        return 0
    interpret sqlErrorHandler(rc, ggRetOk, ggSqlStmt)
    return sqlCode
endProcedure sqlConnect

/*--- diconnect from db2 ---------------------------------------------*/
sqlDisconnect: procedure expose m.
parse arg retOk
    if m.sql_dbSys == '' then
        return 0
    ggSqlStmt =  'disconnect'
    m.sql_dbSys = ''
    m.sql_csmHost = ''
    address dsnRexx ggSqlStmt
    if rc = 0 then
        return 0
    interpret sqlErrorHandler(rc, retOk, ggSqlStmt)
    return sqlCode
endProcedure sqlDisconnect

/*--- reset sql cursor 'c'cx fields ----------------------------------*/
sqlReset: procedure expose m.
parse arg cx
     m.sql.cx.updateCount = ''
     m.sql.cx.resultSet   = ''
     m.sql.cx.d.sqlD = 'noSqlDA'
     m.sql.cx.i.sqlD = 'noDescInp'
     m.sql.cx.fetchVars = ''
     m.sql.cx.fetchFlds = ''
     m.sql.cx.fetchClass = ''
     m.sql.cx.type  = ''
     return
endProcedue sqlReset

/*--- execute a query from sql, with one resultset -------------------*/
sqlQuery: procedure expose m.
parse arg cx, src, feVa, retOk
     call sqlReset cx
     s1 = ''
     if pos(left(feVa, 1), '?:') < 1 then
         s1 = 'into :M.SQL.'cx'.D'
     res = sqlExec('prepare s'cx s1 'from :src', retOk)
     if res < 0 then
         return res
     call sqlFetchVars cx, feVa
     call sqlExec 'declare c'cx 'cursor for s'cx
     res = sqlExec('open c'cx, retOk)
     if res < 0 then
         return res
     m.sql.cx.updateCount = sqlErrd.3
     m.sql.cx.resultSet = cx
     return res
endProcedure sqlQuery

/*--- prepare a query from sql, with one resultset -------------------*/
sqlQueryPrepare: procedure expose m.
parse arg cx, src, feVa, retOk
     call sqlReset cx
     s1 = ''
     if feVa == '' | feVa = 'd' then
         s1 = 'into :M.SQL.'cx'.D'
     res = sqlExec('prepare s'cx s1 'from :src', retOk)
     if res < 0 then
         return res
     call sqlFetchVars cx, feVa
     call sqlExec 'declare c'cx 'cursor for s'cx
     return sqlExec('describe input s'cx 'into :M.SQL.'cx'.I')
endProcedure sqlQueryPrepare

sqlQueryExecute: procedure expose m.
parse arg cx retOk
    do ix=1 to arg()-1
        call sqlDASet cx , 'I', ix, arg(ix+1)
        end
     res = sqlExec('open c'cx 'using descriptor :M.SQL.'cx'.I', retOk)
     if res < 0 then
         return res
     m.sql.cx.updateCount = sqlErrd.3
     m.sql.cx.resultSet = cx
     return res
endProcedure sqlQueryExecute

/*--- fetch next row to m.dst.* at end return false ------------------*/
sqlFetch: procedure expose m.
parse arg cx, dst, retOk
    fetCode = sqlExec('fetch c'cx 'into' m.sql.cx.fetchVars, 100 retOk)
    if fetCode == 100 then
        return 0
    if fetCode < 0 then
        return fetCode
    interpret m.sql.cx.fetchCode
    return 1
endProcedure sqlFetch

/*--- close cursor 'c'cx ---------------------------------------------*/
sqlClose: procedure expose m.
parse arg cx, retOk
     return sqlExec('close c'cx, retOk)
endProcedure sqlClose

/*-- execute an sql with no resultset, but possibly outParms ---------*/
sqlUpdate: procedure expose m.
parse arg cx, src, retOk
    m.sql.cx.updateCount = ''
    m.sql.cx.resultSet   = ''
    bx = verify(src, '( ')
    if bx > 0 then
        fun = translate(word(substr(src, bx), 1))
    if  fun = 'SET' then do
        w2 = translate(word(substr(src, bx), 2))
        if \ abbrev(w2, ':') then
            return sqlExec('execute immediate :src', retOk)
        trace ?r
        ex = pos('=', w2)
        if ex = 0 then
            ex = length(w2)+1
        var = strip(substr(w2, 2, ex-2))
        if var = '' then
            call err 'bad hostVar in' src
        m.sql.outVar = var
        src2 = 'set :M.sql.out.'var substr(w, ex) subword(src, 3)
        return sqlExec(src2, retOk)
        end
    if fun == 'DECLARE'  then do
        if 'GLOBAL' == translate(word(substr(src, bx), 2)) then
            return sqlExec('execute immediate :src', retOk)
        end
    res = sqlExec(src, retOk)
    if wordPos(fun, 'DELETE INSERT UPDATE') > 0 then
        m.sql.cx.updateCount = sqlErrd.3
    return res
endProcedure sqlUpdate

/*-- prepare an update -----------------------------------------------*/
sqlUpdatePrepare: procedure expose m.
parse arg cx, src, retOk
    res = sqlExec('prepare s'cx 'from :src', retOk)
    return sqlExec('describe input s'cx 'into :M.SQL.'cx'.I')
endProcedure sqlUpdatePrepare

/*-- execute a prepared update with the given arguments --------------*/
sqlUpdateExecute: procedure expose m.
parse arg cx retOk
    do ix=1 to arg()-1
        call sqlDASet cx , 'I', ix, arg(ix+1)
        end
    res = sqlExec('execute s'cx 'using descriptor :M.SQL.'cx'.I',
                  , retOk)
    m.sql.cx.updateCount = sqlErrd.3
    return res
endProcedure sqlUpdateExecute

/*-- execute a query, update or call ---------------------------------*/
sqlExecute: procedure expose m.
parse arg cx, src, retOk
    f = translate(word(src, 1))
    bx = pos('(', f)
    if bx > 0 then
        f = left(f, max(1, bx-1))
    m.sql.cx.fun = f
    if f == 'SELECT' | f == 'WITH' | f == '(' then
        return sqlQuery(cx, src, , retOk)
    else if f == 'CALL' then
        call err 'implement sql call for:' src
    else
        return sqlUpdate(cx, src, retOk)
endProcedure sqlExecute

/*-- fetch all rows to stem and close --------------------------------*/
sqlFetch2St: procedure expose m.
parse arg cx, dst, retOK
    do sx=1 while sqlFetch(cx, dst'.'sx)
       end
    res = sx-1
    m.dst.0 = sx-1
    call sqlClose cx
    return m.dst.0
endProcedure sqlFetch2St

/*-- execute a query, copy result to stem ----------------------------*/
sql2St: procedure expose m.
parse arg src, dst, feVa, retOK
    cx = m.sql_defCurs
    res = sqlQuery(cx, src, feVa, retOk)
    return sqlFetch2St(cx, dst, retOk)
endProcedure sql2St

/*-- return first column of the only row and close -------------------*/
sqlFetch2One: procedure expose m.
parse arg cx, dst, retNone
    f1 = sqlFetch(cx, dst)
    if f1 then
        f2 = sqlFetch(cx, dst'.2')
    call sqlClose cx
    if \ f1 then
        if retNone \== '' then
            return substr(retNone, 2)
        else
            call err 'sqlFetch2One: no row returned'
    else if f2 then
        call err 'sqlFetch2One: more than 1 row'
    if m.sql.cx.fetchFlds == '' then do
        c1 = substr(word(m.sql.cx.fetchVars, 1), 2)
        res = value(c1)
        return res
        end
    c1 = word(m.sql.cx.fetchFlds, 1)
    return m.dst.c1
endProcedure sqlFetch2One

/*-- execute a query and return first column of the only row
           if > 1 row fail, if 0 rows return arg(3) or fail ----------*/
sql2One: procedure expose m.
parse arg src, dst, feVa, retOk, retNone
    cx = m.sql_defCurs
    call sqlQuery cx, src, feVa, retOk
    return sqlFetch2One(cx, dst, retNone)
endProcedure sql2One

/*--- describe table and return sqlDA --------------------------------*/
sqlDescribeTable: procedure expose m.
parse upper arg tb, force
    if force == 1 | \ datatype(m.sql.table.tb.sqlD, 'n') then
         call sqlExec 'describe table :tb into :M.SQL.TABLE.'tb
    return 'SQL.TABLE.'tb
endProcedure sqlDescribeTable

/*--- return select column list for table tb
      omit Blobs (blobMax < 0) or substr(blob, 1, blobMax) ----------*/
sqlColList: procedure expose m.
parse arg tb al, blobMax
    sd = sqlDescribeTable(tb)
    bs = ''
    lst = ''
    if al \== '' & right(al, 1) \== '.' then
        al = al'.'
    do sx=1 to m.sd.sqld
        if wordPos(m.sd.sx.sqlType, '404 405 408 409 412 413') < 1 then
            lst = lst',' al || m.sd.sx.sqlName
        else do
            bs = bs m.sd.sx.sqlName
            if blobMax >= 0 then
                lst = lst', length('al || m.sd.sx.sqlName')' ,
                                          m.sd.sx.sqlName'Len' ,
                     || ', substr('al  || m.sd.sx.sqlName ,
                     || ', 1,' blobMax')' m.sd.sx.sqlName
            end
        end
    m.sd.colList = substr(lst, 3)
    m.sd.blobs = strip(bs)
    return substr(lst, 3)
endProcedure sqlColList

/*--- use describe output to generate column names,
        ''         use names from ca (rexxified)
        nms+       use names, check ca for null values
        ?('?'?nm)+ use names, check for null if preceeded by ?
        :...       use string as is
                fetchVariables and sqlNull names ---------------------*/
sqlFetchVars: procedure expose m.
parse arg cx, src, cd
    st = 'SQL.'cx'.COL'
    if abbrev(src, ':') then do
        m.sql.cx.fetchVars = src
        m.sql.cx.fetchCode = cd
        m.sql.cx.fetchFlds = ''
        return
        end
    m.sql.cx.fetchVars = ''
    if abbrev(src, '?') then do
        call err  implement + rxFetchVars ?????? /*
        r = substr(src, 2)
        do wx=1 to words(src)
            cn = word(src, wx)
            if abbrev(cn, '?') then
                call sqlRexxAddVar substr(cn, 2), 0, 1
            else
                call sqlRexxAddVar cn, 0, 0
            end                              ????????????? */
        end
    else if src <> '' then do
        ff = src
        end
    else do
        ff = ''
        do kx=1 to m.sql.cx.d.sqlD
             ff = sqlNiceVarsAdd(ff, m.sql.cx.d.kx.sqlName)
             end
        end
    m.sql.cx.fetchFlds = ff
    if m.sql.cx.d.sqlD <> words(ff) then
        call err 'sqlFetchVars sqlD='m.sql.cx.d.sqlD ,
                '<>' words(ff) 'fields of' ff
    sNu = ''
    sFe = ''
    do kx=1 to m.sql.cx.d.sqlD
        nm = word(ff, kx)
        sFe = sFe', :m.dst.'nm
        if m.sql.cx.d.kx.sqlType // 2 then do
            sFe = sFe' :m.dst.'nm'.sqlInd'
            sNu = sNu 'if m.dst.'nm'.sqlInd < 0 then' ,
                   'm.dst.'nm '= m.sqlNull;'
            end
        end
    m.sql.cx.fetchVars = substr(sFe, 3)
    m.sql.cx.fetchCode = sNu cd
    return
endProcedure sqlFetchVars
/* ????????????
sqlRexxAddVar:
parse arg nm, nicify, hasNulls
     nm = sqlAddVar(st, nm, nicify)
     if \ hasNulls then
          vrs = vrs', :m.dst.'nm
     else do
         vrs = vrs', :m.dst.'nm ':m.dst.'nm'.sqlInd'
         sNu = sNu 'if m.dst.'nm'.sqlInd < 0 then' ,
                    'm.dst.'nm '= m.sqlNull;'
         end
    return
endSubroutine sqlRexxAddVar   ?????? */

sqlNiceVarsAdd: procedure expose m.
parse arg old, nx rest
    upper nx
    cx = verifId(nx)
    if cx > 0 then /* avoid bad characters for classNew| */
        nx = left(nx, cx-1)
    if nx <> '' & wordPos(nx, old) < 1 0 then
        return old nx
    else
        return old  'COL' || (words(old) + 1)
endProcedure sqlNiceVarsAdd

/*--- set one value in a DA, handle nulls ----------------------------*/
sqlDASet: procedure expose m.
parse arg cx, da, ix, val
    m.sql.cx.da.ix.sqlData = val
    m.sql.cx.da.ix.sqlInd = - (val == m.sqlNull)
    /* data types schienen einmal nicht zu funktionieren .......
    if wordPos(m.da.ix.sqlType, '384 385 388 389 392 393') > 0 then
        m.da.ix.sqlType = 448 + (m.da.ix.sqlType // 2) */
    return
endProcedure sqlDASet

sqlCommit: procedure expose m.
parse arg src
     return sqlUpdate(, 'commit')
endProcedure sqlCommit

/*--- execute sql thru the dsnRexx interface -------------------------*/
sqlExec: /* no procedure, to keep variables sql... */
    parse arg ggSqlStmt, ggRetOk
    m.sql_HaHi = ''
    address dsnRexx 'execSql' ggSqlStmt
    /* say 'sqlCode' sqlCode 'rc' rc 'for' ggSqlStmt ggNo */
    if rc = 0 then
        return 0
    interpret sqlErrorHandler(rc, ggRetOk, ggSqlStmt)
    return sqlCode
endProcedure sqlExec

sqlExecMsg: procedure expose m.
parse arg sql
    sc = sqlExec(sql, '*')
    return sqlMsgLine(sc, , sql)

sqlErrorHandler: procedure expose m. ,
                   sqlCode sqlErrMc sqlErrP sqlErrD. sqlWarn. sqlState
parse arg drC, retOk, verb rest
    if drC == 0 then
        return 'return 0'
    if pos('-', retOK) < 1 then
        retOK = retOk m.sql_retOk
    if wordPos(drC, '1 -1') < 1 then do
        eMsg = "'dsnRexx rc="drC"' sqlmsg()"
        end
    else if pos('*', retOK) > 0 | wordPos(sqlCode, retOK) > 0 then do
        if sqlCode < 0 & pos('say', retOK) > 0 then
            return "call outNl errMsg(' }'sqlMsg())"
        else
            return ''
        end
    else do
        upper verb
        if verb == 'DROP' then do
            if (sqlCode == -204 | sqlCode == -458) ,
                           & wordPos('dne', retok) > 0 then
                return 'return' sqlCode
            if sqlCode = -672 & wordPos('rod', retok) > 0 then do
                hahi = m.sql_HaHi || sqlMsgLine(sqlCode,
                                   , 'tb='sqlErrMc ,verb rest)'\n'
                haHi = haHi || sqlExecMsg('alter table' SqlErrMc ,
                        'drop restrict on drop')
                call sqlExec verb rest
                m.sql_HaHi = hahi
                return ''
                end
            end
        if drC < 0 then
            eMsg = "sqlmsg()"
        else if (sqlCode<>0 | sqlWarn.0 ^==' ') & pos('w',retOK)<1 then
            return "call outNl errMsg(' }'sqlMsg()); return" sqlCode
        else
            return ''
        end
    if wordPos('rb', retok) > 0 then
        eMsg = eMsg " || '\n"sqlExecMsg('rollback')"'"
    if wordPos('ret', retok) < 1 then
        return "call err" eMsg
    m.sql_errRet = 1
    return 'call outNl' eMsg
endProcedure sqlErrorHandler

sqlMsgLine: procedure expose m. sqlErrD.
parse arg res, cnt, src, plus
    verb = translate(word(src, 1))
    if datatype(res, 'n') then
        res = 'sqlCode' res
    if cnt \== '' then do
        res = res',' cnt
        vx = wordPos(translate(word(src,1)), 'DELETE INSERT UPDATE')
        if datatype(cnt, 'n') then
            if vx > 0 then
               res = res 'rows' word('deleted inserted updated', vx)
            else if cnt <> 0 then
                res = res 'rows updated'
        end
    if plus \== '' then
        res = res',' plus
    if abbrev(res, ', ') then
        res = substr(res, 3)
    if src \== '' then do
        ll = 75 - length(res)
        aa = strip(src)
        if length(aa) > ll then
            aa = space(aa, 1)
        if length(aa) > ll then
           aa = left(aa,  ll-3)'...'
        res = res':' aa
        end
    return res
endProcedure sqlMsgLine

/*--- send a command to db2 through the TSO dsn processor ------------*/
sqlDsn: procedure expose m.
parse arg st, sys, cmd, rcOk
    x = outtrap('M.'st'.')
    push 'END'
    push cmd
    address tso 'DSN SYSTEM('sys')'
    rr = rc
    x = outtrap(off)
    if rr = 0 | rcOk = '*' | wordPos(rr, rcOk) > 0 then
        return rr
    fl = max(1, m.st.0 - 10)
    em = 'rc' rr 'for DSN SYSTEM('sys') cmd' cmd,
          '\nOuputlines' fl '-' m.st.0':'
    do lx=fl to m.st.0
        em = em '\n' strip(m.st.lx, 't')
        end
    call err em
endProcedure sqlDsn

/*--- issue an sql error message -------------------------------------*/
sqlMsg: /* no procedure, to keep variables sql... */
    if \ dataType(sqlCode, 'n') then do
        ggRes = 'sqlCode' sqlCode 'not numeric\n'sqlCaMsg()
        end
    else do
        ggRes = sqlDsntiar(sql2CA())
        ggWa = sqlMsgWarn()
        if ggWa \= '' then
            ggRes = ggRes'\nwarnings' ggWa
        if m.sqlCAMsg == 1 then
           ggRes = ggRes'\n'sqlCaMsg()'\n'sqlCaMsg(sqlCa2Rx(sqlCa))
        end
    ggSt = 'SQL_HOST'
    ggVa = 'SQL_HOST.VAR'
    ggBe = 'SQL_HOST.BEF'
    call sqlHostVars ggSqlStmt, 12, ggSt
    ggFrom = 'ggSqlStmt'
    ggW1 = translate(word(ggSqlStmt, 1))
    ggW2 = translate(word(ggSqlStmt, 2))
    if ggW1 == 'PREPARE' then
        ggFrom = sqlHostVarFind(ggSt, 'FROM')
    else if ggW1 ggW2 == 'EXECUTE IMMEDIATE' then
        ggFrom = sqlHostVarFind(ggSt, 1)
    ggPos = 0
    if datatype(sqlErrd.5, 'n') & sqlErrd.5 > 0 then do
        ggPos = sqlErrd.5
        ggRes = ggRes || sqlMsgSrcPos(value(ggFrom), sqlErrd.5)
        end
    if ggFrom == 'ggSqlStmt' then do
        ggRes = ggRes'\nsql =' sqlShorten(ggSqlStmt, 2000, ggPos)
        end
    else do
        ggRes = ggRes'\nsql =' sqlShorten(value(ggFrom), 2000, ggPos)
        ggRes = ggRes'\nstmt =' sqlShorten(ggSqlStmt, 2000)
        end
    ggPref = '\nwith'
    do ggXX=1 to m.ggSt.0
        if ggFrom = m.ggVa.ggXX then
            iterate
        ggRes = ggRes || ggPref m.ggBe.ggXX ':'m.ggVa.ggXX ,
                      '=' sqlShorten(value(m.ggVa.ggXX), 210)
        ggPref = '\n    '
        end
    if m.sqlSuMsg == 1 | (m.sqlSuMsg == 2 & m.sql_csmhost \== '') then
        ggRes = ggRes'\nsubsys =' m.sql_dbSys ,
             || ', host =' m.sql_csmhost
    return  ggRes
endSubroutine sqlMsg

sqlShorten: procedure expose m.
parse arg txt, maxL, pos
    if length(txt) <= maxL then
        return txt
    if \ datatype(pos, 'n') | pos < 1 then
        pos = 1
    ex = pos + min(60, maxL%7)
    if ex <= maxL - 4 then
        return left(txt, maxL-4) '...'
    if ex >= length(txt) then
        return left(txt, 67) '...\n'substr(txt, length(txt)-maxL+72)
    else
        return left(txt, 67) '...\n'substr(txt, ex-maxL+76, maxL-75) ,
                       '...'
endProcedure sqlShorten
/*--- use dsnTiar to translate sql Info to error text ----------------*/
sqlDsnTiar: procedure expose m.
parse arg ca
    if -438  = sqlCa2Rx(ca) then
        return '\nSQLCODE = -438:',
           'APPLICATION RAISED ERROR WITH sqlState' sqlState ,
           'and DIAGNOSTIC TEXT:' sqlErrMc
    liLe = 78
    msLe = liLe * 10
    msg = d2c(msLe,2) || left('', msLe)
    len = d2c(liLe, 4)
    ADDRESS LINKPGM "DSNTIAR ca msg len"
    if rc = 0      then nop
    else if rc = 4 then say 'warn linkPgm dsnTiar rc' rc 'sqlCa' ca
    else                call err 'linkPgm dsnTiar rc' rc 'sqlCa' ca
    res = strip(substr(msg, 13, liLe-10))
    cx = pos(', ERROR: ', res)
    if cx > 0 then
        res = left(res, cx-1)':' strip(substr(res, cx+9))
    do c=3+liLe by liLe to msLe while substr(msg, c, 10) = ''
            res = res'\n    'strip(substr(msg, c+10, liLe-10))
        end
    return res
endProcedure sqlDsnTiar

/*--- format all rexx sqlCa fields into a message --------------------*/
sqlCaMsg:
    return 'sqlCode' sqlCode 'sqlState='sqlState                    ,
           '\n    errMC='translate(sqlErrMc, ',', 'ff'x)            ,
           '\n    warnings='sqlWarnCat('+') 'erP='sqlErrP           ,
           '\n    errD.1='sqlErrD.1 '2='sqlErrD.2 '3='sqlErrD.3     ,
           '\n    errD.4='sqlErrD.4 '5='sqlErrD.5 '6='sqlErrD.6
endProcedure sqlCaMsg

/*--- format the sqlCA into the dsnTiar SQLCA ------------------------*/
sql2Ca: procedure expose m. ,
                   sqlCode sqlErrMc sqlErrP sqlErrD. sqlWarn. sqlState
    if \ (datatype(sqlcode, 'n') & datatype(sqlErrD.1, 'n') ,
                                 & datatype(sqlErrD.3, 'n')) then
        return err('sqlCode etc. not numeric\nsqlCa =' sqlCaMsg())
    if digits() < 10 then
        numeric digits 10
    sqlCa = 'SQLCA   ' || d2c(136, 4) || d2c(sqlCode, 4) ,
            || d2c(min(70, length(sqlErrMc)), 2)left(sqlErrMc, 70) ,
            || left(sqlErrP, 8) ,
            || d2c(sqlErrD.1, 4)d2c(sqlErrD.2, 4)d2c(sqlErrD.3, 4) ,
            || d2c(sqlErrD.4, 4)d2c(sqlErrD.5, 4)d2c(sqlErrD.6, 4) ,
            || sqlWarnCat() || sqlState
    if length(sqlCa) <> 136 then
        call err 'sqlCa length' length(sqlCa) 'not 136' ,
                 '\n'sqlCaMsg() '==>'  ca', hex='c2x(ca)
    return sqlCa
endProcedure sql2Ca

/*--- extract the fields from the SqlCA and put it to rexx vars ------*/
sqlCA2Rx: procedure expose m. ,
       sqlCode sqlErrMc sqlErrP sqlErrD. sqlWarn. sqlState
parse arg ca
    numeric digits 10
    if length(ca) < 136 | c2d(substr(ca, 9, 4), 4) <> 136 then
        call err 'bad sqlCa len' length(ca) 'not 136:' ca', hex='c2x(ca)
    sqlCode  = c2d(substr(ca, 13 ,4), 4)
    sqlErrMC = substr(ca, 19, c2d(substr(ca, 17, 2), 2))
    sqlErrP  = substr(ca, 89, 8)
    do ix=1 to 6
        sqlErrD.ix = c2d(substr(ca, 93 + 4 * ix, 4), 4)
        end
    do ix=0 to 10
        sqlWarn.ix = substr(ca, 121 + ix, 1)
        end
    sqlState = substr(ca, 132, 5)
    return sqlCode
endProcedure sqlCA2Rx

/*--- concat the sql warnings with Separator sep --------------------*/
sqlWarnCat: procedure expose m. sqlWarn.
parse arg sep
    return sqlWarn.0 || sep,
        || sqlWarn.1||sqlWarn.2||sqlWarn.3||sqlWarn.4||sqlWarn.5||sep ,
        || sqlWarn.6||sqlWarn.7||sqlWarn.8||sqlWarn.9||sqlWarn.10||sep
endProcedure sqlWarnCat

/*--- make the text for sqlWarnings ----------------------------------*/
sqlMsgWarn: procedure expose m. sqlWarn.
     r = ''
     text =' 1=W var truncated, 1=S scrollable, 1=N nonScrollable,'  ,
            '2=W nulls in aggregate,'                                ,
            '3=W more cols than vars,'                               ,
                             '3=Z more result sets than locators,'   ,
            '4=W no where, 4=D sensitive dynamic, 4=I insensitive,'  ,
                          '4=S sensitive static,'                    ,
            '5=W not valid sql, 5=1 readOnly, 5=2 readDelete,'       ,
                          '5=3 readDeleteUpdate,'                    ,
            '6=W day changed to month range,'                        ,
            '7=W dec digits truncated,'                              ,
            '8=W char substituted,'                                  ,
            '9=W arith excep in count, 9=Z multipe result sets,'     ,
            '10=W char conversion err in ca,'
     do wx = 1 to 10
         w = sqlWarn.wx
         if w = ' ' then
             iterate
         t = wx'='w
         cx = pos(' 'wx'='w' ', text)
         ex = pos(','         , text, cx + 1)
         if cx > 0 & ex > cx then
             r = r substr(text, cx+1, ex-cx)
         else
             r = r wx'='w '?,'
         end
     r = strip(r, 't', ',')
     if r = '' & sqlwarn.0 <> '' then
        call err 'sqlWarn.0='sqlWarn.0 'but all warns empty'
     return r
endProcedure sqlMsgWarn

/*--- show in the source src the point pos  (where error occured)
          a few lines from src around pos and arrow to pos ----------*/
sqlMsgSrcPos: procedure expose m.
parse arg src, pos
    liLe = 68
    liCn = 3
    afLe = 25
    t1 = space(left(src, pos), 1)
    t2 = left(' ', substr(src, pos, 1) == ' ' ,
                 | substr(src, pos+1, 1) == ' ') ,
         || space(substr(src, pos+1), 1)
    afLe = min(afLe, length(t2))
    if length(t1) + afLe > liLe * liCn then
        t1 = '...'right(t1, liLe * liCn - afLe -3)
    else if length(t1)+length(t2) > liLe then
        t1 = left(' ', (liCn * liLe - length(t1) -afLe) // liLe)||t1
    pL = length(t1) // liLe
    if length(t2) <= liLe-pL then
        tx = t1 || t2
    else
        tx = t1 || left(t2, liLe-pL-3)'...'
    res = '\nsrc' strip(substr(tx, 1, liLe), 't')
    do cx=1+liLe by liLe to length(tx)
        res = res || '\n  +' strip(substr(tx, cx, liLe), 't')
        end
    loc = 'pos' pos 'of' length(src)
    if length(loc)+6 < pL then
        return res'\n  >' right('>>>'loc'>>>', pL)
    else
        return res'\n  >' left('', pL-1)'<<<'loc'<<<'
endProcdedure sqlMsgSrcPos

/*--- get the hostVars in the sql in src and the word before ---------*/
sqlHostVars: procedure expose m.
parse arg src, cnt, st
    cx = 1
    sx = 1
    do cnt
        cx = pos(':', src, cx) + 1
        if cx < 2 then
           leave
        if pos(substr(src, cx, 1), m.ut_rxN1) > 0 then
            iterate
        ex = verify(src, m.ut_rxDot, 'n', cx)
        if ex < 1 then
            m.st.var.sx = substr(src, cx)
        else
            m.st.var.sx = substr(src, cx, ex - cx)
        if m.st.var.sx == '' | length(m.st.var.sx) > 100 then
            iterate
                       /* search word before */
        do bE = cx-2 by -1 to 1 ,
                while substr(src, bE, 1) == ' '
            end
        do bB = bE by -1 to max(1, bE-20),
                while pos(substr(src, bB, 1), m.ut_alfa) > 0
            end
        if bB < bE & bB >= 0 then
            m.st.bef.sx = substr(src, bB+1, bE-bB)
        else
            m.st.bef.sx = ''
        sx = sx + 1
        end
    m.st.0 = sx-1
    return sx
endProcedure sqlHostVars

/*--- find the name of hostvar, by index or by before ----------------*/
sqlHostVarFind: procedure expose m.
parse arg st, fnd
    if datatype(fnd, 'n') & fnd <= m.st.0 then
        return m.st.var.fnd
    do ix=1 to m.st.0
        if translate(m.st.bef.ix) = fnd then
            return m.st.var.ix
        end
    return ''
endSubroutine sqlHostVarFind
/* copy SQL end **************************************************/
/* copy err begin *** errorhandling, messages, help    ****************/
errIni: procedure expose m.
    if m.err.ini == 1 then
        return
    m.err.ini     = 1
    m.err.handler = ''
    m.err.cleanup = ';'
    m.err.opt     = ''
    parse source m.err.os .
    m.err.ispf    = 0
    m.err.screen  = 0
    if m.err.os \== 'LINUX' then do
        address tso 'profile MsgId'   /* brauchen wir in tsoAlloc| */
        if sysVar('sysISPF') = 'ACTIVE' then do
            m.err.ispf = 1
            address ispExec 'vget zScreen shared'
            m.err.screen = zScreen
            end
        end
    return
endProcedure errIni

/* configure err -----------------------------------------------------*/
errReset: procedure expose m.
    call errIni
    parse arg m.err.opt, m.err.handler
    if pos('I', translate(m.err.opt)) > 0 & m.err.ispf then
        address ispExec 'control errors return'
    return
endSubroutine errReset

/*--- error routine: abend with message ------------------------------*/
err:
    parse arg ggTxt, ggOpt
    call errIni
    drop err handler cleanup opt call return stackHistory
    if ggOpt == '' & m.err.handler \== '' then
        interpret m.err.handler
    call errSay ggTxt
    call errCleanup
    if ggOpt == '' then
        ggOpt = m.err.opt
    upper ggOpt
    if pos('T', ggOpt) > 0  then do
        trace ?r
        say 'trace ?r in err'
        end
    if pos('H', ggOpt) > 0 & m.err_cat == 'f' then
        x = show + stackHistory + by + bad + arithmetic + conversion
    call errSay ' }errorhandler exiting with exit(12)'
    exit errSetRc(12)
endSubroutine err

/*--- set rc for ispf: -------------------------------------------------
    if a cmd is run by ispStart, its RC is ignored,
         but ISPF passes the value of the shared variable zIspfRc
         back as return code
----------------------------------------------------------------------*/
errSetRc: procedure expose m.
parse arg zIspfRc
    if m.err.ispf then
        address ispExec vput 'zIspfRc' shared
    return zIspfRc
endProcedure errSetRc

/*--- error routine: user message cleanup exit -----------------------*/
errAddCleanup: procedure expose m.
parse arg code
    call errIni
        /* concatenate backwards, then it is executed also backwards */
    m.err.cleanup = ';'code || m.err.cleanup
    return
endProcedure errAddCleanup

errRmCleanup: procedure expose m.
parse arg code
    call errIni
    cx = pos(';'code';', m.err.cleanup)
    if cx > 0 then
        m.err.cleanup = left(m.err.cleanup, cx) ,
                     || substr(m.err.cleanup, cx + length(code)+2)
    return
endProcedure errRmCleanup

errCleanup: procedure expose m.
    call errIni
    errCleanup = m.err.cleanup
    if errCleanup <> ';' then do
        m.err.cleanup = ';'
        say 'err cleanup begin' errCleanup
        interpret errCleanup
        say 'err cleanup end' errCleanup
        end
    if symbol('m.tso_ddAll') == 'VAR' then
        call tsoFree m.tso_ddAll, 1
    return
endProcedure errCleanup

/*--- say an errorMessage msg with pref and linesplits --------------*/
errSay: procedure expose m.
parse arg msg
    return sayNl(errMsg(msg))

/*--- prefix an errormessage with pref,
          split it into lines at \n to stem m.err -------------------*/
errMsg: procedure expose m.
parse arg msg
    m.err_cat = 'f'
    do while substr(msg, 2, 1) == '}'
        parse var msg m.err_cat '}' msg
        end
   if m.err_cat == ' ' | m.err_cat == 'o' then
        return msg
   pTxt = ',fatal error,error,input error,scanErr,warning,onlyMsg,'
   px = pos(','m.err_cat, pTxt)
   if px < 1 then do
       px = 1
       m.err_cat = 'f'
       end
   pre = substr(pTxt, px+1, pos(',', pTxt, px+2)-px-1)
   if m.err_cat == 's' then
       return pre msg
   parse source . . s3 .              /* current rexx */
   return pre 'in' s3':' msg
endProcedure errMsg

splitNL: procedure expose m.
parse arg st, msg
    bx = 1
    do lx=1 to 20
        ex = pos('\n', msg, bx)
        if ex < bx then
            leave
        m.st.lx = substr(msg, bx, ex-bx)
        bx = ex+2
        end
    m.st.lx = substr(msg, bx)
    m.st.0 = lx
    return st
endProcedure splitNL

outNL: procedure expose m.
parse arg msg
    bx = 1
    do lx=1 to 20
        ex = pos('\n', msg, bx)
        if ex < bx then
            leave
        call out substr(msg, bx, ex-bx)
        bx = ex+2
        end
    call out substr(msg, bx)
    return
endProcedure outNL

/*--- say (part of) the lines of a stem ----------------------------*/
sayNl: procedure expose m.
parse arg msg
    bx = 1
    do lx=1 to 20
        ex = pos('\n', msg, bx)
        if ex < bx then
            leave
        say strip(substr(msg, bx, ex-bx), 't')
        bx = ex+2
        end
    say strip(substr(msg, bx), 't')
    return 0
endProcedure sayNl

/*--- say a trace message if m.trace is set --------------------------*/
debug: procedure expose m.
parse arg msg
    if m.debug == 1 then
        say 'debug:' msg
    return
endProcedure debug

/*--- output a trace if m.trace is set -------------------------------*/
trc: procedure expose m.
parse arg msg
    if m.trace == 1 then
        call out 'trc:' msg
    return
endProcedure trc

/*--- assert that the passed rexx expression evaluates to true -------*/
assert:
    interpret 'if ('arg(1)') == 1 then return 1'
    interpret 'call err' quote('assert failed' arg(1) ':' arg(2) '==>'),
                        arg(2)
endProcedure assert

/*--- abend with Message after displaying help -----------------------*/
errHelp: procedure expose m.
parse arg msg
    call errSay 'i}'msg
    call help 0
    call err 'i}'msg
endProcedure errHelp

/*--- display the first comment block of the source as help ----------*/
help: procedure expose m.
parse arg doClear
    if doClear \== 0 then
        address tso 'clear'
    parse source . . s3 .
    say right(' help for rexx' s3, 72, '*')
    do lx=1 while pos('/*', sourceLine(lx)) < 1
        if lx > 10 then
            return err('initial commentblock not found for help')
        end
    doInc = 1
    ho = m.err.helpOpt
    do lx=lx+1 to sourceline() while pos('*/', sourceline(lx)) = 0
        li = strip(sourceLine(lx), 't')
        cx = lastPos('{', li)
        if cx > 0 then do
            if length(ho) = 1 then
                doInc = cx = length(li) | pos(ho, li, cx+1) > 0
            li = left(li, cx-1)
            end
        if doInc then
            say li
        end
    say right(' end help for rexx' s3, 72, '*')
    return 4
endProcedure help

/* copy err end   *****************************************************/
/* copy ut begin  *****************************************************/
utIni: procedure expose m.
    if m.ut_ini == 1 then
        return
    m.ut_ini = 1
    m.ut_digits = '0123456789'
                /* 012345678901234567890123456789 */
    m.ut_alfLC  = 'abcdefghijklmnopqrstuvwxyz'
    m.ut_alfUC  = translate(m.ut_alfLc)
    m.ut_Alfa   = m.ut_alfLc || m.ut_alfUC
    m.ut_alfNum = m.ut_alfa || m.ut_digits
    m.ut_alfDot = m.ut_alfNum || '.'
    m.ut_alfId  = m.ut_alfNum'_' /* avoid rexx allowed @ # $ ¬ . | ? */
    m.ut_alfIdN1 = m.ut_digits    /* not as first character */
    m.ut_rxId   = m.ut_AlfNum'@#$?' /* charset puff mit ¬*/
    m.ut_rxDot  = '.'m.ut_rxId
    m.ut_rxN1   = '.0123456789'
    m.ut_alfPrint = m.ut_alfNum'+-*/=()¢!{}<> .:,;?|''"%&#@$£\_'
    m.ut_base64 = m.ut_alfUC || m.ut_alfLc || m.ut_digits'+-'
    return
endProcedure utIni
/*--- if function  warning all3 arguments get evaluated|
                   e.g if(x=0, 'infinity', 1/0) will fail| -----------*/
if: procedure expose m.
parse arg co, ifTrue, ifFalse
    if co then
        return ifTrue
    else
        return ifFalse
endProcedure if
/*--- embedded ASSignement:
      assign the second argument to the variable with name in first arg
      and return the value assigned ----------------------------------*/
ass:
    call value arg(1), arg(2)
    return arg(2)
/*--- embedded ASSignement return NotNull:
      assign the second argument to the variable with name in first arg
      and return 1 if value not null, 0 if null ----------------------*/
assNN:
    call value arg(1), arg(2)
    return arg(2) \== ''

/*--- return current time and cpu usage ------------------------------*/
utTime: procedure expose m.
    return time() 'ela='time('E') 'cpu='sysvar('syscpu'),
            'su='sysvar('syssrv')

/*--- sleep several seconds ------------------------------------------*/
sleep: procedure expose m.
parse arg secs, sayIt
    if sayit <> 0 then
        say 'sleeping' secs 'secs' time()
    CALL SYSCALLS 'ON'
    ADDRESS SYSCALL "sleep" secs
    CALL SYSCALLS 'OFF'
    if sayit <> 0 then
        say 'slept' secs 'secs' time()
    return
endProcedure sleep

/*--- left without truncation ----------------------------------------*/
lefPad: procedure expose m
parse arg s, len
    if length(strip(s, 't')) >= len then
        return strip(s, 't')
    return left(s, len)
endProcedure lefPad

/*--- right without truncation ---------------------------------------*/
rigPad: procedure expose m
parse arg s, len
    if length(strip(s, 'l')) >= len then
        return strip(s, 'l')
    return right(s, len)
endProcedure rigPad

/*--- quote string txt using quoteChar qu ("" ==> ") -----------------*/
quote: procedure expose m.
parse arg txt, qu
    if qu = '' then
        qu = '"'
    res = qu
    ix = 1
    do forever
        qx = pos(qu, txt, ix)
        if qx = 0 then
            return res || substr(txt, ix) || qu
        res = res || substr(txt, ix, qx-ix) || qu || qu
        ix = qx + length(qu)
        end
endProcedure quote

/*--- translate to lowercase -----------------------------------------*/
ut2lc: procedure expose m.
parse arg s
    return translate(s, m.ut_alfLc, m.ut_alfUc)

/*--- verify an id ---------------------------------------------------*/
verifId: procedure expose m.
    parse arg src, extra
    if pos(left(src, 1), m.ut_alfIdN1) > 0 then
        return 1
    else
        return verify(src, m.ut_alfId || extra, 'n')

/*--- return the count of occurrences of needle in heyStack ----------*/
posCount: procedure expose m.
parse arg needle, hayStack, start, fin
    if start = '' then
        start = 1
    if fin = '' then
        fin = length(hayStack) + 1 - length(needle)
    do cnt = 0 by 1
        start = pos(needle, haystack, start)
        if start < 1 | start > fin then
             return cnt
        start = start + length(needle)
        end
endProcedure posCount

repAll: procedure expose m.
parse arg src
    do ax = 2 by 2 to arg()
        src = repAl2(src, src, arg(ax), arg(ax+1))
        end
    return src
endProcedure repAll

repAl2: procedure expose m.
parse arg src, sPos, old, new
    res = ''
    cx = 1
    do forever
        nx = pos(old, sPos, cx)
        if nx < 1 then
            return res || substr(src, cx)
        res = res || substr(src, cx, nx-cx) || new
        cx = nx + length(old)
        end
endProcedure repAl2

repAllWords: procedure expose m.
parse arg src, w, new
    res = ''
    wx = 0
    cx = 1
    do forever
        wx = wordPos(w, src, wx+1)
        if wx < 1 then
            return res || substr(src, cx)
        nx = wordindex(src, wx)
        res = res || substr(src, cx, nx-cx) || new
        cx = nx + length(w)
        end
endProcedure repAllWords

utc2d: procedure expose m.
parse arg ch
    cx = length(ch) // 3
    if cx = 0 then
        cx = 3
    res = c2d(left(ch, cx))
    do cx=cx+1 by 3 to length(ch)
        res = res * 16777216 + c2d(substr(ch, cx, 3))
        end
    return res

utInter: procedure expose m.
    interpret arg(1)
    return
endProcedure utInter
/* copy ut end ********************************************************/       6
/* copy out begin ******************************************************
    out interface simple with say only
***********************************************************************/
/*--- output a message to the current destination -------------------*/
out: procedure expose m.
parse arg msg
    say msg
    return
endProcedure out
/* copy out end   *****************************************************/
}¢--- A540769.WK.SQL(TECSVXBA) cre=2016-03-18 mod=2016-03-18-13.58.11 A540769 ---
with a as
( --- union of segments and infos for new tables --------------------
  select enStorAr n , right('000' || enSeg, 3) seg
    from bua.txba201 a
    group by enStorAr, enSeg
)
, b as
(
  select *
    from a
    where not exists (select 1
         from  BUA.TXBI003 i
         where i.storageArea_N = a.n
             and i.segment = a.seg
             and i.partNumber = 1
         )
)
, c as
(
  select n, seg
       , case when n <= 999 then right('000' || n, 3)
              when n <= 35657                /*  1296 = 36**2 */
                then substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , (n + 10998) / 1296 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 1296) / 36 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 36) + 1, 1)
         end stoAr
    from b
)
, t as
(
  select c.*, t.dbName db, t.tsName ts, t.creator cr, t.name tb
      from c left join sysibm.sysTables t
        on left(t.name, 8) = 'XB' || c.stoAr || c.seg
)
select '    INCLUDE TABLESPACE ' || db || '.' || ts || ' PARTLEVEL 1'
    from t
    order by 1
;x;
select * from t
    order by db, ts
    with ur
;x;
  select storageArea, storageArea_N, segment, partNumber, stage
      , 'i', LASTHKTS, lastImport
)
, sG (area, n, areaC, seg, pa, stage, sTb, hkTS, laIm, err) as
( --- group numeric Area, seg and pa
  ---       compute alpha area from numeric area -------------------
  select min(area), n
       , case when n <= 999 then right('000' || n, 3)
              when n <= 35657                /*  1296 = 36**2 */
                then substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , (n + 10998) / 1296 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 1296) / 36 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 36) + 1, 1)
         end
       , seg, pa
       , max(stage)
       , max(sTb)
       , max(hkTS)
       , max(laIm)
       , case when sum(case when sTb = 'i' then 1 else 0 end) > 1
                 then ' multiXbi003' else '' end
       ||case when sum(case when sTb = 'a' then 1 else 0 end) > 1
                 then ' multiXba201' else '' end
    from sU
    group by n, seg, pa
)
;x;***************************
with sU (area, n, seg, pa, stage, sTb, hkTS, laIm) as
( --- union of segments and infos for new tables --------------------
  select storageArea, storageArea_N, segment, partNumber, stage
      , 'i', LASTHKTS, lastImport
    from  BUA.TXBI003 R
  union all select '?', enStorAr, right('000' || enSeg, 3), 1, '-a'
      , 'a', cast(null as timestamp), cast(null as timestamp)
    from bua.txba201
)
, sG (area, n, areaC, seg, pa, stage, sTb, hkTS, laIm, err) as
( --- group numeric Area, seg and pa
  ---       compute alpha area from numeric area -------------------
  select min(area), n
       , case when n <= 999 then right('000' || n, 3)
              when n <= 35657                /*  1296 = 36**2 */
                then substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , (n + 10998) / 1296 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 1296) / 36 + 1, 1)
                  || substr('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
                           , mod(n + 10998, 36) + 1, 1)
         end
       , seg, pa
       , max(stage)
       , max(sTb)
       , max(hkTS)
       , max(laIm)
       , case when sum(case when sTb = 'i' then 1 else 0 end) > 1
                 then ' multiXbi003' else '' end
       ||case when sum(case when sTb = 'a' then 1 else 0 end) > 1
                 then ' multiXba201' else '' end
    from sU
    group by n, seg, pa
)
, seg(t8, pa, stage, sTb, hkTs, laIm, err) as
( --- compute t8 = eaDba = 'XB' || area || seg ----------------------
  select 'XB' || areaC || seg
      , smallInt(pa), stage, sTb, hkTs, laIm
      , case when area <> '?' and area <> areaC
                     then ' areaC<>' || area else '' end || err
    from sG
)
, uU (eaDba, db, ts, pa, unl, sTb) as
( --- union of both unload tables -----------------------------------
  select eaDba, substr(earess, 4, 8)
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))
        , partNumber pa, eaRess, 'c'
    from BUA.TXBC021 t
    where EYRESS =  5000 and ESRESS =  0
  union all select eaDba, substr(earess, 4, 8)
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))
        , partNumber pa, eaRess, 's'
    from BUA.TXBC021s t
    where EYRESS =  5000 and ESRESS =  0
)
, uG (eaDba, db, ts, pa, unl, sTb, err) as
( --- group uU -----------------------------------------------------
  select max(eaDba), db, ts, pa, max(unl), max(sTb)
      , case when count(*) <> 1
                 then ' multiUnl-' || min(sTb) || '-' || max(sTb)
             else '' end
    from uU
    group by db, ts, pa
    --- without fetch first or order by we get
    ---  SQLCODE = -171: THE DATA TYPE, LENGTH, OR VALUE OF ARGUMENT
    ---     1 OF INSTR OR LOCATE_IN_STRING IS INVALID   ------------
    fetch first 2147483647 rows only
)
, unl(eaDba, db, ts, pa, unl, pun, sTb, err) as
( --- check unl, derive pun ----------------------------------------
  select eaDba, db, ts, pa
      , value(unl, '')
      , case when unl is null or unl = '' then ''
             when locate_in_string(unl, '.', -1, 2) < 1 then ''
             when substr(unl, locate_in_string(unl, '.', -1, 2) + 1
                            , locate_in_string(unl, '.', -1, 1)
                            - locate_in_string(unl, '.', -1, 2) - 1)
                  <> 'SYSREC' then ''
             else left(unl, locate_in_string(unl, '.', -1, 2) )
                || 'SYSPCH'
             end
      , sTb
      , case when unl is null or unl = '' then ''
             when unl not like 'XB.XB%' then ' unlNotXB.XB%'
             when locate('.', unl, 4) <> 12 then ' unlDbLen'
             when locate('.', unl, 13) not between 14 and 21
                    then ' unlTsLen'
             when locate_in_string(unl, '.', -1, 2) <1 then ' unl<2q'
             when substr(unl, locate_in_string(unl, '.', -1, 2) +1
                            , locate_in_string(unl, '.', -1, 1)
                            - locate_in_string(unl, '.', -1, 2) - 1)
                  <> 'SYSREC' then ' sysrecNotInUnl'
            else ''
        end || err
    from uG
)
, tp (db, ts, pa, t8, err) as
( --- tablePart and tables from db2 catalog -------------------------
  select t.dbName, t.tsName, partition, max(left(t.name, 8))
      , case when max(left(t.name, 8)) <> min(left(t.name, 8))
           then ' multiTables' else '' end
    from sysibm.sysTables t
      join sysibm.sysTablePart p on
         t.dbName = p.dbName and t.tsName = p.tsName
    where t.dbName like 'XB%'
        and t.type not in ('A', 'V')
    group by t.dbName, t.tsName, partition
)
, j2 (db, ts, pa, t8, unl, pun, sTb, err) as
( --- join unl and tp ------------------------------------------------
  select value(tp.db, unl.db)
      , value(tp.ts, unl.ts)
      , value(tp.pa, unl.pa)
      , value(tp.t8, unl.eaDba) eaDba
      , unl.unl
      , unl.pun
      , unl.sTb
      , case when tp.db is null then ' notInDB2' else '' end
      || case when tp.t8 <> unl.eaDba then ' t8<>eaDba=' || unl.eaDba
              else '' end
      || value(unl.err, '') || value(tp.err, '')
    from tp
      full outer join unl
          on tp.db = unl.db and tp.ts = unl.ts and tp.pa = unl.pa
)
--- select count(*), err from j2 group by err;x;
, j3 (db, ts, pa, t8, stage, unl, pun, sTb, hkts, err) as
( --- join segments -------------------------------------------------
  select char(value(j2.db, '-noDB-'), 8)
      , char(value(j2.ts, j2.t8, seg.t8, '-noTsT8-'), 8) --- avoid dups
      , smallInt(value(j2.pa, seg.pa, -99))
      , char(value(j2.t8, seg.t8, '-noT8-'), 8)
      , case when seg.stage is null and j2.ts like '%WWW%' then '-w'
             else value(seg.stage, '-m') end
      , case when seg.stage is null and j2.ts like '%WWW%'
                 then 'XB.MIG.U.' || db || '.' || ts
                     || '.P' || right('0000'|| j2.pa, 5)||'.REC.D15338'
             else value(j2.unl, '') end
      , case when seg.stage is null and j2.ts like '%WWW%'
                 then 'XB.MIG.U.' || db || '.' || ts  || '.PUN.D15338'
             else value(j2.pun, '') end
      , value(seg.sTb, '') || value(j2.sTb, '')
      , value(seg.hkts, '1111-11-11-11.11.11.111111')
      , case when j2.db is null then ' notInDB2' else '' end
        || value(seg.err, '') || value(j2.err, '')
    from j2
      full outer join seg
          on j2.t8 = seg.t8 and j2.pa = seg.pa
)
, j (db, ts, pa, stage, unlTst, unl, pun, sTb, t8, err) as
( --- final values and errors ---------------------------------------
    select db, ts,pa, stage
      , case when stage = '-w' then '2015-12-04-16.00.00.000000'
                  else hkts end
      , unl, pun, sTb, t8
      , strip(case when stage = '-m' then ' notInXbi003,Xba201'
             when stage not in ('RW', 'CL', 'UL', 'DL', '-a', '-w')
                 then ' badStage=' || stage
             when stage in ('UL', 'DL', '-w') and unl = ''
                 then ' noUnload '
             when stage not in ('CL', 'DL', 'UL', '-w') and unl <> ''
                 then ' unloadInBadStage'
             else '' end
      ||case when left(unl, 21) <> left(pun, 21) then ' prefUnl<>Pun'
             else '' end || err)
    from j3
)
select db, ts, pa, stage
      , '1111-11-11-11.11.11.111111'
      , value(sTb, '')
      , unlTst
      , unl
      , '1111-11-11-11.11.11.111111'
      , pun
      , ''
      , err
    from j
}¢--- A540769.WK.SQL(TEL350) cre=2010-02-02 mod=2010-02-02-15.46.43 A540769 ----
select current timestamp from sysibm.sysDummy1
;
delete
    from oa1A.tel350a1
    where EL350001 = '0550021'
;
select current timestamp from sysibm.sysDummy1
;
rollback
;
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 3 for
delete
    from oa1A.tel350a1
    where EL350001 = '0550021'
;
select * from plan_view5a
  --where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
select current timestamp from sysibm.sysDummy1
;
rollback
;
select * from cmnbatch.plan_view5
   where progName = 'YDG130' and queryno in ( 2453, 2454)
    order by applname, progname, queryNo, qblockno, planno
;
x
  SELECT WI10102A,WI10102S,WI10112
     FROM GDB0112.TWI101A1
    WHERE WI10101T = ?
      AND WI10101D = ?
      AND WI10101L = ?
      AND WI10101G IN (?   ,'')
      AND WI10101V IN (?     ,'')
      AND WI10101B IN (?   ,'')
      AND WI10108  =   ?
      AND WI10101I <=  ?
    ORDER BY WI10112 DESC,WI10101I DESC
    FETCH FIRST ROW ONLY
     WITH UR;
explain plan set queryno = 7 for
  SELECT WI10102A,WI10102S,WI10112
     FROM OA1A.TWI101A1
    WHERE WI10101T = ?
      AND WI10101D = ?
      AND WI10101L = ?
      AND WI10101G IN (?   ,'')
      AND WI10101V IN (?     ,'')
      AND WI10101B IN (?   ,'')
      AND WI10108  =   ?
      AND WI10101I <=  ?
    ORDER BY WI10112 DESC,WI10101I DESC
    FETCH FIRST ROW ONLY
     WITH UR;
select * from plan_view5a
  --where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
x
xxx
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 3 for
SELECT   SYMBOLCH,SYMBOLCSFI,SYMBOLISIN,IDSYMBOL_RATING,SCHEME_RATING,
    raTINGDATE,RATINGSTATUSTYPE,WATCHLISTSTATTYPE
FROM oa1t.VVV_XTREQSCANKEY INNER
JOIN oa1t.VVV_IDS_STD814
     ON oa1t.VVV_IDS_STD814.INSTRUMENTID
     = oa1t.VVV_XTREQSCANKEY.TEMP_DBKEY
 --  WHERE oa1t.VVV_XTREQSCANKEY.PARTITION_NUMBER =         8
WITH UR
fOR FETCH ONLY
;
select * from plan_view5a
  --where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
x
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 3 for
select *
    from a540769.vrtsReoTs
    where dbName like 'MF%'
;
select * from plan_view5a
  --where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
x
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 3 for
 -- find the startpoint for a recovery or logDiscontinuity
 with recSta as
   ( select c.*
         from sysibm.syscopy c
         where c.timestamp =
           ( select max(a.timestamp)
                 from sysibm.syscopy a
                 where c.dbName = a.dbName and c.tsName = a.tsName
                     and c.dsNum = a.dsNum
                     and icType in ('F', 'R', 'S', 'W', 'Y')
           )
   )
 select * from recSta
     where dbName like 'D%' and icType <> 'F'
     order by dbName, tsName, dsNum
 ;
 -- find the startpoint for a recovery or logDiscontinuity
explain plan set queryno = 9 for
 with recSta as
   ( select p.dbName db, p.tsName ts, p.partition pa, q.*
         from sysibm.systablepart p
         left join
     (   select c.*
         from sysibm.syscopy c
         where c.timestamp =
           ( select max(a.timestamp)
                 from sysibm.syscopy a
                 where c.dbName = a.dbName and c.tsName = a.tsName
                     and c.dsNum = a.dsNum
                     and icType in ('F', 'R', 'S', 'W', 'Y')
           )
     ) q
     on q.dbName = p.dbName and q.tsName = p.tsName
            and p.partition = q.dsNum
   )
 select * from recSta
     where dbName like 'D%' and icType <> 'F'
     order by dbName, tsName, dsNum
 ;
select * from plan_view5a
  --where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
x
----- query 1532  YXEBV2E,               30.6.09
----- Kumar Sandeep will sequenz  TKS835, TKS833, TKS843, TKS843
-----      seit einem Jahr bind  TKS843, TKS835, TKS833, TKS843
-----
----- 3: partner_*=? in 833 und join : original
explain plan set queryno = 3 for
SELECT 1
FROM oA1P.VKS833A1V V833, oA1P.VKS835A1V V835, oA1P.VKS843A1V V843S,
 oA1P.VKS843A1V V843O
WHERE V833.PARTNER_KEY = ? AND V833.CONTRACT_COLL = ?
AND V833.PARTNER_TYPE = 3 AND V833.PARTNER_KEY = V835.PARTNER_KEY AND
V833.CONTRACT_KEY = V835.CONTRACT_KEY AND V833.PARTNER_TYPE =
V835.PARTNER_TYPE AND V835.ARRANGEMENT_TYPE = ? AND
V835.ARRANGEMENT_ID = ? AND V835.SERVICE_KEY = V843S.TAB_CODE AND
V843S.TAB_ART = 'SERVICE_ID' AND V843O.TAB_ART = 'OTHER_CONDITION' AND
V843O.TAB_CODE = V843S.TAB_TEXT3 AND V843O.BU = ? AND CURRENT DATE
BETWEEN V835.VALID_FROM_DATE AND V835.VALID_TO_DATE FETCH FIRST ROW ONLY
 ;
----- 5: partner_*=? in 835 und join
explain plan set queryno = 5 for
SELECT 1
FROM oA1P.VKS833A1V V833, oA1P.VKS835A1V V835, oA1P.VKS843A1V V843S,
 oA1P.VKS843A1V V843O
WHERE V835.PARTNER_KEY = ? AND V833.CONTRACT_COLL = ?
AND V835.PARTNER_TYPE = 3 AND V833.PARTNER_KEY = V835.PARTNER_KEY AND
V833.CONTRACT_KEY = V835.CONTRACT_KEY AND V833.PARTNER_TYPE =
V835.PARTNER_TYPE AND V835.ARRANGEMENT_TYPE = ? AND
V835.ARRANGEMENT_ID = ? AND V835.SERVICE_KEY = V843S.TAB_CODE AND
V843S.TAB_ART = 'SERVICE_ID' AND V843O.TAB_ART = 'OTHER_CONDITION' AND
V843O.TAB_CODE = V843S.TAB_TEXT3 AND V843O.BU = ? AND CURRENT DATE
BETWEEN V835.VALID_FROM_DATE AND V835.VALID_TO_DATE FETCH FIRST ROW ONLY
 ;
----- 35: partner_*=? in 833 und 835 und join: fake filtering
explain plan set queryno = 35 for
SELECT 1
FROM oA1P.VKS833A1V V833, oA1P.VKS835A1V V835, oA1P.VKS843A1V V843S,
 oA1P.VKS843A1V V843O
WHERE V833.PARTNER_KEY = ? AND V833.CONTRACT_COLL = ?
AND V833.PARTNER_TYPE = 3
and   V835.PARTNER_KEY = ? AND V835.PARTNER_TYPE = 3
AND V833.PARTNER_KEY = V835.PARTNER_KEY AND
V833.CONTRACT_KEY = V835.CONTRACT_KEY AND V833.PARTNER_TYPE =
V835.PARTNER_TYPE AND V835.ARRANGEMENT_TYPE = ? AND
V835.ARRANGEMENT_ID = ? AND V835.SERVICE_KEY = V843S.TAB_CODE AND
V843S.TAB_ART = 'SERVICE_ID' AND V843O.TAB_ART = 'OTHER_CONDITION' AND
V843O.TAB_CODE = V843S.TAB_TEXT3 AND V843O.BU = ? AND CURRENT DATE
BETWEEN V835.VALID_FROM_DATE AND V835.VALID_TO_DATE FETCH FIRST ROW ONLY
 ;
----- 359: partner_*=? in 833 und 835 NO join
explain plan set queryno = 359  for
SELECT 1
FROM oA1P.VKS833A1V V833, oA1P.VKS835A1V V835, oA1P.VKS843A1V V843S,
 oA1P.VKS843A1V V843O
WHERE V833.PARTNER_KEY = ? AND V833.CONTRACT_COLL = ?
AND V833.PARTNER_TYPE = 3
and   V835.PARTNER_KEY = ? AND V835.PARTNER_TYPE = 3
and V833.CONTRACT_KEY = V835.CONTRACT_KEY
AND V835.ARRANGEMENT_TYPE = ? AND
V835.ARRANGEMENT_ID = ? AND V835.SERVICE_KEY = V843S.TAB_CODE AND
V843S.TAB_ART = 'SERVICE_ID' AND V843O.TAB_ART = 'OTHER_CONDITION' AND
V843O.TAB_CODE = V843S.TAB_TEXT3 AND V843O.BU = ? AND CURRENT DATE
BETWEEN V835.VALID_FROM_DATE AND V835.VALID_TO_DATE FETCH FIRST ROW ONLY
 ;
select * from plan_view5a
  --where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
x
select * from CMNbatch.plan_view5
    where queryno between 142 and 147
    and progname = 'YCI017C'
    order by applname, progname, timestamp, queryNo, qblockno, planno
;
x
explain plan set queryno = 111 for
select * from cmnbatch.plan_view5
 -- where progname in ('XBIM33')
    where progname in ('XBIM31', 'XBIM32', 'XBIM33', 'XBIM34' ,
                       'XBIM35', 'XBIM42')
    order by applname, progname, queryNo, qblockno, planno
;
explain plan set queryno = 222 for
select * from cmnbatch.plan_view5ss
 -- where progname in ('XBIM33')
    where progname in ('XBIM31', 'XBIM32', 'XBIM33', 'XBIM34' ,
                       'XBIM35', 'XBIM42')
    order by applname, progname, queryNo, qblockno, planno
;
select * from plan_view5a
    where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
x
set current sqlid = 'A540769';
explain plan set queryno = 111 for
    UPDATE bua.TXBH111
    SET ESSTATE = 3 WHERE EAUUIDMQ IN (SELECT
      EAUUIDMQ FROM bua.TXBH111 WHERE EAUUIDHT = '?' )
;
select * from plan_view5a
    where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
set current sqlId = 'A540769';
delete   from A540769.plan_table
;
explain plan set queryno = 111 for
      select count(*), jobname, max(partition), min(partition)
          from sysibm.syscopy c, sysibm.systablepart p
          where c.dbName = p.dbName and c.tsName = p.tsname
              and c.dsNum in (0, p.partition)
          group by jobName
          order by 1 desc
;
select * from plan_view5a
    where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
xelect *
    from CMNBATCH.plan_view5
    where progName = 'DBWK3'
    order by applname, progname, queryNo, qblockno, planno
;
xelect count(*), auftrags_nummer, pm_id
    from oa1t.vpw210a1V
    group by auftrags_nummer, pm_id
    order by 1 desc
;
--select count(*) from oa1t.TSN100A1
--    with ur
--    ;
select *
    from CMNBATCH.plan_view5
    where progName = 'YPW2KPI' and queryNo = 4235
    order by applname, progname, queryNo, qblockno, planno
;
x
set current sqlid = 'A540769'
;
delete from plan_table where queryno in (111, 222)
;
select current timestamp from sysibm.sysdummy1
;
 explain plan set queryno = 111 for
         SELECT T.* FROM oa1t.VNI600A101A C
               , oa1t.VNI203A101A T
           WHERE T.PERENDDT >= DATE(C.CTRLTIMESTMPFROM)
           AND C.CTRLID = 'NI6220R'
;
select current timestamp from sysibm.sysdummy1
;
select * from plan_view5a
    where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
explain plan set queryno = 222 for
    WITH NI600 (PERENDDT) AS
            (SELECT DATE(C.CTRLTIMESTMPFROM) AS ENDDT
               FROM oa1t.VNI600A101A C
               WHERE C.CTRLID = 'NI6220R'
             )
             SELECT T.* FROM NI600
                   ,oa1t.VNI203A101A T
               WHERE T.PERENDDT >= NI600.PERENDDT
;
select * from plan_view5a
    where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
select * from plan_view5
    where queryno in ( 111, 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback
;
x
select *
    from cmnbatch.plan_view5
    where progName = 'YRPNIMP' and queryNo = 866
    order by applname, progname, queryNo, qblockno, planno
;
x
         d.bType, p.collid, p.Name, p.version,
 p.conToken, p.timeStamp, p.type,
 p.validate, p.isolation, p.valid, p.operative,
 p.owner, p.qualifier
m sysibm.syspackdep d join sysibm.syspackage p
 on p.location = d.dLocation and p.collid = d.dCollid
     and p.name = d.dName and  p.conToken = d.dConToken     2.22.129867'
re
 (bQualifier, bName, bType) in
 (  select dbName, name, 'R'
         from sysIbm.sysTablespace
         where dbName in ('NF01A1A', 'NF02A1A', 'NF03A1A')
 )
     from gdb0283.vnz240a1v
    where    SearchValue01            = ?
          -- dec(SearchValue01,15,3)  = ?
      and CreateDateTime           < ?
      and dec(SearchValue02,15,3) >= ?
      and dec(SearchValue02,15,3) <= ?
      and Objtype                 ^= 'PORDSPLT'
    order by CreateDateTime
    fetch first 101 rows only
    optimize for 101 rows
    with ur
;
select * from plan_view5A
    where queryno = 999
    order by applname, progname, queryNo, qblockno, planno
;
rollback
;
select * from plan_table
    order by applname, progname, queryNo, qblockno, planno
;
rollback
;
}¢--- A540769.WK.SQL(TEL350A) cre=2010-02-02 mod=2010-02-02-15.49.13 A540769 ---
select current timestamp from sysibm.sysDummy1
;
delete
    from oa1A.tel350a1
    where EL350001 = '0550021'
;
select current timestamp from sysibm.sysDummy1
;
}¢--- A540769.WK.SQL(TEMPOBJ) cre=2009-06-23 mod=2009-06-23-15.36.25 A540769 ---
------------------------------------------------------------------------00010037
--  alle temporären Objekte aus dem Db2 Catalog anzeigen        W.Keller00020037
--       d.h. Objekte mit einem '$' irgendwo im Namen           23.06.0900030037
--  durchsuchte ObjektTypen: db, ts, tb, vw, al, ix                     00040037
------------------------------------------------------------------------00050037
with v as                                                               00060028
(                                                                       00070028
select '$' v from sysibm.sysdummy1                                      00080028
)                                                                       00090028
, a (type, name, dbTs, created) as                                      00100035
(                                                                       00110028
select 'db', name, name, createdTS                                      00120032
    from sysibm.sysdatabase, v                                          00130013
    where locate(v, name) > 0                                           00140013
union select 'ts', strip(dbName) || '.' || strip(name),                 00150013
                   strip(dbname) || '.' || strip(name), createdTS       00160033
    from sysibm.systableSpace, v                                        00170013
    where locate(v, name) > 0                                           00180014
union select case      when type = 'T' then 'tb'                        00190028
                       when type = 'A' then 'al'                        00200028
                       when type = 'V' then 'vw'                        00210028
                       else                 't' || type end,            00220028
                   strip(creator) || '.' || strip(name),                00230028
                   strip(dbname) || '.' || strip(tsname), createdTS     00240034
    from sysibm.systables, v                                            00250013
    where (locate(v, name) > 0 or locate(v, creator) > 0)               00260023
union select 'ix', strip(i.creator) || '.' || strip(i.name),            00270021
                   strip(t.dbname) || '.' || strip(t.tsname),           00280031
                   i.createdTS                                          00290032
    from sysibm.sysIndexes i, sysibm.systables t, v                     00300021
    where i.tbCreator = t.creator and i.tbName = t.name and             00310021
    (locate(v, i.name) > 0 or locate(v, i.creator) > 0)                 00320021
)                                                                       00330010
select type "type",  char(left(name, 35), 35) "name",                   00340037
      char(left(dbTs, 17), 17) "db.ts", created "created"               00350037
    from a                                                              00360036
    order by 3                                                          00370030
    with ur                                                             00380038
}¢--- A540769.WK.SQL(TFI027) cre=2010-09-30 mod=2010-12-06-15.19.19 A540769 ----
select count(*)      ,
       TKKEY         ,
       VERFALL
from oa1t.TFI027G1
group by TKKEY         ,
         VERFALL
order by 1 desc
fetch first 100 rows only
;x
with ur
select count(*)      ,
       TKKEY         ,
       VERFALL       ,
       BOERSE        ,
       WHRG          ,
       STATUS        ,
       KURSDATUM
from oa1t.TFI027G1
group by TKKEY         ,
         VERFALL       ,
         BOERSE        ,
         WHRG          ,
         STATUS        ,
         KURSDATUM
order by 1 desc
fetch first 100 rows only
with ur
}¢--- A540769.WK.SQL(TG002) cre=2011-07-18 mod=2011-07-25-11.43.07 A540769 -----
select count(*) FROM OA1T.VTG003A1 ;
select count(*) FROM OA1T.VTG003A1
    WHERE TG_TRANSACTION_ID LIKE 'ACC3%' OR
          TG_TRANSACTION_ID LIKE 'MON3%' OR
          TG_TRANSACTION_ID LIKE 'SEC3%';
DELETE FROM OA1T.VTG003A1
WHERE TG_TRANSACTION_ID LIKE 'ACC3%' OR
      TG_TRANSACTION_ID LIKE 'MON3%' OR
      TG_TRANSACTION_ID LIKE 'SEC3%';
rollback;
;;;
-- DELETE FROM OA1T.VTG002A1
select count(*) FROM OA1T.VTG002A1 ;
select count(*) FROM OA1T.VTG002A1
WHERE TG_TRANSACTION_ID LIKE 'ACC3%' OR
      TG_TRANSACTION_ID LIKE 'MON3%' OR
      TG_TRANSACTION_ID LIKE 'SEC3%';
}¢--- A540769.WK.SQL(TIME) cre=2007-10-02 mod=2007-10-02-11.37.20 F540769 ------
SELECT CURRENT TIMESTAMP, HEX( CURRENT TIMESTAMP)
    FROM SYSIBM.SYSDUMMY1;
}¢--- A540769.WK.SQL(TIMESTAM) cre=2010-06-17 mod=2013-02-28-10.55.24 A540769 ---
select
 timestampDiff( 8, char( timestamp('2013-03-01-00.00.00')
                 - timestamp('2013-02-22-05.35.00')) )
,timestampDiff( 8, char( timestamp('2013-03-01-00.00.00')
                 - timestamp('2013-02-22-05.00.00')) )
from sysibm.sysDummy1;x;
with y (y) as
(select 1997 from sysibm.sysdummy1
 union all select 102 from sysibm.sysdummy1
 union all select y+1 from y where y between 1900 and 2015
 union all select y+1 from y where y between 102 and 111
)
, t as
(
select y, timestamp(strip(char(y)) || '-01-01-00.00.00') t,
          timestamp(strip(char(y-1)) || '-01-01-00.00.00') b
    from y where y > 1900
union all
select y, timestamp('2010-'|| right(varchar(y),2)   ||'-01-00.00.00') t,
          timestamp('2010-'|| right(varchar(y-1),2) ||'-01-00.00.00') b
    from y where y < 300
)
select char(t - b) "char(t-b)",
       timestampdiff(2, char(t - b)) "timestampdiff",
       (days(t)-days(b)) * 86400 "days*86400",
       (days(t)-days(b)) * 86400
         + midnight_seconds(t) -  midnight_seconds(b) "days* midnight",
       days(t)-days(b)         "days(t)-days(b)",
       days(t) "days(t)",
       days(b) "days(b)",
       t.*
    from t
    order by y
}¢--- A540769.WK.SQL(TIMESTT) cre=2012-03-09 mod=2012-03-09-13.17.52 A540769 ---
//A540769E  JOB (CP00,KE50),                                            00010001
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=A540769
//*MAIN CLASS=LOG0 SYSTEM=S13
//S01      EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99                       00020001
//SYSTSIN  DD *
    DSN SYSTEM(DBAF)
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSIN    DD *
select timestamp('2012-02-16-09:25:25.733695')
    from sysibm.sysDummy1;
select timestamp('2012-02-16T09:25:25.733695')
    from sysibm.sysDummy1;
}¢--- A540769.WK.SQL(TNZ242) cre= mod= -----------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBOF (810)     Extract time : 2006-10-23 16:35 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=N AL=N LB=Y CM=Y FK=Y  --
--            TG=N UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=A242A In Database NZ06A1P     --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=NZ06A1P   Stogroup=GSMS (for partition 1)
-- Tablespace=NZ06A1P.A242A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE A242A
    IN NZ06A1P
    USING STOGROUP GSMS
    PRIQTY 360000 SECQTY 28800
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    DSSIZE 4 G
    NUMPARTS 60
     (PART 2 USING STOGROUP GSMS PRIQTY 360000 SECQTY 57600,
      PART 3 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 4 USING STOGROUP GSMS PRIQTY 360000 SECQTY 266400,
      PART 5 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 6 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 7 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 8 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 9 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 10 USING STOGROUP GSMS PRIQTY 198000 SECQTY 10800,
      PART 11 USING STOGROUP GSMS PRIQTY 216000 SECQTY 14400,
      PART 12 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 13 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 14 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 15 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 16 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 17 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 18 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 19 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 20 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 21 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 22 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 23 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 24 USING STOGROUP GSMS PRIQTY 216000 SECQTY 14400,
      PART 25 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 26 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 27 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 28 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 29 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 30 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 31 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 32 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 33 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 34 USING STOGROUP GSMS PRIQTY 216000 SECQTY 14400,
      PART 35 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 36 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 37 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 38 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 39 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 40 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 41 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 42 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 43 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 44 USING STOGROUP GSMS PRIQTY 360000 SECQTY 93600,
      PART 45 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 46 USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 47 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 48 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 49 USING STOGROUP GSMS PRIQTY 360000 SECQTY 93600,
      PART 50 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 51 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 52 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 53 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 54 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 55 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 56 USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 57 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 58 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 59 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 60 USING STOGROUP GSMS PRIQTY 360000 SECQTY 273600
        FREEPAGE 20 PCTFREE 10)
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
------------------------------------------------------------------------
--    Table=OA1P.TNZ242A1 In NZ06A1P.A242A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='OA1P';
--
  CREATE TABLE OA1P.TNZ242A1
     (NZ242001             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242002             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242003             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242004             CHAR(10) FOR SBCS DATA NOT NULL,
      NZ242005             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242006             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242007             CHAR(10) FOR SBCS DATA NOT NULL,
      NZ242008             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242009             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242010             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242011             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242012             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242013             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242014             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242015             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242016             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242017             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242018             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242019             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242020             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242021             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242022             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242023             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242024             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242025             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242026             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242027             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242028             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242029             CHAR(10) FOR SBCS DATA NOT NULL,
      NZ242030             CHAR(26) FOR SBCS DATA NOT NULL,
      NZ242031             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242032             CHAR(1) FOR SBCS DATA NOT NULL,
      NZ242033             VARCHAR(3100) FOR SBCS DATA NOT NULL)
    IN NZ06A1P.A242A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE OA1P.TNZ242A1 IS 'ZV Histo: HistoData';
--
  COMMENT ON OA1P.TNZ242A1
   (NZ242033 IS 'SERIALISIERTE OBJEKTE BZW DER DATENTEIL',
    NZ242032 IS 'SOLL/HABEN IDENTIFIKATION',
    NZ242031 IS 'STRUKTURTYP DES OBJEKTS',
    NZ242030 IS 'TIMESTAMP ERSTELLZEITPUNKT',
    NZ242029 IS 'VERSION DES OBJEKTES BZW. SOFTWARESTAND DER STRUKTUR',
    NZ242028 IS 'BESCHREIBUNG SUCHWERT 10',
    NZ242027 IS 'SUCHWERT 10',
    NZ242026 IS 'BESCHREIBUNG SUCHWERT 09',
    NZ242025 IS 'SUCHWERT 09',
    NZ242024 IS 'BESCHREIBUNG SUCHWERT 08',
    NZ242023 IS 'SUCHWERT 08',
    NZ242022 IS 'BESCHREIBUNG SUCHWERT 07',
    NZ242021 IS 'SUCHWERT 07',
    NZ242020 IS 'BESCHREIBUNG SUCHWERT 06',
    NZ242019 IS 'SUCHWERT 06',
    NZ242018 IS 'BESCHREIBUNG SUCHWERT 05',
    NZ242017 IS 'SUCHWERT 05',
    NZ242016 IS 'BESCHREIBUNG SUCHWERT 04',
    NZ242015 IS 'SUCHWERT 04',
    NZ242014 IS 'BESCHREIBUNG SUCHWERT 03',
    NZ242013 IS 'SUCHWERT 03',
    NZ242012 IS 'BESCHREIBUNG SUCHWERT 02',
    NZ242011 IS 'SUCHWERT 02',
    NZ242010 IS 'BESCHREIBUNG SUCHWERT 01',
    NZ242009 IS 'SUCHWERT 01',
    NZ242008 IS 'OBJEKTTYP',
    NZ242007 IS 'GESCHAEFTSFALLTYP',
    NZ242006 IS 'ID DES STATUSAUSLOESERS ODER BEARBEITUNGSMITTEL',
    NZ242005 IS 'STATUSANGABE',
    NZ242004 IS 'IDENTIFIKATIONSNUMMER',
    NZ242003 IS 'REFERENZNUMMER DES SENDEOBJEKTES',
    NZ242002 IS 'TECHNISCHER IDENTIFIKATIONSSCHLUESSEL UNIQUE',
    NZ242001 IS 'TECHNISCHER SCHLUESSEL ZUM HISTO HEADERTEIL');
--
  LABEL ON OA1P.TNZ242A1
   (NZ242033 IS 'Object',
    NZ242032 IS 'SideType',
    NZ242031 IS 'ObjDescType',
    NZ242030 IS 'CreateDateTime',
    NZ242029 IS 'ObjTypeVersion',
    NZ242028 IS 'SearchType10',
    NZ242027 IS 'SearchValue10',
    NZ242026 IS 'SearchType09',
    NZ242025 IS 'SearchValue09',
    NZ242024 IS 'SearchType08',
    NZ242023 IS 'SearchValue08',
    NZ242022 IS 'SearchType07',
    NZ242021 IS 'SearchValue07',
    NZ242020 IS 'SearchType06',
    NZ242019 IS 'SearchValue06',
    NZ242018 IS 'SearchType05',
    NZ242017 IS 'SearchValue05',
    NZ242016 IS 'SearchType04',
    NZ242015 IS 'SearchValue04',
    NZ242014 IS 'SearchType03',
    NZ242013 IS 'SearchValue03',
    NZ242012 IS 'SearchType02',
    NZ242011 IS 'SearchValue02',
    NZ242010 IS 'SearchType01',
    NZ242009 IS 'SearchValue01',
    NZ242008 IS 'ObjType',
    NZ242007 IS 'GfsType',
    NZ242006 IS 'ProcesserId',
    NZ242005 IS 'ProcessStatus',
    NZ242004 IS 'IdentNumber',
    NZ242003 IS 'RefId',
    NZ242002 IS 'IdentUwi',
    NZ242001 IS 'HeaderUwi');
--
------------------------------------------------------------------------
-- Database=NZ06A1P
--    Index=OA1P.INZ242A1 On OA1P.TNZ242A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.INZ242A1
    ON OA1P.TNZ242A1
     (NZ242001              ASC,
      NZ242003              ASC,
      NZ242004              ASC,
      NZ242005              ASC,
      NZ242006              ASC,
      NZ242007              ASC,
      NZ242008              ASC)
    USING STOGROUP GSMS
    PRIQTY 324000 SECQTY 18000
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
     (PART 1 VALUES(''0002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF'),
      PART 2 VALUES(''0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 3 VALUES(''0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 4 VALUES(''0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 86400,
      PART 5 VALUES(''0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 6 VALUES(''0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 7 VALUES(''001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 8 VALUES(''0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 9 VALUES(''0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 10 VALUES(''0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 11 VALUES(''002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 12 VALUES(''0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 13 VALUES(''0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 14 VALUES(''0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 15 VALUES(''003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 16 VALUES(''0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 17 VALUES(''0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 18 VALUES(''0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 19 VALUES(''004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 20 VALUES(''0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 21 VALUES(''0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 22 VALUES(''0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 23 VALUES(''005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 24 VALUES(''0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 25 VALUES(''0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 26 VALUES(''0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 27 VALUES(''006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 28 VALUES(''0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 29 VALUES(''0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 30 VALUES(''0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 31 VALUES(''007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 32 VALUES(''0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 33 VALUES(''0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 34 VALUES(''0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 35 VALUES(''008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 36 VALUES(''0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 37 VALUES(''0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 38 VALUES(''0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 39 VALUES(''009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 40 VALUES(''00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 41 VALUES(''00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 42 VALUES(''00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 43 VALUES(''00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 44 VALUES(''00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 45 VALUES(''00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 46 VALUES(''00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 47 VALUES(''00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 48 VALUES(''00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 49 VALUES(''00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 50 VALUES(''00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 51 VALUES(''00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 52 VALUES(''00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 53 VALUES(''00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 54 VALUES(''00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 55 VALUES(''00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 56 VALUES(''00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 57 VALUES(''00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 58 VALUES(''00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 59 VALUES(''00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 60 VALUES(''FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 288000)
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES;
--
------------------------------------------------------------------------
--    View=OA1P.VNZ242A1V
------------------------------------------------------------------------
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","GDB0283" ;
--
  CREATE VIEW OA1P.VNZ242A1V(HEADERUWI, IDENTUWI, REFID, IDENTNUMBER,
      PROCESSSTATUS, PROCESSERID, GFSTYPE, OBJTYPE, SEARCHVALUE01,
      SEARCHTYPE01, SEARCHVALUE02, SEARCHTYPE02, SEARCHVALUE03,
      SEARCHTYPE03, SEARCHVALUE04, SEARCHTYPE04, SEARCHVALUE05,
      SEARCHTYPE05, SEARCHVALUE06, SEARCHTYPE06, SEARCHVALUE07,
      SEARCHTYPE07, SEARCHVALUE08, SEARCHTYPE08, SEARCHVALUE09,
      SEARCHTYPE09, SEARCHVALUE10, SEARCHTYPE10, OBJTYPEVERSION,
      CREATEDATETIME, OBJDESCTYPE, SIDETYPE, OBJECT) AS
    SELECT ALL NZ242001, NZ242002, NZ242003, NZ242004, NZ242005,
           NZ242006, NZ242007, NZ242008, NZ242009, NZ242010, NZ242011,
           NZ242012, NZ242013, NZ242014, NZ242015, NZ242016, NZ242017,
           NZ242018, NZ242019, NZ242020, NZ242021, NZ242022, NZ242023,
           NZ242024, NZ242025, NZ242026, NZ242027, NZ242028, NZ242029,
           NZ242030, NZ242031, NZ242032, NZ242033
      FROM OA1P.TNZ242A1 ;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(TNZ242AP) cre=2006-10-24 mod=2006-10-24-10.55.32 F540769 ---
SET CURRENT SQLID = 'S100447';                                          00010000
COMMIT;                                                                 00020000
                                                                        00030000
SET CURRENT SQLID = 'S100447';                                          00040000
COMMIT;                                                                 00050000
                                                                        00060000
-- ALTER PARTITION                                                      00070000
ALTER TABLE A540769.TNZ242A1                                            00080003
      ALTER PARTITION 1                                                 00090000
      ENDING AT (X'0003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00100000
ALTER TABLE A540769.TNZ242A1                                            00110003
      ALTER PARTITION 2                                                 00120000
      ENDING AT (X'0007FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00130000
ALTER TABLE A540769.TNZ242A1                                            00140003
      ALTER PARTITION 3                                                 00150000
      ENDING AT (X'000BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00160000
ALTER TABLE A540769.TNZ242A1                                            00170003
      ALTER PARTITION 4                                                 00180000
      ENDING AT (X'000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00190000
ALTER TABLE A540769.TNZ242A1                                            00200003
      ALTER PARTITION 5                                                 00210000
      ENDING AT (X'0013FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00220000
ALTER TABLE A540769.TNZ242A1                                            00230003
      ALTER PARTITION 6                                                 00240000
      ENDING AT (X'0017FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00250000
ALTER TABLE A540769.TNZ242A1                                            00260003
      ALTER PARTITION 7                                                 00270000
      ENDING AT (X'001BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00280000
COMMIT;                                                                 00290000
ALTER TABLE A540769.TNZ242A1                                            00300003
      ALTER PARTITION 8                                                 00310000
      ENDING AT (X'001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00320000
COMMIT;                                                                 00330000
ALTER TABLE A540769.TNZ242A1                                            00340003
      ALTER PARTITION 9                                                 00350000
      ENDING AT (X'0023FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00360000
COMMIT;                                                                 00370000
ALTER TABLE A540769.TNZ242A1                                            00380003
      ALTER PARTITION 10                                                00390000
      ENDING AT (X'0027FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00400000
COMMIT;                                                                 00410000
ALTER TABLE A540769.TNZ242A1                                            00420003
      ALTER PARTITION 11                                                00430000
      ENDING AT (X'002BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00440000
COMMIT;                                                                 00450000
ALTER TABLE A540769.TNZ242A1                                            00460003
      ALTER PARTITION 12                                                00470000
      ENDING AT (X'002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00480000
COMMIT;                                                                 00490000
ALTER TABLE A540769.TNZ242A1                                            00500003
      ALTER PARTITION 13                                                00510000
      ENDING AT (X'0033FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00520000
COMMIT;                                                                 00530000
ALTER TABLE A540769.TNZ242A1                                            00540003
      ALTER PARTITION 14                                                00550000
      ENDING AT (X'0037FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00560000
COMMIT;                                                                 00570000
ALTER TABLE A540769.TNZ242A1                                            00580003
      ALTER PARTITION 15                                                00590000
      ENDING AT (X'003BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00600000
COMMIT;                                                                 00610000
ALTER TABLE A540769.TNZ242A1                                            00620003
      ALTER PARTITION 16                                                00630000
      ENDING AT (X'003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00640000
COMMIT;                                                                 00650000
ALTER TABLE A540769.TNZ242A1                                            00660003
      ALTER PARTITION 17                                                00670000
      ENDING AT (X'0043FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00680000
COMMIT;                                                                 00690000
ALTER TABLE A540769.TNZ242A1                                            00700003
      ALTER PARTITION 18                                                00710000
      ENDING AT (X'0047FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00720000
COMMIT;                                                                 00730000
ALTER TABLE A540769.TNZ242A1                                            00740003
      ALTER PARTITION 19                                                00750000
      ENDING AT (X'004BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00760000
COMMIT;                                                                 00770000
ALTER TABLE A540769.TNZ242A1                                            00780003
      ALTER PARTITION 20                                                00790000
      ENDING AT (X'004FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00800000
COMMIT;                                                                 00810000
ALTER TABLE A540769.TNZ242A1                                            00820003
      ALTER PARTITION 21                                                00830000
      ENDING AT (X'0053FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00840000
COMMIT;                                                                 00850000
ALTER TABLE A540769.TNZ242A1                                            00860003
      ALTER PARTITION 22                                                00870000
      ENDING AT (X'0057FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00880000
COMMIT;                                                                 00890000
ALTER TABLE A540769.TNZ242A1                                            00900003
      ALTER PARTITION 23                                                00910000
      ENDING AT (X'005BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00920000
COMMIT;                                                                 00930000
ALTER TABLE A540769.TNZ242A1                                            00940003
      ALTER PARTITION 24                                                00950000
      ENDING AT (X'005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            00960000
COMMIT;                                                                 00970000
ALTER TABLE A540769.TNZ242A1                                            00980003
      ALTER PARTITION 25                                                00990000
      ENDING AT (X'0063FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01000000
COMMIT;                                                                 01010000
ALTER TABLE A540769.TNZ242A1                                            01020003
      ALTER PARTITION 26                                                01030000
      ENDING AT (X'0067FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01040000
COMMIT;                                                                 01050000
ALTER TABLE A540769.TNZ242A1                                            01060003
      ALTER PARTITION 27                                                01070000
      ENDING AT (X'006BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01080000
COMMIT;                                                                 01090000
ALTER TABLE A540769.TNZ242A1                                            01100003
      ALTER PARTITION 28                                                01110000
      ENDING AT (X'006FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01120000
COMMIT;                                                                 01130000
ALTER TABLE A540769.TNZ242A1                                            01140003
      ALTER PARTITION 29                                                01150000
      ENDING AT (X'0073FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01160000
COMMIT;                                                                 01170000
ALTER TABLE A540769.TNZ242A1                                            01180003
      ALTER PARTITION 30                                                01190000
      ENDING AT (X'0077FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01200000
COMMIT;                                                                 01210000
ALTER TABLE A540769.TNZ242A1                                            01220003
      ALTER PARTITION 31                                                01230000
      ENDING AT (X'007BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01240000
COMMIT;                                                                 01250000
ALTER TABLE A540769.TNZ242A1                                            01260003
      ALTER PARTITION 32                                                01270000
      ENDING AT (X'007FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01280000
COMMIT;                                                                 01290000
ALTER TABLE A540769.TNZ242A1                                            01300003
      ALTER PARTITION 33                                                01310000
      ENDING AT (X'0083FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01320000
COMMIT;                                                                 01330000
ALTER TABLE A540769.TNZ242A1                                            01340003
      ALTER PARTITION 34                                                01350000
      ENDING AT (X'0087FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01360000
COMMIT;                                                                 01370000
ALTER TABLE A540769.TNZ242A1                                            01380003
      ALTER PARTITION 35                                                01390000
      ENDING AT (X'008BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01400000
COMMIT;                                                                 01410000
ALTER TABLE A540769.TNZ242A1                                            01420003
      ALTER PARTITION 36                                                01430000
      ENDING AT (X'008FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01440000
COMMIT;                                                                 01450000
ALTER TABLE A540769.TNZ242A1                                            01460003
      ALTER PARTITION 37                                                01470000
      ENDING AT (X'0093FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01480000
COMMIT;                                                                 01490000
ALTER TABLE A540769.TNZ242A1                                            01500003
      ALTER PARTITION 38                                                01510000
      ENDING AT (X'0097FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01520000
COMMIT;                                                                 01530000
ALTER TABLE A540769.TNZ242A1                                            01540003
      ALTER PARTITION 39                                                01550000
      ENDING AT (X'009BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01560000
COMMIT;                                                                 01570000
ALTER TABLE A540769.TNZ242A1                                            01580003
      ALTER PARTITION 40                                                01590000
      ENDING AT (X'009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01600000
COMMIT;                                                                 01610000
ALTER TABLE A540769.TNZ242A1                                            01620003
      ALTER PARTITION 41                                                01630000
      ENDING AT (X'00A3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01640000
COMMIT;                                                                 01650000
ALTER TABLE A540769.TNZ242A1                                            01660003
      ALTER PARTITION 42                                                01670000
      ENDING AT (X'00A7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01680000
COMMIT;                                                                 01690000
ALTER TABLE A540769.TNZ242A1                                            01700003
      ALTER PARTITION 43                                                01710000
      ENDING AT (X'00ABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01720000
COMMIT;                                                                 01730000
ALTER TABLE A540769.TNZ242A1                                            01740003
      ALTER PARTITION 44                                                01750000
      ENDING AT (X'00AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01760000
COMMIT;                                                                 01770000
ALTER TABLE A540769.TNZ242A1                                            01780003
      ALTER PARTITION 45                                                01790000
      ENDING AT (X'00B3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01800000
COMMIT;                                                                 01810000
ALTER TABLE A540769.TNZ242A1                                            01820003
      ALTER PARTITION 46                                                01830000
      ENDING AT (X'00B7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01840000
COMMIT;                                                                 01850000
ALTER TABLE A540769.TNZ242A1                                            01860003
      ALTER PARTITION 47                                                01870000
      ENDING AT (X'00BBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01880000
COMMIT;                                                                 01890000
ALTER TABLE A540769.TNZ242A1                                            01900003
      ALTER PARTITION 48                                                01910000
      ENDING AT (X'00BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01920000
COMMIT;                                                                 01930000
ALTER TABLE A540769.TNZ242A1                                            01940003
      ALTER PARTITION 49                                                01950000
      ENDING AT (X'00C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            01960000
COMMIT;                                                                 01970000
ALTER TABLE A540769.TNZ242A1                                            01980003
      ALTER PARTITION 50                                                01990000
      ENDING AT (X'00C7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02000000
COMMIT;                                                                 02010000
ALTER TABLE A540769.TNZ242A1                                            02020003
      ALTER PARTITION 51                                                02030000
      ENDING AT (X'00CBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02040000
COMMIT;                                                                 02050000
ALTER TABLE A540769.TNZ242A1                                            02060003
      ALTER PARTITION 52                                                02070000
      ENDING AT (X'00CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02080000
COMMIT;                                                                 02090000
ALTER TABLE A540769.TNZ242A1                                            02100003
      ALTER PARTITION 53                                                02110000
      ENDING AT (X'00D3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02120000
COMMIT;                                                                 02130000
ALTER TABLE A540769.TNZ242A1                                            02140003
      ALTER PARTITION 54                                                02150000
      ENDING AT (X'00D7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02160000
COMMIT;                                                                 02170000
ALTER TABLE A540769.TNZ242A1                                            02180003
      ALTER PARTITION 55                                                02190000
      ENDING AT (X'00DBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02200000
COMMIT;                                                                 02210000
ALTER TABLE A540769.TNZ242A1                                            02220003
      ALTER PARTITION 56                                                02230000
      ENDING AT (X'00DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02240000
COMMIT;                                                                 02250000
ALTER TABLE A540769.TNZ242A1                                            02260003
      ALTER PARTITION 57                                                02270000
      ENDING AT (X'00E3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02280000
COMMIT;                                                                 02290000
ALTER TABLE A540769.TNZ242A1                                            02300003
      ALTER PARTITION 58                                                02310000
      ENDING AT (X'00E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02320000
COMMIT;                                                                 02330000
ALTER TABLE A540769.TNZ242A1                                            02340003
      ALTER PARTITION 59                                                02350000
      ENDING AT (X'00EBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02360000
COMMIT;                                                                 02370000
ALTER TABLE A540769.TNZ242A1                                            02380003
      ALTER PARTITION 60                                                02390000
      ENDING AT (X'00EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');            02400000
COMMIT;                                                                 02410000
                                                                        02420000
  ALTER TABLE A540769.TNZ242A1                                          02430003
        ADD PARTITION ENDING AT                                         02440002
        (X'00F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');                    02450002
  COMMIT;                                                               02460002
  ALTER TABLE A540769.TNZ242A1                                          02470003
        ADD PARTITION ENDING AT                                         02480002
        (X'00F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');                    02490002
  COMMIT;                                                               02500002
  ALTER TABLE A540769.TNZ242A1                                          02510003
        ADD PARTITION ENDING AT                                         02520002
        (X'00FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');                    02530002
  COMMIT;                                                               02540002
  ALTER TABLE A540769.TNZ242A1                                          02550003
        ADD PARTITION ENDING AT                                         02560002
        (X'00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF');                    02570002
  COMMIT;                                                               02580002
}¢--- A540769.WK.SQL(TNZ242W) cre=2006-10-23 mod=2006-10-23-16.41.11 F540769 ---
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBOF (810)     Extract time : 2006-10-23 16:35 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=N AL=N LB=Y CM=Y FK=Y  --
--            TG=N UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=A242A In Database DA540769    --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DA540769  Stogroup=GSMS (for partition 1)
-- Tablespace=DA540769.A242A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE A242A
    IN DA540769
    USING STOGROUP GSMS
    PRIQTY 360000 SECQTY 28800
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    DSSIZE 4 G
    NUMPARTS 60
     (PART 2 USING STOGROUP GSMS PRIQTY 360000 SECQTY 57600,
      PART 3 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 4 USING STOGROUP GSMS PRIQTY 360000 SECQTY 266400,
      PART 5 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 6 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 7 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 8 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 9 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 10 USING STOGROUP GSMS PRIQTY 198000 SECQTY 10800,
      PART 11 USING STOGROUP GSMS PRIQTY 216000 SECQTY 14400,
      PART 12 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 13 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 14 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 15 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 16 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 17 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 18 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 19 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 20 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 21 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 22 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 23 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 24 USING STOGROUP GSMS PRIQTY 216000 SECQTY 14400,
      PART 25 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 26 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 27 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 28 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 29 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 30 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 31 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 32 USING STOGROUP GSMS PRIQTY 360000 SECQTY 72000,
      PART 33 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 34 USING STOGROUP GSMS PRIQTY 216000 SECQTY 14400,
      PART 35 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 36 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 37 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 38 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 39 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 40 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 41 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 42 USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 43 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 44 USING STOGROUP GSMS PRIQTY 360000 SECQTY 93600,
      PART 45 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 46 USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 47 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 48 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 49 USING STOGROUP GSMS PRIQTY 360000 SECQTY 93600,
      PART 50 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 51 USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 52 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 53 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 54 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 55 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 56 USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 57 USING STOGROUP GSMS PRIQTY 360000 SECQTY 43200,
      PART 58 USING STOGROUP GSMS PRIQTY 360000 SECQTY 100800,
      PART 59 USING STOGROUP GSMS PRIQTY 360000 SECQTY 64800,
      PART 60 USING STOGROUP GSMS PRIQTY 360000 SECQTY 273600
        FREEPAGE 20 PCTFREE 10)
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
------------------------------------------------------------------------
--    Table=A540769.TNZ242A1 In DA540769.A242A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='A540769';
--
  CREATE TABLE A540769.TNZ242A1
     (NZ242001             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242002             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242003             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242004             CHAR(10) FOR SBCS DATA NOT NULL,
      NZ242005             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242006             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242007             CHAR(10) FOR SBCS DATA NOT NULL,
      NZ242008             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242009             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242010             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242011             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242012             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242013             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242014             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242015             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242016             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242017             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242018             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242019             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242020             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242021             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242022             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242023             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242024             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242025             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242026             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242027             CHAR(50) FOR SBCS DATA NOT NULL,
      NZ242028             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242029             CHAR(10) FOR SBCS DATA NOT NULL,
      NZ242030             CHAR(26) FOR SBCS DATA NOT NULL,
      NZ242031             CHAR(20) FOR SBCS DATA NOT NULL,
      NZ242032             CHAR(1) FOR SBCS DATA NOT NULL,
      NZ242033             VARCHAR(3100) FOR SBCS DATA NOT NULL)
    IN DA540769.A242A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE A540769.TNZ242A1 IS 'ZV Histo: HistoData';
--
  COMMENT ON A540769.TNZ242A1
   (NZ242033 IS 'SERIALISIERTE OBJEKTE BZW DER DATENTEIL',
    NZ242032 IS 'SOLL/HABEN IDENTIFIKATION',
    NZ242031 IS 'STRUKTURTYP DES OBJEKTS',
    NZ242030 IS 'TIMESTAMP ERSTELLZEITPUNKT',
    NZ242029 IS 'VERSION DES OBJEKTES BZW. SOFTWARESTAND DER STRUKTUR',
    NZ242028 IS 'BESCHREIBUNG SUCHWERT 10',
    NZ242027 IS 'SUCHWERT 10',
    NZ242026 IS 'BESCHREIBUNG SUCHWERT 09',
    NZ242025 IS 'SUCHWERT 09',
    NZ242024 IS 'BESCHREIBUNG SUCHWERT 08',
    NZ242023 IS 'SUCHWERT 08',
    NZ242022 IS 'BESCHREIBUNG SUCHWERT 07',
    NZ242021 IS 'SUCHWERT 07',
    NZ242020 IS 'BESCHREIBUNG SUCHWERT 06',
    NZ242019 IS 'SUCHWERT 06',
    NZ242018 IS 'BESCHREIBUNG SUCHWERT 05',
    NZ242017 IS 'SUCHWERT 05',
    NZ242016 IS 'BESCHREIBUNG SUCHWERT 04',
    NZ242015 IS 'SUCHWERT 04',
    NZ242014 IS 'BESCHREIBUNG SUCHWERT 03',
    NZ242013 IS 'SUCHWERT 03',
    NZ242012 IS 'BESCHREIBUNG SUCHWERT 02',
    NZ242011 IS 'SUCHWERT 02',
    NZ242010 IS 'BESCHREIBUNG SUCHWERT 01',
    NZ242009 IS 'SUCHWERT 01',
    NZ242008 IS 'OBJEKTTYP',
    NZ242007 IS 'GESCHAEFTSFALLTYP',
    NZ242006 IS 'ID DES STATUSAUSLOESERS ODER BEARBEITUNGSMITTEL',
    NZ242005 IS 'STATUSANGABE',
    NZ242004 IS 'IDENTIFIKATIONSNUMMER',
    NZ242003 IS 'REFERENZNUMMER DES SENDEOBJEKTES',
    NZ242002 IS 'TECHNISCHER IDENTIFIKATIONSSCHLUESSEL UNIQUE',
    NZ242001 IS 'TECHNISCHER SCHLUESSEL ZUM HISTO HEADERTEIL');
--
  LABEL ON A540769.TNZ242A1
   (NZ242033 IS 'Object',
    NZ242032 IS 'SideType',
    NZ242031 IS 'ObjDescType',
    NZ242030 IS 'CreateDateTime',
    NZ242029 IS 'ObjTypeVersion',
    NZ242028 IS 'SearchType10',
    NZ242027 IS 'SearchValue10',
    NZ242026 IS 'SearchType09',
    NZ242025 IS 'SearchValue09',
    NZ242024 IS 'SearchType08',
    NZ242023 IS 'SearchValue08',
    NZ242022 IS 'SearchType07',
    NZ242021 IS 'SearchValue07',
    NZ242020 IS 'SearchType06',
    NZ242019 IS 'SearchValue06',
    NZ242018 IS 'SearchType05',
    NZ242017 IS 'SearchValue05',
    NZ242016 IS 'SearchType04',
    NZ242015 IS 'SearchValue04',
    NZ242014 IS 'SearchType03',
    NZ242013 IS 'SearchValue03',
    NZ242012 IS 'SearchType02',
    NZ242011 IS 'SearchValue02',
    NZ242010 IS 'SearchType01',
    NZ242009 IS 'SearchValue01',
    NZ242008 IS 'ObjType',
    NZ242007 IS 'GfsType',
    NZ242006 IS 'ProcesserId',
    NZ242005 IS 'ProcessStatus',
    NZ242004 IS 'IdentNumber',
    NZ242003 IS 'RefId',
    NZ242002 IS 'IdentUwi',
    NZ242001 IS 'HeaderUwi');
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.INZ242A1 On A540769.TNZ242A1
------------------------------------------------------------------------
--
  CREATE INDEX A540769.INZ242A1
    ON A540769.TNZ242A1
     (NZ242001              ASC,
      NZ242003              ASC,
      NZ242004              ASC,
      NZ242005              ASC,
      NZ242006              ASC,
      NZ242007              ASC,
      NZ242008              ASC)
    USING STOGROUP GSMS
    PRIQTY 324000 SECQTY 18000
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
     (PART 1 VALUES(X'0002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF'),
      PART 2 VALUES(X'0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 3 VALUES(X'0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 4 VALUES(X'0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 86400,
      PART 5 VALUES(X'0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 6 VALUES(X'0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 7 VALUES(X'001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 8 VALUES(X'0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 9 VALUES(X'0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 10 VALUES(X'0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 11 VALUES(X'002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 12 VALUES(X'0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 13 VALUES(X'0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 14 VALUES(X'0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 15 VALUES(X'003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 16 VALUES(X'0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 17 VALUES(X'0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 18 VALUES(X'0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 19 VALUES(X'004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 20 VALUES(X'0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 21 VALUES(X'0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 22 VALUES(X'0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 23 VALUES(X'005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 24 VALUES(X'0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 25 VALUES(X'0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 26 VALUES(X'0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 27 VALUES(X'006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 28 VALUES(X'0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 29 VALUES(X'0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 30 VALUES(X'0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 31 VALUES(X'007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 32 VALUES(X'0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 33 VALUES(X'0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 720 SECQTY 7200,
      PART 34 VALUES(X'0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 35 VALUES(X'008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 36 VALUES(X'0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 37 VALUES(X'0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 38 VALUES(X'0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 39 VALUES(X'009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 40 VALUES(X'00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 41 VALUES(X'00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 42 VALUES(X'00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 43 VALUES(X'00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 44 VALUES(X'00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 45 VALUES(X'00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 46 VALUES(X'00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 47 VALUES(X'00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 48 VALUES(X'00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 49 VALUES(X'00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 50 VALUES(X'00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 28800,
      PART 51 VALUES(X'00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 52 VALUES(X'00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 252000 SECQTY 14400,
      PART 53 VALUES(X'00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 54 VALUES(X'00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 55 VALUES(X'00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 56 VALUES(X'00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 18000,
      PART 57 VALUES(X'00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 58 VALUES(X'00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 25200,
      PART 59 VALUES(X'00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 21600,
      PART 60 VALUES(X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
        USING STOGROUP GSMS PRIQTY 360000 SECQTY 288000)
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES;
--
------------------------------------------------------------------------
--    View=A540769.VNZ242A1V
------------------------------------------------------------------------
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","GDB0283" ;
--
  CREATE VIEW A540769.VNZ242A1V(HEADERUWI, IDENTUWI, REFID, IDENTNUMBER,
      PROCESSSTATUS, PROCESSERID, GFSTYPE, OBJTYPE, SEARCHVALUE01,
      SEARCHTYPE01, SEARCHVALUE02, SEARCHTYPE02, SEARCHVALUE03,
      SEARCHTYPE03, SEARCHVALUE04, SEARCHTYPE04, SEARCHVALUE05,
      SEARCHTYPE05, SEARCHVALUE06, SEARCHTYPE06, SEARCHVALUE07,
      SEARCHTYPE07, SEARCHVALUE08, SEARCHTYPE08, SEARCHVALUE09,
      SEARCHTYPE09, SEARCHVALUE10, SEARCHTYPE10, OBJTYPEVERSION,
      CREATEDATETIME, OBJDESCTYPE, SIDETYPE, OBJECT) AS
    SELECT ALL NZ242001, NZ242002, NZ242003, NZ242004, NZ242005,
           NZ242006, NZ242007, NZ242008, NZ242009, NZ242010, NZ242011,
           NZ242012, NZ242013, NZ242014, NZ242015, NZ242016, NZ242017,
           NZ242018, NZ242019, NZ242020, NZ242021, NZ242022, NZ242023,
           NZ242024, NZ242025, NZ242026, NZ242027, NZ242028, NZ242029,
           NZ242030, NZ242031, NZ242032, NZ242033
      FROM A540769.TNZ242A1 ;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(TOP100) cre=2014-05-09 mod=2014-05-09-14.09.49 A540769 ----
-- top 100 Packages mit Vergleich der letzten 12 Monate im RZ2
--   pro Monat: Rangm, cpu, chf
set current path oa1p;
with m (mon, pos) as
(
    select trunc_Timestamp(current timestamp, 'month') - 1 month
           , 1 from sysibm.sysDummy1
    union all select mon - 1 month, pos + 1
           from m where pos < 12
)
, p1 as
(
select rzDb, programName, trunc_timestamp(begin, 'month') mon
    , len
    , CPUTCBPKG
    , ( select i.price from pbSu.tacct_price i
          where i.kind = 'chfSu'
            and i.begin <= p.begin
            and i.end   >  p.begin) * suTcbPkg chf
    from pbSu.tacct_program p
    where cal = 'onlPik/4'
      and begin >= trunc_Timestamp(current timestamp, 'month')-12 month
      and begin <  trunc_Timestamp(current timestamp, 'month')
)
, p2 as
(
select rzDb, programName, mon
    , sum(len) len
    , sum(CPUTCBPKG) CPUTCBPKG
    , sum(chf) chf
    from p1
    group by rzDb, programName, mon
)
, p3 as
(
  select rzDb, programName, mon
     , case when programName = '*' then -1
            else rank() over (partition by mon
                     , case when programName = '*' then 0 else 1 end
                     order by chf desc)
       end rang
     , CPUTCBPKG
     , chf
    from p2
)
, t1 as
(
  select mon, max(len) len
      from p2
      where programName = '*'
      group by mon
)
, t as
(
  select t1.*, m.pos
      from t1 join m on t1.mon = m.mon
)
, p (rzDb, programName, mon, pos, rang, cpuSec, chf) as
(
  select p3.rzDb, p3.programName, p3.mon, t.pos
     , smallint(rang)
     , char(dec(p3.cpuTcbPkg / t.len, 5, 3))
    , int(round(chf, 0))
    from p3 join t on p3.mon = t.mon
  union all select '', '', mon, pos, smallint(-9)
    , substr(to_char(mon, 'mon yy'), 1, 6)
    , int(0)
    from m
)
select p01.rzDb "rzDb", p01.programName "program"
       , p01.rang "rang1", p01.cpuSec "cpu  1", p01.chf "chf  1"
       , p02.rang "rang2", p02.cpuSec "cpu  2", p02.chf "chf  2"
       , p03.rang "rang3", p03.cpuSec "cpu  3", p03.chf "chf  3"
       , p04.rang "rang4", p04.cpuSec "cpu  4", p04.chf "chf  4"
       , p05.rang "rang5", p05.cpuSec "cpu  5", p05.chf "chf  5"
       , p06.rang "rang6", p06.cpuSec "cpu  6", p06.chf "chf  6"
       , p07.rang "rang7", p07.cpuSec "cpu  7", p07.chf "chf  7"
       , p08.rang "rang8", p08.cpuSec "cpu  8", p08.chf "chf  8"
       , p09.rang "rang9", p09.cpuSec "cpu  9", p09.chf "chf  9"
       , p10.rang "ran10", p10.cpuSec "cpu 10", p10.chf "chf 10"
       , p11.rang "ran11", p11.cpuSec "cpu 11", p11.chf "chf 11"
       , p12.rang "ran12", p12.cpuSec "cpu 12", p12.chf "chf 12"
    from p p01
    left join p p02 on p02.pos = 2 and p02.rzDb = p01.rzDb
                                 and p02.programName = p01.programName
    left join p p03 on p03.pos = 3 and p03.rzDb = p01.rzDb
                                 and p03.programName = p01.programName
    left join p p04 on p04.pos = 4 and p04.rzDb = p01.rzDb
                                 and p04.programName = p01.programName
    left join p p05 on p05.pos = 5 and p05.rzDb = p01.rzDb
                                 and p05.programName = p01.programName
    left join p p06 on p06.pos = 6 and p06.rzDb = p01.rzDb
                                 and p06.programName = p01.programName
    left join p p07 on p07.pos = 7 and p07.rzDb = p01.rzDb
                                 and p07.programName = p01.programName
    left join p p08 on p08.pos = 8 and p08.rzDb = p01.rzDb
                                 and p08.programName = p01.programName
    left join p p09 on p09.pos = 9 and p09.rzDb = p01.rzDb
                                 and p09.programName = p01.programName
    left join p p10 on p10.pos =10 and p10.rzDb = p01.rzDb
                                 and p10.programName = p01.programName
    left join p p11 on p11.pos =11 and p11.rzDb = p01.rzDb
                                 and p11.programName = p01.programName
    left join p p12 on p12.pos =12 and p12.rzDb = p01.rzDb
                                 and p12.programName = p01.programName
    where p01.pos = 1
      and p01.programName in ('', '*', 'YXCWDOC')
    order by p01.rang
}¢--- A540769.WK.SQL(TQZ05CMD) cre=2014-09-15 mod=2014-09-15-11.49.13 A540769 ---
select count(*), rz, dbSys
    from oa1p.tqz050cmd
    where tst > current timestamp - 1 month
    group by rz, dbsys
}¢--- A540769.WK.SQL(TRIGGER) cre=2010-07-28 mod=2010-07-28-15.10.42 A540769 ---
set current SQLID='S100447';                                            00010000
drop TRIGGER GDB0351.VFI027A1_INS;                                      00020013
CREATE TRIGGER GDB0351.VFI027A1_INS INSTEAD OF INSERT ON                00030034
GDB0351.VFI027A1                                                        00040034
REFERENCING NEW_table AS n FOR EACH row       MODE DB2SQL               00050034
begin atomic                                                            00060034
--#SET TERMINATOR ?                                                     00070026
INSERT INTO gdb0351.TFI027A1                                            00080033
     select                          n.TKKEY                            00090033
                                    ,n.BOERSE                           00100033
                                    ,n.WHRG                             00110033
                                    ,n.KURSDATUM                        00120033
                                    ,n.TK_KURSTYP                       00130033
                                    ,n.TK_ZUSATZ                        00140033
                                    ,n.GENERATION                       00150033
                                    ,n.MUT_TIMESTAMP                    00160033
                                    ,n.CS_KA_NUM                        00170033
                                    ,n.SETT_CODE                        00180033
                                    ,n.KURS_LIEFERUNG                   00190033
                                    ,n.KURS_UMRECHNUNG                  00200033
                                    ,n.WHR_UMR                          00210033
                                    ,n.MENGE                            00220033
                                    ,n.BOERSE_TK                        00230033
                                    ,n.ERSTELLUNG                       00240033
                                    ,n.FLAG_P                           00250033
                                    ,n.STATUS                           00260033
                                    ,n.GUELTIG_VON                      00270033
                                    ,n.QUELLE                           00280033
                                    ,n.LOG_EINTRAG                      00290033
                                    ,n.INSTRAD                          00300033
                                    ,n.MUT_STAT                         00310033
                                    ,n.KS_BPL_ST                        00320033
                                    ,n.KS_BPL_HT                        00330033
                                    ,n.KS_BPL_KS                        00340033
                                    ,n.KS_ALT_KS                        00350033
                                    ,n.KS_BPL_HA                        00360033
                                    ,n.KS_AIS_SP                        00370033
                                    ,n.KS_BPL_IN                        00380033
                                    ,n.KS_BPL_SP                        00390033
                                    ,n.VERFALL                          00400033
                                    ,n.rowid                            00410033
             from n where tkkey < 1000000                               00420033
;                                                                       00430033
INSERT INTO F383353.TFI027B1                                            00440033
   select                            n.TKKEY                            00450033
                                    ,n.TKKEY                            00460033
                                    ,n.BOERSE                           00470033
                                    ,n.WHRG                             00480033
                                    ,n.KURSDATUM                        00490033
                                    ,n.TK_KURSTYP                       00500033
                                    ,n.TK_ZUSATZ                        00510033
                                    ,n.GENERATION                       00520033
                                    ,n.MUT_TIMESTAMP                    00530033
                                    ,n.CS_KA_NUM                        00540033
                                    ,n.SETT_CODE                        00550033
                                    ,n.KURS_LIEFERUNG                   00560033
                                    ,n.KURS_UMRECHNUNG                  00570033
                                    ,n.WHR_UMR                          00580033
                                    ,n.MENGE                            00590033
                                    ,n.BOERSE_TK                        00600033
                                    ,n.ERSTELLUNG                       00610033
                                    ,n.FLAG_P                           00620033
                                    ,n.STATUS                           00630033
                                    ,n.GUELTIG_VON                      00640033
                                    ,n.QUELLE                           00650033
                                    ,n.LOG_EINTRAG                      00660033
                                    ,n.INSTRAD                          00670033
                                    ,n.MUT_STAT                         00680033
                                    ,n.KS_BPL_ST                        00690033
                                    ,n.KS_BPL_HT                        00700033
                                    ,n.KS_BPL_KS                        00710033
                                    ,n.KS_ALT_KS                        00720033
                                    ,n.KS_BPL_HA                        00730033
                                    ,n.KS_AIS_SP                        00740033
                                    ,n.KS_BPL_IN                        00750033
                                    ,n.KS_BPL_SP                        00760033
                                    ,n.VERFALL                          00770033
             from n where tkkey between 1000000 and 1999999             00780033
;                                                                       00790033
END                                                                     00800033
?                                                                       00810033
--#SET TERMINATOR ;                                                     00820033
commit;                                                                 00830033
;x;                                                                     00840033
                                                                        00850033
alle andere Versuche funktionieren nicht|                               00860033
if und case statements sind nicht erlaubt                               00870033
select ... insert innerhalb case ist auch nicht erlaubt ......          00880033
                                                                        00890033
;x;                                                                     00900033
--#SET TERMINATOR ?                                                     00910033
CREATE TRIGGER GDB0351.VFI027A1_INS INSTEAD OF INSERT ON                00920033
GDB0351.VFI027A1                                                        00930033
REFERENCING NEW AS n FOR EACH ROW MODE DB2SQL                           00940033
begin atomic                                                            00950033
INSERT INTO gdb0351.TFI027A1 VALUES (n.TKKEY                            00960033
                                    ,n.BOERSE                           00970033
                                    ,n.WHRG                             00980033
                                    ,n.KURSDATUM                        00990033
                                    ,n.TK_KURSTYP                       01000033
                                    ,n.TK_ZUSATZ                        01010033
                                    ,n.GENERATION                       01020033
                                    ,n.MUT_TIMESTAMP                    01030033
                                    ,n.CS_KA_NUM                        01040033
                                    ,n.SETT_CODE                        01050033
                                    ,n.KURS_LIEFERUNG                   01060033
                                    ,n.KURS_UMRECHNUNG                  01070033
                                    ,n.WHR_UMR                          01080033
                                    ,n.MENGE                            01090033
                                    ,n.BOERSE_TK                        01100033
                                    ,n.ERSTELLUNG                       01110033
                                    ,n.FLAG_P                           01120033
                                    ,n.STATUS                           01130033
                                    ,n.GUELTIG_VON                      01140033
                                    ,n.QUELLE                           01150033
                                    ,n.LOG_EINTRAG                      01160033
                                    ,n.INSTRAD                          01170033
                                    ,n.MUT_STAT                         01180033
                                    ,n.KS_BPL_ST                        01190033
                                    ,n.KS_BPL_HT                        01200033
                                    ,n.KS_BPL_KS                        01210033
                                    ,n.KS_ALT_KS                        01220033
                                    ,n.KS_BPL_HA                        01230033
                                    ,n.KS_AIS_SP                        01240033
                                    ,n.KS_BPL_IN                        01250033
                                    ,n.KS_BPL_SP                        01260033
                                    ,n.VERFALL                          01270033
                                    ,n.rowid);                          01280033
INSERT INTO F383353.TFI027B1 VALUES (n.TKKEY                            01290033
                                    ,n.TKKEY                            01300033
                                    ,n.BOERSE                           01310033
                                    ,n.WHRG                             01320033
                                    ,n.KURSDATUM                        01330033
                                    ,n.TK_KURSTYP                       01340033
                                    ,n.TK_ZUSATZ                        01350033
                                    ,n.GENERATION                       01360033
                                    ,n.MUT_TIMESTAMP                    01370033
                                    ,n.CS_KA_NUM                        01380033
                                    ,n.SETT_CODE                        01390033
                                    ,n.KURS_LIEFERUNG                   01400033
                                    ,n.KURS_UMRECHNUNG                  01410033
                                    ,n.WHR_UMR                          01420033
                                    ,n.MENGE                            01430033
                                    ,n.BOERSE_TK                        01440033
                                    ,n.ERSTELLUNG                       01450033
                                    ,n.FLAG_P                           01460033
                                    ,n.STATUS                           01470033
                                    ,n.GUELTIG_VON                      01480033
                                    ,n.QUELLE                           01490033
                                    ,n.LOG_EINTRAG                      01500033
                                    ,n.INSTRAD                          01510033
                                    ,n.MUT_STAT                         01520033
                                    ,n.KS_BPL_ST                        01530033
                                    ,n.KS_BPL_HT                        01540033
                                    ,n.KS_BPL_KS                        01550033
                                    ,n.KS_ALT_KS                        01560033
                                    ,n.KS_BPL_HA                        01570033
                                    ,n.KS_AIS_SP                        01580033
                                    ,n.KS_BPL_IN                        01590033
                                    ,n.KS_BPL_SP                        01600033
                                    ,n.VERFALL                          01610033
                                    );                                  01620033
END                                                                     01630033
?                                                                       01640033
--#SET TERMINATOR ;                                                     01650033
CREATE TRIGGER GDB0351.VFI027A1_INS INSTEAD OF INSERT ON                01660026
GDB0351.VFI027A1                                                        01670026
REFERENCING NEW       AS n FOR EACH row       MODE DB2SQL               01680026
begin atomic                                                            01690026
values ( (                                                              01700032
--( --case                                                              01710030
  --  when n.tkkey < 1000000 then                                       01720029
        select 'a' from final table                                     01730030
          ( INSERT INTO gdb0351.TFI027A1 VALUES (n.TKKEY                01740027
                                    ,n.BOERSE                           01750027
                                    ,n.WHRG                             01760027
                                    ,n.KURSDATUM                        01770027
                                    ,n.TK_KURSTYP                       01780027
                                    ,n.TK_ZUSATZ                        01790027
                                    ,n.GENERATION                       01800027
                                    ,n.MUT_TIMESTAMP                    01810027
                                    ,n.CS_KA_NUM                        01820027
                                    ,n.SETT_CODE                        01830027
                                    ,n.KURS_LIEFERUNG                   01840027
                                    ,n.KURS_UMRECHNUNG                  01850027
                                    ,n.WHR_UMR                          01860027
                                    ,n.MENGE                            01870027
                                    ,n.BOERSE_TK                        01880027
                                    ,n.ERSTELLUNG                       01890027
                                    ,n.FLAG_P                           01900027
                                    ,n.STATUS                           01910027
                                    ,n.GUELTIG_VON                      01920027
                                    ,n.QUELLE                           01930027
                                    ,n.LOG_EINTRAG                      01940027
                                    ,n.INSTRAD                          01950027
                                    ,n.MUT_STAT                         01960027
                                    ,n.KS_BPL_ST                        01970027
                                    ,n.KS_BPL_HT                        01980027
                                    ,n.KS_BPL_KS                        01990027
                                    ,n.KS_ALT_KS                        02000027
                                    ,n.KS_BPL_HA                        02010027
                                    ,n.KS_AIS_SP                        02020027
                                    ,n.KS_BPL_IN                        02030027
                                    ,n.KS_BPL_SP                        02040027
                                    ,n.VERFALL                          02050027
                                    ,n.rowid                            02060028
                                    )                                   02070028
  ))      ) ;                                                           02080032
  --  )                                                                 02090030
 -- when n.tkkey between 1000000 and 1999999 then 'b'                   02100029
--end                                                                   02110029
--) ;                                                                   02120031
end                                                                     02130028
? ? x?                                                                  02140028
}¢--- A540769.WK.SQL(TR01002) cre=2007-03-26 mod=2007-03-26-12.15.19 F540769 ---
select * from oa1t.ttr009a1                                             00010001
    where tr00906 = 000000100759                                        00020000
;                                                                       00030000
}¢--- A540769.WK.SQL(TSLARGE) cre=2006-08-28 mod=2006-08-28-15.51.44 F540769 ---
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBAF (810)     Extract time : 2006-08-28 15:42 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=A019A In Database DA540769    --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DA540769   Stogroup=GSMS
-- Tablespace=DA540769.A019A
------------------------------------------------------------------------
--
--drop   TABLESPACE DA540769  .   A019A;
  commit;
  CREATE TABLESPACE A019A
    IN DA540769
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 720000
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    DSSIZE 64G
    NUMPARTS 2
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
------------------------------------------------------------------------
--    Table=A540769.TWK019A In DA540769.A019A
------------------------------------------------------------------------
--
  CREATE TABLE A540769.TWK019A
     (WK019CH20            CHAR(20) FOR SBCS DATA WITH DEFAULT NULL,
      WK019CH4             CHAR(4) FOR SBCS DATA WITH DEFAULT NULL,
      WK019CH2             TIMESTAMP WITH DEFAULT NULL,
      WK019TST             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL)
    IN DA540769.A019A
    partition by(wk019ch4)
    (
       partition 1 ending ('XX') ,
       partition 2 ending ('99')
    )
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IWK019A0 On A540769.TWK019A
------------------------------------------------------------------------
--
  CREATE INDEX A540769.IWK019A0
    ON A540769.TWK019A
     (WK019CH20             ASC)
    USING STOGROUP GSMS
    PRIQTY 12 SECQTY 12
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
--CREATE ALIAS A540769X.TWK019A FOR A540769.TWK019A ;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(TST) cre=2011-03-01 mod=2011-10-21-09.51.44 A540769 -------
SELECT  HEX(left(V2, 20)), v2 FROM                                      00000114
    A540769.twk600a001                                                  00000214
    fetch first 5 rows only                                             00000314
;;                                                                      00000414
select current timestamp, hex(current timestamp)                        00001013
     from sysibm.sysDummy1                                              00001113
;;;                                                                     00001213
with t0 (a, e) as                                                       00001303
(                                                                       00001403
select                                                                  00001503
  '2011-09-13-09.10.11.121314', '2011-09-13-09.10.12.778899'            00001603
    from sysibm.sysDummy1                                               00001703
union all select                                                        00001803
  '2011-09-13-09.10.11.121314', '2011-09-13-10.11.13.010203'            00001903
    from sysibm.sysDummy1                                               00002003
union all select                                                        00002107
  '2011-08-13-09.10.11.121314', '2011-09-13-10.11.13.010203'            00002207
    from sysibm.sysDummy1                                               00002307
union all select                                                        00002412
  '2010-12-31-23.48.59.987651', '2011-01-01-02.13.14.567899'            00002512
    from sysibm.sysDummy1                                               00002612
), t (a, e) as                                                          00002703
(                                                                       00002804
select timestamp(a), timestamp(e)                                       00002903
    from t0                                                             00003003
)                                                                       00003103
select                                                                  00003205
    (days(e) - days(a)) * 86400                                         00003305
    + midnight_seconds(e) - midnight_seconds(a)                         00003405
    + 0.000001 * (microsecond(e) - microsecond(a))                      00003506
    , t.*                                                               00004005
    from t                                                              00005005
;                                                                       00006005
select timestamp(x'c100000000000000'),                                  00010002
       timestamp(x'C767BA9E5EA00000')                                   00011002
    from sysibm.sysDummy1                                               00020000
select days('2011-09-13'), days('2010-09-13'), days('2012-09-13')       00030012
    from sysibm.sysDummy1                                               00040012
;;,                                                                     00050012
}¢--- A540769.WK.SQL(TT) cre=2007-10-22 mod=2015-07-11-18.18.44 A540769 --------
SELECT *
    FROM SYSIBM.SYSVIEWDEP
    WHERE dName = 'VQZ040BIND'
;
select count(*), dbid, obid
    from sysibm.sysTables
    where type in ('T', 'M')
    group by dbid,obid
    order by 1 desc
    fetch first 10 row only
    with ur;;;
select * from gdb9998.twk401a;x;
lock table  A540769.twk600a005 in exclusive mode;
select count(*) from
     A540769.twk600a005
     where part = 3
     with ur
;;;
set current sqlid = 'S100447';
alter sequence A540769.SEQDNW5KHJU1PNK restart;
rollback;
alter tablespace DB2TS.QRMCZ01S secQty  -1;
alter tablespace DSNADMDB.DSNADMTS secQty  -1;
alter tablespace DSNATPDB.DSNATPTS secQty  -1;
alter tablespace DSNHMDB.DSNHMTS secQty  -1;
alter tablespace DSNRLST.DSNRLST0 secQty  -1;
alter tablespace DSNXSR.SYSXSR secQty  -1;
}¢--- A540769.WK.SQL(TTT) cre=2006-11-24 mod=2013-09-04-13.53.52 A540769 -------
SET CURRENT SQLID = 'S100447';
ALTER TABLE OA1A.TFI610A1
  ADD PARTITION
   ENDING ( 114000000 ) ;
ALTER TABLE OA1A.TFI610A1
  ADD PARTITION
   ENDING ( 115000000 ) ;
COMMIT
;
X; ECT * FROM GDB9998.TWK403P1             ;
SELECT ID FROM GDB9998.TWK403P1 ORDER BY ID;
SELECT NAME FROM GDB9998.TWK403P1 ORDER BY ID, NAME;
;X:
SELECT STRIP(TBCREATOR) || '.' || STRIP(TBNAME)
    FROM SYSIBM.SYSCOLUMNS
    WHERE NAME =  'ASSETCLASS01DERIVED'
;X;
  SELECT COLLID, COUNT(*)
   FROM SYSIBM.SYSPACKAGE
   GROUP BY COLLID
   ;X;
  DROP TABLESPACE DGDB9998.VDPS425;
  COMMIT;
--****************************************
--DROP TABLE GDB9998.XTREQSCANKEY;
--COMMIT;
--****************************************
  SET CURRENT SQLID='GDB9998';

  CREATE TABLESPACE VDPS425
      IN DGDB9998
      USING STOGROUP GSMS
      PRIQTY 12 SECQTY 7200
      FREEPAGE 50 PCTFREE 5
      GBPCACHE CHANGED
      TRACKMOD YES
      DSSIZE 16 G
      NUMPARTS 2
      BUFFERPOOL BP2
      LOCKSIZE PAGE
      LOCKMAX SYSTEM
      CLOSE YES
      COMPRESS YES
      CCSID        EBCDIC
      DEFINE NO
      MAXROWS 255
      ;
  COMMIT;

  CREATE TABLE GDB9998.XTREQSCANKEY
    (
     PARTITION_NUMBER      INTEGER  NOT NULL,
     TEMP_DBKEY            INTEGER  NOT NULL,
     OUT_IDSYMBOL_2        CHAR(30) WITH DEFAULT NULL,
     OUT_IDSYMBOL_3        CHAR(30) WITH DEFAULT NULL,
     STATUS_FLAG           SMALLINT WITH DEFAULT NULL,
     IS_ACTIVE             SMALLINT WITH DEFAULT NULL,
     CREATETIMESTAMP       VARCHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
     UPDATETIMESTAMP       VARCHAR(30) FOR SBCS DATA WITH DEFAULT NULL
    )
    IN    DGDB9998.VDPS425
    PARTITION BY (PARTITION_NUMBER ASC)
                    (  PART  1 VALUES (1),
                       PART  2 VALUES (2)
                     )

    AUDIT NONE
    DATA  CAPTURE NONE
    CCSID EBCDIC
    NOT   VOLATILE;

    COMMIT;

--CREATE INDEX GDB9998.XTXREQSCANKEY0
--  ON GDB9998.XTREQSCANKEY
--   (PARTITION_NUMBER      ASC)
--  PARTITIONED
--  USING STOGROUP GSMS
--  PRIQTY -1 SECQTY -1
--  FREEPAGE 0 PCTFREE 10
--  GBPCACHE CHANGED
--  CLUSTER
--  BUFFERPOOL BP1
--  CLOSE YES
--  COPY NO
--  DEFINE YES;
--
--COMMIT;
--
--CREATE INDEX GDB9998.XTXREQSCANKEY1
--  ON GDB9998.XTREQSCANKEY
--   (TEMP_DBKEY            ASC)
--  USING STOGROUP GSMS
--  PRIQTY -1 SECQTY -1
--  ERASE  NO
--  FREEPAGE 10 PCTFREE 10
--  GBPCACHE CHANGED
--  NOT CLUSTER
--  BUFFERPOOL BP1
--  CLOSE YES
--  COPY NO
--  DEFINE YES
--  PIECESIZE 2 G;
--
--COMMIT;
}¢--- A540769.WK.SQL(TTTT) cre= mod= -------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBAF (810)     Extract time : 2007-03-13 13:13 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=S002A01T In Database DGOWM301 --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DGOWM301   Stogroup=G001
-- Tablespace=DGOWM301.S002A01T
------------------------------------------------------------------------
--
  CREATE TABLESPACE S002A01T
    IN DGOWM301
    USING STOGROUP G001
    PRIQTY 12 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD YES
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS NO
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=GOWM301.TWL002A101T In DGOWM301.S002A01T
------------------------------------------------------------------------
--
  CREATE TABLE GOWM301.TWL002A101T
     (WL00201              CHAR(4) FOR SBCS DATA NOT NULL,
      WL00202              CHAR(11) FOR SBCS DATA NOT NULL,
      WL00203              CHAR(4) FOR SBCS DATA NOT NULL,
      WL00204T             CHAR(4) FOR SBCS DATA NOT NULL,
      WL00204D             CHAR(8) FOR SBCS DATA NOT NULL,
      WL00204L             CHAR(5) FOR SBCS DATA NOT NULL,
      WL00204R             CHAR(1) FOR SBCS DATA NOT NULL,
      WL00204I             CHAR(2) FOR SBCS DATA NOT NULL,
      WL00205              CHAR(4) FOR SBCS DATA NOT NULL,
      WL00206              CHAR(4) FOR SBCS DATA NOT NULL,
      WL00207              CHAR(7) FOR SBCS DATA NOT NULL,
      WL00202U             CHAR(4) FOR SBCS DATA NOT NULL,
      WL00206U             CHAR(4) FOR SBCS DATA NOT NULL,
      WL00208              CHAR(7) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      PRIMARY KEY (WL00201,
                   WL00202,
                   WL00203,
                   WL00204T,
                   WL00204D,
                   WL00204L,
                   WL00204R,
                   WL00204I))
    IN DGOWM301.S002A01T
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE GOWM301.TWL002A101T IS 'am Geschäft beteiligte OE';
--
  LABEL ON GOWM301.TWL002A101T
   (WL00208 IS 'PID',
    WL00206U IS 'Reserve',
    WL00202U IS 'BUID zu KEY zur OE',
    WL00207 IS 'Instrad_zur_OE',
    WL00206 IS 'BKST_zur_OE',
    WL00205 IS 'Art/Typ des Keys zur OE',
    WL00204I IS 'Interne Auftragslaufnummer',
    WL00204R IS 'Reserve (Auftrags-Nummer)',
    WL00204L IS 'Laufnummer',
    WL00204D IS 'Datum (JJJJMMTT)',
    WL00204T IS 'Auftrag: Terminalnummer',
    WL00203 IS 'Rolle der OE',
    WL00202 IS 'Key zur Organisationseinheit',
    WL00201 IS 'Periode');
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGOWM301
--    Index=GOWM301.IWL002A001T On GOWM301.TWL002A101T
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX GOWM301.IWL002A001T
    ON GOWM301.TWL002A101T
     (WL00201               ASC,
      WL00202               ASC,
      WL00203               ASC,
      WL00204T              ASC,
      WL00204D              ASC,
      WL00204L              ASC,
      WL00204R              ASC,
      WL00204I              ASC)
    USING STOGROUP G001
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGOWM301
--    Index=GOWM301.IWL002A101T On GOWM301.TWL002A101T
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX GOWM301.IWL002A101T
    ON GOWM301.TWL002A101T
     (WL00204T              ASC,
      WL00204D              ASC,
      WL00204L              ASC,
      WL00204R              ASC,
      WL00204I              ASC,
      WL00203               ASC)
    USING STOGROUP G001
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGOWM301
--    Index=GOWM301.IWL002A201T On GOWM301.TWL002A101T
------------------------------------------------------------------------
--
  CREATE INDEX GOWM301.IWL002A201T
    ON GOWM301.TWL002A101T
     (WL00201               ASC,
      WL00203               ASC,
      WL00206               ASC,
      WL00207               ASC)
    USING STOGROUP G001
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGOWM301
--    Index=GOWM301.IWL002A301T On GOWM301.TWL002A101T
------------------------------------------------------------------------
--
  CREATE INDEX GOWM301.IWL002A301T
    ON GOWM301.TWL002A101T
     (WL00201               ASC,
      WL00203               ASC,
      WL00207               ASC)
    USING STOGROUP G001
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=GOWM301.VWL002A101TV
------------------------------------------------------------------------
--
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","GOWM301" ;
--
  CREATE VIEW GOWM301.VWL002A101TV("Periode", "Key_zur_Orgeinheit",
      "Rolle_der_OE", "Terminal_Nr", "Datum", "Laufnummer", "Reserve",
      "Int_Auftr_Lnr", "Art_Typ_Key_zur_OE", "BKST_zur_OE",
      "Instrad_zur_OE", "BUID_Key_OE", "Reserve_Char4", PID) AS
    SELECT ALL GOWM301.TWL002A101T.WL00201,
           GOWM301.TWL002A101T.WL00202, GOWM301.TWL002A101T.WL00203,
           GOWM301.TWL002A101T.WL00204T, GOWM301.TWL002A101T.WL00204D,
           GOWM301.TWL002A101T.WL00204L, GOWM301.TWL002A101T.WL00204R,
           GOWM301.TWL002A101T.WL00204I, GOWM301.TWL002A101T.WL00205,
           GOWM301.TWL002A101T.WL00206, GOWM301.TWL002A101T.WL00207,
           GOWM301.TWL002A101T.WL00202U, GOWM301.TWL002A101T.WL00206U,
           GOWM301.TWL002A101T.WL00208
      FROM GOWM301.TWL002A101T ;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(TT1) cre= mod= --------------------------------------------
W105      3518    10030 20051109 PVR.FT.WA4.W1050002.D2005313.T1124070
*         3518    10030 20051109 PVR.FT.WA4.W1050002.D2005313.T1124070 133910
W587        69       69 20051109 PVR.FT.WB1.W5870003.D2005313.T1137247
*           69       69 20051109 PVR.FT.WB1.W5870003.D2005313.T1137247 1242
W587        69       69 20051109 PVR.FT.WB1.W5870003.D2005313.T1142062
*           69       69 20051109 PVR.FT.WB1.W5870003.D2005313.T1142062 1242
}¢--- A540769.WK.SQL(TUNEDDL) cre=2012-05-31 mod=2012-07-24-11.41.59 A540769 ---
set current path oa1p;
set current sqlid = 'S100447';
drop   tablespace dA540769.pkgWeek;
drop   tablespace dA540769.aTune;
drop   tablespace dA540769.aTuneWee;
drop   tablespace dA540769.aTunePea;
commit;
CREATE tablespace aTune
  IN dA540769
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  FREEPAGE 10 PCTFREE 5
  GBPCACHE CHANGED
  TRACKMOD YES
  not LOGGED
  BUFFERPOOL BP2
  LOCKSIZE ANY
  LOCKMAX SYSTEM
  CLOSE YES
  COMPRESS YES
  CCSID      EBCDIC
  DEFINE YES
  MAXROWS 255;
create table A540769.tTune
(
    tune char(20) not null,
    from date not null,
    to   date not null,
    desc char(100) not null
) in dA540769.aTune
;
create table A540769.tTunePgm
(
    tune char(20) not null,
    pgm char(8)
) in dA540769.aTune
;
CREATE tablespace aTuneWee
  IN dA540769
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  FREEPAGE 10 PCTFREE 5
  GBPCACHE CHANGED
  TRACKMOD YES
  not LOGGED
  BUFFERPOOL BP2
  LOCKSIZE ANY
  LOCKMAX SYSTEM
  CLOSE YES
  COMPRESS YES
  CCSID      EBCDIC
  DEFINE YES
  MAXROWS 255;
create table A540769.tTuneWeek as
(
select
       date(trunc_timestamp(timestamp, 'ww')) timestamp,
       int(sum(OCCURRENCES ))   occ,
       sum(SQL_STMTS_ISSUED)   stmts,
       sum(CLASS7_CPU_TOTAL) c7cpu,
       sum(CLASS7_SU_CPU) c7su,
       sum(CLASS7_ELAPSED)   c7ela,
       substr(PCK_ID, 1, 8) pkg,
       min(substr(PCK_COLLECTION_ID, 1, 8)) collMin ,
       max(substr(PCK_COLLECTION_ID, 1, 8)) collMax ,
       count(distinct trunc_timestamp(timestamp, 'ddd')) dayCnt
    from rz2dd.tacct_program
    where   subsystem_id like 'DOF%'
        and timestamp >= trunc_timestamp('2012-03-01-00.00.00', 'ww')
   --   and  dayofweek_iso(timestamp) <= 5
   --   and  hour(timestamp) between 9 and 11
    group by
       trunc_timestamp(timestamp, 'ww'), PCK_id
) with no data
  in dA540769.aTuneWee
;
set current sqlid = 'S100447';
CREATE unique INDEX A5407690.ITuneWeek0
  ON A540769.TTuneWeek
   (pkg, timestamp)
  USING STOGROUP GSMS
  FREEPAGE 10 PCTFREE 10
  CLUSTER
  BUFFERPOOL BP1
  close yes
;
CREATE tablespace aTunePea
  IN dA540769
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  FREEPAGE 10 PCTFREE 5
  GBPCACHE CHANGED
  TRACKMOD YES
  not LOGGED
  BUFFERPOOL BP2
  LOCKSIZE ANY
  LOCKMAX SYSTEM
  CLOSE YES
  COMPRESS YES
  CCSID      EBCDIC
  DEFINE YES
  MAXROWS 255;
create table A540769.tTunePeak as
(
select
       date(trunc_timestamp(timestamp, 'ww')) timestamp,
       int(sum(OCCURRENCES ))   occ,
       sum(SQL_STMTS_ISSUED)   stmts,
       sum(CLASS7_CPU_TOTAL) c7cpu,
       sum(CLASS7_SU_CPU) c7su,
       sum(CLASS7_ELAPSED)   c7ela,
       substr(PCK_ID, 1, 8) pkg,
       min(substr(PCK_COLLECTION_ID, 1, 8)) collMin ,
       max(substr(PCK_COLLECTION_ID, 1, 8)) collMax ,
       count(distinct trunc_timestamp(timestamp, 'hh')) hhCnt
    from rz2hh.tacct_program
    where   subsystem_id like 'DOF%'
        and timestamp >= trunc_timestamp('2012-03-01-00.00.00', 'ww')
        and  dayofweek_iso(timestamp) <= 5
        and  hour(timestamp) between 9 and 11
    group by
       trunc_timestamp(timestamp, 'ww'), PCK_id
) with no data
  in dA540769.aTunePea
;
set current sqlid = 'S100447';
CREATE unique INDEX A5407690.ITunePeak0
  ON A540769.tTunePeak
   (pkg, timestamp)
  USING STOGROUP GSMS
  FREEPAGE 10 PCTFREE 10
  CLUSTER
  BUFFERPOOL BP1
  close yes
;
commit
;
}¢--- A540769.WK.SQL(TUNELOAD) cre=2012-05-31 mod=2012-07-24-12.21.51 A540769 ---
//A540769W JOB (CP00,KE50),'LOADWEEK',                                  00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//*MAIN CLASS=LOG0                                                      00040001
//S1       EXEC PGM=DSNUTILB,PARM='DBOC,A540769W.LOADWE'                00020001
//SYSMAP   DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSERR   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL  DD DSN=DBOC.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
EXEC SQL
     DECLARE CUR1 CURSOR FOR
SELECT
       DATE(TRUNC_TIMESTAMP(TIMESTAMP, 'WW')) TIMESTAMP,
       INT(SUM(OCCURRENCES ))   OCC,
       SUM(SQL_STMTS_ISSUED)   STMTS,
       SUM(CLASS7_CPU_TOTAL) C7CPU,
       SUM(CLASS7_SU_CPU) C7SU,
       SUM(CLASS7_ELAPSED)   C7ELA,
       SUBSTR(PCK_ID, 1, 8) PKG,
       MIN(SUBSTR(PCK_COLLECTION_ID, 1, 8)) COLLMIN ,
       MAX(SUBSTR(PCK_COLLECTION_ID, 1, 8)) COLLMAX ,
       COUNT(DISTINCT TRUNC_TIMESTAMP(TIMESTAMP, 'DDD')) DAYCNT
    FROM RZ2DD.TACCT_PROGRAM
    WHERE   SUBSYSTEM_ID LIKE 'DOF%'
        AND TIMESTAMP >= TRUNC_TIMESTAMP('2012-06-01-00.00.00','WW')
    GROUP BY
       TRUNC_TIMESTAMP(TIMESTAMP, 'WW'), SUBSTR(PCK_ID, 1, 8)
ENDEXEC
LOAD DATA INCURSOR CUR1  LOG NO  RESUME NO REPLACE
     COPYDDN(TCOPYS) STATISTICS INDEX(ALL KEYCARD)
 SORTDEVT DISK
 WORKDDN(TSYUTS,TSOUTS)
 INTO TABLE  A540769.TTUNEWEEK
//A540769P JOB (CP00,KE50),'LOADPEAK',                                  00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//*MAIN CLASS=LOG0                                                      00040001
//S1       EXEC PGM=DSNUTILB,PARM='DBOC,A540769P.LOADPE'                00020001
//SYSMAP   DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSERR   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL  DD DSN=DBOC.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
EXEC SQL
     DECLARE CUR1 CURSOR FOR
SELECT
       DATE(TRUNC_TIMESTAMP(TIMESTAMP, 'WW')) TIMESTAMP,
       INT(SUM(OCCURRENCES ))   OCC,
       SUM(SQL_STMTS_ISSUED)   STMTS,
       SUM(CLASS7_CPU_TOTAL) C7CPU,
       SUM(CLASS7_SU_CPU) C7SU,
       SUM(CLASS7_ELAPSED)   C7ELA,
       SUBSTR(PCK_ID, 1, 8) PKG,
       MIN(SUBSTR(PCK_COLLECTION_ID, 1, 8)) COLLMIN ,
       MAX(SUBSTR(PCK_COLLECTION_ID, 1, 8)) COLLMAX ,
       COUNT(DISTINCT TRUNC_TIMESTAMP(TIMESTAMP, 'HH')) HHCNT
    FROM RZ2HH.TACCT_PROGRAM
    WHERE   SUBSYSTEM_ID LIKE 'DOF%'
        AND TIMESTAMP >= TRUNC_TIMESTAMP('2012-03-01-00.00.00', 'WW')
        AND  DAYOFWEEK_ISO(TIMESTAMP) <= 5
        AND  HOUR(TIMESTAMP) BETWEEN 9 AND 11
    GROUP BY
       TRUNC_TIMESTAMP(TIMESTAMP, 'WW'), PCK_ID
ENDEXEC
LOAD DATA INCURSOR CUR1  LOG NO  RESUME NO REPLACE
     COPYDDN(TCOPYS) STATISTICS INDEX(ALL KEYCARD)
 SORTDEVT DISK
 WORKDDN(TSYUTS,TSOUTS)
 INTO TABLE  A540769.TTUNEWEEK
}¢--- A540769.WK.SQL(TV) cre=2008-04-30 mod=2008-04-30-06.23.35 F540769 --------
  CREATE VIEW S100447.VrtsReoTSException AS
      SELECT PRIO, db, ts,
          PARTVON, PARTBIS, GUVON, GUBIS,
          reorg, unclust, farindref, nearindref, extents, reorgdays,
          inserts, updates, deletes,
          inserttimestamp, remark,
          CASE WHEN POSSTR(DB,  '*') > 0
               THEN POSSTR(DB,  '*') - 1 ELSE 8 END DBLEN,
          CASE WHEN POSSTR(TS,  '*') > 0
               THEN POSSTR(TS,  '*') - 1 ELSE 8 END TSLEN,
          char(RIGHT('0' || STRIP(CHAR(PRIO)), 2)
              || strip(DB) || case when POSSTR(DB, '*') > 0
                                   then '' else '=' end
              || strip(ts) || case when POSSTR(ts, '*') > 0
                                   then '' else '=' end
              || right('0000' || strip(char(partVon)), 4)
              || '.' || translate('34679A', char(GUVON, ISO),
                                                   '123456789A')
              , 31) KEY
      FROM S100447.TrtsReoTSException ;
    commit;
  COMMENT ON table S100447.VrtsReoTSException
    IS 'diese Tabelle enthaelt die Default-Schwellwerte und die TS mit s
peziellen Schwellwerten für RTS-Reorgs.'
;
  LABEL ON S100447.VrtsReoTSException
    ( PRIO                is 'Prioritaet: tiefste=0=Default' ,
      DB                  is 'Datenbank Name'                ,
      TS                  is 'TableSpace Name'               ,
      TSLEN               is 'Laenge Datenbank Name'         ,
      PARTVON             is 'Partition von'  ,
      PARTBIS             is 'Partition bis'  ,
      GUVON               is 'Gueltig von'                   ,
      GUBIS               is 'Gueltig bis'                   ,
      REORG               is 'ALWAYS,NEVER,THRESHOLD'        ,
      UNCLUST             is 'Schwellwert unclustered %'     ,
      FARINDREF           is 'SchwWe overflow far (>16 pg) %',
      NEARINDREF          is 'SchwWe overflow near(<16 pg) %',
      EXTENTS             is 'SchwWe Extents pro TS/Part'    ,
      REORGDAYS           is 'Schwellwert Anzahl Tage'       ,
      INSERTS             is 'Schwellwert inserts %'         ,
      UPDATES             is 'Schwellwert updates %'         ,
      DELETES             is 'Schwellwert deletes %'         ,
      INSERTTIMESTAMP     is 'Erstellungs Zeitpunkt'         ,
      REMARK              is 'Begründung (Freitext)'         ,
      DBLEN               is 'Laenge Datenbank Name'         ,
      TSLEN               is 'Laenge Datenbank Name'         ,
      KEY                 is 'eindeutiger Schluessel'
    ) ;

}¢--- A540769.WK.SQL(TVV) cre=2008-04-30 mod=2008-04-30-06.26.45 F540769 -------
  CREATE VIEW S100447.VRTSREOIXException AS
      SELECT PRIO, db, ts, ix,
          PARTVON, PARTBIS, GUVON, GUBIS,
          reorg, pageSplits, extents, reorgdays,
          inserts, deletes, pseudoDel,
          inserttimestamp, remark,
          CASE WHEN POSSTR(DB,  '*') > 0
               THEN POSSTR(DB,  '*') - 1 ELSE 8 END DBLEN,
          CASE WHEN POSSTR(TS,  '*') > 0
               THEN POSSTR(TS,  '*') - 1 ELSE 8 END TSLEN,
          CASE WHEN POSSTR(IX,  '*') > 0
               THEN POSSTR(IX,  '*') - 1 ELSE 20 END IXLEN,
          char(RIGHT('0' || STRIP(CHAR(PRIO)), 2)
              || strip(DB) || case when POSSTR(DB, '*') > 0
                                   then '' else '=' end
              || strip(ts) || case when POSSTR(ts, '*') > 0
                                   then '' else '=' end
              || strip(ix) || case when POSSTR(ix, '*') > 0
                                   then '' else '=' end
              || right('0000' || strip(char(partVon)), 4)
              || '.' || translate('34679A', char(GUVON, ISO),
                                                   '123456789A')
              , 52) KEY
      FROM S100447.TRTSREOIXException ;
    commit;
  COMMENT ON table S100447.VRTSREOIXException
    IS 'diese Tabelle enthaelt die Default-Schwellwerte und die Indexe m
it speziellen Schwellwerten für RTS-Reorgs.'
;
  LABEL ON S100447.VRTSREOIXException
    ( PRIO                is 'Prioritaet: tiefste=0=Default' ,
      DB                  is 'Datenbank Name'                ,
      TS                  is 'TableSpace Name'               ,
      IX                  is 'Index Name'                    ,
      PARTVON             is 'Partition von'                 ,
      PARTBIS             is 'Partition bis'                 ,
      GUVON               is 'Gueltig von'                   ,
      GUBIS               is 'Gueltig bis'                   ,
      REORG               is 'ALWAYS,NEVER,THRESHOLD'        ,
      PAGESPLITS          is 'Schwellwert ReorgLeafFar %'    ,
      EXTENTS             is 'SchwWe Extents pro TS/Part'    ,
      REORGDAYS           is 'Schwellwert Anzahl Tage'       ,
      INSERTS             is 'Schwellwert inserts %'         ,
      DELETES             is 'Schwellwert deletes %'         ,
      PseudoDel           is 'Schwellwert PseudoDeletes %'   ,
      INSERTTIMESTAMP     is 'Erstellungs Zeitpunkt'         ,
      REMARK              is 'Begründung (Freitext)'         ,
      DBLEN               is 'Laenge Datenbank Name'         ,
      TSLEN               is 'Laenge Datenbank Name'         ,
      IXLEN               is 'Laenge Index Name'             ,
      KEY                 is 'eindeutiger Schluessel'
    ) ;

}¢--- A540769.WK.SQL(TWK01REN) cre=2006-12-15 mod=2006-12-15-11.16.02 F540769 ---
rename table A540769.twk001aRename to twk001a;
}¢--- A540769.WK.SQL(TWK09CO) cre=2006-11-24 mod=2006-12-05-09.54.12 F540769 ---
select * from A540769.TWK009A ;
update A540769.TWK009A set wk009for = '01';    ;
update A540769.TWK009A set wk009for = '02';    ;
update A540769.TWK009A set wk009for = '7';    ;
update A540769.TWK009A set wk009for = null;    ;
delete from A540769.TWK009A where wk009id not like '7%';
select * from A540769.TWK009A ;
commit;
delete from A540769.TWK009A;
insert into A540769.TWK009A (wk009id, wk009Txt)
    values('01'      , 'eins'              );
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('02'      , 'zwei'              , '02'  ) ;
insert into A540769.TWK009A (wk009id, wk009Txt)
    values('7'       , '7'                 );
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('71'      , '71'                , '7'   ) ;
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('72'      , '72'                , '7'   ) ;
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('73'      , '73'                , '7'   ) ;
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('711'     , '711'               , '71'  ) ;
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('712'     , '712'               , '71'  ) ;
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('721'     , '721'               , '72'  ) ;
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('732'     , '732'               , '73'  ) ;
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('7211'    , '7211'              , '721' ) ;
insert into A540769.TWK009A (wk009id, wk009Txt, wk009FOR)
    values('72111'   , '72111'             , '7211') ;
select * from A540769.TWK009A
;
-- rollback;
}¢--- A540769.WK.SQL(TWK09SE) cre=2006-12-08 mod=2006-12-08-15.33.52 F540769 ---
select * from A540769.twk009a   where 'x' || wk009id = 'x71'
                                or           wk009txt = 'noNoNo'
   for update of wk009txt
;
}¢--- A540769.WK.SQL(TWK09TS) cre=2006-12-14 mod=2006-12-14-12.34.41 F540769 ---
select * from A540769.twk009a  where wk009txt like 'quark72%'
with cs
}¢--- A540769.WK.SQL(TWK09UP) cre=2006-12-08 mod=2006-12-14-11.58.10 F540769 ---
update A540769.twk009a
    set wk009txt = strip(wk009txt) || 'x'
    where wk009id = '71'
;
select * from A540769.twk009a   where wk009id = '71'
;
}¢--- A540769.WK.SQL(TWL800NE) cre=2007-06-28 mod=2007-06-28-15.14.16 F540769 ---
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBOL (810)     Extract time : 2007-06-28 14:58 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=S800A In Database DA540769    --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DA540769 Stogroup=GSMS (for partition 1)
-- Tablespace=DA540769.S800A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE DATABASE DA540769
    BUFFERPOOL BP2
    INDEXBP    BP1
    CCSID      EBCDIC
    STOGROUP   GSMS;
  COMMIT;
  CREATE TABLESPACE S800A
    IN DA540769
    USING STOGROUP GSMS
    PRIQTY 129600 SECQTY 129600
    FREEPAGE 0 PCTFREE 0
    NUMPARTS 11
    BUFFERPOOL BP2
    LOCKSIZE ANY
    COMPRESS YES DSSIZE 4G;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=A540769.TXY800A1 In DA540769.S800A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='A540769';
--
  CREATE TABLE A540769.TXY800A1
     (XY80000              CHAR(13) NOT NULL,
      XY80001              CHAR(13) NOT NULL,
      XY80002              CHAR(6) NOT NULL,
      XY80003              CHAR(1) NOT NULL,
      XY80004              CHAR(2) NOT NULL,
      XY80005              CHAR(2) NOT NULL,
      XY80006              DECIMAL(15, 3) NOT NULL,
      XY80007              CHAR(1) NOT NULL,
      XY80008              CHAR(3) NOT NULL,
      XY80009              CHAR(2) NOT NULL,
      XY80010              CHAR(2) NOT NULL,
      XY80011              CHAR(13) NOT NULL,
      XY80012              CHAR(24) NOT NULL,
      XY80013              CHAR(24) NOT NULL,
      XY80014              CHAR(2) NOT NULL,
      XY80015              CHAR(3) NOT NULL,
      XY80016              DATE NOT NULL,
      XY80017              DATE NOT NULL,
      XY80018              CHAR(1) NOT NULL,
      XY80019              DECIMAL(15, 3) NOT NULL,
      XY80020              CHAR(3) NOT NULL,
      XY80021              DECIMAL(15, 3) NOT NULL,
      XY80022              CHAR(2) NOT NULL,
      XY80023              CHAR(2) NOT NULL,
      XY80025              CHAR(1) NOT NULL,
      XY80027              CHAR(12) NOT NULL,
      XY80028              CHAR(50) NOT NULL,
      XY80029              CHAR(12) NOT NULL,
      XY80030              CHAR(33) NOT NULL,
      XY80031              CHAR(33) NOT NULL,
      XY80032              CHAR(2) NOT NULL,
      XY80033              CHAR(4) NOT NULL,
      XY80034              CHAR(1) NOT NULL,
      XY80035              CHAR(16) NOT NULL,
      XY80036              CHAR(2) NOT NULL WITH DEFAULT,
      XY80037              DECIMAL(15, 3) NOT NULL WITH DEFAULT,
      XY80038              DECIMAL(15, 3) NOT NULL WITH DEFAULT,
      XY80039              CHAR(2) NOT NULL WITH DEFAULT,
      XY80040              CHAR(16) NOT NULL WITH DEFAULT,
      XY80041              CHAR(16) NOT NULL WITH DEFAULT,
      XY80042              CHAR(4) NOT NULL WITH DEFAULT,
      XY80043              CHAR(1) NOT NULL WITH DEFAULT,
      XY80044              CHAR(2) NOT NULL WITH DEFAULT,
      XY80045              CHAR(1) NOT NULL WITH DEFAULT)
    IN DA540769.S800A;
--
  LABEL ON TABLE A540769.TXY800A1 IS 'Journaleintrag';
--
  LABEL ON A540769.TXY800A1
   (XY80045 IS 'Herkunfts-RZ',
    XY80044 IS 'Anlagebestand',
    XY80043 IS 'Botengeschäft',
    XY80042 IS 'BUID Kunde',
    XY80041 IS 'HB-Konto 2',
    XY80040 IS 'HB-Konto 1',
    XY80039 IS 'Abgleichcode',
    XY80038 IS 'abgerechneter Betrag 2',
    XY80037 IS 'abgerechneter Betrag 1',
    XY80036 IS 'Mandantencode/Legal Entity',
    XY80035 IS 'Depotnummer',
    XY80034 IS 'Nominal-/Stück-Notiz',
    XY80033 IS 'Kant. Händler',
    XY80032 IS 'Partnercode',
    XY80031 IS 'Kundendomizil',
    XY80030 IS 'Kundenadresse',
    XY80029 IS 'CIF-Nummer',
    XY80028 IS 'Valorentext',
    XY80027 IS 'WS80-Valorennummer',
    XY80025 IS 'Titelherkunft',
    XY80023 IS 'Terminmonat',
    XY80022 IS 'Handelsbankstelle',
    XY80021 IS 'Börsenkurs',
    XY80020 IS 'Transaktionswährung',
    XY80019 IS 'Nominal/Stück',
    XY80018 IS 'Liefercode',
    XY80017 IS 'Abrechnungsdatum',
    XY80016 IS 'Abschlussdatum',
    XY80015 IS 'Börsenplatz',
    XY80014 IS 'WS80-GA',
    XY80013 IS 'Auftragsnummer',
    XY80012 IS 'Storno: Auftragsnr. Original',
    XY80011 IS 'Storno: ID Original',
    XY80010 IS 'Journalkorrektur',
    XY80009 IS 'Stempelübersteuerung',
    XY80008 IS 'Kant. Gebühr',
    XY80007 IS 'Eidg. Abgabe',
    XY80006 IS 'Entgelt',
    XY80005 IS 'Nachtrag aus Storno',
    XY80004 IS 'Journalrubrik',
    XY80003 IS 'Achat/Vente',
    XY80002 IS 'Journalmonat',
    XY80001 IS 'ID Paarung',
    XY80000 IS 'Identifikation');
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IXY800A1 On A540769.TXY800A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX A540769.IXY800A1
    ON A540769.TXY800A1
     (XY80000               ASC)
    USING STOGROUP GSMS
    PRIQTY 129600 SECQTY 129600
    FREEPAGE 8 PCTFREE 25
    BUFFERPOOL BP1 COPY NO;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IXY800A2 On A540769.TXY800A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX A540769.IXY800A2
    ON A540769.TXY800A1
     (XY80004               ASC,
      XY80002               ASC,
      XY80027               ASC,
      XY80003               DESC,
      XY80016               ASC,
      XY80017               ASC,
      XY80000               ASC)
    USING STOGROUP GSMS
    PRIQTY 129600 SECQTY 129600
    FREEPAGE 8 PCTFREE 25
    BUFFERPOOL BP1 COPY NO;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IXY800A3 On A540769.TXY800A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX A540769.IXY800A3
    ON A540769.TXY800A1
     (XY80004               ASC,
      XY80016               ASC,
      XY80027               ASC,
      XY80000               ASC)
    USING STOGROUP GSMS
    PRIQTY 129600 SECQTY 129600
    FREEPAGE 8 PCTFREE 25
    BUFFERPOOL BP1 COPY NO;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IXY800A4 On A540769.TXY800A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX A540769.IXY800A4
    ON A540769.TXY800A1
     (XY80013               ASC,
      XY80000               ASC)
    USING STOGROUP GSMS
    PRIQTY 129600 SECQTY 129600
    FREEPAGE 8 PCTFREE 25
    BUFFERPOOL BP1 COPY NO;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IXY800A5 On A540769.TXY800A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX A540769.IXY800A5
    ON A540769.TXY800A1
     (XY80027               ASC,
      XY80003               DESC,
      XY80016               ASC,
      XY80017               ASC,
      XY80004               ASC,
      XY80000               ASC)
    USING STOGROUP GSMS
    PRIQTY 7200 SECQTY 129600
    FREEPAGE 8 PCTFREE 20
    CLUSTER
     (PART 1 VALUES('000099999999'),
      PART 2 VALUES('000199999999'),
      PART 3 VALUES('000299999999'),
      PART 4 VALUES('000399999999'),
      PART 5 VALUES('000499999999'),
      PART 6 VALUES('000599999999'),
      PART 7 VALUES('000699999999'),
      PART 8 VALUES('000799999999'),
      PART 9 VALUES('000899999999'),
      PART 10 VALUES('000999999999'),
      PART 11 VALUES('999999999999'))
    BUFFERPOOL BP1 COPY NO;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IXY800A6 On A540769.TXY800A1
------------------------------------------------------------------------
--
  CREATE INDEX A540769.IXY800A6
    ON A540769.TXY800A1
     (XY80002               ASC,
      XY80003               ASC,
      XY80014               ASC,
      XY80027               ASC,
      XY80004               ASC)
    USING STOGROUP GSMS
    PRIQTY 129600 SECQTY 129600
    FREEPAGE 8 PCTFREE 25
    BUFFERPOOL BP1 COPY NO;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IXY800A8 On A540769.TXY800A1
------------------------------------------------------------------------
--
  CREATE INDEX A540769.IXY800A8
    ON A540769.TXY800A1
     (XY80035               ASC,
      XY80000               ASC,
      XY80036               ASC,
      XY80004               ASC)
    USING STOGROUP GSMS
    PRIQTY 129600 SECQTY 129600
    FREEPAGE 16 PCTFREE 15
    BUFFERPOOL BP1 COPY NO;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(TWM005) cre=2010-10-14 mod=2010-10-14-14.15.13 A540769 ----
select count(*)
    from oa1t.twm005a1
    where CTYP='SPEX'
    with ur
}¢--- A540769.WK.SQL(TWSH) cre=2016-06-08 mod=2016-06-08-13.38.30 A540769 ------
set :a = 1 + 1;
}¢--- A540769.WK.SQL(TXBD491) cre=2010-06-22 mod=2010-06-30-17.01.28 A540769 ---
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 3 for
  select enpid, count(*)
    from bua.txbd491
    where enSasm = 30087   -- family
        and etStart >='2010-05-01-00.00.00'
        and etEnd   <='2010-07-01-00.00.00'
        and eyStep   in ('S', 'R')
        and ezItem not in (-323, -325)
    group by enPid
    with ur
;
explain plan set queryno = 5 for
  select enpid, count(*)
    from bua.txbd491
    where enSasm = 30087   -- family
        and etStart >='2010-05-01-00.00.00'
        and etEnd   <='2010-07-01-00.00.00'
        and eyStep   in ('S', 'R')
        and ezItem not in (-323, -325)
    group by enPid
    order by 2 desc
    with ur
;
explain plan set queryno = 9 for
select g.* from
  ( select enpid, count(*) cnt
    from bua.txbd491
    where enSasm = 30087   -- family
        and etStart >='2010-05-01-00.00.00'
        and etEnd   <='2010-07-01-00.00.00'
        and eyStep   in ('S', 'R')
        and ezItem not in (-323, -325)
    group by enPid
  ) g, A540769.pids s
    where g.enPid = s.enPid
    order by 2 desc
    with ur
;
select current timestamp from sysibm.sysdummy1;
select * from plan_view2
    where queryno in ( 9  , 222)
    order by applname, progname, queryNo, qblockno, planno
;
select * from plan_table
    where queryno in ( 9  , 222)
    order by applname, progname, queryNo, qblockno, planno
;
rollback;
 x
select current timestamp from sysibm.sysDummy1;
select n, sum(c) tot, min(c) min, max(c) max, count(*) distinct
from
    ( select 'enPid' n , count(*) c, enPid g
          from bua.txbd491 group by enPid
      union all select 'enSasm' n , count(*) c, char(enSasm) g
          from bua.txbd491 group by enSasm
      union all select 'eyStep' n , count(*) c, eyStep g
          from bua.txbd491 group by eyStep
      union all select 'ezItem' n , count(*) c, char(ezItem) g
          from bua.txbd491 group by ezItem
      union all select 'pidSasm' n , count(*) c, enPid || char(enSasm) g
          from bua.txbd491 group by enPid, enSasm
    ) g
    group by n
    order by n
    with ur
;
select current timestamp from sysibm.sysDummy1;
xelect sum(c) tot, min(c) min, max(c) max, count(*) distinct
from
    ( select count(*) c, enpid g
          from bua.txbd491
          group by enpid
    ) g
    with ur
;
xelect current timestamp from sysibm.sysDummy1;
xelect sum(c) tot, min(c) min, max(c) max, count(*) distinct
from
    ( select count(*) c, ENSASM g
          from bua.txbd491
          group by ENSASM
    ) g
    with ur
;
-----------------------------------------------------------------
--  test 1: query as is with dsnTep2
--       elapsed time  6'38, cpu 65s (explain: 98s)
select current timestamp from sysibm.sysDummy1;
select enpid, count(*)
  from bua.txbd491
  where enSasm = 30087   -- family
      and etStart >='2009-01-01-00.00.00'
      and etEnd   < '2010-01-01-00.00.00'
      and eyStep   in ('S', 'R')
      and ezItem not in (-323, -325)
  group by enPid
  order by 2 desc
  with ur
;
select current timestamp from sysibm.sysDummy1;
--
-- output 7503 rows
--       S104527    |        1306799 |
--       P064505    |           3999 |
--       P092258    |           3469 |
-----------------------------------------------------------------
--  test 2: query with join to temporary key table is with dsnTep2
--       elapsed time   51s, cpu  9s (explain: 98s)
select current timestamp from sysibm.sysDummy1;
create table A540769.pids
    as (select enPid, count(*) cnt from bua.txbd491
        group by enPid) with no data in DA540769.DUMMY;
insert into A540769.pids
    select enPid, count(*) from bua.txbd491 group by enPid with cs;
commit;
select count(*) from A540769.pids;
select current timestamp from sysibm.sysDummy1;

select g.* from
  ( select enpid, count(*) cnt
    from bua.txbd491
    where enSasm = 30087   -- family
        and etStart >='2009-01-01-00.00.00'
        and etEnd   < '2010-01-01-00.00.00'
        and eyStep   in ('S', 'R')
        and ezItem not in (-323, -325)
    group by enPid
  ) g, A540769.pids s
    where g.enPid = s.enPid
    order by 2 desc
    with ur
;
select current timestamp from sysibm.sysDummy1;
--
-- outpjut 7503 rows
--       S104527    |        1306799
--       P064505    |           3999
--       P092258    |           3469
--       A301780    |           2771
}¢--- A540769.WK.SQL(TXBH111) cre=2008-01-23 mod=2008-01-23-15.50.35 F540769 ---
select count(*) from bua.txbh111;
select count(*), esstate from bua.txbh111
     group by esstate
     order by 1 desc;
select count(*), estype  from bua.txbh111
     group by estype
     order by 1 desc;
select count(*), esstate, estype from bua.txbh111
     group by esstate, estype
     order by 1 desc
     fetch first 10 rows only;
select count(*), ezcount from bua.txbh111
     group by ezcount
     order by 1 desc;
select count(*), EAUUIDHT from bua.txbh111
     group by EAUUIDHT
     order by 1 desc
     fetch first 10 rows only;
select count(*), EAUUIDMQ from bua.txbh111
     group by EAUUIDMQ
     order by 1 desc
     fetch first 10 rows only;
select count(*), EATABNAM from bua.txbh111
     group by EATABNAM
     order by 1 desc
     fetch first 10 rows only;
}¢--- A540769.WK.SQL(TXBH111X) cre=2008-01-23 mod=2008-01-23-17.10.35 F540769 ---
  SET CURRENT SQLID='S100447';
  CREATE INDEX BUA.IXBH1111_L
    ON BUA.TXBH111
     (EAUUIDMQ ASC, EAUUIDHT ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
  COMMIT;
  CREATE INDEX BUA.IXBH1113_L
    ON BUA.TXBH111
     (ESSTATE ASC, ESTYPE ASC, EZCOUNT ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
  COMMIT;
  CREATE INDEX BUA.IXBH1112_L
    ON BUA.TXBH111
     (EATABNAM              ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
  COMMIT;
}¢--- A540769.WK.SQL(TXBI014) cre=2014-12-04 mod=2014-12-04-10.37.25 A540769 ---
$#@
$= fun = s               $** s = show
                         $** a = alter restart to mx+1
$= tb = TXBI014
$= cr = BUA
$= idCol = ATTRID
call sqlConnect DEVG
mxC = sql2One('select max('$idCol') from' $cr'.'$tb)
say $cr'.'$tb 'max' $idCol '=' mxC
mxS = sql2One('select value(s.restartWith, s.maxAssignedVal)' ,
                   'from sysibm.sysSequencesDep   d' ,
                     'join sysibm.sysSequences s' ,
                        'on s.sequenceId = d.bSequenceId' ,
                   "where dName = '"$tb"' and dCreator = '"$cr"'")
say $cr'.'$tb 'sequece max =' mxS
if $fun == 'a' then $@¢
    call sqlUpdate 3, 'alter table' $cr'.'$tb,
         'alter' $idCol 'restart with' (mxC + 1)
    say 'altered to restart with' (mxC + 1)
    $!
$#out                                              20141204 10:37:19
$#out                                              20141204 10:36:43
$#out                                              20141204 10:34:11
$#out                                              20141204 10:34:04
$#out                                              20141204 10:33:57
$#out                                              20141204 10:32:07
$#out                                              20141204 10:31:58
$#out                                              20141204 10:31:28
$#out                                              20141204 10:31:06
}¢--- A540769.WK.SQL(T1) cre=2012-09-10 mod=2016-09-15-11.06.36 A540769 --------
select '<' || (0+1) || '>', '<' || right(0-1*234, 3) || '>'
    from sysibm.sysDummy1
;
with ti as
(
  select s.*
      , value(i, instance) inst
      , char(case when clone = 'N' then  '     '
                  when instance = i then 'base '
                  else 'clone' end || value(i, instance), 6) instTx

  from sysibm.sysTablespace s
    left join  -- clone handling: add instances
        ( select           1 from sysibm.sysDummy1
          union all select 2 from sysibm.sysDummy1
        ) i (i)
      on  s.clone = 'Y'
)
select clone, instance, inst, instTx, count(*)
    from ti
 -- where dbName like 'Q%'
    group by clone, instance, inst, instTx
;x;
--- temporary explain --------------------------------------------------
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_STATEMNT_TABLE;
delete from A540769.DSN_DetCost_TABLE ;
delete from A540769.dsn_filter_Table  ;
delete from A540769.dsn_predicat_table;
explain plan set queryno = 3   for
with ti as
(
  select s.*
      , value(i, instance) inst
      , case when clone = 'N' then '     '
             when clone <> 'Y' then 'clo?' || clone
             when instance = i then 'base '
             else                   'clone' end instTxt
  from sysibm.sysTablespace s
    left join  -- clone handling: add instances
        ( select           1 from sysibm.sysDummy1
          union all select 2 from sysibm.sysDummy1
        ) i (i)
      on  s.clone = 'Y'
)
select clone, instance, inst, instTxt, count(*)
    from ti
    where dbName like 'Q%'
    group by clone, instance, inst, instTxt
;
select * from  plan_view1
    order by -- collid, progName, version, explain_time,
             queryNo, qblockno, planno, mixOpSeq
;
select * from  plan_view2
    order by -- collid, progName, version, explain_time,
             queryNo, qblockno, planno, mixOpSeq
;
select * from  plan_view2det
    order by -- collid, progName, version, explain_time,
             queryNo, qblockno, planno, mixOpSeq
;
select *
    from plan_viewPred
    order by collid, progName, explain_time,
             queryNo, qBlockNo, predNo, orderNo, mixOpSeqNo
    with ur
;
rollback
;;;;
SET CURRE  ( select           1 from sysibm.sysDummy1
create ta    union all select 2 from sysibm.sysDummy1
  (   typ  ) i (inst)
      PRIon s.instance = i.inst or s.clone = 'Y'
      appp by
      pgm        CHAR(8) NOT NULL default '*',
      rz         char(3) NOT NULL default '*',
      dbSy       char(4) NOT NULL default '*',
      location   char(16) NOT NULL  default '*',
      value      char(20) not null,
      installFr  date NOT NULL WITH DEFAULT,
      installTo  date NOT NULL WITH DEFAULT '31.12.9999',
      rowChg timestamp not null generated always
        for each row on update as row change timestamp
  )
  ;
rollback
;
}¢--- A540769.WK.SQL(UCK04001) cre=2006-11-21 mod=2006-11-21-16.28.42 F540769 ---
-- EXPLAIN  PLAN SET QUERYNO = 201 FOR
SELECT CK040001,CK040002,CK040005,CK040006,CK040008,CK040009,CK040010,
       CK040011,CK040021,CK040022,CK040031,CK040032,CK040033,CK040034,
       CK040035,CK040036,CK040037,CK040038,CK040039,CK040040,CK040041,
       CK040042,CK040043,CK040044,CK040045,CK040046,CK040047,CD600016
FROM OA1T.TCK040A1, OA1T.TCD600A1
WHERE SUBSTR(CK040033,1,16) = CD600001
  AND ( 0 = 1 OR
    ( CK040032 = ''
  AND CD600005 < CURRENT TIMESTAMP
  AND CD600006 > CURRENT TIMESTAMP
  AND CK040005 < CURRENT TIMESTAMP
  AND CK040006 > CURRENT TIMESTAMP
  ) )
UNION ALL
SELECT CK040001,CK040002,CK040005,CK040006,CK040008,CK040009,CK040010,
       CK040011,CK040021,CK040022,CK040031,CK040032,CK040033,CK040034,
       CK040035,CK040036,CK040037,CK040038,CK040039,CK040040,CK040041,
       CK040042,CK040043,CK040044,CK040045,CK040046,CK040047,CD100001
FROM OA1T.TCK040A1, OA1T.TCD100A1
WHERE CK040032 = CD100002
  AND CK040032 <> ''
  AND CK040005 < CURRENT TIMESTAMP
  AND CK040006 > CURRENT TIMESTAMP
WITH UR
}¢--- A540769.WK.SQL(UN2) cre= mod= --------------------------------------------
SELECT TID150TST, COUNT(*)
    FROM
    (
         SELECT * FROM OA1T.TID150A1 WHERE TID150MD = 1115
       UNION ALL
         SELECT * FROM OA1T.TID150A1 WHERE TID150MD < 1115
                                         AND   TID150MD > 1110
    ) A
    GROUP BY TID150TST;
}¢--- A540769.WK.SQL(USER) cre=2010-06-08 mod=2010-06-08-11.58.50 A540769 ------
set current sqlid = 'S100447';
select substr(current client_userid, 1, 10) "cliUser",
       substr(session_user, 1, 10) "sesUser",
       substr(user, 1, 10) "user",
     current sqlid, current server
    from sysibm.sysdummy1
}¢--- A540769.WK.SQL(USERDB) cre=2012-06-22 mod=2012-06-22-13.25.42 A540769 ----
select name, type
    from sysibm.sysdatabase
    where translate(name, '999999999AAAAA', '012345678FIWXY')
            = 'DA999999'
    order by 1
}¢--- A540769.WK.SQL(UWE) cre=2008-09-16 mod=2008-09-16-12.48.38 F540769 -------
 -- TOTAL ANZAHL DB'S
    SELECT COUNT(*)
                  FROM BUA.TXBC111
                   WITH UR;

 -- TOTAL ANZAHL DB'S PRO FAMILIE
    SELECT EAOF, COUNT(EAOF)
        FROM  BUA.TXBC071 A INNER JOIN BUA.TXBC111 B
              ON A.ENSTORAR = B.ENSTORAR
        GROUP BY EAOF
       WITH UR;
}¢--- A540769.WK.SQL(V) cre=2009-08-06 mod=2009-08-06-17.14.53 A540769 ---------
//A540769D JOB (CP00,KE50),
//       'CATALOG',MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//       IF RC = 0 OR RC = 4 THEN
//UTI001   EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBAF,'A540769D'),
//   REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
  LISTDEF C#LIST
   INCLUDE TABLESPACE BJAAACOP.BJAAAOJP
   INCLUDE TABLESPACE BJAAACOP.BJAAAOJQ
   INCLUDE TABLESPACE BJAAACOP.BJAAAOJR
   INCLUDE TABLESPACE BJAAACOP.BJAAAOJS
   INCLUDE TABLESPACE BJAAACOP.BJAAAOJT
   INCLUDE TABLESPACE BJAAADY9.BJAAAVDH
   INCLUDE TABLESPACE BJAAADY9.BJAAAVDI
   INCLUDE TABLESPACE BJAAADY9.BJAAAVDJ
   INCLUDE TABLESPACE BJAAADY9.BJAAAVDK
   INCLUDE TABLESPACE BJAAADY9.BJAAAVDL
   INCLUDE TABLESPACE BJAAADY9.BJAAAVDM
   INCLUDE TABLESPACE BJAAADZB.BJAAAVDT
   INCLUDE TABLESPACE BJAAADZB.BJAAAVDU
   INCLUDE TABLESPACE BJAAADZB.BJAAAVDV
   INCLUDE TABLESPACE BJAAADZB.BJAAAVDW
   INCLUDE TABLESPACE BJAAADZB.BJAAAVDX
   INCLUDE TABLESPACE BJAAADZB.BJAAAVDY
  QUIESCE  LIST C#LIST
  MODIFY RECOVERY
    LIST C#LIST
    DELETE AGE (*)
  COPY
    LIST C#LIST
    COPYDDN(TCOPYD)  FULL YES
    PARALLEL
//       ENDIF
//       IF RC = 0 OR RC = 4 THEN
//DROP001  EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99                    00020001
//SYSTSIN  DD *
    DSN SYSTEM(DBAF)
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSIN    DD *
set current sqlid = 'S100447';
drop database BJAAACOP;
  commit;
drop database BJAAADY9;
  commit;
drop database BJAAADZB;
  commit;
//       ENDIF
//SLEE001  EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
//           PARM='WSH s'
//SYSIN    DD DUMMY
//SYSTSIN  DD DUMMY
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSPROC  DD DISP=SHR,DSN=A540769.WK.REXX
//WSH      DD *
    call sleep 1, 1
//OUT      DD SYSOUT=*
//       IF RC = 0 OR RC = 4 THEN
//UTI002   EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBAF,'A540769D'),
//   REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
  LISTDEF C#LIST
   INCLUDE TABLESPACE BJAAAE00.BJAAA1FI
   INCLUDE TABLESPACE BJAAAE00.BJAAA1FJ
   INCLUDE TABLESPACE BJAAAE00.BJAAA1FK
   INCLUDE TABLESPACE BJAAAE00.BJAAA1FL
   INCLUDE TABLESPACE BJAAAE00.BJAAA1FM
   INCLUDE TABLESPACE BJAAAE00.BJAAA1FN
   INCLUDE TABLESPACE BJAAAE02.BJAAA1FU
   INCLUDE TABLESPACE BJAAAE02.BJAAA1FV
   INCLUDE TABLESPACE BJAAAE02.BJAAA1FW
   INCLUDE TABLESPACE BJAAAE02.BJAAA1FX
   INCLUDE TABLESPACE BJAAAE02.BJAAA1FY
   INCLUDE TABLESPACE BJAAAE02.BJAAA1FZ
   INCLUDE TABLESPACE BJAAAE03.BJAAA1F0
   INCLUDE TABLESPACE BJAAAE03.BJAAA1F1
   INCLUDE TABLESPACE BJAAAE03.BJAAA1F2
   INCLUDE TABLESPACE BJAAAE03.BJAAA1F3
   INCLUDE TABLESPACE BJAAAE03.BJAAA1F4
   INCLUDE TABLESPACE BJAAAE03.BJAAA1F5
  QUIESCE  LIST C#LIST
  MODIFY RECOVERY
    LIST C#LIST
    DELETE AGE (*)
  COPY
    LIST C#LIST
    COPYDDN(TCOPYD)  FULL YES
    PARALLEL
//       ENDIF
//       IF RC = 0 OR RC = 4 THEN
//DROP002  EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99                    00020001
//SYSTSIN  DD *
    DSN SYSTEM(DBAF)
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSIN    DD *
set current sqlid = 'S100447';
drop database BJAAAE00;
  commit;
drop database BJAAAE02;
  commit;
drop database BJAAAE03;
  commit;
//       ENDIF
//SLEE002  EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
//           PARM='WSH s'
//SYSIN    DD DUMMY
//SYSTSIN  DD DUMMY
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSPROC  DD DISP=SHR,DSN=A540769.WK.REXX
//WSH      DD *
    call sleep 1, 1
//OUT      DD SYSOUT=*
//A540769D JOB (CP00,KE50),
//       'CATALOG',MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//       IF RC = 0 OR RC = 4 THEN
//UTI001   EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBAF,'A540769D'),
//   REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
  LISTDEF C#LIST
   INCLUDE TABLESPACE BJAAAE06.BJAAA1GI
   INCLUDE TABLESPACE BJAAAE06.BJAAA1GJ
   INCLUDE TABLESPACE BJAAAE06.BJAAA1GK
   INCLUDE TABLESPACE BJAAAE06.BJAAA1GL
   INCLUDE TABLESPACE BJAAAE06.BJAAA1GM
   INCLUDE TABLESPACE BJAAAE06.BJAAA1GN
  QUIESCE  LIST C#LIST
  MODIFY RECOVERY
    LIST C#LIST
    DELETE AGE (*)
  COPY
    LIST C#LIST
    COPYDDN(TCOPYD)  FULL YES
    PARALLEL
//       ENDIF
//       IF RC = 0 OR RC = 4 THEN
//DROP001  EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99                    00020001
//SYSTSIN  DD *
    DSN SYSTEM(DBAF)
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSIN    DD *
set current sqlid = 'S100447';
drop database BJAAAE06;
  commit;
//       ENDIF
//SLEE001  EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
//           PARM='WSH s'
//SYSIN    DD DUMMY
//SYSTSIN  DD DUMMY
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSPROC  DD DISP=SHR,DSN=A540769.WK.REXX
//WSH      DD *
    call sleep 1, 1
//OUT      DD SYSOUT=*
$***out            20090806 17:14:29
}¢--- A540769.WK.SQL(VARS) cre=2009-05-29 mod=2009-05-29-10.22.34 F540769 ------
select u.* from
    (select 'DGDB9998' db from sysibm.SysDummy1) v
    join (
        select 't ' ¨¨ strip(creator) ¨¨ '.' || strip(name) na,
               dbName db
            from sysibm.systables
            where dbName = u.db
        union select 'i ' ¨¨ strip(creator) ¨¨ '.' || strip(name) na,
               dbName db
            from sysibm.sysIndexes
         ) u
    on v.db = u.db
}¢--- A540769.WK.SQL(VDPSMQTQ) cre=2010-08-26 mod=2010-08-26-17.25.05 A540769 ---
select count(*), SYMBOLCH                                               00010000
    from VDPS2.VTINSTRFLATSYMBOLS                                       00020000
    group by SYMBOLCH                                                   00021001
    order by 1 desc                                                     00030000
    fetch first 100 rows only                                           00040000
    with ur                                                             00050000
}¢--- A540769.WK.SQL(VDPSMQT1) cre=2010-08-26 mod=2010-08-31-16.55.51 A540769 ---
-- version 31.8 ORG.U0009.B0106.KAXV3.SQL(DCATVDPS                      00000101
set current sqlid = 'A540769' ;                                         00000202
    DELETE FROM         PLAN_TABLE ;                                    00000302
 -- EXPLAIN ALL SET QUERYNO=300 FOR                                     00000504
    SELECT T1.INSTRUMENTID, T1.ROWSTATUS, T1.SYMBOLCSFI, T1.SYMBOLCH,   00000601
           T1.SYMBOLISIN, T1.SYMBOLUS, T1.SYMBOLXS, T1.SYMBOLGB,        00000701
           T1.SYMBOLLU, T1.SYMBOLDE, T1.SYMBOLAT, T1.SYMBOLFR,          00000801
           T1.SYMBOLBE, T1.SYMBOLIT, T1.SYMBOLNL, T1.SYMBOLJP,          00000901
           T1.SYMBOLJ2, T1.SYMBOLDK, T1.SYMBOLSE, T1.SYMBOLI2,          00001001
           T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2, T1.SYMBOLCSCURR,      00001101
           T1.CATEGORYVDPS, T1.CATEGORYTKT, T1.CATEGORYTKSK,            00001201
           T1.CATEGORYTKZUS, T1.CATEGORYTKPRK, T1.CATEGORYTKTZ,         00001301
           T1.CATEGORYMAZU, T1.CATEGORYECBTR, T1.CATEGORYCFI,           00001401
           T1.CATEGORYEUZS, T1.CATEGORYCSGTA, T1.CATEGORYCSGMS,         00001501
           T1.CATEGUSTAXREPORT, T1.CATEGUSIRSADDITION,                  00001601
           T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,                        00001701
           T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,           00001801
           T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,     00001901
           T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,                  00002001
           T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,                   00002101
           T2.HASMULTIUNDERLYERS, T2.CSMAINTRADPLACE,                   00002201
           T2.ORIGINALISSUER, T2.ISSUER, T2.UNDERINSTRUMENT,            00002301
           T2.NOMINALCURR, T2.CSRISKCURRENCY, T2.CSRISKCOUNTRY,         00002401
           T2.CSRISINSTRUMENT, T2.REPAYPRICECURR, T2.ISSUEPRICECURR,    00002501
           T2.EXERCISECURR, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,        00002601
           T2.MINDENOMINATION, T2.EFFINTERESTRATE,                      00002701
           T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,       00002801
           T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,   00002901
           T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,    00003001
           T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,      00003101
           T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,               00003201
           T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,             00003301
           T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,    00003401
           T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,  00003501
           T2.SPRATING, T2.LISTINGSYMBOLTKH, T2.LISTINGSYMBOLRIC,       00003601
           T2.LISTINGSYMBOLBBI, T210.SYMBOLI1 NOMINALCURR_I1,           00003701
           T210.SYMBOLI2 NOMINALCURR_I2,                                00003801
           T210.SYMBOLCSCURR NOMINALCURR_WS80,                          00003901
           T26.SYMBOLI1 CSRISKCURRENCY_I1,                              00004001
           T26.SYMBOLI2 CSRISKCURRENCY_I2,                              00004101
           T26.SYMBOLCSCURR CSRISKCURRENCY_WS80,                        00004201
           T24.SYMBOLCH CSRISINSTRUMENT_CH,                             00004301
           T24.SYMBOLISIN CSRISINSTRUMENT_ISIN,                         00004401
           T24.SYMBOLCSFI CSRISINSTRUMENT_CSFI,                         00004501
           T25.SYMBOLISOA2 CSRISKCOUNTRY_A2,                            00004601
           T25.SYMBOLCSWS80DOM CSRISKCOUNTRY_WS80,                      00004701
           T211.SYMBOLI1 REPAYPRICECURR_I1,                             00004801
           T211.SYMBOLI2 REPAYPRICECURR_I2,                             00004901
           T211.SYMBOLCSCURR REPAYPRICECURR_WS80,                       00005001
           T28.SYMBOLI1 ISSUEPRICECURR_I1,                              00005101
           T28.SYMBOLI2 ISSUEPRICECURR_I2,                              00005201
           T28.SYMBOLCSCURR ISSUEPRICECURR_WS80,                        00005301
           T27.SYMBOLI1 EXERCISECURR_I1, T27.SYMBOLI2 EXERCISECURR_I2,  00005401
           T27.SYMBOLCSCURR EXERCISECURR_WS80,                          00005501
           T23.SYMBOLBCN CSMAINTRADPLACE_BCN,                           00005601
           T23.SYMBOLCSWS80BPL CSMAINTRADPLACE_WS80,                    00005701
           T23.SYMBOLRTX CSMAINTRADPLACE_RTX,                           00005801
           T23.SYMBOLBBX CSMAINTRADPLACE_BBX,                           00005901
           T212.SYMBOLCH UNDERINSTRUMENT_CH,                            00006001
           T212.SYMBOLISIN UNDERINSTRUMENT_ISIN,                        00006101
           T212.SYMBOLCSFI UNDERINSTRUMENT_CSFI, T2.ORIGINALISSUER_GK,  00006201
           T2.ISSUER_GK, T2.MAINDEPOSITARY_GK, T2.EXPIRATIONDATE,       00006301
           T2.MATURITYDATE, T2.FIRSTPAYDATE, T2.FIRSTPYDATEPERYEAR,     00006401
           T2.INTRSTDVDENFRDATE, T2.CSRATINGDATE, T2.MDYRATINGDATE,     00006501
           T2.SPRATINGDATE, T2.SUBSCRBEGINDATE, T2.PAYMENTDATE,         00006601
           T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,                  00006701
           T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,       00006801
           T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,           00006901
           T2.EXPIRATIONTYPE, T2.STATUSTYPE, T2.REGISTRATIONTYPE,       00007001
           T2.BORROWERCATTYPE, T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE,   00007101
           T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,                      00007201
           T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,     00007301
           T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,  00007401
           T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,            00007501
           T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,                  00007601
           T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,     00007701
           T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,          00007801
           T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,       00007901
           T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,              00008001
           T2.SHORTNAME_N, T2.PREPARTICLE_G, T2.PREPARTICLE_E,          00008101
           T2.PREPARTICLE_F, T2.PREPARTICLE_I, T2.PREPARTICLE_N,        00008201
           T2.POSTPARTICLE_G, T2.POSTPARTICLE_E, T2.POSTPARTICLE_F,     00008301
           T2.POSTPARTICLE_I, T2.POSTPARTICLE_N, T2.ISINTERNAL,         00008401
           T2.ISOTC, T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,      00008501
           T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION,            00008601
           T29.SYMBOLISOA2 MOSTLIQUIDMARKETLOCATION_A2,                 00008701
           T29.SYMBOLISOA3 MOSTLIQUIDMARKETLOCATION_A3,                 00008801
           T29.SYMBOLCSWS80DOM MOSTLIQUIDMARKETLOCATION_WS80,           00008901
           T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,         00009001
           T2.OPTIONSTYLETYPE, T2.CSMAINTRADINGCURR,                    00009101
           T22.SYMBOLI1 CSMAINTRADINGCURR_I1,                           00009201
           T22.SYMBOLI2 CSMAINTRADINGCURR_I2,                           00009301
           T22.SYMBOLCSCURR CSMAINTRADINGCURR_WS80,                     00009401
           T25.SYMBOLISOA3 CSRISKCOUNTRY_A3, T2.LIQUIDATIONRIGHTTYPE,   00009501
           T2.CSMAINPARENTTRADINGPLACE,                                 00009601
           T21.SYMBOLBCN CSMAINPARENTTRADINGPLACE_BCN,                  00009701
           T21.SYMBOLRTX CSMAINPARENTTRADINGPLACE_RTX,                  00009801
           T21.SYMBOLMIC CSMAINPARENTTRADINGPLACE_MIC,                  00009901
           T21.SYMBOLBBX CSMAINPARENTTRADINGPLACE_BBX,                  00010001
           T21.SYMBOLCSWS80BPL CSMAINPARENTTRADINGPLACE_WS80,           00010101
           T3.PAYFREQUENCY UND_PAYFREQUENCY,                            00010201
           T3.ISCALLFORTXREONLY UND_ISCALLFORTXREONLY,                  00010301
           T3.ISREDEEMABLE UND_ISREDEEMABLE,                            00010401
           T3.ISRETRACTABLE UND_ISRETRACTABLE,                          00010501
           T3.ISCONVERTBYHOLDER UND_ISCONVERTBYHOLDER,                  00010601
           T3.ISCONVERTBYISSUER UND_ISCONVERTBYISSUER,                  00010701
           T3.HASVOTINGRIGHTNO UND_HASVOTINGRIGHTNO,                    00010801
           T3.HASREDMPINVARCURR UND_HASREDMPINVARCURR,                  00010901
           T3.HASMULTIUNDERLYERS UND_HASMULTIUNDERLYERS,                00011001
           T3.CSMAINTRADPLACE UND_CSMAINTRADPLACE,                      00011101
           T3.ORIGINALISSUER UND_ORIGINALISSUER, T3.ISSUER UND_ISSUER,  00011201
           T3.UNDERINSTRUMENT UND_UNDERINSTRUMENT,                      00011301
           T3.NOMINALCURR UND_NOMINALCURR,                              00011401
           T3.CSRISKCURRENCY UND_CSRISKCURRENCY,                        00011501
           T3.CSRISKCOUNTRY UND_CSRISKCOUNTRY,                          00011601
           T3.CSRISINSTRUMENT UND_CSRISINSTRUMENT,                      00011701
           T3.REPAYPRICECURR UND_REPAYPRICECURR,                        00011801
           T3.ISSUEPRICECURR UND_ISSUEPRICECURR,                        00011901
           T3.EXERCISECURR UND_EXERCISECURR,                            00012001
           T3.MAINDEPOSITARY UND_MAINDEPOSITARY,                        00012101
           T3.NOMINALAMOUNT UND_NOMINALAMOUNT,                          00012201
           T3.MINDENOMINATION UND_MINDENOMINATION,                      00012301
           T3.EFFINTERESTRATE UND_EFFINTERESTRATE,                      00012401
           T3.REPAYPRICEAMOUNT UND_REPAYPRICEAMOUNT,                    00012501
           T3.REPAYPRICERATE UND_REPAYPRICERATE,                        00012601
           T3.POOLFACTOR UND_POOLFACTOR,                                00012701
           T3.VOTINGRIGHTNO UND_VOTINGRIGHTNO,                          00012801
           T3.OUTSTANDINGCAPITAL UND_OUTSTANDINGCAPITAL,                00012901
           T3.ISSUEDCAPITAL UND_ISSUEDCAPITAL,                          00013001
           T3.OUTSTANDCAPITALNO UND_OUTSTANDCAPITALNO,                  00013101
           T3.ISSUEDCAPITALNO UND_ISSUEDCAPITALNO,                      00013201
           T3.ISSUEAMOUNT UND_ISSUEAMOUNT,                              00013301
           T3.ISSUEPRICE UND_ISSUEPRICE,                                00013401
           T3.EXERCISEAMOUNT UND_EXERCISEAMOUNT,                        00013501
           T3.MINEXERCISEAMOUNT UND_MINEXERCISEAMOUNT,                  00013601
           T3.HELDAMOUNT UND_HELDAMOUNT, T3.PAYAMOUNT UND_PAYAMOUNT,    00013701
           T3.INCOMETAXRATE UND_INCOMETAXRATE,                          00013801
           T3.PREMIUMRATE UND_PREMIUMRATE,                              00013901
           T3.PARTICIPATIONRATE UND_PARTICIPATIONRATE,                  00014001
           T3.REBATE UND_REBATE, T3.CSRATING UND_CSRATING,              00014101
           T3.CSRISKINDIDSYMBOL UND_CSRISKINDIDSYMBOL,                  00014201
           T3.CSRISKINDSCHEMESYM UND_CSRISKINDSCHEMESYM,                00014301
           T3.CSRISKINSTGRPIDSYM UND_CSRISKINSTGRPIDSYM,                00014401
           T3.CSRISKINSGRPSCHSYM UND_CSRISKINSGRPSCHSYM,                00014501
           T3.MDYRATING UND_MDYRATING, T3.SPRATING UND_SPRATING,        00014601
           T3.FITCHRATING UND_FITCHRATING,                              00014701
           T3.LISTINGSYMBOLTKH UND_LISTINGSYMBOLTKH,                    00014801
           T3.LISTINGSYMBOLRIC UND_LISTINGSYMBOLRIC,                    00014901
           T3.LISTINGSYMBOLBBI UND_LISTINGSYMBOLBBI,                    00015001
           T310.SYMBOLI1 UND_NOMINALCURR_I1,                            00015101
           T310.SYMBOLI2 UND_NOMINALCURR_I2,                            00015201
           T310.SYMBOLCSCURR UND_NOMINALCURR_WS80,                      00015301
           T36.SYMBOLI1 UND_CSRISKCURRENCY_I1,                          00015401
           T36.SYMBOLI2 UND_CSRISKCURRENCY_I2,                          00015501
           T36.SYMBOLCSCURR UND_CSRISKCURRENCY_WS80,                    00015601
           T34.SYMBOLCH UND_CSRISINSTRUMENT_CH,                         00015701
           T34.SYMBOLISIN UND_CSRISINSTRUMENT_ISIN,                     00015801
           T34.SYMBOLCSFI UND_CSRISINSTRUMENT_CSFI,                     00015901
           T35.SYMBOLISOA2 UND_CSRISKCOUNTRY_A2,                        00016001
           T35.SYMBOLCSWS80DOM UND_CSRISKCOUNTRY_WS80,                  00016101
           T311.SYMBOLI1 UND_REPAYPRICECURR_I1,                         00016201
           T311.SYMBOLI2 UND_REPAYPRICECURR_I2,                         00016301
           T311.SYMBOLCSCURR UND_REPAYPRICECURR_WS80,                   00016401
           T38.SYMBOLI1 UND_ISSUEPRICECURR_I1,                          00016501
           T38.SYMBOLI2 UND_ISSUEPRICECURR_I2,                          00016601
           T38.SYMBOLCSCURR UND_ISSUEPRICECURR_WS80,                    00016701
           T37.SYMBOLI1 UND_EXERCISECURR_I1,                            00016801
           T37.SYMBOLI2 UND_EXERCISECURR_I2,                            00016901
           T37.SYMBOLCSCURR UND_EXERCISECURR_WS80,                      00017001
           T33.SYMBOLBCN UND_CSMAINTRADPLACE_BCN,                       00017101
           T33.SYMBOLCSWS80BPL UND_CSMAINTRADPLACE_WS80,                00017201
           T33.SYMBOLRTX UND_CSMAINTRADPLACE_RTX,                       00017301
           T33.SYMBOLBBX UND_CSMAINTRADPLACE_BBX,                       00017401
           T312.SYMBOLCH UND_UNDERINSTRUMENT_CH,                        00017501
           T312.SYMBOLISIN UND_UNDERINSTRUMENT_ISIN,                    00017601
           T312.SYMBOLCSFI UND_UNDERINSTRUMENT_CSFI,                    00017701
           T3.ORIGINALISSUER_GK UND_ORIGINALISSUER_GK,                  00017801
           T3.ISSUER_GK UND_ISSUER_GK,                                  00017901
           T3.MAINDEPOSITARY_GK UND_MAINDEPOSITARY_GK,                  00018001
           T3.EXPIRATIONDATE UND_EXPIRATIONDATE,                        00018101
           T3.MATURITYDATE UND_MATURITYDATE,                            00018201
           T3.FIRSTPAYDATE UND_FIRSTPAYDATE,                            00018301
           T3.FIRSTPYDATEPERYEAR UND_FIRSTPYDATEPERYEAR,                00018401
           T3.INTRSTDVDENFRDATE UND_INTRSTDVDENFRDATE,                  00018501
           T3.CSRATINGDATE UND_CSRATINGDATE,                            00018601
           T3.MDYRATINGDATE UND_MDYRATINGDATE,                          00018701
           T3.SPRATINGDATE UND_SPRATINGDATE,                            00018801
           T3.FITCHRATINGDATE UND_FITCHRATINGDATE,                      00018901
           T3.SUBSCRBEGINDATE UND_SUBSCRBEGINDATE,                      00019001
           T3.PAYMENTDATE UND_PAYMENTDATE,                              00019101
           T3.EXERCISEBEGINDATE UND_EXERCISEBEGINDATE,                  00019201
           T3.SUBSCRPLNDENDDATE UND_SUBSCRPLNDENDDATE,                  00019301
           T3.EXERCISEENDDATE UND_EXERCISEENDDATE,                      00019401
           T3.BVGTYPE UND_BVGTYPE,                                      00019501
           T3.CREDITWORTHINESSTP UND_CREDITWORTHINESSTP,                00019601
           T3.COMMISSIONCODETYPE UND_COMMISSIONCODETYPE,                00019701
           T3.UNITTYPE UND_UNITTYPE, T3.CSUNITTYPE UND_CSUNITTYPE,      00019801
           T3.EXPIRATIONTYPE UND_EXPIRATIONTYPE,                        00019901
           T3.STATUSTYPE UND_STATUSTYPE,                                00020001
           T3.REGISTRATIONTYPE UND_REGISTRATIONTYPE,                    00020101
           T3.BORROWERCATTYPE UND_BORROWERCATTYPE,                      00020201
           T3.CSLISTINGCODETYPE UND_CSLISTINGCODETYPE,                  00020301
           T3.CSSTATUSTYPE UND_CSSTATUSTYPE,                            00020401
           T3.STATUSDETAILTYPE UND_STATUSDETAILTYPE,                    00020501
           T3.INCOMEMODETYPE UND_INCOMEMODETYPE,                        00020601
           T3.INTERESTCALCTYPE UND_INTERESTCALCTYPE,                    00020701
           T3.INTERESTTYPE UND_INTERESTTYPE,                            00020801
           T3.PYFREQUNITTYPE UND_PYFREQUNITTYPE,                        00020901
           T3.SUBSCRMETHODTYPE UND_SUBSCRMETHODTYPE,                    00021001
           T3.PLACEMENTTYPE UND_PLACEMENTTYPE,                          00021101
           T3.PAYDIRECTIONTYPE UND_PAYDIRECTIONTYPE,                    00021201
           T3.OPTIONTYPE UND_OPTIONTYPE,                                00021301
           T3.SETTLESTYLETYPE UND_SETTLESTYLETYPE,                      00021401
           T3.CSFUNDTYPE UND_CSFUNDTYPE,                                00021501
           T3.TRADINGSTATUSTYPE UND_TRADINGSTATUSTYPE,                  00021601
           T3.LISTINGSTATUSTYPE UND_LISTINGSTATUSTYPE,                  00021701
           T3.EXERCISEPLACE UND_EXERCISEPLACE,                          00021801
           T3.NAME35_G UND_NAME35_G, T3.NAME35_E UND_NAME35_E,          00021901
           T3.NAME35_F UND_NAME35_F, T3.NAME35_I UND_NAME35_I,          00022001
           T3.NAME35_N UND_NAME35_N, T3.NAME45_G UND_NAME45_G,          00022101
           T3.NAME45_E UND_NAME45_E, T3.NAME45_F UND_NAME45_F,          00022201
           T3.NAME45_I UND_NAME45_I, T3.NAME45_N UND_NAME45_N,          00022301
           T3.SHORTNAME_G UND_SHORTNAME_G,                              00022401
           T3.SHORTNAME_E UND_SHORTNAME_E,                              00022501
           T3.SHORTNAME_F UND_SHORTNAME_F,                              00022601
           T3.SHORTNAME_I UND_SHORTNAME_I,                              00022701
           T3.SHORTNAME_N UND_SHORTNAME_N,                              00022801
           T3.PREPARTICLE_G UND_PREPARTICLE_G,                          00022901
           T3.PREPARTICLE_E UND_PREPARTICLE_E,                          00023001
           T3.PREPARTICLE_F UND_PREPARTICLE_F,                          00023101
           T3.PREPARTICLE_I UND_PREPARTICLE_I,                          00023201
           T3.PREPARTICLE_N UND_PREPARTICLE_N,                          00023301
           T3.POSTPARTICLE_G UND_POSTPARTICLE_G,                        00023401
           T3.POSTPARTICLE_E UND_POSTPARTICLE_E,                        00023501
           T3.POSTPARTICLE_F UND_POSTPARTICLE_F,                        00023601
           T3.POSTPARTICLE_I UND_POSTPARTICLE_I,                        00023701
           T3.POSTPARTICLE_N UND_POSTPARTICLE_N,                        00023801
           T3.ISINTERNAL UND_ISINTERNAL, T3.ISOTC UND_ISOTC,            00023901
           T3.HASWITHHOLDINGTAX UND_UND_HASWITHHOLDINGTAX,              00024001
           T3.HASFEDERALSTAMPDUTY UND_HASFEDERALSTAMPDUTY,              00024101
           T3.ISCSMIFIDCOMPLEX UND_ISCSMIFIDCOMPLEX,                    00024201
           T3.MOSTLIQUIDMARKETLOCATION UND_MOSTLQDMARKETLOCATION,       00024301
           T39.SYMBOLISOA2 UND_MOSTLQDMARKETLOCATION_A2,                00024401
           T39.SYMBOLISOA3 UND_MOSTLQDMARKETLOCATION_A3,                00024501
           T39.SYMBOLCSWS80DOM UND_MOSTLQDMARKETLOCATION_WS80,          00024601
           T3.MDYWATCHLISTSTATUSTYPE UND_MDYWATCHLISTSTATUSTYPE,        00024701
           T3.SPWATCHLISTSTATUSTYPE UND_SPWATCHLISTSTATUSTYPE,          00024801
           T3.FITCHWATCHLISTSTATUSTYPE UND_FITCHWATCHLISTSTATUSTYPE,    00024901
           T3.OPTIONSTYLETYPE UND_OPTIONSTYLETYPE,                      00025001
           T3.CSMAINTRADINGCURR UND_CSMAINTRADINGCURR,                  00025101
           T32.SYMBOLI1 UND_CSMAINTRADINGCURR_I1,                       00025201
           T32.SYMBOLI2 UND_CSMAINTRADINGCURR_I2,                       00025301
           T32.SYMBOLCSCURR UND_CSMAINTRADINGCURR_WS80,                 00025401
           T35.SYMBOLISOA3 UND_CSRISKCOUNTRY_A3,                        00025501
           T3.LIQUIDATIONRIGHTTYPE UND_LIQUIDATIONRIGHTTYPE,            00025601
           T3.CSMAINPARENTTRADINGPLACE UND_CSMAINPTRADINGPLACE,         00025701
           T31.SYMBOLBCN UND_CSMAINPTRADINGPLACE_BCN,                   00025801
           T31.SYMBOLRTX UND_CSMAINPTRADINGPLACE_RTX,                   00025901
           T31.SYMBOLMIC UND_CSMAINPTRADINGPLACE_MIC,                   00026001
           T31.SYMBOLBBX UND_CSMAINPTRADINGPLACE_BBX,                   00026101
           T31.SYMBOLCSWS80BPL UND_CSMAINPTRADINGPLACE_WS80,            00026201
           T4.ISSUECONDITIONNO, T4.AMOUNT, T4.PROVIDER1ID, T4.PRICE,    00026301
           T4.PROVIDER2ID, T4.PRICEUNITAMOUNT, T4.PROVIDER3ID,          00026401
           T4.PRICERANGEFROM, T4.ISINDIVPAYMENT, T4.PRICERANGETO,       00026501
           T4.HASPREFSUBSCRRIGHT, T4.MAXAMOUNT, T4.ISTAXED,             00026601
           T4.MINAMOUNT, T4.ISSUINGINSTITUTION, T4.TAXAMOUNT,           00026701
           T4.SUBSCRLOCATION, T4.MINSUBSCRAMOUNT, T4.ACCRINTERESTCURR,  00026801
           T4.MINSUBSCRINCREMENT, T4.PRICECURR, T4.PLACEMENTPRICE,      00026901
           T4.ROUNDOFFAMOUNT, T4.ACCRINTERESTAMOUNT,                    00027001
           T4.NOOFSECURITIES, T4.ROUNDOFFRULETYPE, T4.TAXVALUE,         00027101
           T4.STATUSTYPE ISSUE_STATUSTYPE, T4.YIELD, T4.PRICETYPE,      00027201
           T4.ACCRUEDINTEREST, T4.PRICEUNITTYPE, T4.INCOMESTARTDATE,    00027301
           T4.QUOTATIONTYPE, T4.ACCRINTRSTFROMDATE, T4.PAYMENTTYPE,     00027401
           T4.PAYMENTFROMDATE, T4.PAYMENTUNTILDATE,                     00027501
           T4.PRICEFIXINGDATE, T4.TAXTYPE, T4.SUBSCREFFENDDATE,         00027601
           T4.ISSUEAMOUNTTYPE, T4.ISSUETYPE, T4.PUBLICATION_I,          00027701
           T4.OVERSUBSCRRIGHTTP, T4.DESCRIPTION_N, T4.PROVISIONTYPE,    00027801
           T4.PUBLICATION_N, T4.SUBSCRPERIODTYPE, T4.TAXCURRENCY,       00027901
           T4.SUBSCRIPTIONPLACE, T4.TAXQUOTETYPE, T4.DESCRIPTION_G,     00028001
           T4.TAXUNITTYPE, T4.PUBLICATION_G, T4.SYNTHETICPRICECURR,     00028101
           T4.DESCRIPTION_E, T4.SYNTHETICPRICEAMOUNT,                   00028201
           T4.PUBLICATION_E, T4.SYNTHETICPRICERATE, T4.DESCRIPTION_F,   00028301
           T4.IPOTIMINGTYPE, T4.PUBLICATION_F, T4.IPOFILINGDATE,        00028401
           T4.DESCRIPTION_I, T4.IPODATE, T4.CSIPODESCRIPTION,           00028501
           T4.CSIPOCOMPANYDESCRIPTION,                                  00028601
           T4.CSSUBSCRIPTIONPLANNEDENDDATE, T4.FIRSTTRADINGDATE,        00028701
           T4.EXPECTEDALLOCATIONDATE, T4.ISISSUEINCREASABLE,            00028801
           T4.INITIALPRICINGBEGINDATE, T4.INITIALPRICINGENDDATE,        00028901
           T4.INITIALPRICINGFUNCTIONTYPE, T4.FINALPRICINGBEGINDATE,     00029001
           T4.FINALPRICINGENDDATE, T4.FINALPRICINGFUNCTIONTYPE,         00029101
           T4.SUBSCRPLNDENDDATE ISSUE_SUBSCRPLNDENDDATE,                00029201
           T4.INTERESTCALCTYPE ISSUE_INTERESTCALCTYPE,                  00029301
           T4.SUBSCRMETHODTYPE ISSUE_SUBSCRMETHODTYPE,                  00029401
           T4.PAYMENTDATE ISSUE_PAYMENTDATE,                            00029501
           T4.SUBSCRBEGINDATE ISSUE_SUBSCRBEGINDATE,                    00029601
           T4.PLACEMENTTYPE ISSUE_PLACEMENTTYPE, T4.CSISSUEDESK         00029701
      FROM VDPS2.VTINSTRFLATSYMBOLS T1                                  00029801
           INNER JOIN                                                   00029901
           VDPS2.VTINSTRFLATDATA T2                                     00030001
           ON T2.INSTRUMENTID = T1.INSTRUMENTID                         00030101
           LEFT OUTER JOIN                                              00030201
           VDPS2.VTINSTIFLATSYMBOLS T21                                 00030301
           ON (T2.CSMAINPARENTTRADINGPLACE = T21.INSTITUTIONID          00030401
           AND T21.CATEGORYVDPS = '104')                                00030501
           LEFT OUTER JOIN                                              00030601
           VDPS2.VTINSTRFLATSYMBOLS T22                                 00030701
           ON (T2.CSMAINTRADINGCURR = T22.INSTRUMENTID                  00030801
           AND T22.CATEGORYVDPS = '104')                                00030901
           LEFT OUTER JOIN                                              00031001
           VDPS2.VTINSTIFLATSYMBOLS T23                                 00031101
           ON (T2.CSMAINTRADPLACE = T23.INSTITUTIONID                   00031201
           AND T23.CATEGORYVDPS = '104')                                00031301
           LEFT OUTER JOIN                                              00031401
           VDPS2.VTINSTRFLATSYMBOLS T24                                 00031501
           ON T2.CSRISINSTRUMENT = T24.INSTRUMENTID                     00031601
           LEFT OUTER JOIN                                              00031701
           OA1A.TVV_VTGEOUNITFLATSYMBOLS T25                            00031801
           ON T2.CSRISKCOUNTRY = T25.GEOUNITID                          00031901
           LEFT OUTER JOIN                                              00032001
           VDPS2.VTINSTRFLATSYMBOLS T26                                 00032101
           ON (T2.CSRISKCURRENCY = T26.INSTRUMENTID                     00032201
           AND T26.CATEGORYVDPS = '10')                                 00032301
           LEFT OUTER JOIN                                              00032401
           VDPS2.VTINSTRFLATSYMBOLS T27                                 00032501
           ON (T2.EXERCISECURR = T27.INSTRUMENTID                       00032601
           AND T27.CATEGORYVDPS = '10')                                 00032701
           LEFT OUTER JOIN                                              00032801
           VDPS2.VTINSTRFLATSYMBOLS T28                                 00032901
           ON (T2.ISSUEPRICECURR = T28.INSTRUMENTID                     00033001
           AND T28.CATEGORYVDPS = '10')                                 00033101
           LEFT OUTER JOIN                                              00033201
           OA1A.TVV_VTGEOUNITFLATSYMBOLS T29                            00033301
           ON T2.MOSTLIQUIDMARKETLOCATION = T29.GEOUNITID               00033401
           LEFT OUTER JOIN                                              00033501
           VDPS2.VTINSTRFLATSYMBOLS T210                                00033601
           ON (T2.NOMINALCURR = T210.INSTRUMENTID                       00033701
           AND T210.CATEGORYVDPS = '10')                                00033801
           LEFT OUTER JOIN                                              00033901
           VDPS2.VTINSTRFLATSYMBOLS T212                                00034001
           ON T2.UNDERINSTRUMENT = T212.INSTRUMENTID                    00034101
           LEFT OUTER JOIN                                              00034201
           VDPS2.VTINSTRFLATSYMBOLS T211                                00034301
           ON (T2.REPAYPRICECURR = T211.INSTRUMENTID                    00034401
           AND T211.CATEGORYVDPS = '10')                                00034501
           LEFT OUTER JOIN                                              00034601
           VDPS2.VTINSTRFLATDATA T3                                     00034701
           ON T3.INSTRUMENTID = T2.UNDERINSTRUMENT                      00034801
           LEFT OUTER JOIN                                              00034901
           VDPS2.VTINSTIFLATSYMBOLS T31                                 00035001
           ON (T3.CSMAINPARENTTRADINGPLACE = T31.INSTITUTIONID          00035101
           AND T31.CATEGORYVDPS = '104')                                00035201
           LEFT OUTER JOIN                                              00035301
           VDPS2.VTINSTRFLATSYMBOLS T32                                 00035401
           ON (T3.CSMAINTRADINGCURR = T32.INSTRUMENTID                  00035501
           AND T32.CATEGORYVDPS = '10')                                 00035601
           LEFT OUTER JOIN                                              00035701
           VDPS2.VTINSTIFLATSYMBOLS T33                                 00035801
           ON (T3.CSMAINTRADPLACE = T33.INSTITUTIONID                   00035901
           AND T32.CATEGORYVDPS = '104')                                00036001
           LEFT OUTER JOIN                                              00036101
           VDPS2.VTINSTRFLATSYMBOLS T34                                 00036201
           ON T3.CSRISINSTRUMENT = T34.INSTRUMENTID                     00036301
           LEFT OUTER JOIN                                              00036401
           OA1A.TVV_VTGEOUNITFLATSYMBOLS T35                            00036501
           ON T3.CSRISKCOUNTRY = T35.GEOUNITID                          00036601
           LEFT OUTER JOIN                                              00036701
           VDPS2.VTINSTRFLATSYMBOLS T36                                 00036801
           ON (T3.CSRISKCURRENCY = T36.INSTRUMENTID                     00036901
           AND T36.CATEGORYVDPS = '10')                                 00037001
           LEFT OUTER JOIN                                              00037101
           VDPS2.VTINSTRFLATSYMBOLS T37                                 00037201
           ON (T3.EXERCISECURR = T37.INSTRUMENTID                       00037301
           AND T37.CATEGORYVDPS = '10')                                 00037401
           LEFT OUTER JOIN                                              00037501
           VDPS2.VTINSTRFLATSYMBOLS T38                                 00037601
           ON (T3.ISSUEPRICECURR = T38.INSTRUMENTID                     00037701
           AND T38.CATEGORYVDPS = '10')                                 00037801
           LEFT OUTER JOIN                                              00037901
           OA1A.TVV_VTGEOUNITFLATSYMBOLS T39                            00038001
           ON T3.MOSTLIQUIDMARKETLOCATION = T39.GEOUNITID               00038101
           LEFT OUTER JOIN                                              00038201
           VDPS2.VTINSTRFLATSYMBOLS T310                                00038301
           ON (T3.NOMINALCURR = T310.INSTRUMENTID                       00038401
           AND T310.CATEGORYVDPS = '10')                                00038501
           LEFT OUTER JOIN                                              00038601
           VDPS2.VTINSTRFLATSYMBOLS T311                                00038701
           ON (T3.REPAYPRICECURR = T311.INSTRUMENTID                    00038801
           AND T311.CATEGORYVDPS = '10')                                00038901
           LEFT OUTER JOIN                                              00039001
           VDPS2.VTINSTRFLATSYMBOLS T312                                00039101
           ON T3.UNDERINSTRUMENT = T312.INSTRUMENTID                    00039201
           LEFT OUTER JOIN                                              00039301
           VDPS2.VTISSUECONDITION T4                                    00039401
           ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.PROVIDER1ID =    00039501
           '1'                                                          00039601
   WHERE   T1.ROWSTATUS = 1                                             00039701
 -- AND    T1.SYMBOLCH       = '1213853'                                00039805
   fetch first 1000 rows only                                           00039905
;                                                                       00040001
select * from   plan_view2                                              00040101
    order by applname, progname, queryNo, qblockno, planno              00040201
;                                                                       00040301
rollback                                                                00040401
;x;                                                                     00040501
-- dynmaic sql without mqt, nidhi 26.8                                  00040600
--  EXPLAIN ALL SET QUERYNO=300 FOR                                     00040700
    SELECT T1.INSTRUMENTID, T1.ROWSTATUS, T1.SYMBOLCSFI, T1.SYMBOLCH,   00041000
           T1.SYMBOLISIN, T1.SYMBOLUS, T1.SYMBOLXS, T1.SYMBOLGB,        00050000
           T1.SYMBOLLU, T1.SYMBOLDE, T1.SYMBOLAT, T1.SYMBOLFR,          00060000
           T1.SYMBOLBE, T1.SYMBOLIT, T1.SYMBOLNL, T1.SYMBOLJP,          00070000
           T1.SYMBOLJ2, T1.SYMBOLDK, T1.SYMBOLSE, T1.SYMBOLI2,          00080000
           T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2, T1.SYMBOLCSCURR,      00090000
           T1.CATEGORYVDPS, T1.CATEGORYTKT, T1.CATEGORYTKSK,            00100000
           T1.CATEGORYTKZUS, T1.CATEGORYTKPRK, T1.CATEGORYTKTZ,         00110000
           T1.CATEGORYMAZU, T1.CATEGORYECBTR, T1.CATEGORYCFI,           00120000
           T1.CATEGORYEUZS, T1.CATEGORYCSGTA, T1.CATEGORYCSGMS,         00130000
           T1.CATEGUSTAXREPORT, T1.CATEGUSIRSADDITION,                  00140000
           T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,                        00150000
           T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,           00160000
           T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,     00170000
           T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,                  00180000
           T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,                   00190000
           T2.HASMULTIUNDERLYERS, T2.CSMAINTRADPLACE,                   00200000
           T2.ORIGINALISSUER, T2.ISSUER, T2.UNDERINSTRUMENT,            00210000
           T2.NOMINALCURR, T2.CSRISKCURRENCY, T2.CSRISKCOUNTRY,         00220000
           T2.CSRISINSTRUMENT, T2.REPAYPRICECURR, T2.ISSUEPRICECURR,    00230000
           T2.EXERCISECURR, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,        00240000
           T2.MINDENOMINATION, T2.EFFINTERESTRATE,                      00250000
           T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,       00260000
           T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,   00270000
           T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,    00280000
           T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,      00290000
           T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,               00300000
           T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,             00310000
           T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,    00320000
           T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,  00330000
           T2.SPRATING, T2.LISTINGSYMBOLTKH, T2.LISTINGSYMBOLRIC,       00340000
           T2.LISTINGSYMBOLBBI, T210.SYMBOLI1 NOMINALCURR_I1,           00350000
           T210.SYMBOLI2 NOMINALCURR_I2,                                00360000
           T210.SYMBOLCSCURR NOMINALCURR_WS80,                          00370000
           T26.SYMBOLI1 CSRISKCURRENCY_I1,                              00380000
           T26.SYMBOLI2 CSRISKCURRENCY_I2,                              00390000
           T26.SYMBOLCSCURR CSRISKCURRENCY_WS80,                        00400000
           T24.SYMBOLCH CSRISINSTRUMENT_CH,                             00410000
           T24.SYMBOLISIN CSRISINSTRUMENT_ISIN,                         00420000
           T24.SYMBOLCSFI CSRISINSTRUMENT_CSFI,                         00430000
           T25.SYMBOLISOA2 CSRISKCOUNTRY_A2,                            00440000
           T25.SYMBOLCSWS80DOM CSRISKCOUNTRY_WS80,                      00450000
           T211.SYMBOLI1 REPAYPRICECURR_I1,                             00460000
           T211.SYMBOLI2 REPAYPRICECURR_I2,                             00470000
           T211.SYMBOLCSCURR REPAYPRICECURR_WS80,                       00480000
           T28.SYMBOLI1 ISSUEPRICECURR_I1,                              00490000
           T28.SYMBOLI2 ISSUEPRICECURR_I2,                              00500000
           T28.SYMBOLCSCURR ISSUEPRICECURR_WS80,                        00510000
           T27.SYMBOLI1 EXERCISECURR_I1, T27.SYMBOLI2 EXERCISECURR_I2,  00520000
           T27.SYMBOLCSCURR EXERCISECURR_WS80,                          00530000
           T23.SYMBOLBCN CSMAINTRADPLACE_BCN,                           00540000
           T23.SYMBOLCSWS80BPL CSMAINTRADPLACE_WS80,                    00550000
           T23.SYMBOLRTX CSMAINTRADPLACE_RTX,                           00560000
           T23.SYMBOLBBX CSMAINTRADPLACE_BBX,                           00570000
           T212.SYMBOLCH UNDERINSTRUMENT_CH,                            00580000
           T212.SYMBOLISIN UNDERINSTRUMENT_ISIN,                        00590000
           T212.SYMBOLCSFI UNDERINSTRUMENT_CSFI, T2.ORIGINALISSUER_GK,  00600000
           T2.ISSUER_GK, T2.MAINDEPOSITARY_GK, T2.EXPIRATIONDATE,       00610000
           T2.MATURITYDATE, T2.FIRSTPAYDATE, T2.FIRSTPYDATEPERYEAR,     00620000
           T2.INTRSTDVDENFRDATE, T2.CSRATINGDATE, T2.MDYRATINGDATE,     00630000
           T2.SPRATINGDATE, T2.SUBSCRBEGINDATE, T2.PAYMENTDATE,         00640000
           T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,                  00650000
           T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,       00660000
           T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,           00670000
           T2.EXPIRATIONTYPE, T2.STATUSTYPE, T2.REGISTRATIONTYPE,       00680000
           T2.BORROWERCATTYPE, T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE,   00690000
           T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,                      00700000
           T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,     00710000
           T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,  00720000
           T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,            00730000
           T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,                  00740000
           T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,     00750000
           T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,          00760000
           T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,       00770000
           T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,              00780000
           T2.SHORTNAME_N, T2.PREPARTICLE_G, T2.PREPARTICLE_E,          00790000
           T2.PREPARTICLE_F, T2.PREPARTICLE_I, T2.PREPARTICLE_N,        00800000
           T2.POSTPARTICLE_G, T2.POSTPARTICLE_E, T2.POSTPARTICLE_F,     00810000
           T2.POSTPARTICLE_I, T2.POSTPARTICLE_N, T2.ISINTERNAL,         00820000
           T2.ISOTC, T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,      00830000
           T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION,            00840000
           T29.SYMBOLISOA2 MOSTLIQUIDMARKETLOCATION_A2,                 00850000
           T29.SYMBOLISOA3 MOSTLIQUIDMARKETLOCATION_A3,                 00860000
           T29.SYMBOLCSWS80DOM MOSTLIQUIDMARKETLOCATION_WS80,           00870000
           T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,         00880000
           T2.OPTIONSTYLETYPE, T2.CSMAINTRADINGCURR,                    00890000
           T22.SYMBOLI1 CSMAINTRADINGCURR_I1,                           00900000
           T22.SYMBOLI2 CSMAINTRADINGCURR_I2,                           00910000
           T22.SYMBOLCSCURR CSMAINTRADINGCURR_WS80,                     00920000
           T25.SYMBOLISOA3 CSRISKCOUNTRY_A3, T2.LIQUIDATIONRIGHTTYPE,   00930000
           T2.CSMAINPARENTTRADINGPLACE,                                 00940000
           T21.SYMBOLBCN CSMAINPARENTTRADINGPLACE_BCN,                  00950000
           T21.SYMBOLRTX CSMAINPARENTTRADINGPLACE_RTX,                  00960000
           T21.SYMBOLMIC CSMAINPARENTTRADINGPLACE_MIC,                  00970000
           T21.SYMBOLBBX CSMAINPARENTTRADINGPLACE_BBX,                  00980000
           T21.SYMBOLCSWS80BPL CSMAINPARENTTRADINGPLACE_WS80,           00990000
           T3.PAYFREQUENCY UND_PAYFREQUENCY,                            01000000
           T3.ISCALLFORTXREONLY UND_ISCALLFORTXREONLY,                  01010000
           T3.ISREDEEMABLE UND_ISREDEEMABLE,                            01020000
           T3.ISRETRACTABLE UND_ISRETRACTABLE,                          01030000
           T3.ISCONVERTBYHOLDER UND_ISCONVERTBYHOLDER,                  01040000
           T3.ISCONVERTBYISSUER UND_ISCONVERTBYISSUER,                  01050000
           T3.HASVOTINGRIGHTNO UND_HASVOTINGRIGHTNO,                    01060000
           T3.HASREDMPINVARCURR UND_HASREDMPINVARCURR,                  01070000
           T3.HASMULTIUNDERLYERS UND_HASMULTIUNDERLYERS,                01080000
           T3.CSMAINTRADPLACE UND_CSMAINTRADPLACE,                      01090000
           T3.ORIGINALISSUER UND_ORIGINALISSUER, T3.ISSUER UND_ISSUER,  01100000
           T3.UNDERINSTRUMENT UND_UNDERINSTRUMENT,                      01110000
           T3.NOMINALCURR UND_NOMINALCURR,                              01120000
           T3.CSRISKCURRENCY UND_CSRISKCURRENCY,                        01130000
           T3.CSRISKCOUNTRY UND_CSRISKCOUNTRY,                          01140000
           T3.CSRISINSTRUMENT UND_CSRISINSTRUMENT,                      01150000
           T3.REPAYPRICECURR UND_REPAYPRICECURR,                        01160000
           T3.ISSUEPRICECURR UND_ISSUEPRICECURR,                        01170000
           T3.EXERCISECURR UND_EXERCISECURR,                            01180000
           T3.MAINDEPOSITARY UND_MAINDEPOSITARY,                        01190000
           T3.NOMINALAMOUNT UND_NOMINALAMOUNT,                          01200000
           T3.MINDENOMINATION UND_MINDENOMINATION,                      01210000
           T3.EFFINTERESTRATE UND_EFFINTERESTRATE,                      01220000
           T3.REPAYPRICEAMOUNT UND_REPAYPRICEAMOUNT,                    01230000
           T3.REPAYPRICERATE UND_REPAYPRICERATE,                        01240000
           T3.POOLFACTOR UND_POOLFACTOR,                                01250000
           T3.VOTINGRIGHTNO UND_VOTINGRIGHTNO,                          01260000
           T3.OUTSTANDINGCAPITAL UND_OUTSTANDINGCAPITAL,                01270000
           T3.ISSUEDCAPITAL UND_ISSUEDCAPITAL,                          01280000
           T3.OUTSTANDCAPITALNO UND_OUTSTANDCAPITALNO,                  01290000
           T3.ISSUEDCAPITALNO UND_ISSUEDCAPITALNO,                      01300000
           T3.ISSUEAMOUNT UND_ISSUEAMOUNT,                              01310000
           T3.ISSUEPRICE UND_ISSUEPRICE,                                01320000
           T3.EXERCISEAMOUNT UND_EXERCISEAMOUNT,                        01330000
           T3.MINEXERCISEAMOUNT UND_MINEXERCISEAMOUNT,                  01340000
           T3.HELDAMOUNT UND_HELDAMOUNT, T3.PAYAMOUNT UND_PAYAMOUNT,    01350000
           T3.INCOMETAXRATE UND_INCOMETAXRATE,                          01360000
           T3.PREMIUMRATE UND_PREMIUMRATE,                              01370000
           T3.PARTICIPATIONRATE UND_PARTICIPATIONRATE,                  01380000
           T3.REBATE UND_REBATE, T3.CSRATING UND_CSRATING,              01390000
           T3.CSRISKINDIDSYMBOL UND_CSRISKINDIDSYMBOL,                  01400000
           T3.CSRISKINDSCHEMESYM UND_CSRISKINDSCHEMESYM,                01410000
           T3.CSRISKINSTGRPIDSYM UND_CSRISKINSTGRPIDSYM,                01420000
           T3.CSRISKINSGRPSCHSYM UND_CSRISKINSGRPSCHSYM,                01430000
           T3.MDYRATING UND_MDYRATING, T3.SPRATING UND_SPRATING,        01440000
           T3.FITCHRATING UND_FITCHRATING,                              01450000
           T3.LISTINGSYMBOLTKH UND_LISTINGSYMBOLTKH,                    01460000
           T3.LISTINGSYMBOLRIC UND_LISTINGSYMBOLRIC,                    01470000
           T3.LISTINGSYMBOLBBI UND_LISTINGSYMBOLBBI,                    01480000
           T310.SYMBOLI1 UND_NOMINALCURR_I1,                            01490000
           T310.SYMBOLI2 UND_NOMINALCURR_I2,                            01500000
           T310.SYMBOLCSCURR UND_NOMINALCURR_WS80,                      01510000
           T36.SYMBOLI1 UND_CSRISKCURRENCY_I1,                          01520000
           T36.SYMBOLI2 UND_CSRISKCURRENCY_I2,                          01530000
           T36.SYMBOLCSCURR UND_CSRISKCURRENCY_WS80,                    01540000
           T34.SYMBOLCH UND_CSRISINSTRUMENT_CH,                         01550000
           T34.SYMBOLISIN UND_CSRISINSTRUMENT_ISIN,                     01560000
           T34.SYMBOLCSFI UND_CSRISINSTRUMENT_CSFI,                     01570000
           T35.SYMBOLISOA2 UND_CSRISKCOUNTRY_A2,                        01580000
           T35.SYMBOLCSWS80DOM UND_CSRISKCOUNTRY_WS80,                  01590000
           T311.SYMBOLI1 UND_REPAYPRICECURR_I1,                         01600000
           T311.SYMBOLI2 UND_REPAYPRICECURR_I2,                         01610000
           T311.SYMBOLCSCURR UND_REPAYPRICECURR_WS80,                   01620000
           T38.SYMBOLI1 UND_ISSUEPRICECURR_I1,                          01630000
           T38.SYMBOLI2 UND_ISSUEPRICECURR_I2,                          01640000
           T38.SYMBOLCSCURR UND_ISSUEPRICECURR_WS80,                    01650000
           T37.SYMBOLI1 UND_EXERCISECURR_I1,                            01660000
           T37.SYMBOLI2 UND_EXERCISECURR_I2,                            01670000
           T37.SYMBOLCSCURR UND_EXERCISECURR_WS80,                      01680000
           T33.SYMBOLBCN UND_CSMAINTRADPLACE_BCN,                       01690000
           T33.SYMBOLCSWS80BPL UND_CSMAINTRADPLACE_WS80,                01700000
           T33.SYMBOLRTX UND_CSMAINTRADPLACE_RTX,                       01710000
           T33.SYMBOLBBX UND_CSMAINTRADPLACE_BBX,                       01720000
           T312.SYMBOLCH UND_UNDERINSTRUMENT_CH,                        01730000
           T312.SYMBOLISIN UND_UNDERINSTRUMENT_ISIN,                    01740000
           T312.SYMBOLCSFI UND_UNDERINSTRUMENT_CSFI,                    01750000
           T3.ORIGINALISSUER_GK UND_ORIGINALISSUER_GK,                  01760000
           T3.ISSUER_GK UND_ISSUER_GK,                                  01770000
           T3.MAINDEPOSITARY_GK UND_MAINDEPOSITARY_GK,                  01780000
           T3.EXPIRATIONDATE UND_EXPIRATIONDATE,                        01790000
           T3.MATURITYDATE UND_MATURITYDATE,                            01800000
           T3.FIRSTPAYDATE UND_FIRSTPAYDATE,                            01810000
           T3.FIRSTPYDATEPERYEAR UND_FIRSTPYDATEPERYEAR,                01820000
           T3.INTRSTDVDENFRDATE UND_INTRSTDVDENFRDATE,                  01830000
           T3.CSRATINGDATE UND_CSRATINGDATE,                            01840000
           T3.MDYRATINGDATE UND_MDYRATINGDATE,                          01850000
           T3.SPRATINGDATE UND_SPRATINGDATE,                            01860000
           T3.FITCHRATINGDATE UND_FITCHRATINGDATE,                      01870000
           T3.SUBSCRBEGINDATE UND_SUBSCRBEGINDATE,                      01880000
           T3.PAYMENTDATE UND_PAYMENTDATE,                              01890000
           T3.EXERCISEBEGINDATE UND_EXERCISEBEGINDATE,                  01900000
           T3.SUBSCRPLNDENDDATE UND_SUBSCRPLNDENDDATE,                  01910000
           T3.EXERCISEENDDATE UND_EXERCISEENDDATE,                      01920000
           T3.BVGTYPE UND_BVGTYPE,                                      01930000
           T3.CREDITWORTHINESSTP UND_CREDITWORTHINESSTP,                01940000
           T3.COMMISSIONCODETYPE UND_COMMISSIONCODETYPE,                01950000
           T3.UNITTYPE UND_UNITTYPE, T3.CSUNITTYPE UND_CSUNITTYPE,      01960000
           T3.EXPIRATIONTYPE UND_EXPIRATIONTYPE,                        01970000
           T3.STATUSTYPE UND_STATUSTYPE,                                01980000
           T3.REGISTRATIONTYPE UND_REGISTRATIONTYPE,                    01990000
           T3.BORROWERCATTYPE UND_BORROWERCATTYPE,                      02000000
           T3.CSLISTINGCODETYPE UND_CSLISTINGCODETYPE,                  02010000
           T3.CSSTATUSTYPE UND_CSSTATUSTYPE,                            02020000
           T3.STATUSDETAILTYPE UND_STATUSDETAILTYPE,                    02030000
           T3.INCOMEMODETYPE UND_INCOMEMODETYPE,                        02040000
           T3.INTERESTCALCTYPE UND_INTERESTCALCTYPE,                    02050000
           T3.INTERESTTYPE UND_INTERESTTYPE,                            02060000
           T3.PYFREQUNITTYPE UND_PYFREQUNITTYPE,                        02070000
           T3.SUBSCRMETHODTYPE UND_SUBSCRMETHODTYPE,                    02080000
           T3.PLACEMENTTYPE UND_PLACEMENTTYPE,                          02090000
           T3.PAYDIRECTIONTYPE UND_PAYDIRECTIONTYPE,                    02100000
           T3.OPTIONTYPE UND_OPTIONTYPE,                                02110000
           T3.SETTLESTYLETYPE UND_SETTLESTYLETYPE,                      02120000
           T3.CSFUNDTYPE UND_CSFUNDTYPE,                                02130000
           T3.TRADINGSTATUSTYPE UND_TRADINGSTATUSTYPE,                  02140000
           T3.LISTINGSTATUSTYPE UND_LISTINGSTATUSTYPE,                  02150000
           T3.EXERCISEPLACE UND_EXERCISEPLACE,                          02160000
           T3.NAME35_G UND_NAME35_G, T3.NAME35_E UND_NAME35_E,          02170000
           T3.NAME35_F UND_NAME35_F, T3.NAME35_I UND_NAME35_I,          02180000
           T3.NAME35_N UND_NAME35_N, T3.NAME45_G UND_NAME45_G,          02190000
           T3.NAME45_E UND_NAME45_E, T3.NAME45_F UND_NAME45_F,          02200000
           T3.NAME45_I UND_NAME45_I, T3.NAME45_N UND_NAME45_N,          02210000
           T3.SHORTNAME_G UND_SHORTNAME_G,                              02220000
           T3.SHORTNAME_E UND_SHORTNAME_E,                              02230000
           T3.SHORTNAME_F UND_SHORTNAME_F,                              02240000
           T3.SHORTNAME_I UND_SHORTNAME_I,                              02250000
           T3.SHORTNAME_N UND_SHORTNAME_N,                              02260000
           T3.PREPARTICLE_G UND_PREPARTICLE_G,                          02270000
           T3.PREPARTICLE_E UND_PREPARTICLE_E,                          02280000
           T3.PREPARTICLE_F UND_PREPARTICLE_F,                          02290000
           T3.PREPARTICLE_I UND_PREPARTICLE_I,                          02300000
           T3.PREPARTICLE_N UND_PREPARTICLE_N,                          02310000
           T3.POSTPARTICLE_G UND_POSTPARTICLE_G,                        02320000
           T3.POSTPARTICLE_E UND_POSTPARTICLE_E,                        02330000
           T3.POSTPARTICLE_F UND_POSTPARTICLE_F,                        02340000
           T3.POSTPARTICLE_I UND_POSTPARTICLE_I,                        02350000
           T3.POSTPARTICLE_N UND_POSTPARTICLE_N,                        02360000
           T3.ISINTERNAL UND_ISINTERNAL, T3.ISOTC UND_ISOTC,            02370000
           T3.HASWITHHOLDINGTAX UND_UND_HASWITHHOLDINGTAX,              02380000
           T3.HASFEDERALSTAMPDUTY UND_HASFEDERALSTAMPDUTY,              02390000
           T3.ISCSMIFIDCOMPLEX UND_ISCSMIFIDCOMPLEX,                    02400000
           T3.MOSTLIQUIDMARKETLOCATION UND_MOSTLQDMARKETLOCATION,       02410000
           T39.SYMBOLISOA2 UND_MOSTLQDMARKETLOCATION_A2,                02420000
           T39.SYMBOLISOA3 UND_MOSTLQDMARKETLOCATION_A3,                02430000
           T39.SYMBOLCSWS80DOM UND_MOSTLQDMARKETLOCATION_WS80,          02440000
           T3.MDYWATCHLISTSTATUSTYPE UND_MDYWATCHLISTSTATUSTYPE,        02450000
           T3.SPWATCHLISTSTATUSTYPE UND_SPWATCHLISTSTATUSTYPE,          02460000
           T3.FITCHWATCHLISTSTATUSTYPE UND_FITCHWATCHLISTSTATUSTYPE,    02470000
           T3.OPTIONSTYLETYPE UND_OPTIONSTYLETYPE,                      02480000
           T3.CSMAINTRADINGCURR UND_CSMAINTRADINGCURR,                  02490000
           T32.SYMBOLI1 UND_CSMAINTRADINGCURR_I1,                       02500000
           T32.SYMBOLI2 UND_CSMAINTRADINGCURR_I2,                       02510000
           T32.SYMBOLCSCURR UND_CSMAINTRADINGCURR_WS80,                 02520000
           T35.SYMBOLISOA3 UND_CSRISKCOUNTRY_A3,                        02530000
           T3.LIQUIDATIONRIGHTTYPE UND_LIQUIDATIONRIGHTTYPE,            02540000
           T3.CSMAINPARENTTRADINGPLACE UND_CSMAINPTRADINGPLACE,         02550000
           T31.SYMBOLBCN UND_CSMAINPTRADINGPLACE_BCN,                   02560000
           T31.SYMBOLRTX UND_CSMAINPTRADINGPLACE_RTX,                   02570000
           T31.SYMBOLMIC UND_CSMAINPTRADINGPLACE_MIC,                   02580000
           T31.SYMBOLBBX UND_CSMAINPTRADINGPLACE_BBX,                   02590000
           T31.SYMBOLCSWS80BPL UND_CSMAINPTRADINGPLACE_WS80,            02600000
           T4.ISSUECONDITIONNO, T4.AMOUNT, T4.PROVIDER1ID, T4.PRICE,    02610000
           T4.PROVIDER2ID, T4.PRICEUNITAMOUNT, T4.PROVIDER3ID,          02620000
           T4.PRICERANGEFROM, T4.ISINDIVPAYMENT, T4.PRICERANGETO,       02630000
           T4.HASPREFSUBSCRRIGHT, T4.MAXAMOUNT, T4.ISTAXED,             02640000
           T4.MINAMOUNT, T4.ISSUINGINSTITUTION, T4.TAXAMOUNT,           02650000
           T4.SUBSCRLOCATION, T4.MINSUBSCRAMOUNT, T4.ACCRINTERESTCURR,  02660000
           T4.MINSUBSCRINCREMENT, T4.PRICECURR, T4.PLACEMENTPRICE,      02670000
           T4.ROUNDOFFAMOUNT, T4.ACCRINTERESTAMOUNT,                    02680000
           T4.NOOFSECURITIES, T4.ROUNDOFFRULETYPE, T4.TAXVALUE,         02690000
           T4.STATUSTYPE ISSUE_STATUSTYPE, T4.YIELD, T4.PRICETYPE,      02700000
           T4.ACCRUEDINTEREST, T4.PRICEUNITTYPE, T4.INCOMESTARTDATE,    02710000
           T4.QUOTATIONTYPE, T4.ACCRINTRSTFROMDATE, T4.PAYMENTTYPE,     02720000
           T4.PAYMENTFROMDATE, T4.PAYMENTUNTILDATE,                     02730000
           T4.PRICEFIXINGDATE, T4.TAXTYPE, T4.SUBSCREFFENDDATE,         02740000
           T4.ISSUEAMOUNTTYPE, T4.ISSUETYPE, T4.PUBLICATION_I,          02750000
           T4.OVERSUBSCRRIGHTTP, T4.DESCRIPTION_N, T4.PROVISIONTYPE,    02760000
           T4.PUBLICATION_N, T4.SUBSCRPERIODTYPE, T4.TAXCURRENCY,       02770000
           T4.SUBSCRIPTIONPLACE, T4.TAXQUOTETYPE, T4.DESCRIPTION_G,     02780000
           T4.TAXUNITTYPE, T4.PUBLICATION_G, T4.SYNTHETICPRICECURR,     02790000
           T4.DESCRIPTION_E, T4.SYNTHETICPRICEAMOUNT,                   02800000
           T4.PUBLICATION_E, T4.SYNTHETICPRICERATE, T4.DESCRIPTION_F,   02810000
           T4.IPOTIMINGTYPE, T4.PUBLICATION_F, T4.IPOFILINGDATE,        02820000
           T4.DESCRIPTION_I, T4.IPODATE, T4.CSIPODESCRIPTION,           02830000
           T4.CSIPOCOMPANYDESCRIPTION,                                  02840000
           T4.CSSUBSCRIPTIONPLANNEDENDDATE, T4.FIRSTTRADINGDATE,        02850000
           T4.EXPECTEDALLOCATIONDATE, T4.ISISSUEINCREASABLE,            02860000
           T4.INITIALPRICINGBEGINDATE, T4.INITIALPRICINGENDDATE,        02870000
           T4.INITIALPRICINGFUNCTIONTYPE, T4.FINALPRICINGBEGINDATE,     02880000
           T4.FINALPRICINGENDDATE, T4.FINALPRICINGFUNCTIONTYPE,         02890000
           T4.SUBSCRPLNDENDDATE ISSUE_SUBSCRPLNDENDDATE,                02900000
           T4.INTERESTCALCTYPE ISSUE_INTERESTCALCTYPE,                  02910000
           T4.SUBSCRMETHODTYPE ISSUE_SUBSCRMETHODTYPE,                  02920000
           T4.PAYMENTDATE ISSUE_PAYMENTDATE,                            02930000
           T4.SUBSCRBEGINDATE ISSUE_SUBSCRBEGINDATE,                    02940000
           T4.PLACEMENTTYPE ISSUE_PLACEMENTTYPE, T4.CSISSUEDESK         02950000
      FROM VDPS2.VTINSTRFLATSYMBOLS T1                                  02960000
           INNER JOIN                                                   02970000
           VDPS2.VTINSTRFLATDATA T2                                     02980000
           ON T2.INSTRUMENTID = T1.INSTRUMENTID                         02990000
           LEFT OUTER JOIN                                              03000000
           VDPS2.VTINSTIFLATSYMBOLS T21                                 03010000
           ON T2.CSMAINPARENTTRADINGPLACE = T21.INSTITUTIONID           03020000
           LEFT OUTER JOIN                                              03030000
           VDPS2.VTINSTRFLATSYMBOLS T22                                 03040000
           ON T2.CSMAINTRADINGCURR = T22.INSTRUMENTID                   03050000
           LEFT OUTER JOIN                                              03060000
           VDPS2.VTINSTIFLATSYMBOLS T23                                 03070000
           ON T2.CSMAINTRADPLACE = T23.INSTITUTIONID                    03080000
           LEFT OUTER JOIN                                              03090000
           VDPS2.VTINSTRFLATSYMBOLS T24                                 03100000
           ON T2.CSRISINSTRUMENT = T24.INSTRUMENTID                     03110000
           LEFT OUTER JOIN                                              03120000
           OA1A.TVV_VTGEOUNITFLATSYMBOLS T25                            03130000
           ON T2.CSRISKCOUNTRY = T25.GEOUNITID                          03140000
           LEFT OUTER JOIN                                              03150000
           VDPS2.VTINSTRFLATSYMBOLS T26                                 03160000
           ON T2.CSRISKCURRENCY = T26.INSTRUMENTID                      03170000
           LEFT OUTER JOIN                                              03180000
           VDPS2.VTINSTRFLATSYMBOLS T27                                 03190000
           ON T2.EXERCISECURR = T27.INSTRUMENTID                        03200000
           LEFT OUTER JOIN                                              03210000
           VDPS2.VTINSTRFLATSYMBOLS T28                                 03220000
           ON T2.ISSUEPRICECURR = T28.INSTRUMENTID                      03230000
           LEFT OUTER JOIN                                              03240000
           OA1A.TVV_VTGEOUNITFLATSYMBOLS T29                            03250000
           ON T2.MOSTLIQUIDMARKETLOCATION = T29.GEOUNITID               03260000
           LEFT OUTER JOIN                                              03270000
           VDPS2.VTINSTRFLATSYMBOLS T210                                03280000
           ON T2.NOMINALCURR = T210.INSTRUMENTID                        03290000
           LEFT OUTER JOIN                                              03300000
           VDPS2.VTINSTRFLATSYMBOLS T212                                03310000
           ON T2.UNDERINSTRUMENT = T212.INSTRUMENTID                    03320000
           LEFT OUTER JOIN                                              03330000
           VDPS2.VTINSTRFLATSYMBOLS T211                                03340000
           ON T2.REPAYPRICECURR = T211.INSTRUMENTID                     03350000
           LEFT OUTER JOIN                                              03360000
           VDPS2.VTINSTRFLATDATA T3                                     03370000
           ON T3.INSTRUMENTID = T2.UNDERINSTRUMENT                      03380000
           LEFT OUTER JOIN                                              03390000
           VDPS2.VTINSTIFLATSYMBOLS T31                                 03400000
           ON T3.CSMAINPARENTTRADINGPLACE = T31.INSTITUTIONID           03410000
           LEFT OUTER JOIN                                              03420000
           VDPS2.VTINSTRFLATSYMBOLS T32                                 03430000
           ON T3.CSMAINTRADINGCURR = T32.INSTRUMENTID                   03440000
           LEFT OUTER JOIN                                              03450000
           VDPS2.VTINSTIFLATSYMBOLS T33                                 03460000
           ON T3.CSMAINTRADPLACE = T33.INSTITUTIONID                    03470000
           LEFT OUTER JOIN                                              03480000
           VDPS2.VTINSTRFLATSYMBOLS T34                                 03490000
           ON T3.CSRISINSTRUMENT = T34.INSTRUMENTID                     03500000
           LEFT OUTER JOIN                                              03510000
           OA1A.TVV_VTGEOUNITFLATSYMBOLS T35                            03520000
           ON T3.CSRISKCOUNTRY = T35.GEOUNITID                          03530000
           LEFT OUTER JOIN                                              03540000
           VDPS2.VTINSTRFLATSYMBOLS T36                                 03550000
           ON T3.CSRISKCURRENCY = T36.INSTRUMENTID                      03560000
           LEFT OUTER JOIN                                              03570000
           VDPS2.VTINSTRFLATSYMBOLS T37                                 03580000
           ON T3.EXERCISECURR = T37.INSTRUMENTID                        03590000
           LEFT OUTER JOIN                                              03600000
           VDPS2.VTINSTRFLATSYMBOLS T38                                 03610000
           ON T3.ISSUEPRICECURR = T38.INSTRUMENTID                      03620000
           LEFT OUTER JOIN                                              03630000
           OA1A.TVV_VTGEOUNITFLATSYMBOLS T39                            03640000
           ON T3.MOSTLIQUIDMARKETLOCATION = T39.GEOUNITID               03650000
           LEFT OUTER JOIN                                              03660000
           VDPS2.VTINSTRFLATSYMBOLS T310                                03670000
           ON T3.NOMINALCURR = T310.INSTRUMENTID                        03680000
           LEFT OUTER JOIN                                              03690000
           VDPS2.VTINSTRFLATSYMBOLS T311                                03700000
           ON T3.REPAYPRICECURR = T311.INSTRUMENTID                     03710000
           LEFT OUTER JOIN                                              03720000
           VDPS2.VTINSTRFLATSYMBOLS T312                                03730000
           ON T3.UNDERINSTRUMENT = T312.INSTRUMENTID                    03740000
           LEFT OUTER JOIN                                              03750000
           VDPS2.VTISSUECONDITION T4                                    03760000
           ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.PROVIDER1ID =    03770000
           '1'                                                          03780000
   WHERE   T1.ROWSTATUS = 1                                             03790000
    AND    T1.SYMBOLCH       = '1213853'                                03800000
   WITH UR                                                              03810000
;                                                                       03820001
select * from   plan_view2                                              03830001
    order by applname, progname, queryNo, qblockno, planno              03840001
;                                                                       03850001
rollback                                                                03860001
;x;                                                                     03870001
}¢--- A540769.WK.SQL(VDPSMQT2) cre=2010-08-26 mod=2010-08-31-16.50.40 A540769 ---
 -- STATIC NO MQTNIDHI 31.8                                             00010013
 -- from ORG.U0009.B0106.KAXV3.SQL(SCATVDPS)                            00020013
 set current sqlid = 'A540769';                                         00030013
    DELETE FROM         PLAN_TABLE;                                     00040013
--  EXPLAIN ALL SET QUERYNO=300 FOR                                     00050016
    SELECT count(*), fs.symbolch,                                       00060019
           FD.INSTRUMENTID, FD.PAYFREQUENCY,                            00061017
           FD.CREATETIMESTAMP CREATETIMESTAMP_FD,                       00070013
           FD.UPDATETIMESTAMP UPDATETIMESTAMP_FD,                       00080013
           FD.ISCALLFORTXREONLY, FD.ISREDEEMABLE, FD.ISRETRACTABLE,     00090013
           FD.ISCONVERTBYHOLDER, FD.ISCONVERTBYISSUER,                  00100013
           FD.HASVOTINGRIGHTNO, FD.HASREDMPINVARCURR,                   00110013
           FD.HASMULTIUNDERLYERS, FD.CSMAINTRADPLACE,                   00120013
           FD.ORIGINALISSUER, FD.ISSUER, FD.UNDERINSTRUMENT,            00130013
           FD.NOMINALCURR, FD.CSRISKCURRENCY, FD.CSRISKCOUNTRY,         00140013
           FD.CSRISINSTRUMENT, FD.REPAYPRICECURR, FD.ISSUEPRICECURR,    00150013
           FD.EXERCISECURR, FD.MAINDEPOSITARY, FD.NOMINALAMOUNT,        00160013
           FD.MINDENOMINATION, FD.EFFINTERESTRATE,                      00170013
           FD.REPAYPRICEAMOUNT, FD.REPAYPRICERATE, FD.POOLFACTOR,       00180013
           FD.VOTINGRIGHTNO, FD.OUTSTANDINGCAPITAL, FD.ISSUEDCAPITAL,   00190013
           FD.OUTSTANDCAPITALNO, FD.ISSUEDCAPITALNO, FD.ISSUEAMOUNT,    00200013
           FD.ISSUEPRICE, FD.EXERCISEAMOUNT, FD.MINEXERCISEAMOUNT,      00210013
           FD.HELDAMOUNT, FD.PAYAMOUNT, FD.INCOMETAXRATE,               00220013
           FD.PREMIUMRATE, FD.PARTICIPATIONRATE, FD.REBATE,             00230013
           FD.CSRATING, FD.CSRISKINDIDSYMBOL, FD.CSRISKINDSCHEMESYM,    00240013
           FD.CSRISKINSTGRPIDSYM, FD.CSRISKINSGRPSCHSYM, FD.MDYRATING,  00250013
           FD.SPRATING, FD.LISTINGSYMBOLTKH, FD.LISTINGSYMBOLRIC,       00260013
           FD.LISTINGSYMBOLBBI, NCUR.SYMBOLI1 NOMINALCURR_I1,           00270013
           NCUR.SYMBOLI2 NOMINALCURR_I2,                                00280013
           NCUR.SYMBOLCSCURR NOMINALCURR_WS80,                          00290013
           RCUR.SYMBOLI1 CSRISKCURRENCY_I1,                             00300013
           RCUR.SYMBOLI2 CSRISKCURRENCY_I2,                             00310013
           RCUR.SYMBOLCSCURR CSRISKCURRENCY_WS80,                       00320013
           RINS.SYMBOLCH CSRISINSTRUMENT_CH,                            00330013
           RINS.SYMBOLISIN CSRISINSTRUMENT_ISIN,                        00340013
           RINS.SYMBOLCSFI CSRISINSTRUMENT_CSFI,                        00350013
           RCTY.SYMBOLISOA2 CSRISKCOUNTRY_A2,                           00360013
           RCTY.SYMBOLCSWS80DOM CSRISKCOUNTRY_WS80,                     00370013
           PCUR.SYMBOLI1 REPAYPRICECURR_I1,                             00380013
           PCUR.SYMBOLI2 REPAYPRICECURR_I2,                             00390013
           PCUR.SYMBOLCSCURR REPAYPRICECURR_WS80,                       00400013
           ICUR.SYMBOLI1 ISSUEPRICECURR_I1,                             00410013
           ICUR.SYMBOLI2 ISSUEPRICECURR_I2,                             00420013
           ICUR.SYMBOLCSCURR ISSUEPRICECURR_WS80,                       00430013
           ECUR.SYMBOLI1 EXERCISECURR_I1,                               00440013
           ECUR.SYMBOLI2 EXERCISECURR_I2,                               00450013
           ECUR.SYMBOLCSCURR EXERCISECURR_WS80,                         00460013
           MBPL.SYMBOLBCN CSMAINTRADPLACE_BCN,                          00470013
           MBPL.SYMBOLCSWS80BPL CSMAINTRADPLACE_WS80,                   00480013
           MBPL.SYMBOLRTX CSMAINTRADPLACE_RTX,                          00490013
           MBPL.SYMBOLBBX CSMAINTRADPLACE_BBX,                          00500013
           UINS.SYMBOLCH UNDERINSTRUMENT_CH,                            00510013
           UINS.SYMBOLISIN UNDERINSTRUMENT_ISIN,                        00520013
           UINS.SYMBOLCSFI UNDERINSTRUMENT_CSFI, FD.ORIGINALISSUER_GK,  00530013
           FD.ISSUER_GK, FD.MAINDEPOSITARY_GK, FD.EXPIRATIONDATE,       00540013
           FD.MATURITYDATE, FD.FIRSTPAYDATE, FD.FIRSTPYDATEPERYEAR,     00550013
           FD.INTRSTDVDENFRDATE, FD.CSRATINGDATE, FD.MDYRATINGDATE,     00560013
           FD.SPRATINGDATE, FD.SUBSCRBEGINDATE, FD.PAYMENTDATE,         00570013
           FD.EXERCISEBEGINDATE, FD.SUBSCRPLNDENDDATE,                  00580013
           FD.EXERCISEENDDATE, FD.BVGTYPE, FD.CREDITWORTHINESSTP,       00590013
           FD.COMMISSIONCODETYPE, FD.UNITTYPE, FD.CSUNITTYPE,           00600013
           FD.EXPIRATIONTYPE, FD.STATUSTYPE STATUSTYPE_FD,              00610013
           FD.REGISTRATIONTYPE, FD.BORROWERCATTYPE,                     00620013
           FD.CSLISTINGCODETYPE, FD.CSSTATUSTYPE CSSTATUSTYPE_FD,       00630013
           FD.STATUSDETAILTYPE, FD.INCOMEMODETYPE,                      00640013
           FD.INTERESTCALCTYPE, FD.INTERESTTYPE, FD.PYFREQUNITTYPE,     00650013
           FD.SUBSCRMETHODTYPE, FD.PLACEMENTTYPE, FD.PAYDIRECTIONTYPE,  00660013
           FD.OPTIONTYPE, FD.SETTLESTYLETYPE, FD.CSFUNDTYPE,            00670013
           FD.TRADINGSTATUSTYPE, FD.LISTINGSTATUSTYPE,                  00680013
           FD.EXERCISEPLACE, FD.NAME35_G, FD.NAME35_E, FD.NAME35_F,     00690013
           FD.NAME35_I, FD.NAME35_N, FD.NAME45_G, FD.NAME45_E,          00700013
           FD.NAME45_F, FD.NAME45_I, FD.NAME45_N, FD.SHORTNAME_G,       00710013
           FD.SHORTNAME_E, FD.SHORTNAME_F, FD.SHORTNAME_I,              00720013
           FD.SHORTNAME_N, FD.PREPARTICLE_G, FD.PREPARTICLE_E,          00730013
           FD.PREPARTICLE_F, FD.PREPARTICLE_I, FD.PREPARTICLE_N,        00740013
           FD.POSTPARTICLE_G, FD.POSTPARTICLE_E, FD.POSTPARTICLE_F,     00750013
           FD.POSTPARTICLE_I, FD.POSTPARTICLE_N, FD.ISINTERNAL,         00760013
           FD.ISOTC, FD.HASWITHHOLDINGTAX, FD.HASFEDERALSTAMPDUTY,      00770013
           FD.ISCSMIFIDCOMPLEX, FD.MOSTLIQUIDMARKETLOCATION,            00780013
           MLOC.SYMBOLISOA2 MOSTLIQUIDMARKETLOCATION_A2,                00790013
           MLOC.SYMBOLISOA3 MOSTLIQUIDMARKETLOCATION_A3,                00800013
           MLOC.SYMBOLCSWS80DOM MOSTLIQUIDMARKETLOCATION_WS80,          00810013
           FD.MDYWATCHLISTSTATUSTYPE, FD.SPWATCHLISTSTATUSTYPE,         00820013
           FD.OPTIONSTYLETYPE, FD.CSMAINTRADINGCURR,                    00830013
           TCUR.SYMBOLI1 CSMAINTRADINGCURR_I1,                          00840013
           TCUR.SYMBOLI2 CSMAINTRADINGCURR_I2,                          00850013
           TCUR.SYMBOLCSCURR CSMAINTRADINGCURR_WS80,                    00860013
           RCTY.SYMBOLISOA3 CSRISKCOUNTRY_A3, FD.LIQUIDATIONRIGHTTYPE,  00870013
           FD.CSMAINPARENTTRADINGPLACE,                                 00880013
           IFS.SYMBOLBCN CSMAINPARENTTRADINGPLACE_BCN,                  00890013
           IFS.SYMBOLRTX CSMAINPARENTTRADINGPLACE_RTX,                  00900013
           IFS.SYMBOLMIC CSMAINPARENTTRADINGPLACE_MIC,                  00910013
           IFS.SYMBOLBBX CSMAINPARENTTRADINGPLACE_BBX,                  00920013
           IFS.SYMBOLCSWS80BPL CSMAINPARENTTRADINGPLACE_WS80,           00930013
           FD.ISMANAGEDBYCS, FD.EVENTFUNCTIONTYPE,                      00940013
           FD.MAINLANGUAGETYPE, FD.EFFECTIVEDATE,                       00950013
           FS.CREATETIMESTAMP CREATETIMESTAMP_FS,                       00960013
           FS.UPDATETIMESTAMP UPDATETIMESTAMP_FS, FS.ROWSTATUS,         00970013
           FS.SYMBOLCSFI, FS.SYMBOLCH, FS.SYMBOLISIN, FS.SYMBOLUS,      00980013
           FS.SYMBOLXS, FS.SYMBOLGB, FS.SYMBOLLU, FS.SYMBOLDE,          00990013
           FS.SYMBOLAT, FS.SYMBOLFR, FS.SYMBOLBE, FS.SYMBOLIT,          01000013
           FS.SYMBOLNL, FS.SYMBOLJP, FS.SYMBOLJ2, FS.SYMBOLDK,          01010013
           FS.SYMBOLSE, FS.SYMBOLI2, FS.SYMBOLI1, FS.SYMBOLT1,          01020013
           FS.SYMBOLT2, FS.SYMBOLCSCURR, FS.CATEGORYVDPS,               01030013
           FS.CATEGORYTKT, FS.CATEGORYTKSK, FS.CATEGORYTKZUS,           01040013
           FS.CATEGORYTKPRK, FS.CATEGORYTKTZ, FS.CATEGORYMAZU,          01050013
           FS.CATEGORYECBTR, FS.CATEGORYCFI, FS.CATEGORYEUZS,           01060013
           FS.CATEGORYCSGTA, FS.CATEGORYCSGMS, FS.CATEGUSTAXREPORT,     01070013
           FS.CATEGUSIRSADDITION, FS.CSSTATUSTYPE CSSTATUSTYPE_FS,      01080013
           FS.STATUSTYPE STATUSTYPE_FS, FS.SYMBOLSPIRIT,                01090013
           INS.CREATETIMESTAMP CREATETIMESTAMP_INSTR,                   01100013
           INS.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR                    01110013
      FROM VDPS2.VTINSTRFLATDATA FD                                     01120013
           INNER JOIN                                                   01130013
           VDPS2.VTINSTRFLATSYMBOLS FS                                  01140013
           ON FS.INSTRUMENTID = FD.INSTRUMENTID                         01150013
           INNER JOIN                                                   01160013
           VDPS2.VTINSTRUMENT INS                                       01170013
           ON INS.INSTRUMENTID = FD.INSTRUMENTID                        01180013
           LEFT OUTER JOIN                                              01190013
           VDPS2.VTINSTIFLATSYMBOLS IFS                                 01200013
           ON (IFS.INSTITUTIONID = FD.CSMAINPARENTTRADINGPLACE          01210013
           AND IFS.CATEGORYVDPS = '104')                                01220013
           LEFT OUTER JOIN                                              01230013
           VDPS2.VTINSTRFLATSYMBOLS TCUR                                01240013
           ON (TCUR.INSTRUMENTID = FD.CSMAINTRADINGCURR                 01250013
           AND TCUR.CATEGORYVDPS = '10')                                01260013
           LEFT OUTER JOIN                                              01270013
           VDPS2.VTINSTIFLATSYMBOLS MBPL                                01280013
           ON (MBPL.INSTITUTIONID = FD.CSMAINTRADPLACE                  01290013
           AND MBPL.CATEGORYVDPS = '104')                               01300013
           LEFT OUTER JOIN                                              01310013
           VDPS2.VTINSTRFLATSYMBOLS RINS                                01320013
           ON RINS.INSTRUMENTID = FD.CSRISINSTRUMENT                    01330013
           LEFT OUTER JOIN                                              01340013
           OA1A.TVV_VTGEOUNITFLATSYMBOLS RCTY                           01350013
           ON RCTY.GEOUNITID = FD.CSRISKCOUNTRY                         01360013
           LEFT OUTER JOIN                                              01370013
           VDPS2.VTINSTRFLATSYMBOLS RCUR                                01380013
           ON (RCUR.INSTRUMENTID = FD.CSRISKCURRENCY                    01390013
           AND RCUR.CATEGORYVDPS = '10')                                01400013
           LEFT OUTER JOIN                                              01410013
           VDPS2.VTINSTRFLATSYMBOLS ECUR                                01420013
           ON (ECUR.INSTRUMENTID = FD.EXERCISECURR                      01430013
           AND ECUR.CATEGORYVDPS = '10')                                01440013
           LEFT OUTER JOIN                                              01450013
           VDPS2.VTINSTRFLATSYMBOLS ICUR                                01460013
           ON (ICUR.INSTRUMENTID = FD.ISSUEPRICECURR                    01470013
           AND ICUR.CATEGORYVDPS = '10')                                01480013
           LEFT OUTER JOIN                                              01490013
           OA1A.TVV_VTGEOUNITFLATSYMBOLS MLOC                           01500013
           ON MLOC.GEOUNITID = FD.MOSTLIQUIDMARKETLOCATION              01510013
           LEFT OUTER JOIN                                              01520013
           VDPS2.VTINSTRFLATSYMBOLS NCUR                                01530013
           ON (NCUR.INSTRUMENTID = FD.NOMINALCURR                       01540013
           AND NCUR.CATEGORYVDPS = '10')                                01550013
           LEFT OUTER JOIN                                              01560013
           VDPS2.VTINSTRFLATSYMBOLS PCUR                                01570013
           ON (PCUR.INSTRUMENTID = FD.REPAYPRICECURR                    01580013
           AND PCUR.CATEGORYVDPS = '10')                                01590013
           LEFT OUTER JOIN                                              01600013
           VDPS2.VTINSTRFLATSYMBOLS UINS                                01610013
           ON UINS.INSTRUMENTID = FD.UNDERINSTRUMENT                    01620013
   WHERE   FS.ROWSTATUS = 1                                             01630013
 -- AND    FS.SYMBOLCH       = '1213853';                               01640017
 fetch first 1000 rows only ;                                           01641017
select * from   plan_view2                                              01650013
    order by applname, progname, queryNo, qblockno, planno              01660013
;                                                                       01670013
rollback                                                                01680013
;x;                                                                     01690013
*******************                                                     01700013
 -- STATIC NO MQTNIDHI 26.8                                             01710001
 -- ORG.U0009.B0106.KAXV3.SQL(DYNNOMQT) -WITHOUT MQT                    01720001
 -- OMEGAMON OBJECT ANALYSIS                                            01730001
 -- MQT TRADINGPLACE VTINSTIFLATSYMBOLS, CATEGORY 104 --> VDPS029       01740001
 -- MQT CURRENCY     VTINSTIFLATSYMBOLS, CATEGORY  10 --> VDPS029       01750001
    --- DATABASE  SPACENAM  DSN  VOLUME   GETPAGE  READ       SEQ      L01760001
    --- --------  --------  ---  ------   -------  -------  -------  ---01770001
    --- VV21A1A   VDPS004   001  B11272      2117       33        0     01780001
    --- VV21A1A   VDPS026   001  B1N239     10605        9        0     01790001
    --- VV21A1A   VDPS026   002  B12780        29        3        0     01800001
    --- VV21A1A   VDPS029   001  B11548      2199        6        0     01810001
    --- VV21A1A   VTXINSTI  001  B12748      2420        6        0     01820001
    --- VV21A1A   VTXINSTR  001  B11097       897        0        0     01830001
    --- VV21A1A   VTXI1GZ2  001  B11303      1000       18        0     01840001
    --- VV22A1A   VDPS051   001               144        0        0     01850001
    --- VV24A1A   VDPS168   001  B10450      3066        8        0     01860001
    --- VV24A1A   VDPS168   003  B11277         5        5        0     01870001
    --- VV24A1A   VDPS168   004  B1N826         1        1        0     01880001
    --- VV24A1A   VDPS168   010  B12922        20        6        0     01890001
    --- VV24A1A   VTXI19IG  001  B10459       897        0        0     01900001
    --- WKDBDAF3  DSN32K08  001  B11469     14630        1        0     01910001
    --- WKDBDAF3  DSN4K01   001               518        0        0     01920001
    --- WKDBDAF3  DSN4K07   001               199        0        0     01930001
set current sqlid = 'A540769';                                          01940002
delete from plan_table;                                                 01950002
explain plan set queryno = 2 for                                        01960011
    SELECT FD.INSTRUMENTID, FD.PAYFREQUENCY,                            01970002
           FD.CREATETIMESTAMP CREATETIMESTAMP_FD,                       01980002
           FD.UPDATETIMESTAMP UPDATETIMESTAMP_FD,                       01990002
           FD.ISCALLFORTXREONLY, FD.ISREDEEMABLE, FD.ISRETRACTABLE,     02000002
           FD.ISCONVERTBYHOLDER, FD.ISCONVERTBYISSUER,                  02010002
           FD.HASVOTINGRIGHTNO, FD.HASREDMPINVARCURR,                   02020002
           FD.HASMULTIUNDERLYERS, FD.CSMAINTRADPLACE,                   02030002
           FD.ORIGINALISSUER, FD.ISSUER, FD.UNDERINSTRUMENT,            02040002
           FD.NOMINALCURR, FD.CSRISKCURRENCY, FD.CSRISKCOUNTRY,         02050002
           FD.CSRISINSTRUMENT, FD.REPAYPRICECURR, FD.ISSUEPRICECURR,    02060002
           FD.EXERCISECURR, FD.MAINDEPOSITARY, FD.NOMINALAMOUNT,        02070002
           FD.MINDENOMINATION, FD.EFFINTERESTRATE,                      02080002
           FD.REPAYPRICEAMOUNT, FD.REPAYPRICERATE, FD.POOLFACTOR,       02090002
           FD.VOTINGRIGHTNO, FD.OUTSTANDINGCAPITAL, FD.ISSUEDCAPITAL,   02100002
           FD.OUTSTANDCAPITALNO, FD.ISSUEDCAPITALNO, FD.ISSUEAMOUNT,    02110002
           FD.ISSUEPRICE, FD.EXERCISEAMOUNT, FD.MINEXERCISEAMOUNT,      02120002
           FD.HELDAMOUNT, FD.PAYAMOUNT, FD.INCOMETAXRATE,               02130002
           FD.PREMIUMRATE, FD.PARTICIPATIONRATE, FD.REBATE,             02140002
           FD.CSRATING, FD.CSRISKINDIDSYMBOL, FD.CSRISKINDSCHEMESYM,    02150002
           FD.CSRISKINSTGRPIDSYM, FD.CSRISKINSGRPSCHSYM, FD.MDYRATING,  02160002
           FD.SPRATING, FD.LISTINGSYMBOLTKH, FD.LISTINGSYMBOLRIC,       02170002
           FD.LISTINGSYMBOLBBI, NCUR.SYMBOLI1 NOMINALCURR_I1,           02180002
           NCUR.SYMBOLI2 NOMINALCURR_I2,                                02190002
           NCUR.SYMBOLCSCURR NOMINALCURR_WS80,                          02200002
           RCUR.SYMBOLI1 CSRISKCURRENCY_I1,                             02210002
           RCUR.SYMBOLI2 CSRISKCURRENCY_I2,                             02220002
           RCUR.SYMBOLCSCURR CSRISKCURRENCY_WS80,                       02230002
           RINS.SYMBOLCH CSRISINSTRUMENT_CH,                            02240002
           RINS.SYMBOLISIN CSRISINSTRUMENT_ISIN,                        02250002
           RINS.SYMBOLCSFI CSRISINSTRUMENT_CSFI,                        02260002
           RCTY.SYMBOLISOA2 CSRISKCOUNTRY_A2,                           02270002
           RCTY.SYMBOLCSWS80DOM CSRISKCOUNTRY_WS80,                     02280002
           PCUR.SYMBOLI1 REPAYPRICECURR_I1,                             02290002
           PCUR.SYMBOLI2 REPAYPRICECURR_I2,                             02300002
           PCUR.SYMBOLCSCURR REPAYPRICECURR_WS80,                       02310002
           ICUR.SYMBOLI1 ISSUEPRICECURR_I1,                             02320002
           ICUR.SYMBOLI2 ISSUEPRICECURR_I2,                             02330002
           ICUR.SYMBOLCSCURR ISSUEPRICECURR_WS80,                       02340002
           ECUR.SYMBOLI1 EXERCISECURR_I1,                               02350002
           ECUR.SYMBOLI2 EXERCISECURR_I2,                               02360002
           ECUR.SYMBOLCSCURR EXERCISECURR_WS80,                         02370002
           MBPL.SYMBOLBCN CSMAINTRADPLACE_BCN,                          02380002
           MBPL.SYMBOLCSWS80BPL CSMAINTRADPLACE_WS80,                   02390002
           MBPL.SYMBOLRTX CSMAINTRADPLACE_RTX,                          02400002
           MBPL.SYMBOLBBX CSMAINTRADPLACE_BBX,                          02410002
           UINS.SYMBOLCH UNDERINSTRUMENT_CH,                            02420002
           UINS.SYMBOLISIN UNDERINSTRUMENT_ISIN,                        02430002
           UINS.SYMBOLCSFI UNDERINSTRUMENT_CSFI, FD.ORIGINALISSUER_GK,  02440002
           FD.ISSUER_GK, FD.MAINDEPOSITARY_GK, FD.EXPIRATIONDATE,       02450002
           FD.MATURITYDATE, FD.FIRSTPAYDATE, FD.FIRSTPYDATEPERYEAR,     02460002
           FD.INTRSTDVDENFRDATE, FD.CSRATINGDATE, FD.MDYRATINGDATE,     02470002
           FD.SPRATINGDATE, FD.SUBSCRBEGINDATE, FD.PAYMENTDATE,         02480002
           FD.EXERCISEBEGINDATE, FD.SUBSCRPLNDENDDATE,                  02490002
           FD.EXERCISEENDDATE, FD.BVGTYPE, FD.CREDITWORTHINESSTP,       02500002
           FD.COMMISSIONCODETYPE, FD.UNITTYPE, FD.CSUNITTYPE,           02510002
           FD.EXPIRATIONTYPE, FD.STATUSTYPE STATUSTYPE_FD,              02520002
           FD.REGISTRATIONTYPE, FD.BORROWERCATTYPE,                     02530002
           FD.CSLISTINGCODETYPE, FD.CSSTATUSTYPE CSSTATUSTYPE_FD,       02540002
           FD.STATUSDETAILTYPE, FD.INCOMEMODETYPE,                      02550002
           FD.INTERESTCALCTYPE, FD.INTERESTTYPE, FD.PYFREQUNITTYPE,     02560002
           FD.SUBSCRMETHODTYPE, FD.PLACEMENTTYPE, FD.PAYDIRECTIONTYPE,  02570002
           FD.OPTIONTYPE, FD.SETTLESTYLETYPE, FD.CSFUNDTYPE,            02580002
           FD.TRADINGSTATUSTYPE, FD.LISTINGSTATUSTYPE,                  02590002
           FD.EXERCISEPLACE, FD.NAME35_G, FD.NAME35_E, FD.NAME35_F,     02600002
           FD.NAME35_I, FD.NAME35_N, FD.NAME45_G, FD.NAME45_E,          02610002
           FD.NAME45_F, FD.NAME45_I, FD.NAME45_N, FD.SHORTNAME_G,       02620002
           FD.SHORTNAME_E, FD.SHORTNAME_F, FD.SHORTNAME_I,              02630002
           FD.SHORTNAME_N, FD.PREPARTICLE_G, FD.PREPARTICLE_E,          02640002
           FD.PREPARTICLE_F, FD.PREPARTICLE_I, FD.PREPARTICLE_N,        02650002
           FD.POSTPARTICLE_G, FD.POSTPARTICLE_E, FD.POSTPARTICLE_F,     02660002
           FD.POSTPARTICLE_I, FD.POSTPARTICLE_N, FD.ISINTERNAL,         02670002
           FD.ISOTC, FD.HASWITHHOLDINGTAX, FD.HASFEDERALSTAMPDUTY,      02680002
           FD.ISCSMIFIDCOMPLEX, FD.MOSTLIQUIDMARKETLOCATION,            02690002
           MLOC.SYMBOLISOA2 MOSTLIQUIDMARKETLOCATION_A2,                02700002
           MLOC.SYMBOLISOA3 MOSTLIQUIDMARKETLOCATION_A3,                02710002
           MLOC.SYMBOLCSWS80DOM MOSTLIQUIDMARKETLOCATION_WS80,          02720002
           FD.MDYWATCHLISTSTATUSTYPE, FD.SPWATCHLISTSTATUSTYPE,         02730002
           FD.OPTIONSTYLETYPE, FD.CSMAINTRADINGCURR,                    02740002
           TCUR.SYMBOLI1 CSMAINTRADINGCURR_I1,                          02750002
           TCUR.SYMBOLI2 CSMAINTRADINGCURR_I2,                          02760002
           TCUR.SYMBOLCSCURR CSMAINTRADINGCURR_WS80,                    02770002
           RCTY.SYMBOLISOA3 CSRISKCOUNTRY_A3, FD.LIQUIDATIONRIGHTTYPE,  02780002
           FD.CSMAINPARENTTRADINGPLACE,                                 02790002
           IFS.SYMBOLBCN CSMAINPARENTTRADINGPLACE_BCN,                  02800002
           IFS.SYMBOLRTX CSMAINPARENTTRADINGPLACE_RTX,                  02810002
           IFS.SYMBOLMIC CSMAINPARENTTRADINGPLACE_MIC,                  02820002
           IFS.SYMBOLBBX CSMAINPARENTTRADINGPLACE_BBX,                  02830002
           IFS.SYMBOLCSWS80BPL CSMAINPARENTTRADINGPLACE_WS80,           02840002
           FD.ISMANAGEDBYCS, FD.EVENTFUNCTIONTYPE,                      02850002
           FD.MAINLANGUAGETYPE, FD.EFFECTIVEDATE,                       02860002
           FS.CREATETIMESTAMP CREATETIMESTAMP_FS,                       02870002
           FS.UPDATETIMESTAMP UPDATETIMESTAMP_FS, FS.ROWSTATUS,         02880002
           FS.SYMBOLCSFI, FS.SYMBOLCH, FS.SYMBOLISIN, FS.SYMBOLUS,      02890002
           FS.SYMBOLXS, FS.SYMBOLGB, FS.SYMBOLLU, FS.SYMBOLDE,          02900002
           FS.SYMBOLAT, FS.SYMBOLFR, FS.SYMBOLBE, FS.SYMBOLIT,          02910002
           FS.SYMBOLNL, FS.SYMBOLJP, FS.SYMBOLJ2, FS.SYMBOLDK,          02920002
           FS.SYMBOLSE, FS.SYMBOLI2, FS.SYMBOLI1, FS.SYMBOLT1,          02930002
           FS.SYMBOLT2, FS.SYMBOLCSCURR, FS.CATEGORYVDPS,               02940002
           FS.CATEGORYTKT, FS.CATEGORYTKSK, FS.CATEGORYTKZUS,           02950002
           FS.CATEGORYTKPRK, FS.CATEGORYTKTZ, FS.CATEGORYMAZU,          02960002
           FS.CATEGORYECBTR, FS.CATEGORYCFI, FS.CATEGORYEUZS,           02970002
           FS.CATEGORYCSGTA, FS.CATEGORYCSGMS, FS.CATEGUSTAXREPORT,     02980002
           FS.CATEGUSIRSADDITION, FS.CSSTATUSTYPE CSSTATUSTYPE_FS,      02990002
           FS.STATUSTYPE STATUSTYPE_FS, FS.SYMBOLSPIRIT,                03000002
           INS.CREATETIMESTAMP CREATETIMESTAMP_INSTR,                   03010002
           INS.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR                    03020002
      FROM VDPS2.VTINSTRFLATDATA FD                                     03030002
           INNER JOIN                                                   03040002
           VDPS2.VTINSTRFLATSYMBOLS FS                                  03050002
           ON FS.INSTRUMENTID = FD.INSTRUMENTID                         03060002
           INNER JOIN                                                   03070002
           VDPS2.VTINSTRUMENT INS                                       03080002
           ON INS.INSTRUMENTID = FD.INSTRUMENTID                        03090002
           LEFT OUTER JOIN                                              03100002
           VDPS2.VTINSTIFLATSYMBOLS IFS                                 03110002
           ON IFS.INSTITUTIONID = FD.CSMAINPARENTTRADINGPLACE           03120002
               and ifs.categoryvdps = '104'      --- ???                03130002
           LEFT OUTER JOIN                                              03140002
           VDPS2.VTINSTRFLATSYMBOLS TCUR                                03150002
           ON TCUR.INSTRUMENTID = FD.CSMAINTRADINGCURR                  03160002
           LEFT OUTER JOIN                                              03170002
           VDPS2.VTINSTIFLATSYMBOLS MBPL                                03180002
           ON MBPL.INSTITUTIONID = FD.CSMAINTRADPLACE                   03190002
               and mbpl.categoryvdps = '104'      --- ???               03200002
           LEFT OUTER JOIN                                              03210002
           VDPS2.VTINSTRFLATSYMBOLS RINS                                03220002
           ON RINS.INSTRUMENTID = FD.CSRISINSTRUMENT                    03230002
           LEFT OUTER JOIN                                              03240002
           OA1A.TVV_VTGEOUNITFLATSYMBOLS RCTY                           03250002
           ON RCTY.GEOUNITID = FD.CSRISKCOUNTRY                         03260002
           LEFT OUTER JOIN                                              03270002
           VDPS2.VTINSTRFLATSYMBOLS RCUR                                03280002
           ON RCUR.INSTRUMENTID = FD.CSRISKCURRENCY                     03290002
           LEFT OUTER JOIN                                              03300002
           VDPS2.VTINSTRFLATSYMBOLS ECUR                                03310002
           ON ECUR.INSTRUMENTID = FD.EXERCISECURR                       03320002
           LEFT OUTER JOIN                                              03330002
           VDPS2.VTINSTRFLATSYMBOLS ICUR                                03340002
           ON ICUR.INSTRUMENTID = FD.ISSUEPRICECURR                     03350002
           LEFT OUTER JOIN                                              03360002
           OA1A.TVV_VTGEOUNITFLATSYMBOLS MLOC                           03370002
           ON MLOC.GEOUNITID = FD.MOSTLIQUIDMARKETLOCATION              03380002
           LEFT OUTER JOIN                                              03390002
           VDPS2.VTINSTRFLATSYMBOLS NCUR                                03400002
           ON NCUR.INSTRUMENTID = FD.NOMINALCURR                        03410002
           LEFT OUTER JOIN                                              03420002
           VDPS2.VTINSTRFLATSYMBOLS PCUR                                03430002
           ON PCUR.INSTRUMENTID = FD.REPAYPRICECURR                     03440002
           LEFT OUTER JOIN                                              03450002
           VDPS2.VTINSTRFLATSYMBOLS UINS                                03460002
           ON UINS.INSTRUMENTID = FD.UNDERINSTRUMENT                    03470005
-- WHERE   FS.ROWSTATUS = 1                                             03480012
--  AND    FS.SYMBOLCH       = '1213853'                                03490012
-- WITH UR                                                              03500012
;                                                                       03510002
explain plan set queryno = 1 for                                        03520011
    SELECT FD.INSTRUMENTID, FD.PAYFREQUENCY,                            03530000
           FD.CREATETIMESTAMP CREATETIMESTAMP_FD,                       03540000
           FD.UPDATETIMESTAMP UPDATETIMESTAMP_FD,                       03550000
           FD.ISCALLFORTXREONLY, FD.ISREDEEMABLE, FD.ISRETRACTABLE,     03560000
           FD.ISCONVERTBYHOLDER, FD.ISCONVERTBYISSUER,                  03570000
           FD.HASVOTINGRIGHTNO, FD.HASREDMPINVARCURR,                   03580000
           FD.HASMULTIUNDERLYERS, FD.CSMAINTRADPLACE,                   03590000
           FD.ORIGINALISSUER, FD.ISSUER, FD.UNDERINSTRUMENT,            03600000
           FD.NOMINALCURR, FD.CSRISKCURRENCY, FD.CSRISKCOUNTRY,         03610000
           FD.CSRISINSTRUMENT, FD.REPAYPRICECURR, FD.ISSUEPRICECURR,    03620000
           FD.EXERCISECURR, FD.MAINDEPOSITARY, FD.NOMINALAMOUNT,        03630000
           FD.MINDENOMINATION, FD.EFFINTERESTRATE,                      03640000
           FD.REPAYPRICEAMOUNT, FD.REPAYPRICERATE, FD.POOLFACTOR,       03650000
           FD.VOTINGRIGHTNO, FD.OUTSTANDINGCAPITAL, FD.ISSUEDCAPITAL,   03660000
           FD.OUTSTANDCAPITALNO, FD.ISSUEDCAPITALNO, FD.ISSUEAMOUNT,    03670000
           FD.ISSUEPRICE, FD.EXERCISEAMOUNT, FD.MINEXERCISEAMOUNT,      03680000
           FD.HELDAMOUNT, FD.PAYAMOUNT, FD.INCOMETAXRATE,               03690000
           FD.PREMIUMRATE, FD.PARTICIPATIONRATE, FD.REBATE,             03700000
           FD.CSRATING, FD.CSRISKINDIDSYMBOL, FD.CSRISKINDSCHEMESYM,    03710000
           FD.CSRISKINSTGRPIDSYM, FD.CSRISKINSGRPSCHSYM, FD.MDYRATING,  03720000
           FD.SPRATING, FD.LISTINGSYMBOLTKH, FD.LISTINGSYMBOLRIC,       03730000
           FD.LISTINGSYMBOLBBI, NCUR.SYMBOLI1 NOMINALCURR_I1,           03740000
           NCUR.SYMBOLI2 NOMINALCURR_I2,                                03750000
           NCUR.SYMBOLCSCURR NOMINALCURR_WS80,                          03760000
           RCUR.SYMBOLI1 CSRISKCURRENCY_I1,                             03770000
           RCUR.SYMBOLI2 CSRISKCURRENCY_I2,                             03780000
           RCUR.SYMBOLCSCURR CSRISKCURRENCY_WS80,                       03790000
           RINS.SYMBOLCH CSRISINSTRUMENT_CH,                            03800000
           RINS.SYMBOLISIN CSRISINSTRUMENT_ISIN,                        03810000
           RINS.SYMBOLCSFI CSRISINSTRUMENT_CSFI,                        03820000
           RCTY.SYMBOLISOA2 CSRISKCOUNTRY_A2,                           03830000
           RCTY.SYMBOLCSWS80DOM CSRISKCOUNTRY_WS80,                     03840000
           PCUR.SYMBOLI1 REPAYPRICECURR_I1,                             03850000
           PCUR.SYMBOLI2 REPAYPRICECURR_I2,                             03860000
           PCUR.SYMBOLCSCURR REPAYPRICECURR_WS80,                       03870000
           ICUR.SYMBOLI1 ISSUEPRICECURR_I1,                             03880000
           ICUR.SYMBOLI2 ISSUEPRICECURR_I2,                             03890000
           ICUR.SYMBOLCSCURR ISSUEPRICECURR_WS80,                       03900000
           ECUR.SYMBOLI1 EXERCISECURR_I1,                               03910000
           ECUR.SYMBOLI2 EXERCISECURR_I2,                               03920000
           ECUR.SYMBOLCSCURR EXERCISECURR_WS80,                         03930000
           MBPL.SYMBOLBCN CSMAINTRADPLACE_BCN,                          03940000
           MBPL.SYMBOLCSWS80BPL CSMAINTRADPLACE_WS80,                   03950000
           MBPL.SYMBOLRTX CSMAINTRADPLACE_RTX,                          03960000
           MBPL.SYMBOLBBX CSMAINTRADPLACE_BBX,                          03970000
           UINS.SYMBOLCH UNDERINSTRUMENT_CH,                            03980000
           UINS.SYMBOLISIN UNDERINSTRUMENT_ISIN,                        03990000
           UINS.SYMBOLCSFI UNDERINSTRUMENT_CSFI, FD.ORIGINALISSUER_GK,  04000000
           FD.ISSUER_GK, FD.MAINDEPOSITARY_GK, FD.EXPIRATIONDATE,       04010000
           FD.MATURITYDATE, FD.FIRSTPAYDATE, FD.FIRSTPYDATEPERYEAR,     04020000
           FD.INTRSTDVDENFRDATE, FD.CSRATINGDATE, FD.MDYRATINGDATE,     04030000
           FD.SPRATINGDATE, FD.SUBSCRBEGINDATE, FD.PAYMENTDATE,         04040000
           FD.EXERCISEBEGINDATE, FD.SUBSCRPLNDENDDATE,                  04050000
           FD.EXERCISEENDDATE, FD.BVGTYPE, FD.CREDITWORTHINESSTP,       04060000
           FD.COMMISSIONCODETYPE, FD.UNITTYPE, FD.CSUNITTYPE,           04070000
           FD.EXPIRATIONTYPE, FD.STATUSTYPE STATUSTYPE_FD,              04080000
           FD.REGISTRATIONTYPE, FD.BORROWERCATTYPE,                     04090000
           FD.CSLISTINGCODETYPE, FD.CSSTATUSTYPE CSSTATUSTYPE_FD,       04100000
           FD.STATUSDETAILTYPE, FD.INCOMEMODETYPE,                      04110000
           FD.INTERESTCALCTYPE, FD.INTERESTTYPE, FD.PYFREQUNITTYPE,     04120000
           FD.SUBSCRMETHODTYPE, FD.PLACEMENTTYPE, FD.PAYDIRECTIONTYPE,  04130000
           FD.OPTIONTYPE, FD.SETTLESTYLETYPE, FD.CSFUNDTYPE,            04140000
           FD.TRADINGSTATUSTYPE, FD.LISTINGSTATUSTYPE,                  04150000
           FD.EXERCISEPLACE, FD.NAME35_G, FD.NAME35_E, FD.NAME35_F,     04160000
           FD.NAME35_I, FD.NAME35_N, FD.NAME45_G, FD.NAME45_E,          04170000
           FD.NAME45_F, FD.NAME45_I, FD.NAME45_N, FD.SHORTNAME_G,       04180000
           FD.SHORTNAME_E, FD.SHORTNAME_F, FD.SHORTNAME_I,              04190000
           FD.SHORTNAME_N, FD.PREPARTICLE_G, FD.PREPARTICLE_E,          04200000
           FD.PREPARTICLE_F, FD.PREPARTICLE_I, FD.PREPARTICLE_N,        04210000
           FD.POSTPARTICLE_G, FD.POSTPARTICLE_E, FD.POSTPARTICLE_F,     04220000
           FD.POSTPARTICLE_I, FD.POSTPARTICLE_N, FD.ISINTERNAL,         04230000
           FD.ISOTC, FD.HASWITHHOLDINGTAX, FD.HASFEDERALSTAMPDUTY,      04240000
           FD.ISCSMIFIDCOMPLEX, FD.MOSTLIQUIDMARKETLOCATION,            04250000
           MLOC.SYMBOLISOA2 MOSTLIQUIDMARKETLOCATION_A2,                04260000
           MLOC.SYMBOLISOA3 MOSTLIQUIDMARKETLOCATION_A3,                04270000
           MLOC.SYMBOLCSWS80DOM MOSTLIQUIDMARKETLOCATION_WS80,          04280000
           FD.MDYWATCHLISTSTATUSTYPE, FD.SPWATCHLISTSTATUSTYPE,         04290000
           FD.OPTIONSTYLETYPE, FD.CSMAINTRADINGCURR,                    04300000
           TCUR.SYMBOLI1 CSMAINTRADINGCURR_I1,                          04310000
           TCUR.SYMBOLI2 CSMAINTRADINGCURR_I2,                          04320000
           TCUR.SYMBOLCSCURR CSMAINTRADINGCURR_WS80,                    04330000
           RCTY.SYMBOLISOA3 CSRISKCOUNTRY_A3, FD.LIQUIDATIONRIGHTTYPE,  04340000
           FD.CSMAINPARENTTRADINGPLACE,                                 04350000
           IFS.SYMBOLBCN CSMAINPARENTTRADINGPLACE_BCN,                  04360000
           IFS.SYMBOLRTX CSMAINPARENTTRADINGPLACE_RTX,                  04370000
           IFS.SYMBOLMIC CSMAINPARENTTRADINGPLACE_MIC,                  04380000
           IFS.SYMBOLBBX CSMAINPARENTTRADINGPLACE_BBX,                  04390000
           IFS.SYMBOLCSWS80BPL CSMAINPARENTTRADINGPLACE_WS80,           04400000
           FD.ISMANAGEDBYCS, FD.EVENTFUNCTIONTYPE,                      04410000
           FD.MAINLANGUAGETYPE, FD.EFFECTIVEDATE,                       04420000
           FS.CREATETIMESTAMP CREATETIMESTAMP_FS,                       04430000
           FS.UPDATETIMESTAMP UPDATETIMESTAMP_FS, FS.ROWSTATUS,         04440000
           FS.SYMBOLCSFI, FS.SYMBOLCH, FS.SYMBOLISIN, FS.SYMBOLUS,      04450000
           FS.SYMBOLXS, FS.SYMBOLGB, FS.SYMBOLLU, FS.SYMBOLDE,          04460000
           FS.SYMBOLAT, FS.SYMBOLFR, FS.SYMBOLBE, FS.SYMBOLIT,          04470000
           FS.SYMBOLNL, FS.SYMBOLJP, FS.SYMBOLJ2, FS.SYMBOLDK,          04480000
           FS.SYMBOLSE, FS.SYMBOLI2, FS.SYMBOLI1, FS.SYMBOLT1,          04490000
           FS.SYMBOLT2, FS.SYMBOLCSCURR, FS.CATEGORYVDPS,               04500000
           FS.CATEGORYTKT, FS.CATEGORYTKSK, FS.CATEGORYTKZUS,           04510000
           FS.CATEGORYTKPRK, FS.CATEGORYTKTZ, FS.CATEGORYMAZU,          04520000
           FS.CATEGORYECBTR, FS.CATEGORYCFI, FS.CATEGORYEUZS,           04530000
           FS.CATEGORYCSGTA, FS.CATEGORYCSGMS, FS.CATEGUSTAXREPORT,     04540000
           FS.CATEGUSIRSADDITION, FS.CSSTATUSTYPE CSSTATUSTYPE_FS,      04550000
           FS.STATUSTYPE STATUSTYPE_FS, FS.SYMBOLSPIRIT,                04560000
           INS.CREATETIMESTAMP CREATETIMESTAMP_INSTR,                   04570000
           INS.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR                    04580000
      FROM VDPS2.VTINSTRFLATDATA FD                                     04590000
           INNER JOIN                                                   04600000
           VDPS2.VTINSTRFLATSYMBOLS FS                                  04610000
           ON FS.INSTRUMENTID = FD.INSTRUMENTID                         04620000
           INNER JOIN                                                   04630000
           VDPS2.VTINSTRUMENT INS                                       04640000
           ON INS.INSTRUMENTID = FD.INSTRUMENTID                        04650000
           LEFT OUTER JOIN                                              04660000
           VDPS2.VTINSTIFLATSYMBOLS IFS                                 04670000
           ON IFS.INSTITUTIONID = FD.CSMAINPARENTTRADINGPLACE           04680000
           LEFT OUTER JOIN                                              04690000
           VDPS2.VTINSTRFLATSYMBOLS TCUR                                04700000
           ON TCUR.INSTRUMENTID = FD.CSMAINTRADINGCURR                  04710000
           LEFT OUTER JOIN                                              04720000
           VDPS2.VTINSTIFLATSYMBOLS MBPL                                04730000
           ON MBPL.INSTITUTIONID = FD.CSMAINTRADPLACE                   04740000
           LEFT OUTER JOIN                                              04750000
           VDPS2.VTINSTRFLATSYMBOLS RINS                                04760000
           ON RINS.INSTRUMENTID = FD.CSRISINSTRUMENT                    04770000
           LEFT OUTER JOIN                                              04780000
           OA1A.TVV_VTGEOUNITFLATSYMBOLS RCTY                           04790000
           ON RCTY.GEOUNITID = FD.CSRISKCOUNTRY                         04800000
           LEFT OUTER JOIN                                              04810000
           VDPS2.VTINSTRFLATSYMBOLS RCUR                                04820000
           ON RCUR.INSTRUMENTID = FD.CSRISKCURRENCY                     04830000
           LEFT OUTER JOIN                                              04840000
           VDPS2.VTINSTRFLATSYMBOLS ECUR                                04850000
           ON ECUR.INSTRUMENTID = FD.EXERCISECURR                       04860000
           LEFT OUTER JOIN                                              04870000
           VDPS2.VTINSTRFLATSYMBOLS ICUR                                04880000
           ON ICUR.INSTRUMENTID = FD.ISSUEPRICECURR                     04890000
           LEFT OUTER JOIN                                              04900000
           OA1A.TVV_VTGEOUNITFLATSYMBOLS MLOC                           04910000
           ON MLOC.GEOUNITID = FD.MOSTLIQUIDMARKETLOCATION              04920000
           LEFT OUTER JOIN                                              04930000
           VDPS2.VTINSTRFLATSYMBOLS NCUR                                04940000
           ON NCUR.INSTRUMENTID = FD.NOMINALCURR                        04950000
           LEFT OUTER JOIN                                              04960000
           VDPS2.VTINSTRFLATSYMBOLS PCUR                                04970000
           ON PCUR.INSTRUMENTID = FD.REPAYPRICECURR                     04980000
           LEFT OUTER JOIN                                              04990000
           VDPS2.VTINSTRFLATSYMBOLS UINS                                05000000
           ON UINS.INSTRUMENTID = FD.UNDERINSTRUMENT                    05010003
-- WHERE   FS.ROWSTATUS = 1                                             05020012
--  AND    FS.SYMBOLCH       = '1213853'                                05030012
-- WITH UR                                                              05040012
;                                                                       05050002
select * from   plan_view2                                              05060007
    order by applname, progname, queryNo, qblockno, planno              05070002
;                                                                       05080002
rollback                                                                05090002
}¢--- A540769.WK.SQL(VDPS004) cre=2011-11-24 mod=2011-11-24-21.44.40 A540769 ---
  SET CURRENT SQLID='OA1X';
--drop tablespace VV21A1X.vdps004;
  commit;
  CREATE TABLESPACE VDPS004
    IN VV21A1X
    USING STOGROUP GSMS
    PRIQTY -1      SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    NUMPARTS 30
    BUFFERPOOL BP32K
    LOCKSIZE ROW
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255 DSSIZE 16 G
               ;
--
  CREATE TABLE OA1X.VTINSTRFLATDATA
     (INSTRUMENTID         INTEGER NOT NULL,
      PAYFREQUENCY         INTEGER WITH DEFAULT NULL,
      CREATETIMESTAMP      VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      UPDATETIMESTAMP      VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      ISCALLFORTXREONLY    SMALLINT WITH DEFAULT NULL,
      ISREDEEMABLE         SMALLINT WITH DEFAULT NULL,
      ISRETRACTABLE        SMALLINT WITH DEFAULT NULL,
      ISCONVERTBYHOLDER    SMALLINT WITH DEFAULT NULL,
      ISCONVERTBYISSUER    SMALLINT WITH DEFAULT NULL,
      HASVOTINGRIGHTNO     SMALLINT WITH DEFAULT NULL,
      HASREDMPINVARCURR    SMALLINT WITH DEFAULT NULL,
      HASMULTIUNDERLYERS   SMALLINT WITH DEFAULT NULL,
      CSMAINTRADPLACE      INTEGER WITH DEFAULT NULL,
      ORIGINALISSUER       INTEGER WITH DEFAULT NULL,
      ISSUER               INTEGER WITH DEFAULT NULL,
      UNDERINSTRUMENT      INTEGER WITH DEFAULT NULL,
      NOMINALCURR          INTEGER WITH DEFAULT NULL,
      CSRISKCURRENCY       INTEGER WITH DEFAULT NULL,
      CSRISKCOUNTRY        INTEGER WITH DEFAULT NULL,
      CSRISINSTRUMENT      INTEGER WITH DEFAULT NULL,
      REPAYPRICECURR       INTEGER WITH DEFAULT NULL,
      ISSUEPRICECURR       INTEGER WITH DEFAULT NULL,
      EXERCISECURR         INTEGER WITH DEFAULT NULL,
      MAINDEPOSITARY       INTEGER WITH DEFAULT NULL,
      NOMINALAMOUNT        FLOAT WITH DEFAULT NULL,
      MINDENOMINATION      FLOAT WITH DEFAULT NULL,
      EFFINTERESTRATE      FLOAT WITH DEFAULT NULL,
      REPAYPRICEAMOUNT     FLOAT WITH DEFAULT NULL,
      REPAYPRICERATE       FLOAT WITH DEFAULT NULL,
      POOLFACTOR           FLOAT WITH DEFAULT NULL,
      VOTINGRIGHTNO        FLOAT WITH DEFAULT NULL,
      OUTSTANDINGCAPITAL   FLOAT WITH DEFAULT NULL,
      ISSUEDCAPITAL        FLOAT WITH DEFAULT NULL,
      OUTSTANDCAPITALNO    FLOAT WITH DEFAULT NULL,
      ISSUEDCAPITALNO      FLOAT WITH DEFAULT NULL,
      ISSUEAMOUNT          FLOAT WITH DEFAULT NULL,
      ISSUEPRICE           FLOAT WITH DEFAULT NULL,
      EXERCISEAMOUNT       FLOAT WITH DEFAULT NULL,
      MINEXERCISEAMOUNT    FLOAT WITH DEFAULT NULL,
      HELDAMOUNT           FLOAT WITH DEFAULT NULL,
      PAYAMOUNT            FLOAT WITH DEFAULT NULL,
      INCOMETAXRATE        FLOAT WITH DEFAULT NULL,
      PREMIUMRATE          FLOAT WITH DEFAULT NULL,
      PARTICIPATIONRATE    FLOAT WITH DEFAULT NULL,
      REBATE               FLOAT WITH DEFAULT NULL,
      CSRATING             CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISKINDIDSYMBOL    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISKINDSCHEMESYM   CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISKINSTGRPIDSYM   CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISKINSGRPSCHSYM   CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      MDYRATING            CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      SPRATING             CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      FITCHRATING          CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      LISTINGSYMBOLTKH     CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      LISTINGSYMBOLRIC     CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      LISTINGSYMBOLBBI     CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      NOMINALCURR_I1       CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      NOMINALCURR_I2       CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      NOMINALCURR_WS80     CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISKCURRENCY_I1    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISKCURRENCY_I2    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISKCURRENCY_WS80              CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSRISINSTRUMENT_CH   CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISINSTRUMENT_ISIN             CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSRISINSTRUMENT_CSFI             CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSRISKCOUNTRY_A2     CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSRISKCOUNTRY_WS80   CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      REPAYPRICECURR_I1    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      REPAYPRICECURR_I2    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      REPAYPRICECURR_WS80              CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      ISSUEPRICECURR_I1    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      ISSUEPRICECURR_I2    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      ISSUEPRICECURR_WS80              CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      EXERCISECURR_I1      CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      EXERCISECURR_I2      CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      EXERCISECURR_WS80    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      CSMAINTRADPLACE_BCN              CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINTRADPLACE_WS80             CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINTRADPLACE_RTX              CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINTRADPLACE_BBX              CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      UNDERINSTRUMENT_CH   CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      UNDERINSTRUMENT_ISIN             CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      UNDERINSTRUMENT_CSFI             CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      ORIGINALISSUER_GK    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      ISSUER_GK            CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      MAINDEPOSITARY_GK    CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      EXPIRATIONDATE       VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      MATURITYDATE         VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      FIRSTPAYDATE         VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      FIRSTPYDATEPERYEAR   VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      INTRSTDVDENFRDATE    VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSRATINGDATE         VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      MDYRATINGDATE        VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      SPRATINGDATE         VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      FITCHRATINGDATE      VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      SUBSCRBEGINDATE      VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      PAYMENTDATE          VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      EXERCISEBEGINDATE    VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      SUBSCRPLNDENDDATE    VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      EXERCISEENDDATE      VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      BVGTYPE              SMALLINT WITH DEFAULT NULL,
      CREDITWORTHINESSTP   SMALLINT WITH DEFAULT NULL,
      COMMISSIONCODETYPE   SMALLINT WITH DEFAULT NULL,
      UNITTYPE             SMALLINT WITH DEFAULT NULL,
      CSUNITTYPE           SMALLINT WITH DEFAULT NULL,
      EXPIRATIONTYPE       SMALLINT WITH DEFAULT NULL,
      STATUSTYPE           SMALLINT WITH DEFAULT NULL,
      REGISTRATIONTYPE     SMALLINT WITH DEFAULT NULL,
      BORROWERCATTYPE      SMALLINT WITH DEFAULT NULL,
      CSLISTINGCODETYPE    SMALLINT WITH DEFAULT NULL,
      CSSTATUSTYPE         SMALLINT WITH DEFAULT NULL,
      STATUSDETAILTYPE     SMALLINT WITH DEFAULT NULL,
      INCOMEMODETYPE       SMALLINT WITH DEFAULT NULL,
      INTERESTCALCTYPE     SMALLINT WITH DEFAULT NULL,
      INTERESTTYPE         SMALLINT WITH DEFAULT NULL,
      PYFREQUNITTYPE       SMALLINT WITH DEFAULT NULL,
      SUBSCRMETHODTYPE     SMALLINT WITH DEFAULT NULL,
      PLACEMENTTYPE        SMALLINT WITH DEFAULT NULL,
      PAYDIRECTIONTYPE     SMALLINT WITH DEFAULT NULL,
      OPTIONTYPE           SMALLINT WITH DEFAULT NULL,
      SETTLESTYLETYPE      SMALLINT WITH DEFAULT NULL,
      CSFUNDTYPE           SMALLINT WITH DEFAULT NULL,
      TRADINGSTATUSTYPE    SMALLINT WITH DEFAULT NULL,
      LISTINGSTATUSTYPE    SMALLINT WITH DEFAULT NULL,
      EXERCISEPLACE        VARCHAR(254) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME35_G             VARCHAR(35) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME35_E             VARCHAR(35) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME35_F             VARCHAR(35) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME35_I             VARCHAR(35) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME35_N             VARCHAR(35) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME45_G             VARCHAR(45) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME45_E             VARCHAR(45) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME45_F             VARCHAR(45) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME45_I             VARCHAR(45) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME45_N             VARCHAR(45) FOR SBCS DATA
        WITH DEFAULT NULL,
      SHORTNAME_G          VARCHAR(80) FOR SBCS DATA
        WITH DEFAULT NULL,
      SHORTNAME_E          VARCHAR(80) FOR SBCS DATA
        WITH DEFAULT NULL,
      SHORTNAME_F          VARCHAR(80) FOR SBCS DATA
        WITH DEFAULT NULL,
      SHORTNAME_I          VARCHAR(80) FOR SBCS DATA
        WITH DEFAULT NULL,
      SHORTNAME_N          VARCHAR(80) FOR SBCS DATA
        WITH DEFAULT NULL,
      PREPARTICLE_G        VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      PREPARTICLE_E        VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      PREPARTICLE_F        VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      PREPARTICLE_I        VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      PREPARTICLE_N        VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      POSTPARTICLE_G       VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      POSTPARTICLE_E       VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      POSTPARTICLE_F       VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      POSTPARTICLE_I       VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      POSTPARTICLE_N       VARCHAR(60) FOR SBCS DATA
        WITH DEFAULT NULL,
      ISINTERNAL           SMALLINT WITH DEFAULT NULL,
      ISOTC                SMALLINT WITH DEFAULT NULL,
      HASWITHHOLDINGTAX    SMALLINT WITH DEFAULT NULL,
      HASFEDERALSTAMPDUTY              SMALLINT WITH DEFAULT NULL,
      ISCSMIFIDCOMPLEX     SMALLINT WITH DEFAULT NULL,
      MOSTLIQUIDMARKETLOCATION         INTEGER WITH DEFAULT NULL,
      MOSTLIQUIDMARKETLOCATION_A2      CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      MOSTLIQUIDMARKETLOCATION_A3      CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      MOSTLIQUIDMARKETLOCATION_WS80    CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      MDYWATCHLISTSTATUSTYPE           SMALLINT WITH DEFAULT NULL,
      SPWATCHLISTSTATUSTYPE            SMALLINT WITH DEFAULT NULL,
      FITCHWATCHLISTSTATUSTYPE         SMALLINT WITH DEFAULT NULL,
      OPTIONSTYLETYPE      SMALLINT WITH DEFAULT NULL,
      CSMAINTRADINGCURR    INTEGER WITH DEFAULT NULL,
      CSMAINTRADINGCURR_I1             CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINTRADINGCURR_I2             CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINTRADINGCURR_WS80           CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSRISKCOUNTRY_A3     CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
      LIQUIDATIONRIGHTTYPE             SMALLINT WITH DEFAULT NULL,
      CSMAINPARENTTRADINGPLACE         INTEGER WITH DEFAULT NULL,
      CSMAINPARENTTRADINGPLACE_BCN     CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINPARENTTRADINGPLACE_RTX     CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINPARENTTRADINGPLACE_MIC     CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINPARENTTRADINGPLACE_BBX     CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINPARENTTRADINGPLACE_WS80    CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      ISMANAGEDBYCS        SMALLINT WITH DEFAULT NULL,
      EVENTFUNCTIONTYPE    SMALLINT WITH DEFAULT NULL,
      MAINLANGUAGETYPE     SMALLINT WITH DEFAULT NULL,
      EFFECTIVEDATE        VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      ISSUEPRICERATE       FLOAT WITH DEFAULT NULL,
      TITELARTZUSATZTEXT   VARCHAR(12) FOR SBCS DATA
        WITH DEFAULT NULL,
      BORROWINGLIMITTYPE   SMALLINT WITH DEFAULT NULL,
      ISVSTQUALITYCHECKED              SMALLINT WITH DEFAULT NULL,
      MININCREMENTAMOUNT   FLOAT WITH DEFAULT NULL,
      DEL_P42GENERATION    SMALLINT WITH DEFAULT NULL,
      ACCRUEDINTERESTTYPE              SMALLINT WITH DEFAULT NULL,
      DEL_INSTRUMENTUPDATETIMESTAMP    VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      DEL_INSTRUMENTCREATETIMESTAMP    VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSRELEVANCEDATE      VARCHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      CSMAINTRADPLACE_MIC              CHAR(30) FOR SBCS DATA
        WITH DEFAULT NULL,
      HASHOLDINGS          SMALLINT WITH DEFAULT NULL,
      HASHOLDINGSSBIP      SMALLINT WITH DEFAULT NULL,
      NAME_G               VARCHAR(255) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME_E               VARCHAR(255) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME_F               VARCHAR(255) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME_I               VARCHAR(255) FOR SBCS DATA
        WITH DEFAULT NULL,
      NAME_N               VARCHAR(255) FOR SBCS DATA
        WITH DEFAULT NULL,
      CONSTRAINT INSTRUMENTID
      PRIMARY KEY (INSTRUMENTID))
      partition by (instrumentid)
          ( partition  1 ending at ( 22760349)
          , partition  2 ending at ( 28830651)
          , partition  3 ending at ( 38861452)
          , partition  4 ending at ( 45038740)
          , partition  5 ending at ( 49047582)
          , partition  6 ending at ( 53000000)
          , partition  7 ending at ( 57000000)
          , partition  8 ending at ( 61000000)
          , partition  9 ending at ( 65000000)
          , partition 10 ending at ( 69000000)
          , partition 11 ending at ( 73000000)
          , partition 12 ending at ( 77000000)
          , partition 13 ending at ( 81000000)
          , partition 14 ending at ( 85000000)
          , partition 15 ending at ( 89000000)
          , partition 16 ending at ( 93000000)
          , partition 17 ending at ( 97000000)
          , partition 18 ending at (101000000)
          , partition 19 ending at (105000000)
          , partition 20 ending at (109000000)
          , partition 21 ending at (113000000)
          , partition 22 ending at (117000000)
          , partition 23 ending at (121000000)
          , partition 24 ending at (125000000)
          , partition 25 ending at (129000000)
          , partition 26 ending at (133000000)
          , partition 27 ending at (137000000)
          , partition 28 ending at (141000000)
          , partition 29 ending at (145000000)
          , partition 30 ending at (149000000)
          )
    IN VV21A1X.VDPS004
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
--
--
  CREATE UNIQUE INDEX OA1X.VTXINSTRFLATDATA1
    ON OA1X.VTINSTRFLATDATA
     (INSTRUMENTID          ASC)
    USING STOGROUP GSMS
    PRIQTY -1     SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    PARTITIONED
    CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES
    ;
--
  commit  ;
--
-- restliche Indexe, views usw. wie bisher
}¢--- A540769.WK.SQL(VDPS08XX) cre= mod= ---------------------------------------
-- EDITED BY A540769  ON 2007/04/20 AT 18:45
-- EDITED BY A918249  ON 2007/04/17 AT 14:55
-- EDITED BY A540769  ON 2007/04/12 AT 14:56
-- EDITED BY A540769  ON 2007/04/12 AT 14:49
-- EDITED BY A540769  ON 2007/04/10 AT 13:21
-- EDITED BY A540769  ON 2007/04/10 AT 13:20
-- EDITED BY A540769  ON 2007/04/05 AT 14:42
-- EDITED BY A914227  ON 2007/04/03 AT 10:57
-- EDITED BY A914227  ON 2007/03/29 AT 13:26
-- EDITED BY A540769  ON 2007/03/27 AT 17:05
-- EDITED BY A540769  ON 2007/03/27 AT 17:04
-- EDITED BY A914227  ON 2007/03/23 AT 15:58
-- EDITED BY A914227  ON 2007/03/22 AT 13:16
-- EDITED BY A914227  ON 2007/03/20 AT 11:43
-- EDITED BY A914227  ON 2007/03/13 AT 12:24
-- EDITED BY A914227  ON 2007/03/13 AT 12:21
--
  SET CURRENT SQLID='S100447';
--
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","VDPS2";
--
--
  CREATE VIEW VDPS2.XPS_VRGUI000 AS
    SELECT T1.GEOUNITID, T1.VALIDFROMDATE, T1.VALIDUNTILDATE,
           T1.CREATETIMESTAMP, T1.UPDATETIMESTAMP,
           T2.SCHEMESYMBOL SCHEMESYMBOL_ISOA3,
           T2.IDSYMBOL IDSYMBOL_ISOA3,
           T2.VALIDFROMDATE VALIDFROMDATE_ISOA3,
           T2.VALIDUNTILDATE VALIDUNTILDATE_ISOA3,
           T2.CREATETIMESTAMP CREATETIMESTAMP_ISOA3,
           T2.UPDATETIMESTAMP UPDATETIMESTAMP_ISOA3,
           T3.SCHEMESYMBOL SCHEMESYMBOL_ISOA2,
           T3.IDSYMBOL IDSYMBOL_ISOA2,
           T3.VALIDFROMDATE VALIDFROMDATE_ISOA2,
           T3.VALIDUNTILDATE VALIDUNTILDATE_ISOA2,
           T3.CREATETIMESTAMP CREATETIMESTAMP_ISOA2,
           T3.UPDATETIMESTAMP UPDATETIMESTAMP_ISOA2,
           T4.SCHEMESYMBOL SCHEMESYMBOL_ISON,
           T4.IDSYMBOL IDSYMBOL_ISON,
           T4.VALIDFROMDATE VALIDFROMDATE_ISON,
           T4.VALIDUNTILDATE VALIDUNTILDATE_ISON,
           T4.CREATETIMESTAMP CREATETIMESTAMP_ISON,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_ISON,
           T5.SCHEMESYMBOL SCHEMESYMBOL_CS, T5.IDSYMBOL IDSYMBOL_CS,
           T5.VALIDFROMDATE VALIDFROMDATE_CS,
           T5.VALIDUNTILDATE VALIDUNTILDATE_CS,
           T5.CREATETIMESTAMP CREATETIMESTAMP_CS,
           T5.UPDATETIMESTAMP UPDATETIMESTAMP_CS,
           T6.SCHEMESYMBOL SCHEMESYMBOL_TKN, T6.IDSYMBOL IDSYMBOL_TKN,
           T6.VALIDFROMDATE VALIDFROMDATE_TKN,
           T6.VALIDUNTILDATE VALIDUNTILDATE_TKN,
           T6.CREATETIMESTAMP CREATETIMESTAMP_TKN,
           T6.UPDATETIMESTAMP UPDATETIMESTAMP_TKN,
           T7.SCHEMESYMBOL SCHEMESYMBOL_TKR, T7.IDSYMBOL IDSYMBOL_TKR,
           T7.VALIDFROMDATE VALIDFROMDATE_TKR,
           T7.VALIDUNTILDATE VALIDUNTILDATE_TKR,
           T7.CREATETIMESTAMP CREATETIMESTAMP_TKR,
           T7.UPDATETIMESTAMP UPDATETIMESTAMP_TKR, T1.SHORTNAME_G,
           T1.SHORTNAME_E, T1.SHORTNAME_F, T1.SHORTNAME_I,
           T1.SHORTNAME_N, T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I,
           T1.NAME_N
      FROM VDPS2.VTGEOUNIT T1
           LEFT OUTER JOIN
           VDPS2.VTGEOUNITIDENT T2
           ON T2.GEOUNITID = T1.GEOUNITID AND T2.SCHEMESYMBOL =
           'ISOA3' AND T2.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTGEOUNITIDENT T3
           ON T3.GEOUNITID = T1.GEOUNITID AND T3.SCHEMESYMBOL =
           'ISOA2' AND T3.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTGEOUNITIDENT T4
           ON T4.GEOUNITID = T1.GEOUNITID AND T4.SCHEMESYMBOL =
           'ISON' AND T4.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTGEOUNITIDENT T5
           ON T5.GEOUNITID = T1.GEOUNITID AND T5.SCHEMESYMBOL =
           'CS-WS80-DOM' AND T5.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTGEOUNITIDENT T6
           ON T6.GEOUNITID = T1.GEOUNITID AND T6.SCHEMESYMBOL = 'TKN'
           AND T6.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTGEOUNITIDENT T7
           ON T7.GEOUNITID = T1.GEOUNITID AND T7.SCHEMESYMBOL = 'TKR'
           AND T7.ROWSTATUS = 1
      WHERE (T1.ROWSTATUS IS NULL
         OR T1.ROWSTATUS <> 2);
--
  COMMIT;
--
  CREATE ALIAS VDPS.XPS_VRGUI000 FOR VDPS2.XPS_VRGUI000;
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VRIND000 AS
    SELECT T1.SCHEMESYMBOL, T1.IDSYMBOL, T1.VALIDFROMDATE,
           T1.VALIDUNTILDATE, T1.CREATETIMESTAMP, T1.UPDATETIMESTAMP,
           T1.SHORTNAME_G, T1.SHORTNAME_E, T1.SHORTNAME_F,
           T1.SHORTNAME_I, T1.SHORTNAME_N, T1.NAME_G, T1.NAME_E,
           T1.NAME_F, T1.NAME_I, T1.NAME_N, T1.DESCRIPTION_G,
           T1.DESCRIPTION_E, T1.DESCRIPTION_F, T1.DESCRIPTION_I,
           T1.DESCRIPTION_N
      FROM VDPS2.VTINDUSTRY T1
      WHERE (T1.ROWSTATUS IS NULL
         OR T1.ROWSTATUS <> 2);
--
  COMMIT;
--
  CREATE ALIAS VDPS.XPS_VRIND000 FOR VDPS2.XPS_VRIND000;
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VRING000 AS
    SELECT T1.SCHEMESYMBOL, T1.IDSYMBOL, T1.VALIDFROMDATE,
           T1.VALIDUNTILDATE, T1.CREATETIMESTAMP, T1.UPDATETIMESTAMP,
           T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I, T1.NAME_N,
           T1.DESCRIPTION_G, T1.DESCRIPTION_E, T1.DESCRIPTION_F,
           T1.DESCRIPTION_I, T1.DESCRIPTION_N
      FROM VDPS2.VTINSTRGROUP T1
      WHERE (T1.ROWSTATUS IS NULL
         OR T1.ROWSTATUS <> 2);
--
  COMMIT;
--
  CREATE ALIAS VDPS.XPS_VRING000 FOR VDPS2.XPS_VRING000;
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VRINI000 AS
    SELECT T2.SCHEMESYMBOL, T2.IDSYMBOL, T2.VALIDFROMDATE,
           T2.VALIDUNTILDATE, T2.CREATETIMESTAMP, T2.UPDATETIMESTAMP,
           T1.INSTRUMENTID, T1.FOTYPE, T1.CSSTATUSTYPE, T1.STATUSTYPE,
           T1.MAINLANGUAGETYPE, T1.CREATETIMESTAMP CREATETIMESTAMP_IN,
           T1.UPDATETIMESTAMP UPDATETIMESTAMP_IN,
           T3.SCHEMESYMBOL SCHEMESYMBOL_I2, T3.IDSYMBOL IDSYMBOL_I2,
           T3.VALIDFROMDATE VALIDFROMDATE_I2,
           T3.VALIDUNTILDATE VALIDUNTILDATE_I2,
           T3.CREATETIMESTAMP CREATETIMESTAMP_I2,
           T3.UPDATETIMESTAMP UPDATETIMESTAMP_I2,
           T4.SCHEMESYMBOL SCHEMESYMBOL_I1, T4.IDSYMBOL IDSYMBOL_I1,
           T4.VALIDFROMDATE VALIDFROMDATE_I1,
           T4.VALIDUNTILDATE VALIDUNTILDATE_I1,
           T4.CREATETIMESTAMP CREATETIMESTAMP_I1,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_I1,
           T5.SCHEMESYMBOL SCHEMESYMBOL_CS, T5.IDSYMBOL IDSYMBOL_CS,
           T5.VALIDFROMDATE VALIDFROMDATE_CS,
           T5.VALIDUNTILDATE VALIDUNTILDATE_CS,
           T5.CREATETIMESTAMP CREATETIMESTAMP_CS,
           T5.UPDATETIMESTAMP UPDATETIMESTAMP_CS,
           T6.SCHEMESYMBOL SCHEMESYMBOL_T2, T6.IDSYMBOL IDSYMBOL_T2,
           T6.VALIDFROMDATE VALIDFROMDATE_T2,
           T6.VALIDUNTILDATE VALIDUNTILDATE_T2,
           T6.CREATETIMESTAMP CREATETIMESTAMP_T2,
           T6.UPDATETIMESTAMP UPDATETIMESTAMP_T2,
           T7.SCHEMESYMBOL SCHEMESYMBOL_T1, T7.IDSYMBOL IDSYMBOL_T1,
           T7.VALIDFROMDATE VALIDFROMDATE_T1,
           T7.VALIDUNTILDATE VALIDUNTILDATE_T1,
           T7.CREATETIMESTAMP CREATETIMESTAMP_T1,
           T7.UPDATETIMESTAMP UPDATETIMESTAMP_T1,
           T8.SCHEMESYMBOL SCHEMESYMBOL_1T, T8.IDSYMBOL IDSYMBOL_1T,
           T8.VALIDFROMDATE VALIDFROMDATE_1T,
           T8.VALIDUNTILDATE VALIDUNTILDATE_1T,
           T8.CREATETIMESTAMP CREATETIMESTAMP_1T,
           T8.UPDATETIMESTAMP UPDATETIMESTAMP_1T, T1.SHORTNAME_G,
           T1.SHORTNAME_E, T1.SHORTNAME_F, T1.SHORTNAME_I,
           T1.SHORTNAME_N, T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I,
           T1.NAME_N, T1.NAME45_G, T1.NAME45_E, T1.NAME45_F,
           T1.NAME45_I, T1.NAME45_N
      FROM VDPS2.VTINSTRUMENT T1
           INNER JOIN
           VDPS2.VTINSTRIDENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T3
           ON T3.INSTRUMENTID = T1.INSTRUMENTID AND T3.SCHEMESYMBOL =
           'I2' AND T3.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T4
           ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.SCHEMESYMBOL =
           'I1' AND T4.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T5
           ON T5.INSTRUMENTID = T1.INSTRUMENTID AND T5.SCHEMESYMBOL =
           'CS-WS80-WHRG' AND T5.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T6
           ON T6.INSTRUMENTID = T1.INSTRUMENTID AND T6.SCHEMESYMBOL =
           'T2' AND T6.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T7
           ON T7.INSTRUMENTID = T1.INSTRUMENTID AND T7.SCHEMESYMBOL =
           'T1' AND T7.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T8
           ON T8.INSTRUMENTID = T1.INSTRUMENTID AND T8.SCHEMESYMBOL =
           '1T' AND T8.ROWSTATUS = 1
      WHERE T1.FOTYPE = 10
        AND (T1.ROWSTATUS IS NULL
         OR T1.ROWSTATUS <> 2);
--
  COMMIT;
--
  CREATE ALIAS VDPS.XPS_VRINI000 FOR VDPS2.XPS_VRINI000;
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VRISI000 AS
    SELECT T1.INSTITUTIONID, T1.FOTYPE, T1.ISGLOBALREGACC,
           T1.KANTONSCODETYPE, T1.MAINLANGUAGETYPE, T1.STATUSTYPE,
           T1.DELETIONDATE, T1.DELETEREASONTYPE, T1.CREATETIMESTAMP,
           T1.UPDATETIMESTAMP, T2.SCHEMESYMBOL SCHEMESYMBOL_BCN,
           T2.IDSYMBOL IDSYMBOL_BCN,
           T2.VALIDFROMDATE VALIDFROMDATE_BCN,
           T2.VALIDUNTILDATE VALIDUNTILDATE_BCN,
           T2.CREATETIMESTAMP CREATETIMESTAMP_BCN,
           T2.UPDATETIMESTAMP UPDATETIMESTAMP_BCN,
           T3.SCHEMESYMBOL SCHEMESYMBOL_BCA, T3.IDSYMBOL IDSYMBOL_BCA,
           T3.VALIDFROMDATE VALIDFROMDATE_BCA,
           T3.VALIDUNTILDATE VALIDUNTILDATE_BCA,
           T3.CREATETIMESTAMP CREATETIMESTAMP_BCA,
           T3.UPDATETIMESTAMP UPDATETIMESTAMP_BCA,
           T4.SCHEMESYMBOL SCHEMESYMBOL_CS, T4.IDSYMBOL IDSYMBOL_CS,
           T4.VALIDFROMDATE VALIDFROMDATE_CS,
           T4.VALIDUNTILDATE VALIDUNTILDATE_CS,
           T4.CREATETIMESTAMP CREATETIMESTAMP_CS,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_CS,
           T5.SCHEMESYMBOL SCHEMESYMBOL_MIC, T5.IDSYMBOL IDSYMBOL_MIC,
           T5.VALIDFROMDATE VALIDFROMDATE_MIC,
           T5.VALIDUNTILDATE VALIDUNTILDATE_MIC,
           T5.CREATETIMESTAMP CREATETIMESTAMP_MIC,
           T5.UPDATETIMESTAMP UPDATETIMESTAMP_MIC, T1.SHORTNAME_G,
           T1.SHORTNAME_E, T1.SHORTNAME_F, T1.SHORTNAME_I,
           T1.SHORTNAME_N, T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I,
           T1.NAME_N
      FROM VDPS2.VTINSTITUTION T1
           LEFT OUTER JOIN
           VDPS2.VTINSTIIDENT T2
           ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.SCHEMESYMBOL
           = 'BCN' AND T2.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTIIDENT T3
           ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.SCHEMESYMBOL
           = 'BCA' AND T3.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTIIDENT T4
           ON T4.INSTITUTIONID = T1.INSTITUTIONID AND T4.SCHEMESYMBOL
           = 'CS-WS80-BPL' AND T4.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTIIDENT T5
           ON T5.INSTITUTIONID = T1.INSTITUTIONID AND T5.SCHEMESYMBOL
           = 'MIC' AND T5.ROWSTATUS = 1
      WHERE T1.FOTYPE = 104
        AND (T1.ROWSTATUS IS NULL
         OR T1.ROWSTATUS <> 2);
--
  COMMIT;
--
  CREATE ALIAS VDPS.XPS_VRISI000 FOR VDPS2.XPS_VRISI000;
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VRRAS000 AS
    SELECT T1.SCHEMESYMBOL, T1.IDSYMBOL, T1.RATINGSCALEVALUE,
           T1.VALIDFROMDATE, T1.VALIDUNTILDATE, T1.CREATETIMESTAMP,
           T1.UPDATETIMESTAMP, T1.DESCRIPTION_G, T1.DESCRIPTION_E,
           T1.DESCRIPTION_F, T1.DESCRIPTION_I, T1.DESCRIPTION_N
      FROM VDPS2.VTRATINGSYMBOL T1
      WHERE (T1.ROWSTATUS IS NULL
         OR T1.ROWSTATUS <> 2);
--
  COMMIT;
  CREATE ALIAS VDPS.XPS_VRRAS000 FOR VDPS2.XPS_VRRAS000;
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VINGR004_V02 AS
    SELECT A.IDSYMBOL, B.IDSYMBOL IDSYMBOL_CSGTA,
           C.IDSYMBOL IDSYMBOL_ISIN, D.IDSYMBOL IDSYMBOL_TKT
      FROM VDPS2.VTINSTRIDENT A
           INNER JOIN
           VDPS2.VTINSTRUMENT INS
           ON INS.INSTRUMENTID = A.INSTRUMENTID AND (INS.ROWSTATUS IS
           NULL  OR INS.ROWSTATUS <> 2)
           LEFT OUTER JOIN
           VDPS2.VTINSTRINGROUP B
           ON A.INSTRUMENTID = B.INSTRUMENTID AND B.SCHEMESYMBOL =
           'CSGTA'
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT C
           ON A.INSTRUMENTID = C.INSTRUMENTID AND C.SCHEMESYMBOL =
           'I-' AND C.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRINGROUP D
           ON A.INSTRUMENTID = D.INSTRUMENTID AND D.SCHEMESYMBOL =
           'TKT'
      WHERE A.SCHEMESYMBOL = 'CH'
        AND A.ROWSTATUS = 1;
--
  COMMIT;
--
  CREATE ALIAS VDPS.XPS_VINGR004_V02 FOR VDPS2.XPS_VINGR004_V02;
  COMMIT;
  CREATE VIEW VDPS2.XPS_VCFAM003 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.EFFECTIVEDATE,
           T3.EVENTFUNCTIONTYPE, T4.PLANNEDBEGINDATE,
           T4.PLANNEDENDDATE, T4.PLANNEDPAYRATE,
           T5.EXERCPERIODUNITAMT, T5.EXERCPERIODUNITTP, T6.OPTIONTYPE,
           T7.EXERCISEAMOUNT, T7.EXERCISEINSTRUMENT, T7.HELDAMOUNT,
           T7.PAYAMOUNT, T7.PAYDIRECTIONTYPE, T7.PAYRATE
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTINSTRUMENTEVENT T3
           ON T3.INSTRUMENTID = T2.INSTRUMENTID
           INNER JOIN
           VDPS2.VTCFEVENT T4
           ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
           INSTRUMENTEVENTNO = T3.INSTRUMENTEVENTNO
           LEFT JOIN
           VDPS2.VTCASHFLSUBPERIOD T5
           ON T5.INSTRUMENTID = T4.INSTRUMENTID AND T5.
           INSTRUMENTEVENTNO = T4.INSTRUMENTEVENTNO
           LEFT OUTER JOIN
           VDPS2.VTCFEXERCISE T6
           ON T6.INSTRUMENTID = T4.INSTRUMENTID AND T6.
           INSTRUMENTEVENTNO = T4.INSTRUMENTEVENTNO
           LEFT JOIN
           VDPS2.VTCASHFLOWAMOUNT T7
           ON T7.INSTRUMENTID = T4.INSTRUMENTID AND T7.
           INSTRUMENTEVENTNO = T4.INSTRUMENTEVENTNO
      WHERE T1.ROWSTATUS = 1;
  COMMIT;
  CREATE VIEW VDPS2.XPS_VINDE005 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.CSRISKINDSCHEMESYM,
           T3.CSRISKINDIDSYMBOL, T3.CSRISKINSGRPSCHSYM,
           T3.CSRISKINSTGRPIDSYM, T4.IDSYMBOL CSRISKCOUNTRYSYM,
           T5.IDSYMBOL ISORISKCOUNTRYSYM, T6.IDSYMBOL CSRISKCURRSYM,
           T7.IDSYMBOL ISORISKCURRSYM, T8.IDSYMBOL CSRISKINSTRSYM
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.CTINSTRDETAILS T3
           ON T3.INSTRUMENTID = T2.INSTRUMENTID
           LEFT OUTER JOIN
           VDPS2.VTGEOUNITIDENT T4
           ON T4.GEOUNITID = T3.CSRISKCOUNTRY AND T4.SCHEMESYMBOL =
           'CS-WS80-DOM'
           LEFT OUTER JOIN
           VDPS2.VTGEOUNITIDENT T5
           ON T5.GEOUNITID = T3.CSRISKCOUNTRY AND T5.SCHEMESYMBOL =
           'ISOA2'
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T6
           ON T6.INSTRUMENTID = T3.CSRISKCURRENCY AND T6.SCHEMESYMBOL
           = 'CS-WS80-WHRG'
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T7
           ON T7.INSTRUMENTID = T3.CSRISKCURRENCY AND T7.SCHEMESYMBOL
           = 'I2'
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T8
           ON T8.INSTRUMENTID = T3.CSRISKINSTRUMENTID AND T8.
           SCHEMESYMBOL = 'CH'
      WHERE T1.ROWSTATUS = 1;
  COMMIT;
--
--
--
  CREATE ALIAS VDPS.XPS_VCFAM003 FOR VDPS2.XPS_VCFAM003;
  COMMIT;
  CREATE ALIAS VDPS.XPS_VINDE005 FOR VDPS2.XPS_VINDE005;
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VPOCG002 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.PORTFOLIOFUNCTP,
           T5.PORTFOLIONO, T5.PORTFOLIOGROUPNO, T5.PORTFOLIOCRITSETNO,
           T5.PORTFOLIOCRITNO, T3.GROUPNUMBER, T3.PORTFOLIOSTRATDATE,
           T3.VALIDFROMDATE, T3.VALIDUNTILDATE,
           T3.CREATETIMESTAMP CREATETIMESTAMP_PG,
           T3.UPDATETIMESTAMP UPDATETIMESTAMP_PG,
           T4.CREATETIMESTAMP CREATETIMESTAMP_PS,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_PS,
           T5.CREATETIMESTAMP CREATETIMESTAMP_PC,
           T5.UPDATETIMESTAMP UPDATETIMESTAMP_PC, T4.RUNNINGNUMBER,
           T4.INVESTMENTAMOUNT, T4.INVESTMENTQUOTETP,
           T4.INVESTMENTCURRENCY, T7.IDSYMBOL INVESTCURR_I2,
           T4.MININVESTMENTAMT, T4.MININVESTQUOTETP,
           T4.MININVESTMENTCURR, T8.IDSYMBOL MININVESTCURR_I2,
           T4.MAXINVESTMENTAMT, T4.MAXINVESTQUOTETP,
           T4.MAXINVESTMENTCURR, T9.IDSYMBOL MAXINVESTCURR_I2,
           T5.PORTFOLIOCRITTYPE, T5.ISEXCLUDED, T5.GEOGRAPHICUNIT,
           T6.SHORTNAME_G, T6.SHORTNAME_E, T6.SHORTNAME_F,
           T6.SHORTNAME_I, T6.SHORTNAME_N, T5.DESCRIPTION
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTPORTFOLIOGROUP T3
           ON T3.PORTFOLIONO = T2.PORTFOLIONO
           INNER JOIN
           VDPS2.VTPORTFOLCRITSET T4
           ON T4.PORTFOLIONO = T3.PORTFOLIONO AND T4.PORTFOLIOGROUPNO
           = T3.PORTFOLIOGROUPNO
           INNER JOIN
           VDPS2.VTPORTFOLCRITERIA T5
           ON T5.PORTFOLIONO = T4.PORTFOLIONO AND T5.PORTFOLIOGROUPNO
           = T4.PORTFOLIOGROUPNO AND T5.PORTFOLIOCRITSETNO = T4.
           PORTFOLIOCRITSETNO AND T5.PORTFOLIOCRITTYPE = 6
           LEFT OUTER JOIN
           VDPS2.VTGEOUNIT T6
           ON T6.GEOUNITID = T5.GEOGRAPHICUNIT AND (T6.ROWSTATUS IS
           NULL  OR T6.ROWSTATUS <> 2)
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T7
           ON T7.INSTRUMENTID = T4.INVESTMENTCURRENCY AND T7.
           SCHEMESYMBOL = 'I2' AND T7.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T8
           ON T8.INSTRUMENTID = T4.MININVESTMENTCURR AND T8.
           SCHEMESYMBOL = 'I2' AND T8.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T9
           ON T9.INSTRUMENTID = T4.MAXINVESTMENTCURR AND T9.
           SCHEMESYMBOL = 'I2' AND T9.ROWSTATUS = 1
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VOPPA003 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T2.FOTYPE,
           T5.IDSYMBOL EXERCISECURR_I2, CFA.EXERCISEINSTRUMENT,
           CFA.EXERCISEAMOUNT, CAST(NULL AS FLOAT) EXERCISEUNITAMOUNT,
           CAST(CASE WHEN CFA.EXERCISEAMOUNT > 0 THEN 2 ELSE NULL END
           AS SMALLINT) EXERCISEUNITTYPE, CFA.HELDAMOUNT,
           CFA.HELDUNITTYPE, T6.IDSYMBOL SETTLECURR_I2,
           CAST(CASE WHEN CFA.UNDERFIXINGNO IS NULL THEN CFA.
           PAYINSTRUMENT ELSE NULL END AS INTEGER) SETTLEINSTRUMENT,
           CFE.SETTLETYPE, CFA.PAYUNITTYPE SETTLEUNITTYPE,
           CFE.OPTIONTYPE, CFE.CREATETIMESTAMP, CFE.UPDATETIMESTAMP,
           CAST(CASE WHEN CFA.UNDERFIXINGNO IS NOT NULL THEN 1 ELSE 0
           END AS SMALLINT) HASUNDERFIXING, UND.TYPEX,
           UND.UNDERSETTLETYPE, UFXC.UNDERINSTRID,
           T7.IDSYMBOL UNDERINSTRID_CH, T8.IDSYMBOL UNDERINSTRID_ISIN,
           UFXC.CREATETIMESTAMP CREATETIMESTAMP_OU,
           UFXC.UPDATETIMESTAMP UPDATETIMESTAMP_OU,
           UND.UNDERLYINGNAME_G, UND.UNDERLYINGNAME_E,
           UND.UNDERLYINGNAME_F, UND.UNDERLYINGNAME_I,
           UND.UNDERLYINGNAME_N
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTCFEVENT CFEV
           ON CFEV.INSTRUMENTID = T1.INSTRUMENTID
           INNER JOIN
           VDPS2.VTCASHFLOWAMOUNT CFA
           ON CFA.INSTRUMENTID = CFEV.INSTRUMENTID AND CFA.
           INSTRUMENTEVENTNO = CFEV.INSTRUMENTEVENTNO
           LEFT OUTER JOIN
           VDPS2.VTCFEXERCISE CFE
           ON CFE.INSTRUMENTID = CFA.INSTRUMENTID AND CFE.
           INSTRUMENTEVENTNO = CFA.INSTRUMENTEVENTNO
           LEFT OUTER JOIN
           VDPS2.VTUNDERFIXING UND
           ON UND.INSTRUMENTID = CFA.INSTRUMENTID AND UND.
           UNDERFIXINGNO = CFA.UNDERFIXINGNO
           LEFT OUTER JOIN
           VDPS2.VTUNDERFXCOMPONENT UFXC
           ON UFXC.INSTRUMENTID = UND.INSTRUMENTID AND UFXC.
           UNDERFIXINGNO = UND.UNDERFIXINGNO
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T5
           ON T5.INSTRUMENTID = CFA.EXERCISEINSTRUMENT AND T5.
           SCHEMESYMBOL = 'I2' AND T5.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T6
           ON T6.INSTRUMENTID = CFA.PAYINSTRUMENT AND T6.SCHEMESYMBOL
           = 'I2' AND T6.ROWSTATUS = 1 AND CFA.UNDERFIXINGNO IS NULL
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T7
           ON T7.INSTRUMENTID = UFXC.UNDERINSTRID AND T7.SCHEMESYMBOL
           = 'CH' AND T7.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T8
           ON T8.INSTRUMENTID = UFXC.UNDERINSTRID AND T8.SCHEMESYMBOL
           = 'I-' AND T8.ROWSTATUS = 1
      WHERE T1.ROWSTATUS = 1
        AND (CFA.UNDERFIXINGNO IS NOT NULL
         OR CFEV.SETTLESTYLETYPE IS NOT NULL);
--
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VLIID004 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.LISTINGNO,
           T4.IDSYMBOL IDSYMBOL_BCN, T5.IDSYMBOL CURRENCY_I2,
           T3.TRADINGPLACE, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
           T3.LISTINGSTATUSTYPE, T3.EXCHANGETYPE, T3.CREATETIMESTAMP,
           T3.UPDATETIMESTAMP, T6.IDSYMBOL IDSYMBOL_RIC,
           T7.IDSYMBOL IDSYMBOL_BBI
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTLISTING T3
           ON T3.INSTRUMENTID = T1.INSTRUMENTID
           INNER JOIN
           VDPS2.VTINSTIIDENT T4
           ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
           = 'BCN' AND T4.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T5
           ON T5.INSTRUMENTID = T3.CURRENCY AND T5.SCHEMESYMBOL =
           'I2' AND T5.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T6
           ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
           LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
           IS NULL  OR T6.ISSECONDARY = 0)
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T7
           ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
           LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
           IS NULL  OR T7.ISSECONDARY = 0)
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VVPPL005 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.CFPLANNO, T3.BEGINDATE,
           T3.ENDDATE, T3.RATEFIXINGFREQ, T3.RTFIXFREQUNITTYPE,
           T3.DAYSFIXEDBFACTPYDT, T3.DAYSFIXEDBFNXPYDT,
           T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTPAYMENTPLAN T3
           ON T3.INSTRUMENTID = T1.INSTRUMENTID
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VCAFO002 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.INSTRUMENTEVENTNO,
           T5.CASHFLOWAMOUNTNO, T3.EVENTFUNCTIONTYPE,
           T3.EFFECTIVEDATE, T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP,
           T4.SPREADINTERESTRATE, T4.ENTITLEBEGINDATE,
           T4.ENTITLEENDDATE, T4.CREATETIMESTAMP CREATETIMESTAMP_CE,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_CE, T5.CFAMOUNTTYPE,
           T5.HELDAMOUNT, T5.HELDUNITTYPE, T5.PAYAMOUNT,
           T5.PAYUNITTYPE, T5.PAYRATE, T5.PRORATAPAYRATE,
           T5.CREATETIMESTAMP CREATETIMESTAMP_CA,
           T5.UPDATETIMESTAMP UPDATETIMESTAMP_CA
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTINSTRUMENTEVENT T3
           ON T3.INSTRUMENTID = T1.INSTRUMENTID
           INNER JOIN
           VDPS2.VTCFEVENT T4
           ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
           INSTRUMENTEVENTNO = T3.INSTRUMENTEVENTNO
           LEFT OUTER JOIN
           VDPS2.VTCASHFLOWAMOUNT T5
           ON T5.INSTRUMENTID = T4.INSTRUMENTID AND T5.
           INSTRUMENTEVENTNO = T4.INSTRUMENTEVENTNO
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
--
  CREATE VIEW VDPS2.XPS_VINSH001 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T5.IDSYMBOL IDSYMBOL_BCN,
           T9.IDSYMBOL CURRENCY_I2, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
           T3.LISTINGSTATUSTYPE, T4.ISSTEERINGFLAG4, T4.MANDATOR,
           T6.IDSYMBOL IDSYMBOL_RIC, T7.IDSYMBOL IDSYMBOL_BBI,
           T8.IDSYMBOL IDSYMBOL_TK_79,
           T3.CREATETIMESTAMP CREATETIMESTAMP_VL,
           T3.UPDATETIMESTAMP UPDATETIMESTAMP_VL,
           T4.CREATETIMESTAMP CREATETIMESTAMP_CL,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_CL
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTLISTING T3
           ON T3.INSTRUMENTID = T1.INSTRUMENTID
           INNER JOIN
           VDPS2.CTLISTING T4
           ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
           LISTINGNO AND T4.ISSTEERINGFLAG4 = 1
           INNER JOIN
           VDPS2.VTINSTIIDENT T5
           ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
           = 'BCN' AND T5.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T6
           ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
           LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
           IS NULL  OR T6.ISSECONDARY = 0)
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T7
           ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
           LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
           IS NULL  OR T7.ISSECONDARY = 0)
           LEFT OUTER JOIN
           VDPS2.VTLISTINGGRPKEY T8
           ON T8.INSTRUMENTID = T3.INSTRUMENTID AND T8.LISTINGNO = T3.
           LISTINGNO AND T8.INSTRGRSCHMSYMBOL = 'TK' AND T8.IDSYMBOL
           = '79'
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T9
           ON T9.INSTRUMENTID = T3.CURRENCY AND T9.SCHEMESYMBOL =
           'I2' AND T9.ROWSTATUS = 1
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=VDPS2.XPS_VINSH002
------------------------------------------------------------------------
--
--
  CREATE VIEW VDPS2.XPS_VINSH002 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T5.IDSYMBOL IDSYMBOL_BCN,
           T9.IDSYMBOL CURRENCY_I2, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
           T3.LISTINGSTATUSTYPE, T4.ISSTEERINGFLAG4, T4.MANDATOR,
           T6.IDSYMBOL IDSYMBOL_RIC, T7.IDSYMBOL IDSYMBOL_BBI,
           T8.IDSYMBOL IDSYMBOL_TK_79,
           T3.CREATETIMESTAMP CREATETIMESTAMP_VL,
           T3.UPDATETIMESTAMP UPDATETIMESTAMP_VL,
           T4.CREATETIMESTAMP CREATETIMESTAMP_CL,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_CL
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTLISTING T3
           ON T3.INSTRUMENTID = T1.INSTRUMENTID
           INNER JOIN
           VDPS2.CTLISTING T4
           ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
           LISTINGNO AND T4.ISSTEERINGFLAG4 = 1
           INNER JOIN
           VDPS2.VTINSTIIDENT T5
           ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
           = 'BCN' AND T5.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T6
           ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
           LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
           IS NULL  OR T6.ISSECONDARY = 0)
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T7
           ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
           LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
           IS NULL  OR T7.ISSECONDARY = 0)
           LEFT OUTER JOIN
           VDPS2.VTLISTINGGRPKEY T8
           ON T8.INSTRUMENTID = T3.INSTRUMENTID AND T8.LISTINGNO = T3.
           LISTINGNO AND T8.INSTRGRSCHMSYMBOL = 'TK' AND T8.IDSYMBOL
           = '79'
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T9
           ON T9.INSTRUMENTID = T3.CURRENCY AND T9.SCHEMESYMBOL =
           'I2' AND T9.ROWSTATUS = 1
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
  CREATE ALIAS VDPS.XPS_VPOCG002 FOR VDPS2.XPS_VPOCG002;
  COMMIT;
  CREATE ALIAS VDPS.XPS_VOPPA003 FOR VDPS2.XPS_VOPPA003;
  COMMIT;
  CREATE ALIAS VDPS.XPS_VLIID004 FOR VDPS2.XPS_VLIID004;
  COMMIT;
  CREATE ALIAS VDPS.XPS_VVPPL005 FOR VDPS2.XPS_VVPPL005;
  COMMIT;
  CREATE ALIAS VDPS.XPS_VCAFO002 FOR VDPS2.XPS_VCAFO002;
  COMMIT;
  CREATE ALIAS VDPS.XPS_VINSH002 FOR VDPS2.XPS_VINSH002;
  COMMIT;
--
--
  DROP VIEW VDPS2.XPS_VCFAM002;
  COMMIT;
--
  CREATE VIEW VDPS2.XPS_VCFAM002 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T6.EVENTFUNCTIONTYPE,
           T6.IDSYMBOL HOSTLINK, T6.BUSINESSTYPE, T6.EFFECTIVEDATE,
           T8.IRREGULARCPNTYPE, T8.PHYSICALSECURITYNO,
           T8.VALIDATIONTYPE, T8.PAYMENTSTATUSTYPE,
           T7.ISVALIDRANGEEXDEPO, T7.ISVALIDRANGEPRESEN,
           T7.INFORMATIONSOURCE, T6.CSEVENTSTATUSTYPE,
           T10.CFAMOUNTTYPE, T10.PAYAMOUNT, T4.IDSYMBOL AMOUNTCURR_CS,
           T10.PRORATAPAYRATE, T6.RECORDDATE, T5.PAYFREQUENCY,
           T5.PYFREQUNITTYPE, T5.EFFINTERESTRATE,
           T5.FIRSTPYDATEPERYEAR, T5.MATURITYDATE, T5.NONVERSEAMOUNT,
           T10.PAYRATE, T8.ENTITLETIMENO, T8.ENTITLETIMEUNITTP,
           T10.HELDAMOUNT, T10.HELDUNITTYPE, T8.ENTITLEBEGINDATE,
           T8.ENTITLEENDDATE, T8.DIVIDENDTYPE, T8.DIVIOCCURENCETYPE,
           T6.CSEXDATE, T10.AMOUNTSTATUSTYPE
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTINSTRWITHCF T5
           ON T2.INSTRUMENTID = T5.INSTRUMENTID
           INNER JOIN
           VDPS2.VTINSTRUMENTEVENT T6
           ON T2.INSTRUMENTID = T6.INSTRUMENTID AND T6.PROVIDERTYPE =
           1
           LEFT JOIN
           VDPS2.VTCSEVENTDETAIL T7
           ON T6.INSTRUMENTID = T7.INSTRUMENTID AND T6.
           INSTRUMENTEVENTNO = T7.INSTRUMENTEVENTNO
           LEFT JOIN
           VDPS2.VTCFEVENT T8
           ON T6.INSTRUMENTID = T8.INSTRUMENTID AND T6.
           INSTRUMENTEVENTNO = T8.INSTRUMENTEVENTNO
           LEFT JOIN
           VDPS2.VTCASHFLOWAMOUNT T10
           ON T8.INSTRUMENTID = T10.INSTRUMENTID AND T8.
           INSTRUMENTEVENTNO = T10.INSTRUMENTEVENTNO
           LEFT JOIN
           VDPS2.VTINSTRIDENT T4
           ON T10.PAYINSTRUMENT = T4.INSTRUMENTID AND T4.SCHEMESYMBOL
           = 'CS-WS80-WHRG'
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
--
  DROP VIEW VDPS2.XPS_VCFAM001;
  COMMIT;
--
  CREATE VIEW VDPS2.XPS_VCFAM001 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T6.EVENTFUNCTIONTYPE,
           T6.IDSYMBOL HOSTLINK, T6.BUSINESSTYPE, T6.EFFECTIVEDATE,
           T8.IRREGULARCPNTYPE, T8.PHYSICALSECURITYNO,
           T8.VALIDATIONTYPE, T8.PAYMENTSTATUSTYPE,
           T6.CSEVENTSTATUSTYPE, T10.CFAMOUNTTYPE, T10.PAYAMOUNT,
           T4.IDSYMBOL AMOUNTCURR_CS, T10.PRORATAPAYRATE,
           T6.RECORDDATE, T5.PAYFREQUENCY, T5.PYFREQUNITTYPE,
           T5.EFFINTERESTRATE, T5.FIRSTPYDATEPERYEAR, T5.MATURITYDATE,
           T5.NONVERSEAMOUNT, T10.PAYRATE, T8.ENTITLETIMENO,
           T8.ENTITLETIMEUNITTP, T10.HELDAMOUNT, T10.HELDUNITTYPE,
           T8.ENTITLEBEGINDATE, T8.ENTITLEENDDATE, T8.DIVIDENDTYPE,
           T8.DIVIOCCURENCETYPE, T6.CSEXDATE, T10.AMOUNTSTATUSTYPE
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTINSTRWITHCF T5
           ON T2.INSTRUMENTID = T5.INSTRUMENTID
           INNER JOIN
           VDPS2.VTINSTRUMENTEVENT T6
           ON T2.INSTRUMENTID = T6.INSTRUMENTID AND T6.PROVIDERTYPE =
           1
           LEFT JOIN
           VDPS2.VTCFEVENT T8
           ON T6.INSTRUMENTID = T8.INSTRUMENTID AND T6.
           INSTRUMENTEVENTNO = T8.INSTRUMENTEVENTNO
           LEFT JOIN
           VDPS2.VTCASHFLOWAMOUNT T10
           ON T8.INSTRUMENTID = T10.INSTRUMENTID AND T8.
           INSTRUMENTEVENTNO = T10.INSTRUMENTEVENTNO
           LEFT JOIN
           VDPS2.VTINSTRIDENT T4
           ON T10.PAYINSTRUMENT = T4.INSTRUMENTID AND T4.SCHEMESYMBOL
           = 'CS-WS80-WHRG'
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
  CREATE VIEW VDPS2.XPS_VDISP000 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
           T5.SCHEMESYMBOL PARENT_SCHEME, T5.IDSYMBOL PARENT_IDSYMBOL,
           T3.BEGINDATE, T3.ENDDATE, T3.TYPEX, T3.MGMTCONTRACTTYPE,
           T3.CHILDINSTIID, T3.PARENTINSTIID, T3.INSTISTRUCTNO,
           T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP,
           T2.CREATETIMESTAMP CREATETIMESTAMP_IC,
           T2.UPDATETIMESTAMP UPDATETIMESTAMP_IC,
           T4.CREATETIMESTAMP CREATETIMESTAMP_IP,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_IP
      FROM VDPS2.VTINSTIIDENT T1
           INNER JOIN
           VDPS2.VTINSTITUTION T2
           ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
           IS NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTINSTISTRUCT T3
           ON T3.CHILDINSTIID = T2.INSTITUTIONID
           INNER JOIN
           VDPS2.VTINSTITUTION T4
           ON T4.INSTITUTIONID = T3.PARENTINSTIID AND (T4.ROWSTATUS
           IS NULL  OR T4.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTINSTIIDENT T5
           ON T5.INSTITUTIONID = T4.INSTITUTIONID AND T5.ROWSTATUS = 1
      WHERE T1.ROWSTATUS = 1;
  COMMIT;
  CREATE ALIAS VDPS.XPS_VDISP000 FOR VDPS2.XPS_VDISP000;
  COMMIT;
--
  DROP   VIEW VDPS2.XPS_VLIID003;
  CREATE VIEW VDPS2.XPS_VLIID003 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.LISTINGNO,
           T4.IDSYMBOL IDSYMBOL_BCN, T5.IDSYMBOL CURRENCY_I2,
           T3.TRADINGPLACE, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
           T3.LISTINGSTATUSTYPE, T3.EXCHANGETYPE, T3.CREATETIMESTAMP,
           T3.UPDATETIMESTAMP, T6.IDSYMBOL IDSYMBOL_RIC,
           T7.IDSYMBOL IDSYMBOL_BBI
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTLISTING T3
           ON T3.INSTRUMENTID = T1.INSTRUMENTID
           INNER JOIN
           VDPS2.VTINSTIIDENT T4
           ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
           = 'BCN' AND T4.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T5
           ON T5.INSTRUMENTID = T3.CURRENCY AND T5.SCHEMESYMBOL =
           'I2' AND T5.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T6
           ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
           LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
           IS NULL  OR T6.ISSECONDARY = 0)
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T7
           ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
           LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
           IS NULL  OR T7.ISSECONDARY = 0)
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
  CREATE VIEW VDPS2.XPS_VISCO005 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.PAYMENTDATE,
           T3.PAYMENTTYPE, T4.PAYDATE
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID
           INNER JOIN
           VDPS2.VTISSUECONDITION T3
           ON T3.INSTRUMENTID = T2.INSTRUMENTID
           LEFT OUTER JOIN
           VDPS2.VTISSUEPAYSCHEDULE T4
           ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
           ISSUECONDITIONNO = T3.ISSUECONDITIONNO
      WHERE T1.ROWSTATUS = 1
        AND (T2.ROWSTATUS IS NULL
         OR T2.ROWSTATUS <> 2);
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
  COMMIT;
  CREATE ALIAS VDPS.XPS_VISCO005 FOR VDPS2.XPS_VISCO005;
  COMMIT;
------------------------------------------------------------------------
--    VIEW=VDPS2.XPS_VLIID005
--    Nachtrag von Felix Metzler am 17.04.07 / P. Kuhn
------------------------------------------------------------------------
--
  CREATE VIEW VDPS2.XPS_VLIID005 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.CURRENCY,
           T3.CSLISTINGCODETYPE, T3.TRADINGPLACE,
           T3.TRADINGSTATUSTYPE, T3.LISTINGSTATUSTYPE,
           T4.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
           T5.IDSYMBOL IDSYMBOL_BCA, T6.IDSYMBOL IDSYMBOL_TICKER,
           T6.ISSECONDARY, T6.SCHEMESYMBOL SCHEMESYMBOL_LIST
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           VDPS2.VTLISTING T3
           ON T3.INSTRUMENTID = T1.INSTRUMENTID
           LEFT OUTER JOIN
           VDPS2.CTLISTING T4
           ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
           LISTINGNO
           INNER JOIN
           VDPS2.VTINSTIIDENT T5
           ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
           = 'BCA' AND T5.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTLISTINGIDENT T6
           ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
           LISTINGNO
      WHERE T1.ROWSTATUS = 1;
--
  COMMIT;
--
  CREATE ALIAS VDPS.XPS_VLIID005 FOR VDPS2.XPS_VLIID005;
  COMMIT;
}¢--- A540769.WK.SQL(VERSION) cre=2008-10-23 mod=2008-10-24-08.21.03 F540769 ---
SELECT GETVARIABLE('SYSIBM.VERSION') vv, session_user
           from sysibm.sysdummy1
}¢--- A540769.WK.SQL(VIEWDEP) cre=2006-10-17 mod=2007-05-18-12.51.12 F540769 ---
with o (lev, dType, dCreator, dName, bType, bCreator, bName) as
(   select 0, t.type, creator, name, '.', '', t.dbName
        from sysibm.sysTables t
        where t.type = 'T' and t.dbname like 'DGDB9998%'
            --  and (t.dbname like 'BJA_0001'
            --     or t.dbname = 'DBJ01' or t.dbname like 'DNF%')
    union all select o.lev+1, d.dType, d.dCreator, d.dName,
                               o.dType, o.dCreator, o.dName
        from o, sysibm.sysviewdep d
        where d.bcreator = o.dCreator and d.bName = o.dName
            -- and d.bType = o.dType
            and o.lev < 999999
    union all select o.lev+1, a.Type, a.creator, a.name,
                               o.dType, o.dCreator, o.dName
        from o, sysibm.systables a
        where a.tbCreator = o.dCreator and a.tbName = o.dName
            and a.type = 'A' and o.lev < 999999
)
select distinct dType, char(dCreator, 12), char(dName, 20)
             ,   bType, char(bCreator, 12), char(bName, 20)
    from o
 -- where dType = 'A' -- and                      bCreator <> 'ODV'
    order by 3, 2
;
select min(lev), dType, char(dCreator, 12), char(dName, 20)
          -- ,   bType, char(bCreator, 12), char(bName, 20)
    from o
    group by dType, dCreator, dName
    order by dName, 1
;
select min(lev), -- count(*),
        dType, char(strip(dCreator)||'.'|| dName, 30)
    from o
    group by dType, dCreator, dName
    order by dName, dCreator
;
}¢--- A540769.WK.SQL(VOGLER) cre=2008-03-17 mod=2008-03-20-15.15.37 F540769 ----
SELECT COUNT(*) FROM OA1Z.TNZ232A1
;
UPDATE OA1Z.TNZ232A1
    SET NZ232020 = '9999-12-13-23.59.59.999999'
    WHERE NZ232020 = ' '
;
-- SELECT *        FROM OA1A.TNZ232A1
--    ORDER BY NZ232020 DESC
--;
COMMIT
;
}¢--- A540769.WK.SQL(VOGLERNA) cre=2008-03-17 mod=2008-03-20-15.23.14 F540769 ---
SELECT COUNT(*) FROM OA1Z.TNZ232A1
;
UPDATE OA1Z.TNZ232A1
    SET NZ232020 = NULL
    WHERE NZ232020 = '9999-12-13-23.59.59.999999'
;
-- SELECT *        FROM OA1A.TNZ232A1
--    ORDER BY NZ232020 DESC
--;
COMMIT
;
}¢--- A540769.WK.SQL(VSAMNUM) cre=2011-09-21 mod=2011-09-21-14.31.06 A540769 ---
     SELECT *
     FROM   DB2TS.SPACE001

WHERE
          dsn like 'DBOF.DSNDB%.PC01A1P.IPC099A0.%'
       or dsn like 'DBOF.DSNDB%.PC01A1P.IPC100A0.%'
       or dsn like 'DBOF.DSNDB%.PC01A1P.IPC101A0.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC400A1.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC400A1.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC016A1.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC401A1.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC003A0.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC400A0.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC400A2.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC401A0.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC402A0.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC402A1.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC403A0.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC403A1.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC405A0.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC406A0.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.IPC412A0.%'
       or dsn like 'DBOF.DSNDB%.PC01A1P.A099A.%'
       or dsn like 'DBOF.DSNDB%.PC01A1P.A100A.%'
       or dsn like 'DBOF.DSNDB%.PC01A1P.A101A.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A011A01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A011H01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A016A01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A016H01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A400A01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A401A01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A402A01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A403A01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A405A01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A406A01.%'
       or dsn like 'DBOF.DSNDB%.PC11A1P.A412A01.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A011A02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A011H02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A016A02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A016H02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A400A02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A401A02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A402A02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A403A02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A405A02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A406A02.%'
       or dsn like 'DBOF.DSNDB%.PC12A1P.A412A02.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A011A03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A011H03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A016A03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A016H03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A400A03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A401A03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A402A03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A403A03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A405A03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A406A03.%'
       or dsn like 'DBOF.DSNDB%.PC13A1P.A412A03.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A011A04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A011H04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A016A04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A016H04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A400A04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A401A04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A402A04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A403A04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A405A04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A406A04.%'
       or dsn like 'DBOF.DSNDB%.PC14A1P.A412A04.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A011A05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A011H05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A016A05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A016H05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A400A05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A401A05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A402A05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A403A05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A405A05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A406A05.%'
       or dsn like 'DBOF.DSNDB%.PC15A1P.A412A05.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A011A06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A011H06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A016A06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A016H06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A400A06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A401A06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A402A06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A403A06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A405A06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A406A06.%'
       or dsn like 'DBOF.DSNDB%.PC16A1P.A412A06.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A011A07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A011H07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A016A07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A016H07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A400A07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A401A07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A402A07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A403A07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A405A07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A406A07.%'
       or dsn like 'DBOF.DSNDB%.PC17A1P.A412A07.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A011A08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A011H08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A016A08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A016H08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A400A08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A401A08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A402A08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A403A08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A405A08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A406A08.%'
       or dsn like 'DBOF.DSNDB%.PC18A1P.A412A08.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A011A09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A011H09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A016A09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A016H09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A400A09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A401A09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A402A09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A403A09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A405A09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A406A09.%'
       or dsn like 'DBOF.DSNDB%.PC19A1P.A412A09.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A011A10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A011H10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A016A10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A016H10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A400A10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A401A10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A402A10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A403A10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A405A10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A406A10.%'
       or dsn like 'DBOF.DSNDB%.PC20A1P.A412A10.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.A400A12.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.A401A12.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.A402A12.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.A403A12.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.A405A12.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.A406A12.%'
       or dsn like 'DBOF.DSNDB%.PC22A1P.A412A12.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.A003A13.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.A400A13.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.A401A13.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.A402A13.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.A403A13.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.A405A13.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.A406A13.%'
       or dsn like 'DBOF.DSNDB%.PC23A1P.A412A13.%'
}¢--- A540769.WK.SQL(VTINSTR) cre=2007-11-23 mod=2007-11-23-11.49.08 F540769 ---
SELECT TYPEX,  COUNT(*)
    FROM VDPS2.VTINSTISTRUCT
    GROUP BY TYPEX
;
SELECT C, COUNT(*)
    FROM (
SELECT CHILDINSTIID ID,  COUNT(*) C
    FROM VDPS2.VTINSTISTRUCT
    GROUP BY CHILDINSTIID
    ) X
 GROUP BY C
 ORDER BY C DESC
;

  SET CURRENT SQLID='S100447';
  CREATE        INDEX VDPS2.VTXINSTISTRUCT2
    ON VDPS2.VTINSTISTRUCT
     (CHILDINSTIID          ASC,
      TYPEX                 ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
  COMMIT;
}¢--- A540769.WK.SQL(VVALIAS) cre=2014-11-15 mod=2014-11-15-11.36.21 A540769 ---
with alias as
(
  select substr(strip(a.creator) || '.' || strip (a.name), 1, 40) alias
       , t.type foTy
       , substr(strip(t.creator) || '.' || strip (t.name), 1, 99) for
       , t.*
    from sysibm.systables t
         left join sysibm.systables a
         on a.tbCreator = t.creator and a.tbName = t.name
            and a.type = 'A'
)
select -- row_number() over () ,
       alias.* from alias
    where dbName like 'VV%'
    --  and alias is null
    and type in ('T', 'V')
    order by creator, name, alias
}¢--- A540769.WK.SQL(VVLOCKPR) cre=2014-10-09 mod=2014-11-21-16.02.47 A540769 ---
  select count(*) cnt, date(timestamp)
       , type
       , min(name) rMin, max(name) rMax
    from oa1p.tqz060timeout t
    where rz = 'RZ2' and dbSys = 'DBOF'
        and name like '%VV%'
        and timestamp > current timestamp - 1 month
    group by date(timestamp), type
    order by 2 desc, 3
;
  select count(*) cnt, date(timestamp)
  --   , sum(case when timestamp > current Timestamp - 1 month
  ---          then 1 else 0 end) cMo
  --   , substr(resource, 1, 27) n17
       , min(resource) rMin, max(resource) rMax
    from oa1p.tqz064LockEscal t
    where rz = 'RZ2' and dbSys = 'DBOF'
        and (resource like '%VV%' or resource like '%VDPS%'
            or plan_name like '%VDPS%' or package_name like '%VDPS%'
            or plan_name like '%serv%' or package_name like '%serv%'
            or plan_name like '%VV%' or package_name like '%VV%')
        and timestamp > current timestamp - 1 month
    group by date(timestamp)
    order by 2 desc
;x;
)
with g as
(
  select count(*) cnt
       , sum(case when timestamp > current Timestamp - 1 month
               then 1 else 0 end) cMo
       , substr(resource, 1, 27) n17
       , min(resource) rMin, max(resource) rMax
    from oa1p.tqz064LockEscal t
    where rz = 'RZ2' and dbSys = 'DBOF'
        and (resource like '%VV%' or resource like '%VDPS%'
            or plan_name like '%VDPS%' or package_name like '%VDPS%'
            or plan_name like '%serv%' or package_name like '%serv%'
            or plan_name like '%VV%' or package_name like '%VV%')
        and timestamp > current timestamp - 1 year
    group by substr(resource, 1, 27)
    order by 2, 3
)
, t as
(
  select sum(cnt) cnt, sum(cMo) cMo, n17
      from g
      group by n17
)
select g.*
    from g join t on g.n17 = t.n17
    order by cMo desc, cnt desc, n17
;x;L
with g as
(
  select count(*) cnt
       , sum(case when timestamp > current Timestamp - 1 month
               then 1 else 0 end) cMo
       , substr(name, 1, 17) n17
       , type
       , min(name) rMin, max(name) rMax
    from oa1p.tqz060timeout t
    where rz = 'RZ2' and dbSys = 'DBOF'
        and name like '%VV%'
        and timestamp > current timestamp - 1 year
    group by substr(name, 1, 17), type
    order by 2, 3
)
, s as
(
  select sum(cnt) cnt, sum(cMo) cMo, n17
      from g
      group by n17
)
, t as
(
  select cnt, cMo
       , row_number() over(order by cnt desc) rCn
       , row_number() over(order by cMo desc) rMo
       , n17
      from s
)
select g.*, rCn, rMo
    from g join t on g.n17 = t.n17
    order by cMo desc, cnt desc, n17, type
;x;L
select sum(case when event_type = 'D' then 1 else 0 end) deadlock
    ,  sum(case when event_type = 'T' then 1 else 0 end) timeout
    , min(name), max(name)
    , min(plan_name), max(plan_name)
    , min(package_name), max(package_name)
    , min(event_type), max(event_type)
    , count(*)
    , min(loadDate), tst
    from s
    where rz = 'RR2' and dbSys = 'DBOF'
        and name like '%VV%'
        and timestamp > current timestamp - 1 year
    group by t1, tst
    order by t1 desc, tst desc
;x;
with s as
( select case when loadDate <= '03.10.2014' then 0 else 1 end t1
       , trunc_timestamp(timestamp, 'dd') tst
       , t.*
    from oa1p.tqz060timeout t
)
select sum(case when event_type = 'D' then 1 else 0 end) deadlock
    ,  sum(case when event_type = 'T' then 1 else 0 end) timeout
    , min(name), max(name)
    , min(plan_name), max(plan_name)
    , min(package_name), max(package_name)
    , min(event_type), max(event_type)
    , count(*)
    , min(loadDate), tst
    from s
    where rz = 'RR2' and dbSys = 'DBOF'
        and name like '%VV%'
        and timestamp > current timestamp - 1 year
    group by t1, tst
    order by t1 desc, tst desc
;x;
with s as
( select case when loadDate <= '03.10.2014' then 0 else 1 end t1
       , trunc_timestamp(timestamp, 'dd') tst
       , t.*
    from oa1p.tqz064lockEscal t
    where rz = 'RR2' and dbSys = 'DBOF'
        and resource like '%VV%'
)
select

      count(*)
    , min(loadDate), tst
    , min(resource), max(resource)
    , min(plan_name), max(plan_name)
    , min(package_name), max(package_name)
    , min(event_type), max(event_type)
    from s
    group by t1, tst
    order by t1 desc, tst desc
;x;
select sum(case when event_type = 'D' then 1 else 0 end) deadlock
    ,  sum(case when event_type = 'T' then 1 else 0 end) timeout
    , count(*)
    , trunc_timestamp(timestamp, 'mon')
    from oa1p.tqz060timeout
    where rz = 'RZ2' and dbSys = 'DBOF'
        and name like '%WB%'
        and timestamp > current timestamp - 1 year
    group by trunc_timestamp(timestamp, 'mon')
    order by 4 desc
;x;
select *
    from oa1p.tqz064LockEscal
    where rz = 'RZ2' and dbSys = 'DBOF'
        and resource like '%WB%'
        and timestamp > currentDA540769mp - 1 month
    order by timestamp desc
;x;
select *
    from oa1p.tqz060timeout
    where rz = 'RZ2' and dbSys = 'DBOF'
        and name like '%WB%'
        and timestamp > current timestamp - 1 month
    order by timestamp desc
}¢--- A540769.WK.SQL(VVLOCMAX) cre=2014-11-13 mod=2015-03-18-11.14.53 A540769 ---
select 'ts ' || strip(s.dbName) || '.' || strip(s.name)
    || ' locksize=' || lockRule || ' lockMax=' || lockMax
    || ' tb=' || strip(t.creator) || '.' || t.name
    from sysibm.sysTablespace s
      left join sysibm.sysTables t
        on s.dbName = t.dbName and s.name = t.tsName and t.type = 'T'
    where s.dbName like 'VV%'
        and (lockRule not in ('A', 'P')
             or lockMax <> -1
            )
    order by s.dbName, s.name
;x;
select count(*), lockRule, lockMax
    from sysibm.sysTablespace
    where dbName like 'VV%'
    group by lockRule, lockMax
;
select substr(strip(s.dbName) || '.' || strip(s.name), 1, 16)
    , s.lockRule, s.lockMax
    , strip(t.creator) || '.' || t.name
    from sysibm.sysTablespace s
      left join sysibm.sysTables t
        on s.dbName = t.dbName and s.name = t.tsName and t.type = 'T'
    where s.dbName like 'VV%'
        and (lockRule not in ('A', 'P')
             or lockMax <> -1
            )
    order by s.dbName, s.name
$#out                                              20150318 11:09:31
COL1
ts VV20A1P.A701A locksize=R lockMax=-1 tb=OA1P.TVV701A1
ts VV20A1P.A702A locksize=R lockMax=-1 tb=OA1P.TVV702A1
ts VV20A1P.A703A locksize=R lockMax=-1 tb=OA1P.TVV703A1
ts VV20A1P.A709A locksize=R lockMax=-1 tb=OA1P.TVV709A1
ts VV20A1P.A715A locksize=R lockMax=10000 tb=OA1P.TVV715A1
ts VV20A1P.A719A locksize=A lockMax=10000 tb=OA1P.TVV719A1
ts VV20A1P.A744A locksize=A lockMax=10000 tb=OA1P.TVV744A1
ts VV21A1P.VDPS004 locksize=R lockMax=10000 tb=VDPS2.VTINSTRFLATDATA
ts VV21A1P.VDPS025 locksize=R lockMax=-1 tb=VDPS2.VTMIFIDCATEGORY
ts VV21A1P.VDPS026 locksize=R lockMax=10000 tb=VDPS2.VTINSTRFLATSYMBOLS
ts VV21A1P.VDPS035 locksize=R lockMax=-1 tb=VDPS2.VTCFPLAN
ts VV21A1P.VDPS043 locksize=R lockMax=99999 tb=OA1P.TVV_VTSTRIKEBARRIERDEFINITIO
ts VV21A1P.VDPS045 locksize=R lockMax=-1 tb=OA1P.TVV_CTMANDATORINSTITUTIONFLAG
ts VV21A1P.VDPS047 locksize=R lockMax=99999 tb=OA1P.TVV_VTSTRIKEBARRIERDETAIL
ts VV22A1P.VDPS054 locksize=R lockMax=-1 tb=OA1P.TVV_VTAFFECTEDSTRIKEPROPS
ts VV22A1P.VDPS068 locksize=R lockMax=-1 tb=VDPS2.VTDENOMINATION
ts VV22A1P.VDPS070 locksize=R lockMax=-1 tb=OA1P.TVV_VTINSTITUTIONFLAG
ts VV22A1P.VDPS078 locksize=R lockMax=-1 tb=VDPS2.VTEQUITY
ts VV22A1P.VDPS079 locksize=R lockMax=-1 tb=VDPS2.VTP42TOFFLISTING
ts VV22A1P.VDPS081 locksize=R lockMax=-1 tb=VDPS2.VTCLEARINGCUSTODY
ts VV22A1P.VDPS084 locksize=R lockMax=-1 tb=VDPS2.VTGUARANTY
ts VV22A1P.VDPS093 locksize=R lockMax=-1 tb=VDPS2.VTGENINFORMATION
ts VV22A1P.VDPS100 locksize=R lockMax=10000 tb=VDPS2.VTINDEXINSTR
ts VV23A1P.VDPS112 locksize=R lockMax=-1 tb=VDPS2.VTINSTIINSTIROLE
ts VV23A1P.VDPS117 locksize=R lockMax=10000 tb=VDPS2.VTINSTIROLE
ts VV23A1P.VDPS148 locksize=R lockMax=10000 tb=VDPS2.VTINSTRIDENT
ts VV24A1P.VDPS153 locksize=R lockMax=-1 tb=VDPS2.VTINSTRNAME
ts VV24A1P.VDPS157 locksize=R lockMax=-1 tb=VDPS2.VTINSTRRESTRICTION
ts VV24A1P.VDPS164 locksize=R lockMax=10000 tb=VDPS2.VTINSTRSTRUCT
ts VV24A1P.VDPS168 locksize=R lockMax=10000 tb=VDPS2.VTINSTRUMENT
ts VV24A1P.VDPS174 locksize=R lockMax=-1 tb=VDPS2.VTISSUECONDITION
ts VV24A1P.VDPS181 locksize=R lockMax=-1 tb=OA1P.TVV_VTPROVATCASHFLOW
ts VV24A1P.VDPS183 locksize=R lockMax=-1 tb=OA1P.TVV_CTMANDATORINSTRUMENTFLAG
ts VV24A1P.VDPS185 locksize=R lockMax=10000 tb=VDPS2.VTLISTING
ts VV24A1P.VDPS188 locksize=R lockMax=-1 tb=VDPS2.VTLISTINGGRPKEY
ts VV24A1P.VDPS190 locksize=R lockMax=10000 tb=VDPS2.VTLISTINGIDENT
ts VV25A1P.VDPS220 locksize=R lockMax=-1 tb=VDPS2.VTPAYMENTPLAN
ts VV25A1P.VDPS227 locksize=R lockMax=-1 tb=OA1P.TVV_VTPORTFOLCRITSET
ts VV25A1P.VDPS230 locksize=R lockMax=10000 tb=OA1P.TVV_VTPORTFOLIOGROUP
ts VV25A1P.VDPS231 locksize=R lockMax=10000 tb=OA1P.TVV_VTPORTFOLCRITERIA
ts VV25A1P.VDPS241 locksize=R lockMax=-1 tb=VDPS2.VTREPAYMENTPLAN
ts VV25A1P.VDPS248 locksize=R lockMax=10000 tb=OA1P.TVV_VTWITHHOLDINGTAX
ts VV26A1P.VDPS255 locksize=R lockMax=-1 tb=VDPS2.VTSTOPPINGRANGE
ts VV26A1P.VDPS261 locksize=R lockMax=10000 tb=VDPS2.VTTAXRATEKEY
ts VV26A1P.VDPS294 locksize=R lockMax=10000 tb=VDPS2.VTTRUSTDETAIL
ts VV27A1P.VDPS302 locksize=R lockMax=-1 tb=VDPS2.VTRESTRICTIONSUSP
ts VV27A1P.VDPS305 locksize=R lockMax=-1 tb=OA1P.TVV_CTMANDATORINSTRUMENTGROUPKE
ts VV27A1P.VDPS312 locksize=R lockMax=-1 tb=OA1P.TVV_VTINSTRUMENTFLAG
ts VV27A1P.VDPS313 locksize=R lockMax=-1 tb=OA1P.TVV_CTMANDATORINSTITUTIONGROUPK
ts VV27A1P.VDPS315 locksize=R lockMax=10000 tb=VDPS2.CTCODESET
ts VV27A1P.VDPS321 locksize=R lockMax=10000 tb=VDPS2.CTINSTRDETAILS
ts VV27A1P.VDPS322 locksize=R lockMax=10000 tb=VDPS2.CTINSTRMANDDET
ts VV27A1P.VDPS323 locksize=R lockMax=10000 tb=VDPS2.CTINSTRSP42DETAILS
ts VV27A1P.VDPS324 locksize=R lockMax=10000 tb=VDPS2.CTLISTING
ts VV27A1P.VDPS332 locksize=R lockMax=-1 tb=OA1P.TVV_VTPROVBBCURRENCY
ts VV27A1P.VDPS333 locksize=R lockMax=-1 tb=OA1P.TVV_VTPROVBBPREFERRED
ts VV27A1P.VDPS335 locksize=R lockMax=-1 tb=OA1P.TVV_VTPROVBBINDEX
ts VV27A1P.VDPS344 locksize=R lockMax=-1 tb=VDPS2.VTCFDETAIL
ts VV28A1P.VDPS351 locksize=R lockMax=-1 tb=VDPS2.VTCFREPAYMENT
ts VV28A1P.VDPS352 locksize=R lockMax=-1 tb=VDPS2.VTCFCOMPONENTPROP
ts VV28A1P.VDPS353 locksize=R lockMax=10000 tb=VDPS2.VTCASHFLOWTAXAMT
ts VV28A1P.VDPS360 locksize=R lockMax=10000 tb=VDPS2.VTINSTRUMENTEVENT
ts VV28A1P.VDPS361 locksize=R lockMax=-1 tb=VDPS2.VTTAXRATETAXAMOUNT
ts VV28A1P.VDPS364 locksize=R lockMax=-1 tb=VDPS2.VTUNDERFXCOMPONENT
ts VV28A1P.VDPS370 locksize=R lockMax=-1 tb=VDPS2.VTCFEXERCISE
ts VV28A1P.VDPS371 locksize=R lockMax=-1 tb=VDPS2.VTCFEVENT
ts VV28A1P.VDPS374 locksize=R lockMax=10000 tb=OA1P.TVV_VTPROVBBBOND
ts VV28A1P.VDPS377 locksize=R lockMax=10000 tb=OA1P.TVV_VTPROVBBINSTRUMENT
ts VV28A1P.VDPS378 locksize=R lockMax=-1 tb=OA1P.TVV_VTPROVBBTOFF
ts VV28A1P.VDPS393 locksize=R lockMax=10000 tb=VDPS2.VTTRANSFORMEVENT
ts VV28A1P.VDPS398 locksize=R lockMax=-1 tb=VDPS2.DTEUTAXLOCSPEC
ts VV29A1P.VDPS436 locksize=R lockMax=-1 tb=VDPS2.XTACCTGINFOBATCH
ts VV29A1P.VDPS438 locksize=A lockMax=10000 tb=VDPS2.XTACCTGINFOCALLUP
ts VV29A1P.VDPS441 locksize=R lockMax=-1 tb=OA1P.TVV_XTACCTGINFOCALLUPSUM
ts VV29A1P.VDPS445 locksize=R lockMax=-1 tb=OA1P.TVV_XTORDER
75 rows fetched: select 'ts ' || strip(s.dbName) || '.' || strip(s.name) |...
SQLCODE = -104: ILLEGAL SYMBOL "X". SOME SYMBOLS THAT MIGHT
    BE LEGAL ARE: <ERR_STMT> <WNG_STMT> GET SQL SAVEPOINT HOLD FREE
    ASSOCIATE
src x
  > <<<pos 1 of 1<<<
sql = x
sqlCode 0: rollback
$#out
}¢--- A540769.WK.SQL(VVREBIND) cre=2012-03-14 mod=2012-03-14-12.43.15 A540769 ---
$#@
call sqlConnect dbtf
$;
$>.fEdit(':v')
$<=¢
--     extract sql statement text from sysPackStmt
--     concatenate statement texts if split in multiple junks
--          (up to 29000 bytes)
--     convert from utf8 to ebcdic if necessary
--          (we simply check first character for >='a')
-- attention:
--     where clause cannot be moved from  recursive tableExpr stT
--         because optimizer doesn't optimize it as needed|
--     DSNTIAUL gets an error on this view, and
--     SPUFI does not handle so long characters,
--     thus, use WSH catStmtW in a DSN with very long recSize
--
set current sqlid = 'S100447';
set current path = 'OA1P';
with p as
( -- select newest packages --------------------------------------------
  select 'rebind package(' || collid || '.' || name
            || '.(' || version || '))' rb, n.*
      from sysibm.sysPackage n
          -- select here |
      where location = '' and name in ('VV6201 '
                                      ,'YVV3000'
                                      ,'YVV3210'
                                      ,'YVV3250'
                                      ,'YVV3260'
                                      ,'YVV3300'
                                      )
          and  ( pcTimestamp = (select max(pcTimestamp)
                   from sysibm.sysPackage a
                   where a.location = n.location
                       and a.collid = n.collid and a.name = n.name
                   )
              or pcTimestamp = (select max(pcTimestamp)
                   from sysibm.sysPackage a
                   where a.location = n.location
                       and a.collid = n.collid and a.name = n.name
                       and a.version not like '%MVS%'
                   )
              or pcTimestamp = (select max(pcTimestamp)
                   from sysibm.sysPackage a
                   where a.location = n.location
                       and a.collid = n.collid and a.name = n.name
                       and a.version not like '%CICS%'
                   )
              or pcTimestamp = (select max(pcTimestamp)
                   from sysibm.sysPackage a
                   where a.location = n.location
                       and a.collid = n.collid and a.name = n.name
                       and a.version not like '%CICS%'
                       and a.version not like '%MVS%'
               )   )
)
select * from p
$! call sqlStmts
$#out                                              20120314 12:40:05
$#out                                              20120411 15:17:17
$#out                                              20120411 15:16:38
$#out                                              20120411 15:14:48
$#out                                              20120411 15:12:45
$#out                                              20120411 15:10:07
$#out                                              20120411 15:09:46
$#out                                              20120411 15:07:49
$#out                                              20120411 15:07:35
*** run error ***
tsoAlloc rc 12 for alloc dd(CAT1) NEW  recfm(V b) lrecl(32756) block(32760) mgmt
$#out                                              20120411 15:07:23
*** run error ***
scanErr ending Apostroph(') missing
last token  scanPosition '%MVS%
pos 47 in line 53:                        and n.version not like '%MVS%
$#out                                              20120411 15:05:17
$#out                                              20120411 14:05:03
$#out                                              20120411 14:04:49
*** run error ***
SQLCODE = -440: NO AUTHORIZED FUNCTION NAMED FOSC2I4 HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql prepare s11 into :M.SQL.11.D from :src
with into :M.SQL.11.D = M.SQL.11.D
     from :src = with p as
$#out                                              20120411 14:04:41
*** run error ***
tsoAlloc rc 12 for alloc dd(CAT1) NEW  recfm(V b) lrecl(32756) block(32760) mgmt
$#out                                              20120411 13:44:11
*** run error ***
tsoAlloc rc 12 for alloc dd(CAT1) NEW  recfm(V b) lrecl(32756) block(32760) mgmt
$#out                                              20120411 13:44:04
*** run error ***
SQLCODE = -440: NO AUTHORIZED FUNCTION NAMED FOSC2I4 HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql prepare s11 into :M.SQL.11.D from :src
with into :M.SQL.11.D = M.SQL.11.D
     from :src = with p as
$#out                                              20120411 13:43:48
*** run error ***
SQLCODE = -924: DB2 CONNECTION INTERNAL ERROR, 00000002,
    0000000C, 00F30006
stmt =  connect DBXF
$#out                                              20120411 13:43:45
*** run error ***
SQLCODE = -924: DB2 CONNECTION INTERNAL ERROR, 00000002,
    0000000C, 00F30006
stmt =  connect DBXF
$#out                                              20120411 13:40:34
$#out                                              20120411 13:40:26
*** run error ***
tsoAlloc rc 12 for alloc dd(CAT1) NEW  recfm(V b) lrecl(32756) block(32760) mgmt
$#out                                              20120411 13:40:08
*** run error ***
SQLCODE = -440: NO AUTHORIZED FUNCTION NAMED FOSC2I4 HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql prepare s11 into :M.SQL.11.D from :src
with into :M.SQL.11.D = M.SQL.11.D
     from :src = with p as
$#out                                              20120411 13:39:58
*** run error ***
tsoAlloc rc 12 for alloc dd(CAT1) NEW  recfm(V b) lrecl(32756) block(32760) mgmt
$#out                                              20120411 13:39:51
*** run error ***
SQLCODE = -440: NO AUTHORIZED FUNCTION NAMED FOSC2I4 HAVING
    COMPATIBLE ARGUMENTS WAS FOUND
stmt =  execSql prepare s11 into :M.SQL.11.D from :src
with into :M.SQL.11.D = M.SQL.11.D
     from :src = with p as
$#out                                              20120307 13:38:24
$#out                                              20120307 13:35:51
$#out                                              20120307 13:31:10
$#out                                              20120307 13:30:58
}¢--- A540769.WK.SQL(VVROW) cre=2014-10-07 mod=2014-10-07-16.53.14 A540769 -----
select *
    from oa1p.tqz060Timeout
    where rz = 'RR2' and dbSys = 'DBOF'
    and name like '%VV%'
    order by timestamp desc
;x;
select *
    from oa1p.tqz064LockEscal
    where rz = 'RR2' and dbSys = 'DBOF'
    and resource like '%VV%'
    order by timestamp desc
;x;
select count(*), min(timestamp), max(timestamp)
               , min(loadDate ), max(loadDate)
    from oa1p.tqz064LockEscal
    where rz = 'RR2' and dbSys = 'DBOF'
    GROUP  by trunc_timestamp(timestamp, 'mon')
;x;
}¢--- A540769.WK.SQL(VVVRZZ) cre= mod= -----------------------------------------
  SET CURRENT SQLID='OA1P';
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","A828386" ;
  CREATE VIEW OA1P.VVV_XPS_VPOCG001_V02 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.PORTFOLIOFUNCTP,
           T5.PORTFOLIOGROUPNO, T5.PORTFOLIOCRITSETNO,
           T5.PORTFOLIOCRITNO, T3.GROUPNUMBER, T3.PORTFOLIOSTRATDATE,
           T3.VALIDFROMDATE, T3.VALIDUNTILDATE,
           T3.CREATETIMESTAMP CREATETIMESTAMP_PG,
           T3.UPDATETIMESTAMP UPDATETIMESTAMP_PG,
           T4.CREATETIMESTAMP CREATETIMESTAMP_PS,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_PS,
           T5.CREATETIMESTAMP CREATETIMESTAMP_PC,
           T5.UPDATETIMESTAMP UPDATETIMESTAMP_PC, T4.RUNNINGNUMBER,
           T4.INVESTMENTAMOUNT, T4.INVESTMENTQUOTETP,
           T4.INVESTMENTCURRENCY, T7.IDSYMBOL INVESTCURR_I2,
           T4.MININVESTMENTAMT, T4.MININVESTQUOTETP,
           T4.MININVESTMENTCURR, T8.IDSYMBOL MININVESTCURR_I2,
           T4.MAXINVESTMENTAMT, T4.MAXINVESTQUOTETP,
           T4.MAXINVESTMENTCURR, T9.IDSYMBOL MAXINVESTCURR_I2,
           T5.PORTFOLIOCRITTYPE, T5.ISEXCLUDED, T5.GEOGRAPHICUNIT,
           T6.SHORTNAME_G, T6.SHORTNAME_E, T6.SHORTNAME_F,
           T6.SHORTNAME_I, T6.SHORTNAME_N, T5.DESCRIPTION,
           T3.PROVIDERTYPE
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           OA1P.TVV_VTPORTFOLIOGROUP T3
           ON T3.INSTRUMENTID = T2.INSTRUMENTID
           INNER JOIN
           OA1P.TVV_VTPORTFOLCRITSET T4
           ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
           PORTFOLIOGROUPNO = T3.PORTFOLIOGROUPNO
           INNER JOIN
           OA1P.TVV_VTPORTFOLCRITERIA T5
           ON T5.INSTRUMENTID = T4.INSTRUMENTID AND T5.
           PORTFOLIOGROUPNO = T4.PORTFOLIOGROUPNO AND T5.
           PORTFOLIOCRITSETNO = T4.PORTFOLIOCRITSETNO AND T5.
           PORTFOLIOCRITTYPE = 6
           LEFT OUTER JOIN
           VDPS2.VTGEOUNIT T6
           ON T6.GEOUNITID = T5.GEOGRAPHICUNIT AND (T6.ROWSTATUS IS
           NULL  OR T6.ROWSTATUS <> 2)
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T7
           ON T7.INSTRUMENTID = T4.INVESTMENTCURRENCY AND T7.
           SCHEMESYMBOL = 'I2' AND T7.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T8
           ON T8.INSTRUMENTID = T4.MININVESTMENTCURR AND T8.
           SCHEMESYMBOL = 'I2' AND T8.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T9
           ON T9.INSTRUMENTID = T4.MAXINVESTMENTCURR AND T9.
           SCHEMESYMBOL = 'I2' AND T9.ROWSTATUS = 1
      WHERE T1.ROWSTATUS = 1 ;
  COMMIT;
}¢--- A540769.WK.SQL(VVVRZ2) cre= mod= -----------------------------------------
  SET CURRENT SQLID='OA1P';
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","A828386" ;
  CREATE VIEW OA1P.VVV_XPS_VPOCG001_V02 AS
    SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.PORTFOLIOFUNCTP,
           T5.PORTFOLIOGROUPNO, T5.PORTFOLIOCRITSETNO,
           T5.PORTFOLIOCRITNO, T3.GROUPNUMBER, T3.PORTFOLIOSTRATDATE,
           T3.VALIDFROMDATE, T3.VALIDUNTILDATE,
           T3.CREATETIMESTAMP CREATETIMESTAMP_PG,
           T3.UPDATETIMESTAMP UPDATETIMESTAMP_PG,
           T4.CREATETIMESTAMP CREATETIMESTAMP_PS,
           T4.UPDATETIMESTAMP UPDATETIMESTAMP_PS,
           T5.CREATETIMESTAMP CREATETIMESTAMP_PC,
           T5.UPDATETIMESTAMP UPDATETIMESTAMP_PC, T4.RUNNINGNUMBER,
           T4.INVESTMENTAMOUNT, T4.INVESTMENTQUOTETP,
           T4.INVESTMENTCURRENCY, T7.IDSYMBOL INVESTCURR_I2,
           T4.MININVESTMENTAMT, T4.MININVESTQUOTETP,
           T4.MININVESTMENTCURR, T8.IDSYMBOL MININVESTCURR_I2,
           T4.MAXINVESTMENTAMT, T4.MAXINVESTQUOTETP,
           T4.MAXINVESTMENTCURR, T9.IDSYMBOL MAXINVESTCURR_I2,
           T5.PORTFOLIOCRITTYPE, T5.ISEXCLUDED, T5.GEOGRAPHICUNIT,
           T6.SHORTNAME_G, T6.SHORTNAME_E, T6.SHORTNAME_F,
           T6.SHORTNAME_I, T6.SHORTNAME_N, T5.DESCRIPTION,
           T3.PROVIDERTYPE
      FROM VDPS2.VTINSTRIDENT T1
           INNER JOIN
           VDPS2.VTINSTRUMENT T2
           ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
           NULL  OR T2.ROWSTATUS <> 2)
           INNER JOIN
           OA1P.TVV_VTPORTFOLIOGROUP T3
           ON T3.INSTRUMENTID = T2.INSTRUMENTID
           INNER JOIN
           OA1P.TVV_VTPORTFOLCRITSET T4
           ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
           PORTFOLIOGROUPNO = T3.PORTFOLIOGROUPNO
           INNER JOIN
           OA1P.TVV_VTPORTFOLCRITERIA T5
           ON T5.INSTRUMENTID = T4.INSTRUMENTID AND T5.
           PORTFOLIOGROUPNO = T4.PORTFOLIOGROUPNO AND T5.
           PORTFOLIOCRITSETNO = T4.PORTFOLIOCRITSETNO AND T5.
           PORTFOLIOCRITTYPE = 6
           LEFT OUTER JOIN
           VDPS2.VTGEOUNIT T6
           ON T6.GEOUNITID = T5.GEOGRAPHICUNIT AND (T6.ROWSTATUS IS
           NULL  OR T6.ROWSTATUS <> 2)
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T7
           ON T7.INSTRUMENTID = T4.INVESTMENTCURRENCY AND T7.
           SCHEMESYMBOL = 'I2' AND T7.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T8
           ON T8.INSTRUMENTID = T4.MININVESTMENTCURR AND T8.
           SCHEMESYMBOL = 'I2' AND T8.ROWSTATUS = 1
           LEFT OUTER JOIN
           VDPS2.VTINSTRIDENT T9
           ON T9.INSTRUMENTID = T4.MAXINVESTMENTCURR AND T9.
           SCHEMESYMBOL = 'I2' AND T9.ROWSTATUS = 1
      WHERE T1.ROWSTATUS = 1 ;
  COMMIT;
}¢--- A540769.WK.SQL(VYCHUPD) cre=2006-06-09 mod=2006-06-09-18.21.58 F540769 ---
UPDATE OA1P.TCW303A1  SET CW303033 = CW303003
 ;
COMMIT
  ;
UPDATE OA1P.TCW302A1  SET CW302006  = CW302003
  ;
}¢--- A540769.WK.SQL(V10ORD) cre=2012-01-23 mod=2012-01-23-17.21.43 A540769 ----
select version, collid, name                                            00010003
    from sysibm.sysPackage                                              00020000
    where collid = 'AV' and name = 'AV0010'                             00030005
 -- where collid = 'NH' and name = 'NH5900'                             00030105
--  where version like 'A18%'                                           00031004
    order by version                                                    00040000
}¢--- A540769.WK.SQL(W) cre=2014-03-11 mod=2014-03-11-08.09.56 A540769 ---------
$#@
call sqlConnect dp4g
$;
$<=¢ select current timestamp from sysibm.sysDummy1 $!
$@..¢sqlRdr()$!
$| call fTabAuto
$#out                                              20140311 08:09:41
COL1
2014-03-11-08.09.41.319575
$#out                                              20140311 08:09:32
J J
0 0
$#out                                              20140311 08:08:58
COL1
2014-03-11-08.08.58.888321
$#out                                              20140311 08:08:45
J J
0 0
$#out                                              20140311 08:07:14
J J
0 0
$#out                                              20140311 08:06:38
J J
0 0
$#out                                              20140311 08:04:14
}¢--- A540769.WK.SQL(WACHSTUM) cre=2010-06-21 mod=2010-06-21-13.24.56 A540769 ---
set current path oa1p;
with sDay as
( select
datum
,sum(hi_u_rba) as b
, row_number() over (order by datum) row
from OA1P.TADM09A1
where DB_NAME LIKE 'NI02A1P%'
and TS_NAME LIKE 'A250A%'
and datum >= Date ('01.03.2010')
and datum <= Date ('21.06.2010')
group by datum
)
select dayofWeek(h.Datum), h.datum,
        fOsFmtE7(h.b - g.b) "wachs",
        fOsFmtE7(h.b) "heute", -- h.row,
        fOsFmtE7(g.b) "gest", g.datum
    from sDAy h
        left join sDAy g
        on h.row = g.row+1
;
x;
sInt as
( select
max(datum) as datum
,max(b) as b
from sDay
group by floor(days(datum) / 1)
),
sMax as
( select max(b) as b
from sDay )
select
datum
, sInt
,DEC(sInt.b,15,2) / 1024 / 1024 as mbytes
,DEC(sInt.b,15,0) / 1024 / 1024 / 1024 as gbytes
,repeat('*', int(round(sInt.b * 40 / sMax.b, 0))) as grafik
from sInt, sMax
order by datum desc
}¢--- A540769.WK.SQL(WA01) cre=2011-05-24 mod=2011-05-24-12.27.01 A540769 ------
select lockRule, lockMax, strip(dbName) || '.' || strip(name)
    from sysibm.sysTablespace
    where dbName like 'WA01A%'
    order by lockMax desc, dbName, name
    with ur
}¢--- A540769.WK.SQL(WBFM701) cre=2011-08-15 mod=2011-08-15-17.16.59 A540769 ---
$#@
call sqlConnect dbaf
call sqlStmts $>.fEdit('::v') $<=¢
declare global temporary table session.pg
    ( pg char(8) not null
    , lv int not null
);
create unique index session.iPg   on session.pg
    (pg);
insert into session.pg values('FIVP10B', 0);
$@do i=1 to 23 $@=¢
insert into session.pg
    select c.ref_name, lv+1
        FROM GDB0671.TWBFM701 c, session.pg p
        where name = p.pg and ISCALLED = 'Y'
        and not exists (select 1 from session.pg q
                                 where q.pg = c.ref_name)
        group by c.ref_name, lv
;
$!
with q as
(   select lv, (select count(*)
                    FROM GDB0671.TWBFM701 c
                    where c.name = p.pg and c.ISCALLED = 'Y') c
        from session.pg p
)
select lv, count(*) total,
        sum(case when c = 0 then 1 else 0 end) "noC",
        sum(case when c = 0 then 0 else 1 end) "wiC",
        sum(c) ch
    from q
    group by lv
    order by lv
;
select * from session.pg p
    where not exists (select 1
                    FROM GDB0671.TWBFM701 c
                    where c.name = p.pg and c.ISCALLED = 'Y')
;
$!
$#end
with uni as
(
    select name, ref_name, min(ref_type) ref_type, count(*) cop
    FROM GDB0671.TWBFM701
    where ISCALLED = 'Y'
     -- and  not (ref_name like 'YY%' or ref_name like 'YX%')
    group by name, ref_name --, ref_type
)
, P1  (
         nm,
         LF, LT)
      AS
 (SELECT
         NAME,
         0, 0
    FROM uni
   WHERE NAME                        = 'FIVP10B'
    UNION ALL
   SELECT
          C.ref_NAME,
          P.LF, p.lt + 1
     FROM uni C
        , P2 P
    WHERE P.nm                        = C.NAME
      AND P.Lt                        <  3
  )
, p2 as (
    select nm, min(lf) lf, max(lt) lt
        from p1
        group by nm
  )
   select * from p2     ;;;
   select lvl, count(*)
      from parent
      group by lvl
      order by lvl
;;;
with uni as
(
    select name, ref_name, min(ref_type) ref_type, count(*) cop
    FROM GDB0671.TWBFM701
    where ISCALLED = 'Y'
        and  not (ref_name like 'YY%' or ref_name like 'YX%')
    group by name, ref_name --, ref_type
)
, PARENT  (
         REF_NAME,
         REF_TYPE,
         LVL,
         cop,
         PATH )
      AS
 (SELECT
         REF_NAME,
         REF_TYPE,
         0,
         cop,
         varchar(name || ' ' || ref_name || ' ', 400)
    FROM uni
   WHERE NAME                        = 'FIVP10B'
    UNION ALL
   SELECT
          C.REF_NAME,
          C.REF_TYPE,
          P.LVL + 1,
          c.cop,
          P.PATH ¨¨ C.ref_name || ' '
     FROM uni C
        , PARENT P
    WHERE P.REF_NAME                  = C.NAME
      AND P.LVL                       <  14
      AND LOCATE(' ' || C.REF_NAME || ' ' , P.PATH) < 1
  )
   select * from parent ;;;
   select lvl, count(*)
      from parent
      group by lvl
      order by lvl
;;;
select *
    from gdb0671.twbfm701
    where name =    'FIVP10B'
;                          ;
select count(*), count(distinct name), count(distinct ref_name)
    FROM GDB0671.TWBFM701
    with ur
;
select name, count(*)
    FROM GDB0671.TWBFM701
    where ISCALLED = 'Y'
    group by name
    order by 2 desc
;
select ref_name, count(*)
    FROM GDB0671.TWBFM701
    where ISCALLED = 'Y'
    group by ref_name
    order by 2 desc
;;;
   select lvl, count(*), ref_name, min(ref_type), max(ref_type), path
       from parent
       where ref_name = 'YCZU458'
       group by lvl, ref_name, path
       order by 2 desc
 ;;,
   select ref_name, count(*), min(lvl), max(lvl)
      from parent
      group by ref_name
      order by 2 desc
;;:
select *
    from gdb0671.twbfm701
    where name =    'FIVP10B'
}¢--- A540769.WK.SQL(WIESER) cre=2006-03-14 mod=2006-03-17-10.47.55 F540769 ----
   EXEC SQL
   SELECT DISTINCT TIS.TIS_UWI                                          00107700
   INTO :h_tis
   FROM                                                                 00107900
       VPC003A1A TIS ,
     (
     SELECT DISTINCT
     CIF,PROSPECT,SKA
     FROM
       (                                                                00108000
       SELECT   DISTINCT                                                00108500
                  CUSTOMERNO          AS CIF,                           00108600
                  PROSPECTID          AS PROSPECT,                      00108700
                  SAFEKEEPING_ACC_NO  AS SKA                            00108800
       FROM     oa1a01.VPC401A1A                                        00108900
       UNION                                                            00109000
       SELECT   DISTINCT                                                00109100
                  ACC.CUSTOMERNO      AS CIF,                           00109200
                  ACC.PROSPECTID      AS PROSPECT,                      00109300
                  PF.SAFEKEEPINGACCNO AS SKA                            00109400
       FROM     oa1a01.VPC400A1A PF,                                    00109500
                oa1a01.VPC402A1A ACC                                    00109600
       WHERE    PF.PORTFOLIOID = ACC.PORTFOLIOID                        00109700
       UNION                                                            00109800
       SELECT   DISTINCT                                                00109900
                  GM.CUSTOMERNO       AS CIF,                           00110000
                  GM.PROSPECTID       AS PROSPECT,                      00110100
                  PF.PORTFOLIOID      AS SKA                            00110200
       FROM     oa1a01.VPC400A1A PF,                                    00110300
                oa1a01.VPC403A1A GM                                     00110400
       WHERE    PF.PORTFOLIOID = GM.PORTFOLIOID                         00110500
       ) AS T1                                                          00110600
     ) AS T2                                                            00110700
     WHERE ((T2.CIF      = TIS.CIF# AND TIS.TIS_LEVEL = '2')            00110900
     OR     (T2.SKA      = TIS.SKA# AND TIS.TIS_LEVEL = '3')            00111000
     OR     (T2.PROSPECT = TIS.PROSPECT# AND TIS.TIS_LEVEL = '4'))      00111100
     AND TIS.TIS_UWI = :vpc003pa.tis_uwi                                00111200
     WITH UR;
}¢--- A540769.WK.SQL(WIESES) cre=2006-03-14 mod=2006-03-14-17.33.08 F540769 ----
   EXEC SQL
   SELECT TIS.TIS_UWI                                                   00107700
     from VPC003A1A TIS
     where TIS.TIS_UWI = :vpc003pa.tis_uwi                              00111200
     and ( exists (
       SELECT *                                                         00108500
          FROM     oa1a01.VPC401A1A d                                   00108900
          WHERE ((d.customerno  = TIS.CIF# AND TIS.TIS_LEVEL = '2')     00110900
            or (d.safekeeping_acc_no = TIS.SKA# AND TIS.TIS_LEVEL = '3')00111000
            OR (d.prospectid = TIS.PROSPECT# AND TIS.TIS_LEVEL = '4'))  00111100
     ) or exists (
       SELECT *                                                         00109100
         FROM     oa1a01.VPC400A1A PF,                                  00109500
                oa1a01.VPC402A1A ACC                                    00109600
         WHERE    PF.PORTFOLIOID = ACC.PORTFOLIOID                      00109700
           and ((ACC.CUSTOMERNO = TIS.CIF# AND TIS.TIS_LEVEL = '2')
             or (PF.SAFEKEEPINGACCNO = TIS.SKA# AND TIS.TIS_LEVEL = '3')
             or (ACC.PROSPECTID = TIS.PROSPECT# AND TIS.TIS_LEVEL ='4'))
     ) or exists (                                                      00109800
       SELECT *                                                         00109100
         FROM     oa1a01.VPC400A1A PF,
                  oa1a01.VPC403A1A GM
         WHERE    PF.PORTFOLIOID = GM.PORTFOLIOID
           and (( GM.CUSTOMERNO = TIS.CIF# AND TIS.TIS_LEVEL = '2')
             or (PF.PORTFOLIOID = TIS.SKA# AND TIS.TIS_LEVEL = '3')
             or (GM.PROSPECTID = TIS.PROSPECT# AND TIS.TIS_LEVEL ='4'))
     ))
     WITH UR;
}¢--- A540769.WK.SQL(WIESET) cre=2006-03-14 mod=2006-03-15-17.02.01 F540769 ----
   SELECT TIS.TIS_UWI, tis.cif#, tis.ska#, d.customerno                 00107700
     from oa1a01.VPC003A1A TIS
     left join oa1a01.VPC003A1A t1
          on TIS.TIS_UWI = t1.tis_uwi
          and   exists (                                                00110900
       SELECT *                                                         00108500
          FROM     oa1a01.VPC401A1A d                                   00108900
          where (d.customerno  = T1.CIF# AND T1.TIS_LEVEL = '2')        00110900
            or (d.safekeeping_acc_no = T1.SKA# AND T1.TIS_LEVEL = '3')  00111000
            OR (d.prospectid = T1.PROSPECT# AND T1.TIS_LEVEL = '4')     00111100
          )
     where tis.cif# in ('054304995229', '088304445786' , '083501938427',
                         '077708757104', '006803403163', '077707977500'
                       );
   where d.customerno is not null;
     exists (
       SELECT *                                                         00108500
          FROM     oa1a01.VPC401A1A d                                   00108900
     ) or exists (
       SELECT *                                                         00109100
         FROM     oa1a01.VPC400A1A PF,                                  00109500
                oa1a01.VPC402A1A ACC                                    00109600
         WHERE    PF.PORTFOLIOID = ACC.PORTFOLIOID                      00109700
           and ((ACC.CUSTOMERNO = TIS.CIF# AND TIS.TIS_LEVEL = '2')
             or (PF.SAFEKEEPINGACCNO = TIS.SKA# AND TIS.TIS_LEVEL = '3')
             or (ACC.PROSPECTID = TIS.PROSPECT# AND TIS.TIS_LEVEL ='4'))
     ) or exists (                                                      00109800
       SELECT *                                                         00109100
         FROM     oa1a01.VPC400A1A PF,
                  oa1a01.VPC403A1A GM
         WHERE    PF.PORTFOLIOID = GM.PORTFOLIOID
           and (( GM.CUSTOMERNO = TIS.CIF# AND TIS.TIS_LEVEL = '2')
             or (PF.PORTFOLIOID = TIS.SKA# AND TIS.TIS_LEVEL = '3')
             or (GM.PROSPECTID = TIS.PROSPECT# AND TIS.TIS_LEVEL ='4'))
     ) then 'existiert' else 'fehlt'
     end
     from VPC003A1A TIS
     where TIS.TIS_UWI = :vpc003pa.tis_uwi                              00111200
     WITH UR;
}¢--- A540769.WK.SQL(WIESEU) cre=2006-03-17 mod=2006-03-17-09.36.10 F540769 ----
   SELECT TIS.TIS_UWI                                                   00107700
     from oa1a01.VPC003A1A TIS
     where
   --      TIS.TIS_UWI = :vpc003pa.tis_uwi and                          00111200
         ( exists (
       SELECT *                                                         00108500
          FROM     oa1a01.VPC401A1A d                                   00108900
          WHERE ((d.customerno  = TIS.CIF# AND TIS.TIS_LEVEL = '2')     00110900
            or (d.safekeeping_acc_no = TIS.SKA# AND TIS.TIS_LEVEL = '3')00111000
            OR (d.prospectid = TIS.PROSPECT# AND TIS.TIS_LEVEL = '4'))  00111100
     ) or exists (
       SELECT *                                                         00109100
         FROM     oa1a01.VPC400A1A PF,                                  00109500
                oa1a01.VPC402A1A ACC                                    00109600
         WHERE    PF.PORTFOLIOID = ACC.PORTFOLIOID                      00109700
           and ((ACC.CUSTOMERNO = TIS.CIF# AND TIS.TIS_LEVEL = '2')
             or (PF.SAFEKEEPINGACCNO = TIS.SKA# AND TIS.TIS_LEVEL = '3')
             or (ACC.PROSPECTID = TIS.PROSPECT# AND TIS.TIS_LEVEL ='4'))
     ) or exists (                                                      00109800
       SELECT *                                                         00109100
         FROM     oa1a01.VPC400A1A PF,
                  oa1a01.VPC403A1A GM
         WHERE    PF.PORTFOLIOID = GM.PORTFOLIOID
           and (( GM.CUSTOMERNO = TIS.CIF# AND TIS.TIS_LEVEL = '2')
             or (PF.PORTFOLIOID = TIS.SKA# AND TIS.TIS_LEVEL = '3')
             or (GM.PROSPECTID = TIS.PROSPECT# AND TIS.TIS_LEVEL ='4'))
     ))
     WITH UR;
}¢--- A540769.WK.SQL(WIESEV) cre=2006-03-17 mod=2006-03-17-12.39.10 F540769 ----
   SELECT TIS.TIS_UWI, TIS."CIF#", TIS.SKA# ,
          CASE WHEN DEP.TIS_UWI IS NULL THEN 'NOD' ELSE 'DEP' END ,
          CASE WHEN ACC.TIS_UWI IS NULL THEN 'NOA' ELSE 'ACC' END
     FROM OA1A01.VPC003A1A TIS
     LEFT JOIN
        (SELECT TIS_UWI FROM OA1A01.VPC003A1A T1
          WHERE EXISTS (
       SELECT *
          FROM     OA1A01.VPC401A1A D
          WHERE (D.CUSTOMERNO  = T1.CIF# AND T1.TIS_LEVEL = '2')
            OR (D.SAFEKEEPING_ACC_NO = T1.SKA# AND T1.TIS_LEVEL = '3')
            OR (D.PROSPECTID = T1.PROSPECT# AND T1.TIS_LEVEL = '4')
          )) AS DEP
       ON TIS.TIS_UWI = DEP.TIS_UWI
     LEFT JOIN
        (SELECT TIS_UWI FROM OA1A01.VPC003A1A T2
          WHERE EXISTS (
       SELECT *
         FROM     OA1A01.VPC400A1A PF,
                OA1A01.VPC402A1A AC0
         WHERE    PF.PORTFOLIOID = AC0.PORTFOLIOID
           AND ((AC0.CUSTOMERNO = T2.CIF# AND T2.TIS_LEVEL = '2')
             OR (PF.SAFEKEEPINGACCNO = T2.SKA# AND T2.TIS_LEVEL = '3')
             OR (AC0.PROSPECTID = T2.PROSPECT# AND T2.TIS_LEVEL ='4'))
          )) AS ACC
     ON TIS.TIS_UWI = ACC.TIS_UWI
     LEFT JOIN
        (SELECT TIS_UWI FROM OA1A01.VPC003A1A T3
          WHERE EXISTS (
       SELECT *
         FROM     OA1A01.VPC400A1A PF,
                  OA1A01.VPC403A1A G0
         WHERE    PF.PORTFOLIOID = G0.PORTFOLIOID
           AND (( G0.CUSTOMERNO = T3.CIF# AND T3.TIS_LEVEL = '2')
             OR (PF.PORTFOLIOID = T3.SKA# AND T3.TIS_LEVEL = '3')
             OR (G0.PROSPECTID = T3.PROSPECT# AND T3.TIS_LEVEL ='4'))
     ))  AS GM
     ON TIS.TIS_UWI = GM.TIS_UWI
     WHERE TIS.CIF# IN ('054304995229', '088304445786' ,'083501938427',
                         '077708757104', '006803403163', '077707977500'
                       );
}¢--- A540769.WK.SQL(WIESEW) cre=2006-03-17 mod=2006-03-17-12.53.38 F540769 ----
   EXEC SQL
   SELECT DISTINCT TIS.TIS_UWI                                          00107700
   INTO :h_tis
   FROM                                                                 00107900
       VPC003A1A TIS ,
     (
     SELECT DISTINCT
     CIF,PROSPECT,SKA
     FROM
       (                                                                00108000
       SELECT   DISTINCT                                                00108500
                  CUSTOMERNO          AS CIF,                           00108600
                  PROSPECTID          AS PROSPECT,                      00108700
                  SAFEKEEPING_ACC_NO  AS SKA                            00108800
       FROM     oa1a01.VPC401A1A                                        00108900
       UNION                                                            00109000
       SELECT   DISTINCT                                                00109100
                  ACC.CUSTOMERNO      AS CIF,                           00109200
                  ACC.PROSPECTID      AS PROSPECT,                      00109300
                  PF.SAFEKEEPINGACCNO AS SKA                            00109400
       FROM     oa1a01.VPC400A1A PF,                                    00109500
                oa1a01.VPC402A1A ACC                                    00109600
       WHERE    PF.PORTFOLIOID = ACC.PORTFOLIOID                        00109700
       UNION                                                            00109800
       SELECT   DISTINCT                                                00109900
                  GM.CUSTOMERNO       AS CIF,                           00110000
                  GM.PROSPECTID       AS PROSPECT,                      00110100
                  PF.PORTFOLIOID      AS SKA                            00110200
       FROM     oa1a01.VPC400A1A PF,                                    00110300
                oa1a01.VPC403A1A GM                                     00110400
       WHERE    PF.PORTFOLIOID = GM.PORTFOLIOID                         00110500
       ) AS T1                                                          00110600
     ) AS T2                                                            00110700
     WHERE ((T2.CIF      = TIS.CIF# AND TIS.TIS_LEVEL = '2')            00110900
     OR     (T2.SKA      = TIS.SKA# AND TIS.TIS_LEVEL = '3')            00111000
     OR     (T2.PROSPECT = TIS.PROSPECT# AND TIS.TIS_LEVEL = '4'))      00111100
     AND TIS.TIS_UWI = :vpc003pa.tis_uwi                                00111200
     WITH UR;
}¢--- A540769.WK.SQL(WIESEX) cre=2006-03-17 mod=2006-03-17-14.12.35 F540769 ----
   DECLARE GLOBAL TEMPORARY TABLE TT (
        TYP CHAR(1) NOT NULL,
        UWI CHAR(20) NOT NULL
        )
   ;
   CREATE INDEX X1 ON SESSION.TT (TYP, UWI);
   SELECT * FROM SESSION.TT;
   DROP TABLE SESSION.TT;
   INSERT INTO SESSION.TT
        SELECT 'D', TIS_UWI FROM OA1A01.VPC003A1A T1
          WHERE EXISTS (
       SELECT *
          FROM     OA1A01.VPC401A1A D
          WHERE (D.CUSTOMERNO  = T1.CIF# AND T1.TIS_LEVEL = '2')
            OR (D.SAFEKEEPING_ACC_NO = T1.SKA# AND T1.TIS_LEVEL = '3')
            OR (D.PROSPECTID = T1.PROSPECT# AND T1.TIS_LEVEL = '4')
          );
          XX
       ON TIS.TIS_UWI = DEP.TIS_UWI
     LEFT JOIN
        (SELECT TIS_UWI FROM OA1A01.VPC003A1A T2
          WHERE EXISTS (
       SELECT *
         FROM     OA1A01.VPC400A1A PF,
                OA1A01.VPC402A1A AC0
         WHERE    PF.PORTFOLIOID = AC0.PORTFOLIOID
           AND ((AC0.CUSTOMERNO = T2.CIF# AND T2.TIS_LEVEL = '2')
             OR (PF.SAFEKEEPINGACCNO = T2.SKA# AND T2.TIS_LEVEL = '3')
             OR (AC0.PROSPECTID = T2.PROSPECT# AND T2.TIS_LEVEL ='4'))
          )) AS ACC
     ON TIS.TIS_UWI = ACC.TIS_UWI
     LEFT JOIN
        (SELECT TIS_UWI FROM OA1A01.VPC003A1A T3
          WHERE EXISTS (
       SELECT *
         FROM     OA1A01.VPC400A1A PF,
                  OA1A01.VPC403A1A G0
         WHERE    PF.PORTFOLIOID = G0.PORTFOLIOID
           AND (( G0.CUSTOMERNO = T3.CIF# AND T3.TIS_LEVEL = '2')
             OR (PF.PORTFOLIOID = T3.SKA# AND T3.TIS_LEVEL = '3')
             OR (G0.PROSPECTID = T3.PROSPECT# AND T3.TIS_LEVEL ='4'))
     ))  AS GM
     ON TIS.TIS_UWI = GM.TIS_UWI
     WHERE TIS.CIF# IN ('054304995229', '088304445786' ,'083501938427',
                         '077708757104', '006803403163', '077707977500'
                       );
}¢--- A540769.WK.SQL(WIREF) cre=2014-05-06 mod=2014-05-06-13.08.40 A540769 -----
---------+---------+---------+---------+---------+---------+---------+---------+
select char(', ''' || strip(pk.NAME) || '''', 12) pkg
  , max(pcTimestamp) pc
  from sysIbm.sysPackage pk
  where  (pk.location, pk.collid, pk.name, pk.conToken) in
  (select pkd.dLocation, pkd.dCollid, pkd.dName, pkd.dConToken
    from sysIbm.sysPackDep pkd
    where  (pkd.bQualifier, pkd.bName) in
    (select t.creator, t.name
      from sysIbm.sysTables t
      where t.type not in ('A', 'V') and  t.name like 'TWI105A1%'
  ) )
  group by pk.name
  order by pk.name
---------+---------+---------+---------+---------+---------+---------+---------+
PKG           PC
---------+---------+---------+---------+---------+---------+---------+---------+
, 'TN7004'    2013-10-01-06.45.53.205748
, 'TN8400'    2013-09-26-07.17.48.883049
, 'TN8900'    2008-01-22-14.42.32.516517
, 'YTN0100'   2008-06-23-13.39.03.567857
, 'YTN0101'   2013-09-26-07.07.44.727819
, 'YTN0102'   2013-09-26-07.08.15.373505
, 'YTN0103'   2013-09-26-07.08.07.056183
, 'YTN0104'   2013-09-26-07.08.18.602603
, 'YTN0105'   2013-09-26-07.08.10.210846
, 'YTN0106'   2013-12-06-06.46.11.298867
, 'YTN0107'   2013-12-19-13.46.52.270132
, 'YTN0151'   2013-01-15-08.05.03.451624
, 'YTN0152'   2013-03-25-17.57.36.640052
, 'YTN0161'   2013-03-25-18.05.41.638020
, 'YTN0200'   2013-01-15-08.05.29.827066
, 'YTN0201'   2008-03-17-12.31.47.067944
, 'YTN0202'   2008-07-22-11.13.29.807033
, 'YTN0203'   2013-09-26-07.08.49.105241
, 'YTN0204'   2014-01-28-14.23.47.432983
, 'YTN0205'   2013-09-26-07.08.52.707003
, 'YTN0210'   2012-09-12-07.25.35.996865
, 'YTNI105'   2013-12-06-06.45.39.748117
, 'YWI1320'   2013-12-04-10.56.25.595550
, 'YWI1330'   2014-02-04-11.21.45.221045
, 'YWI1340'   2013-12-04-10.58.04.195175
, 'YWI1350'   2013-12-04-10.58.18.501420
, 'YWI1371'   2012-06-22-17.07.56.309193
, 'YWI1521'   2012-06-22-17.08.03.711674
, 'YWI5951'   2012-06-22-17.09.28.482956
, 'YWI5952'   2012-06-22-17.09.28.217891
, 'YWI5953'   2012-06-22-17.09.28.399771
, 'YWI5954'   2012-06-22-17.09.28.227130
, 'YWI5955'   2012-06-22-17.09.27.898364
, 'YWI5956'   2012-06-22-17.09.34.680568
, 'YWI5957'   2012-06-22-17.09.37.412187
, 'YWI5958'   2012-06-22-17.09.40.572168
, 'YWI5959'   2012-06-22-17.09.43.671237
, 'YWI595A'   2012-06-22-17.09.27.606247
, 'YWIABV'    2013-10-15-13.10.15.814885
, 'YWIABV2'   2010-09-16-13.00.38.978871
, 'YWIABV3'   2013-10-15-13.13.04.562075
, 'YWIACW1'   2012-06-22-15.59.14.877652
, 'YWIADS'    2013-09-18-10.18.29.361154
PKG           PC
---------+---------+---------+---------+---------+---------+---------+---------+
, 'YWIANPE'   2009-01-08-10.59.57.207463
, 'YWIANPF'   2013-05-16-15.22.21.847066
, 'YWIANPL'   2012-06-22-15.59.22.021761
, 'YWIAOT2'   2012-06-22-15.59.24.543019
, 'YWIAOT3'   2013-09-18-10.18.34.524764
, 'YWIAOTX'   2012-06-26-11.57.25.409866
, 'YWIAWD'    2012-06-22-15.59.28.007732
, 'YWIBINF'   2012-06-22-16.00.09.361935
, 'YWIESOQ'   2013-09-19-07.35.41.233251
, 'YWILODA'   2013-12-04-10.40.43.486707
, 'YWINE01'   2011-12-07-07.03.36.102890
, 'YWINE09'   2011-12-07-07.03.38.078335
, 'YWINS01'   2014-02-07-12.51.10.788424
, 'YWINS02'   2014-02-07-12.57.47.102269
, 'YWINS03'   2014-02-07-12.57.53.295006
, 'YWINS04'   2014-02-07-12.58.00.211738
, 'YWINS05'   2014-02-07-12.58.06.628978
, 'YWINS06'   2014-02-07-12.58.14.021716
, 'YWINS07'   2014-02-07-12.58.22.822249
, 'YWINS08'   2014-02-07-12.58.31.348292
, 'YWINS09'   2014-02-07-12.58.37.230219
, 'YWINS10'   2014-02-07-12.58.52.388914
, 'YWINS90'   2013-12-04-10.45.58.226704
, 'YWINS91'   2013-12-04-10.46.10.735496
, 'YWINS92'   2013-12-04-10.46.11.176799
, 'YWINS93'   2013-12-04-10.46.18.495313
, 'YWINS94'   2013-12-04-10.46.27.801874
, 'YWINS95'   2013-12-04-10.46.29.737053
, 'YWINS96'   2013-12-04-10.46.42.884923
, 'YWINS97'   2013-12-04-10.46.41.791333
, 'YWINS98'   2013-12-04-10.46.42.531875
, 'YWINS99'   2013-12-04-10.47.59.543038
, 'YWIRS01'   2012-06-22-16.56.27.766283
, 'YWIRS02'   2012-06-22-16.56.27.646885
, 'YWIRS03'   2012-06-22-16.56.29.643729
, 'YWIRS04'   2012-06-22-16.56.29.817869
, 'YWIRS05'   2012-06-22-16.56.32.112196
, 'YWIRS06'   2012-06-22-16.56.34.364608
, 'YWIRS07'   2012-06-22-16.56.35.953789
, 'YWIRS08'   2012-06-22-16.56.37.933933
, 'YWIRS09'   2012-06-22-16.56.45.532252
, 'YWIRS10'   2012-06-22-16.56.48.508399
, 'YWISEMQ'   2013-09-19-13.51.37.342210
, 'YWISLWS'   2013-09-18-10.24.31.869565
, 'YXWICFI'   2010-09-16-13.03.39.934087
, 'YXWISIN'   2010-10-29-13.32.16.739916
, 'YYWIVER'   2014-01-21-12.06.11.990069
DSNE610I NUMBER OF ROWS DISPLAYED IS 90
DSNE616I STATEMENT EXECUTION WAS SUCCESSFUL, SQLCODE IS 100
---------+---------+---------+---------+---------+---------+---------+---------+
DSNE617I COMMIT PERFORMED, SQLCODE IS 0
DSNE616I STATEMENT EXECUTION WAS SUCCESSFUL, SQLCODE IS 0
---------+---------+---------+---------+---------+---------+---------+---------+
DSNE601I SQL STATEMENTS ASSUMED TO BE BETWEEN COLUMNS 1 AND 72
DSNE620I NUMBER OF SQL STATEMENTS PROCESSED IS 1
DSNE621I NUMBER OF INPUT RECORDS READ IS 13
DSNE622I NUMBER OF OUTPUT RECORDS WRITTEN IS 119
}¢--- A540769.WK.SQL(WI020) cre=2011-03-18 mod=2011-04-08-12.56.32 A540769 -----
delete
  FROM  oa1t.TWI020A1
  where (  WI02001C
        ,  WI02001A
        ,  WI02001S
        )
      in (select  WI02001C
               ,  WI02001A
               ,  WI02001S
              FROM  oa1t.TWI020A1
              WHERE WI02040T < TIMESTAMP(CURRENT TIMESTAMP - 11 DAYS)
                  AND WI02001S IN ('D','P','R')
              fetch first 100 rows only
         )
;
  ROLLBACK
  ;      :::;;;
select WI02001S
    , count(*) total
    , sum(case when WI02040T < TIMESTAMP(CURRENT TIMESTAMP - 21 DAYS)
               then 1 else 0 end) old
    , sum(case when WI02040T < TIMESTAMP(CURRENT TIMESTAMP - 21 DAYS)
               then 0 else 1 end) new
    from oa1p.twi020a1
    group by WI02001S
    order by 1 asc
    with ur
    ;;;
select count(*) , WI02001S
    from oa1p.twi020a1
    group by WI02001S
    order by 2 desc
    with ur
    ;;;
select count(*) , date(WI02040T)
    from oa1p.twi020a1
    group by date(WI02040T)
    order by 2 desc
    with ur
;;;;
SET CURRENT SQLID='s100447';
CREATE        INDEX OA1P.IWI020A$
  ON OA1P.TWI020A1
   (WI02001S              ASC,
    WI02040T              ASC)
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  ERASE  NO
  FREEPAGE 15 PCTFREE 10
  GBPCACHE CHANGED
  not CLUSTER
  COMPRESS NO
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFER NO
  DEFINE YES
  PIECESIZE 2 G;
COMMIT;
}¢--- A540769.WK.SQL(WI101) cre=2011-08-19 mod=2011-08-25-21.41.43 A540769 -----
set current sqlid = 'S100447';
drop   view oA1P.VWI101A1$PK;
drop   view oA1P$.VWI101A1$$PK;
drop   view oA1P.VWI101A1$PKGR;
drop   view oA1P$.VWI101A1$$PKGR;
--drop   TABLESPACE WI02A1P.a101$$gr;
  commit;
create view oA1P$.VWI101A1$$PKGR as
    with w as
    ( select WI10101T, WI10101D, WI10101L
           , translate(hex(substr(WI10101T, 1, 4))
               , 'abcdefghijklmnop', '0123456789ABCDEF') t
           , max(WI101PK) WI101PK
        from oA1P.twi101a1
        group by WI10101T, WI10101D, WI10101L
    )
    select WI10101T, WI10101D, WI10101L
      , smallint(coalesce(case
          when WI101PK > 0 then WI101PK
          when translate(WI10101L, '0', '123456789', '0')
                 <> '00000' then WI101PK
          when translate(WI10101D, '0', '123456789', '0')
                 <> '00000000' then WI101PK
          else
            mod(
               int(substr(WI10101L, 5, 1))                       -- * 1
            +  int(substr(WI10101L, 4, 1))                       * 44
            +  int(substr(WI10101L, 3, 1))                       * 28
            +  int(substr(WI10101L, 2, 1))                       * 13
            +  int(substr(WI10101L, 1, 1))                       * 42
            +  int(substr(WI10101D, 8, 1))                       * 46
            +  int(substr(WI10101D, 7, 1))                       * 10
            +  int(substr(WI10101D, 6, 1))                       * 16
            +  int(substr(WI10101D, 5, 1))                       * 15
            +  int(substr(WI10101D, 4, 1))                       * 24
            +  int(substr(WI10101D, 3, 1))                       * 49
            +  int(substr(WI10101D, 2, 1))                       * 36
            +  int(substr(WI10101D, 1, 1))                       * 47
            + (ascii(substr(t,7,1)) * 16 + ascii(substr(t,8,1))) -- * 1
            + (ascii(substr(t,5,1)) * 16 + ascii(substr(t,6,1))) * 44
            + (ascii(substr(t,3,1)) * 16 + ascii(substr(t,4,1))) * 28
            + (ascii(substr(t,1,1)) * 16 + ascii(substr(t,2,1))) * 13
            + 14, 53) + 1
        end, WI101PK, 0)) WI101PK
      from w
;
commit
;
  CREATE TABLESPACE a101$$gr
    IN WI02A1P
    USING STOGROUP GSMS
    FREEPAGE 5 PCTFREE 5
    segsize 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    CLOSE NO
    COMPRESS YES
    ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=OA1P$.twi101$1 In WI02A1P.a101$
------------------------------------------------------------------------
--
--
  CREATE TABLE OA1P$.twi101$$pkgr
     (WI10101T             CHAR(4) NOT NULL,
      WI10101D             CHAR(8) NOT NULL,
      WI10101L             CHAR(5) NOT NULL,
      WI101PK              SMALLINT NOT NULL
      )
    IN WI02A1P.a101$$GR
    ;
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX OA1P$.iwi101$$pkgr1
    ON OA1P$.twi101$$pkgr
     (WI10101T              ASC,
      WI10101D              ASC,
      WI10101L              ASC,
      WI101PK               ASC)
    CLUSTER
    USING STOGROUP GSMS
    FREEPAGE 5 PCTFREE 10
    BUFFERPOOL BP1
    CLOSE NO;
--
  COMMIT;
create view oA1P$.VWI101A1$$PK as
    with w as
    ( select t.*,
           translate(hex(substr(t.WI10101T, 1, 4))
               , 'abcdefghijklmnop', '0123456789ABCDEF') t,
           k.WI101PK k
        from oA1P.twi101a1 t
          left join oA1P$.twi101$$pkgr k
          on    k.WI10101T = t.WI10101T
            and k.WI10101D = t.WI10101D
            and k.WI10101L = t.WI10101L
    )
    select
        WI10101T
      , WI10101D
      , WI10101L
      , WI10101G
      , WI10101V
      , WI10101B
      , WI10101I
      , WI10102A
      , WI10102S
      , WI10103
      , WI10104
      , WI10105
      , WI10106
      , WI10107
      , WI10108
      , WI10109
      , WI10110
      , WI10112
      , WI10113
      , WI10114
      , smallint(coalesce(case
          when WI101PK > 0 then WI101PK
          when k is not null then k
          when translate(WI10101L, '0', '123456789', '0')
                 <> '00000' then WI101PK
          when translate(WI10101D, '0', '123456789', '0')
                 <> '00000000' then WI101PK
          else
            mod(
               int(substr(WI10101L, 5, 1))                       -- * 1
            +  int(substr(WI10101L, 4, 1))                       * 44
            +  int(substr(WI10101L, 3, 1))                       * 28
            +  int(substr(WI10101L, 2, 1))                       * 13
            +  int(substr(WI10101L, 1, 1))                       * 42
            +  int(substr(WI10101D, 8, 1))                       * 46
            +  int(substr(WI10101D, 7, 1))                       * 10
            +  int(substr(WI10101D, 6, 1))                       * 16
            +  int(substr(WI10101D, 5, 1))                       * 15
            +  int(substr(WI10101D, 4, 1))                       * 24
            +  int(substr(WI10101D, 3, 1))                       * 49
            +  int(substr(WI10101D, 2, 1))                       * 36
            +  int(substr(WI10101D, 1, 1))                       * 47
            + (ascii(substr(t,7,1)) * 16 + ascii(substr(t,8,1))) -- * 1
            + (ascii(substr(t,5,1)) * 16 + ascii(substr(t,6,1))) * 44
            + (ascii(substr(t,3,1)) * 16 + ascii(substr(t,4,1))) * 28
            + (ascii(substr(t,1,1)) * 16 + ascii(substr(t,2,1))) * 13
            + 14, 53) + 1
        end, WI101PK)) WI101PK
      from w
;
commit
;;;;;;;;
;;;
set current sqlid = 'S100447';
drop   view oA1P.VWI101A1$PK;
create view oA1P.VWI101A1$PK as
    with w as
    ( select t.*,
          translate(hex(substr(WI10101T, 1, 4))
            , 'abcdefghijklmnop', '0123456789ABCDEF') t
        from oA1P.twi101a1 t
    )
    select
        WI10101T
      , WI10101D
      , WI10101L
      , WI10101G
      , WI10101V
      , WI10101B
      , WI10101I
      , WI10102A
      , WI10102S
      , WI10103
      , WI10104
      , WI10105
      , WI10106
      , WI10107
      , WI10108
      , WI10109
      , WI10110
      , WI10112
      , WI10113
      , WI10114
      , smallint(coalesce(case
          when WI101PK > 0 then WI101PK
          when translate(WI10101L, '0', '123456789', '0')
                 <> '00000' then WI101PK
          when translate(WI10101D, '0', '123456789', '0')
                 <> '00000000' then WI101PK
          else
            mod(
               int(substr(WI10101L, 5, 1))                       -- * 1
            +  int(substr(WI10101L, 4, 1))                       * 44
            +  int(substr(WI10101L, 3, 1))                       * 28
            +  int(substr(WI10101L, 2, 1))                       * 13
            +  int(substr(WI10101L, 1, 1))                       * 42
            +  int(substr(WI10101D, 8, 1))                       * 46
            +  int(substr(WI10101D, 7, 1))                       * 10
            +  int(substr(WI10101D, 6, 1))                       * 16
            +  int(substr(WI10101D, 5, 1))                       * 15
            +  int(substr(WI10101D, 4, 1))                       * 24
            +  int(substr(WI10101D, 3, 1))                       * 49
            +  int(substr(WI10101D, 2, 1))                       * 36
            +  int(substr(WI10101D, 1, 1))                       * 47
            + (ascii(substr(t,7,1)) * 16 + ascii(substr(t,8,1))) -- * 1
            + (ascii(substr(t,5,1)) * 16 + ascii(substr(t,6,1))) * 44
            + (ascii(substr(t,3,1)) * 16 + ascii(substr(t,4,1))) * 28
            + (ascii(substr(t,1,1)) * 16 + ascii(substr(t,2,1))) * 13
            + 14, 53) + 1
        end, WI101PK)) WI101PK
      from w
;
commit
;;;
with l (l, p) as
(
    select 0,1 from sysibm.sysDummy1
    union all select l+1, mod(p*256, 53) from l where l < 30
)
select * from l
;
select mod(256, 53), mod(256*256, 53), mod(28*256, 53), mod(28*28, 53)
   from sysibm.sysDummy1
;
with v as
( select WI10101T, WI10101D, WI10101L,
      translate(hex(substr(WI10101T, 1, 4))
        , 'abcdefghijklmnop', '0123456789ABCDEF') t,
       WI101PK
    from oA1P.twi101a1
    where wi101pk <> 0
    fetch first 100000      rows only
)
, w as
(
select v.*,
    case when translate(WI10101L, '0', '123456789', '0') <> '00000'
             then -1
         when translate(WI10101D, '0', '123456789', '0') <> '00000000'
             then -2
    else
    mod(
       int(substr(WI10101L, 5, 1))                       -- * 1
    +  int(substr(WI10101L, 4, 1))                       * 44
    +  int(substr(WI10101L, 3, 1))                       * 28
    +  int(substr(WI10101L, 2, 1))                       * 13
    +  int(substr(WI10101L, 1, 1))                       * 42
    +  int(substr(WI10101D, 8, 1))                       * 46
    +  int(substr(WI10101D, 7, 1))                       * 10
    +  int(substr(WI10101D, 6, 1))                       * 16
    +  int(substr(WI10101D, 5, 1))                       * 15
    +  int(substr(WI10101D, 4, 1))                       * 24
    +  int(substr(WI10101D, 3, 1))                       * 49
    +  int(substr(WI10101D, 2, 1))                       * 36
    +  int(substr(WI10101D, 1, 1))                       * 47
    + (ascii(substr(t,7,1)) * 16 + ascii(substr(t,8,1))) -- * 1
    + (ascii(substr(t,5,1)) * 16 + ascii(substr(t,6,1))) * 44
    + (ascii(substr(t,3,1)) * 16 + ascii(substr(t,4,1))) * 28
    + (ascii(substr(t,1,1)) * 16 + ascii(substr(t,2,1))) * 13
    + 14, 53) + 1 end c
     from v
)
select c, WI101PK, count(*),
          min(WI10101T || '?' || WI10101D || '?' || WI10101L),
          max(WI10101T || '?' || WI10101D || '?' || WI10101L)
    from w
    group by c, WI101PK
    with ur
;;;
with v (e) as
(            select ' ' from sysibm.sysDummy1
   union all select 'a' from sysibm.sysDummy1
   union all select 'b' from sysibm.sysDummy1
   union all select '0' from sysibm.sysDummy1
   union all select '1' from sysibm.sysDummy1
   union all select '9' from sysibm.sysDummy1
)
, w as
( select e, hex(e) h, ascii(e) a,
      translate(hex(e), 'abcdefghijklmnop', '0123456789ABCDEF') t
    from v
)
select w.*, ascii(substr(t,1,1)) * 16 + ascii(substr(t,2,1))
                                          - 1649
    from w
;;;
select mod(0, 53), mod(3,53), mod(52,53), mod(530,53), mod(54, 53)
    ,  mod(-0, 53), mod(-3,53), mod(-52,53), mod(-530,53), mod(-54, 53)
   from sysibm.sysDummy1
;;;
( select translate(WI10101L, '0', '123456789', '0') d
    from oA1P.twi101a1
 -- fetch first 1000000  rows only
)
select d, count(*)
    from w
    group by d
    with ur
;;,
with a (c, t, a, s, r) as
( select count(*) c, WI10101T t, WI10102A a, WI10102S s,
    row_number () over(order by WI10101T , WI10102A, WI10102S) r
    from oA1P.twi101a1
    where wi10101t < 'E'
    group by WI10101T , WI10102A, WI10102S
)
, b (su, gR, gC, c, t, a, s, r, l) as
( select c, 1, c, c, t, a, s, r, 1
      from a where r = 1
  union all
  select b.su+a.c,
       case when b.gC+a.c > 1000 then 0 else b.gR+1 end,
       case when b.gC+a.c > 1000 then a.c else b.gC + a.c end,
       a.c, a.t, a.a, a.s, a.r, b.l+1
      from b, a
      where b.l + 1 = a.r and l < 1000
)
select * FROM b
    where b.gR = 0
    order by r
    with ur
;;;
  union all
  select sum(c), left(k, length(k) - 1), l+1
      from a
      where l < 20
)
    row_number () over(order by WI10101T , WI10102A, WI10102S)
--
select trunc_timestamp(wi10101i, 'HH'), count(*), max(wi10101T)
    from (select * from oA1P.twi101a1
              where wi10101i > current timestamp - 10 days
                  and wi10101T <= 'BK'
     --       fetch first 10000 rows only
         ) x
    group by trunc_timestamp(wi10101i, 'HH')
    order by 1 desc
    with ur
;;;
select trunc_timestamp(wi10101i, 'HH'), count(*), max(wi10101T)
    from (select * from oA1P.twi101a1
              where wi10101i > current timestamp - 10 days
                  and wi10101T <= 'BK'
     --       fetch first 10000 rows only
         ) x
    group by trunc_timestamp(wi10101i, 'HH')
    order by 1 desc
    with ur
}¢--- A540769.WK.SQL(WI101DDL) cre=2011-08-19 mod=2011-08-26-06.15.06 A540769 ---
  SET CURRENT SQLID='S100447';
  SET CURRENT SCHEMA='OA1P';
--
--xrop   TABLESPACE WI02a1p.A101A;
  commit;
  CREATE TABLESPACE A101A
    IN WI02A1P
    USING STOGROUP GSMS
    FREEPAGE 5 PCTFREE 5
    DSSIZE 16 G
    NUMPARTS 43
    BUFFERPOOL BP2
    LOCKSIZE ANY
    CLOSE NO
    COMPRESS YES
    LOCKPART YES;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=OA1P.twi101A1 In WI02A1P.A101A
------------------------------------------------------------------------
--
--
  CREATE TABLE OA1P.twi101A1
     (WI10101T             CHAR(4) NOT NULL,
      WI10101D             CHAR(8) NOT NULL,
      WI10101L             CHAR(5) NOT NULL,
      WI10101G             CHAR(2) NOT NULL,
      WI10101V             CHAR(4) NOT NULL,
      WI10101B             CHAR(2) NOT NULL,
      WI10101I             TIMESTAMP NOT NULL,
      WI10102A             CHAR(3) NOT NULL,
      WI10102S             CHAR(5) NOT NULL,
      WI10103              CHAR(1) NOT NULL,
      WI10104              CHAR(1) NOT NULL,
      WI10105              CHAR(8) NOT NULL,
      WI10106              CHAR(20) NOT NULL,
      WI10107              CHAR(1) NOT NULL,
      WI10108              CHAR(1) NOT NULL,
      WI10109              CHAR(1) NOT NULL,
      WI10110              CHAR(1) NOT NULL,
      WI10112              TIMESTAMP NOT NULL,
      WI10113              CHAR(2) NOT NULL,
      WI10114              CHAR(1) NOT NULL,
      WI101PK              SMALLINT NOT NULL WITH DEFAULT
      )
    IN WI02A1P.A101A
    PARTITION BY (WI10101T ASC,
                  WI101PK ASC)
      (PARTITION  1 ENDING AT ('BM85', 53),
       PARTITION  2 ENDING AT ('BW8F', 53),
       PARTITION  3 ENDING AT ('B0YK', 53),
       PARTITION  4 ENDING AT ('B2H1', 53),
       PARTITION  5 ENDING AT ('B4VG', 53),
       PARTITION  6 ENDING AT ('CUBD', 53),
       PARTITION  7 ENDING AT ('CUBE', 11),
       PARTITION  8 ENDING AT ('CUBE', 22),
       PARTITION  9 ENDING AT ('CUBE', 32),
       PARTITION 10 ENDING AT ('CUBE', 43),
       PARTITION 11 ENDING AT ('C0ED', 53),
       PARTITION 12 ENDING AT ('C32W', 53),
       PARTITION 13 ENDING AT ('C62Y', 53),
       PARTITION 14 ENDING AT ('FFF5', 53),
       PARTITION 15 ENDING AT ('F00E', 53),
       PARTITION 16 ENDING AT ('F031', 53),
       PARTITION 17 ENDING AT ('F032', 11),
       PARTITION 18 ENDING AT ('F032', 22),
       PARTITION 19 ENDING AT ('F032', 32),
       PARTITION 20 ENDING AT ('F032', 43),
       PARTITION 21 ENDING AT ('F033', 53),
       PARTITION 22 ENDING AT ('F048', 53),
       PARTITION 23 ENDING AT ('F054', 53),
       PARTITION 24 ENDING AT ('F063', 53),
       PARTITION 25 ENDING AT ('F108', 53),
       PARTITION 26 ENDING AT ('F136', 53),
       PARTITION 27 ENDING AT ('F471', 53),
       PARTITION 28 ENDING AT ('F504', 53),
       PARTITION 29 ENDING AT ('F520', 23),
       PARTITION 30 ENDING AT ('F520', 53),
       PARTITION 31 ENDING AT ('F806', 53),
       PARTITION 32 ENDING AT ('F811', 53),
       PARTITION 33 ENDING AT ('F814', 27),
       PARTITION 34 ENDING AT ('F814', 53),
       PARTITION 35 ENDING AT ('F824', 53),
       PARTITION 36 ENDING AT ('F830', 27),
       PARTITION 37 ENDING AT ('F830', 53),
       PARTITION 38 ENDING AT ('MFSS', 53),
       PARTITION 39 ENDING AT ('NPM1', 27),
       PARTITION 40 ENDING AT ('NPM5', 53),
       PARTITION 41 ENDING AT ('NPM6', 27),
       PARTITION 42 ENDING AT ('NPM9', 53),
       PARTITION 43 ENDING AT ('9999', 53));
--
  LABEL ON TABLE OA1P.twi101A1 IS 'STATUS HISTORY';
--
  LABEL ON OA1P.twi101A1
   (WI101PK IS 'PartitionKey',
    WI10114 IS 'H',
    WI10113 IS 'PH',
    WI10112 IS 'TS_geliefert',
    WI10110 IS 'Notiz',
    WI10109 IS 'Aktuell',
    WI10108 IS 'Statusart',
    WI10107 IS 'Kategorie',
    WI10106 IS 'Kurztext',
    WI10105 IS 'Referenz',
    WI10104 IS 'Betrieb',
    WI10103 IS 'TextArt',
    WI10102S IS 'StatusNr',
    WI10102A IS 'Appl_ID',
    WI10101I IS 'Insert_Time',
    WI10101G IS 'GA_Lfnr',
    WI10101L IS 'Laufnr',
    WI10101D IS 'Datum',
    WI10101T IS 'Terminal');
--
  COMMIT;
--
}¢--- A540769.WK.SQL(WI101DIX) cre=2011-08-25 mod=2011-08-25-22.03.49 A540769 ---
  SET CURRENT SQLID='S100447';
  SET CURRENT SCHEMA='OA1P';
------------------------------------------------------------------------
-- Database=WI02A1P
--    Index=OA1P.iwi101A0 On OA1P.twi101A1
------------------------------------------------------------------------
--
--CREATE INDEX OA1P.iwi101A0 -- Dani willst Du den noch????
--  ON OA1P.twi101A1
--   (WI10101T              ASC,
--    WI10102A              ASC,
--    WI10102S              ASC)
--- PARTITIONED
--  USING STOGROUP GSMS
--  not CLUSTER
--  BUFFERPOOL BP1;
--
--COMMIT;
--
------------------------------------------------------------------------
-- Database=WI02A1P
--    Index=OA1P.iwi101A1 On OA1P.twi101A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX OA1P.iwi101A1
    ON OA1P.twi101A1
     (WI10101T              ASC,
      WI10101D              ASC,
      WI10101L              ASC,
      WI10101G              ASC,
      WI10102A              ASC,
      WI10102S              ASC,
      WI10101I              ASC)
    not CLUSTER
    USING STOGROUP GSMS
    FREEPAGE 5 PCTFREE 10
    BUFFERPOOL BP1
    defer yes;
    CLOSE NO;
--
    alter table OA1P.twi101A1
      add CONSTRAINT WI10101T
      PRIMARY KEY (WI10101T,
                   WI10101D,
                   WI10101L,
                   WI10101G,
                   WI10102A,
                   WI10102S,
                   WI10101I);
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WI02A1P
--    Index=OA1P.iwi101A2 On OA1P.twi101A1
------------------------------------------------------------------------
--
--
--
  CREATE INDEX oa1P.iwi101A2
    ON OA1P.twi101A1
     (WI10101T              ASC,
      WI10101D              ASC,
      WI10101L              ASC,
      WI10112               DESC,
      WI10101I              DESC,
      WI10108               ASC,
      WI10101G              ASC,
      WI10101V              ASC,
      WI10101B              ASC,
      WI10102A              ASC,
      WI10102S              ASC,
      WI10104               ASC)
    USING STOGROUP GSMS
    CLUSTER
    FREEPAGE 5 PCTFREE 10
    BUFFERPOOL BP1
    defer yes;
    CLOSE NO;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WI02A1P
--    Index=OA1P.iwi101A3 On OA1P.twi101A1
------------------------------------------------------------------------
--
  CREATE INDEX oa1P.iwi101A3
    ON OA1P.twi101A1
     (WI10102A              ASC,
      WI10102S              ASC,
      WI10101T              ASC,
      WI10101D              ASC,
      WI10101L              ASC,
      WI10101G              ASC,
      WI10101V              ASC,
      WI10101B              ASC)
    USING STOGROUP GSMS
    FREEPAGE 5 PCTFREE 10
    not CLUSTER
    BUFFERPOOL BP1
    defer yes;
    CLOSE NO;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(WI102) cre=2010-10-01 mod=2010-10-01-10.30.10 A540769 -----
select trunc_timestamp(wi10201i, 'HH'), count(*), max(WI10201T)
    from (select * from oa1p.twi102a1
              where wi10201i > current timestamp - 10 days
                  and WI10201T <= 'AG22'
      --      fetch first 10000 rows only
         ) x
    group by trunc_timestamp(wi10201i, 'HH')
    order by 1 desc
    with ur
}¢--- A540769.WK.SQL(WI103DEL) cre=2012-05-04 mod=2012-05-04-17.24.30 A540769 ---
//A754048W JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//*MAIN CLASS=LOG0                                                      00040000
//*
//S1       EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,                      00020001
//            PARM='WSH'
//SYSPROC   DD DSN=TSO.RZ2.P0.PROD.EXEC,DISP=SHR
//SYSPRINT  DD SYSOUT=*
//SYSUDUMP  DD SYSOUT=*
//SYSTSPRT  DD SYSOUT=*
//OUT       DD SYSOUT=*
//SYSTSIN   DD DUMMY
//WSH       DD *
$#@
call sqlConnect dbof

 sql =  ' SELECT 1'                                       ,
         'FROM'                                           ,
         '    OA1P.TWI103H1009 A'                         ,
       'WHERE'                                            ,
           "A.WI10332 < '20100519'"                       ,
           "AND A.WI103A0806 < '20120519'"
 res = sqlExec('prepare s51 from :sql')
 res = sqlExec('declare c51 cursor with hold for s1')
 res = sqlExec('open c51')
do cx=1  while sqlFetchInto(51, ":a")
    call sqlExec "delete from OA1P.TWI103H1009 where current of c51"
  /*say 'deleted' cx 'sqlCode' sqlCode 'sqlErrd.3' sqlErrD.3  */
    if sqlCode <> 0 | sqlErrD.3 <> 1 then do
        say  err 'sqlCode' sqlCode d3 'sqlErrD3'
        call sqlExec 'rollback'
        call err 'sqlCode' sqlCode d3 'sqlErrD3'
        end
    if cx // 500 = 0 then do
        call sqlCommit
        say 'commit' cx time()
        end
    end
        call sqlCommit
        say 'commit' cx time()  'ende gut'
$#end
}¢--- A540769.WK.SQL(WI104) cre=2016-09-16 mod=2016-09-19-08.25.52 A540769 -----
$*( generate sql to update twi104h1
       however, the olap expression does need to much sort space ....
$*)

say time() 'start'
call sqlConnect Dbof
m.sql_retOk = m.sql_retOk 'rb'
$= fx = 0
$= ux = 0
$= cx = 0

$@comPre
say time() 'query'
call sqlQuery 57,
  , "select WI10400T, WI10400D, WI10400L, Wi104PK, RID(T) rid" ,
        "from oa1p.TWI104H1004 T"                    ,
        "order by WI10400T, WI10400D, WI10400L"    ,
        "optimize for 1000 rows"
say time() 'do'
$do fx=1 to 1e5 while sqlFetch(57, ff) $@¢
$*( say $fx m.ff.WI10400T m.ff.WI10400D m.ff.WI10400L m.ff.Wi104PK,
          m.ff.rid $*)
    if m.ff.wi104pk = 0 then do
        call sqlUpdateExecute 58, m.ff.rid
        if m.sql.58.updateCount = 1 then
            $=ux =- $ux + 1
        else
            call err 'updateCount=' m.sql.58.updateCount
        if $ux // 100 = 0 then
            $@comPre
        end
    else do
        cv = SUBSTR(m.ff.WI10400L,5,1)SUBSTR(m.ff.WI10400L,4,1)
        if cv < 10 then
            cv = '1'cv
        if cv <> m.ff.Wi104PK then
            say '???mismatch' $fx m.ff.WI10400T m.ff.WI10400D ,
                    m.ff.WI10400L m.ff.Wi104PK 'should be' cv
        end
    if $fx // 1000 = 0 then
        $@sayCount
    $!
$@comPre
$@sayCount

$proc $@/comPre/
    $** say $fx $cx 'commit'
    call sqlCommit
    $= cx =- $cx + 1
call sqlUpdatePrepare 58, "update oa1p.TWI104H1004 t set wi104pk =",
            "CAST(CASE WHEN SUBSTR(WI10400L,5,1)='0' THEN '1'",
                       "ELSE '0'END" ,
                  "|| SUBSTR(WI10400L,5,1)" ,
                  "|| SUBSTR(WI10400L,4,1) AS SMALLINT)",
            "where rid(t) = ?"
$/comPre/

$proc $@/sayCount/
    say time() 'read' $fx', updated' $ux', commits' $cx', key' ,
          m.ff.WI10400T m.ff.WI10400D m.ff.WI10400L
$/sayCount/
$#out                                              20161230 07:35:48
}¢--- A540769.WK.SQL(WI104SQ) cre=2016-09-15 mod=2016-09-19-08.26.26 A540769 ---
$*( generate sql to update twi104h1
       however, the olap expression does need to much sort space ....
$*)
call sqlConnect Dbof
$<>
$** $>. fEdit()
$<=¢
with g as
(
  select WI10400T, WI10400D, WI10400L
     , count(*) cnt
    from (select * from oa1p.TWI104H1004
               order by WI10400T, WI10400D, WI10400L
               fetch first 300000 rows only) t
    group by WI10400T, WI10400D, WI10400L
)
, r as
(
  select g.*
      , sum(cnt) over (order by WI10400T, WI10400D, WI10400L) cum
    from g
)
, s as
(
  select r.*
      , value(max(cum)
         over (order by WI10400T, WI10400D, WI10400L
               rows  between 1 preceding and 1 preceding), 0 ) prevCum
from r
    where floor(cum / 100) <> floor((cum - cnt) / 100)
)
select *
    from s
 -- where prev <> prevT || '?' || prevD || '?' || prevL
    order by WI10400T, WI10400D, WI10400L
    with ur
$!
$@. sqlRdr()
$|
$= c = 0
m.cc.1 = WI10400T
m.cc.2 = WI10400D
m.cc.3 = WI10400L
$forWith $@¢
    $=c =- $c + 1
    $=c8 =- right($c, 8)

    if $c = 1 then $@¢
        $$ -- $c8 from begin to $WI10400T $WI10400D $WI10400L cnt $CUM
        $@sqlBeg
        $@% sqlPred 1 <= '$WI10400T',  '$WI10400D', '$WI10400L'
    $! else $@¢
        $$ -- $c8 from $prevT $prevD >$prevL$*(
          $*) to $WI10400T $WI10400D $WI10400L cnt $-¢$CUM - $PREVCUM$!
        $@sqlBeg
        if $WI10400T <> $prevT then $@¢
            $@% sqlPred 1 >  '$prevT'   , '$prevD'   , '$prevL'
            $@% sqlPred 1 <= '$WI10400T', '$WI10400D', '$WI10400L'
        $! else if $WI10400D <> $prevD then $@¢
            $$- "     and" m.cc.1 "= '"$prevT"'"
            $@% sqlPred 2 >               '$prevD'   , '$prevL'
            $@% sqlPred 2 <=              '$WI10400D', '$WI10400L'
        $! else  $@¢
            $$- "     and" m.cc.1 "= '"$prevT"'" $*+
                     "and" m.cc.2 "= '"$prevD"'"
            $@% sqlPred 3 >                            '$prevL'
            $@% sqlPred 3 <=                           '$WI10400L'
        $!
    $!
    $@sqlEnd
    $= prevT = $WI10400T
    $= prevD = $WI10400D
    $= prevL = $WI10400L
$!
$** remaining rows
$=c8 =- right($c + 1, 8)
$$ -- $c8 from $prevT $prevD >$prevL to end
$@sqlBeg
$@% sqlPred 1 >  '$prevT'   , '$prevD'   , '$prevL'
$@sqlEnd
$proc $@=/sqlBeg/
select count(*)
      , min(WI10400T || '?' || WI10400D || '?' || WI10400L)
      , max(WI10400T || '?' || WI10400D || '?' || WI10400L)
    from oa1p.TWI104H1004
    where WI104PK <> -9999
$/sqlBeg/

$proc $@=/sqlEnd/
; rollback ;
$/sqlEnd/

$proc $@/sqlPred/
parse arg , b1 op rest
    o1 = left(op, 1)
    o2 = left(op'=', 2)
    li = 'and ('
    d0 = 4
    $do bx=0 $@¢
        parse var rest val ',' rest
        cx = bx + b1
        col = m.cc.cx
        if rest = '' then $@¢
            $$- left('', d0 + bx*2) li col op strip(val) $*+
                left('', bx * 2 + 1, ')')
            return
            $!
        $$- left('', d0 + bx*2) li col o2 strip(val) $*+
             'and ('col o1 strip(val)
        $$- left('', d0 + 1 + bx*2) 'or ('col '=' strip(val)
        li = 'and'
        $!
$/sqlPred/
$#out                                              20160916 11:39:06
}¢--- A540769.WK.SQL(WI112) cre=2015-01-06 mod=2015-01-06-09.33.30 A540769 -----
     -- table Space und Details für 1 StichDatum
set current path oa1p;
with t2 as
(
   select rz, dbSys, dbName, name, instance, partition
       , max(loadTs) loadTs
     from oa1p.tqz006GbGrTsSTats
    where rz = 'RZ2' and dbSys = 'DBOF'
        and dbName = 'WI02A1P' and name like 'A112A'
        and loadTs <= timestamp(current date + 1 day)
    group by rz, dbSys, dbName, name, instance, partition
)
, t as
(
   select r.*
     from t2
      join oa1p.tqz006GbGrTsSTats r
        on t2.loadTS is not null and r.state <> 'd'
                and t2.rz        = r.rz
                and t2.dbSys     = r.dbSys
                and t2.dbName    = r.dbName
                and t2.name      = r.name
                and t2.instance  = r.instance
                and t2.partition = r.partition
                and t2.loadTs    = r.loadTS
)
select rz, dbSys, dbName, name
      , substr(fosFmte7(sum(real(nActive) * pgSize * 1024)), 1, 7) used
      , substr(fosFmte7(sum(totalRows)), 1, 7) rows
    from t
    group by rz, dbSys, dbName, name
    order by rz, dbSys, dbName, name
;x;
select rz, dbSys, dbName, name
      , substr(case when tsTy <> '' then tsTy else tsType end
          || case when clone in ('N', '?') and instance=1 and tsInst=1
                  then ''
                  else case when instance=tsInst then 'b' else 'c' end
                      || instance end, 1, 3) "yci"
      , substr(case when partition = 0 and parts = 0 then ''
            else case when partition is null            then ' ---'
                      when partition = 0 and tsTy = 'G' then ' pbg'
                      when partition = 0                then ' ???'
                      else right('   ' || partition, 4)
                 end
             ||'/'|| value(right('   '|| parts, 4),'----')
            end, 1, 9) "part/ tot"
   -- , smallInt(partition) part
      , substr(fosFmte7(real(nActive) * pgSize * 1024), 1, 7) used
      , substr(fosFmte7(totalRows), 1, 7) rows
      , substr(tb, 1, 30) "table"
      , updateStatsTime, t.*
    from t
    order by rz, dbSys, dbName, name, instance, partition
;
}¢--- A540769.WK.SQL(WI601) cre=2008-12-08 mod=2008-12-08-15.47.13 F540769 -----
select length(wi60109), hex(length(wi60109)), w.*
    from oa1a.twi601a1 w
}¢--- A540769.WK.SQL(WI800) cre= mod= ------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5655-W34      --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBAF (915  )   Extract time : 2011-09-15 21:52 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N RO=N TC=N                      --
-- Grants   : SG=N DB=N TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Table space=A800A In Database DGDB0112   --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DGDB0112   Stogroup=GSMS (for partition 1)
-- Table space=DGDB0112.A800A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='GDB0112';
--
  CREATE TABLESPACE A800A
    IN DGDB0112
    USING STOGROUP GSMS
    PRIQTY 360000 SECQTY 360000
    FREEPAGE 5 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    DSSIZE 16 G
    NUMPARTS 100
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=GDB0112.TWI800A1 In DGDB0112.A800A
------------------------------------------------------------------------
--
  CREATE TABLE GDB0112.TWI800A1
     (WI800_ORDER_T        CHAR(4) FOR SBCS DATA NOT NULL,
      WI800_ORDER_D        CHAR(8) FOR SBCS DATA NOT NULL,
      WI800_ORDER_L        CHAR(5) FOR SBCS DATA NOT NULL,
      WI800_ORDER_G        CHAR(2) FOR SBCS DATA NOT NULL,
      WI800_SPLIT          SMALLINT NOT NULL,
      WI800_PARTITION      SMALLINT NOT NULL,
      WI800_INSERT         TIMESTAMP NOT NULL,
      CONSTRAINT WI800_ORDER_T
      PRIMARY KEY (WI800_ORDER_T,
                   WI800_ORDER_D,
                   WI800_ORDER_L,
                   WI800_ORDER_G))
    IN DGDB0112.A800A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
--
  LABEL ON TABLE GDB0112.TWI800A1 IS 'P90 ARCHIVE INDEX';
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGDB0112
--    Index=GDB0112.IWI800A1 On GDB0112.TWI800A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX GDB0112.IWI800A1
    ON GDB0112.TWI800A1
     (WI800_ORDER_T         ASC,
      WI800_ORDER_D         ASC,
      WI800_ORDER_L         ASC,
      WI800_ORDER_G         ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 5 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES
    PIECESIZE 4 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGDB0112
--    Index=GDB0112.IWI800A2 On GDB0112.TWI800A1
------------------------------------------------------------------------
--
  CREATE INDEX GDB0112.IWI800A2
    ON GDB0112.TWI800A1
     (WI800_INSERT          ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES
    PIECESIZE 4 G;
--
  COMMIT;
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Table space=A801A001 In Database DGDB0112--
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DGDB0112   Stogroup=GSMS (for partition 1)
-- Table space=DGDB0112.A801A001
------------------------------------------------------------------------
--
  CREATE TABLESPACE A801A001
    IN DGDB0112
    USING STOGROUP GSMS
    PRIQTY 360000 SECQTY 360000
    FREEPAGE 5 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    DSSIZE 16 G
    NUMPARTS 100
    BUFFERPOOL BP16K0
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=GDB0112.TWI801A1001 In DGDB0112.A801A001
------------------------------------------------------------------------
--
  CREATE TABLE GDB0112.TWI801A1001
     (WI801_ORDER_T        CHAR(4) FOR SBCS DATA NOT NULL,
      WI801_ORDER_D        CHAR(8) FOR SBCS DATA NOT NULL,
      WI801_ORDER_L        CHAR(5) FOR SBCS DATA NOT NULL,
      WI801_SI2            SMALLINT NOT NULL,
      WI801_GA             CHAR(21) FOR SBCS DATA NOT NULL,
      WI801_SI3            SMALLINT NOT NULL,
      WI801_VV             CHAR(7) FOR SBCS DATA NOT NULL,
      WI801_SI4            SMALLINT NOT NULL,
      WI801_VB             CHAR(2) FOR SBCS DATA NOT NULL,
      WI801_SI5            SMALLINT NOT NULL,
      WI801_TN             CHAR(7) FOR SBCS DATA NOT NULL,
      WI801_PARTKEY        SMALLINT NOT NULL,
      WI801_INSERT         TIMESTAMP NOT NULL,
      WI801_DATA           VARCHAR(8192) FOR SBCS DATA NOT NULL,
      CONSTRAINT WI801_ORDER_T
      PRIMARY KEY (WI801_ORDER_T,
                   WI801_ORDER_D,
                   WI801_ORDER_L,
                   WI801_SI2,
                   WI801_GA,
                   WI801_SI3,
                   WI801_VV,
                   WI801_SI4,
                   WI801_VB,
                   WI801_SI5,
                   WI801_TN,
                   WI801_PARTKEY))
    IN DGDB0112.A801A001
    PARTITION BY (WI801_PARTKEY ASC)
     (PARTITION 1 ENDING AT (1),
      PARTITION 2 ENDING AT (2),
      PARTITION 3 ENDING AT (3),
      PARTITION 4 ENDING AT (4),
      PARTITION 5 ENDING AT (5),
      PARTITION 6 ENDING AT (6),
      PARTITION 7 ENDING AT (7),
      PARTITION 8 ENDING AT (8),
      PARTITION 9 ENDING AT (9),
      PARTITION 10 ENDING AT (10),
      PARTITION 11 ENDING AT (11),
      PARTITION 12 ENDING AT (12),
      PARTITION 13 ENDING AT (13),
      PARTITION 14 ENDING AT (14),
      PARTITION 15 ENDING AT (15),
      PARTITION 16 ENDING AT (16),
      PARTITION 17 ENDING AT (17),
      PARTITION 18 ENDING AT (18),
      PARTITION 19 ENDING AT (19),
      PARTITION 20 ENDING AT (20),
      PARTITION 21 ENDING AT (21),
      PARTITION 22 ENDING AT (22),
      PARTITION 23 ENDING AT (23),
      PARTITION 24 ENDING AT (24),
      PARTITION 25 ENDING AT (25),
      PARTITION 26 ENDING AT (26),
      PARTITION 27 ENDING AT (27),
      PARTITION 28 ENDING AT (28),
      PARTITION 29 ENDING AT (29),
      PARTITION 30 ENDING AT (30),
      PARTITION 31 ENDING AT (31),
      PARTITION 32 ENDING AT (32),
      PARTITION 33 ENDING AT (33),
      PARTITION 34 ENDING AT (34),
      PARTITION 35 ENDING AT (35),
      PARTITION 36 ENDING AT (36),
      PARTITION 37 ENDING AT (37),
      PARTITION 38 ENDING AT (38),
      PARTITION 39 ENDING AT (39),
      PARTITION 40 ENDING AT (40),
      PARTITION 41 ENDING AT (41),
      PARTITION 42 ENDING AT (42),
      PARTITION 43 ENDING AT (43),
      PARTITION 44 ENDING AT (44),
      PARTITION 45 ENDING AT (45),
      PARTITION 46 ENDING AT (46),
      PARTITION 47 ENDING AT (47),
      PARTITION 48 ENDING AT (48),
      PARTITION 49 ENDING AT (49),
      PARTITION 50 ENDING AT (50),
      PARTITION 51 ENDING AT (51),
      PARTITION 52 ENDING AT (52),
      PARTITION 53 ENDING AT (53),
      PARTITION 54 ENDING AT (54),
      PARTITION 55 ENDING AT (55),
      PARTITION 56 ENDING AT (56),
      PARTITION 57 ENDING AT (57),
      PARTITION 58 ENDING AT (58),
      PARTITION 59 ENDING AT (59),
      PARTITION 60 ENDING AT (60),
      PARTITION 61 ENDING AT (61),
      PARTITION 62 ENDING AT (62),
      PARTITION 63 ENDING AT (63),
      PARTITION 64 ENDING AT (64),
      PARTITION 65 ENDING AT (65),
      PARTITION 66 ENDING AT (66),
      PARTITION 67 ENDING AT (67),
      PARTITION 68 ENDING AT (68),
      PARTITION 69 ENDING AT (69),
      PARTITION 70 ENDING AT (70),
      PARTITION 71 ENDING AT (71),
      PARTITION 72 ENDING AT (72),
      PARTITION 73 ENDING AT (73),
      PARTITION 74 ENDING AT (74),
      PARTITION 75 ENDING AT (75),
      PARTITION 76 ENDING AT (76),
      PARTITION 77 ENDING AT (77),
      PARTITION 78 ENDING AT (78),
      PARTITION 79 ENDING AT (79),
      PARTITION 80 ENDING AT (80),
      PARTITION 81 ENDING AT (81),
      PARTITION 82 ENDING AT (82),
      PARTITION 83 ENDING AT (83),
      PARTITION 84 ENDING AT (84),
      PARTITION 85 ENDING AT (85),
      PARTITION 86 ENDING AT (86),
      PARTITION 87 ENDING AT (87),
      PARTITION 88 ENDING AT (88),
      PARTITION 89 ENDING AT (89),
      PARTITION 90 ENDING AT (90),
      PARTITION 91 ENDING AT (91),
      PARTITION 92 ENDING AT (92),
      PARTITION 93 ENDING AT (93),
      PARTITION 94 ENDING AT (94),
      PARTITION 95 ENDING AT (95),
      PARTITION 96 ENDING AT (96),
      PARTITION 97 ENDING AT (97),
      PARTITION 98 ENDING AT (98),
      PARTITION 99 ENDING AT (99),
      PARTITION 100 ENDING AT (100))
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
--
  LABEL ON TABLE GDB0112.TWI801A1001 IS 'P90 ARCHIVE';
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGDB0112
--    Index=GDB0112.IWI801A1001 On GDB0112.TWI801A1001
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX GDB0112.IWI801A1001
    ON GDB0112.TWI801A1001
     (WI801_ORDER_T         ASC,
      WI801_ORDER_D         ASC,
      WI801_ORDER_L         ASC,
      WI801_SI2             ASC,
      WI801_GA              ASC,
      WI801_SI3             ASC,
      WI801_VV              ASC,
      WI801_SI4             ASC,
      WI801_VB              ASC,
      WI801_SI5             ASC,
      WI801_TN              ASC,
      WI801_PARTKEY         ASC)
    PARTITIONED
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 5 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
     (PARTITION 1,
      PARTITION 2,
      PARTITION 3,
      PARTITION 4,
      PARTITION 5,
      PARTITION 6,
      PARTITION 7,
      PARTITION 8,
      PARTITION 9,
      PARTITION 10,
      PARTITION 11,
      PARTITION 12,
      PARTITION 13,
      PARTITION 14,
      PARTITION 15,
      PARTITION 16,
      PARTITION 17,
      PARTITION 18,
      PARTITION 19,
      PARTITION 20,
      PARTITION 21,
      PARTITION 22,
      PARTITION 23,
      PARTITION 24,
      PARTITION 25,
      PARTITION 26,
      PARTITION 27,
      PARTITION 28,
      PARTITION 29,
      PARTITION 30,
      PARTITION 31,
      PARTITION 32,
      PARTITION 33,
      PARTITION 34,
      PARTITION 35,
      PARTITION 36,
      PARTITION 37,
      PARTITION 38,
      PARTITION 39,
      PARTITION 40,
      PARTITION 41,
      PARTITION 42,
      PARTITION 43,
      PARTITION 44,
      PARTITION 45,
      PARTITION 46,
      PARTITION 47,
      PARTITION 48,
      PARTITION 49,
      PARTITION 50,
      PARTITION 51,
      PARTITION 52,
      PARTITION 53,
      PARTITION 54,
      PARTITION 55,
      PARTITION 56,
      PARTITION 57,
      PARTITION 58,
      PARTITION 59,
      PARTITION 60,
      PARTITION 61,
      PARTITION 62,
      PARTITION 63,
      PARTITION 64,
      PARTITION 65,
      PARTITION 66,
      PARTITION 67,
      PARTITION 68,
      PARTITION 69,
      PARTITION 70,
      PARTITION 71,
      PARTITION 72,
      PARTITION 73,
      PARTITION 74,
      PARTITION 75,
      PARTITION 76,
      PARTITION 77,
      PARTITION 78,
      PARTITION 79,
      PARTITION 80,
      PARTITION 81,
      PARTITION 82,
      PARTITION 83,
      PARTITION 84,
      PARTITION 85,
      PARTITION 86,
      PARTITION 87,
      PARTITION 88,
      PARTITION 89,
      PARTITION 90,
      PARTITION 91,
      PARTITION 92,
      PARTITION 93,
      PARTITION 94,
      PARTITION 95,
      PARTITION 96,
      PARTITION 97,
      PARTITION 98,
      PARTITION 99,
      PARTITION 100)
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGDB0112
--    Index=GDB0112.IWI801A2001 On GDB0112.TWI801A1001
------------------------------------------------------------------------
--
  CREATE INDEX GDB0112.IWI801A2001
    ON GDB0112.TWI801A1001
     (WI801_INSERT          ASC,
      WI801_PARTKEY         ASC)
    PARTITIONED
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
     (PARTITION 1,
      PARTITION 2,
      PARTITION 3,
      PARTITION 4,
      PARTITION 5,
      PARTITION 6,
      PARTITION 7,
      PARTITION 8,
      PARTITION 9,
      PARTITION 10,
      PARTITION 11,
      PARTITION 12,
      PARTITION 13,
      PARTITION 14,
      PARTITION 15,
      PARTITION 16,
      PARTITION 17,
      PARTITION 18,
      PARTITION 19,
      PARTITION 20,
      PARTITION 21,
      PARTITION 22,
      PARTITION 23,
      PARTITION 24,
      PARTITION 25,
      PARTITION 26,
      PARTITION 27,
      PARTITION 28,
      PARTITION 29,
      PARTITION 30,
      PARTITION 31,
      PARTITION 32,
      PARTITION 33,
      PARTITION 34,
      PARTITION 35,
      PARTITION 36,
      PARTITION 37,
      PARTITION 38,
      PARTITION 39,
      PARTITION 40,
      PARTITION 41,
      PARTITION 42,
      PARTITION 43,
      PARTITION 44,
      PARTITION 45,
      PARTITION 46,
      PARTITION 47,
      PARTITION 48,
      PARTITION 49,
      PARTITION 50,
      PARTITION 51,
      PARTITION 52,
      PARTITION 53,
      PARTITION 54,
      PARTITION 55,
      PARTITION 56,
      PARTITION 57,
      PARTITION 58,
      PARTITION 59,
      PARTITION 60,
      PARTITION 61,
      PARTITION 62,
      PARTITION 63,
      PARTITION 64,
      PARTITION 65,
      PARTITION 66,
      PARTITION 67,
      PARTITION 68,
      PARTITION 69,
      PARTITION 70,
      PARTITION 71,
      PARTITION 72,
      PARTITION 73,
      PARTITION 74,
      PARTITION 75,
      PARTITION 76,
      PARTITION 77,
      PARTITION 78,
      PARTITION 79,
      PARTITION 80,
      PARTITION 81,
      PARTITION 82,
      PARTITION 83,
      PARTITION 84,
      PARTITION 85,
      PARTITION 86,
      PARTITION 87,
      PARTITION 88,
      PARTITION 89,
      PARTITION 90,
      PARTITION 91,
      PARTITION 92,
      PARTITION 93,
      PARTITION 94,
      PARTITION 95,
      PARTITION 96,
      PARTITION 97,
      PARTITION 98,
      PARTITION 99,
      PARTITION 100)
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES;
--
  COMMIT;
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Table space=A812A In Database DGDB0112   --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DGDB0112   Stogroup=GSMS (for partition 1)
-- Table space=DGDB0112.A812A
------------------------------------------------------------------------
--
  CREATE TABLESPACE A812A
    IN DGDB0112
    USING STOGROUP GSMS
    PRIQTY 360000 SECQTY 360000
    FREEPAGE 5 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    DSSIZE 16 G
    NUMPARTS 100
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=GDB0112.TWI812A1 In DGDB0112.A812A
------------------------------------------------------------------------
--
  CREATE TABLE GDB0112.TWI812A1
     (WI812_SPLIT          SMALLINT NOT NULL,
      WI812_PARTITION      SMALLINT NOT NULL,
      WI812_STATE          CHAR(1) FOR SBCS DATA NOT NULL,
      WI812_LASTUSE        TIMESTAMP NOT NULL,
      CONSTRAINT WI812_SPLIT
      PRIMARY KEY (WI812_SPLIT,
                   WI812_PARTITION,
                   WI812_STATE))
    IN DGDB0112.A812A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
--
  LABEL ON TABLE GDB0112.TWI812A1 IS 'P90 ARCHIVE INDEX';
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DGDB0112
--    Index=GDB0112.IWI812A1 On GDB0112.TWI812A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX GDB0112.IWI812A1
    ON GDB0112.TWI812A1
     (WI812_SPLIT           ASC,
      WI812_PARTITION       ASC,
      WI812_STATE           ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 5 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES
    PIECESIZE 4 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(WKCMPDN) cre= mod= ----------------------------------------
set current sqlid = 'S100447';
DROP   TABLE    OA1L.TDE032A1;
CREATE TABLE    OA1L.TDE032A1
   (DE03200 TIMESTAMP                            NOT NULL             ,
    DE03204U CHAR(20)                            NOT NULL
    DE03204T CHAR(2)                             NOT NULL             ,
    DE03204V CHAR(3)                             NOT NULL             ,
    DE03205 CHAR(12)                             NOT NULL             ,
    DE03206 CHAR(12)                             NOT NULL             ,
    DE03207 CHAR(1)                              NOT NULL             ,
    DE03208 CHAR(1)                              NOT NULL             ,
    DE03209 DECIMAL(15,3)                        NOT NULL             ,
    DE03210 FLOAT(53)                            NOT NULL             ,
    DE03211 CHAR(1)                              NOT NULL             ,
    DE03212 CHAR(7)                              NOT NULL             ,
    DE03213 CHAR(9)                              NOT NULL WITH DEFAULT,
    DE03214 CHAR(1)                              NOT NULL WITH DEFAULT,
    DE03215 CHAR(3)                              NOT NULL WITH DEFAULT,
    DE03216 CHAR(1)                              NOT NULL WITH DEFAULT,
       PRIMARY KEY (DE03204U                    ,
                    DE03204T                    ,
                    DE03204V                    )                     ,
       FOREIGN KEY CDE031A    (DE03204U            )
     REFERENCES OA1L.TDE031A1                   (DE03104U            )
               ON DELETE CASCADE                                      )
       IN DE03A1L.A032A
       AUDIT NONE
       CCSID EBCDIC
                                                                      ;
LABEL ON TABLE OA1L.TDE032A1
       IS 'HANDELSVERTRAG'
                                                                      ;
LABEL ON OA1L.TDE032A1
  (DE03200 IS 'Timestamp'                                             ,
   DE03204U IS 'UWI Handelsvereinbarung'                              ,
   DE03204T IS 'Vertragsnummer'                                       ,
   DE03204V IS 'Versionsnummer'                                       ,
   DE03205 IS 'gültig-ab'                                             ,
   DE03206 IS 'gültig-bis'                                            ,
   DE03207 IS 'Vertragsart (Termin/Kasse)'                            ,
   DE03208 IS 'Handelstyp (S=sell/B=buy)'                             ,
   DE03209 IS 'CHF-Gegenwert (Gesamt)'                                ,
   DE03210 IS 'direkter Kurs'                                         ,
   DE03211 IS 'Preiseinheit (ED)'                                     ,
   DE03212 IS 'Souchennummer'                                         ,
   DE03213 IS 'GLS-T Nummer'                                          ,
   DE03214 IS 'CLS-Flag (J=CLS/N=kein CLS)'                           ,
   DE03215 IS 'CLS-Status'                                            ,
   DE03216 IS 'CLS-Inhouse-Deal (J/N)'                                )
                                                                      ;
}¢--- A540769.WK.SQL(WKCMPDNT) cre=2006-06-27 mod=2006-06-27-11.43.19 F540769 ---
-SYNC 031350 ALTER  TABLE OA1L.TDE034A1
                    FOREIGN KEY CDE032A (DE03404U,
                                 DE03404T,
                                 DE03404V)
                       REFERENCES OA1L.TDE032A1
                       ON DELETE CASCADE                                54859065
}¢--- A540769.WK.SQL(WKCMPN) cre=2006-06-27 mod=2006-06-27-12.38.52 F540769 ----
SET CURRENT SQLID = 'S100447';
UPDATE SYSIBM.SYSCOLUMNS SET FOREIGNKEY='S'
       WHERE TBCREATOR='OA1L    '
         AND TBNAME   ='TDE032A1            '
         AND NAME     ='DE03204U            '
;
UPDATE SYSIBM.SYSCOLUMNS SET FOREIGNKEY='B'
       WHERE TBCREATOR='OA1L    '
         AND TBNAME   ='TDE021A1            '
         AND NAME     ='DE02112             '
}¢--- A540769.WK.SQL(WK001) cre=2006-08-29 mod=2006-08-29-16.20.02 F540769 -----
  SET CURRENT SQLID='A540769';
  DROP          INDEX A540769.IWK001A0;
  COMMIT;
  CREATE UNIQUE INDEX A540769.IWK001A0
    ON A540769.TWK001A
     (WK001NAME             DESC)
    USING STOGROUP GSMS
    PRIQTY 12 SECQTY 12
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
  COMMIT;
}¢--- A540769.WK.SQL(WK001IX) cre=2006-12-15 mod=2006-12-15-11.34.33 F540769 ---
  SET CURRENT SQLID='S100447';
  DROP   INDEX GDB9998.IWK001A2;
  COMMIT;
  CREATE INDEX GDB9998.IWK001A2
    ON DGDB9998.TWK001A
     (WK001NAME             ASC,
      WK001NUM              ASC,
      WK001ID               ASC,
      WK001T1               ASC)
    USING STOGROUP GSMS
    PRIQTY 12 SECQTY 12
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
  COMMIT;
}¢--- A540769.WK.SQL(WK003D) cre=2006-09-14 mod=2006-09-14-16.56.05 F540769 ----
  delete from  gdb9998.TWK003A
       where wk003id = 'eins'
  ;
  commit
  ;
  select * from gdb9998.TWK003A
  ;
}¢--- A540769.WK.SQL(WK003I) cre=2006-09-14 mod=2006-09-14-16.55.23 F540769 ----
  insert into  gdb9998.TWK003A

     (WK003ID   ,
      WK003TXT  ,
      WK003FOR  )
  values ('zwei', 'zwei', 'zwei')
  ;
  commit
  ;
  select * from gdb9998.TWK003A
  ;
}¢--- A540769.WK.SQL(WK009) cre=2006-07-28 mod=2006-07-28-12.02.17 F540769 -----
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBAF (810)     Extract time : 2006-07-28 12:00 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=Y DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=A003A In Database DA540769    --
--                                                                    --
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
--
------------------------------------------------------------------------
-- Database=DA540769   Stogroup=GSMS
-- Tablespace=DA540769.A009A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='s100447';
--
  CREATE TABLESPACE A009A
    IN DA540769
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=A540769.TWK009A In DA540769.A009A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='A540769';
--
  CREATE TABLE A540769.TWK009A
     (WK009ID              CHAR(10) FOR SBCS DATA NOT NULL,
      WK009TXT             CHAR(20) FOR SBCS DATA WITH DEFAULT NULL,
      WK009FOR             CHAR(10) FOR SBCS DATA WITH DEFAULT NULL,
      WK009GEN             DECIMAL(25, 0) NOT NULL
        GENERATED BY DEFAULT
        AS IDENTITY
          (START WITH -9999999999999999999999999, INCREMENT BY 1,
           CACHE 20, NO CYCLE, MAXVALUE 9999999999999999999999999,
           MINVALUE -9999999999999999999999999),
      CONSTRAINT WK003PRIM
      PRIMARY KEY (WK009ID))
    IN DA540769.A009A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC;
--
  LABEL ON TABLE A540769.TWK009A IS 'table drei mit foreign key';
--
  COMMIT;
--
  SET CURRENT SQLID='S100447';
--
  GRANT USE OF STOGROUP GSMS TO PUBLIC;
--
------------------------------------------------------------------------
-- Database=DA540769
--    Index=A540769.IWK009A0 On A540769.TWK009A
------------------------------------------------------------------------
--
  SET CURRENT SQLID='A540769';
--
  CREATE UNIQUE INDEX A540769.IWK009A0
    ON A540769.TWK009A
     (WK009ID               ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
  ALTER TABLE A540769.TWK009A FOREIGN KEY WK009FOR
     (WK009FOR)
    REFERENCES A540769.TWK009A
     (WK009ID)
    ON DELETE CASCADE  ;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(WK1) cre=2009-09-15 mod=2009-09-17-10.46.48 A540769 -------
select part, count(*),
        max(char(v1, 40)), max(char(v2, 40)), max(char(v3, 40))
    from gdb9998.twk600a190
    where v1 like '-chk %'
    group by part
    order by 1
;
x
select part, count(*),
        min(i1), max(i1),
        min(i2), max(i2),
        left(max(char(left(v1, 200),200)), 10),
        left(max(char(left(v2, 200), 200)), 10),
        left(max(char(left(v3, 200), 200)), 10)
    from gdb9998.twk600a030
    group by part
    order by part
    with ur
}¢--- A540769.WK.SQL(WK2) cre=2009-09-15 mod=2009-09-15-18.23.05 A540769 -------
select current timestamp from sysibm.sysdummy1
;
insert into gdb9998.twk600A000 (part, i1, i2, v1, v2, v3)
    select partition, 0, 0
        , '-chk v1 ' || char(current timestamp)
        , '-chk v2 ' || char(current timestamp)
        , '-chk v3 ' || char(current timestamp)
        from sysibm.sysTablePart
        where dbName = 'DGDB9998' and tsName = 'A600A000'
;
select part, count(*), sum(bigInt(i1)), sum(bigInt(i1))
   , sum(bigInt(length(v1)))
   , max(char(left(v1, 40), 40))
   , sum(case when v1 like '-chk%' then 1 else 0 end)
   , max(case when v1 like '-chk%' then char(v1, 40) else '' end)
   , sum(bigInt(length(v2)))
   , max(char(left(v2, 40), 40))
   , sum(case when v2 like '-chk%' then 1 else 0 end)
   , max(case when v2 like '-chk%' then char(v2, 40) else '' end)
   , sum(bigInt(length(v3)))
   , max(char(left(v3, 40), 40))
   , sum(case when v3 like '-chk%' then 1 else 0 end)
   , max(case when v3 like '-chk%' then char(v3, 40) else '' end)
  from gdb9998.twk600a000
  group by part
;
select current timestamp from sysibm.sysdummy1
;
commit
;
x
select part, count(*),
        min(i1), max(i1),
        min(i2), max(i2),
        left(max(char(left(v1, 200),200)), 10),
        left(max(char(left(v2, 200), 200)), 10),
        left(max(char(left(v3, 200), 200)), 10)
    from gdb9998.twk600a030
    group by part
    order by part
    with ur
}¢--- A540769.WK.SQL(WM005) cre=2011-06-09 mod=2012-04-16-12.25.00 A540769 -----
  SET CURRENT SQLID='S100447';
  drop INDEX oA1t.IWM005AQ  ;
------------------------------------------------------------------------
--
  CREATE INDEX OA1t.IWM005AQ
    ON OA1t.TWM005A1
     (CTYP                  ASC,
      NKTO                  ASC,
      NCIF2                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
  sdf;
  drop INDEX oA1P.IWM005AE  ;
  drop INDEX OA1P.IWM005AA  ;
  drop INDEX OA1P.IWM005AC  ;
  drop INDEX OA1P.IWM005AF  ;
  drop INDEX OA1P.IWM005AG  ;
  drop INDEX OA1P.IWM005A5  ;
  drop INDEX OA1P.IWM005A8  ;
  drop INDEX OA1P.IWM005A2  ;
  drop INDEX OA1P.IWM005A7  ;
  commit;
--
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005A2 On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005A2
    ON OA1P.TWM005A1
     (NCIF                  ASC,
      NDEP                  ASC,
      CKAT                  ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005A5 On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005A5
    ON OA1P.TWM005A1
     (NDEP                  ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005A7 On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005A7
    ON OA1P.TWM005A1
     (CKAT                  ASC,
      NKTO                  ASC,
      CSTAT                 ASC,
      CDEFAULT              ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005A8 On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005A8
    ON OA1P.TWM005A1
     (NVALOR                ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005AA On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005AA
    ON OA1P.TWM005A1
     (NBU                   ASC,
      CKAT                  ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005AC On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005AC
    ON OA1P.TWM005A1
     (CGA                   ASC,
      CGAPH                 ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005AE On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005AE
    ON OA1P.TWM005A1
     (CTYP                  ASC,
      TWMD1                 ASC,
      TWMD2                 ASC,
      TWMD3                 ASC,
      TWMD4                 ASC,
      TWMD5                 ASC,
      TWMD6                 ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005AF On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005AF
    ON OA1P.TWM005A1
     (TWMD1                 ASC,
      CGA                   ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005AG On OA1P.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1P.IWM005AG
    ON OA1P.TWM005A1
     (TWMD2                 ASC,
      TWMD3                 ASC,
      TWMD4                 ASC,
      TWMD5                 ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer yes
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=OA1P.IWM005AQ On OA1P.TWM005A1
--
--  REBIND PACKAGE(A390880.YYWM051.(WSIN000032))
--
--  REBIND PACKAGE(A540769.YYWM51E.(WSIN000101))
--
--  REBIND PACKAGE(HBDTEST.YYWM051.(WSIN000040))
--
--  REBIND PACKAGE(MST.YYWM005.(WSIN000032))
--
--  REBIND PACKAGE(MST.YYWM051.(WSIN000032))
--
--  REBIND PACKAGE(WM.WM0010.(WSIN000100))
--
--  REBIND PACKAGE(WM.WM0010.(WSIN000076))
--
--  REBIND PACKAGE(WM.WM0010.(WSIN000101))
--
--  REBIND PACKAGE(WM.WM0150.(WSIN000042))
--
--  REBIND PACKAGE(WM.WM0150.(WSIN000056))
--
--  REBIND PACKAGE(WM.WM0150.(WSIN000064))
--
--  REBIND PACKAGE(WM.WM8300.(WSIN000092))
--
--  REBIND PACKAGE(WM.WM8300.(WSIN000095))
--
--  REBIND PACKAGE(WM.WM8300.(WSIN000097))
--
--  REBIND PACKAGE(WM.YWMNSUP.(A06M027252))
--
--  REBIND PACKAGE(WM.YWM001.(A06M021462))
--
--  REBIND PACKAGE(WM.YWM001.(A06M023948))
--
--  REBIND PACKAGE(WM.YWM001N.(A06M023948))
--
--  REBIND PACKAGE(WM.YWM005.(A06M022736))
--
--  REBIND PACKAGE(WM.YWM005N.(A06M023948))
--
--  REBIND PACKAGE(WM.YWM006.(A06M022705))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000034))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000040))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000041))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000049))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000052))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000034))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000039))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000040))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000041))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM005.(A18Q002827))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000056))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000058))
--
--  REBIND PACKAGE(YY.YYWM006.(A06M027252))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000052))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000066))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000081))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000084))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000086))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM05E.(PLIH000120))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM05E.(A18Q002827))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000056))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000058))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000063))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000066))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000067))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000074))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000064))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000077))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000081))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000084))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000086))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000095))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000097))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000101))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000023))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000039))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000040))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000041))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000063))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000064))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000066))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000081))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000086))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000076))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000092))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000097))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000101))
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(WM005F) cre=2012-03-27 mod=2012-03-28-08.21.07 A540769 ----
set current sqlid = 'S100447';
CREATE INDEX OA1T.IWM005AF
  ON OA1T.TWM005A1
   (TWMD1                 ASC,
    CGA                   ASC,
    CTYP                  ASC,
    D$GUEB                DESC)
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  ERASE  NO
  FREEPAGE 10 PCTFREE 10
  GBPCACHE CHANGED
  NOT CLUSTER
  COMPRESS NO
  BUFFERPOOL BP1
  CLOSE YES
  COPY NO
  DEFER YES
  DEFINE YES
  PIECESIZE 2 G;
COMMIT;
}¢--- A540769.WK.SQL(WM005IX) cre=2012-03-09 mod=2012-03-09-11.38.15 A540769 ---
------------------------------------------------------------------------
--    recreate indexes for twm005A1 In WM01A1A.A005A
------------------------------------------------------------------------
  set current sqlid = 'S100447';
--
--drop INDEX OA1A.IWM005A8 ;
--drop INDEX OA1A.IWM005A2 ;
  drop INDEX OA1A.IWM005A7 ;
--drop INDEX OA1A.IWM005AA ;
--drop INDEX OA1A.IWM005AC ;
  drop INDEX OA1A.IWM005AQ ;
--drop INDEX OA1A.IWM005AF ;
--drop INDEX OA1A.IWM005AE ;
--drop INDEX OA1A.IWM005A1 ;
--drop INDEX OA1A.IWM005A5 ;
commit;
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005A7 On OA1A.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1A.IWM005A7
    ON OA1A.TWM005A1
     (CKAT                  ASC,
      NKTO                  ASC,
      CSTAT                 ASC,
      CDEFAULT              ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005AQ On OA1A.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1A.IWM005AQ
    ON OA1A.TWM005A1
     (CTYP                  ASC,
      NKTO                  ASC,
      CSTAT                 ASC,
      CDEFAULT              ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
  CREATE INDEX OA1A.IWM005AG
    ON OA1A.TWM005A1
     (CSTAT                 ASC,
      TWMD2                 ASC,
      TWMD3                 ASC,
      TWMD4                 ASC,
      TWMD5                 ASC,
      CDEFAULT              ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
--
 COMMIT;
 ************ UNVERÄNDERT    ;;;;
  create INDEX OA1A.IWM005A8
    ON OA1A.TWM005A1
     (NVALOR                ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY 180 SECQTY 7200
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005A2 On OA1A.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1A.IWM005A2
    ON OA1A.TWM005A1
     (NCIF                  ASC,
      NDEP                  ASC,
      CTYP                  ASC,
      CKAT                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY 40500 SECQTY 10800
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005AA On OA1A.TWM005A1
------------------------------------------------------------------------
--
  SET CURRENT SCHEMA='OA1A';
--
  CREATE INDEX OA1A.IWM005AA
    ON OA1A.TWM005A1
     (NBU                   ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005AC On OA1A.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1A.IWM005AC
    ON OA1A.TWM005A1
     (CGA                   ASC,
      CGAPH                 ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
--
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005AF On OA1A.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1A.IWM005AF
    ON OA1A.TWM005A1
     (TWMD1                 ASC,
      TWMD2                 ASC,
      TWMD3                 ASC,
      TWMD4                 ASC,
      TWMD5                 ASC,
      TWMD6                 ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005AE On OA1A.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1A.IWM005AE
    ON OA1A.TWM005A1
     (CTYP                  ASC,
      TWMD1                 ASC,
      TWMD2                 ASC,
      TWMD3                 ASC,
      TWMD4                 ASC,
      TWMD5                 ASC,
      TWMD6                 ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005A1 On OA1A.TWM005A1
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=WM01A1A
--    Index=OA1A.IWM005A5 On OA1A.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX OA1A.IWM005A5
    ON OA1A.TWM005A1
     (NDEP                  ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER YES
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
--  REBIND PACKAGE(WM.WMINSTR.(TEST000046))
--
--  REBIND PACKAGE(WM.WMREPL.(NSCH))
--
--  REBIND PACKAGE(WM.WMREPL2.(NSCH))
--
--  REBIND PACKAGE(WM.WMSQLTS.(WSIN000036))
--
--  REBIND PACKAGE(WM.WM0010.(WSIN000097))
--
--  REBIND PACKAGE(WM.WM0010.(WSIN000098))
--
--  REBIND PACKAGE(WM.WM0010.(WSIN000100))
--
--  REBIND PACKAGE(WM.WM0150.(TEST001033))
--
--  REBIND PACKAGE(WM.WM0150.(TEST001856))
--
--  REBIND PACKAGE(WM.WM0150.(TEST001813))
--
--  REBIND PACKAGE(WM.WM8300.(TEST001813))
--
--  REBIND PACKAGE(WM.WM8300.(WSIN000095))
--
--  REBIND PACKAGE(WM.WM8300.(WSIN000097))
--
--  REBIND PACKAGE(WM.YWMNSUP.(NSCH))
--
--  REBIND PACKAGE(WM.YWM001.(2002-09-04-06.31.15.535181))
--
--  REBIND PACKAGE(WM.YWM001.(2002-09-11-07.04.25.123491))
--
--  REBIND PACKAGE(WM.YWM001.(2002-09-11-07.16.16.137880))
--
--  REBIND PACKAGE(WM.YWM001.(2002-09-11-07.38.38.159163))
--
--  REBIND PACKAGE(WM.YWM001.(2002-09-11-09.30.41.364201))
--
--  REBIND PACKAGE(WM.YWM001.(2002-09-11-09.33.41.131545))
--
--  REBIND PACKAGE(WM.YWM005.(2002-11-26-13.08.59.330008))
--
--  REBIND PACKAGE(WM.YWM006.(NSCH))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-04.40.22.953104))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-04.52.17.179272))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.03.07.265289))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.10.18.604178))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.21.47.462701))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.23.30.492502))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.29.34.960300))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.43.44.303532))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.46.47.998983))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.48.58.787400))
--
--  REBIND PACKAGE(WM.YWM011.(2002-09-04-05.50.56.107769))
--
--  REBIND PACKAGE(YY.YYWMSQ.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000034))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000040))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000041))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000049))
--
--  REBIND PACKAGE(YY.YYWM001.(WSIN000052))
--
--  REBIND PACKAGE(YY.YYWM002.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM002.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000034))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000039))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000040))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000041))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM005.(A18Q002827))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000056))
--
--  REBIND PACKAGE(YY.YYWM005.(TEST001079))
--
--  REBIND PACKAGE(YY.YYWM005.(WSIN000058))
--
--  REBIND PACKAGE(YY.YYWM006.(WSIN000019))
--
--  REBIND PACKAGE(YY.YYWM006.(WSIN000004568BEEB7))
--
--  REBIND PACKAGE(YY.YYWM006.(WSIN000020))
--
--  REBIND PACKAGE(YY.YYWM006.(WSIN000034))
--
--  REBIND PACKAGE(YY.YYWM006.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM006.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000052))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000066))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000081))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000084))
--
--  REBIND PACKAGE(YY.YYWM01E.(WSIN000086))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM05E.(PLIH000120))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM05E.(A18Q002827))
--
--  REBIND PACKAGE(YY.YYWM05E.(TEST001079))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000058))
--
--  REBIND PACKAGE(YY.YYWM05E.(TEST001033))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000063))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000066))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000067))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000074))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000064))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000077))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000081))
--
--  REBIND PACKAGE(YY.YYWM05E.(TEST001415))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000084))
--
--  REBIND PACKAGE(YY.YYWM05E.(TEST001813))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000086))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000095))
--
--  REBIND PACKAGE(YY.YYWM05E.(WSIN000097))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000023))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000039))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000040))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000041))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM051.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM061.(WSIN000020))
--
--  REBIND PACKAGE(YY.YYWM061.(WSIN000032))
--
--  REBIND PACKAGE(YY.YYWM061.(WSIN000036))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000042))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000043))
--
--  REBIND PACKAGE(YY.YYWM51E.(TEST001033))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000063))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000064))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000066))
--
--  REBIND PACKAGE(YY.YYWM51E.(TEST001415))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000081))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000086))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000076))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000092))
--
--  REBIND PACKAGE(YY.YYWM51E.(WSIN000097))
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(WM005J) cre=2011-06-10 mod=2011-06-10-13.31.09 A540769 ----
//A540769W JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//P00     EXEC PGM=IKJEFT01,
//             DYNAMNBR=20
//SYSTSIN   DD *
  DSN SYSTEM  (DBAF)
  RUN PROGRAM (DSNTIAUL) PARMS('SQL')
//SYSTSPRT  DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSPUNCH  DD DUMMY
//SYSREC00  DD DSN=A540769.TMP.DREI,
//             DISP=(,CATLG),SPACE=(CYL,(10,10),RLSE),
//             RECFM=FB,LRECL=809
//*YSREC00  DD SYSOUT=*
  SELECT *
  FROM OA1A.TWM005A1
  WHERE D$GUEB > CURRENT TIMESTAMP
    AND CTYP = 'EG13';
//
//P00     EXEC PGM=IKJEFT01,
//             DYNAMNBR=20
//SYSTSIN   DD *
  DSN SYSTEM  (DBAF)
  RUN PROGRAM (DSNTEP2)
//SYSTSPRT  DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSPUNCH  DD DUMMY
//*YSREC00  DD DSN=A540769.TMP.OUT,
//*            DISP=(,CATLG),SPACE=(CYL,(10,10),RLSE),
//*            RECFM=FB,LRECL=809
//SYSIN     DD *
  SELECT *
  FROM OA1A.TWM005A1
  WHERE D$GUEB > CURRENT TIMESTAMP
    AND CTYP = 'EG13';
//
  SELECT * FROM OA1T.TWM005A1
  WHERE D$GUEB >  CURRENT TIMESTAMP
    AND CTYP = 'CARG';
//
  SELECT * FROM OA1T.TWM005A1
  WHERE D$GUEB >  CURRENT TIMESTAMP
   AND IS40KEY > ''
   and  NDEP    > '0000000000000000'
   AND NDEP    < '9999999999999999'
  ORDER BY NDEP, IS40KEY, CSTAT;
//
  UPDATE OA1T.TWM005A1
  SET D$GUEB = '2011-03-15-13.25.34.000000'
     ,TAUFTRG = 'F540657'
     ,PLMUT   = 'A629518'
     ,D$LMUT  = '2011-03-15-13.25.34.000001'
  WHERE CTYP = 'SAP3'
    AND TWM1 = '0008';
//
  SELECT CKAT, SUBSTR(';',1,1),
         CTYP, SUBSTR(';',1,1),
         D$ERF, SUBSTR(';',1,1),
         PERF, SUBSTR(';',1,1),
         D$LMUT, SUBSTR(';',1,1),
         PLMUT, SUBSTR(';',1,1),
         TGRUND, SUBSTR(';',1,1),
         TAUFTRG, SUBSTR(';',1,1),
         D$GUEA, SUBSTR(';',1,1),
         D$GUEB, SUBSTR(';',1,1),
         CSTAT, SUBSTR(';',1,1),
         CDEFAULT, SUBSTR(';',1,1),
         NCIF, SUBSTR(';',1,1),
         NDEP, SUBSTR(';',1,1),
         TWMD1, SUBSTR(';',1,1),
         TWMD5, SUBSTR(';',1,1),
         TWM6, SUBSTR(';',1,1),
         TWM1, SUBSTR(';',1,1),
         TWM2, SUBSTR(';',1,1),
         TWM3, SUBSTR(';',1,1),
         TWM4, SUBSTR(';',1,1),
         NCIF2
     FROM OA1T.TWM005A1
       WHERE D$GUEB > CURRENT TIMESTAMP
       AND CTYP IN ('PSNE','PSNK','PSNI')
   ;
//
   SELECT *
     FROM OA1t.TWM005A1
       WHERE D$GUEB > CURRENT TIMESTAMP
       and ncif = '083509104606'
   ;
//
   SELECT CD.CD100001
   FROM OA1T.TCD100A1 CD
   WHERE NOT EXISTS
     (SELECT *
      FROM OA1T.TDM001A1 DM
      WHERE CD.CD100001 = DM.DM001007);
//
  SELECT distinct
         OA1T.TWM005A1.CTYP, SUBSTR(';',1,1),
         OA1T.TWM005A1.NCIF, SUBSTR(';',1,1),
         OA1T.TWM005A1.NDEP, SUBSTR(';',1,1),
         substr(OA1T.TWM005A1.TWM1,1,3), SUBSTR(';',1,1),
         OA1T.TDM001A1.DM001110
  FROM OA1T.TWM005A1, OA1T.TDM001A1
  WHERE OA1T.TWM005A1.D$GUEB > CURRENT TIMESTAMP
    AND DATE(OA1T.TWM005A1.D$GUEA) < '01.02.2011'
    AND OA1T.TWM005A1.CTYP IN ('SLLA', 'SLVV', 'SLQI')
    AND OA1T.TWM005A1.NCIF = OA1T.TDM001A1.DM001007
    AND OA1T.TDM001A1.DM001110 IN ('0011', '0012');
//
  SELECT WM.NDEP
  FROM OA1T.TWM005A1 WM
  WHERE D$GUEB > CURRENT TIMESTAMP
    AND CTYP = 'BURA'
    AND NOT EXISTS
    (SELECT *
     FROM OA1T.TDM001A1 DM
     WHERE NDEP = DM001006);
//
  SELECT CKAT,SUBSTR(';',1,1),CTYP,
  SUBSTR(';',1,1),CURRENT TIMESTAMP
  FROM OA1T.TWM004A1
  WHERE D$GUEB > CURRENT TIMESTAMP
    AND CKAT <> 'ZZZZ'
  ORDER BY 1,2;
//
   SELECT COUNT (*)
   FROM OA1T.TWM005A1 WM
       ,OA1T.TCD100A1 CD
   WHERE WM.CTYP = 'BUAL'
     AND WM.D$GUEB > CURRENT TIMESTAMP
     AND WM.NCIF = CD.CD100001
     AND CD.CD100004 IN ('0020','0021','0023','0041',
                       '0050','0051','0099');
//
   SELECT WM.NCIF,' ',DM.DM001110
  SELECT *
  FROM OA1T.TWM005A1 WM
      ,OA1T.TDM001A1 DM
  WHERE NDEP > ' '
//
  SELECT NCIF
         ,SUBSTR(';',1,1)
         ,NDEP
    FROM OA1T.TWM005A1
   WHERE D$GUEA     <=    CURRENT TIMESTAMP
     AND D$GUEB     >=    CURRENT TIMESTAMP
     AND CSTAT    BETWEEN 'A' AND 'A'
     AND CDEFAULT BETWEEN 'C' AND 'C'
     AND CTYP        =    'EG13';
//
     ORDER BY NCIF;
  SELECT  A.NDEP
     FROM OA1T.TWM005A1 A
         ,OA1T.TWM005A1 B
   WHERE A.D$GUEB > CURRENT TIMESTAMP
     AND A.CTYP = 'BUAL'
     AND A.NDEP
       (SELECT *
           FROM OA1T.TWM004A1 A
           WHERE A.D$GUEB > CURRENT TIMESTAMP
             AND A.NDEP = B.NDEP)
   GROUP BY B.CTYP;
//
  SELECT *
  FROM OA1T.TWM005A1
  WHERE CTYP = 'JFDD'
    AND D$GUEB > CURRENT TIMESTAMP;
//
  SELECT *
  FROM OA1T.TWM005A1 A1
  WHERE A1.CTYP ='BUCA'
    AND A1.D$GUEB > CURRENT TIMESTAMP
    AND EXISTS
        (SELECT * FROM OA1T.TWM005A1 A2
         WHERE A2.D$GUEB > CURRENT TIMESTAMP
           AND A2.NDEP = A1.NDEP
           AND A2.CTYP = 'BUCP');
//
  SELECT *
  FROM OA1T.TWM005A1
  WHERE CTYP ='PSNI'
    AND D$GUEB > CURRENT TIMESTAMP
    AND NOT EXISTS
        (SELECT * FROM OA1T.TDM001A1
         WHERE NDEP = DM001006);
//
  SELECT  * FROM OA1T.TWM005A1
   WHERE  TGRUND = 'INITIAL LOAD SAVAS'
     AND  CTYP = 'SAP3'
     AND DATE(D$ERF) = '06.10.2009';
//
  SELECT  *
     FROM OA1T.TWM005A1
     WHERE D$GUEB > CURRENT TIMESTAMP
       AND CTYP <>'BURA'
       AND NDEP IN
                   ('0065064131075000',
                    '0835063006595000');
//
   SELECT C.KAT1,C.TYP1,CHAR(DECIMAL(C.CNT1)) AS CNT2
   FROM
    (SELECT DISTINCT B.CKAT AS KAT1,A.TYP AS TYP1,A.CNT AS CNT1
     FROM
      (SELECT CTYP AS TYP
             ,COUNT(*) AS CNT
       FROM OA1P.TWM005A1
       WHERE D$GUEB > CURRENT TIMESTAMP
         AND NDEP <> 'ZZZZ'
       GROUP BY CTYP
       ORDER BY CNT DESC) AS A
     ,OA1P.TWM005A1 AS B
     WHERE A.TYP = B.CTYP) AS C
    ORDER BY CNT2 DESC;
//
  SELECT  B.NDEP
     FROM OA1P.TWM005A1 B
   WHERE B.D$GUEB > CURRENT TIMESTAMP
     AND B.CTYP = 'EG13'
     AND EXISTS
       (SELECT A.NDEP
           FROM OA1P.TWM005A1 A
           WHERE A.D$GUEB > CURRENT TIMESTAMP
             AND A.CTYP = 'EG15'
             AND A.NDEP = B.NDEP);
//
  SELECT      CHAR(COUNT(*))
     FROM OA1P.TWM005A1
   WHERE D$GUEB > CURRENT TIMESTAMP
     AND CTYP = 'BUAL'
     AND PERF = 'S107153'
     AND DATE(D$LMUT) BETWEEN '01.10.2008' AND '31.10.2008'
   GROUP BY CTYP
  ;
//
     AND PERF NOT IN ('KC02','DM04','ROT')
  SELECT  DISTINCT SUBSTR(NVALOR,1,15)
         ,SUBSTR(';',1,1)
         ,SUBSTR(CTYP,1,4)
   FROM OA1P.TWM005A1
   WHERE D$GUEB > CURRENT TIMESTAMP
     AND CKAT =  'INRE'
   ORDER BY 1,2;
//
  SELECT  SUBSTR(CKAT,1,4)
         ,SUBSTR(';',1,1)
         ,SUBSTR(CTYP,1,4)
         ,SUBSTR(';',1,1)
   GROUP BY CKAT,CTYP,NCIF,NDEP,NVALOR,TWMD1,D$LMUT
  SELECT  SUBSTR(B.CKAT,1,4)
         ,SUBSTR(';',1,1)
         ,SUBSTR(B.CTYP,1,4)
         ,SUBSTR(';',1,1)
         ,SUBSTR(B.CSS,1,6)
         ,SUBSTR(';',1,1)
         ,SUBSTR(B.CRC,1,5)
         ,SUBSTR(';',1,1)
         ,SUBSTR(VALUE(A1.TYP,' '),1,4)
     FROM OA1P.TWM004A1 B
     LEFT OUTER JOIN
         (SELECT DISTINCT A.CTYP AS TYP
           FROM OA1P.TWM006A1 A
           WHERE A.D$GUEB > CURRENT TIMESTAMP) AS A1
     ON B.CTYP = A1.TYP
     WHERE B.D$GUEB > CURRENT TIMESTAMP;
//
       AND CTYP = 'SAP3'
       AND PERF = 'F623870';
  SELECT  NDEP,CHAR(COUNT(*)) AS Z
     FROM OA1P.TWM005A1
   WHERE D$GUEB > CURRENT TIMESTAMP
   GROUP BY NDEP
   ORDER BY Z DESC
  SELECT CTYP, SUBSTR(' ',1,1),CHAR(COUNT(*))
  FROM OA1P.TWM006A1
  WHERE D$GUEB > CURRENT TIMESTAMP
   GROUP BY CTYP;
  ;
//
  SELECT  B.CTYP, SUBSTR(' ',1,1),CHAR(COUNT(*))
     FROM OA1P.TWM005A1 B
   WHERE B.D$GUEB > CURRENT TIMESTAMP
     AND B.NBU > ' '
     AND B.CTYP IN
       (SELECT A.CTYP
           FROM OA1P.TWM004A1 A
           WHERE A.D$GUEB > CURRENT TIMESTAMP
             AND A.NBU_CF <> 'G')
   GROUP BY B.CTYP;
//
  SELECT  NDEP,CHAR(COUNT(*)) AS Z
     FROM OA1P.TWM005A1
   WHERE D$GUEB > CURRENT TIMESTAMP
   GROUP BY NDEP
   ORDER BY Z DESC
  ;
}¢--- A540769.WK.SQL(WM005PRO) cre=2012-04-17 mod=2012-04-17-11.42.09 A540769 ---
  SET CURRENT SQLID='S100447';
--
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005A2 On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005A2
    ON gdb0153.TWM005A1
     (NCIF                  ASC,
      NDEP                  ASC,
      CKAT                  ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005A5 On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005A5
    ON gdb0153.TWM005A1
     (NDEP                  ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005A7 On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005A7
    ON gdb0153.TWM005A1
     (CKAT                  ASC,
      NKTO                  ASC,
      CSTAT                 ASC,
      CDEFAULT              ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005A8 On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005A8
    ON gdb0153.TWM005A1
     (NVALOR                ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005AA On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005AA
    ON gdb0153.TWM005A1
     (NBU                   ASC,
      CKAT                  ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005AC On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005AC
    ON gdb0153.TWM005A1
     (CGA                   ASC,
      CGAPH                 ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005AE On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005AE
    ON gdb0153.TWM005A1
     (CTYP                  ASC,
      TWMD1                 ASC,
      TWMD2                 ASC,
      TWMD3                 ASC,
      TWMD4                 ASC,
      TWMD5                 ASC,
      TWMD6                 ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005AF On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005AF
    ON gdb0153.TWM005A1
     (TWMD1                 ASC,
      CGA                   ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=WM01A1P
--    Index=gdb0153.IWM005AG On gdb0153.TWM005A1
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005AG
    ON gdb0153.TWM005A1
     (TWMD2                 ASC,
      TWMD3                 ASC,
      TWMD4                 ASC,
      TWMD5                 ASC,
      CTYP                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
sdf;
------------------------------------------------------------------------
  drop INDEX gdb0153.IWM005AQ ;
  drop INDEX gdb0153.IWM005AE ;
  drop INDEX gdb0153.IWM005AA ;
  drop INDEX gdb0153.IWM005AC ;
  drop INDEX gdb0153.IWM005AF ;
  drop INDEX gdb0153.IWM005AG ;
  drop INDEX gdb0153.IWM005A5 ;
  drop INDEX gdb0153.IWM005A8 ;
  drop INDEX gdb0153.IWM005A2 ;
  drop INDEX gdb0153.IWM005A7 ;
  commit;
------------------------------------------------------------------------
--
  CREATE INDEX gdb0153.IWM005AQ
    ON gdb0153.TWM005A1
     (CTYP                  ASC,
      NKTO                  ASC,
      NCIF2                  ASC,
      D$GUEB                DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    defer no
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
}¢--- A540769.WK.SQL(WM005RB) cre=2012-03-09 mod=2012-03-09-11.40.41 A540769 ---
//A540769R JOB (PD00,KE50,,SP00000000),
//             'FULLCOPY',
//             MSGCLASS=T,TIME=1440,LINES=100000
//*MAIN CLASS=LOG
//P04     EXEC PGM=IKJEFT01
//SYSTSPRT  DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSTSXX   DD *
//SYSTSIN   DD *
 DSN SYS(DBAF)
    REBIND PACKAGE(YY.YYWM51E.(WSIN000097))
    REBIND PACKAGE(WM.WMINSTR.(TEST000046))
    REBIND PACKAGE(WM.WMREPL.(NSCH))
    REBIND PACKAGE(WM.WMREPL2.(NSCH))
    REBIND PACKAGE(WM.WMSQLTS.(WSIN000036))
    REBIND PACKAGE(WM.WM0010.(WSIN000097))
    REBIND PACKAGE(WM.WM0010.(WSIN000098))
    REBIND PACKAGE(WM.WM0010.(WSIN000100))
    REBIND PACKAGE(WM.WM0150.(TEST001033))
    REBIND PACKAGE(WM.WM0150.(TEST001856))
    REBIND PACKAGE(WM.WM0150.(TEST001813))
    REBIND PACKAGE(WM.WM8300.(TEST001813))
    REBIND PACKAGE(WM.WM8300.(WSIN000095))
    REBIND PACKAGE(WM.WM8300.(WSIN000097))
    REBIND PACKAGE(WM.YWMNSUP.(NSCH))
    REBIND PACKAGE(WM.YWM001.(2002-09-04-06.31.15.535181))
    REBIND PACKAGE(WM.YWM001.(2002-09-11-07.04.25.123491))
    REBIND PACKAGE(WM.YWM001.(2002-09-11-07.16.16.137880))
    REBIND PACKAGE(WM.YWM001.(2002-09-11-07.38.38.159163))
    REBIND PACKAGE(WM.YWM001.(2002-09-11-09.30.41.364201))
    REBIND PACKAGE(WM.YWM001.(2002-09-11-09.33.41.131545))
    REBIND PACKAGE(WM.YWM005.(2002-11-26-13.08.59.330008))
    REBIND PACKAGE(WM.YWM006.(NSCH))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-04.40.22.953104))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-04.52.17.179272))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.03.07.265289))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.10.18.604178))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.21.47.462701))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.23.30.492502))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.29.34.960300))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.43.44.303532))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.46.47.998983))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.48.58.787400))
    REBIND PACKAGE(WM.YWM011.(2002-09-04-05.50.56.107769))
    REBIND PACKAGE(YY.YYWMSQ.(WSIN000036))
    REBIND PACKAGE(YY.YYWM001.(WSIN000034))
    REBIND PACKAGE(YY.YYWM001.(WSIN000032))
    REBIND PACKAGE(YY.YYWM001.(WSIN000036))
    REBIND PACKAGE(YY.YYWM001.(WSIN000040))
    REBIND PACKAGE(YY.YYWM001.(WSIN000041))
    REBIND PACKAGE(YY.YYWM001.(WSIN000042))
    REBIND PACKAGE(YY.YYWM001.(WSIN000043))
    REBIND PACKAGE(YY.YYWM001.(WSIN000049))
    REBIND PACKAGE(YY.YYWM001.(WSIN000052))
    REBIND PACKAGE(YY.YYWM002.(WSIN000032))
    REBIND PACKAGE(YY.YYWM002.(WSIN000036))
    REBIND PACKAGE(YY.YYWM005.(WSIN000034))
    REBIND PACKAGE(YY.YYWM005.(WSIN000032))
    REBIND PACKAGE(YY.YYWM005.(WSIN000036))
    REBIND PACKAGE(YY.YYWM005.(WSIN000039))
    REBIND PACKAGE(YY.YYWM005.(WSIN000040))
    REBIND PACKAGE(YY.YYWM005.(WSIN000041))
    REBIND PACKAGE(YY.YYWM005.(WSIN000042))
    REBIND PACKAGE(YY.YYWM005.(WSIN000043))
    REBIND PACKAGE(YY.YYWM005.(A18Q002827))
    REBIND PACKAGE(YY.YYWM005.(WSIN000056))
    REBIND PACKAGE(YY.YYWM005.(TEST001079))
    REBIND PACKAGE(YY.YYWM005.(WSIN000058))
    REBIND PACKAGE(YY.YYWM006.(WSIN000019))
    REBIND PACKAGE(YY.YYWM006.(WSIN000004568BEEB7))
    REBIND PACKAGE(YY.YYWM006.(WSIN000020))
    REBIND PACKAGE(YY.YYWM006.(WSIN000034))
    REBIND PACKAGE(YY.YYWM006.(WSIN000032))
    REBIND PACKAGE(YY.YYWM006.(WSIN000036))
    REBIND PACKAGE(YY.YYWM01E.(WSIN000043))
    REBIND PACKAGE(YY.YYWM01E.(WSIN000052))
    REBIND PACKAGE(YY.YYWM01E.(WSIN000066))
    REBIND PACKAGE(YY.YYWM01E.(WSIN000081))
    REBIND PACKAGE(YY.YYWM01E.(WSIN000084))
    REBIND PACKAGE(YY.YYWM01E.(WSIN000086))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000042))
    REBIND PACKAGE(YY.YYWM05E.(PLIH000120))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000043))
    REBIND PACKAGE(YY.YYWM05E.(A18Q002827))
    REBIND PACKAGE(YY.YYWM05E.(TEST001079))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000058))
    REBIND PACKAGE(YY.YYWM05E.(TEST001033))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000063))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000066))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000067))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000074))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000064))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000077))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000081))
    REBIND PACKAGE(YY.YYWM05E.(TEST001415))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000084))
    REBIND PACKAGE(YY.YYWM05E.(TEST001813))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000086))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000095))
    REBIND PACKAGE(YY.YYWM05E.(WSIN000097))
    REBIND PACKAGE(YY.YYWM051.(WSIN000023))
    REBIND PACKAGE(YY.YYWM051.(WSIN000032))
    REBIND PACKAGE(YY.YYWM051.(WSIN000036))
    REBIND PACKAGE(YY.YYWM051.(WSIN000039))
    REBIND PACKAGE(YY.YYWM051.(WSIN000040))
    REBIND PACKAGE(YY.YYWM051.(WSIN000041))
    REBIND PACKAGE(YY.YYWM051.(WSIN000042))
    REBIND PACKAGE(YY.YYWM051.(WSIN000043))
    REBIND PACKAGE(YY.YYWM061.(WSIN000020))
    REBIND PACKAGE(YY.YYWM061.(WSIN000032))
    REBIND PACKAGE(YY.YYWM061.(WSIN000036))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000042))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000043))
    REBIND PACKAGE(YY.YYWM51E.(TEST001033))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000063))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000064))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000066))
    REBIND PACKAGE(YY.YYWM51E.(TEST001415))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000081))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000086))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000076))
    REBIND PACKAGE(YY.YYWM51E.(WSIN000092))
}¢--- A540769.WK.SQL(WM005RE) cre=2012-03-09 mod=2012-03-09-11.37.08 A540769 ---
//A540769W JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//*MAIN CLASS=LOG0
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBAF,'A540769W.REORG'),
//   REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
     LISTDEF LST#REO
       INCLUDE TABLESPACE  WM01A1A.A005A      PARTLEVEL
 --  REORG TABLESPACE DA540769.A200A03 PART 16 : 20 , 102 :108,111,88:90
     REORG TABLESPACE  LIST LST#REO
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         DRAIN_WAIT 40
           RETRY 20
           RETRY_DELAY 180
           MAXRO 40
           DRAIN WRITERS
           LONGLOG CONTINUE
           DELAY 1200
           TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
}¢--- A540769.WK.SQL(WM005UNI) cre=2012-03-20 mod=2012-03-20-11.10.21 A540769 ---
select UWM005, CDEFAULT, D$GUEB, d$guea, w.*
    from oA1P.twm005a1 w
    where (left(twm6, 0) || UWM005, CDEFAULT, D$GUEB) in
          ( select left(twm6, 0) || UWM005, CDEFAULT, D$GUEB
                from oA1P.twm005a1 r
                group by left(twm6, 0) || UWM005, CDEFAULT, D$GUEB
                having count(*) > 1
          )
    order by UWM005, CDEFAULT, D$GUEB
    with ur
}¢--- A540769.WK.SQL(WORK) cre=2006-05-17 mod=2006-05-17-14.33.04 F540769 ------
DROP TABLESPACE FI04A1A.A020A                                           00010001
}¢--- A540769.WK.SQL(WP11103) cre=2016-04-19 mod=2016-04-20-11.54.14 A540769 ---
set current application compatibility 'V11R1';
with p as
(
  select case when WP111_DEPOT_TEC <= '0835013883975000' then 01
              when WP111_DEPOT_TEC <= '0835037335635005' then 02
              when WP111_DEPOT_TEC <= '0835055796585006' then 03
              when WP111_DEPOT_TEC <= '0835066396225015' then 04
              when WP111_DEPOT_TEC  || ' ' || WP111_VALOR_TEC
                                   <= '0835066396665000 001480005000'
                                                         then 05
              when WP111_DEPOT_TEC <= '0835067398205001' then 06
              when WP111_DEPOT_TEC <= '0835085584415002' then 07
              when WP111_DEPOT_TEC <= '0835094226475000' then 08
              when WP111_DEPOT_TEC <= '0835119461005002' then 09
              when WP111_DEPOT_TEC <= '0835144186355000' then 10
              when WP111_DEPOT_TEC <= '0835160650715000' then 11
              when WP111_DEPOT_TEC <= '0835172777735000' then 12
              when WP111_DEPOT_TEC  || ' ' || WP111_VALOR_TEC
                                   <= '0835182961785000 001221405000'
                                                         then 13
              when WP111_DEPOT_TEC <= '0848070578545002' then 14
              when WP111_DEPOT_TEC <= '0883079543695000' then 15
              else 16 end p
       , WP111_DEPOT_TEC || ' ' || WP111_VALOR_TEC depVal
  from OA1P.TWP111A103
)
select p, count(*)
        , min(depVal)
        , max(depVal)
  from p
  group by p
  with ur
;x;
with d as
(
  select count(*) cnt
       , WP111_DEPOT_TEC  || ' ' || WP111_VALOR_TEC depVal
  from OA1P.TWP111A103
  where wp111_depot_tec
          between '0835172778975000' and  '0848070578545002'
  group by WP111_DEPOT_TEC, WP111_VALOR_TEC
--fetch first 1000 rows only
)
, t as
(
  select sum(cnt) t, count(*) d
    from d
)
, r as
(
  select d.*
      , sum(cnt) over(order by depVal
                 RANGE BETWEEN UNBOUNDED PRECEDING AND CURRENT ROW) r
    from d
)
, p as
(
  select floor(2. * (r-1) / t) p, sum(cnt) cnt, count(d) dep
    , min(r) rFr, max(r) rTo
    , min(depVal) depValFr
    , max(depVal) depValTo
    , t.*
    from r, t
    group by floor(2. * (r-1) / t), t.t, t.d
)
select p.*
    from p
    with ur
;x;
set current application compatibility 'V11R1';
with d as
(
  select count(*) cnt
       , WP111_DEPOT_TEC depot
  from OA1P.TWP111A103
  group by WP111_DEPOT_TEC
--fetch first 100 rows only
)
, t as
(
  select sum(cnt) t, count(*) d
    from d
)
, r as
(
  select d.*
      , sum(cnt) over(order by depot
                 RANGE BETWEEN UNBOUNDED PRECEDING AND CURRENT ROW) r
    from d
)
, p as
(
  select floor(16. * (r-1) / t) p, sum(cnt) cnt, count(d) dep
    , min(r) rFr, max(r) rTo
    , min(depot) depFr, max(depot) depTo
    , t.*
    from r, t
    group by floor(16. * (r-1) / t), t.t, t.d
)
select p.*
    from p
    with ur
;x;
select p, count(*)
        , min(r), max(r)
        , min(depot), max(depot)
with p as
(
  select case when WP111_DEPOT_TEC <= '0835006999999999' then 01
              when WP111_DEPOT_TEC <= '0835012099999999' then 02
              when WP111_DEPOT_TEC <= '0835017899999999' then 03
              when WP111_DEPOT_TEC <= '0835025399999999' then 04
              when WP111_DEPOT_TEC <= '0835033499999999' then 05
              when WP111_DEPOT_TEC <= '0835042999999999' then 06
              when WP111_DEPOT_TEC <= '0835052999999999' then 07
              when WP111_DEPOT_TEC <= '0835066396664999' then 08  --w2
              when WP111_DEPOT_TEC <= '0835066396665000' then 09  --w2
              when WP111_DEPOT_TEC <= '0835085269999999' then 10
              when WP111_DEPOT_TEC <= '0835088999999999' then 11  --orig
              when WP111_DEPOT_TEC <= '0835096499999999' then 12  --orig
              when WP111_DEPOT_TEC <= '0835147850425000' then 13  --v1
              when WP111_DEPOT_TEC <= '0835174940655001' then 14  --v1
              when WP111_DEPOT_TEC <= '0858144681905000' then 15  --v1
  --          when WP111_DEPOT_TEC <= '0835094152965065' then 11  --w2
  --          when WP111_DEPOT_TEC <= '0835136302155000' then 12  --w2
  --          when WP111_DEPOT_TEC <= '0835161723405000' then 13  --w2
  --          when WP111_DEPOT_TEC <= '0835182961785000' then 14  --w2
  --          when WP111_DEPOT_TEC <= '0881024343795006' then 15  --w2
  --orig      when WP111_DEPOT_TEC <= '0835057999999999' then 08  --orig
  --orig      when WP111_DEPOT_TEC <= '0835072999999999' then 09  --orig
  --orig      when WP111_DEPOT_TEC <= '0842054999999999' then 13  --orig
  --orig      when WP111_DEPOT_TEC <= '0862053999999999' then 14  --orig
  --orig      when WP111_DEPOT_TEC <= '0882999999999999' then 15  --orig
              else 16 end p
       , WP111_DEPOT_TEC depot
  from OA1P.TWP111A103
)
, r as
(
  select p.*
      , row_number() over(order by depot) r
    from p
)
select p, count(*)
        , min(r), max(r)
        , min(depot), max(depot)
   from r
   group by rollup (p, floor(r / 1e6))
   order by 3, 4 desc
   with ur
}¢--- A540769.WK.SQL(WQX13) cre=2014-07-22 mod=2014-07-22-11.33.17 A540769 -----
set current sqlid = 'S100447';
xrop   INDEX OA1P.IWQX13A002 ;
xrop   INDEX OA1P.IWQX13A003 ;
commit;
;
    CREATE INDEX OA1P.IWQX13A005
           ON OA1P.TWQX13A1
          (MS_FK_MO_UUID asc
          )
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP  GSMS
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 10
           GBPCACHE CHANGED
           PIECESIZE 2097152K;
;
commit;
;x;   rebind rzz nur x13
rebind package (WQ.YWQXCU.(CUBE000229))
rebind package (WQ.YWQXCU.(CUBE000220))
rebind package (WQ.YWQXCU.(CUBE000230))
rebind package (WQ.YWQXCU.(CUBE000232))
rebind package (WQ.YWQXCU.(CUBE000239))
rebind package (WQ.YWQXCU.(CUBE000247))
rebind package (WQ.YWQXCU.(CUBE000252))
rebind package (WQ.YWQXCU.(CUBE000254))
rebind package (WQ.YWQXIS.(CUBE000229))
rebind package (WQ.YWQXIS.(CUBE000220))
rebind package (WQ.YWQXIS.(CUBE000230))
rebind package (WQ.YWQXIS.(CUBE000232))
rebind package (WQ.YWQXIS.(CUBE000239))
rebind package (WQ.YWQXIS.(CUBE000247))
rebind package (WQ.YWQXUP.(CUBE000229))
rebind package (WQ.YWQXUP.(CUBE000220))
rebind package (WQ.YWQXUP.(CUBE000230))
rebind package (WQ.YWQXUP.(CUBE000232))
rebind package (WQ.YWQXUP.(CUBE000239))
rebind package (WQ.YWQXUP.(CUBE000247))
;x;   rebind rzz x13 und x14
REBIND PACKAGE(WQ.YWQXCU.(CUBE000220))
REBIND PACKAGE(WQ.YWQXCU.(CUBE000229))
REBIND PACKAGE(WQ.YWQXCU.(CUBE000230))
REBIND PACKAGE(WQ.YWQXCU.(CUBE000232))
REBIND PACKAGE(WQ.YWQXCU.(CUBE000239))
REBIND PACKAGE(WQ.YWQXCU.(CUBE000247))
REBIND PACKAGE(WQ.YWQXCU.(CUBE000252))
REBIND PACKAGE(WQ.YWQXCU.(CUBE000254))
REBIND PACKAGE(WQ.YWQXIS.(CUBE000220))
REBIND PACKAGE(WQ.YWQXIS.(CUBE000229))
REBIND PACKAGE(WQ.YWQXIS.(CUBE000230))
REBIND PACKAGE(WQ.YWQXIS.(CUBE000232))
REBIND PACKAGE(WQ.YWQXIS.(CUBE000239))
REBIND PACKAGE(WQ.YWQXIS.(CUBE000247))
REBIND PACKAGE(WQ.YWQXSL.(CUBE000220))
REBIND PACKAGE(WQ.YWQXSL.(CUBE000229))
REBIND PACKAGE(WQ.YWQXSL.(CUBE000230))
REBIND PACKAGE(WQ.YWQXSL.(CUBE000232))
REBIND PACKAGE(WQ.YWQXSL.(CUBE000236))
REBIND PACKAGE(WQ.YWQXSL.(CUBE000239))
REBIND PACKAGE(WQ.YWQXSL.(CUBE000247))
REBIND PACKAGE(WQ.YWQXUP.(CUBE000220))
REBIND PACKAGE(WQ.YWQXUP.(CUBE000229))
REBIND PACKAGE(WQ.YWQXUP.(CUBE000230))
REBIND PACKAGE(WQ.YWQXUP.(CUBE000232))
REBIND PACKAGE(WQ.YWQXUP.(CUBE000239))
REBIND PACKAGE(WQ.YWQXUP.(CUBE000247))
;x;   rebind rz2
rz2ind PACKAGE(WQ.YWQXCU.(CUBE000220))
rz2ind PACKAGE(WQ.YWQXCU.(CUBE000230))
rz2ind PACKAGE(WQ.YWQXCU.(CUBE000232))
rz2ind PACKAGE(WQ.YWQXCU.(CUBE000239))
rz2ind PACKAGE(WQ.YWQXCU.(CUBE000247))
rz2ind PACKAGE(WQ.YWQXCU.(CUBE000254))
rz2ind PACKAGE(WQ.YWQXIS.(CUBE000220))
rz2ind PACKAGE(WQ.YWQXIS.(CUBE000230))
rz2ind PACKAGE(WQ.YWQXIS.(CUBE000232))
rz2ind PACKAGE(WQ.YWQXIS.(CUBE000239))
rz2ind PACKAGE(WQ.YWQXIS.(CUBE000247))
rz2ind PACKAGE(WQ.YWQXSL.(CUBE000220))
rz2ind PACKAGE(WQ.YWQXSL.(CUBE000230))
rz2ind PACKAGE(WQ.YWQXSL.(CUBE000232))
rz2ind PACKAGE(WQ.YWQXSL.(CUBE000236))
rz2ind PACKAGE(WQ.YWQXSL.(CUBE000239))
rz2ind PACKAGE(WQ.YWQXSL.(CUBE000247))
rz2ind PACKAGE(WQ.YWQXUP.(CUBE000220))
rz2ind PACKAGE(WQ.YWQXUP.(CUBE000230))
rz2ind PACKAGE(WQ.YWQXUP.(CUBE000232))
rz2ind PACKAGE(WQ.YWQXUP.(CUBE000239))
rz2ind PACKAGE(WQ.YWQXUP.(CUBE000247))
.CONNECT DBOF

--#SET TERMINATOR ;


 SET CURRENT SQLID = 'S100447';


    CREATE STOGROUP "GSMS    "
          VOLUMES
          ("*     "
          )
    VCAT DBOF;


 SET CURRENT SQLID = 'S100447';


    CREATE DATABASE WQ01A1P
           BUFFERPOOL BP2
           INDEXBP    BP1
           STOGROUP "GSMS    "
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE AX14A
           IN WQ01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 64
           FREEPAGE 0
           PCTFREE 10
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ROW
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.TWQX14A1
        (FM_UUID CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,FM_CREATE_TS TIMESTAMP (6) WITHOUT TIME ZONE
                                                        NOT NULL
        ,FM_CREATE_PID CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,FM_FAX_TEMPLATE_ID CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,FM_FO_UUID CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,FM_FRONT_ORDER_NO CHARACTER(18) FOR SBCS DATA
                                                        NOT NULL
        ,FM_PACKAGE_NR INTEGER
                                                        NOT NULL
        ,FM_ACTIVATOR CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,FM_COM_MEDIUM CHARACTER(1) FOR SBCS DATA
                                                        NOT NULL
        ,FM_FAX_ENTRY_BASIS CHARACTER(24) FOR SBCS DATA
                                                        NOT NULL
        ,FM_REC_CONTACT_NAME CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,FM_REC_PHONE_NO CHARACTER(25) FOR SBCS DATA
                                                        NOT NULL
        ,FM_REC_FAX_NO CHARACTER(25) FOR SBCS DATA
                                                        NOT NULL
        ,FM_REC_EMAIL CHARACTER(80) FOR SBCS DATA
                                                        NOT NULL
        ,FM_REC_COMMENTS CHARACTER(50) FOR SBCS DATA
                                                        NOT NULL
        ,FM_REMARK VARCHAR(396) FOR SBCS DATA
                                                        NOT NULL
        ,CONSTRAINT CWQX14A1 PRIMARY KEY
        (FM_UUID
        )
        )
        IN WQ01A1P.AX14A
   APPEND NO
   WITH RESTRICT ON DROP
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    COMMENT ON TABLE OA1P.TWQX14A1
 IS 'FaxMessage(FM)';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_FAX_TEMPLATE_ID
 IS 'Fax-Id like in Sectos: (001) DFP - Fax Initial, (002) DFP - Fax 1st
 Reminder (003) DFP - Fax 2nd Reminder (004) DFP - Fax Confirmation (005
) DFP - Fax Cancelation (006) RFP - Fax Initial (no Avis from counterpar
ty) (007) RFP - Fax 1st Reminder (no Avis from counterparty) (008) RFP -
 Fax 2nd Reminder (no Avis from counterparty) (009) RFP - Fax Confirmati
on (no Avis from counterparty) (010) RFP - Fax Cancel action (no Avis fr
om counterparty) (011) RFP - Fax Initial (based on Avis from counterpart
y) (012) RFP - Fax Confirmation (based on Avis from counterparty)';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_FRONT_ORDER_NO
 IS 'Front-Order number of the front-order.  Front order number and pack
age number are together the reference number.';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_PACKAGE_NR
 IS 'The package number of the fax message per front order.';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_ACTIVATOR
 IS 'Activation of the fax generation. Automatic(A) or manual(M).';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_COM_MEDIUM
 IS 'Communication medium. E-Mail(E) or Fax(F).';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_FAX_ENTRY_BASIS
 IS 'Fax Erfassungs-Grundlage.';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_REC_CONTACT_NAME
 IS 'Recipient conact name';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_REC_PHONE_NO
 IS 'Recipient phone number';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_REC_FAX_NO
 IS 'Recipient fax number';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_REC_EMAIL
 IS 'Recipient e-mail address.';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_REC_COMMENTS
 IS 'Recipients comments.';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX14A1.FM_REMARK
 IS 'Freetext for writing remarks. 6 X 66 (VARCHAR 396)';


 SET CURRENT SQLID = 'S100447';


    CREATE TABLESPACE AX13A
           IN WQ01A1P
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           BUFFERPOOL BP2
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 64
           FREEPAGE 0
           PCTFREE 10
           GBPCACHE CHANGED
           DEFINE YES
           LOGGED
           TRACKMOD YES
           COMPRESS YES
           LOCKSIZE ROW
           MAXROWS 255
           CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    CREATE TABLE OA1P.TWQX13A1
        (MS_UUID CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,MS_CREATE_TS TIMESTAMP (6) WITHOUT TIME ZONE
                                                        NOT NULL
        ,MS_CREATE_PID CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,MS_UPDATE_TS TIMESTAMP (6) WITHOUT TIME ZONE
                                                        NOT NULL
        ,MS_UPDATE_PID CHARACTER(8) FOR SBCS DATA
                                                        NOT NULL
        ,MS_FK_MO_UUID CHARACTER(16) FOR SBCS DATA
                                                        NOT NULL
        ,MS_FK_FM_UUID CHARACTER(16) FOR SBCS DATA
  WITH DEFAULT NULL
        ,MS_FAX_STATE CHARACTER(3) FOR SBCS DATA
                                                        NOT NULL
        ,MS_STATUS SMALLINT
                                                        NOT NULL
        ,CONSTRAINT CWQX13A1 PRIMARY KEY
        (MS_UUID
        )
        )
        IN WQ01A1P.AX13A
   APPEND NO
   WITH RESTRICT ON DROP
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC;


 SET CURRENT SQLID = 'S100447';


    COMMENT ON TABLE OA1P.TWQX13A1
 IS 'MovementFaxState(FS)';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX13A1.MS_UUID
 IS 'PK';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX13A1.MS_FK_MO_UUID
 IS 'FK';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX13A1.MS_FK_FM_UUID
 IS 'FK';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX13A1.MS_FAX_STATE
 IS 'Movement-Fax-States: 1: Initial Fax sent 2: 1st Reminder due 3:
   1st Reminder sent 4: 2nd Reminder due 5: 2nd Reminder sent 6: ...';


 SET CURRENT SQLID = 'S100447';


    COMMENT ON COLUMN OA1P.TWQX13A1.MS_STATUS
 IS 'Status if the Movement-Fax-Message is ''active'' or ''inactive''
    . 0 = inactive; 1 = active;';


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.IWQX13A002
           ON OA1P.TWQX13A1
          (MS_CREATE_TS ASC
          )
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 10
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.IWQX13A003
           ON OA1P.TWQX13A1
          (MS_FAX_STATE ASC
          )
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 10
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE INDEX OA1P.IWQX13A004
           ON OA1P.TWQX13A1
          (MS_STATUS ASC
          )
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 10
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE        UNIQUE INDEX OA1P.IWQX13A001
           ON OA1P.TWQX13A1
          (MS_UUID ASC
          )
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 10
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    CREATE        UNIQUE INDEX OA1P.IWQX14A001
           ON OA1P.TWQX14A1
          (FM_UUID ASC
          )
           NOT CLUSTER
           DEFINE YES
           COMPRESS NO
           BUFFERPOOL BP1
           CLOSE YES
           DEFER NO
           COPY NO
           USING STOGROUP "GSMS    "
               PRIQTY -1
               SECQTY -1
               ERASE NO
           FREEPAGE 0
           PCTFREE 10
           GBPCACHE CHANGED
           PIECESIZE 2097152K;


 SET CURRENT SQLID = 'S100447';


    ALTER TABLE OA1P.TWQX13A1
         ADD
         CONSTRAINT CWQX13A3
         FOREIGN KEY
        (MS_FK_FM_UUID
        )
         REFERENCES OA1P.TWQX14A1
        (FM_UUID
        ) ON DELETE RESTRICT
         ENFORCED;

-- generating rebinds in DE0G at 11:18:47 22/07/14 for A540769
-- for 2 tablespace, 2 table, 0 view, 6 index, 0 alias, 0 synonym
--     tablespace WQ01A1P.AX14A
--     tablespace WQ01A1P.AX13A
--     table      OA1P.TWQX13A1
--     table      OA1P.TWQX14A1
--     index      OA1P.IWQX13A005
--     index      OA1P.IWQX13A002
--     index      OA1P.IWQX13A003
--     index      OA1P.IWQX13A004
--     index      OA1P.IWQX13A001
--     index      OA1P.IWQX14A001
}¢--- A540769.WK.SQL(XBBN) cre=2015-05-27 mod=2015-05-28-17.41.09 A540769 ------
declare global temporary table session.xbPa
   ( db char(8), ts char(8), pa smallint
   , cr char(3), tb char(20)
   , sta char(2)
   , unl char(44)
   , j char(3), info varChar(70), err varchar(20)
   ) on commit preserve rows
;
create unique index session.xbPaIx on session.xbPa (db,ts, pa)
                                  include (sta, unl)
;
insert into session.xbPa
with u (db, ts, pa, unl, info) as
(                             -- unloads from TXBC021 and TXBC021S
                              -- decode db and ts from unload DSN
  select substr(earess, 4, 8)
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))
        , partNumber
        , value(eaRess, '')
        , 'u1'
    from BUA.TXBC021 t
    where EYRESS =  5000 and ESRESS =  0
  union all select substr(earess, 4, 8)
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))
        , partNumber
        , value(eaRess, '')
        , 'uS'
    from BUA.TXBC021s t
    where EYRESS =  5000 and ESRESS =  0
                                -- www table from migration
                                -- have no entries in the above tables
                                -- however, Kiran will do an unload|
  union all select t.dbName, t.tsName, p.partition
      , 'XB.' || t.dbName || '.' || t.tsName
             || '.P'|| right('00000' || partition, 5) || '.WWW?llq'
      , 'www'
    from sysibm.sysTables t join sysibm.sysTablePart p
        on t.dbName = p.dbName and t.tsName = p.tsName
    where t.dbName like 'XB%'
        and (t.tsName like '%WWW%' or t.name like '%WWW%')
)
, xt as
(
  select 'BUA' cr,
         ar.eypref || ar.enstorar || sg.segment
         || ar.eykngklass || ar.eykngocc
         || ar.enzeile || ar.enspalte tb
       , sg.partnumber pa
       , stage sta
       , 'xb ' || sg.storageArea || '#' || sg.segment
         || ' ' || strip(objectFamily) || '@' || bu
         || ' ' || char(date(logProdFrom))
         || '-' || char(date(logProdTo)) info
       , row_number() over() rn
    from bua.txbi003 sg -- segement table
      inner join bua.txbc091 ar -- storageareatables table
        on ar.enenter = 0 and ar.eypref = 'XB'
          and ar.enstorar = sg.storagearea
)
, p as
(
  select t.creator cr, t.name tb, t.dbName db, t.tsName ts
         , p.partition pa
    from sysibm.sysTables t join sysibm.sysTablePart p
        on t.dbName = p.dbName and t.tsName = p.tsName
    where t.dbName like 'XB%'
)
, j as
(
  select  value(p.db, u.db, '?' || xt.rn) db
      , value(p.ts, u.ts, '?' || row_number() over ()) ts
      , value(p.pa, u.pa) pa
      , value(p.cr, xt.cr) cr
      , value(p.tb, xt.tb) tb
      , value(xt.sta, case when u.info like '%www%' then 'ww'
                           else null end) sta
      , u.unl
      ,    case when p.db is null then '' else 'd' end
        || case when u.db is null then '' else 'u' end
        || case when xt.cr is null then '' else 'x' end j
      ,    value(' ' || strip(xt.info), '' )
        || value(' ' || strip(u.info), '' ) info
    from p
      full outer join u
        on u.db = p.db and u.ts = p.ts and u.pa = p.pa
      full outer join xt
        on xt.cr = p.cr and xt.tb = p.tb and xt.pa = p.pa
)
select  db, ts, pa
        , max(cr) cr
        , max(tb) tb
        , max(sta) sta
        , max(unl) unl
        , max(j) j
        , max(info) info
                              -- more than one unload per part?
        , case when count(*)  <> 1
               then ', ' || count(*) || ' joins' else '' end err
    from j
    group by db, ts, pa
;
select count(*), count(unl), count(distinct unl)
    from session.xbPa
;
select *
    from session.xbPa
    where err <> ''
    order by db, ts, cr, tb, pa
;
with e as
(
  select db, ts, pa, cr, tb, sta, unl, j, info, substr(
          err                 -- more than one row per part?
                              -- missing in DB2 catalog?
       || case when j not like '%d%' then ', part notin DB2' else '' end
                              -- missing in TXBI003? correct stage?
       || case when j not like '%x%' and (sta is null or sta <> 'ww')
                                     then ', part notin TXBI003'
               when sta is null then ', sta null'
               when sta not in ('RW', 'CL', 'DL', 'UL', 'ww')
                                then  ', bad sta in TXBI003'
               else '' end
       || case when unl is null or unl = '' then
                    case when sta in ('RW', 'CL') then ''
                         else ', no unload in TXBC021?' end
                              -- check unl dsn --------
               when unl not like 'XB.XB%'
               then ', unl not XB.XB% '
               when locate('.', unl, 4) <> 12 then 'unl db len '
               when locate('.', unl, 13) not between 14 and 21
                   then ', unl ts len'
                              -- is part in DSN correct?
               when substr(unl, locate('.', unl, 13), 8)
                 <> '.P' || right('00000' || pa, 5) || '.'
                   then ', pa<>'
                      || substr(unl, locate('.', unl, 13), 8)
               else '' end
       || case when pa < 1 then ', part<1'
               when pa > 200 and sta not in ('UL', 'DL')
                    then ', part>200' else '' end
       || case when pa >
            case db || '.' || left(ts, 7)
                when 'XBDJC001.SDJC004' then 231 --4 ts, 231 minPa
                when 'XBDJC001.SDJC005' then 607 --4 ts, 607 minPa
                when 'XBDJC001.SDJC006' then 601 --4 ts, 601 minPa
                when 'XBDJC001.SDJC007' then 441 --4 ts, 441 minPa
                when 'XBDJC001.SDJC008' then 301 --4 ts, 301 minPa
                when 'XBDJC002.SDJC010' then 321 --4 ts, 321 minPa
                when 'XBDJC002.SDJC011' then 270 --4 ts, 270 minPa
                when 'XBDPM001.SDPM002' then 212 --4 ts, 212 minPa
                when 'XBFC4001.SFC4002' then 501 --4 ts, 501 minPa
                when 'XBFC4001.SFC4003' then 301 --4 ts, 301 minPa
                when 'XBFC4001.SFC4004' then 301 --4 ts, 301 minPa
                when 'XBFC4001.SFC4005' then 336 --4 ts, 336 minPa
                when 'XBFC4001.SFC4006' then 330 --4 ts, 330 minPa
                when 'XBFC4001.SFC4007' then 249 --4 ts, 249 minPa
                when 'XBFC4002.SFC4009' then 281 --4 ts, 281 minPa
                when 'XBFQY002.SFQY002' then 202 --5 ts, 202 minPa
                                        else 200
            end
          then ', part >200/aus' else '' end
       || '  ', 2) err
    from session.xbPa x
)
select db, ts, min(pa) paMin, max(pa) paMax, count(*) cnt
         , cr, tb, info, j, err
    from e
    where err <> ''
    group by db, ts, cr, tb, info, j, err
    order by db, ts, cr, tb, min(pa)
;
select db, ts, min(pa) paMin, max(pa) paMax, count(*) cnt
         , cr, tb, info, j, err
    from session.xbPa
    where sta = 'ww'
    group by db, ts, cr, tb, info, j, err
    order by db, ts, cr, tb, min(pa)
;x;
insert into session.unl
with s as
(                             -- stage & info from TXBI003
  select t.dbName db, t.tsName ts, r.partNumber pa
       , value(r.stage, '') sta
       , 'xb ' || storageArea || '#' || r.segment
         || ' ' || char(date(lastImport))
         || ' ' || strip(objectFamily) || '@' || bu info
    FROM sysibm.systables t
      join  BUA.TXBI003 r     -- storageArea and segment
                              -- are part of tableName
        on substr(t.name, 3, 3) = r.storageArea
          and substr(t.name, 6, 3) = r.segment
          and t.creator = 'BUA'
          and t.name like 'XB%'
)
, e as
(                             -- unloads from TXBC021 and TXBC021S
                              -- decode db and ts from unload DSN
  select substr(earess, 4, 8)  db
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))  ts
        , partNumber pa
        , value(eaRess, '') unl
        , '1' uTb
    from BUA.TXBC021 t
    where EYRESS =  5000 and ESRESS =  0
  union all select substr(earess, 4, 8)  db
        , substr(earess, 13
            , min(8, locate('.', earess || '.', 13) - 13))  ts
        , partNumber pa
        , value(eaRess, '') unl
        , 's' uTb
    from BUA.TXBC021s t
    where EYRESS =  5000 and ESRESS =  0
)
, u (db, ts, pa, sta, unl, info) as
(
  select                        -- join stage and unloads
        value(s.db, e.db) db
      , value(s.ts, e.ts) ts
      , value(s.pa, e.pa) pa
      , s.sta
      , e.unl
      , value(s.info, '') || value(' u=' || e.uTb, '')
    from s full outer join e
      on s.db = e.db and s.ts = e.ts and s.pa = e.pa
                                -- the migration tables %WWW%
                                -- have no entries in the above tables
                                -- however, Kiran will do an unload|
  union all select t.dbName, t.tsName, p.partition, 'ww'
      , 'XB.' || t.dbName || '.' || t.tsName
             || '.P'|| right('00000' || partition, 5) || '.WWW?llq'
      , 'www'
    from sysibm.sysTables t join sysibm.sysTablePart p
        on t.dbName = p.dbName and t.tsName = p.tsName
    where t.dbName like 'XB%'
        and (t.tsName like '%WWW%' or t.name like '%WWW%')
)
select  db, ts, pa
        , min(sta) sta
        , min(unl) unl
        , min(info) info
                              -- more than one unload per part?
        , case when count(*)  <> 1
               then ', ' || count(*) || ' unloads' else '' end err
    from u
    group by db, ts, pa
;
commit
;
--- counts fuer unloads -----------------------------------------------
select count(*) "#parts"
      , count(distinct db || '.' || ts) "#TS"
      , count(distinct db ) "#DB"
      , sum(case when unl is null or unl = '' then 0 else 1 end) "#unl"
      , sum(case when sta = 'ww' then 1 else 0 end) "#www"
    from session.unl
;
with u as
(
   select case when info is null then '---'
               when locate('u=', info) > 0
               then substr(info, locate('u=', info)) else '' end u
       from session.unl
 )
 select count(*), u
     from u
     group by u
;
                              -- check data from TXBI003 and TXBC021*
                              -- check all partitions have metaData
with t as
(
   select db, ts
   from session.unl
   group by db, ts
)
, p as
(
  select dbName db, tsName ts, partition pa
    from sysibm.sysTablePart p join t
        on dbName=db and tsName=ts
)
, e as
(
  select  value(u.db, p.db) db
      , value(u.ts, p.ts) ts
      , value(u.pa, p.pa) pa
      , sta
      ,  substr(err           -- more than one unload per part?
                              -- missing in DB2 catalog?
       || case when p.db is null then ', part notin DB2' else '' end
                              -- missing in TXBI003? correct stage?
       || case when sta is null then ', part notin TXBI003'
               when sta not in ('RW', 'CL', 'DL', 'UL', 'ww')
                                then  ', bad sta in TXBI003'
               else '' end
       || case when unl is null and sta not in ('RW', 'CL')
               then ', no unl in TXBC021%' else '' end
                              -- check unl dsn --------
       || case when unl not like 'XB.XB%'
               then ', unl not XB.XB% ' else '' end
       || case when locate('.', unl, 4) <> 12
                      then 'unl db len ' else '' end
       || case when locate('.', unl, 13) not between 14 and 21
               then ', unl ts len' else '' end
       || case when locate('.', unl, 13) not between 14 and 21
               then ', unl ts len' else '' end
                              -- is part in DSN correct?
       || case when substr(unl, locate('.', unl, 13), 8)
                 <> '.P' || right('00000' || u.pa, 5) || '.'
               then ', pa dsn=' || substr(unl, locate('.', unl, 13), 8)
               else '' end
       || case when p.pa < 1 then ', part<1'
               when p.pa > 200 and sta not in ('UL', 'DL')
                    then ', part>200' else '' end
       || case when p.pa >
            case p.db || '.' || left(p.ts, 7)
                when 'XBDJC001.SDJC004' then 231 --4 ts, 231 minPa
                when 'XBDJC001.SDJC005' then 607 --4 ts, 607 minPa
                when 'XBDJC001.SDJC006' then 601 --4 ts, 601 minPa
                when 'XBDJC001.SDJC007' then 441 --4 ts, 441 minPa
                when 'XBDJC001.SDJC008' then 301 --4 ts, 301 minPa
                when 'XBDJC002.SDJC010' then 321 --4 ts, 321 minPa
                when 'XBDJC002.SDJC011' then 270 --4 ts, 270 minPa
                when 'XBDPM001.SDPM002' then 212 --4 ts, 212 minPa
                when 'XBFC4001.SFC4002' then 501 --4 ts, 501 minPa
                when 'XBFC4001.SFC4003' then 301 --4 ts, 301 minPa
                when 'XBFC4001.SFC4004' then 301 --4 ts, 301 minPa
                when 'XBFC4001.SFC4005' then 336 --4 ts, 336 minPa
                when 'XBFC4001.SFC4006' then 330 --4 ts, 330 minPa
                when 'XBFC4001.SFC4007' then 249 --4 ts, 249 minPa
                when 'XBFC4002.SFC4009' then 281 --4 ts, 281 minPa
                when 'XBFQY002.SFQY002' then 202 --5 ts, 202 minPa
                                        else 200
            end
          then ', part >200/aus' else '' end
       || '  ', 2) err
      , unl, info
    from session.unl u full outer join p
      on u.db = p.db and u.ts = p.ts and u.pa = p.pa
)
select * from e
    where err <> ''
    order by 1, 2, 3
    with ur
;
--- tables from DB XB% missing in TXBI003 -----------------------------
select substr(dbName, 1, 8) db
       , substr(tsName, 1, 8) ts
       , substr(creator, 1, 8) cr
       , name tb
    from sysibm.sysTables t
    where dbName like 'XB%'
         and not exists (select 1 from session.unl u
                            where t.dbName = u.db and t.tsName = u.ts)
    order by 1, 2
;
--- www tables --------------------------------------------------------
select db, ts
    from session.unl
    where sta = 'ww'
    group by db, ts
    order by 1, 2
;x
--- generate partition exception list --------------------------------
select 'when ''' || dbName || '.' || left(name, 7)
        || ''' then ' || max(partitions)
        || ' -- ' || count(*) || ' ts, ' || min(partitions) || ' minPa'
    from sysibm.sysTablespace
    where dbName like 'XB%' and partitions > 200
    group by dbName, left(name, 7)
    order by 1
;
--*** elar NDBS *******************************************************
--- ndbs: neuer Elar Design seit 2013/14 ------------------------------
--- global table fuer Partitionen, stage, segment ---------------------
declare global temporary table session.xbPa
   ( db char(8), ts char(8), pa smallInt, stage char(2), seg char(6)
   ) on commit preserve rows;
create unique index session.ndPaIx on session.ndPa (db,ts, pa)
                                  include (stage, seg)
;
insert into session.ndPa
  select t.dbName, t.tsName
       , r.partNumber, r.stage, r.storageArea || r.segment
    FROM sysibm.systables t
      join  BUA.TXBI003 R
        on substr(t.name, 3, 3) = r.storageArea
          and substr(t.name, 6, 3) = r.segment
  where t.creator = 'BUA'
        and t.name like 'XB%'
;
commit
;
--- counts fuer ndbs --------------------------------------------------
select count(*) "ndbs Parts"
      , count(distinct db || '.' || ts) "ndbs TS's"
      , count(distinct db ) "ndbs DB's"
    from session.ndPa
;
commit
;
--************************************************************
--$$r XB ndbs - falscher stage in TXBI003
--************************************************************
select *
    from session.ndPa
    where stage not in ('RW', 'CL', 'UL', 'DL')
    order by db, ts, pa
 ;
--************************************************************
--$$r XB ndbs - fehlender/falscher stage in TXBI003
--************************************************************
select char(p.dbName, 8) db
      , char(p.tsName, 8) ts
      , smallint(p.partition) part
      , n.stage
      , n.seg
      , int(totalRows) rtsRows
    from sysibm.sysTablePart p
      join sysibm.sysTablespace s
        on  s.dbName = p.dbName and s.name = p.tsName
      left join session.ndPa n
        on  p.dbName = n.db and p.tsName = n.ts and p.partition = n.pa
      left join sysibm.sysTablespaceStats r
        on s.dbid = r.dbid and s.psid = r.psid
            and p.partition = r.partition and s.instance = r.instance
    where p.dbName in (select db from session.ndPa)
        and tsName not like '%WWW%'
        and (n.stage is null
             or stage not in ('RW', 'CL', 'UL', 'DL'))
        and totalRows <> 0 -- ??? temporaer, bis stage DL nachgefuehrt
    order by 1, 2, 3
 ;

commit;
--            ndbs: temporary table für unloads
declare global temporary table session.unl
   ( db char(8), ts char(8), pa smallint, unl char(44), err varChar(30)
   ) on commit preserve rows;
create unique index session.unlIx on session.unl (db,ts, pa)
                                  include (unl)
   ;
insert into session.unl
  with f as
  (
    select substr(earess, 4, 8)  db
          , substr(earess, 13
              , min(8, locate('.', earess || '.', 13) - 13))  ts
          , partNumber pa, eaRess, '1' ptb
      from BUA.TXBC021 t
      where EYRESS =  5000 and ESRESS =  0
    union all select substr(earess, 4, 8)  db
          , substr(earess, 13
              , min(8, locate('.', earess || '.', 13) - 13))  ts
          , partNumber pa, eaRess, 's' ptb
      from BUA.TXBC021s t
      where EYRESS =  5000 and ESRESS =  0
  )
  , g as
  (
    select db, ts, pa, min(eaRess) eaRess, count(*) cnt
          , min(pTb) || '+' || max(pTb) pTb
      from f
      group by db, ts, pa
  )
  select db, ts, pa, eaRess
        , case when earess not like 'XB.XB%'
                      then 'eaRess not XB.XB% ' || pTb
               when locate('.', earess, 4) <> 12
                      then 'eaRess db len ' || pTb
               when locate('.', earess, 13) not between 14 and 21
                      then 'eaRess ts len ' || pTb
               when cnt <> 1 then 'duplicates ' || cnt || ' ' || pTb
               else '' end err
      from g
      with cs
;
commit;

--************************************************************
--$$r XB ndbs - ungueltige Einträge in BUA.TXBC021/S
--************************************************************
select *
    from session.unl
    where err <> ''
    order by db, ts, pa
 ;
--************************************************************
--$$r XB ndbs - fehlende unloads fuer stage UL
--************************************************************
select p.*
    from session.ndPa p
      left join session.unl u
        on p.db = u.db and p.ts = u.ts and p.pa = u.pa
    where stage = 'UL' and u.db is null
    order by db, ts, pa
 ;
--************************************************************
--$$r XB ndbs - nicht katalogisierte Unloads
--************************************************************
select p.db, p.ts, p.pa, p.stage, u.unl
    from session.ndPa p
      join session.unl u
        on p.db = u.db and p.ts = u.ts and p.pa = u.pa
           and p.stage = 'UL'
    where s100447.dslocate(unl) is null
    order by db, ts, pa
 ;

commit;
?????????????????????????????????
with xt as
(
  select t.creator cr, t.name tb, t.dbName db, t.tsName ts
      , sg.*
      , ar.*
    from bua.txbi003 sg -- segement table
      inner join bua.txbc091 ar -- storageareatables table
        on enenter = 0 and ar.eypref = 'XB'
          and ar.enstorar = sg.storagearea
      inner join SYSIBM.SYSTABLES t
          on T.CREATOR = 'BUA'
          and t.name = ar.eypref || ar.enstorar || sg.segment
                     || ar.eykngklass || ar.eykngocc
                     || ar.enzeile || ar.enspalte
          and ar.eyPref     = left(t.name, 2)
          and ar.enstorar   = substr(t.name,  3, 3)
          and sg.segment    = substr(t.name,  6, 3)
          and ar.eykngKlass = substr(t.name,  9, 1)
          and ar.eykngocc   = substr(t.name, 10, 1)
          and ar.enZeile    = substr(t.name, 11, 3)
          and ar.enSpalte   = substr(t.name, 14, 3)
)
, xu as
(
  select u1.eaRess u1, us.earess us, xt.*
    from xt
      left outer JOIN BUA.TXBC021s us
        on us.EADBA = 'XB'||STORAGEAREA||SEGMENT
          AND xt.PARTNUMBER = us.PARTNUMBER
          AND LOCATE(STRIP('.' || strip(TS) || '.'), us.EARESS) > 0
          and us.EYRESS = 5000 AND us.ESRESS= 0
      left outer JOIN BUA.TXBC021 u1
        on u1.EADBA = 'XB'||STORAGEAREA||SEGMENT
          AND xt.PARTNUMBER = u1.PARTNUMBER
          AND LOCATE(STRIP('.' || strip(TS) || '.'), u1.EARESS) > 0
          and u1.EYRESS = 5000 AND u1.ESRESS= 0
)
select count(*) parts, count(distinct tb) tables
       , count(u1) u1, count(us) us, count(distinct us) usDist
    from xu
--  where cr = 'BUA' and tb like 'XBCZR003PS0%'
    where objectFamily = 'gm.best'
;x;
    with ur ;x;
select   ENENTER
     ,   EYPREF
     ,   ENSTORAR
     , count(*)
    from BUA.TXBC091
    where enenter = 0 -- and eypref = 'XB'
    group by enenter, eypref, enstorar
    order by 4 asc
    fetch first 1000 rows only
    with ur
;x;
select count(*), EADBA, partnumber
    from bua.txbc021s
    where EYRESS = 5000 AND ESRESS= 0
    group by  EADBA, partnumber
    order by 1 desc
    fetch first 100 rows only
;x;
select count(*), count(distinct name) type
      from SYSIBM.SYSTABLES t
      where dbname like 'XB%'
      and name not like '%WWW%'
      group by type
;
           1 ENENTER
           2 EYPREF
           3 ENSTORAR
           4 EYKNGKLASS
           5 EYKNGOCC
           6 ENZEILE
           7 ENSPALTE
with s as
(                             -- stage & info from TXBI003
  select t.dbName db, t.tsName ts, r.partNumber pa
       , value(r.stage, '') sta
       , 'xb ' || storageArea || '#' || r.segment
         || ' ' || char(date(lastImport))
         || ' ' || strip(objectFamily) || '@' || bu info
    FROM sysibm.systables t
      join  BUA.TXBI003 r     -- storageArea and segment
                              -- are part of tableName
        on substr(t.name, 3, 3) = r.storageArea
          and substr(t.name, 6, 3) = r.segment
          and t.creator = 'BUA'
          and t.name like 'XB%'
)
select count(distinct db || '.' || ts) from s
    with ur
;
with xt as
(
  SELECT 'BUA' cr,
        T091.EYPREF||T091.ENSTORAR||SEGMENT||EYKNGKLASS||
            EYKNGOCC||ENZEILE||ENSPALTE TB
        , PARTNUMBER PARTNR
        , T091.EYPREF||T091.ENSTORAR||SEGMENT SEG,
        T003.STATUS,STAGE,OBJECTFAMILY, bu, LOGPRODFROM,LOGPRODTO
    FROM BUA.TXBI003 T003
      INNER JOIN BUA.TXBC091 T091 ON ENENTER = 0 AND T091.EYPREF = 'XB'
        AND T091.ENSTORAR = STORAGEAREA
)
select count(distinct tb) from xt
with ur;x;
      inner join SYSIBM.SYSTABLES t
          on T.CREATOR = xt.cr and t.name = xt.tb
    with ur ;x;
select distinct dbName, tsName -- , xt.*
    from xt full outer join
        (select * from SYSIBM.SYSTABLES where dbName like 'XB%') t
      on T.CREATOR = xt.cr and t.name = xt.tb
  -- where objectFamily = 'exab.form.akt.2'
     where t.creator is null
           or (xt.cr is null and not t.name like '%WWW%')
     with ur
;x;
--- sql from tool elarBN to find unload etc......
/* --- find objectFamily = exab.form.akt.2
            year         = 2012
SELECT OBJECTFAMILY,YEAR(LOGPRODTO)
  FROM BUA.TXBI003
 WHERE STORAGEAREA = 'FJ3'
   AND SEGMENT     = '001'
 ; ----------------------------------------------------------------
 */
WITH DSN_INLINE_OPT_HINT
    (CORRELATION_NAME,ACCESS_TYPE,ACCESS_NAME,JOIN_SEQ,JOIN_METHOD) as
(
  VALUES     ('T003', 'INDEX', NULL, 1, NULL) ,
             ('T091', 'INDEX', NULL, 2, 'NLJ'),
             ('SYST', 'INDEX', NULL, 3, 'NLJ'),
             ('SYSC', 'INDEX', NULL, 4, 'NLJ'),
             ('C21A', 'INDEX', NULL, 6, 'NLJ'),
             ('C21B', 'INDEX', 'IXBC021U' ,7, 'NLJ' )
)
, TB_IC AS
(
  SELECT DSNAME DSN,'BUA' CREATOR,SYST.DBNAME,SYST.TSNAME,
        T091.EYPREF||T091.ENSTORAR||SEGMENT||EYKNGKLASS||
            EYKNGOCC||ENZEILE||ENSPALTE TB,PARTNUMBER PARTNR,
        SEGMENT SEGID,STORAGEAREA,
        T091.EYPREF||T091.ENSTORAR||SEGMENT SEG,
        T003.STATUS,STAGE,OBJECTFAMILY,LOGPRODFROM,LOGPRODTO
    FROM BUA.TXBI003 T003
      INNER JOIN BUA.TXBC091 T091 ON ENENTER = 0 AND T091.EYPREF = 'XB'
        AND T091.ENSTORAR = STORAGEAREA
      INNER JOIN SYSIBM.SYSTABLES SYST ON SYST.CREATOR = 'BUA'
        AND SYST.NAME
           = T091.EYPREF||T091.ENSTORAR||SEGMENT||EYKNGKLASS||EYKNGOCC
      LEFT JOIN SYSIBM.SYSCOPY SYSC ON SYSC.DBNAME = SYST.DBNAME
        AND SYSC.TSNAME = SYST.TSNAME AND PARTNUMBER = SYSC.DSNUM
        AND SYSC.ICTYPE = 'F' AND SYSC.OTYPE = 'T'
    WHERE STAGE IN ('RW','CL')
        AND SYSC.TIMESTAMP = (SELECT MAX(TIMESTAMP)
             FROM SYSIBM.SYSCOPY
             WHERE DBNAME = SYST.DBNAME
                 AND TSNAME = SYST.TSNAME
                 AND PARTNUMBER = DSNUM AND ICTYPE = 'F'
                 AND OTYPE = 'T'
             )
)
, Tm21 AS
(
  SELECT OBJECTFAMILY,EARESS,EADBA,STORAGEAREA,SEGMENT SEGID,
        LOGPRODFROM,LOGPRODTO,
        T003.PARTNUMBER PARTNR,T003.STATUS,STAGE,
        T091.EYPREF||T091.ENSTORAR||SEGMENT||EYKNGKLASS||
            EYKNGOCC||ENZEILE||ENSPALTE TB,
        tsName
    FROM BUA.TXBI003 T003
      INNER JOIN BUA.TXBC091 T091 ON ENENTER = 0 AND T091.EYPREF = 'XB'
        AND T091.ENSTORAR = STORAGEAREA
      INNER JOIN SYSIBM.SYSTABLES SYST ON SYST.CREATOR = 'BUA'
        AND SYST.NAME = T091.EYPREF||T091.ENSTORAR||SEGMENT
            ||EYKNGKLASS||EYKNGOCC||ENZEILE||ENSPALTE
      INNER JOIN BUA.TXBC021 C21A ON
            EADBA = 'XB'||STORAGEAREA||SEGMENT
        AND T003.PARTNUMBER = C21A.PARTNUMBER
        AND LOCATE(STRIP(TSNAME), EARESS) > 0
    WHERE EYRESS = 5000 AND ESRESS= 0 AND STAGE IN ('UL','DL')
  UNION ALL select
        OBJECTFAMILY,EARESS,EADBA,STORAGEAREA,SEGMENT SEGID,LOGPRODFROM,
        LOGPRODTO,T003.PARTNUMBER PARTNR,
        T003.STATUS,STAGE,
        T091.EYPREF||T091.ENSTORAR||SEGMENT||EYKNGKLASS
            ||EYKNGOCC||ENZEILE||ENSPALTE TB,
        TSNAME
    FROM BUA.TXBI003 T003
      INNER JOIN BUA.TXBC091 T091 ON ENENTER = 0 AND T091.EYPREF = 'XB'
        AND T091.ENSTORAR = STORAGEAREA
      INNER JOIN SYSIBM.SYSTABLES SYST ON SYST.CREATOR = 'BUA'
        AND SYST.NAME = T091.EYPREF||T091.ENSTORAR||SEGMENT
            ||EYKNGKLASS||EYKNGOCC||ENZEILE||ENSPALTE
      INNER JOIN BUA.TXBC021S C21B ON
            EADBA = 'XB'||STORAGEAREA||SEGMENT
        AND T003.PARTNUMBER = C21B.PARTNUMBER
        AND LOCATE(STRIP(TSNAME), EARESS) > 0
    WHERE EYRESS = 5000 AND ESRESS= 0 AND STAGE IN ('UL','DL')
)
SELECT TB,EARESS DSN,PARTNR,STATUS,STAGE
    FROM T021
    WHERE OBJECTFAMILY = 'exab.form.akt.2     '
        AND 2012 BETWEEN YEAR(LOGPRODFROM) AND YEAR(LOGPRODTO)
        AND SEGID = '001'
UNION ALL SELECT TB,DSN,PARTNR,STATUS,STAGE
    FROM TB_IC
    WHERE OBJECTFAMILY = 'exab.form.akt.2     '
        AND 2012 BETWEEN YEAR(LOGPRODFROM) AND YEAR(LOGPRODTO)
        AND SEGID = '001'
ORDER BY 3,1 DESC WITH UR
--- ohne t091 ==>
WITH DSN_INLINE_OPT_HINT
    (CORRELATION_NAME,ACCESS_TYPE,ACCESS_NAME,JOIN_SEQ,JOIN_METHOD) as
(
  VALUES     ('T003', 'INDEX', NULL, 1, NULL) ,
     --      ('T091', 'INDEX', NULL, 2, 'NLJ'),
             ('SYST', 'INDEX', NULL, 3, 'NLJ'),
             ('SYSC', 'INDEX', NULL, 4, 'NLJ'),
             ('C21A', 'INDEX', NULL, 6, 'NLJ'),
             ('C21B', 'INDEX', 'IXBC021U' ,7, 'NLJ' )
)
, TB_IC AS
(
  SELECT DSNAME DSN,'BUA' CREATOR,SYST.DBNAME,SYST.TSNAME,
        'XB'||STORAGEAREA||SEGMENT||EYKNGKLASS||
            EYKNGOCC||ENZEILE||ENSPALTE TB,PARTNUMBER PARTNR,
        SEGMENT SEGID,STORAGEAREA,
        'XB'||STORAGEAREA||SEGMENT SEG,
        T003.STATUS,STAGE,OBJECTFAMILY,LOGPRODFROM,LOGPRODTO
    FROM BUA.TXBI003 T003
      INNER JOIN SYSIBM.SYSTABLES SYST ON SYST.CREATOR = 'BUA'
        AND SYST.NAME
           = 'XB'||STORAGEAREA||SEGMENT||EYKNGKLASS||EYKNGOCC
      LEFT JOIN SYSIBM.SYSCOPY SYSC ON SYSC.DBNAME = SYST.DBNAME
        AND SYSC.TSNAME = SYST.TSNAME AND PARTNUMBER = SYSC.DSNUM
        AND SYSC.ICTYPE = 'F' AND SYSC.OTYPE = 'T'
    WHERE STAGE IN ('RW','CL')
        AND SYSC.TIMESTAMP = (SELECT MAX(TIMESTAMP)
             FROM SYSIBM.SYSCOPY
             WHERE DBNAME = SYST.DBNAME
                 AND TSNAME = SYST.TSNAME
                 AND PARTNUMBER = DSNUM AND ICTYPE = 'F'
                 AND OTYPE = 'T'
             )
)
, T021 AS
(
  SELECT OBJECTFAMILY,EARESS,EADBA,STORAGEAREA,SEGMENT SEGID,
        LOGPRODFROM,LOGPRODTO,
        T003.PARTNUMBER PARTNR,T003.STATUS,STAGE,
        'XB'||STORAGEAREA||SEGMENT||EYKNGKLASS||
            EYKNGOCC||ENZEILE||ENSPALTE TB,
        tsName
    FROM BUA.TXBI003 T003
      INNER JOIN SYSIBM.SYSTABLES SYST ON SYST.CREATOR = 'BUA'
        AND SYST.NAME = 'XB'||STORAGEAREA||SEGMENT
            ||EYKNGKLASS||EYKNGOCC||ENZEILE||ENSPALTE
      INNER JOIN BUA.TXBC021 C21A ON
            EADBA = 'XB'||STORAGEAREA||SEGMENT
        AND T003.PARTNUMBER = C21A.PARTNUMBER
        AND LOCATE(STRIP(TSNAME), EARESS) > 0
    WHERE EYRESS = 5000 AND ESRESS= 0 AND STAGE IN ('UL','DL')
  UNION ALL select
        OBJECTFAMILY,EARESS,EADBA,STORAGEAREA,SEGMENT SEGID,LOGPRODFROM,
        LOGPRODTO,T003.PARTNUMBER PARTNR,
        T003.STATUS,STAGE,
        'XB'||STORAGEAREA||SEGMENT||EYKNGKLASS
            ||EYKNGOCC||ENZEILE||ENSPALTE TB,
        TSNAME
    FROM BUA.TXBI003 T003
      INNER JOIN SYSIBM.SYSTABLES SYST ON SYST.CREATOR = 'BUA'
        AND SYST.NAME = 'XB'||STORAGEAREA||SEGMENT
            ||EYKNGKLASS||EYKNGOCC||ENZEILE||ENSPALTE
      INNER JOIN BUA.TXBC021S C21B ON
            EADBA = 'XB'||STORAGEAREA||SEGMENT
        AND T003.PARTNUMBER = C21B.PARTNUMBER
        AND LOCATE(STRIP(TSNAME), EARESS) > 0
    WHERE EYRESS = 5000 AND ESRESS= 0 AND STAGE IN ('UL','DL')
)
SELECT TB,EARESS DSN,PARTNR,STATUS,STAGE
    FROM T021
    WHERE OBJECTFAMILY = 'exab.form.akt.2     '
        AND 2012 BETWEEN YEAR(LOGPRODFROM) AND YEAR(LOGPRODTO)
        AND SEGID = '001'
UNION ALL SELECT TB,DSN,PARTNR,STATUS,STAGE
    FROM TB_IC
    WHERE OBJECTFAMILY = 'exab.form.akt.2     '
        AND 2012 BETWEEN YEAR(LOGPRODFROM) AND YEAR(LOGPRODTO)
        AND SEGID = '001'
ORDER BY 3,1 DESC WITH UR
; X;
}¢--- A540769.WK.SQL(XBCOUNT) cre=2015-03-17 mod=2015-03-17-13.38.50 A540769 ---
-- xb: elar test meta data
--    xb tables missing in txbc003
--    bad unloads in txbc021? or unloads missing in txbc003?

--- global table fuer Partitionen, stage, segment --------------------
declare global temporary table session.xbPa
   ( cr char(8), tb char(25), db char(8), ts char(8), pa smallInt
   , stage char(2), seg char(3), stoAr char(3), fam char(25)
   ) on commit preserve rows
;
create unique index session.xbPaIx on session.xbPa (db,ts, pa)
;
insert into session.xbPa
  select t.creator, t.name, t.dbName, t.tsName
       , r.partNumber, r.stage, r.storageArea, r.segment
       , r.objectFamily
    FROM sysibm.systables t
      join  BUA.TXBI003 R
        on t.name between 'XB' || left(r.storageArea, 3)
                               || left(r.segment, 3)
                      and 'XB' || left(r.storageArea, 3)
                               || left(r.segment, 3) || x'FFFFFF'
            and substr(t.name, 3, 3) = r.storageArea
            and substr(t.name, 6, 3) = r.segment
  where t.creator = 'BUA'
        and t.name like 'XB%'
  with cs
;
commit
;
declare global temporary table session.xbUnl
   ( db char(8), ts char(8), pa smallint, unl char(44), sf char(1)
   ) on commit preserve rows;
create unique index session.unlIx on session.xbUnl (db,ts, pa)
                                  include (unl)
   ;
insert into session.xbUnl
    select substr(earess, 4, 8)  db
          , substr(earess, 13
              , min(8, locate('.', earess || '.', 13) - 13))  ts
          , partNumber pa, eaRess, '1'
      from BUA.TXBC021 t
      where EYRESS =  5000 and ESRESS =  0
;
commit
;
insert into session.xbUnl
    select substr(earess, 4, 8)  db
          , substr(earess, 13
              , min(8, locate('.', earess || '.', 13) - 13))  ts
          , partNumber pa, eaRess, 's'
      from BUA.TXBC021s t
      where EYRESS =  5000 and ESRESS =  0
;
commit
;
with e as
(
   select db, ts, pa, sf, unl
         , case when unl not like 'XB.XB%'
                       then 'unl not XB.XB% '
                when locate('.', unl, 4) <> 12
                       then 'unl db len '
                when locate('.', unl, 13) not between 14 and 21
                       then 'unl ts len '
                when locate('.' || db || '.', unl) < 3
                       then 'unl locate .db.'
                when locate('.' || strip(ts) || '.', unl) < 3
                       then 'unl locate .ts.'
                when locate('0' || strip(char(pa)) || '.', unl) < 3
                       then 'unl locate 0pa.'
                when not exists ( select 1
                      from session.xbPa p
                      where p.db = u.db and p.ts = u.ts and p.pa = u.pa
                      ) then 'no xbPa'
                else '' end err
       from session.xbUnl u
)
select db, ts, pa, err
    from e
    where err <> ''
    with ur
;
select char(dbName, 8) db, char(tsName, 8) ts
      , char(strip(creator) || '.' || name, 40) tb
    from sysibm.sysTables t
    where dbName like 'XB%' and not exists ( select 1
         from session.xbPa n
         where t.dbName = n.db and t.tsName = n.ts
         )
    with ur
}¢--- A540769.WK.SQL(XBDDLDRO) cre=2015-09-25 mod=2015-09-25-09.12.12 A540769 ---
$#@                                                                     00001000
$*(   to drop all tablespaces in db=XBDDLCHK                            00010000
              open this member in view                                  00020001
              change ?rop to drop                                       00021001
              and enter WSH as primary command (edit Macro)             00030000
      attention: wsh is case sensitive |                                00031000
$*)                                                                     00040000
$= db = XBDDLCHK                                                        00050000
call sqlConnect DX0G                                                    00060000
$<>                                                                     00070000
$<=¢                                                                    00080000
     select strip(dbName) || '.' || name TS from sysibm.sysTableSpace   00090002
                    where dbName = '$db'                                00100000
$!                                                                      00110000
call sqlSel                                                             00120000
$| $forWith r $@=¢                                                      00130000
    ?rop tablespace $TS ;                                               00140001
    commit;                                                             00141000
    $!                                                                  00150000
$|  call sqlStmts                                                       00150100
    call sqldisConnect                                                  00150200
}¢--- A540769.WK.SQL(XBDDYCHK) cre=2015-12-31 mod=2015-12-15-10.51.18 A540769 ---
$#@
$*( xb year end ddl
        create list of newest tablespaces
        prepare and edit list for ddlcheck afterwards
$*)
$= dbSys = DVBP
call sqlConnect $dbSys
$<>
$>. fEdit('~tmp.sql(xbddychk) ::f')
$<=¢
  select 'ts ' || strip(dbName) || '.' || strip(name)
            || '    -- ' || char(createdTS) txt
    from sysibm.sysTablespace
    where dbName like 'XB%'
        and createdTs > current timestamp - 5 days
    order by createdTs desc
    fetch first 1000 rows only
$!
$@. sqlRdr()
$|
$$ $dbSys
$forWith i $$ $TXT
$#out                                              20151211 13:02:04
}¢--- A540769.WK.SQL(XBDDYJCL) cre=2015-12-24 mod=2015-12-17-08.19.31 A540769 ---
$#@
$*( xb year end ddl
        create jobs to exececute sql in each member
$*)
$= dbSys = DVBP
$= lib   = XB.ELAR.INFRA.FAM.NDBS.WEEK.FINAL.D151125A
say mbrList(qq, $lib) 'members in' $lib
$<>
$>. fEdit('~.tmp.sql(XBDDYJCL) ::f')
$do qx=1 to m.qq.0 $@=¢
    $@ if qx // 50 == 1 then $@=¢
//XBDDLYEA JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
        $!
    $= mbr =- m.qq.qx
//S$qx     EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSTSIN    DD *
    DSN SYSTEM($dbSys)
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT   DD SYSOUT=*
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTERM    DD DUMMY
//SYSIN      DD *
set current sqlid = 'S100447';
//           DD DISP=SHR,
//             DSN=$lib($mbr)
    $!
$#out                                              20151211 12:49:22
}¢--- A540769.WK.SQL(XBRECOV) cre=2014-01-29 mod=2014-02-10-10.26.20 A540769 ---
                  -- elar: stage und unload file name
                  --       für XB Tabellen Partitionen
                  --
                  -- Achtung: Performance ist sehr heikel
                  --       diese Version braucht meist weniger als 1 min
                  --       im Gegensatz zu vielen anderen Versuchen|
                  --
with p as
( select t.creator cr, t.name tb, t.dbName db, t.tsName ts
     , p.partition pa, r.stage, r.status
     ,'XB' || R.STORAGEAREA || R.SEGMENT seg
     , R.objectFamily family
     , R.STORAGEAREA
     , (select max(timestamp) from sysibm.sysCopy c
             where c.dbName = t.dbName and c.tsName = t.tsName
                  and p.partition = c.dsNum and icType = 'F'
       ) lastCopy
   FROM sysibm.systables t
     join sysibm.sysTablePart p
       on t.dbName = p.dbName and t.tsName = p.tsName
     left join  BUA.TXBI003 R
       on t.creator = 'BUA'
         and left(t.name, 8) = 'XB'||STORAGEAREA||SEGMENT
         and p.partition = r.partNumber
)
, u as
(
  select t.*
    from BUA.TXBC021s t
    where EYRESS =  5000
        and ESRESS =  0
  union all select t.*
    from BUA.TXBC021 t
    where EYRESS =  5000
        and ESRESS =  0
)
select char(cr, 8) cr
     , char(tb, 20)  tb
     , char(db, 8) db
     , char(ts, 8) ts
     , smallint(pa) pa
     , substr(strip(stage) || '='
         || case when stage = 'RW' then 'readWri'
                 when stage = 'CL' then 'cLosed'
                 when stage = 'UL' then 'unload'
                 when stage = 'DL' then 'deleted'
                 else '???' end, 1, 10) stage
     , substr(strip(status) || '='
         || case when status = 0 then 'deleted'
                 when status = 1 then 'ReadWri'
                 when status = 2 then 'ReadOnly'
                 when status = 3 then 'locked'
                 when status = 4 then 'deleting'
                 else '???' end, 1, 10) status
     , lastCopy
     , eaRess unload, ETRESS
     , family, storageARea, seg
    from p
      left join u
        on u.eadba = p.seg
            and u.PARTNUMBER = p.pa
             -- tbSpace finden wir NUR im unloadNamen ........
            and locate('.' || strip(db) || '.' || strip(ts) || '.'
                , u.eaRess) > 0
    where -- storageArea = 'F9F'
          db = 'XBD2R001'
       -- tb = 'XBF9F003PS001001'
       -- seg = 'XBF9F003'
       -- family = 'devi.if'
       -- and stage  in ('UL', 'DL')
    order by tb, pa
    with ur
}¢--- A540769.WK.SQL(XBREDO) cre=2015-12-07 mod=2015-12-16-09.15.03 A540769 ----
set current path oa1p;
set current application compatibility 'V11R1';
with q as
(
  select qq.*
        , case when posStr(lgRnRecLoad, 'unlTst<lastEq') < 1 then ''
               when lastEq < unlTst + 30 minutes then ' leq<30min'
               when lastEq < '2014-07-23-00.00.00' then ' leq<2014'
               else '' end leqTxt
      from oa1p.vQz005RecovDeltaLoadLgRn qq
      where db like 'XB%' -- and db = 'XBDL1001'
)
, r as
(
  select db, ts, pa
        , max(value(pSpc, 0), value(rSpc, 0), 0) * 1024.0 spc
        , stage
        , case when stage not in ('-r', '-w', 'CL', 'DL', 'RW', 'UL')
                   then 'fixMeta'
               when stage in ('UL', 'DL')
                   and substr(lgRnRecLoad, 1, 1) <> 'l'
                   and lgRnRecLoad not in ('r ok:F=fulCopy ok'
                         ,'r ok:F=fulCopy ok lgRnNone')
                   and not ( leqTxt <> '' and lgRnRecLoad in
                         ('? unlTst<lastEq'
                         ,'? unlTst<lastEq lgRnNone') )
                   then 'redoUnl'
               when substr(lgRnRecLoad, 1, 1) not in ('r', 'l')
                   and not ( leqTxt <> '' and lgRnRecLoad in
                         ('? unlTst<lastEq'
                         ,'? unlTst<lastEq lgRnNone') )
                   then 'recErr' else '' end  redo
        , lgRnRecLoad || ' ' || leqTxt recoveryState
        , staUpd
        , unlTst
        , lastEq
      from q
)
select substr(fosFmtE7(sum(spc))
                 ¨¨ right('       ' ¨¨ count(*), 8), 1, 15)
                   "spaceBy   count"
        , redo
        , stage
        , substr(recoverySTate, 1, 70) recoveryState
        , min(unlTst) unlFrom
        , max(unlTst) unlTo
        , min(staUpd) staFrom
        , max(staUpd) staTo
    from r
    group by grouping sets ((), (redo)
          , (redo, stage, recoveryState) )
       order by 2, 3, 4
   --  order by sum(spc) desc, 2, 3, 4
;
with q as
(
  select qq.*
        , case when posStr(lgRnRecLoad, 'unlTst<lastEq') < 1 then ''
               when lastEq < unlTst + 30 minutes then ' leq<30min'
               when lastEq < '2014-07-23-00.00.00' then ' leq<2014'
               else '' end leqTxt
      from oa1p.vQz005RecovDeltaLoadLgRn qq
      where db like 'XB%' -- and db = 'XBDL1001'
)
, r as
(
  select db, ts, pa
        , max(value(pSpc, 0), value(rSpc, 0), 0) * 1024.0 spc
        , stage
        , case when stage not in ('-r', '-w', 'CL', 'DL', 'RW', 'UL')
                   then 'fixMeta'
               when stage in ('UL', 'DL')
                   and substr(lgRnRecLoad, 1, 1) <> 'l'
                   and lgRnRecLoad not in ('r ok:F=fulCopy ok'
                         ,'r ok:F=fulCopy ok lgRnNone')
                   and not ( leqTxt <> '' and lgRnRecLoad in
                         ('? unlTst<lastEq'
                         ,'? unlTst<lastEq lgRnNone') )
                   then 'redoUnl'
               when substr(lgRnRecLoad, 1, 1) not in ('r', 'l')
                   and not ( leqTxt <> '' and lgRnRecLoad in
                         ('? unlTst<lastEq'
                         ,'? unlTst<lastEq lgRnNone') )
                   then 'recErr' else '' end  redo
        , lgRnRecLoad || ' ' || leqTxt recoveryState
        , staUpd
        , unlTst
        , lastEq
      from q
)
select substr(db, 1, 8) db
      , substr(ts, 1, 8) ts
      , smallint(pa) pa
      , redo
      , stage
      , substr(fosFmtE7(spc), 1, 7) spcBy
      , substr(recoveryState, 1, 60) recoveryState
      , staUpd
      , unlTst
      , lastEq
    from r
    where redo not in ('', 'recErr')
    order by redo, 1, 2, 3
;
}¢--- A540769.WK.SQL(XBREPSPC) cre=2016-10-12 mod=2016-10-12-14.32.56 A540769 ---
$#=
$>. fedit('::v')
$<=¢
table              old  new1 new2 column      valueLess    $!
$<dsn.dbadm.texv(XB06101C)
$@ call sqlConnect dvbp
$*( ******************************************************

    count parts and needed space

    usage: adapt input above and enter wsh on commandline

    output: first line total, then figurs for each partition
        spc = db2 vsam space
        unl = estimate for unloads (using pageSave)
              multiply by 2 to be on the save side|

    input: first 2 words on each line (separated by spaces or tab chars)
           (same as for xbRepEmp or xbRepa)
        table:     tablename (without creator)
        old:       old partition number

    e.g.
table              old  new1 new2    ...
XBDPM027IT002001 102 110 111 EA1STRN ...

12.10.16 Walter
*******************************************************$*)
$@. csvWordRdr( , 'u')
$|
set current application compatibility 'V11R1';
set current path oa1p;
select substr(t.name, 1, 20) bt
      , smallint(p.partition) part
      , count(*) count
      , fqzfmtBin7(sum(1024.0
                * max(0, value(p.spaceF, 0)
                     , value(real(r.nActive) * s.pgSize, 0)))) spc
      , fqzfmtBin7(sum(1024.0
                * max(0, value(p.spaceF, 0)
                     , value(real(r.nActive) * s.pgSize, 0))
                * 100 / max(1, 100-value(p.pageSave, 0)))) unl

    from sysibm.sysTables t
      join sysibm.sysTablespace s
        on t.dbName = s.dbName and t.tsName = s.name
      join sysibm.sysTablePart p
        on t.dbName = p.dbName and t.tsName = p.tsname
      left join sysibm.sysTablespaceStats r
        on r.dbid = s.dbid and r.psid = s.psid
             and r.partition = p.partition
    where
      (1=0
$@ tbs = ''
$forWith $@=¢
        or (t.name = '$TABLE' and p.partition = $OLD)
        $@ if wordPos($TABLE, tbs) < 1 then tbs = tbs $TABLE
    $!
      )
      and t.name in ( 'dummyDoesNotExits'
$do tx=1 to words(tbs) $@=¢
                    , '$-¢word(tbs, tx)$!'
    $!
                    )
    group by grouping sets ((t.name, p.partition), ())
    order by value(t.name, ''), p.partition
$| $@ call sqlStmts , , , , 's'
$#out                                              20161012 14:21:21
$#out                                              20161012 14:15:37
$#out                                              20161012 14:08:44
$#out                                              20161012 14:07:13
$#out                                              20161012 14:05:52
$#out                                              20161012 14:04:35
$#out
}¢--- A540769.WK.SQL(XBUNL) cre=2016-09-30 mod=2016-10-03-14.13.48 A540769 -----
//A540769X JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M,                                    00030000
//         SCHENV=DB2,CLASS=M1                                          00040000
//*
//S1       EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,                      00020001
//             PARM='%WSH'
//*           PARM='%WSH t all all'
//SYSPROC   DD DSN=DSN.DB2.EXEC,DISP=SHR
//SYSPRINT  DD SYSOUT=*
//SYSUDUMP  DD SYSOUT=*
//SYSTSPRT  DD SYSOUT=*
//SYSTSIN   DD DUMMY
//OUT       DD DISP=SHR,DSN=A540769.WK.TEXW(XBUNL2)
//WSH       DD *
$#@
$=mode= 1
if $mode == 1 then $@:¢
    stagePred = stage <> '-w'
    uPref     = XB.
    uMask     = XB.XB*.**
$!  else if $mode == 2 then $@:¢
    stagePred = stage =  '-w'
    uPref     = XB.MIG.U.
    uMask     = XB.MIG.U
    $!
say 'mode='$mode 'stagePred' $stagePred 'unlPref' $uPref
$= p2 =- length($uPref)
$= l2 =- length($uPref) + 18
call csiOpen csi, $uMask
$=cx=0
$<>
$<=¢
select *
    from OA1P.TQZ005TECSVUNLOAD
    where pa > 0 and unl <> ''
        and $stagePred
    order by cast(db || '.' || ts as char(17) ccsid ebcdic), pa
$!
call sqlConnect dvbp
call sqlQuery 3, in2str()
$=fx=0
$<>
$@csi
$@fet
m.punKeep = ''
$do lx=1 to 1e99 while m.cc \== '' & m.ff.db \== 'ff'x $@¢
    if $cDb = m.ff.db then
        if $cTs = m.ff.ts then
            if $cPa = m.ff.pa then
                cmp = 1
            else
                cmp = 2 * ($cPa > m.ff.pa)
        else
            cmp = 2 * ($cTs > m.ff.ts)
    else
        cmp = 2 * ($cDb > m.ff.db)
    cmp = cmp - 1
    if lx // 1000 = 0 then
        say right(cmp, 2) 'c'$cx $cDb $cTs $cPa,
           '<=> f'$fx m.ff.db m.ff.ts m.ff.pa 'pun' m.punKeep
    if cmp == -1 then $@¢
        $$- 'dsn not in stageTable' m.cc m.punKeep
        m.punKeep = ''
    $! else if cmp == 1 then $@¢
        $$- 'missing unl for stage' m.ff.unl m.ff.pun $*+
            m.ff.stage m.ff.db'.'m.ff.ts'#'m.ff.pa
    $! else if cmp == 0 then $@¢
        px = wordPos(strip(m.ff.pun), m.punKeep)
        if px < 1 then
            $$- 'punch not found      ' m.ff.pun 'keep' m.punKeep
        else
            m.punKeep = strip(delWord(m.punKeep, px, 1))
        if m.punKeep <> '' then
            $$- 'punch not in stage   ' m.ff.unl m.punKeep
        m.punKeep = ''
        $!
    if cmp <= 0 then
        $@csi
    if cmp >= 0 then
        $@fet
    $!

$proc $@/csi/
    $do while csiNext(csi, cc) $@¢
        $=cx=- $cx + 1
        if \ abbrev(m.cc, $uPref) then
            call err 'unload does not start with uPref' m.cc
        xTs = pos('.', m.cc, $p2+1)
        xPa = pos('.', m.cc, xTs+1)
        xNx = pos('.', m.cc, xPa+1)
        if xTs <= 0 | xPa <= 0 | xNx <= 0 then
             er = 'bad unload missing dots' m.cc
        else if substr(m.cc, xPa, 2) \== '.P' then
             er = 'bad unload bad part' m.cc
        else do
            yPa = substr(m.cc, xPa+2, xNx-xPa-2)
            if \ dataType(yPa, 'n') then
                yPa = substr(yPa, 2)
            if dataType(yPa, 'n') then
                er = ''
            else
                er = 'bad unload bad part not numeric' m.cc
            end
        if er <> '' then do
            $$- er
            iterate
            end
        if substr(m.cc, xNx) = '.SYSPCH' then do
            m.punKeep = m.punKeep m.cc
            iterate
            end
        $= cDb =- substr(m.cc, $p2+ 1, xTs-$p2-1)
        $= cTs =- substr(m.cc, xTs+1, xPa-xTs-1)
        $= cPa =- yPa
        return
    $!
    m.cc = ''
    $= cDb =- 'ff'x
$/csi/

$proc $@/fet/
    if sqlFetch(3, ff) then
        $=fx=- $fx + 1
    else
        m.ff.db = 'ff'x
$/fet/
}¢--- A540769.WK.SQL(XBUNLDEC) cre=2014-01-31 mod=2014-02-03-11.04.07 A540769 ---
--- ndbs: neuer Elar Design seit 2013/14 ------------------------------
--- global table fuer Partitionen, stage, segment ---------------------
declare global temporary table session.ndPa
   ( db char(8), ts char(8), pa smallInt, stage char(2), seg char(6)
   ) on commit preserve rows;
create unique index session.ndPaIx on session.ndPa (db,ts, pa)
                                  include (stage, seg)
   ;
insert into session.ndPa
  select t.dbName, t.tsName
       , r.partNumber, r.stage, r.storageArea || r.segment
    FROM sysibm.systables t
      join  BUA.TXBI003 R
        on substr(t.name, 3, 3) = r.storageArea
          and substr(t.name, 6, 3) = r.segment
  where t.creator = 'BUA'
        and t.name like 'XB%'
 ;
--- counts fuer ndbs --------------------------------------------------
select count(*) "ndbs Parts"
      , count(distinct db || '.' || ts) "ndbs TS's"
      , count(distinct db ) "ndbs DB's"
    from session.ndPa
;
--$$ XB - ndbs: falscher stage in TXBI003
select *
    from session.ndPa
    where stage not in ('RW', 'CL', 'UL', 'DL')
    order by db, ts, pa
 ;
--- temporary table fuer syscopy -------------------------------------
declare global temporary table session.copy
   ( db char(8), ts char(8), paFr smallInt, paTo smallInt
      , dsNum smallInt, icType char(1), tst timestamp
   ) on commit preserve rows;
create unique index session.txIx on session.copy (db,ts, paFr, paTo)
                                  include (dsNum, icType, tst)
   ;
insert into session.copy
with l as
(
  select c.dbName db, c.tsName ts, c.dsNum, c.icType, c.timestamp tst
      , case when s.partitions = 0 then 0
             when c.lowDsNum <= 0 then c.dsNum
             when c.highDsNum <= 0 then c.dsNum
             else c.lowDsNum
        end paFr
      , case when s.partitions = 0 then 0
             when c.lowDsNum <= 0 then c.dsNum
             when c.highDsNum <= 0 then c.dsNum
             else c.highDsNum
        end paTo
         from sysibm.sysCopy c
         join sysibm.sysTableSpace s
           on c.dbName = s.dbName and c.tsName = s.name
    where ICTYPE IN ('C', 'F', 'S', 'W', 'Y')
         or (ICTYPE = 'A' and sType = 'A') -- part added
)
, g as
(
  select db, ts, paFr, paTo
      , max(char(tst) || ictype || dsNum) last
    from l
    group by db, ts, paFr, paTo
)
select db, ts, paFr, paTo
      , smallInt(substr(last, 28)) dsNum
      , substr(last, 27, 1) icType
      , timestamp(substr(last, 1, 26)) tst
    from g
;
select count(*) "copy count"
      , count(distinct db || '.' || ts) "copy TS's"
      , count(distinct db ) "copy DB's"
    from session.copy
;
--$$ XB - fehlende fullcopies / recoverybase
with l as
(
select p.*
      , ( select max(char(tst) || icType || char(dsNum))
            from session.copy c
            where p.db = c.db and p.ts = c.ts
                and (p.pa between c.paFr and c.paTo
                     or c.paFr = 0)
        ) last
    from session.ndPa p
    where stage not in ('UL', 'DL')
)
, m as
(
  select l.*
      , substr(last, 27, 1) ty
      , smallint(substr(last, 28)) dsNum
      , timestamp(substr(last, 1, 26)) tst
    from l
)
select db, ts, pa, stage, ty, dsNum, tst
    from m
    where ty is null or not
        ((ty = 'F' and tst > current timestamp - 172 hours)
        or (ty in ('C', 'A') and tst > current timestamp - 24 hours))
    order by 1, 2, 3
    with ur
;
?????
select *
    FROM SYSIBM.SYSCOPY
    WHERE LOWDSNUM = 58
    with ur
;;;
select count(*), icType, dsNum, LOWdsNum, HIGHdsNum
    FROM SYSIBM.SYSCOPY
    WHERE LOWdsNum <> DSNUM OR HIGHdsNum <> DSNUM
    GROUP BY icType, dsNum, LOWdsNum, HIGHdsNum
    ORDER by 1 desc
    with ur
;;;;
 ; x;
 select count(*)
     from sysibm.sysTables t
     where t.dbName in (select db from session.ts)
;
 select count(*)
     from sysibm.sysTables t
     where t.dbName in (select db from session.ts)
     and not exists (select 1 from session.ts x
          where t.dbName = x.db and t.tsName = x.ts)
;
 select char(creator, 8), char(name, 20)
 , char(dbName, 8), char(tsName, 8)
     from sysibm.sysTables t
     where t.dbName in (select db from session.ts)
     and not exists (select 1 from session.ts x
          where t.dbName = x.db and t.tsName = x.ts)
 fetch first 100 rows only
;
 select sum(case when p.dbName is not null and x.db is not null
                 then 1 else 0 end) both
     ,  sum(case when p.dbName is not null and x.db is null
                 then 1 else 0 end) sysOnly
     ,  sum(case when p.dbName is null and x.db is not null
                 then 1 else 0 end) xOnly
     from (select * from sysibm.sysTablePart
               where (dbName, tsName) in
                  (select db, ts from session.ts) ) p
     full join session.ts x
     on p.dbName = x.db and p.tsName = x.ts and p.partition = x.pa
;
 select db, ts, pa
     from (select * from sysibm.sysTablePart
               where (dbName, tsName) in
                  (select db, ts from session.ts) ) p
     full join session.ts x
     on p.dbName = x.db and p.tsName = x.ts and p.partition = x.pa
     where p.dbName is null
     fetch first 100 rows only
;
 select dbName, tsName, partition
     from (select * from sysibm.sysTablePart
               where (dbName, tsName) in
                  (select db, ts from session.ts) ) p
     full join session.ts x
     on p.dbName = x.db and p.tsName = x.ts and p.partition = x.pa
     where x.db is null
     fetch first 100 rows only
;x;
     and not exists (select 1 from session.ts x
          where s.dbName = x.db and s.Name = x.ts)
;
 ;x;
declare global temporary table session.unl
   ( db char(8), ts char(8), pa smallint, unl char(44)
   ) on commit preserve rows;
create unique index session.unlIx on session.unl (db,ts, pa)
                                  include (unl)
   ;
insert into session.unl
    select substr(earess, 4, 8), substr(earess, 13, 8), partNumber
        , case when earess not like 'XB.XB%' then
                 raise_error(77001, 'bad eaRess % ' || earess)
               when locate('.', earess, 4) <> 12 then
                 raise_error(77002, 'bad eaRess 2. . ' || earess)
               when locate('.', earess, 13) <> 21 then
                 raise_error(77002, 'bad eaRess 3. . ' || earess)
               else eaRess
          end
      from BUA.TXBC021  t
      where EYRESS =  5000
          and ESRESS =  0
      with cs
;
commit
;
insert into session.unl
    select substr(earess, 4, 8), substr(earess, 13, 8), partNumber
        , case when earess not like 'XB.XB%' then
                 raise_error(77001, 'bad eaRess % ' || earess)
               when locate('.', earess, 4) <> 12 then
                 raise_error(77002, 'bad eaRess 2. . ' || earess)
               when locate('.', earess, 13) <> 21 then
                 raise_error(77002, 'bad eaRess 3. . ' || earess)
               else eaRess
          end
      from BUA.TXBC021s t
      where EYRESS =  5000
          and ESRESS =  0
      with cs
;
commit
;
select count(*) from session.unl
;
select current timestamp, current server from sysibm.sysDummy1;
                  -- elar: stage und unload file name
                  --       für XB Tabellen Partitionen
                  --
                  -- Achtung: Performance ist sehr heikel
                  --       diese Version braucht meist weniger als 1 min
                  --       im Gegensatz zu vielen anderen Versuchen|
                  --
with p as
( select t.creator cr, t.name tb, t.dbName db, t.tsName ts
     , p.partition pa, r.stage, r.status
     ,'XB' || R.STORAGEAREA || R.SEGMENT seg
     , R.objectFamily family
     , R.STORAGEAREA
     , case when r.stage is null then 'no TXBI003'
            when r.stage = 'UL' then 'unlo'
            else                     'copy'  end flag1
   FROM sysibm.systables t
     join sysibm.sysTablePart p
       on t.dbName = p.dbName and t.tsName = p.tsName
     left join  BUA.TXBI003 R
       on t.creator = 'BUA'
         and t.name like 'XB%'
         and substr(t.name, 3, 3) = r.storageArea
         and substr(t.name, 6, 3) = r.segment
         and p.partition = r.partNumber
)
, r as
(
   select p.*
     , case when flag1 = 'unlo' then
       (
       select unl from session.unl u
           where p.db = u.db and p.ts = u.ts and p.pa = u.pa
       )
       when flag1 = 'copy' then
       ( select dsName
           from sysibm.sysCopy c
             where c.dbName = p.db and c.tsName = p.ts
                  and p.pa = c.dsNum and icType = 'F'
                  and timestamp > current timestamp - 10 days
             order by timestamp desc
             fetch first 1 row only
        )
       else null
       end ucDsn
     from p
)
, o as
(
   select case when flag1 like 'no %' then flag1
               when ucDsn is null then char('no ' || flag1, 7)
               when S100447.DSLOCATE(ucDsn) IS NULL
                                  then char('noCat ' || flag1, 10)
               else char(flag1 || ' ok', 7)
          end  flag2
         , r.*
     from r
  -- fetch first 10000 rows only
)
select flag2, count(*)
    from o
    group by flag2
    with ur
;
select current timestamp, current server from sysibm.sysDummy1;
;XX
select count(*) , min(eaRess), max(earess)
  from BUA.TXBC021  t
  where EYRESS =  5000
      and ESRESS =  0
      and earess like '%WWW%'
;x;
union all select t.*
  from BUA.TXBC021 t
  where EYRESS =  5000
      and ESRESS =  0
}¢--- A540769.WK.SQL(XB11) cre=2014-09-22 mod=2014-09-22-16.56.54 A540769 ------
select t.dbName, t.tsName
     , r.partNumber, r.stage, r.storageArea || r.segment
  FROM sysibm.systables t
    join  BUA.TXBI003 R
      on substr(t.name, 3, 3) = r.storageArea
        and substr(t.name, 6, 3) = r.segment
where t.creator = 'BUA'
      and t.name like 'XB%'
      and t.dbName = 'XBDJC002' and t.tsNmae = 'SDJC012H'
}¢--- A540769.WK.SQL(XB111) cre=2012-07-12 mod=2012-07-12-14.28.26 A540769 -----
select d1.*, d8.*
    from
(select EYPREF || ENSTORAR || ENSEG db, count(*)
    from bua.txbc111
    group by EYPREF || ENSTORAR || ENSEG ) d1
FULL outer join
  ( select t.dbName db, count(*)
        from bua.txbc181 x8
          left outer join sysibm.systables t
          on   XBC181_CREATOR = t.creator
           and XBC181_TABNAME = t.name
        group by t.dbName
  ) d8
  on d1.db = d8.db
}¢--- A540769.WK.SQL(XB16) cre=2016-04-30 mod=2016-04-30-20.10.46 A540769 ------
select substr(db, 1, 8) "db"
      , substr(ts, 1, 8) "ts"
      , substr(tsTy
          || case when tsClone = 'N' and inst=1 and tsInst=1 then ''
                  else case when inst=tsInst then 'b' else 'c' end
                      || inst end, 1, 3) "yci"
      , substr(ix, max(1, length(ix) - 7), 8) "...index"
      , substr(case when part = 0 and tsParts = 0 then ''
            else case when part is null                 then ' ---'
                      when part = 0 and ix <> ' --ts--' then ' npi'
                      when part = 0 and tsTy = 'G'      then ' pbg'
                      when part = 0                     then ' ???'
                      else right('   ' || part, 4)
                 end
             ||'/'|| value(right('   '|| tsParts, 4),'----')
            end, 1, 9) "part/ tot"
      , substr(right(case when actGB < 1000
                         then '    ' || dec(round(actGb, 2), 6, 2)
                         else '    ' || int(round(actGb, 0))
                     end, 7), 1, 7) "usedGB"
      , substr(right(case when limGb/100*schwelle < 1000
              then '    ' || dec(round(limGb/100*schwelle, 2), 6, 2)
              else '    ' || int(round(limGb/100*schwelle, 0))
                     end, 7), 1, 7) "schwGB"
      , substr(right('     ' || schwelle, 5), 1, 5) "schw%"
      , substr(right('      ' || int(round(limGb)), 6), 1, 6) "limGB"
      , date(validBegin) "lastValid"
      , substr(schwinfo, 23, 18) "schwellwert key"
      , g.*
    from OA1P.vQZ006GbGrenze g
    where db <> 'DSNDB01'  -- directory ist anders
        and rz = 'RZ2' and dbSys = 'DVBP'
        and actGb > 14
        and db like 'XB%'
    --  and TS = 'A111A03'
   --   and updStats > '2014-11-15-00.00.00'
   --   and db like 'XC%'  --  and ts like 'A515%'
   --       db = 'QZ01A1P' --and ts = 'A112A'
   --       db = 'RP03A1P'  and ts = 'A307A'
    order by db, ts, inst,  part, ix -- actGb desc, part, ix
    fetch first 100 rows only
    ;x;
    order by actGb desc
;
--
-- db         = Datenbank
-- ts         = Tablespace
-- yci        = ts type oder s=Segmented,i=Simple p=PartitionedClassic,
--              clone und Instance (falls geKlont)
-- part/ tot  = betroffene PartitionsNummer / Total Partitonen des ts
-- ...index   = index oder --ts--
-- usedGB     = aktuelle benutzter Platz in GB
-- schwGB     = Schwellwert in GB
-- schw%      = Schwellwert in Prozent der Limite
-- limGB      = physische Limite in GB
-- lastUpdate = letzter update aus RealTimeStats
-- Schwellwert key = key des Schwellwerts in oa1p.tqz008GbGrSchwelle
}¢--- A540769.WK.SQL(XB16B) cre=2016-05-01 mod=2016-05-02-06.05.08 A540769 -----
set current path oa1p;
with o as
(
  select rz, dbSys, dbName db, name ts, partition pa, instance inst
    from OA1P.tQZ006GbGrTsStats
    where dbName <> 'DSNDB01'  -- directory ist anders
        and rz = 'RZ2' and dbSys = 'DVBP'
        and nPages * pgSize  > 12 * 1024 * 1024
        and dbName like 'XBF%'
    --  and TS = 'A111A03'
        and validEnd > '2016-04-30-12.00.00'
    group by rz, dbSys, dbName, name, partition, instance
)
, a as
(
  select r.*
    from OA1P.tQZ006GbGrTsStats r join o a
        on r.rz = a.rz and r.dbSys = a.dbSys and r.dbName = a.db
          and r.name = a.ts and r.partition = a.pa
          and r.instance = a.inst
          and r.validEnd > '2016-04-30-12.00.00'
)
, r as
(
  select a.*
     , row_number() over
         (partition by rz, dbSys, dbName, name, partition, instance
            order by validEnd) rA
     , row_number() over
         (partition by rz, dbSys, dbName, name, partition, instance
            order by validEnd desc) rD
    from a
)
select substr(A.dbName, 1, 8) db
     , substr(A.name, 1, 8) ts
     , smallint(A.partition) pa
     , smallint(a.instance) inst
     , substr(fqzFmtBin7(real(A.nPages) * A.pgSize * 1024),1,7) usedOld
     , case when real(A.nPages) * A.pgSize  < real(d.nPages) * d.pgSize
           then '<' else '' end "?"
     , substr(fqzFmtBin7(real(D.nPages) * D.pgSize * 1024),1,7) usedNew
     , D.reorgLastTime
     , A.validbegin beginOld
     , A.nPages     pageO
     , A.pgSize     sizeO
     , D.validbegin beginNew
     , D.nPages     pageN
     , D.pgSize     sizeN
     , D.lastDataChange lastDataChangeNew
    from r a join r d
      on a.rA = 1 and d.rD = 1
        and a.rz = d.rz and a.dbSys = d.dbSys
        and a.dbName = d.dbName and a.name = d.name
        and a.partition = d.partition and a.instance = d.instance
    order by D.nPages * D.pgSize desc
;x;
select substr(db, 1, 8) "db"
      , substr(ts, 1, 8) "ts"
      , substr(tsTy
          || case when tsClone = 'N' and inst=1 and tsInst=1 then ''
                  else case when inst=tsInst then 'b' else 'c' end
                      || inst end, 1, 3) "yci"
      , substr(ix, max(1, length(ix) - 7), 8) "...index"
      , substr(case when part = 0 and tsParts = 0 then ''
            else case when part is null                 then ' ---'
                      when part = 0 and ix <> ' --ts--' then ' npi'
                      when part = 0 and tsTy = 'G'      then ' pbg'
                      when part = 0                     then ' ???'
                      else right('   ' || part, 4)
                 end
             ||'/'|| value(right('   '|| tsParts, 4),'----')
            end, 1, 9) "part/ tot"
      , substr(right(case when actGB < 1000
                         then '    ' || dec(round(actGb, 2), 6, 2)
                         else '    ' || int(round(actGb, 0))
                     end, 7), 1, 7) "usedGB"
      , substr(right(case when limGb/100*schwelle < 1000
              then '    ' || dec(round(limGb/100*schwelle, 2), 6, 2)
              else '    ' || int(round(limGb/100*schwelle, 0))
                     end, 7), 1, 7) "schwGB"
      , substr(right('     ' || schwelle, 5), 1, 5) "schw%"
      , substr(right('      ' || int(round(limGb)), 6), 1, 6) "limGB"
      , date(validBegin) "lastValid"
      , substr(schwinfo, 23, 18) "schwellwert key"
      , g.*
    from OA1P.vQZ006GbGrenze g
    where db <> 'DSNDB01'  -- directory ist anders
        and rz = 'RZ2' and dbSys = 'DVBP'
        and actGb > 14
        and db like 'XB%'
    --  and TS = 'A111A03'
   --   and updStats > '2014-11-15-00.00.00'
   --   and db like 'XC%'  --  and ts like 'A515%'
   --       db = 'QZ01A1P' --and ts = 'A112A'
   --       db = 'RP03A1P'  and ts = 'A307A'
    order by db, ts, inst,  part, ix -- actGb desc, part, ix
    fetch first 100 rows only
    ;x;
    order by actGb desc
;
--
-- db         = Datenbank
-- ts         = Tablespace
-- yci        = ts type oder s=Segmented,i=Simple p=PartitionedClassic,
--              clone und Instance (falls geKlont)
-- part/ tot  = betroffene PartitionsNummer / Total Partitonen des ts
-- ...index   = index oder --ts--
-- usedGB     = aktuelle benutzter Platz in GB
-- schwGB     = Schwellwert in GB
-- schw%      = Schwellwert in Prozent der Limite
-- limGB      = physische Limite in GB
-- lastUpdate = letzter update aus RealTimeStats
-- Schwellwert key = key des Schwellwerts in oa1p.tqz008GbGrSchwelle
}¢--- A540769.WK.SQL(XB16STAT) cre=2016-05-03 mod=2016-05-03-16.32.38 A540769 ---
set current path oa1p;
with g as
(
  select count(*) parts
      , sum(real(nActive) * pgSize * 1024) usedSum
      , min(real(nActive) * pgSize * 1024) usedMin
      , max(real(nActive) * pgSize * 1024) usedMax
    from oa1p.TQZ006GBGRTSSTATS
    where rz = 'RZ2' and dbSys = 'DVBP' and dbName like 'XB%'
        and validBegin <= current timestamp
        and validEnd   >  current timestamp
    group by floor(real(nActive) * pgSize / 1024 / 1024)
)
select parts
  , substr(fqzFmtBin7(usedSum), 1, 7) usedSum
  , sum(parts) over(order by usedMax desc) partCum
  , substr(fqzFmtBin7(sum(usedSum) over(order by usedMax desc)
          ), 1, 7) usedCum
  , substr(fqzFmtBin7(usedMin), 1, 7) usedMin
  , substr(fqzFmtBin7(usedMax), 1, 7) usedMax
from g
}¢--- A540769.WK.SQL(XB21) cre=2014-09-22 mod=2014-09-23-07.58.37 A540769 ------
     -- table Space und Details für 1 StichDatum
set current path oa1p;
with t2 as
(
   select rz, dbSys, dbName, name, instance, partition
       , max(loadTs) loadTs
       , max(case when loadTs <    '2014-09-15-00.00.00'
                  then loadTs else '0001-01-01-00.00.00' end) loadFP
     from oa1p.tqz006GbGrTsSTats
    where rz = 'RZ2' and dbSys = 'DVBP'
   --   and dbName = 'XBFIS002'
    group by rz, dbSys, dbName, name, instance, partition
)
   select t2.rz, t2.dbSys, t2.dbName, t2.name, t2.instance, t2.partition
      , substr(fosFmte7(real(rn.nActive) * rn.pgSize * 1024), 1, 7)
          "newUsed"
      , substr(fosFmte7(rN.totalRows), 1, 7) "newRows"
      , rN.nActive "newActive"
      , rO.nActive "oldActive"
      , substr(fosFmte7(real(rO.nActive) * rO.pgSize * 1024), 1, 7)
          "oldUsed"
      , substr(fosFmte7(rO.totalRows), 1, 7) "newRows"
      ,t2.loadTs, t2.loadFP
     from t2
      join oa1p.tqz006GbGrTsSTats rN
        on t2.loadTS is not null and rN.state <> 'd'
                and t2.rz        = rN.rz
                and t2.dbSys     = rN.dbSys
                and t2.dbName    = rN.dbName
                and t2.name      = rN.name
                and t2.instance  = rN.instance
                and t2.partition = rN.partition
                and t2.loadTs    = rN.loadTS
      join oa1p.tqz006GbGrTsSTats rO
        on t2.loadTS is not null and rO.state <> 'd'
                and t2.rz        = rO.rz
                and t2.dbSys     = rO.dbSys
                and t2.dbName    = rO.dbName
                and t2.name      = rO.name
                and t2.instance  = rO.instance
                and t2.partition = rO.partition
                and t2.loadFP    = rO.loadTs
      where rN.nActive <> rO.nActive
      order by real(rn.nActive) * rn.pgSize * 1024 desc
      fetch first 1000 rows only
      with ur
;x;
select rz, dbSys, dbName, name
      , substr(case when tsTy <> '' then tsTy else tsType end
          || case when clone in ('N', '?') and instance=1 and tsInst=1
                  then ''
                  else case when instance=tsInst then 'b' else 'c' end
                      || instance end, 1, 3) "yci"
      , substr(case when partition = 0 and parts = 0 then ''
            else case when partition is null            then ' ---'
                      when partition = 0 and tsTy = 'G' then ' pbg'
                      when partition = 0                then ' ???'
                      else right('   ' || partition, 4)
                 end
             ||'/'|| value(right('   '|| parts, 4),'----')
            end, 1, 9) "part/ tot"
   -- , smallInt(partition) part
      , substr(fosFmte7(real(nActive) * pgSize * 1024), 1, 7) used
      , substr(fosFmte7(totalRows), 1, 7) rows
      , substr(tb, 1, 30) "table"
      , updateStatsTime, t.*
    from t
    order by rz, dbSys, dbName, name, instance, partition
;
}¢--- A540769.WK.SQL(XCDSS) cre=2014-11-12 mod=2014-11-12-12.24.23 A540769 -----
set current sqlid = 'S100447';
CREATE TABLESPACE A200A02
       IN DA540769
       BUFFERPOOL BP32K
       DSSIZE  32G
       CLOSE YES
       LOCKMAX SYSTEM
       SEGSIZE 0
       DEFINE NO
       LOGGED
       LOCKSIZE ANY
       MAXROWS 255
       CCSID EBCDIC
       NUMPARTS 4000
;
rollback
}¢--- A540769.WK.SQL(XCREDO) cre=2015-12-04 mod=2015-12-11-10.59.24 A540769 ----
set current path oa1p;
set current application compatibility 'V11R1';
-- statistics of partition recovery state ----------------------------
with r as
(
  select  max(value(pSpc, 0), value(rSpc, 0), 0) * 1024.0 spc
        , case when posStr(lgRnRecLoad, 'stillUnl') > 0 then 'cleanup'
               when posStr(lgRnRecLoad, 'punNotSo') > 0 then 'redoUnl'
               when stage = 'UL' and substr(lgRnRecLoad, 1, 1) <> 'l'
                       and lgRnRecLoad not in ('r ok:F=fulCopy ok'
                                ,'r ok:F=fulCopy ok lgRnNone'
                                ,'r ok:F=fulCopy dataChangeV11>unl'
                                )
                   then 'redoUnl' else '' end  redo
        , r.*
      from oa1p.vQz005RecovDeltaLoadLgRn r
      where (db like 'XC%' or db like 'XR%')
           and (ts like 'A2%' or ts like 'A5%')
        -- and (db like 'XC%' and ts like 'A5%')
)
select substr(fosFmtE7(sum(spc))
                 ¨¨ right('       ' ¨¨ count(*), 8), 1, 15)
                   "spaceBy   count"
        , redo
        , stage
        , substr(lgRnRecLoad, 1, 70) recoveryState
        , min(unlTst) unlFrom
        , max(unlTst) unlTo
        , min(staUpd) staFrom
        , max(staUpd) staTo
    from r
    group by grouping sets ((), (redo), (redo, stage, lgRnRecLoad) )
       order by 2, 3, 4
;
-- list of partitions with recovery errors ----------------------------
with r as
(
  select  max(value(pSpc, 0), value(rSpc, 0), 0) * 1024.0 spc
        , case when posStr(lgRnRecLoad, 'stillUnl') > 0 then 'cleanup'
               when posStr(lgRnRecLoad, 'punNotSo') > 0 then 'redoUnl'
               when stage = 'UL' and substr(lgRnRecLoad, 1, 1) <> 'l'
                       and lgRnRecLoad not in ('r ok:F=fulCopy ok'
                                ,'r ok:F=fulCopy ok lgRnNone'
                                ,'r ok:F=fulCopy dataChangeV11>unl'
                                )
                   then 'redoUnl' else '' end  redo
        , r.*
      from oa1p.vQz005RecovDeltaLoadLgRn r
      where (db like 'XC%' or db like 'XR%')
           and (ts like 'A2%' or ts like 'A5%')
        -- and (db like 'XC%' and ts like 'A5%')
)
select substr(db, 1, 8) db
      , substr(ts, 1, 8) ts
      , smallint(pa) pa
      , redo
      , stage
      , substr(fosFmtE7(spc), 1, 7) spcBy
      , substr(lgRnRecLoad, 1, 60) recoveryState
      , staUpd
      , unlTst
      , lastEq
    from r
    where redo <> ''
    order by 1, 2, 3
;
-- further cleanup: duplicate unloads etc ... -------------------------
select db, ts, pa, stage, staUpd
      , strip(strip(err) || ' ' || info) "error llq ..."
    from oa1p.tQz005TecSvUnload
    where stage <> '-r' and (err <> '' or info <> '')
    order by db, ts, pa
;x;
}¢--- A540769.WK.SQL(XCR321DD) cre= mod= ---------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90      --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DVBP (910)     Extract time : 2009-07-24 08:12 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=SXCR321 In Database DXB07     --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DXB07   Stogroup=GSMS (for partition 1)
-- Tablespace=DXB07.SXCR321
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
--
  CREATE TABLESPACE SXCR321
    IN DXB07
    USING STOGROUP GSMS
    PRIQTY 736 SECQTY 14400
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD NO
    DSSIZE 16 G
    NUMPARTS 100
     (PART 28 USING STOGROUP GSMS PRIQTY 736 SECQTY 102240)
    BUFFERPOOL BP32K
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 1;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=BUA.TXCR321 In DXB07.SXCR321
------------------------------------------------------------------------
--
  SET CURRENT SQLID='BUA';
--
  CREATE TABLE BUA.TXCR321
     (ENDOC                CHAR(20) FOR SBCS DATA NOT NULL,
      ENDOCVIEW            INTEGER NOT NULL,
      ENSEGMENT            INTEGER NOT NULL,
      ENPAGE               INTEGER NOT NULL,
      ENSPAGE              INTEGER NOT NULL,
      EAPOOL               VARCHAR(32000) FOR SBCS DATA NOT NULL,
      CONSTRAINT ENDOC
      PRIMARY KEY (ENDOC,
                   ENDOCVIEW,
                   ENSEGMENT,
                   ENPAGE,
                   ENSPAGE))
    IN DXB07.SXCR321
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  COMMENT ON TABLE BUA.TXCR321
    IS 'DOCUMENT REPOSITORY: DOCUMENT CONTENTS POOL 3';
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=DXB07
--    Index=BUA.IXCR3210 On BUA.TXCR321
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX BUA.IXCR3210
    ON BUA.TXCR321
     (ENDOC                 ASC,
      ENDOCVIEW             ASC,
      ENSEGMENT             ASC,
      ENPAGE                ASC,
      ENSPAGE               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 72000
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    CLUSTER
     (PART 1 VALUES('DO00'),
      PART 2 VALUES('DO01'),
      PART 3 VALUES('DO02'),
      PART 4 VALUES('DO03'),
      PART 5 VALUES('DO04'),
      PART 6 VALUES('DO05'),
      PART 7 VALUES('DO06'),
      PART 8 VALUES('DO07'),
      PART 9 VALUES('DO08'),
      PART 10 VALUES('DO09'),
      PART 11 VALUES('DO10'),
      PART 12 VALUES('DO11'),
      PART 13 VALUES('DO12'),
      PART 14 VALUES('DO13'),
      PART 15 VALUES('DO14'),
      PART 16 VALUES('DO15'),
      PART 17 VALUES('DO16'),
      PART 18 VALUES('DO17'),
      PART 19 VALUES('DO18'),
      PART 20 VALUES('DO19'),
      PART 21 VALUES('DO20'),
      PART 22 VALUES('DO21'),
      PART 23 VALUES('DO22'),
      PART 24 VALUES('DO23'),
      PART 25 VALUES('DO24'),
      PART 26 VALUES('DO25'),
      PART 27 VALUES('DO26'),
      PART 28 VALUES('DO27'),
      PART 29 VALUES('DO28'),
      PART 30 VALUES('DO29'),
      PART 31 VALUES('DO30'),
      PART 32 VALUES('DO31'),
      PART 33 VALUES('DO32'),
      PART 34 VALUES('DO33'),
      PART 35 VALUES('DO34'),
      PART 36 VALUES('DO35'),
      PART 37 VALUES('DO36'),
      PART 38 VALUES('DO37'),
      PART 39 VALUES('DO38'),
      PART 40 VALUES('DO39'),
      PART 41 VALUES('DO40'),
      PART 42 VALUES('DO41'),
      PART 43 VALUES('DO42'),
      PART 44 VALUES('DO43'),
      PART 45 VALUES('DO44'),
      PART 46 VALUES('DO45'),
      PART 47 VALUES('DO46'),
      PART 48 VALUES('DO47'),
      PART 49 VALUES('DO48'),
      PART 50 VALUES('DO49'),
      PART 51 VALUES('DO50'),
      PART 52 VALUES('DO51'),
      PART 53 VALUES('DO52'),
      PART 54 VALUES('DO53'),
      PART 55 VALUES('DO54'),
      PART 56 VALUES('DO55'),
      PART 57 VALUES('DO56'),
      PART 58 VALUES('DO57'),
      PART 59 VALUES('DO58'),
      PART 60 VALUES('DO59'),
      PART 61 VALUES('DO60'),
      PART 62 VALUES('DO61'),
      PART 63 VALUES('DO62'),
      PART 64 VALUES('DO63'),
      PART 65 VALUES('DO64'),
      PART 66 VALUES('DO65'),
      PART 67 VALUES('DO66'),
      PART 68 VALUES('DO67'),
      PART 69 VALUES('DO68'),
      PART 70 VALUES('DO69'),
      PART 71 VALUES('DO70'),
      PART 72 VALUES('DO71'),
      PART 73 VALUES('DO72'),
      PART 74 VALUES('DO73'),
      PART 75 VALUES('DO74'),
      PART 76 VALUES('DO75'),
      PART 77 VALUES('DO76'),
      PART 78 VALUES('DO77'),
      PART 79 VALUES('DO78'),
      PART 80 VALUES('DO79'),
      PART 81 VALUES('DO80'),
      PART 82 VALUES('DO81'),
      PART 83 VALUES('DO82'),
      PART 84 VALUES('DO83'),
      PART 85 VALUES('DO84'),
      PART 86 VALUES('DO85'),
      PART 87 VALUES('DO86'),
      PART 88 VALUES('DO87'),
      PART 89 VALUES('DO88'),
      PART 90 VALUES('DO89'),
      PART 91 VALUES('DO90'),
      PART 92 VALUES('DO91'),
      PART 93 VALUES('DO92'),
      PART 94 VALUES('DO93'),
      PART 95 VALUES('DO94'),
      PART 96 VALUES('DO95'),
      PART 97 VALUES('DO96'),
      PART 98 VALUES('DO97'),
      PART 99 VALUES('DO98'),
      PART 100 VALUES('DO99'))
    BUFFERPOOL BP21
    CLOSE YES
    COPY NO
    DEFINE YES;
--
  COMMIT;
--
  ALTER TABLE BUA.TXCR321 FOREIGN KEY ENDO1XGH
     (ENDOC,
      ENDOCVIEW,
      ENSEGMENT)
    REFERENCES BUA.TXCR141
     (ENDOC,
      ENDOCVIEW,
      ENSEGMENT)
    ON DELETE CASCADE ENFORCED ;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(XCR321D2) cre=2009-07-24 mod=2009-07-24-08.58.55 A540769 ---
  SET CURRENT SQLID='S100447';
--
  CREATE UNIQUE INDEX A540769.IXCR3210
    ON A540769.TXCR321
     (ENDOC                 ASC,
      ENDOCVIEW             ASC,
      ENSEGMENT             ASC,
      ENPAGE                ASC,
      ENSPAGE               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 72000
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    CLUSTER
     (PART 1 VALUES('DO00'),
      PART 2 VALUES('DO01'),
      PART 3 VALUES('DO02'),
      PART 4 VALUES('DO03'),
      PART 5 VALUES('DO04'),
      PART 6 VALUES('DO05'),
      PART 7 VALUES('DO06'),
      PART 8 VALUES('DO07'),
      PART 9 VALUES('DO08'),
      PART 10 VALUES('DO09'),
      PART 11 VALUES('DO10'),
      PART 12 VALUES('DO11'),
      PART 13 VALUES('DO12'),
      PART 14 VALUES('DO13'),
      PART 15 VALUES('DO14'),
      PART 16 VALUES('DO15'),
      PART 17 VALUES('DO16'),
      PART 18 VALUES('DO17'),
      PART 19 VALUES('DO18'),
      PART 20 VALUES('DO19'),
      PART 21 VALUES('DO20'),
      PART 22 VALUES('DO21'),
      PART 23 VALUES('DO22'),
      PART 24 VALUES('DO23'),
      PART 25 VALUES('DO24'),
      PART 26 VALUES('DO25'),
      PART 27 VALUES('DO26'),
      PART 28 VALUES('DO27'),
      PART 29 VALUES('DO28'),
      PART 30 VALUES('DO29'),
      PART 31 VALUES('DO30'),
      PART 32 VALUES('DO31'),
      PART 33 VALUES('DO32'),
      PART 34 VALUES('DO33'),
      PART 35 VALUES('DO34'),
      PART 36 VALUES('DO35'),
      PART 37 VALUES('DO36'),
      PART 38 VALUES('DO37'),
      PART 39 VALUES('DO38'),
      PART 40 VALUES('DO39'),
      PART 41 VALUES('DO40'),
      PART 42 VALUES('DO41'),
      PART 43 VALUES('DO42'),
      PART 44 VALUES('DO43'),
      PART 45 VALUES('DO44'),
      PART 46 VALUES('DO45'),
      PART 47 VALUES('DO46'),
      PART 48 VALUES('DO47'),
      PART 49 VALUES('DO48'),
      PART 50 VALUES('DO49'),
      PART 51 VALUES('DO50'),
      PART 52 VALUES('DO51'),
      PART 53 VALUES('DO52'),
      PART 54 VALUES('DO53'),
      PART 55 VALUES('DO54'),
      PART 56 VALUES('DO55'),
      PART 57 VALUES('DO56'),
      PART 58 VALUES('DO57'),
      PART 59 VALUES('DO58'),
      PART 60 VALUES('DO59'),
      PART 61 VALUES('DO60'),
      PART 62 VALUES('DO61'),
      PART 63 VALUES('DO62'),
      PART 64 VALUES('DO63'),
      PART 65 VALUES('DO64'),
      PART 66 VALUES('DO65'),
      PART 67 VALUES('DO66'),
      PART 68 VALUES('DO67'),
      PART 69 VALUES('DO68'),
      PART 70 VALUES('DO69'),
      PART 71 VALUES('DO70'),
      PART 72 VALUES('DO71'),
      PART 73 VALUES('DO72'),
      PART 74 VALUES('DO73'),
      PART 75 VALUES('DO74'),
      PART 76 VALUES('DO75'),
      PART 77 VALUES('DO76'),
      PART 78 VALUES('DO77'),
      PART 79 VALUES('DO78'),
      PART 80 VALUES('DO79'),
      PART 81 VALUES('DO80'),
      PART 82 VALUES('DO81'),
      PART 83 VALUES('DO82'),
      PART 84 VALUES('DO83'),
      PART 85 VALUES('DO84'),
      PART 86 VALUES('DO85'),
      PART 87 VALUES('DO86'),
      PART 88 VALUES('DO87'),
      PART 89 VALUES('DO88'),
      PART 90 VALUES('DO89'),
      PART 91 VALUES('DO90'),
      PART 92 VALUES('DO91'),
      PART 93 VALUES('DO92'),
      PART 94 VALUES('DO93'),
      PART 95 VALUES('DO94'),
      PART 96 VALUES('DO95'),
      PART 97 VALUES('DO96'),
      PART 98 VALUES('DO97'),
      PART 99 VALUES('DO98'),
      PART 100 VALUES('DO99'))
    BUFFERPOOL BP2
    CLOSE YES
    COPY NO
    DEFINE YES;
--
  COMMIT;
--
  CREATE TABLESPACE SXCR321
    IN DA540769
    USING STOGROUP GSMS
    PRIQTY 736 SECQTY 14400
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD NO
    DSSIZE 16 G
    NUMPARTS 100
     (PART 28 USING STOGROUP GSMS PRIQTY 736 SECQTY 102240)
    BUFFERPOOL BP32K
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 1;
  COMMIT;
  CREATE TABLE A540769.TXCR321
     (ENDOC                CHAR(20) FOR SBCS DATA NOT NULL,
      ENDOCVIEW            INTEGER NOT NULL,
      ENSEGMENT            INTEGER NOT NULL,
      ENPAGE               INTEGER NOT NULL,
      ENSPAGE              INTEGER NOT NULL,
      EAPOOL               VARCHAR(32000) FOR SBCS DATA NOT NULL,
      CONSTRAINT ENDOC
      PRIMARY KEY (ENDOC,
                   ENDOCVIEW,
                   ENSEGMENT,
                   ENPAGE,
                   ENSPAGE))
    IN DA540769.SXCR321
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  COMMENT ON TABLE A540769.TXCR321
    IS 'DOCUMENT REPOSITORY: DOCUMENT CONTENTS POOL 3';
--
  COMMIT;
--
  CREATE UNIQUE INDEX A540769.IXCR3210
    ON A540769.TXCR321
     (ENDOC                 ASC,
      ENDOCVIEW             ASC,
      ENSEGMENT             ASC,
      ENPAGE                ASC,
      ENSPAGE               ASC)
    USING STOGROUP GSMS
    PRIQTY 720 SECQTY 72000
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    CLUSTER
     (PART 1 VALUES('DO00'),
      PART 2 VALUES('DO01'),
      PART 3 VALUES('DO02'),
      PART 4 VALUES('DO03'),
      PART 5 VALUES('DO04'),
      PART 6 VALUES('DO05'),
      PART 7 VALUES('DO06'),
      PART 8 VALUES('DO07'),
      PART 9 VALUES('DO08'),
      PART 10 VALUES('DO09'),
      PART 11 VALUES('DO10'),
      PART 12 VALUES('DO11'),
      PART 13 VALUES('DO12'),
      PART 14 VALUES('DO13'),
      PART 15 VALUES('DO14'),
      PART 16 VALUES('DO15'),
      PART 17 VALUES('DO16'),
      PART 18 VALUES('DO17'),
      PART 19 VALUES('DO18'),
      PART 20 VALUES('DO19'),
      PART 21 VALUES('DO20'),
      PART 22 VALUES('DO21'),
      PART 23 VALUES('DO22'),
      PART 24 VALUES('DO23'),
      PART 25 VALUES('DO24'),
      PART 26 VALUES('DO25'),
      PART 27 VALUES('DO26'),
      PART 28 VALUES('DO27'),
      PART 29 VALUES('DO28'),
      PART 30 VALUES('DO29'),
      PART 31 VALUES('DO30'),
      PART 32 VALUES('DO31'),
      PART 33 VALUES('DO32'),
      PART 34 VALUES('DO33'),
      PART 35 VALUES('DO34'),
      PART 36 VALUES('DO35'),
      PART 37 VALUES('DO36'),
      PART 38 VALUES('DO37'),
      PART 39 VALUES('DO38'),
      PART 40 VALUES('DO39'),
      PART 41 VALUES('DO40'),
      PART 42 VALUES('DO41'),
      PART 43 VALUES('DO42'),
      PART 44 VALUES('DO43'),
      PART 45 VALUES('DO44'),
      PART 46 VALUES('DO45'),
      PART 47 VALUES('DO46'),
      PART 48 VALUES('DO47'),
      PART 49 VALUES('DO48'),
      PART 50 VALUES('DO49'),
      PART 51 VALUES('DO50'),
      PART 52 VALUES('DO51'),
      PART 53 VALUES('DO52'),
      PART 54 VALUES('DO53'),
      PART 55 VALUES('DO54'),
      PART 56 VALUES('DO55'),
      PART 57 VALUES('DO56'),
      PART 58 VALUES('DO57'),
      PART 59 VALUES('DO58'),
      PART 60 VALUES('DO59'),
      PART 61 VALUES('DO60'),
      PART 62 VALUES('DO61'),
      PART 63 VALUES('DO62'),
      PART 64 VALUES('DO63'),
      PART 65 VALUES('DO64'),
      PART 66 VALUES('DO65'),
      PART 67 VALUES('DO66'),
      PART 68 VALUES('DO67'),
      PART 69 VALUES('DO68'),
      PART 70 VALUES('DO69'),
      PART 71 VALUES('DO70'),
      PART 72 VALUES('DO71'),
      PART 73 VALUES('DO72'),
      PART 74 VALUES('DO73'),
      PART 75 VALUES('DO74'),
      PART 76 VALUES('DO75'),
      PART 77 VALUES('DO76'),
      PART 78 VALUES('DO77'),
      PART 79 VALUES('DO78'),
      PART 80 VALUES('DO79'),
      PART 81 VALUES('DO80'),
      PART 82 VALUES('DO81'),
      PART 83 VALUES('DO82'),
      PART 84 VALUES('DO83'),
      PART 85 VALUES('DO84'),
      PART 86 VALUES('DO85'),
      PART 87 VALUES('DO86'),
      PART 88 VALUES('DO87'),
      PART 89 VALUES('DO88'),
      PART 90 VALUES('DO89'),
      PART 91 VALUES('DO90'),
      PART 92 VALUES('DO91'),
      PART 93 VALUES('DO92'),
      PART 94 VALUES('DO93'),
      PART 95 VALUES('DO94'),
      PART 96 VALUES('DO95'),
      PART 97 VALUES('DO96'),
      PART 98 VALUES('DO97'),
      PART 99 VALUES('DO98'),
      PART 100 VALUES('DO99'))
    BUFFERPOOL BP2
    CLOSE YES
    COPY NO
    DEFINE YES;
--
  COMMIT;
--
}¢--- A540769.WK.SQL(XCSTAGE) cre=2016-08-30 mod=2016-08-30-08.36.48 A540769 ---
select count(*),  stage
    from OA1P.TQZ005TECSVUNLOAD
    group by  stage
;x;
select count(*),  XC406_PART_STATUS
    from OA1P.TXC406A1
    group by  XC406_PART_STATUS
;x;
select count(*),  Xr106_DOC_STATE
    from OA1P.TXr106A1
    group by  Xr106_DOC_STATE
;x;
select count(*),  XC106_DOC_STATE
    from OA1P.TXC106A1
    group by  XC106_DOC_STATE
}¢--- A540769.WK.SQL(XC0518RT) cre=2015-12-08 mod=2015-12-08-18.56.12 A540769 ---
select *
    from oa1p.tqz005tecSvRtsLastEq;x;
with s as
(
  select *
    from OA1P.TQZ006GBGRTSSTATS a
    where rz = 'RZ2' and dbSys = 'DBOF' and dbName = 'XC01A1P'
        and name = 'A200A00' and state = 'a'
)
, n as
(
  select *
    from s a
    where updatestatstime
      = ( select max(b.updatestatstime)
            from s b
            where a.rz = b.rz and a.dbSys = b.dbSys
                and a.dbName = b.dbName and a.name = b.name
                and a.partition = b.partition
                and a.instance  = b.instance
        )
)
, d as
(
  select
    ( select max(a.updatestatsTime)
        from s a
        where a.rz = n.rz and a.dbSys = n.dbSys
                and a.dbName = n.dbName and a.name = n.name
                and a.partition = n.partition
                and a.instance  = n.instance
                and not
            (   a.totalRows         = n.totalRows
            and a.nActive           = n.nActive
            and a.nPages            = n.nPages
            and a.reorgInserts      = n.reorgInserts
            and a.REORGDELETES      = n.REORGDELETES
            and a.REORGUPDATES      = n.REORGUPDATES
            and a.REORGMASSDELETE   = n.REORGMASSDELETE
            and a.dataSize          = n.dataSize
    )       ) difNew
    , n.*
    from n
)
, e as
(
  select
    ( select min(updatestatsTime)
        from s a
        where a.rz = d.rz and a.dbSys = d.dbSys
                and a.dbName = d.dbName and a.name = d.name
                and a.partition = d.partition
                and a.instance  = d.instance
                and a.updateStatsTime > d.difNew
    ) eqOld
    , d.*
    from d
)
select dbName db, name ts, instance inst, partition part
      , eqOld, updateStatsTime, difNew
    from e
    order by db, ts, part
; x;
select *
    from OA1P.TQZ006GBGRTSSTATS a
    where rz = 'RZ2' and dbSys = 'DBOF' and dbName = 'XC01A1P'
        and name = 'A200A00' and partition = 1
    order by updatestatstime desc
select * from e ;X;
                and a.updateStatsTime > u.updateStatsTime
    union all select l+1, db, ts, part, inst, new, a.updateStatsTime
        , tot, nAct, nPag, rIns, rDel, rUpd, rMas, dat, u.rz, u.dbSys
      from u
        join OA1P.TQZ006GBGRTSSTATS a
            on a.rz = u.rz and a.dbSys = u.dbSys
                and a.dbName = u.db and a.name = u.ts
                and a.partition = u.part
                and a.instance  = u.inst
                and a.updateStatsTime =
        ( select max(b.updatestatstime)
            from OA1P.TQZ006GBGRTSSTATS b
            where a.rz = b.rz and a.dbSys = b.dbSys
                and a.dbName = b.dbName and a.name = b.name
                and a.partition = b.partition
                and a.instance  = b.instance
                and b.state = 'a'
                and b.updateStatsTime < u.old
        )
            and a.totalRows = u.tot and a.nActive = u.nAct
            and a.nPages = u.nPag
            and a.reorgInserts = u.rIns and a.REORGDELETES = u.rDel
            and a.REORGUPDATES = u.rUpd and a.REORGMASSDELETE = u.rMas
            and a.dataSize = u.dat
      where l < 1000
)
, r as
(
  select row_number() over ( partition by db, ts, part, inst
                             order by l desc ) rn
      , u.*
    from u
)
select * from r
    where rn = 1
    order by db, ts, part
;
select *
    from OA1P.TQZ006GBGRTSSTATS a
    where rz = 'RZ2' and dbSys = 'DBOF' and dbName = 'XC01A1P'
        and name = 'A200A00' and partition = 1
    order by updatestatstime desc
;x;
--- mit recursivem sql ------------------------------------------------
with u (l, db, ts, part, inst, new, old, tot, nAct, nPag, rIns, rDel
             , rUpd, rMas, dat, rz, dbSys) as
(
  select 0, dbName, name, partition, instance
      , updatestatstime, updatestatstime
      , totalRows, nActive, nPages
      , reorgInserts, REORGDELETES,  REORGUPDATES, REORGMASSDELETE
      , dataSize, rz, dbSys
    from OA1P.TQZ006GBGRTSSTATS a
    where rz = 'RZ2' and dbSys = 'DBOF' and dbName = 'XC01A1P'
        and name = 'A200A00' -- and partition = 1
        and updatestatstime =
        ( select max(b.updatestatstime)
            from OA1P.TQZ006GBGRTSSTATS b
            where a.rz = b.rz and a.dbSys = b.dbSys
                and a.dbName = b.dbName and a.name = b.name
                and a.partition = b.partition
                and a.instance  = b.instance
                and b.state = 'a'
        )
    union all select l+1, db, ts, part, inst, new, a.updateStatsTime
        , tot, nAct, nPag, rIns, rDel, rUpd, rMas, dat, u.rz, u.dbSys
      from u
        join OA1P.TQZ006GBGRTSSTATS a
            on a.rz = u.rz and a.dbSys = u.dbSys
                and a.dbName = u.db and a.name = u.ts
                and a.partition = u.part
                and a.instance  = u.inst
                and a.updateStatsTime =
        ( select max(b.updatestatstime)
            from OA1P.TQZ006GBGRTSSTATS b
            where a.rz = b.rz and a.dbSys = b.dbSys
                and a.dbName = b.dbName and a.name = b.name
                and a.partition = b.partition
                and a.instance  = b.instance
                and b.state = 'a'
                and b.updateStatsTime < u.old
        )
            and a.totalRows = u.tot and a.nActive = u.nAct
            and a.nPages = u.nPag
            and a.reorgInserts = u.rIns and a.REORGDELETES = u.rDel
            and a.REORGUPDATES = u.rUpd and a.REORGMASSDELETE = u.rMas
            and a.dataSize = u.dat
      where l < 1000
)
, r as
(
  select row_number() over ( partition by db, ts, part, inst
                             order by l desc ) rn
      , u.*
    from u
)
select * from r
    where rn = 1
    order by db, ts, part
;
select *
    from OA1P.TQZ006GBGRTSSTATS a
    where rz = 'RZ2' and dbSys = 'DBOF' and dbName = 'XC01A1P'
        and name = 'A200A00' and partition = 1
    order by updatestatstime desc
}¢--- A540769.WK.SQL(XC200DDL) cre=2010-05-10 mod=2010-05-10-10.43.16 A540769 ---
  SET CURRENT SQLID='S100447 ';
--
  CREATE TABLESPACE A200A00
    IN XC01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    DSSIZE 32 G
    NUMPARTS 254
    BUFFERPOOL BP32K
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS NO
    CCSID      EBCDIC
    LOCKPART YES
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
  CREATE TABLE OA1P00.TXC200A1
     (XC200_DOC_PART_NO    CHAR(4) FOR SBCS DATA NOT NULL,
      XC200_UUID_DOC_B     CHAR(16) FOR BIT DATA NOT NULL,
      XC200_DOC_FRMT       CHAR(3) FOR SBCS DATA NOT NULL,
      XC200_DOC_CONT_TYP   INTEGER NOT NULL,
      XC200_DOC_SEGM_SEQ   INTEGER NOT NULL,
      XC200_DOC_SEGM       VARCHAR(32000) FOR BIT DATA NOT NULL,
      CONSTRAINT XC200_DOC_PART_NO
      PRIMARY KEY (XC200_DOC_PART_NO,
                   XC200_UUID_DOC_B,
                   XC200_DOC_FRMT,
                   XC200_DOC_CONT_TYP,
                   XC200_DOC_SEGM_SEQ)
     )
     PARTITION BY (XC200_DOC_PART_NO     ASC)
     (PART 1 VALUES('0001'),
      PART 2 VALUES('0002'),
      PART 3 VALUES('0003'),
      PART 4 VALUES('0004'),
      PART 5 VALUES('0005'),
      PART 6 VALUES('0006'),
      PART 7 VALUES('0007'),
      PART 8 VALUES('0008'),
      PART 9 VALUES('0009'),
      PART 10 VALUES('0010'),
      PART 11 VALUES('0011'),
      PART 12 VALUES('0012'),
      PART 13 VALUES('0013'),
      PART 14 VALUES('0014'),
      PART 15 VALUES('0015'),
      PART 16 VALUES('0016'),
      PART 17 VALUES('0017'),
      PART 18 VALUES('0018'),
      PART 19 VALUES('0019'),
      PART 20 VALUES('0020'),
      PART 21 VALUES('0021'),
      PART 22 VALUES('0022'),
      PART 23 VALUES('0023'),
      PART 24 VALUES('0024'),
      PART 25 VALUES('0025'),
      PART 26 VALUES('0026'),
      PART 27 VALUES('0027'),
      PART 28 VALUES('0028'),
      PART 29 VALUES('0029'),
      PART 30 VALUES('0030'),
      PART 31 VALUES('0031'),
      PART 32 VALUES('0032'),
      PART 33 VALUES('0033'),
      PART 34 VALUES('0034'),
      PART 35 VALUES('0035'),
      PART 36 VALUES('0036'),
      PART 37 VALUES('0037'),
      PART 38 VALUES('0038'),
      PART 39 VALUES('0039'),
      PART 40 VALUES('0040'),
      PART 41 VALUES('0041'),
      PART 42 VALUES('0042'),
      PART 43 VALUES('0043'),
      PART 44 VALUES('0044'),
      PART 45 VALUES('0045'),
      PART 46 VALUES('0046'),
      PART 47 VALUES('0047'),
      PART 48 VALUES('0048'),
      PART 49 VALUES('0049'),
      PART 50 VALUES('0050'),
      PART 51 VALUES('0051'),
      PART 52 VALUES('0052'),
      PART 53 VALUES('0053'),
      PART 54 VALUES('0054'),
      PART 55 VALUES('0055'),
      PART 56 VALUES('0056'),
      PART 57 VALUES('0057'),
      PART 58 VALUES('0058'),
      PART 59 VALUES('0059'),
      PART 60 VALUES('0060'),
      PART 61 VALUES('0061'),
      PART 62 VALUES('0062'),
      PART 63 VALUES('0063'),
      PART 64 VALUES('0064'),
      PART 65 VALUES('0065'),
      PART 66 VALUES('0066'),
      PART 67 VALUES('0067'),
      PART 68 VALUES('0068'),
      PART 69 VALUES('0069'),
      PART 70 VALUES('0070'),
      PART 71 VALUES('0071'),
      PART 72 VALUES('0072'),
      PART 73 VALUES('0073'),
      PART 74 VALUES('0074'),
      PART 75 VALUES('0075'),
      PART 76 VALUES('0076'),
      PART 77 VALUES('0077'),
      PART 78 VALUES('0078'),
      PART 79 VALUES('0079'),
      PART 80 VALUES('0080'),
      PART 81 VALUES('0081'),
      PART 82 VALUES('0082'),
      PART 83 VALUES('0083'),
      PART 84 VALUES('0084'),
      PART 85 VALUES('0085'),
      PART 86 VALUES('0086'),
      PART 87 VALUES('0087'),
      PART 88 VALUES('0088'),
      PART 89 VALUES('0089'),
      PART 90 VALUES('0090'),
      PART 91 VALUES('0091'),
      PART 92 VALUES('0092'),
      PART 93 VALUES('0093'),
      PART 94 VALUES('0094'),
      PART 95 VALUES('0095'),
      PART 96 VALUES('0096'),
      PART 97 VALUES('0097'),
      PART 98 VALUES('0098'),
      PART 99 VALUES('0099'),
      PART 100 VALUES('0100'),
      PART 101 VALUES('0101'),
      PART 102 VALUES('0102'),
      PART 103 VALUES('0103'),
      PART 104 VALUES('0104'),
      PART 105 VALUES('0105'),
      PART 106 VALUES('0106'),
      PART 107 VALUES('0107'),
      PART 108 VALUES('0108'),
      PART 109 VALUES('0109'),
      PART 110 VALUES('0110'),
      PART 111 VALUES('0111'),
      PART 112 VALUES('0112'),
      PART 113 VALUES('0113'),
      PART 114 VALUES('0114'),
      PART 115 VALUES('0115'),
      PART 116 VALUES('0116'),
      PART 117 VALUES('0117'),
      PART 118 VALUES('0118'),
      PART 119 VALUES('0119'),
      PART 120 VALUES('0120'),
      PART 121 VALUES('0121'),
      PART 122 VALUES('0122'),
      PART 123 VALUES('0123'),
      PART 124 VALUES('0124'),
      PART 125 VALUES('0125'),
      PART 126 VALUES('0126'),
      PART 127 VALUES('0127'),
      PART 128 VALUES('0128'),
      PART 129 VALUES('0129'),
      PART 130 VALUES('0130'),
      PART 131 VALUES('0131'),
      PART 132 VALUES('0132'),
      PART 133 VALUES('0133'),
      PART 134 VALUES('0134'),
      PART 135 VALUES('0135'),
      PART 136 VALUES('0136'),
      PART 137 VALUES('0137'),
      PART 138 VALUES('0138'),
      PART 139 VALUES('0139'),
      PART 140 VALUES('0140'),
      PART 141 VALUES('0141'),
      PART 142 VALUES('0142'),
      PART 143 VALUES('0143'),
      PART 144 VALUES('0144'),
      PART 145 VALUES('0145'),
      PART 146 VALUES('0146'),
      PART 147 VALUES('0147'),
      PART 148 VALUES('0148'),
      PART 149 VALUES('0149'),
      PART 150 VALUES('0150'),
      PART 151 VALUES('0151'),
      PART 152 VALUES('0152'),
      PART 153 VALUES('0153'),
      PART 154 VALUES('0154'),
      PART 155 VALUES('0155'),
      PART 156 VALUES('0156'),
      PART 157 VALUES('0157'),
      PART 158 VALUES('0158'),
      PART 159 VALUES('0159'),
      PART 160 VALUES('0160'),
      PART 161 VALUES('0161'),
      PART 162 VALUES('0162'),
      PART 163 VALUES('0163'),
      PART 164 VALUES('0164'),
      PART 165 VALUES('0165'),
      PART 166 VALUES('0166'),
      PART 167 VALUES('0167'),
      PART 168 VALUES('0168'),
      PART 169 VALUES('0169'),
      PART 170 VALUES('0170'),
      PART 171 VALUES('0171'),
      PART 172 VALUES('0172'),
      PART 173 VALUES('0173'),
      PART 174 VALUES('0174'),
      PART 175 VALUES('0175'),
      PART 176 VALUES('0176'),
      PART 177 VALUES('0177'),
      PART 178 VALUES('0178'),
      PART 179 VALUES('0179'),
      PART 180 VALUES('0180'),
      PART 181 VALUES('0181'),
      PART 182 VALUES('0182'),
      PART 183 VALUES('0183'),
      PART 184 VALUES('0184'),
      PART 185 VALUES('0185'),
      PART 186 VALUES('0186'),
      PART 187 VALUES('0187'),
      PART 188 VALUES('0188'),
      PART 189 VALUES('0189'),
      PART 190 VALUES('0190'),
      PART 191 VALUES('0191'),
      PART 192 VALUES('0192'),
      PART 193 VALUES('0193'),
      PART 194 VALUES('0194'),
      PART 195 VALUES('0195'),
      PART 196 VALUES('0196'),
      PART 197 VALUES('0197'),
      PART 198 VALUES('0198'),
      PART 199 VALUES('0199'),
      PART 200 VALUES('0200'),
      PART 201 VALUES('0201'),
      PART 202 VALUES('0202'),
      PART 203 VALUES('0203'),
      PART 204 VALUES('0204'),
      PART 205 VALUES('0205'),
      PART 206 VALUES('0206'),
      PART 207 VALUES('0207'),
      PART 208 VALUES('0208'),
      PART 209 VALUES('0209'),
      PART 210 VALUES('0210'),
      PART 211 VALUES('0211'),
      PART 212 VALUES('0212'),
      PART 213 VALUES('0213'),
      PART 214 VALUES('0214'),
      PART 215 VALUES('0215'),
      PART 216 VALUES('0216'),
      PART 217 VALUES('0217'),
      PART 218 VALUES('0218'),
      PART 219 VALUES('0219'),
      PART 220 VALUES('0220'),
      PART 221 VALUES('0221'),
      PART 222 VALUES('0222'),
      PART 223 VALUES('0223'),
      PART 224 VALUES('0224'),
      PART 225 VALUES('0225'),
      PART 226 VALUES('0226'),
      PART 227 VALUES('0227'),
      PART 228 VALUES('0228'),
      PART 229 VALUES('0229'),
      PART 230 VALUES('0230'),
      PART 231 VALUES('0231'),
      PART 232 VALUES('0232'),
      PART 233 VALUES('0233'),
      PART 234 VALUES('0234'),
      PART 235 VALUES('0235'),
      PART 236 VALUES('0236'),
      PART 237 VALUES('0237'),
      PART 238 VALUES('0238'),
      PART 239 VALUES('0239'),
      PART 240 VALUES('0240'),
      PART 241 VALUES('0241'),
      PART 242 VALUES('0242'),
      PART 243 VALUES('0243'),
      PART 244 VALUES('0244'),
      PART 245 VALUES('0245'),
      PART 246 VALUES('0246'),
      PART 247 VALUES('0247'),
      PART 248 VALUES('0248'),
      PART 249 VALUES('0249'),
      PART 250 VALUES('0250'),
      PART 251 VALUES('0251'),
      PART 252 VALUES('0252'),
      PART 253 VALUES('0253'),
      PART 254 VALUES('0254')
     )
    IN XC01A1P.A200A00
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
  COMMENT ON TABLE OA1P00.TXC200A1 IS 'EOS Repository: Doc-Content 0';

  CREATE UNIQUE INDEX OA1P00.IXC200A10
    ON OA1P00.TXC200A1
     (XC200_DOC_PART_NO     ASC,
      XC200_UUID_DOC_B      ASC,
      XC200_DOC_FRMT        ASC,
      XC200_DOC_CONT_TYP    ASC,
      XC200_DOC_SEGM_SEQ    ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE  0 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    PARTITIONED
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES;
--
  COMMIT;
}¢--- A540769.WK.SQL(XC200DDO) cre=2010-05-10 mod=2010-05-10-10.28.35 A540769 ---
  SET CURRENT SQLID='S100447 ';
--
  CREATE TABLESPACE A200A00
    IN XC01A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    DSSIZE 4 G
    NUMPARTS 254
    BUFFERPOOL BP32K
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS NO
    CCSID      EBCDIC
    LOCKPART YES
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
  CREATE TABLE OA1P00.TXC200A1
     (XC200_DOC_PART_NO    CHAR(4) FOR SBCS DATA NOT NULL,
      XC200_UUID_DOC_B     CHAR(16) FOR BIT DATA NOT NULL,
      XC200_DOC_FRMT       CHAR(3) FOR SBCS DATA NOT NULL,
      XC200_DOC_CONT_TYP   INTEGER NOT NULL,
      XC200_DOC_SEGM_SEQ   INTEGER NOT NULL,
      XC200_DOC_SEGM       VARCHAR(32000) FOR BIT DATA NOT NULL,
      CONSTRAINT XC200_DOC_PART_NO
      PRIMARY KEY (XC200_DOC_PART_NO,
                   XC200_UUID_DOC_B,
                   XC200_DOC_FRMT,
                   XC200_DOC_CONT_TYP,
                   XC200_DOC_SEGM_SEQ))
    IN XC01A1P.A200A00
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
  COMMENT ON TABLE OA1P00.TXC200A1 IS 'EOS Repository: Doc-Content 0';

  CREATE UNIQUE INDEX OA1P00.IXC200A10
    ON OA1P00.TXC200A1
     (XC200_DOC_PART_NO     ASC,
      XC200_UUID_DOC_B      ASC,
      XC200_DOC_FRMT        ASC,
      XC200_DOC_CONT_TYP    ASC,
      XC200_DOC_SEGM_SEQ    ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 50 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    COMPRESS NO
     (PART 1 VALUES('0001'),
      PART 2 VALUES('0002'),
      PART 3 VALUES('0003'),
      PART 4 VALUES('0004'),
      PART 5 VALUES('0005'),
      PART 6 VALUES('0006'),
      PART 7 VALUES('0007'),
      PART 8 VALUES('0008'),
      PART 9 VALUES('0009'),
      PART 10 VALUES('0010'),
      PART 11 VALUES('0011'),
      PART 12 VALUES('0012'),
      PART 13 VALUES('0013'),
      PART 14 VALUES('0014'),
      PART 15 VALUES('0015'),
      PART 16 VALUES('0016'),
      PART 17 VALUES('0017'),
      PART 18 VALUES('0018'),
      PART 19 VALUES('0019'),
      PART 20 VALUES('0020'),
      PART 21 VALUES('0021'),
      PART 22 VALUES('0022'),
      PART 23 VALUES('0023'),
      PART 24 VALUES('0024'),
      PART 25 VALUES('0025'),
      PART 26 VALUES('0026'),
      PART 27 VALUES('0027'),
      PART 28 VALUES('0028'),
      PART 29 VALUES('0029'),
      PART 30 VALUES('0030'),
      PART 31 VALUES('0031'),
      PART 32 VALUES('0032'),
      PART 33 VALUES('0033'),
      PART 34 VALUES('0034'),
      PART 35 VALUES('0035'),
      PART 36 VALUES('0036'),
      PART 37 VALUES('0037'),
      PART 38 VALUES('0038'),
      PART 39 VALUES('0039'),
      PART 40 VALUES('0040'),
      PART 41 VALUES('0041'),
      PART 42 VALUES('0042'),
      PART 43 VALUES('0043'),
      PART 44 VALUES('0044'),
      PART 45 VALUES('0045'),
      PART 46 VALUES('0046'),
      PART 47 VALUES('0047'),
      PART 48 VALUES('0048'),
      PART 49 VALUES('0049'),
      PART 50 VALUES('0050'),
      PART 51 VALUES('0051'),
      PART 52 VALUES('0052'),
      PART 53 VALUES('0053'),
      PART 54 VALUES('0054'),
      PART 55 VALUES('0055'),
      PART 56 VALUES('0056'),
      PART 57 VALUES('0057'),
      PART 58 VALUES('0058'),
      PART 59 VALUES('0059'),
      PART 60 VALUES('0060'),
      PART 61 VALUES('0061'),
      PART 62 VALUES('0062'),
      PART 63 VALUES('0063'),
      PART 64 VALUES('0064'),
      PART 65 VALUES('0065'),
      PART 66 VALUES('0066'),
      PART 67 VALUES('0067'),
      PART 68 VALUES('0068'),
      PART 69 VALUES('0069'),
      PART 70 VALUES('0070'),
      PART 71 VALUES('0071'),
      PART 72 VALUES('0072'),
      PART 73 VALUES('0073'),
      PART 74 VALUES('0074'),
      PART 75 VALUES('0075'),
      PART 76 VALUES('0076'),
      PART 77 VALUES('0077'),
      PART 78 VALUES('0078'),
      PART 79 VALUES('0079'),
      PART 80 VALUES('0080'),
      PART 81 VALUES('0081'),
      PART 82 VALUES('0082'),
      PART 83 VALUES('0083'),
      PART 84 VALUES('0084'),
      PART 85 VALUES('0085'),
      PART 86 VALUES('0086'),
      PART 87 VALUES('0087'),
      PART 88 VALUES('0088'),
      PART 89 VALUES('0089'),
      PART 90 VALUES('0090'),
      PART 91 VALUES('0091'),
      PART 92 VALUES('0092'),
      PART 93 VALUES('0093'),
      PART 94 VALUES('0094'),
      PART 95 VALUES('0095'),
      PART 96 VALUES('0096'),
      PART 97 VALUES('0097'),
      PART 98 VALUES('0098'),
      PART 99 VALUES('0099'),
      PART 100 VALUES('0100'),
      PART 101 VALUES('0101'),
      PART 102 VALUES('0102'),
      PART 103 VALUES('0103'),
      PART 104 VALUES('0104'),
      PART 105 VALUES('0105'),
      PART 106 VALUES('0106'),
      PART 107 VALUES('0107'),
      PART 108 VALUES('0108'),
      PART 109 VALUES('0109'),
      PART 110 VALUES('0110'),
      PART 111 VALUES('0111'),
      PART 112 VALUES('0112'),
      PART 113 VALUES('0113'),
      PART 114 VALUES('0114'),
      PART 115 VALUES('0115'),
      PART 116 VALUES('0116'),
      PART 117 VALUES('0117'),
      PART 118 VALUES('0118'),
      PART 119 VALUES('0119'),
      PART 120 VALUES('0120'),
      PART 121 VALUES('0121'),
      PART 122 VALUES('0122'),
      PART 123 VALUES('0123'),
      PART 124 VALUES('0124'),
      PART 125 VALUES('0125'),
      PART 126 VALUES('0126'),
      PART 127 VALUES('0127'),
      PART 128 VALUES('0128'),
      PART 129 VALUES('0129'),
      PART 130 VALUES('0130'),
      PART 131 VALUES('0131'),
      PART 132 VALUES('0132'),
      PART 133 VALUES('0133'),
      PART 134 VALUES('0134'),
      PART 135 VALUES('0135'),
      PART 136 VALUES('0136'),
      PART 137 VALUES('0137'),
      PART 138 VALUES('0138'),
      PART 139 VALUES('0139'),
      PART 140 VALUES('0140'),
      PART 141 VALUES('0141'),
      PART 142 VALUES('0142'),
      PART 143 VALUES('0143'),
      PART 144 VALUES('0144'),
      PART 145 VALUES('0145'),
      PART 146 VALUES('0146'),
      PART 147 VALUES('0147'),
      PART 148 VALUES('0148'),
      PART 149 VALUES('0149'),
      PART 150 VALUES('0150'),
      PART 151 VALUES('0151'),
      PART 152 VALUES('0152'),
      PART 153 VALUES('0153'),
      PART 154 VALUES('0154'),
      PART 155 VALUES('0155'),
      PART 156 VALUES('0156'),
      PART 157 VALUES('0157'),
      PART 158 VALUES('0158'),
      PART 159 VALUES('0159'),
      PART 160 VALUES('0160'),
      PART 161 VALUES('0161'),
      PART 162 VALUES('0162'),
      PART 163 VALUES('0163'),
      PART 164 VALUES('0164'),
      PART 165 VALUES('0165'),
      PART 166 VALUES('0166'),
      PART 167 VALUES('0167'),
      PART 168 VALUES('0168'),
      PART 169 VALUES('0169'),
      PART 170 VALUES('0170'),
      PART 171 VALUES('0171'),
      PART 172 VALUES('0172'),
      PART 173 VALUES('0173'),
      PART 174 VALUES('0174'),
      PART 175 VALUES('0175'),
      PART 176 VALUES('0176'),
      PART 177 VALUES('0177'),
      PART 178 VALUES('0178'),
      PART 179 VALUES('0179'),
      PART 180 VALUES('0180'),
      PART 181 VALUES('0181'),
      PART 182 VALUES('0182'),
      PART 183 VALUES('0183'),
      PART 184 VALUES('0184'),
      PART 185 VALUES('0185'),
      PART 186 VALUES('0186'),
      PART 187 VALUES('0187'),
      PART 188 VALUES('0188'),
      PART 189 VALUES('0189'),
      PART 190 VALUES('0190'),
      PART 191 VALUES('0191'),
      PART 192 VALUES('0192'),
      PART 193 VALUES('0193'),
      PART 194 VALUES('0194'),
      PART 195 VALUES('0195'),
      PART 196 VALUES('0196'),
      PART 197 VALUES('0197'),
      PART 198 VALUES('0198'),
      PART 199 VALUES('0199'),
      PART 200 VALUES('0200'),
      PART 201 VALUES('0201'),
      PART 202 VALUES('0202'),
      PART 203 VALUES('0203'),
      PART 204 VALUES('0204'),
      PART 205 VALUES('0205'),
      PART 206 VALUES('0206'),
      PART 207 VALUES('0207'),
      PART 208 VALUES('0208'),
      PART 209 VALUES('0209'),
      PART 210 VALUES('0210'),
      PART 211 VALUES('0211'),
      PART 212 VALUES('0212'),
      PART 213 VALUES('0213'),
      PART 214 VALUES('0214'),
      PART 215 VALUES('0215'),
      PART 216 VALUES('0216'),
      PART 217 VALUES('0217'),
      PART 218 VALUES('0218'),
      PART 219 VALUES('0219'),
      PART 220 VALUES('0220'),
      PART 221 VALUES('0221'),
      PART 222 VALUES('0222'),
      PART 223 VALUES('0223'),
      PART 224 VALUES('0224'),
      PART 225 VALUES('0225'),
      PART 226 VALUES('0226'),
      PART 227 VALUES('0227'),
      PART 228 VALUES('0228'),
      PART 229 VALUES('0229'),
      PART 230 VALUES('0230'),
      PART 231 VALUES('0231'),
      PART 232 VALUES('0232'),
      PART 233 VALUES('0233'),
      PART 234 VALUES('0234'),
      PART 235 VALUES('0235'),
      PART 236 VALUES('0236'),
      PART 237 VALUES('0237'),
      PART 238 VALUES('0238'),
      PART 239 VALUES('0239'),
      PART 240 VALUES('0240'),
      PART 241 VALUES('0241'),
      PART 242 VALUES('0242'),
      PART 243 VALUES('0243'),
      PART 244 VALUES('0244'),
      PART 245 VALUES('0245'),
      PART 246 VALUES('0246'),
      PART 247 VALUES('0247'),
      PART 248 VALUES('0248'),
      PART 249 VALUES('0249'),
      PART 250 VALUES('0250'),
      PART 251 VALUES('0251'),
      PART 252 VALUES('0252'),
      PART 253 VALUES('0253'),
      PART 254 VALUES('0254'))
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES;
--
  COMMIT;
}¢--- A540769.WK.SQL(XC200DDX) cre=2010-05-10 mod=2010-05-10-10.41.05 A540769 ---
  SET CURRENT SQLID='S100447 ';
--
  CREATE TABLESPACE A200A00
    IN dA540769
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    DSSIZE 32 G
    NUMPARTS 254
    BUFFERPOOL BP32K
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS NO
    CCSID      EBCDIC
    LOCKPART YES
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
  CREATE TABLE OA1P00.TXC200A1
     (XC200_DOC_PART_NO    CHAR(4) FOR SBCS DATA NOT NULL,
      XC200_UUID_DOC_B     CHAR(16) FOR BIT DATA NOT NULL,
      XC200_DOC_FRMT       CHAR(3) FOR SBCS DATA NOT NULL,
      XC200_DOC_CONT_TYP   INTEGER NOT NULL,
      XC200_DOC_SEGM_SEQ   INTEGER NOT NULL,
      XC200_DOC_SEGM       VARCHAR(32000) FOR BIT DATA NOT NULL,
      CONSTRAINT XC200_DOC_PART_NO
      PRIMARY KEY (XC200_DOC_PART_NO,
                   XC200_UUID_DOC_B,
                   XC200_DOC_FRMT,
                   XC200_DOC_CONT_TYP,
                   XC200_DOC_SEGM_SEQ))
      PARTITION BY (XC200_DOC_PART_NO     ASC)
     (PART 1 VALUES('0001'),
      PART 2 VALUES('0002'),
      PART 3 VALUES('0003'),
      PART 4 VALUES('0004'),
      PART 5 VALUES('0005'),
      PART 6 VALUES('0006'),
      PART 7 VALUES('0007'),
      PART 8 VALUES('0008'),
      PART 9 VALUES('0009'),
      PART 10 VALUES('0010'),
      PART 11 VALUES('0011'),
      PART 12 VALUES('0012'),
      PART 13 VALUES('0013'),
      PART 14 VALUES('0014'),
      PART 15 VALUES('0015'),
      PART 16 VALUES('0016'),
      PART 17 VALUES('0017'),
      PART 18 VALUES('0018'),
      PART 19 VALUES('0019'),
      PART 20 VALUES('0020'),
      PART 21 VALUES('0021'),
      PART 22 VALUES('0022'),
      PART 23 VALUES('0023'),
      PART 24 VALUES('0024'),
      PART 25 VALUES('0025'),
      PART 26 VALUES('0026'),
      PART 27 VALUES('0027'),
      PART 28 VALUES('0028'),
      PART 29 VALUES('0029'),
      PART 30 VALUES('0030'),
      PART 31 VALUES('0031'),
      PART 32 VALUES('0032'),
      PART 33 VALUES('0033'),
      PART 34 VALUES('0034'),
      PART 35 VALUES('0035'),
      PART 36 VALUES('0036'),
      PART 37 VALUES('0037'),
      PART 38 VALUES('0038'),
      PART 39 VALUES('0039'),
      PART 40 VALUES('0040'),
      PART 41 VALUES('0041'),
      PART 42 VALUES('0042'),
      PART 43 VALUES('0043'),
      PART 44 VALUES('0044'),
      PART 45 VALUES('0045'),
      PART 46 VALUES('0046'),
      PART 47 VALUES('0047'),
      PART 48 VALUES('0048'),
      PART 49 VALUES('0049'),
      PART 50 VALUES('0050'),
      PART 51 VALUES('0051'),
      PART 52 VALUES('0052'),
      PART 53 VALUES('0053'),
      PART 54 VALUES('0054'),
      PART 55 VALUES('0055'),
      PART 56 VALUES('0056'),
      PART 57 VALUES('0057'),
      PART 58 VALUES('0058'),
      PART 59 VALUES('0059'),
      PART 60 VALUES('0060'),
      PART 61 VALUES('0061'),
      PART 62 VALUES('0062'),
      PART 63 VALUES('0063'),
      PART 64 VALUES('0064'),
      PART 65 VALUES('0065'),
      PART 66 VALUES('0066'),
      PART 67 VALUES('0067'),
      PART 68 VALUES('0068'),
      PART 69 VALUES('0069'),
      PART 70 VALUES('0070'),
      PART 71 VALUES('0071'),
      PART 72 VALUES('0072'),
      PART 73 VALUES('0073'),
      PART 74 VALUES('0074'),
      PART 75 VALUES('0075'),
      PART 76 VALUES('0076'),
      PART 77 VALUES('0077'),
      PART 78 VALUES('0078'),
      PART 79 VALUES('0079'),
      PART 80 VALUES('0080'),
      PART 81 VALUES('0081'),
      PART 82 VALUES('0082'),
      PART 83 VALUES('0083'),
      PART 84 VALUES('0084'),
      PART 85 VALUES('0085'),
      PART 86 VALUES('0086'),
      PART 87 VALUES('0087'),
      PART 88 VALUES('0088'),
      PART 89 VALUES('0089'),
      PART 90 VALUES('0090'),
      PART 91 VALUES('0091'),
      PART 92 VALUES('0092'),
      PART 93 VALUES('0093'),
      PART 94 VALUES('0094'),
      PART 95 VALUES('0095'),
      PART 96 VALUES('0096'),
      PART 97 VALUES('0097'),
      PART 98 VALUES('0098'),
      PART 99 VALUES('0099'),
      PART 100 VALUES('0100'),
      PART 101 VALUES('0101'),
      PART 102 VALUES('0102'),
      PART 103 VALUES('0103'),
      PART 104 VALUES('0104'),
      PART 105 VALUES('0105'),
      PART 106 VALUES('0106'),
      PART 107 VALUES('0107'),
      PART 108 VALUES('0108'),
      PART 109 VALUES('0109'),
      PART 110 VALUES('0110'),
      PART 111 VALUES('0111'),
      PART 112 VALUES('0112'),
      PART 113 VALUES('0113'),
      PART 114 VALUES('0114'),
      PART 115 VALUES('0115'),
      PART 116 VALUES('0116'),
      PART 117 VALUES('0117'),
      PART 118 VALUES('0118'),
      PART 119 VALUES('0119'),
      PART 120 VALUES('0120'),
      PART 121 VALUES('0121'),
      PART 122 VALUES('0122'),
      PART 123 VALUES('0123'),
      PART 124 VALUES('0124'),
      PART 125 VALUES('0125'),
      PART 126 VALUES('0126'),
      PART 127 VALUES('0127'),
      PART 128 VALUES('0128'),
      PART 129 VALUES('0129'),
      PART 130 VALUES('0130'),
      PART 131 VALUES('0131'),
      PART 132 VALUES('0132'),
      PART 133 VALUES('0133'),
      PART 134 VALUES('0134'),
      PART 135 VALUES('0135'),
      PART 136 VALUES('0136'),
      PART 137 VALUES('0137'),
      PART 138 VALUES('0138'),
      PART 139 VALUES('0139'),
      PART 140 VALUES('0140'),
      PART 141 VALUES('0141'),
      PART 142 VALUES('0142'),
      PART 143 VALUES('0143'),
      PART 144 VALUES('0144'),
      PART 145 VALUES('0145'),
      PART 146 VALUES('0146'),
      PART 147 VALUES('0147'),
      PART 148 VALUES('0148'),
      PART 149 VALUES('0149'),
      PART 150 VALUES('0150'),
      PART 151 VALUES('0151'),
      PART 152 VALUES('0152'),
      PART 153 VALUES('0153'),
      PART 154 VALUES('0154'),
      PART 155 VALUES('0155'),
      PART 156 VALUES('0156'),
      PART 157 VALUES('0157'),
      PART 158 VALUES('0158'),
      PART 159 VALUES('0159'),
      PART 160 VALUES('0160'),
      PART 161 VALUES('0161'),
      PART 162 VALUES('0162'),
      PART 163 VALUES('0163'),
      PART 164 VALUES('0164'),
      PART 165 VALUES('0165'),
      PART 166 VALUES('0166'),
      PART 167 VALUES('0167'),
      PART 168 VALUES('0168'),
      PART 169 VALUES('0169'),
      PART 170 VALUES('0170'),
      PART 171 VALUES('0171'),
      PART 172 VALUES('0172'),
      PART 173 VALUES('0173'),
      PART 174 VALUES('0174'),
      PART 175 VALUES('0175'),
      PART 176 VALUES('0176'),
      PART 177 VALUES('0177'),
      PART 178 VALUES('0178'),
      PART 179 VALUES('0179'),
      PART 180 VALUES('0180'),
      PART 181 VALUES('0181'),
      PART 182 VALUES('0182'),
      PART 183 VALUES('0183'),
      PART 184 VALUES('0184'),
      PART 185 VALUES('0185'),
      PART 186 VALUES('0186'),
      PART 187 VALUES('0187'),
      PART 188 VALUES('0188'),
      PART 189 VALUES('0189'),
      PART 190 VALUES('0190'),
      PART 191 VALUES('0191'),
      PART 192 VALUES('0192'),
      PART 193 VALUES('0193'),
      PART 194 VALUES('0194'),
      PART 195 VALUES('0195'),
      PART 196 VALUES('0196'),
      PART 197 VALUES('0197'),
      PART 198 VALUES('0198'),
      PART 199 VALUES('0199'),
      PART 200 VALUES('0200'),
      PART 201 VALUES('0201'),
      PART 202 VALUES('0202'),
      PART 203 VALUES('0203'),
      PART 204 VALUES('0204'),
      PART 205 VALUES('0205'),
      PART 206 VALUES('0206'),
      PART 207 VALUES('0207'),
      PART 208 VALUES('0208'),
      PART 209 VALUES('0209'),
      PART 210 VALUES('0210'),
      PART 211 VALUES('0211'),
      PART 212 VALUES('0212'),
      PART 213 VALUES('0213'),
      PART 214 VALUES('0214'),
      PART 215 VALUES('0215'),
      PART 216 VALUES('0216'),
      PART 217 VALUES('0217'),
      PART 218 VALUES('0218'),
      PART 219 VALUES('0219'),
      PART 220 VALUES('0220'),
      PART 221 VALUES('0221'),
      PART 222 VALUES('0222'),
      PART 223 VALUES('0223'),
      PART 224 VALUES('0224'),
      PART 225 VALUES('0225'),
      PART 226 VALUES('0226'),
      PART 227 VALUES('0227'),
      PART 228 VALUES('0228'),
      PART 229 VALUES('0229'),
      PART 230 VALUES('0230'),
      PART 231 VALUES('0231'),
      PART 232 VALUES('0232'),
      PART 233 VALUES('0233'),
      PART 234 VALUES('0234'),
      PART 235 VALUES('0235'),
      PART 236 VALUES('0236'),
      PART 237 VALUES('0237'),
      PART 238 VALUES('0238'),
      PART 239 VALUES('0239'),
      PART 240 VALUES('0240'),
      PART 241 VALUES('0241'),
      PART 242 VALUES('0242'),
      PART 243 VALUES('0243'),
      PART 244 VALUES('0244'),
      PART 245 VALUES('0245'),
      PART 246 VALUES('0246'),
      PART 247 VALUES('0247'),
      PART 248 VALUES('0248'),
      PART 249 VALUES('0249'),
      PART 250 VALUES('0250'),
      PART 251 VALUES('0251'),
      PART 252 VALUES('0252'),
      PART 253 VALUES('0253'),
      PART 254 VALUES('0254'))
    IN dA540769.A200A00
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
  COMMENT ON TABLE OA1P00.TXC200A1 IS 'EOS Repository: Doc-Content 0';

  CREATE UNIQUE INDEX OA1P00.IXC200A10
    ON OA1P00.TXC200A1
     (XC200_DOC_PART_NO     ASC,
      XC200_UUID_DOC_B      ASC,
      XC200_DOC_FRMT        ASC,
      XC200_DOC_CONT_TYP    ASC,
      XC200_DOC_SEGM_SEQ    ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE  0 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    PARTITIONED
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES;
--
  COMMIT;
}¢--- A540769.WK.SQL(XC200REO) cre=2011-04-11 mod=2011-04-11-11.48.17 A540769 ---
$#@
$>.fSub()
$@=¢
$=parts=300
$=stp  =10
//A540769W JOB (CP00,KE50),'DB2 REO',
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBTF,'A540769W.REORG'),
//   REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBTF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
$@do px=1 to $parts by $stp $@=¢
     $=tx=- min($parts,$px+$stp-1)
     REORG TABLESPACE XC01A1T.A200A07 PART($px : $tx)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
$!
$!
$#out                                              20110411 11:19:56
$#out                                              20110411 11:18:21
//A540769W JOB (CP00,KE50),'DB2 REO',
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBTF,'A540769W.REORG'),
//   REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBTF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
     REORG TABLESPACE XC01A1T.A200A07 PART(1 : 10)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(11 : 20)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(21 : 30)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(31 : 40)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(41 : 50)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(51 : 60)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(61 : 70)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(71 : 80)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(81 : 90)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(91 : 100)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(101 : 110)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(111 : 120)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(121 : 130)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(131 : 140)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(141 : 150)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(151 : 160)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(161 : 170)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(171 : 180)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(181 : 190)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(191 : 200)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(201 : 210)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(211 : 220)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(221 : 230)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(231 : 240)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(241 : 250)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(251 : 260)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(261 : 270)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(271 : 280)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(281 : 290)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
     REORG TABLESPACE XC01A1T.A200A07 PART(291 : 300)
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB07
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLDDN TSRECD
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISC
         SORTKEYS
         SORTDEVT DISK
     --  SORTNUM  155
         STATISTICS
           INDEX ALL KEYCARD
           UPDATE ALL
$#out
}¢--- A540769.WK.SQL(XC200RTS) cre=2011-04-11 mod=2011-04-11-11.59.25 A540769 ---
select partition, nActive, nPages, space, datasize, r.*
    from sysibm.sysTableSpaceStats r
    where dbname = 'XC01A1T' and name = 'A200A07'
    order by partition
;;;
set current sqlid = 'S100447';
?lter tablespace XC01A1T.A200A07
    compress yes
;
commit
;
}¢--- A540769.WK.SQL(XC401) cre=2016-03-30 mod=2016-03-30-11.11.04 A540769 -----
alter tablespace xc01a1p.a401a locksize row
}¢--- A540769.WK.SQL(XML) cre=2007-10-18 mod=2007-10-18-18.25.03 F540769 -------
select xml2clob(xmlelement(name  "eins"
    ,  xmlAttributes('attributeEins' as "a1"
                   , 'attributeZwei' as "a2")
    , 'inhalt', 'und mehr'))
    from sysibm.sysdummy1;
select xml2clob(xmlforest('erstens'  as eins
    ,                     'zweitens' as "e2"))
    from sysibm.sysdummy1
}¢--- A540769.WK.SQL(XUP1) cre=2006-12-05 mod=2006-12-05-14.44.22 F540769 ------
-- select MAX(DECIMAL(STRIP(WK009ID))) from A540769.TWK009A ;
insert into A540769.TWK009A (wk009id, wk009Txt)
    select char(MAX(DECIMAL(STRIP(WK009ID), 7))+1), 'mx1'
        from A540769.TWK009A ;
insert into A540769.TWK009A (wk009id, wk009Txt)
    select char(MAX(DECIMAL(STRIP(WK009ID), 7))+1), 'mx2'
        from A540769.TWK009A ;
insert into A540769.TWK009A (wk009id, wk009Txt)
    select char(MAX(DECIMAL(STRIP(WK009ID), 7))+1), 'mx3'
        from A540769.TWK009A ;

SELECT *            from A540769.TWK009A ;
}¢--- A540769.WK.SQL(XXRTCXD) cre=2006-09-29 mod=2006-09-29-12.03.12 F540769 ---
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBTF (810)     Extract time : 2006-09-29 11:59 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=Y TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
CREATE DATABASE SU01A1Z
  BUFFERPOOL BP2
  INDEXBP    BP1
  CCSID      EBCDIC
  STOGROUP   GSMS;
COMMIT;
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=XXRSCXD In Database SU01A1T   --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=SU01A1Z   Stogroup=GSMS
-- Tablespace=SU01A1Z.XXRSCXD
------------------------------------------------------------------------
--
  CREATE TABLESPACE XXRSCXD
    IN SU01A1Z
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
------------------------------------------------------------------------
--    Table=OA1Z.XXRTCXD In SU01A1Z.XXRSCXD
------------------------------------------------------------------------
--
  CREATE TABLE OA1Z.XXRTCXD
     (XXRDATCLIENT         CHAR(8) FOR SBCS DATA NOT NULL,
      XXRDATENV            CHAR(8) FOR SBCS DATA NOT NULL,
      XXRDATINFO           CHAR(8) FOR SBCS DATA NOT NULL,
      CXDKEYCTM            CHAR(20) FOR SBCS DATA NOT NULL,
      CXDKEYLIB            CHAR(44) FOR SBCS DATA NOT NULL,
      CXDAPPL              CHAR(20) FOR SBCS DATA NOT NULL,
      CXDKEYTABLE          CHAR(20) FOR SBCS DATA NOT NULL,
      CXDKEYTYP            CHAR(1) FOR SBCS DATA NOT NULL,
      CXDKEYNUM            INTEGER NOT NULL,
      CXDMEMNAME           CHAR(30) FOR SBCS DATA NOT NULL,
      CXDCONDNAME          CHAR(100) FOR SBCS DATA NOT NULL,
      CXDSOCDATE           CHAR(4) FOR SBCS DATA NOT NULL,
      CXDOPTION            CHAR(2) FOR SBCS DATA NOT NULL,
      CXDOWNER             CHAR(30) FOR SBCS DATA NOT NULL,
      CXDTASKTYPE          CHAR(3) FOR SBCS DATA NOT NULL,
      CXDGROUP             CHAR(20) FOR SBCS DATA NOT NULL,
      CXDDESC              CHAR(50) FOR SBCS DATA NOT NULL)
    IN SU01A1Z.XXRSCXD
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE OA1Z.XXRTCXD IS 'CTM - IN-/OUT-CONDITIONS';
--
  LABEL ON OA1Z.XXRTCXD
   (CXDDESC IS 'DESCRIPTION',
    CXDGROUP IS 'GROUP',
    CXDTASKTYPE IS 'TASKTYPE',
    CXDOWNER IS 'OWNER',
    CXDOPTION IS 'OPTION (+,-,O,A,'''')',
    CXDSOCDATE IS 'OCCURRENCE-DATE',
    CXDCONDNAME IS 'CONDITION-NAME',
    CXDMEMNAME IS 'MEMBER/JOBNAME',
    CXDKEYNUM IS 'UNIQUE NUMBER',
    CXDKEYTYP IS 'TYPE (JOB/GROUP)',
    CXDKEYTABLE IS 'TABLE',
    CXDAPPL IS 'APPLICATION',
    CXDKEYLIB IS 'SCHEDULE-LIBRARY',
    CXDKEYCTM IS 'SUBSYS/DATACENTER',
    XXRDATINFO IS 'DATADDINFO',
    XXRDATENV IS 'ENVIRONMENT',
    XXRDATCLIENT IS 'CLIENT');
--
------------------------------------------------------------------------
-- Database=SU01A1Z
--    Index=OA1Z.XXRXCXD0 On OA1Z.XXRTCXD
------------------------------------------------------------------------
--
  CREATE INDEX OA1Z.XXRXCXD0
    ON OA1Z.XXRTCXD
     (CXDMEMNAME            ASC,
      CXDKEYTABLE           ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
------------------------------------------------------------------------
-- Database=SU01A1Z
--    Index=OA1Z.XXRXCXD1 On OA1Z.XXRTCXD
------------------------------------------------------------------------
--
  CREATE INDEX OA1Z.XXRXCXD1
    ON OA1Z.XXRTCXD
     (CXDCONDNAME           ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    NOT CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(XXRTCXG) cre= mod= ----------------------------------------
------------------------------------------------------------------------
--                                                                    --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 (C)  --
--                                                                    --
-- ADB2GEN  -  Extract object definitions from the DB2 Catalog tables --
--                                                                    --
-- Input prepared on : DBTF (810)     Extract time : 2006-10-20 10:44 --
--                                                                    --
-- Catalog values overridden : none
--                                                                    --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y  --
--            TG=Y UT=N UF=N SP=N SQ=N                                --
-- Grants   : SG=N DB=Y TS=Y TB=N VW=N SC=N UT=N UF=N SP=N SQ=N       --
--                                                                    --
------------------------------------------------------------------------
--
  SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Tablespace=A031A In Database DB2ADMIN    --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=DB2ADMIN   Stogroup=GSMS
-- Tablespace=DB2ADMIN.A031A
------------------------------------------------------------------------
--
  CREATE TABLESPACE A031A
    IN DB2ADMIN
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
------------------------------------------------------------------------
--    Table=OA1T.TADM31A1 In DB2ADMIN.A031A
------------------------------------------------------------------------
--
  CREATE TABLE OA1T.TADM31A1
     (DB_NAME              CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      DD_NAME              CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      RUNTIME              TIMESTAMP NOT NULL WITH DEFAULT,
      RNMNAME              CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      HI_ALLOC             DECIMAL(15, 0) NOT NULL WITH DEFAULT,
      BLKSIZE              INTEGER NOT NULL WITH DEFAULT,
      FREESPC              DECIMAL(15, 0) NOT NULL WITH DEFAULT,
      FREESPCP             DECIMAL(10, 2) NOT NULL WITH DEFAULT,
      TRK_PRIM             INTEGER NOT NULL WITH DEFAULT,
      TRK_SEC              INTEGER NOT NULL WITH DEFAULT,
      EXTENTS              SMALLINT NOT NULL WITH DEFAULT,
      HI_CISPLIT           INTEGER NOT NULL WITH DEFAULT,
      HI_CASPLIT           INTEGER NOT NULL WITH DEFAULT,
      DB_TYP               CHAR(6) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      DB_ACCESS            CHAR(4) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      DB_USE               CHAR(12) FOR SBCS DATA NOT NULL
        WITH DEFAULT)
    IN DB2ADMIN.A031A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE OA1T.TADM31A1 IS 'SPACEWERTE IMS AUS PCP';
--
  LABEL ON OA1T.TADM31A1
   (DB_USE IS 'VERWENDUNG',
    DB_ACCESS IS 'DB-ACCESS',
    DB_TYP IS 'DATENBANKTYP',
    HI_CASPLIT IS 'ANZAHL CA-SPLITS',
    HI_CISPLIT IS 'ANZAHL CI-SPLITS',
    EXTENTS IS 'ANZAHL EXTENTS',
    TRK_SEC IS 'SECONDARY ALLOCATED TRACKS',
    TRK_PRIM IS 'PRIMARY ALLOCATED TRACKS',
    FREESPCP IS 'TOTAL FREESPACE IN %',
    FREESPC IS 'TOTAL BYTES FREESPACE',
    BLKSIZE IS 'BLOCKSIZE',
    HI_ALLOC IS 'HIGH ALLOCATED BYTES',
    RNMNAME IS 'RANDOMIZER NAME',
    RUNTIME IS 'RUNTIME',
    DD_NAME IS 'DD NAME',
    DB_NAME IS 'DB NAME');
--
------------------------------------------------------------------------
-- Database=DB2ADMIN
--    Index=OA1T.IADM31A1 On OA1T.TADM31A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX OA1T.IADM31A1
    ON OA1T.TADM31A1
     (DB_NAME               ASC,
      DD_NAME               ASC,
      RUNTIME               ASC)
    USING STOGROUP GSMS
    PRIQTY 48 SECQTY 7200
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL                                     --
------------------------------------------------------------------------
--
}¢--- A540769.WK.SQL(XXXXX) cre=2006-09-21 mod=2006-09-21-14.56.45 F540769 -----
--
  LABEL ON TABLE GDB0448.TZV004A1 IS 'BEST. KORRESPONDENZCHECK';
--
  LABEL   ON GDB0448.TZV004A1
   (ZV00413 IS 'ERSTELLER ID',
    ZV00412 IS 'ERSTELLUNGSZEITPUNKT',
    ZV00411 IS 'BEARBEITER ID',
    ZV00410 IS 'MUTATIONSZEITPUNKT',
    ZV00409 IS 'VERSANDCODE',
    ZV00408 IS 'AUFBEWAHRUNGSCODE',
    ZV00407 IS 'BESTELLDATUM',
    ZV00406 IS 'GÜLTIG BIS',
    ZV00405 IS 'GÜLTIG AB',
    ZV00404 IS 'ANZAHL CHECKS',
    ZV00403 IS 'WAEHRUNG',
    ZV00402 IS 'LAUFNUMMER',
    ZV00401 IS 'KONTONUMMER');
--
}¢--- A540769.WK.SQL(YDIT002) cre=2014-07-07 mod=2016-11-03-09.21.23 A540769 ---
$#@
call sqlConnect dbof
$;
$<=¢
with s as
(
select distinct DI00202, DI00205, row_number() over () r
     FROM oa1p.VDI002A1A
     where di00203 = ''
)
select DI00202, DI00205 from s
     order by mod(r, 223)
$!
$@..¢sqlRdr()$!
$|
call fTabAuto
$#out                                              20140707 14:09:06
DI DI00
 2 USD
 1 0236
}¢--- A540769.WK.SQL(YDIT002R) cre=2014-07-07 mod=2014-07-07-15.25.38 A540769 ---
$#@
call sqlConnect dbof
$@inp
$do qq=1 to 5 $@¢
$=f=- 1 + (qq // 2)
sql = space( $-@¢
if $f=1 then $@=¢   origSubSel
SELECT DI00200, DI00201, DI00202, DI00203, DI00204, DI00205,
       DI00206, DI00207
    from oa1p.VDI002A1A A
    WHERE DI00201 <= ? AND DI00201 =
          ( SELECT MAX ( DI00201 )
              FROM oa1p.VDI002A1A
              WHERE DI00201 <= ?
                  AND DI00202 = A.DI00202 AND DI00203 = A.DI00203
                  AND DI00204 >= ? AND DI00205 = A.DI00205
          )
        AND DI00202 = ? AND DI00203 = '  '
        AND DI00204 >= ? AND DI00205 = ?
    $!
else if $f=2 then $@=¢ fetFi
SELECT DI00200, DI00201, DI00202, DI00203, DI00204, DI00205,
       DI00206, DI00207
    from oa1p.VDI002A1A A
    WHERE DI00201 <= ?
        AND DI00202 = ? AND DI00203 = '  '
        AND DI00204 >= ? AND DI00205 = ?
    order by di00201 desc
    fetch first 1 row only
    $!  $!, 1)
$** say sql
fun = word(sql, 1)
call sqlQueryPrep 3, subWord(sql, 2), ':m.FE0, :m.fe1, :m.fe2, :m.fe3',
                                    ', :m.FE4, :m.fe5, :m.fe6, :m.fe7'
m.timing_say = 1
call timing ,, 'prepared'
$;
cFnd = 0
cNoF = 0
v1 = '20140707'
v4 = '20140707'
$do jx=1 to m.jj.0 $@¢
   if $f=1 then
       call sqlQueryArgs 3, v1, v1, v4, m.jj.jx.d2, v4, m.jj.jx.d5
   else if $f=2 then
       call sqlQueryArgs 3, v1, m.jj.jx.d2, v4, m.jj.jx.d5
   m.fe1=''
   if sqlFetch(3, ff) then do
   $** say ${i&D2} ${i&D5} '==>' m.fe0 m.fe1 '2='m.fe2 m.fe3 m.fe4,
   $**      '5='m.fe5 m.fe6
       cFnd = cFnd +1
       end
   else do
   $** say ${i&D2} ${i&D5} '==> notfound'
       cNoF = cNoF +1
       end
   call sqlClose 3
   $!
call timing $qq fun, cFnd+cNof, cFnd 'found and' cNoF 'notFound'
$!
$proc inp $@¢
jx=0
$for i $@¢
   jx = jx+1
   m.jj.jx.d2 = right(${i&D2}, 2, 0)
   m.jj.jx.d5 = ${i&D5}
   $!
m.jj.0 = jx
$<:¢table
D2 D5
 2 USD
 1 0236
 1 2991
 1 2220
 1 1664
 1 1234
 1 0945
 1 0947
 1 1235
 1 2221
 1 1665
 1 2992
 1 0237
 2 UYI
 2 ADP
 2 AED
 2 UYN
 1 0238
 1 2993
 1 1666
 1 2222
 1 1236
 1 0949
 1 0950
 1 1237
 1 2223
 1 1667
 1 2994
 1 0239
 2 UYU
 2 AFA
 2 AFN
 2 UZS
 1 0241
 1 2995
 1 1668
 1 2224
 1 1238
 1 0952
 1 0953
 1 1239
 1 2225
 1 1669
 1 2996
 1 0242
 2 VEB
 2 ALK
 2 ALL
 2 VEF
 1 0248
 1 2997
 1 1670
 1 2226
 1 1240
 1 0955
 1 0956
 1 1241
 1 2237
 1 1671
 1 2998
 1 0249
 2 VNC
 2 AMD
 2 ANG
 2 VND
 1 0251
 1 3000
 1 1672
 1 2238
 1 1242
 1 0957
 1 0958
 1 1243
 1 2240
 1 1673
 1 3001
 1 0260
 2 VUV
 2 AOA
 2 AOK
 2 WST
 1 0261
 1 3002
 1 1674
 1 2241
 1 1244
 1 0959
 1 0960
 1 1245
 1 2242
 1 1675
 1 3003
 1 0265
 2 XAF
 2 AON
 2 AOR
 2 XAF
 1 0267
 1 3004
 1 1676
 1 2243
 1 1246
 1 0961
 1 0962
 1 1247
 1 2244
 1 1677
 1 3005
 1 0275
 2 XAF
 2 ARP
 2 ARS
 2 XAG
 1 0280
 1 3006
 1 1678
 1 2245
 1 1248
 1 0963
 1 0964
 1 1249
 1 2246
 1 1679
 1 3008
 1 0285
 2 XAU
 2 ATS
 2 AUD
 2 XBA
 1 0290
 1 3015
 1 1680
 1 2257
 1 1250
 1 0965
 1 0966
 1 1251
 1 2258
 1 1681
 1 3016
 1 0292
 2 XCD
 2 AWG
 2 AZM
 2 XDR
 1 0295
 1 3017
 1 1682
 1 2260
 1 1252
 1 0967
 1 0968
 1 1253
 1 2261
 1 1683
 1 3090
 1 0305
 2 XFO
 2 AZN
 2 BAD
 2 XOF
 1 0306
 1 3100
 1 1684
 1 2262
 1 1254
 1 0969
 1 0970
 1 1260
 1 2263
 1 1685
 1 3101
 1 0307
 2 XOF
 2 BAM
 2 BBD
 2 XOF
 1 0310
 1 3105
 1 1686
 1 2264
 1 1261
 1 0971
 1 0972
 1 1262
 1 2270
 1 1687
 1 3106
 1 0311
 2 XOF
 2 BDT
 2 BEC
 2 XOF
 1 0312
 1 3110
 1 1688
 1 2271
 1 1263
 1 0973
 1 0974
 1 1264
 1 2272
 1 1689
 1 3111
 1 0315
 2 XOF
 2 BEF
 2 BGJ
 2 XOF
 1 0320
 1 3115
 1 1690
 1 2273
 1 1270
 1 0975
 1 0976
 1 1290
 1 2274
 1 1691
 1 3120
 1 0325
 2 XPD
 2 BGK
 2 BGL
 2 XPF
 1 0331
 1 3121
 1 1692
 1 2280
 1 1291
 1 0977
 1 0978
 1 1292
 1 2281
 1 1693
 1 3125
 1 0332
 2 XPT
 2 BGN
 2 BHD
 2 XZN
 1 0335
 1 3130
 1 1694
 1 2282
 1 1301
 1 0979
 1 0980
 1 1302
 1 2283
 1 1695
 1 3210
 1 0336
 2 YDD
 2 BIF
 2 BMD
 2 YER
 1 0337
 1 3211
 1 1696
 1 2284
 1 1309
 1 0981
 1 0982
 1 1310
 1 2285
 1 1697
 1 3215
 1 0338
 2 YUD
 2 BND
 2 BOB
 2 YUM
 1 0340
 1 3220
 1 2286
 1 1698
 1 1311
 1 0983
 1 0984
 1 1312
 1 1699
 1 2297
 1 3221
 1 0345
 2 YUN
 2 BOP
 2 BOV
 2 ZAR
 1 0350
 1 3300
 1 2298
 1 1700
 1 1313
 1 0985
 1 0986
 1 1315
 1 1701
 1 2300
 1 3301
 1 0355
 2 ZMK
 2 BRB
 2 BRL
 2 ZMW
 1 0357
 1 3302
 1 2301
 1 1702
 1 1320
 1 0987
 1 0988
 1 1321
 1 1703
 1 2302
 1 3310
 1 0358
 2 ZRN
 2 BRN
 2 BSD
 2 ZRZ
 1 0360
 1 3320
 1 2303
 1 1704
 1 1322
 1 0989
 1 0990
 1 1323
 1 1705
 1 2304
 1 3330
 1 0365
 2 ZWC
 2 BTN
 2 BWP
 2 ZWD
 1 0370
 1 3331
 1 2305
 1 1706
 1 1330
 1 0991
 1 0992
 1 1331
 1 1707
 1 2306
 1 3400
 1 0375
 2 ZWL
 2 BYB
 2 BYR
 2 ZWN
 1 0380
 1 3409
 1 2313
 1 1708
 1 1332
 1 0993
 1 0994
 1 1333
 1 1709
 1 2317
 1 3410
 1 0385
 1 0001
 2 BZD
 2 CAD
 1 0002
 1 0390
 1 3412
 1 2318
 1 1710
 1 1398
 1 0995
 1 0996
 1 1399
 1 1711
 1 2320
 1 3510
 1 0395
 1 0003
 2 CDF
 2 CHF
 1 0004
 1 0400
 1 3511
 1 2321
 1 1712
 1 1400
 1 0997
 1 0998
 1 1401
 1 1713
 1 2322
 1 3550
 1 0402
 1 0005
 2 CLF
 2 CLP
 1 0006
 1 0405
 1 3711
 1 2323
 1 1714
 1 1402
 1 0999
 1 1001
 1 1403
 1 1715
 1 2324
 1 3860
 1 0415
 1 0007
 2 CNH
 2 CNX
 1 0008
 1 0420
 1 3980
 1 2329
 1 1716
 1 1410
 1 1002
 1 1003
 1 1411
 1 1717
 1 2330
 1 3981
 1 0425
 1 0009
 2 CNY
 2 COP
 1 0010
 1 0427
 1 3990
 1 2331
 1 1718
 1 1412
 1 1010
 1 1011
 1 1413
 1 1719
 1 2332
 1 4001
 1 0430
 1 0011
 2 COU
 2 CRC
 1 0012
 1 0435
 1 4002
 1 2333
 1 1720
 1 1450
 1 1012
 1 1013
 1 1451
 1 1721
 1 2334
 1 4010
 1 0438
 1 0013
 2 CSJ
 2 CUC
 1 0014
 1 0439
 1 4011
 1 2335
 1 1722
 1 1452
 1 1014
 1 1018
 1 1500
 1 1723
 1 2336
 1 4020
 1 0440
 1 0015
 2 CUP
 2 CVE
 1 0016
 1 0441
 1 4021
 1 2343
 1 1724
 1 1501
 1 1019
 1 1020
 1 1502
 1 1725
 1 2347
 1 4099
 1 0442
 1 0017
 2 CYP
 2 CZK
 1 0018
 1 0443
 1 4100
 1 2348
 1 1726
 1 1503
 1 1021
 1 1025
 1 1504
 1 1727
 1 2350
 1 4101
 1 0445
 1 0019
 2 DDM
 2 DEM
 1 0020
 1 0447
 1 4106
 1 2360
 1 1728
 1 1505
 1 1026
 1 1027
 1 1506
 1 1729
 1 2361
 1 4110
 1 0448
 1 0021
 2 DJF
 2 DKK
 1 0022
 1 0455
 1 4111
 1 2362
 1 1730
 1 1507
 1 1028
 1 1029
 1 1508
 1 1731
 1 2363
 1 0456
 1 0023
 2 DOP
 1 4112
 1 4113
 2 DZD
 1 0024
 1 0457
 1 2364
 1 1732
 1 1509
 1 1030
 1 1031
 1 1510
 1 1733
 1 2365
 1 0458
 1 0025
 2 ECS
 1 4115
 1 4120
 2 EEK
 1 0026
 1 0459
 1 2383
 1 1734
 1 1511
 1 1032
 1 1035
 1 1512
 1 1735
 1 2384
 1 0460
 1 0027
 2 EGP
 1 4121
 1 4125
 2 ERN
 1 0028
 1 0502
 1 2390
 1 1736
 1 1513
 1 1036
 1 1040
 1 1514
 1 1737
 1 2391
 1 0504
 1 0029
 2 ESA
 1 4130
 1 4209
 2 ESB
 1 0030
 1 0505
 1 2392
 1 1738
 1 1515
 1 1041
 1 1042
 1 1516
 1 1739
 1 2393
 1 0506
 1 0031
 2 ESP
 1 4211
 1 4212
 2 ETB
 1 0032
 1 0507
 1 2397
 1 1740
 1 1517
 1 1043
 1 1044
 1 1518
 1 1741
 1 2398
 1 0508
 1 0033
 2 EUR
 1 4215
 1 4225
 2 FIM
 1 0034
 1 0509
 1 2399
 1 1742
 1 1519
 1 1045
 1 1046
 1 1520
 1 1743
 1 2405
 1 0510
 1 0035
 2 FJD
 1 4230
 1 4231
 2 FKP
 1 0036
 1 0511
 1 2410
 1 1744
 1 1521
 1 1049
 1 1051
 1 1522
 1 1745
 1 2422
 1 0513
 1 0037
 2 FRF
 1 4232
 1 4233
 2 GBP
 1 0038
 1 0517
 1 2423
 1 1746
 1 1523
 1 1052
 1 1053
 1 1524
 1 1747
 1 2497
 1 0518
 1 0039
 2 GEL
 1 4235
 1 4236
 2 GGP
 1 0040
 1 0525
 1 2498
 1 1748
 1 1525
 1 1054
 1 1055
 1 1526
 1 1749
 1 2499
 1 0529
 1 0041
 2 GHC
 1 4237
 1 4238
 2 GHS
 1 0042
 1 0533
 1 2500
 1 1750
 1 1527
 1 1061
 1 1062
 1 1528
 1 1751
 1 2501
 1 0537
 1 0043
 2 GIP
 1 4400
 1 4510
 2 GMD
 1 0044
 1 0541
 1 2502
 1 1752
 1 1529
 1 1063
 1 1064
 1 1530
 1 1753
 1 2503
 1 0549
 1 0045
 2 GNF
 1 4511
 1 4550
 2 GQE
 1 0046
 1 0553
 1 2504
 1 1754
 1 1531
 1 1065
 1 1069
 1 1532
 1 1755
 1 2505
 1 0557
 1 0047
 2 GRD
 1 4551
 1 4590
 2 GTQ
 1 0048
 1 0558
 1 2509
 1 1756
 1 1533
 1 1070
 1 1071
 1 1534
 1 1757
 1 2510
 1 0561
 1 0049
 2 GYD
 1 4702
 1 4703
 2 HKD
 1 0050
 1 0563
 1 2511
 1 1758
 1 1535
 1 1072
 1 1073
 1 1536
 1 1759
 1 2512
 1 0565
 1 0051
 2 HNL
 1 4721
 1 4730
 2 HRD
 1 0052
 1 0567
 1 2513
 1 1760
 1 1537
 1 1074
 1 1075
 1 1538
 1 1761
 1 2518
 1 0569
 1 0053
 2 HRK
 1 4740
 1 4750
 2 HTG
 1 0055
 1 0573
 1 2521
 1 1762
 1 1539
 1 1076
 1 1077
 1 1540
 1 1763
 1 2522
 1 0585
 1 0056
 2 HUF
 1 4751
 1 4755
 2 IDR
 1 0057
 1 0589
 1 2523
 1 1764
 1 1541
 1 1078
 1 1079
 1 1542
 1 1765
 1 2529
 1 0593
 1 0058
 2 IEP
 1 4756
 1 4790
 2 ILP
 1 0060
 1 0595
 1 2530
 1 1766
 1 1543
 1 1080
 1 1081
 1 1544
 1 1767
 1 2531
 1 0597
 1 0061
 2 ILR
 1 4800
 1 4900
 2 ILS
 1 0062
 1 0601
 1 2532
 1 1768
 1 1545
 1 1082
 1 1083
 1 1546
 1 1769
 1 2533
 1 0605
 1 0064
 2 INR
 1 4901
 1 4902
 2 IQD
 1 0065
 1 0606
 1 2541
 1 1770
 1 1547
 1 1084
 1 1085
 1 1548
 1 1771
 1 2545
 1 0609
 1 0066
 2 IRR
 1 4903
 1 4904
 2 ISJ
 1 0069
 1 0613
 1 2546
 1 1772
 1 1549
 1 1086
 1 1087
 1 1550
 1 1773
 1 2555
 1 0617
 1 0070
 2 ISK
 1 4905
 1 4906
 2 ITL
 1 0073
 1 0618
 1 2559
 1 1774
 1 1551
 1 1088
 1 1090
 1 1552
 1 1775
 1 2560
 1 0619
 1 0074
 2 JMD
 1 4950
 1 4951
 2 JOD
 1 0075
 1 0625
 1 2561
 1 1776
 1 1553
 1 1091
 1 1092
 1 1554
 1 1777
 1 2562
 1 0641
 1 0082
 2 JPY
 1 4952
 1 4953
 2 KES
 1 0083
 1 0642
 1 2563
 1 1778
 1 1555
 1 1093
 1 1094
 1 1556
 1 1779
 1 2564
 1 0645
 1 0084
 2 KGS
 1 4954
 1 4955
 2 KHR
 1 0087
 1 0646
 1 2569
 1 1780
 1 1557
 1 1095
 1 1096
 1 1558
 1 1781
 1 2570
 1 0647
 1 0088
 2 KMF
 1 5910
 1 5911
 2 KPW
 1 0089
 1 0649
 1 2571
 1 1782
 1 1559
 1 1097
 1 1098
 1 1560
 1 1783
 1 2572
 1 0653
 1 0090
 2 KRW
 1 5912
 1 5914
 2 KWD
 1 0091
 1 0657
 1 2573
 1 1784
 1 1561
 1 1100
 1 1101
 1 1562
 1 1785
 1 2580
 1 0661
 1 0093
 2 KYD
 1 5918
 1 5919
 2 KZT
 1 0094
 1 0671
 1 2581
 1 1786
 1 1563
 1 1102
 1 1103
 1 1564
 1 1787
 1 2582
 1 0672
 1 0095
 2 LAJ
 1 5921
 1 5922
 2 LAK
 1 0096
 1 0673
 1 2583
 1 1788
 1 1565
 1 1104
 1 1105
$!
$!
$#out                                              20140707 15:24:42
1 fetFi         1000 ela=0 cpu=0.87 su=38751 1000 found and 0 notFound
2 origSubS      1000 ela=0 cpu=0.87 su=38808 1000 found and 0 notFound
3 fetFi         1000 ela=0 cpu=0.88 su=39481 1000 found and 0 notFound
4 origSubS      1000 ela=0 cpu=0.87 su=39038 1000 found and 0 notFound
5 fetFi         1000 ela=0 cpu=0.87 su=38488 1000 found and 0 notFound
$#out                                              20140707 15:03:29
fetFi           1000 ela=0 cpu=1.43 su=63896 1000 found and 0 notFound
origSubSel      1000 ela=0 cpu=1.38 su=61634 1000 found and 0 notFound
fetFi           1000 ela=0 cpu=1.40 su=62377 1000 found and 0 notFound
}¢--- A540769.WK.SQL(YNZGFM1) cre=2014-07-22 mod=2016-11-03-09.24.06 A540769 ---
$#@
m.vv.1 = 'VNZ100A1V'
m.vv.2 = 'VNZ101A1V'
m.vv.3 = 'VNZ106A1V'
m.vv.4 = 'VNZ111A1V'
m.vv.5 = 'VNZ113A1V'
m.vv.6 = 'VNZ118A1V'
call sqlConnect dbof
$do vx=1 to 5 $@/eachView/
m.vv.vx.0 = 0
call sqlQueryPrep 3, 'select orderRefNumber ord, runningNumber run' ,
    'from oa1p.'m.vv.vx 'where orderRefNumber >= ?' ,
    'order by orderRefNumber, runningNumber fetch first row only'
ordLa = ''
rL = 0
oL = 0
seq = m.ut_alfNum
$do cx=1 $@/nxRow/
    call sqlQueryArgs 3, ordLa
    fFou = sqlFetch(3, ff)
    call sqlClose 3
    if \ fFou then
        leave
    oL = max(length(strip(m.ff.ord, t)), oL)
    rL = max(length(m.ff.run), rL)
    call mAdd vv.vx, left(m.ff.ord, 17) || left(m.ff.run, 5)
 $** if cx // 2 = 0 then
 $**    $$- right("|| '", 10)strip(m.ff.ord) m.ff.run+0"'"
    ordLa = left(m.ff.ord, 11)
    do forever
        sx = pos(right(ordLa, 1), seq)
        if sx > 0 & sx < length(seq) then
            leave
        ordLa = left(ordLa, length(ordLa) - 1)
        if ordLa = '' then
            return err('no next for ordLa' m.ff.ord)
        end
    ordLa = overlay(substr(seq, sx+1, 1), ordLa, length(ordLa))
    $/nxRow/
    say vx m.vv.vx m.vv.vx.0 oL rL m.vv.vx.1
$/eachView/
say 'after eachView'
$$- '       /*' sysvar(sysnode) f('%t s') '*/'
do i=1 by 103 to 103001
    jx = i // m.vv.3.0 + 1
    $$- "    || '3"m.vv.3.jx"'"
    jy = i // 4
    jy = jy + 1 + (jy>1)
    jz = i // m.vv.jy.0 + 1
    $$- "    || '"jy || m.vv.jy.jz"'"
    end
$#out                                              20140728 07:52:12
       /* RZ2 2014-07-28-07.52.17 */
    || '3XS80140714800016300001'
    || '21000140709140014400001'
    || '33D00140626800748700001'
    || '13D00140715800002600001'
    || '33D30140618800017000001'
    || '53M80100929800012800010'
    || '33D60140630800189200001'
    || '43N60140702800246300010'
}¢--- A540769.WK.SQL(YUU1023) cre=2014-09-08 mod=2014-09-09-08.01.01 A540769 ---
set current sqlid = 'S100447';
alter index oa1p.IUU340A0
  add include column (UU340060)
;
commit
;
alter index oa1p.IUU290A0
  add include column (UU290090)
;
commit
;
}¢--- A540769.WK.SQL(YVV326WA) cre=2014-04-25 mod=2014-05-11-11.17.15 A540769 ---
//A540769S JOB (CP00,KE50),'DB2 REO',                                   00000110
//         MSGCLASS=T,TIME=1440,                                        00000210
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2                          00000310
//*MAIN CLASS=LOG                                                       00000410
//S01      EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99                       00000910
//SYSTSIN  DD *                                                         00001010
    DSN SYSTEM(DBOF)                                                    00001110
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)               00001210
//SYSTSPRT DD SYSOUT=*                                                  00001310
//SYSPRINT DD SYSOUT=*                                                  00001410
//SYSUDUMP DD SYSOUT=*                                                  00001510
//SYSTERM  DD DUMMY                                                     00001610
//SYSIN    DD *       DISP=SHR,DSN=A540769.WK.SQL(TESTQMSL)             00001710
select count(*) from A540769.qzScanKey;                                 00001808
select current timestamp from sysibm.sysDummy1;                         00001909
insert into A540769.qzScanKey                                           00002006
    (partition_number, temp_dbKey, OUT_IDSYMBOL_2)                      00002106
with s as                                                               00002206
(                                                                       00002306
select instrumentId                                                     00002406
    from vdps2.VTINSTRFLATSYMBOLS                                       00002506
    where mod(instrumentid, 999983) between 0 and 1000                  00002608
    order by mod(instrumentid, 999983)                                  00002708
)                                                                       00002808
select 7 , instrumentId, 'abc' || instrumentid                          00002908
    from s                                                              00003008
;                                                                       00003108
select current timestamp from sysibm.sysDummy1;                         00003208
commit;                                                                 00003308
;x;                                                                     00003408
select instrumentId                                                     00003508
    from vdps2.VTINSTRFLATSYMBOLS                                       00003602
    order by mod(instrumentid, 999983)                                  00003705
    fetch first 100 row only                                            00003805
    with ur                                                             00004002
;                                                                       00004105
select current timestamp from sysibm.sysDummy1;                         00004205
;x;                                                                     00005005
select min(instrumentId), max(instrumentId)                             00010000
    from vdps2.VTINSTRFLATSYMBOLS                                       00020000
    where instrumentid > 30000000                                       00021001
    with ur                                                             00030000
}¢--- A540769.WK.SQL(YVV326WD) cre=2014-04-25 mod=2014-04-25-10.24.20 A540769 ---
SET CURRENT SQLID = 'S100447';
    CREATE TABLESPACE VV425
           IN DA540769
           BUFFERPOOL BP2
           DSSIZE 32G
           CLOSE YES
           LOCKMAX SYSTEM
           SEGSIZE 0
           DEFINE YES
           LOGGED
           LOCKSIZE PAGE
           MAXROWS 255
           CCSID EBCDIC
           NUMPARTS 10
                     USING STOGROUP "GSMS    "
                                    PRIQTY -1
                                    SECQTY -1
                                    ERASE NO
                     PCTFREE 5
                     FREEPAGE 50
                     GBPCACHE CHANGED
                     COMPRESS YES
                     TRACKMOD YES
;

 SET CURRENT SQLID = 'S100447';


    CREATE TABLE A540769.QZSCANKEY
        (PARTITION_NUMBER SMALLINT
                                                        NOT NULL
        ,TEMP_DBKEY INTEGER
                                                        NOT NULL
        ,OUT_IDSYMBOL_2 CHARACTER(30) FOR SBCS DATA
  WITH DEFAULT NULL
        ,OUT_IDSYMBOL_3 CHARACTER(30) FOR SBCS DATA
  WITH DEFAULT NULL
        ,STATUS_FLAG SMALLINT
  WITH DEFAULT NULL
        ,IS_ACTIVE SMALLINT
  WITH DEFAULT NULL
        ,CREATETIMESTAMP VARCHAR(30) FOR SBCS DATA
  WITH DEFAULT NULL
        ,UPDATETIMESTAMP VARCHAR(30) FOR SBCS DATA
  WITH DEFAULT NULL
        )
        IN DA540769.VV425
   APPEND NO
   NOT VOLATILE CARDINALITY
   DATA CAPTURE CHANGES
   AUDIT NONE
   CCSID EBCDIC
   PARTITION BY RANGE
        (PARTITION_NUMBER NULLS LAST ASC
        )
        ( PARTITION 1
           ENDING ( 1
        ) INCLUSIVE
        , PARTITION 2
           ENDING ( 2
        ) INCLUSIVE
        , PARTITION 3
           ENDING ( 3
        ) INCLUSIVE
        , PARTITION 4
           ENDING ( 4
        ) INCLUSIVE
        , PARTITION 5
           ENDING ( 5
        ) INCLUSIVE
        , PARTITION 6
           ENDING ( 6
        ) INCLUSIVE
        , PARTITION 7
           ENDING ( 7
        ) INCLUSIVE
        , PARTITION 8
           ENDING ( 8
        ) INCLUSIVE
        , PARTITION 9
           ENDING ( 9
        ) INCLUSIVE
        , PARTITION 10
           ENDING ( 10
        ) INCLUSIVE
        )
;
COMMIT
}¢--- A540769.WK.SQL(YVV326WX) cre=2014-05-11 mod=2014-05-11-11.48.36 A540769 ---
$#@                                                                     00010000
$** say "sql1='"$sql1"'"                                                00011000
$=cnt=1000                                                              00020000
call sqlConnect dbof                                                    00020100
m.timing_say = 1                                                        00020200
call timing , , 'start'                                                 00021000
call sqlUpdate 7, "delete from A540769.qzScanKey" ,                     00030000
                       "where partition_number = 2 "                    00030100
call timing , , 'deleted'  m.sql.7.updateCount                          00030200
call sqlUpdate 7, "insert into A540769.qzScanKey" ,                     00031000
      " (partition_number, temp_dbKey, OUT_IDSYMBOL_2) " ,              00040000
      " select 2, temp_dbKey, OUT_IDSYMBOL_2" ,                         00050000
            "from A540769.qzScanKey where partition_number = 7 " ,      00060000
            "fetch first" $cnt "rows only"                              00070000
call timing , , 'inserted'  m.sql.7.updateCount                         00071000
call sqlQuery 7, $sql1                                                  00071100
do fx=1 while sqlFetch(7, ff)                                           00071200
 /* say fx m.ff.instrumentId  */                                        00071300
    end                                                                 00071400
call sqlClose 7                                                         00071500
call timing , , 'selected'  (fx-1)                                      00071600
call sqlUpdate 7, "delete from A540769.qzScanKey" ,                     00071700
                       "where partition_number = 2 "                    00071800
call timing , , 'deleted'  m.sql.7.updateCount                          00071900
$ct $=-=/sql1/                                                          00072000
SELECT OUT_IDSYMBOL_2, INSTRUMENTID                                     00072300
       ,'CH                            '                                00072400
       ,ROWSTATUS_FLTSYMB                                               00072500
       ,SYMBOLCSFI,SYMBOLCH                                             00072600
       ,SYMBOLISIN                                                      00072700
       ,SYMBOLUS                                                        00072800
       ,SYMBOLGB                                                        00072900
       ,SYMBOLDE,CATEGORYVDPS,CATEGORYCSGTA,CSSTATUSTYPE_FLTSYMB        00073000
       ,CSRISKINDIDSYMBOL,CSRISKINDSCHEMESYM,CSRISKINSTGRPIDSYM         00073100
       ,CSRISKINSGRPSCHSYM,CSRISKCURRENCY_I1,CSRISKCURRENCY_I2          00073200
       ,CSRISKCURRENCY_WS80,CSRISINSTRUMENT_CH                          00073300
       ,CSRISKCOUNTRY_A2                                                00073400
       ,CSRISKCOUNTRY_WS80,UNDERINSTRUMENT_CH                           00073500
       ,UNDERINSTRUMENT_ISIN                                            00073600
       ,UNDERINSTRUMENT_CSFI,ORIGINALISSUER_GK                          00073700
       ,ISSUER_GK,COMMISSIONCODETYPE                                    00073800
       ,CSFUNDTYPE,NAME45_G,NAME45_E,NAME45_F,NAME45_I                  00073900
       ,NAME45_N                                                        00074000
       ,STATUSTYPE_ORG_ISSUER,INDUSTRYCS_ORG_ISSUER                     00074100
       ,INDUSTRYTKBN_ORG_ISSUER                                         00074200
       ,INDUSTRYMSCI_ORG_ISSUER,SHORTNAME_G_ORG_ISSUER                  00074300
       ,SHORTNAME_E_ORG_ISSUER,SHORTNAME_F_ORG_ISSUER                   00074400
       ,SHORTNAME_I_ORG_ISSUER                                          00074500
       ,SHORTNAME_N_ORG_ISSUER,STATUSTYPE_ISSUER,INDUSTRYMSCI_ISSUER    00074600
       ,SHORTNAME_G_ISSUER                                              00074700
       ,SHORTNAME_E_ISSUER,SHORTNAME_F_ISSUER                           00074800
       ,SHORTNAME_I_ISSUER,SHORTNAME_N_ISSUER,CSPRODUCTCATEGORY         00074900
       ,UPDATETIMESTAMP_INSTR,ISCSRISKASPECTOTC                         00075000
       ,ISCSRISKASPECTCOMMODITIES                                       00075100
       ,ISCSRISKASPECTREALESTATE,ISCSRISKASPECTEM                       00075200
       ,RISKINADVICEDSERVICE                                            00075300
  FROM A540769.qzSCANKEY k                                              00075400
   INNER JOIN OA1P.VVV_IDS_VINOP9000                                    00075500
     ON OA1P.VVV_IDS_VINOP9000.INSTRUMENTID                             00075600
        = k.TEMP_DBKEY                                                  00075700
 WHERE k.PARTITION_NUMBER =         2                                   00075800
WITH UR                                                                 00075900
FOR FETCH ONLY                                                          00076000
$/sql1/                                                                 00085000
$#out                                              20140511 11:46:15    00085100
SQLCODE = 100, NOT FOUND:  ROW NOT FOUND FOR FETCH, UPDATE, OR          00085200
    DELETE, OR THE RESULT OF A QUERY IS AN EMPTY TABLE                  00085300
sql = delete from A540769.qzScanKey where partition_number = 2          00085400
$#out                                              20140511 11:45:32    00085500
SQLCODE = 100, NOT FOUND:  ROW NOT FOUND FOR FETCH, UPDATE, OR          00085600
    DELETE, OR THE RESULT OF A QUERY IS AN EMPTY TABLE                  00085700
sql = delete from A540769.qzScanKey where partition_number = 2          00085800
$#out                                              20140511 11:44:54    00085900
$#out                                              20140511 11:43:29    00086000
$#out                                              20140511 11:40:28    00087000
}¢--- A540769.WK.SQL(YVV326WY) cre=2014-05-11 mod=2014-05-11-12.34.39 A540769 ---
$#@                                                                     00010000
$** say "sql1='"$sql1"'"                                                00011000
$=cnt=15000                                                             00020001
call sqlConnect dbof                                                    00020100
m.timing_say = 1                                                        00020200
call timing , , 'start'                                                 00021000
call sql2St  "select temp_dbKey" ,                                      00022000
                 "from A540769.qzScanKey where partition_number = 7 " , 00023000
                 "fetch first" $cnt "rows only",                        00024000
           , ii, ':m.dst'                                               00025000
call sqlQueryPrep 7, $sql1                                              00025100
call timing , , 'fetched' m.ii.0                                        00025200
cSel = 0                                                                00025300
do ix=1 to m.ii.0                                                       00026000
 $**say ix m.ii.ix                                                      00027000
    call sqlQueryArgs 7, m.ii.ix                                        00027100
    do fx=1 while sqlFetch(7, ff)                                       00027200
        cSel = cSel + 1                                                 00027300
  $**   say ix fx m.ff.instrumentid                                     00027400
        end                                                             00027500
    call sqlClose 7                                                     00027600
    end                                                                 00028000
call timing , , 'selected'  cSel',' m.ii.0 'open/close'                 00071600
                                                                        00071700
$ct $=-=/sql1/                                                          00072000
SELECT                 INSTRUMENTID                                     00072300
       ,'CH                            '                                00072400
       ,ROWSTATUS_FLTSYMB                                               00072500
       ,SYMBOLCSFI,SYMBOLCH                                             00072600
       ,SYMBOLISIN                                                      00072700
       ,SYMBOLUS                                                        00072800
       ,SYMBOLGB                                                        00072900
       ,SYMBOLDE,CATEGORYVDPS,CATEGORYCSGTA,CSSTATUSTYPE_FLTSYMB        00073000
       ,CSRISKINDIDSYMBOL,CSRISKINDSCHEMESYM,CSRISKINSTGRPIDSYM         00073100
       ,CSRISKINSGRPSCHSYM,CSRISKCURRENCY_I1,CSRISKCURRENCY_I2          00073200
       ,CSRISKCURRENCY_WS80,CSRISINSTRUMENT_CH                          00073300
       ,CSRISKCOUNTRY_A2                                                00073400
       ,CSRISKCOUNTRY_WS80,UNDERINSTRUMENT_CH                           00073500
       ,UNDERINSTRUMENT_ISIN                                            00073600
       ,UNDERINSTRUMENT_CSFI,ORIGINALISSUER_GK                          00073700
       ,ISSUER_GK,COMMISSIONCODETYPE                                    00073800
       ,CSFUNDTYPE,NAME45_G,NAME45_E,NAME45_F,NAME45_I                  00073900
       ,NAME45_N                                                        00074000
       ,STATUSTYPE_ORG_ISSUER,INDUSTRYCS_ORG_ISSUER                     00074100
       ,INDUSTRYTKBN_ORG_ISSUER                                         00074200
       ,INDUSTRYMSCI_ORG_ISSUER,SHORTNAME_G_ORG_ISSUER                  00074300
       ,SHORTNAME_E_ORG_ISSUER,SHORTNAME_F_ORG_ISSUER                   00074400
       ,SHORTNAME_I_ORG_ISSUER                                          00074500
       ,SHORTNAME_N_ORG_ISSUER,STATUSTYPE_ISSUER,INDUSTRYMSCI_ISSUER    00074600
       ,SHORTNAME_G_ISSUER                                              00074700
       ,SHORTNAME_E_ISSUER,SHORTNAME_F_ISSUER                           00074800
       ,SHORTNAME_I_ISSUER,SHORTNAME_N_ISSUER,CSPRODUCTCATEGORY         00074900
       ,UPDATETIMESTAMP_INSTR,ISCSRISKASPECTOTC                         00075000
       ,ISCSRISKASPECTCOMMODITIES                                       00075100
       ,ISCSRISKASPECTREALESTATE,ISCSRISKASPECTEM                       00075200
       ,RISKINADVICEDSERVICE                                            00075300
  from        OA1P.VVV_IDS_VINOP9000                                    00075500
     where    OA1P.VVV_IDS_VINOP9000.INSTRUMENTID = ?                   00075600
WITH UR                                                                 00075900
FOR FETCH ONLY                                                          00076000
$/sql1/                                                                 00085000
$#out                                              20140511 12:21:46    00085101
}¢--- A540769.WK.SQL(YVV326W1) cre=2014-04-24 mod=2014-04-24-17.03.54 A540769 ---
  set current sqlid = 'A540769';                                        00010000
--SET CURRENT SQLID = 'CNMBATCH';                                       00011000
--SET CURRENT DEGREE= '1' ;                                             00012000
--SET CURRENT DEGREE= 'ANY' ;                                           00013000
--                                                                      00013100
----------------------------------------------------------------        00013200
-- TEMPORÄRER CATALOG-UPDATE MIT WERT VON PTA ------------------        00013300
--UPDATE SYSIBM.SYSTABLES SET CARDF = 0                                 00013401
-- WHERE CREATOR = 'VDPS2' AND NAME = 'XTREQSCANKEY' ;                  00013501
----------------------------------------------------------------        00015100
EXPLAIN ALL SET QUERYNO = 77897 FOR                                     00015300
SELECT OUT_IDSYMBOL_2                                                   00016500
       ,'CH                            '                                00016600
       ,ROWSTATUS_FLTSYMB                                               00016700
       ,SYMBOLCSFI,SYMBOLCH                                             00016800
       ,SYMBOLISIN                                                      00016900
       ,SYMBOLUS                                                        00017000
       ,SYMBOLGB                                                        00017100
       ,SYMBOLDE,CATEGORYVDPS,CATEGORYCSGTA,CSSTATUSTYPE_FLTSYMB        00017200
       ,CSRISKINDIDSYMBOL,CSRISKINDSCHEMESYM,CSRISKINSTGRPIDSYM         00017300
       ,CSRISKINSGRPSCHSYM,CSRISKCURRENCY_I1,CSRISKCURRENCY_I2          00017400
       ,CSRISKCURRENCY_WS80,CSRISINSTRUMENT_CH                          00017500
       ,CSRISKCOUNTRY_A2                                                00017600
       ,CSRISKCOUNTRY_WS80,UNDERINSTRUMENT_CH                           00017700
       ,UNDERINSTRUMENT_ISIN                                            00017800
       ,UNDERINSTRUMENT_CSFI,ORIGINALISSUER_GK                          00017900
       ,ISSUER_GK,COMMISSIONCODETYPE                                    00018000
       ,CSFUNDTYPE,NAME45_G,NAME45_E,NAME45_F,NAME45_I                  00018100
       ,NAME45_N                                                        00018200
       ,STATUSTYPE_ORG_ISSUER,INDUSTRYCS_ORG_ISSUER                     00018300
       ,INDUSTRYTKBN_ORG_ISSUER                                         00018400
       ,INDUSTRYMSCI_ORG_ISSUER,SHORTNAME_G_ORG_ISSUER                  00018500
       ,SHORTNAME_E_ORG_ISSUER,SHORTNAME_F_ORG_ISSUER                   00018600
       ,SHORTNAME_I_ORG_ISSUER                                          00018700
       ,SHORTNAME_N_ORG_ISSUER,STATUSTYPE_ISSUER,INDUSTRYMSCI_ISSUER    00018800
       ,SHORTNAME_G_ISSUER                                              00018900
       ,SHORTNAME_E_ISSUER,SHORTNAME_F_ISSUER                           00019000
       ,SHORTNAME_I_ISSUER,SHORTNAME_N_ISSUER,CSPRODUCTCATEGORY         00019100
       ,UPDATETIMESTAMP_INSTR,ISCSRISKASPECTOTC                         00019200
       ,ISCSRISKASPECTCOMMODITIES                                       00019300
       ,ISCSRISKASPECTREALESTATE,ISCSRISKASPECTEM                       00019400
       ,RISKINADVICEDSERVICE                                            00019500
  FROM OA1P.VVV_XTREQSCANKEY                                            00019600
   INNER JOIN OA1P.VVV_IDS_VINOP9000                                    00019700
     ON OA1P.VVV_IDS_VINOP9000.INSTRUMENTID                             00019800
        = OA1P.VVV_XTREQSCANKEY.TEMP_DBKEY                              00019900
 WHERE OA1P.VVV_XTREQSCANKEY.PARTITION_NUMBER =         2               00020000
WITH UR                                                                 00021500
FOR FETCH ONLY                                                          00021600
;                                                                       00021700
SELECT SUBSTR(DIGITS(PT.QBLOCKNO),4,2)         ||' '||                  00021800
       SUBSTR(DIGITS(PT.PLANNO),4,2)           ||' '||                  00021900
       SUBSTR(DIGITS(PT.METHOD),4,2)           ||' '||                  00022000
       SUBSTR(PT.TNAME,1,20)           AS B#_P#_ME_TBL,                 00022100
       ACCESSTYPE                           ||' '||                     00022200
       SUBSTR(DIGITS(PT.MATCHCOLS),4,2)        ||' '||                  00022300
       SUBSTR(PT.ACCESSNAME,1,20)      AS AT_MC_INDEX    ,              00022400
       PT.INDEXONLY                            ||'  '||                 00022500
       PT.SORTC_UNIQ                           ||' '||                  00022600
       PT.SORTC_JOIN                           ||' '||                  00022700
       PT.SORTC_ORDERBY                        ||' '||                  00022800
       PT.SORTC_GROUPBY                AS IO_U_J_O_GC      ,            00022900
       PT.SORTN_UNIQ                           ||' '||                  00023000
       PT.SORTN_JOIN                           ||' '||                  00024000
       PT.SORTN_ORDERBY                        ||' '||                  00025000
       PT.SORTN_GROUPBY                AS U_J_O_GN      ,               00026000
       DEC(DC.COMPCOST    ,15,3) AS COMPCOST           ,                00027000
       PT.PREFETCH                          AS P,                       00028000
       SUBSTR(DIGITS(PT.ACCESS_DEGREE),4,2) AS DG           ,           00029000
       PT.QBLOCK_TYPE                       AS TYP          ,           00030000
       INTEGER(TB.CARDF)     AS TBCARD       ,                          00040000
       TB.NPAGES                  AS TSPAGES        ,                   00050000
       SUBSTR(DIGITS(SMALLINT(IX.CLUSTERRATIOF*100)),3,3)  AS CLR,      00060000
       CLUSTERING AS C,                                                 00070000
       INTEGER(IX.FIRSTKEYCARDF)         AS FIRSTKEYCARD ,              00080000
       INTEGER(IX.FULLKEYCARDF)         AS FULLKEYCARD  ,               00090000
       SUBSTR(DIGITS(IX.NLEVELS),3,3)         AS LVL       ,            00100000
       IX.NLEAF                         AS LEAFPAGES    ,               00110000
       PT.PARENT_QBLOCKNO               AS PQB          ,               00120000
       '             '                                   ,              00130000
       PT.TIMESTAMP                                                     00140000
  FROM PLAN_TABLE PT                                                    00150000
INNER JOIN (SELECT DISTINCT                                             00160000
                   PROGNAME                                             00170000
                  ,QUERYNO                                              00180000
                  ,QBLOCKNO                                             00190000
                  ,PLANNO                                               00200000
                  ,EXPLAIN_TIME                                         00210000
                  ,COMPCOST                                             00220000
                  ,ONECOMPROWS                                          00230000
                  ,DMROWS                                               00240000
                  ,RDSROW                                               00250000
              FROM DSN_DETCOST_TABLE) AS DC                             00260000
   ON PT.QUERYNO = DC.QUERYNO                                           00270000
  AND PT.QBLOCKNO = DC.QBLOCKNO                                         00280000
  AND PT.PLANNO = DC.PLANNO                                             00290000
  AND PT.BIND_TIME = DC.EXPLAIN_TIME                                    00300000
 LEFT OUTER JOIN SYSIBM.SYSINDEXES IX                                   00310000
   ON PT.ACCESSCREATOR = IX.CREATOR                                     00320000
   AND PT.ACCESSNAME = IX.NAME                                          00330000
 LEFT OUTER JOIN SYSIBM.SYSTABLES TB                                    00340000
    ON PT.TNAME = TB.NAME                                               00350000
   AND PT.CREATOR = TB.CREATOR                                          00360000
 WHERE PT.QUERYNO=77897                                                 00370000
   AND PT.PROGNAME='DSNESM68'                                           00380000
ORDER BY 1,2,3,4                                                        00390000
;                                                                       00400000
SELECT COST_CATEGORY AS CC,                                             00410000
       PROCMS,                                                          00420000
       PROCSU,                                                          00430000
       REASON                                                           00440000
  FROM DSN_STATEMNT_TABLE                                               00450000
 WHERE QUERYNO=77897                                                    00460000
   AND PROGNAME='DSNESM68'                                              00470000
;                                                                       00480000
select * from  plan_view1                                               00489900
    order by -- collid, progName, version, bind_time,                   00490000
             queryNo, qblockno, planno, mixOpSeq                        00490100
;                                                                       00490200
select * from  plan_view2                                               00490300
    order by -- collid, progName, version, bind_time,                   00490400
             queryNo, qblockno, planno, mixOpSeq                        00490500
;                                                                       00490600
select * from  plan_view2det                                            00490700
    order by -- collid, progName, version, bind_time,                   00490800
             queryNo, qblockno, planno, mixOpSeq                        00490900
;                                                                       00491000
select *                                                                00491100
    from plan_viewPred                                                  00491200
    order by --collid, progName, applName, explain_time,                00491300
             queryNo, qBlockNo, planno,                                 00491400
             stage, predNo                                              00491500
    with ur                                                             00491600
;                                                                       00491700
rollback                                                                00491800
;                                                                       00491900
ROLLBACK                                                                00492000
;                                                                       00500000