Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How to include single code in Working-storage variable comm?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
rathvel
Warnings : 2

New User


Joined: 27 Sep 2005
Posts: 1

PostPosted: Thu Apr 13, 2006 3:41 pm    Post subject: How to include single code in Working-storage variable comm?
Reply with quote

Hello,

I need to include single code in Working-Storage variable comment.

Eg : My value would be INCLUDE=(140,5,CH,EQ,C'00001'.

Kindly let me know that How should I declare working-storage variable to hold above mentioned value. So that I can use that variable in procedure division....

Thanks & Regards,
Rathvel.
Back to top
View user's profile Send private message

DavidatK

Active Member


Joined: 22 Nov 2005
Posts: 700
Location: Troy, Michigan USA

PostPosted: Thu Apr 13, 2006 7:45 pm    Post subject: Re: How to include single code in Working-storage variable c
Reply with quote

Rathvel,

Code:

    05  VAR-1  PIC X(29) VALUE  'INCLUDE=(140,5,CH,EQ,C''00001'''.
Back to top
View user's profile Send private message
new2cobol

New User


Joined: 04 Jan 2006
Posts: 77
Location: Bangalore

PostPosted: Fri Apr 14, 2006 12:30 am    Post subject:
Reply with quote

Can't we use a single-quote double-quote combo?
Code:

05  VAR-1  PIC X(29) VALUE  "INCLUDE=(140,5,CH,EQ,C'00001'".


Won't the above line work???
Back to top
View user's profile Send private message
DavidatK

Active Member


Joined: 22 Nov 2005
Posts: 700
Location: Troy, Michigan USA

PostPosted: Fri Apr 14, 2006 1:08 am    Post subject: Re: How to include single code in Working-storage variable c
Reply with quote

new2cobol,

Yes that is expectable if the COBOL compiled option QUOTE is in effect. However, I believe most places have the APOST compiler option on.

You should try not to change from the installation standard, it makes code hard to maintain.

Dave,
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Moving a COMP-3 Variable to a Numeric... ajayachander COBOL Programming 2 Thu Dec 14, 2017 5:46 pm
No new posts IBEGENER RETURN CODE 12 anilkumar922 All Other Mainframe Topics 5 Wed Dec 13, 2017 11:41 am
No new posts Finding the plan when code compiled u... Ahemad DB2 1 Fri Dec 01, 2017 6:38 pm
No new posts Strange Code amitc23 COBOL Programming 6 Tue Nov 28, 2017 11:25 am
No new posts REXX LISTDSI () SMSINFO is not working upendrasri CLIST & REXX 4 Fri Nov 17, 2017 11:33 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us