rame Discussion List On Behalf Of
John Pratt
Sent: Thursday, January 12, 2023 9:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Soc7 abend
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 h
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
-PACK-COST
HTH
Peter
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of Ron
Thomas
Sent: Thursday, January 12, 2023 12:46 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Soc7 abend
EXTERNAL EMAIL
Hi Listers
I was looking a Cobol code module developed and we ran
Looks like you included the whole record. Display numeric field seems to be:
F...FFF4FF
0...035B65
> 05 INP-VNDR-PACK-COST PIC 9(9)V9(4).
The x'4B' is a period character generated by a PIC 9(9).99. Can't
have that in the data in order to perform math. Break it into 2
fields, dollars and
ok Jay. so, what you say is if the definitions are as below then we should be
good. The '-' sign is part of the variable name in spool display.
05 INP-VNDR-PACK-COST PIC 9(9)V9(2).
05 WS-VNDR-PACK-COST PIC S9(9)V9(2) COMP-3.
Regards
Ron T
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 wrote:
> Hi Listers
>
> I was looking a
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