MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Compiler option TEST(NONE,SYM) and 88 Level variable

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
karavi2000
Beginner


Joined: 17 Aug 2003
Posts: 51
Topics: 26
Location: Chennai

PostPosted: Thu Jun 14, 2007 11:22 am    Post subject: Compiler option TEST(NONE,SYM) and 88 Level variable Reply with quote

Hi,

I tried running a program with COBOL Compiler option "TEST(NONE,SYM)" and 88 Level variable declared in the working storage. But the program didn't get compiled successfully until I removed that particular option.

Is there any reason why compiler should not allow both these two or am I missing something here? Please enlighten us. Thanks for your time.

Regards,
Ravishankar
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Thu Jun 14, 2007 11:40 am    Post subject: Reply with quote

karavi2000,

What is the error message you got? AFAIK the compiler options you specify should not any impact.

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
karavi2000
Beginner


Joined: 17 Aug 2003
Posts: 51
Topics: 26
Location: Chennai

PostPosted: Thu Jun 14, 2007 1:16 pm    Post subject: Reply with quote

Kolusu,
Here is what I found out.

TEST(NONE SYM) will work without a 88 level variable. If we have 88 level variable defined in the program, it will work only if it is TEST(NONE,SYM) (Lookout for the comma ',').

I couldn't make a logical sense out of what I got even after having a first glance at some references, but this is the way it works. Any after thoughts?

Anyway, only after your reply I got a strike to try this one. Thanks for that.

Regards,
Ravishankar
Back to top
View user's profile Send private message
Phantom
Data Mgmt Moderator
Data Mgmt Moderator


Joined: 07 Jan 2003
Posts: 1056
Topics: 91
Location: The Blue Planet

PostPosted: Thu Jun 14, 2007 1:23 pm    Post subject: Reply with quote

karavi2000,

Would you mind replying to this message ? We will also get a chance to learn new things.
Quote:

What is the error message you got?


Thanks,
Phantom
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Thu Jun 14, 2007 1:28 pm    Post subject: Reply with quote

Quote:

TEST(NONE SYM) will work without a 88 level variable.

karavi2000,

Says who? Just for kicks I ran a test.

Code:

CBL TEST(NONE SYM)         
IDENTIFICATION DIVISION.   
PROGRAM-ID.    SAMPLE     
ENVIRONMENT DIVISION.     
DATA DIVISION.             
WORKING-STORAGE SECTION.   
01 WS-A   PIC X(01).       
                           
PROCEDURE DIVISION.       
      DISPLAY 'test-value: ' WS-A   
      GOBACK.   


and got this syntax error

Code:

IGYOS4003-E   Invalid option "TEST(NONE SYM)" was found and discarded.



Quote:

If we have 88 level variable defined in the program, it will work only if it is TEST(NONE,SYM) (Lookout for the comma ',').



The syntax of TEST compiler option when specifying more than 1 option is to seperate them with a comma. Check this link which explains in detail about the compiler option.

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3PG10/2.4.50?DT=20020923143836

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Phantom
Data Mgmt Moderator
Data Mgmt Moderator


Joined: 07 Jan 2003
Posts: 1056
Topics: 91
Location: The Blue Planet

PostPosted: Thu Jun 14, 2007 1:36 pm    Post subject: Reply with quote

Karavi2000,

Hope you saw Kolusu's test results....This is why we always request users to post the error message - just to avoid people assuming something and mis-leading others too.

Pls Check your error messages and let us know if you agree / still contradict kolusu's answer.

Thanks,
Phantom
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group