=DQ0G=0
* convert float to dec(31,8) with overflow
creDb trg 2
+ ok creDb DSN.TX.GENF(WK928t2) ::f
creDb src 3
+ ok creDb DSN.TX.GENF(WK928s3) ::f
* dbx c, i
* ana, run
manual check run abends with data conversion error (for overflow)
+ wait check run abends with data conversion error (for overflow)
manual adapt and sub wk928loa and verify that load loads ok with discard
manual check data with wk928sel