zOs/TX/XML01

credb trg 1
+ ok creDb DSN.TX.GENF(XML01t1) ::f