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
 

 

Wanted to display the value coded in 88 level.

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

Active User


Joined: 02 Jul 2005
Posts: 124
Location: Gurgaon

PostPosted: Thu Jun 08, 2006 11:42 am    Post subject: Wanted to display the value coded in 88 level.
Reply with quote

Hi All, if I wanted to display the value which we have coded at 88 level, how to code it?

I have coded like shown below...


WORKING-STORAGE SECTION.

01 EMP-CODE PIC X(02).
88 MFG-DEPT VALUE 'MF'.

PROCEDURE DIVISION.

MAIN-PARA.
DISPLAY 'CODE IS:' EMP-CODE.(Here Iwanted to display the value MF)
STOP RUN.

Thanks!
Rathna.
Back to top
View user's profile Send private message

David P

Active User


Joined: 11 Apr 2005
Posts: 106
Location: Cincinnati Ohio

PostPosted: Thu Jun 08, 2006 12:24 pm    Post subject: Re: Wanted to display the value coded in 88 level.
Reply with quote

Just before your display statement you can have one more statement as

SET MFG-DEPT TO TRUE.

This will do what you want.

-regards,
David P.
Back to top
View user's profile Send private message
crrindia

Active User


Joined: 02 Jul 2005
Posts: 124
Location: Gurgaon

PostPosted: Thu Jun 08, 2006 2:02 pm    Post subject: Re: Wanted to display the value coded in 88 level.
Reply with quote

Hi David, Thank you very much. It workded fine.

Thanks!
Rathna.

David P wrote:
Just before your display statement you can have one more statement as

SET MFG-DEPT TO TRUE.

This will do what you want.

-regards,
David P.
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 Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm
No new posts Display FTP Session Count within TSO Yolanda Harvey TSO/ISPF 3 Fri Mar 10, 2017 10:31 pm
No new posts To display values of multiple rows in... vinu78 DB2 2 Thu Mar 09, 2017 1:20 pm
No new posts Display ZEDLMSG without Pressing F1 &... anandgbe CLIST & REXX 8 Thu Dec 15, 2016 4:20 pm
No new posts Syncsort - Hard coded Value in output PORYES SYNCSORT 1 Thu Nov 03, 2016 9:23 am


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