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
 

 

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 MAX-RC 88 and Return code 606 in DFH0... lind sh CICS 1 Tue Jan 24, 2017 1:23 pm
No new posts How to Capture the Max return code of... anilkumar922 All Other Mainframe Topics 0 Thu Jan 12, 2017 12:02 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts PL/I code tuning/Performance improvement Virendra Shambharkar PL/I & Assembler 4 Mon Dec 05, 2016 11:57 am
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am


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