Who's On?

	Membership:
	Latest: Rich Cowie
	Past 24 Hours: 0
	Prev. 24 Hours: 0
	Overall: 5255

	People Online:
	Visitors: 489
	Members: 0
	Total: 489

Name	Points
Greg Moeller	4184
David Williams	3349
JonA	3291
Kat V	2984
Woozy	1973
Jimmy Chiu	1883
Kwane McNeal	1437
Ragu Raghavan	1375
Roger French	1315
mark.cook	1244

Cobol EXAMINE statement

1 Replies

0 Subscribed to this topic

17 Subscribed to this forum

Sort:

Author

Messages

Karl Kemp

Basic Member Send Private Message

Posts: 20

3/15/2007 2:13 PM

Has anyone ever used the Micro Focus COBOL Examine statement within Lawson?

I have used this in non-Lawson apps with success, but can't seem to get it to work in Lawson.

Maybe you have other ideas.

Here is what I am needing to do.

I'm reading a file with records such as the following

rec 1 = /lawson/work:
rec 2 = /lawson/obj:

I'm needing to determine where the ":" character is on each individual record. Thus I was going to use the EXAMINE TALLYING UNTIL statement.

Thoughts?

John Henley

Posts: 3351

3/15/2007 4:06 PM

Karl, the 'TALLYING' construct is invalidated by Lawson's "bismark" pre-compiler.
The workaround is to use PERFORM ... VARYING ... UNTIL ...