UNSTRING problem

pritanshu · New User Joined: 31 Jan 2008 Posts: 15 Location: gurgaon

I have a problem regarding unstring.

I need to use unstring into a line in which line started with spaces,
so please tell me how can I use UNSTRING in this case.

regards,
pritanshu rai

guptae · Posted: Tue Mar 25, 2008 6:34 pm

Hi Pritanshu,

Would you please provide sample input as well as output?

pritanshu · New User Joined: 31 Jan 2008 Posts: 15 Location: gurgaon

i do have a sequential file in which
i have 88 level
like 88 variable value 'a'.
i need to unstring above line

guptae · Posted: Tue Mar 25, 2008 6:43 pm

Hi Pritanshu,

Would you please provide some sample i/p & o/p?
Still ur requirement is not clear.

pritanshu · New User Joined: 31 Jan 2008 Posts: 15 Location: gurgaon

ok i tell u real senario wht i m doin is this; i m havin a copy book which had some 02 as well as 88 level code n i need to read this copybook sequentially , and i need to use unstring on 88 level,
10 REQ-V16-RETURN-CODE PIC 999.
88 REQ-RETURN-OK VALUE 000.
88 REQ-INVALID-REQUEST VALUE 100.
88 REQ-NO-DATA-FOUND VALUE 148.
88 REQ-SOURCE-REQ VALUE 128.

so for unstring if i use delimited by space is it ok for 88 level as it has space in the starting of line

Gnanas N · Posted: Tue Mar 25, 2008 7:07 pm

So first identifier will have space in it...

guptae · Posted: Tue Mar 25, 2008 7:11 pm

Hi Pritanshu,

Do you have any idea about 88 level?
Please refer the manual link top of this page.

dbzTHEdinosauer · Posted: Tue Mar 25, 2008 7:11 pm

suggest you use: delimited by all spaces

Gnanas N · Posted: Tue Mar 25, 2008 7:22 pm

Dick,

pritanshu · New User Joined: 31 Jan 2008 Posts: 15 Location: gurgaon

hi guptae,
i know about 88 level but what i m asking is not related to 88 level it s related to unstring

pritanshu · New User Joined: 31 Jan 2008 Posts: 15 Location: gurgaon

hi dick
can u tell me how it works delimited by all spaces
in this senario

88 REQ-RETURN-OK VALUE 000.

pritanshu · New User Joined: 31 Jan 2008 Posts: 15 Location: gurgaon

if i use unstring copy-record delimited by all space.
copy-book
spaces 88 REQ-RETURN-OK VALUE 000.
spaces 88 REQ-INVALID-REQUEST VALUE 100.
Then wht is my result in this case

Gnanas N · Posted: Tue Mar 25, 2008 7:54 pm

I would think this thread is not moving in correct direction.

Anyway it's rough idea,

READ line...
Check & If it contains spaces(in your case, ie, 88 variables), use one more identifier in UNSTRING of INTO clause...
So first identifier will have space...
Refer other identifiers which have the result of UNSTRING...

pritanshu · New User Joined: 31 Jan 2008 Posts: 15 Location: gurgaon

thax Gnanas

ok i got it i try this if i have any problem than i again cum to u pepole

regards,
pritanshu rai

Gnanas N · Posted: Tue Mar 25, 2008 8:15 pm

Another way...
If you know exactly how many spaces are there in the starting of 88 line...

dbzTHEdinosauer · Posted: Tue Mar 25, 2008 9:01 pm

ok children, since none of you bother to run tests:

the input line is:
88 THIS-IS-REFERENCE VALUE 1, 2, 4, 5.

there are 13 spaces in front of the '88'.

dbzTHEdinosauer · Posted: Tue Mar 25, 2008 9:04 pm

when dealing with copybooks, I would not read and process one line at a time. I would read and build the line until I found a period.

otherwise dealing with this:

Marso · Posted: Wed Mar 26, 2008 3:25 pm

So now you have 2 possibilities:
1. using UNSTRING alone. you know the first identifier will be empty:

pritanshu · New User Joined: 31 Jan 2008 Posts: 15 Location: gurgaon

thanks to all
my problem has been resolved by using
UNSTRING text DELIMITED BY ALL SPACES

regards,
pritanshu rai