Well, your declaration of the INP-VNDR-PACK-COST variable doesn't seem to match the actual data...the decimal point is in the wrong place (two characters to the right), and there's an undeclared minus sign...
On Thu, Jan 12, 2023 at 11:45 AM Ron Thomas <[email protected]> wrote: > Hi Listers > > 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 > 4CDD6EDCD6DCCD6CDEE46FFFFFFFFFFF4FF4444444444444444444444444444444444444 > 09570554907132036230000000000035B650000000000000000000000000000000000000 > ----------------------------------------------------------------------- > WS-VNDR-PACK-COST -0000000000000 > 4EE6EDCD6DCCD6CDEE46FFFFFFFFFFFFF444444444444444444444444444444444444444 > 062055490713203623000000000000000000000000000000000000000000000000000000 > ----------------------------------------------------------------------- > > MOVE INP-VNDR-PACK-COST TO WS-VNDR-PACK-COST > ---------------------------------> Here it is failing > > > CEE3207S The system detected a data exception (System Completion Code=0 > 4CCCFFFFE4E884AAAA89488A88A8848488A848A889A89944EAAA894C99998A8994C9887F > 03553207203850282354045353354010413105735739650D2823540364735396503645E0 > > > Regards > Ron T > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > -- Jay Maynard ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
