Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

GTEQ Error with Enterprise Cobol

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
sibi Yohannan

New User


Joined: 15 Apr 2009
Posts: 47
Location: Bangalore

PostPosted: Thu Apr 16, 2009 4:48 pm    Post subject: GTEQ Error with Enterprise Cobol
Reply with quote

Hi,

A program is using GTEQ syntax while reading from a VSAM file.

There are two cases where the compiler is giving MAX Condition code of 08.

1) With VS Cobol-2 Compiler
The compiler is giving MAX Condition code of 08 at the CICS transalator step.
2) With Enterprise Cobol Compiler.
The compiler is giving MAX Condition code of 08 at the COBOL COMPILE & LINKEDIT step.

Need to understnad the cause of this, Is there any alternate command for GTEQ which Supports in Enterprise Cobol.

We had a similar case with the EQ command, but we changed EQ to "EQUAL" and it compiled succesfully.

I tried the below two sysntax

NOT LESS THAN
NOT <

But both didnt work, MAX condition code of 08 during compilation.

I am doing READNEXT in a CICS program.

EXEC CICS READNEXT
DATASET ('datset Name')
INTO (Variable Name)
RIDFLD (Key-Data)
LENGTH (LENGTH)
NOT <
END-EXEC.
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Thu Apr 16, 2009 4:55 pm    Post subject:
Reply with quote

look at the syntax for READNEXT in the manual and tell me where you can have any kind of equality check.

it is part of the START(BR) API.

RTFM...............................
Back to top
View user's profile Send private message
sibi Yohannan

New User


Joined: 15 Apr 2009
Posts: 47
Location: Bangalore

PostPosted: Thu Apr 16, 2009 6:36 pm    Post subject:
Reply with quote

Thank you
It ws my mistake
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Thu Apr 16, 2009 6:40 pm    Post subject:
Reply with quote

Thx for getting back.

If you have questions in the future, please include whichever is appropriate: code, JCL, error msgs, etc...

we wasted a lot of your time by not knowing exactly your problem.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Thu Apr 16, 2009 7:02 pm    Post subject: Reply to: GTEQ Error with Enterprise Cobol
Reply with quote

The GTEQ keyword is VALID with a STARTBR and is the API default.

However, the GTEQ keyword is INVALID with a READNEXT API.

This is all documented in the applicable CICS APPLICATION PROGRAMMING REFERENCE manual.

Regards,
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts XML Parse for COBOL 5.2 Bhanu Praveen COBOL Programming 1 Sat Jul 08, 2017 8:58 pm
No new posts Dynamic output file creation in cobol... smileheal COBOL Programming 7 Thu Jun 15, 2017 10:53 pm
No new posts Search utility(3.14) using JCl and Cobol RKS3 COBOL Programming 12 Sat Jun 10, 2017 10:24 pm
No new posts COBOL DB2 program - zIIP eligible vasanthz COBOL Programming 7 Wed May 31, 2017 5:12 am
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us