For Programmers: Free Programming Magazines  


Home > Archive > Cobol > November 2005 > Qucik Reference modification question









You are viewing an archived Text-only version of the thread. To view this thread in it's original format and/or if you want to reply to this thread please [click here]

 

Author Qucik Reference modification question
Jeff

2005-11-17, 6:55 pm

I have an array
vp-message-lines occurs pic x(60).

I am trying to break it up and write it to 2 fields.

I want to move the first 30 to one field and the second 30 to another
field.

How would I use ref mod to do this?
move vp-message-line(i, 1,30) to field 1?

Jeff

2005-11-17, 6:55 pm

Never mind I figured it out.

Judson McClendon

2005-11-17, 6:55 pm

"Jeff" <jmoore207@hotmail.com> wrote:
>I have an array
> vp-message-lines occurs pic x(60).
>
> I am trying to break it up and write it to 2 fields.
>
> I want to move the first 30 to one field and the second 30 to another
> field.
>
> How would I use ref mod to do this?
> move vp-message-line(i, 1,30) to field 1?



vp-message-lines(i)(1:30) First 30 bytes

vp-message-lines(i)(31:30) Second 30 bytes
-or-
vp-message-lines(i)(31:) Bytes 31-end)
--
Judson McClendon judmc@sunvaley0.com (remove zero)
Sun Valley Systems http://sunvaley.com
"For God so loved the world that He gave His only begotten Son, that
whoever believes in Him should not perish but have everlasting life."


Howard Brazee

2005-11-17, 6:55 pm

On 17 Nov 2005 07:03:15 -0800, "Jeff" <jmoore207@hotmail.com> wrote:

>Never mind I figured it out.


Figured that if you knew enough to ask the question, you knew enough
to figure it out. You already passed the hard part.
Jeff

2005-11-18, 7:55 am

Thanks Judson! That is exactly how I did it. Thanks for getting back to
me.

Sponsored Links







Also available: Server administration forum archive | Web Design forum archive | Software forum archive | Hardware reviews archive

Copyright 2008 codecomments.com