Who's On?

	Membership:
	Latest: Saef
	Past 24 Hours: 0
	Prev. 24 Hours: 0
	Overall: 5226

	People Online:
	Visitors: 311
	Members: 0
	Total: 311

Name	Points
Greg Moeller	4184
David Williams	3349
JonA	3291
Kat V	2984
Woozy	1973
Jimmy Chiu	1883
Kwane McNeal	1437
Ragu Raghavan	1372
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

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: 3353

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 ...