zOs/TX/WK928

=DQ0G=0
* convert float to dec(31,8) without overflow
creDb trg 1
+ ok creDb DSN.TX.GENF(WK928t1) ::f
creDb src 3
+ ok creDb DSN.TX.GENF(WK928s3) ::f
* dbx c, i
* ana, run
manual check data with wk928sel
+ wait check data with wk928sel