Hi Ron, > I was looking a Cobol code module developed and we ran in to a sco7 issue. I > > am not able to figure why this is abending. > > Any help to fix is much appreciated. > > Here is the spool display i have captured.
> 05 INP-VNDR-PACK-COST PIC 9(9)V9(4). > 05 WS-VNDR-PACK-COST PIC S9(9)V9(4) COMP-3. > INP-VNDR-PACK-COST -00000000035.65 > WS-VNDR-PACK-COST -0000000000000 Something looks amiss to me as your displays(?) of the two fields do not match their PICtures. Also, I'm guessing you set hex on in SDSF though cannot imagine why you'd think this would help solve the data exception abend. Perhaps consider showing details from a dump or possibly using Abend-Aid or Fault Analyzer or some other abend analysis tool that you may have available. John. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
