zOs/TX/WK981

=parts=258
credb trg 1
+ ok creDb A540769.TX.GENF(WK981t1) ::f
credb src 2
+ ok creDb A540769.TX.GENF(WK981s2) ::f