zOs/TX/PER18

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