zOs/TX/WK401

*  0 -> 1 create table+index
*  1 -> 2 Feldverkürzung
*  2 -> 3 Feldverlängerung
*  1 -> 3 Feldverlängerung
*
*
*
*   Sequenz von Nachträgen zum Testen des AdminTools
*   01) wk401dd1
*   02) compare dgdb9998.a401a mit leerem Trg ==> dbaf und durchführen
*   03) wk401dda --> Daten ins Dbaf
*
*   11) wk401dd2 Feld Verkürzung, index rename
*   12) compare dgdb9xc .a401a mit dA540769.a401, import dbaf run
*
*   15) import dbtf, run ==> beide gemergt, gibt neue table
*
*   21) wk401dd3 Feld Verlängerung
*   22) compare dgdb9998.a401a mit dA540769.a401
*   23) mehrmals compare und ändern
*   24) import dbaf durchführen
*   25) nochmals ändern und i =
*   26) ausführen im dbaf
creDb trg 1
+ ok creDb DSN.TX.GENF(WK401t1) ::f
credb src 3
+ ok creDb DSN.TX.GENF(WK401s3) ::f
manual dbx c dgdb9998.a401A, dbx i dbaf, ana, run
+ wait dbx c dgdb9998.a401A, dbx i dbaf, ana, run
creDb trg 1
creDb src 2
manual dbx c dgdb9998.a401A, dbx i dbaf, ana, run
creDb trg 2
creDb src 3
manual dbx c dgdb9998.a401A, dbx i dbaf, ana, run
* direkter Uebergang von 1 auf 3 (ohne drop ...)
creDb trg 2
creDb src 3