-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Clark Morris
Sent: Wednesday, October 18, 2006 6:17 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Quick I hope COBOL question
On 9 Oct 2006 14:24:46 -0700, in bit.listserv.ibm-main you wrote:
I know
Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Thompson, Steve (SCI TW)
Sent: Thursday, October 19, 2006 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Quick I hope COBOL question
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Clark
Charles Mills wrote:
Thanks all! It's been working for over a week now g.
It's one DISPLAY statement in a 200-line test program, and hopefully it's
about the last COBOL program I have to write, so hopefully the way I did it
(per the first suggestion received here) is good enough.
The below
On 9 Oct 2006 14:24:46 -0700, in bit.listserv.ibm-main you wrote:
I know this isn't the COBOL list. I'm not a COBOL programmer, so it all
works out. I'm writing a quick COBOL test program. I've got a PIC X(64)
field but the actual length of the data in the field is in a separate S9(4)
field. I
I know this isn't the COBOL list. I'm not a COBOL programmer, so it all
works out. I'm writing a quick COBOL test program. I've got a PIC X(64)
field but the actual length of the data in the field is in a separate S9(4)
field. I want to display the real data and not whatever garbage might be
77 D PIC X(64)
.
.
.
77 L PIC S9(4) BINARY.
.
.
.
MOVE D (1:L) TO wherever
.
.
.
DISPLAY D (1:L)
IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 10/09/2006
05:24:27 PM:
I know this isn't the COBOL list. I'm not a COBOL programmer, so it all
works out.
Awesome! Thanks,
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Kirk Talman
Sent: Monday, October 09, 2006 2:31 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Quick I hope COBOL question
77 D PIC X(64)
.
.
.
77 L PIC
7 matches
Mail list logo