Author: prino
Posted: Wed May 10, 2017 12:05 am (GMT 5.5)
Sprinkle the code with "PUT DATA(whatever)" statements around the abend, or as anyone with a bit of sense would do, run the program through Debug Tool...
And ONCODE 290 (INVALIDOP) is not a S0C7!
Show us the compiler options used, aka this
lot, the version of the compiler used, aka the first line of the listing, format like "V4.R5.M0 (Built:20170125)", and way more context of the source!
_________________
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
At last, a tiny bit of programming here...![icon_smile.gif]()
Posted: Wed May 10, 2017 12:05 am (GMT 5.5)
Sprinkle the code with "PUT DATA(whatever)" statements around the abend, or as anyone with a bit of sense would do, run the program through Debug Tool...
And ONCODE 290 (INVALIDOP) is not a S0C7!
| Quote: |
| Status INVALIDOP is enabled throughout the program, except within the scope of the NOINVALIDOP condition prefix. Result The result of the invalid operation is undefined. Cause and syntax The INVALIDOP computational condition is raised when any of the following are detected during the evaluation of IEEE floating-point expressions.
|
Show us the compiler options used, aka this
| Code: |
| aggregate(dec) arch(10) attributes(s) backreg(5) bifprec(31) blank('05'x) blkoff caserules(keyword(lower)) ceestart(last) check(noconformance nostorage) cmpat(v2) codepage(1140) nocommon nocompile(s) copyright('(C) Copyright Robert AH Prins') csect csectcut(4) currency('$') nodbcs dd('sysprint','sysin','syslib','syspunch',*,*,*,*) dd(*,*,*,*,'syslin','sysadata','sysxmlsd','sysdebug') ddsql('') decimal(nofoflonasgn nofoflonmult noforcedsign notruncfloat default(aligned) default(ibm) default(ebcdic) default(assignable) default(nobin1arg) default(byaddr) default(connected) default(desclocator) . . . |
lot, the version of the compiler used, aka the first line of the listing, format like "V4.R5.M0 (Built:20170125)", and way more context of the source!
_________________
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
At last, a tiny bit of programming here...
