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 write string vertically

 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
sb lathiya

New User


Joined: 04 Jul 2012
Posts: 2
Location: India

PostPosted: Sat Mar 02, 2013 3:42 pm    Post subject: How to write string vertically
Reply with quote

How can we display the string vertically in spool ? string length is 28 bytes.
eg. Input - my name is ethn matthew hunt

Output -
m
y

n
a
.
.
.
.
.
h
u
n
t
Back to top
View user's profile Send private message

enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10350
Location: italy

PostPosted: Sat Mar 02, 2013 4:00 pm    Post subject: Reply to: How to write string vertically
Reply with quote

from Your profile ...
Skills: JCL,COBOL,DB2,VSAM,CICS,Xpeditor,Chngeman,fileaid,QMF

it is strange that with a set of skills like that You' d need to ask such a simple question.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7314

PostPosted: Sat Mar 02, 2013 4:37 pm    Post subject: Reply to: How to write string vertically
Reply with quote

You just DISPLAY/WRITE each byte, one-at-a-time.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Sun Mar 03, 2013 10:35 am    Post subject:
Reply with quote

There is no short-cut function of doing it in COBOL, AFAIK; you've to write a bit of code, as Bill has indicated to. Said that, have you tried something and it did not work?
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1067
Location: Oostende, Belgium

PostPosted: Sun Mar 03, 2013 6:05 pm    Post subject:
Reply with quote

Turn your screen 90 degrees.

Or your head.
Back to top
View user's profile Send private message
sb lathiya

New User


Joined: 04 Jul 2012
Posts: 2
Location: India

PostPosted: Sun Mar 03, 2013 8:20 pm    Post subject:
Reply with quote

@ Anuj , Bill : Thanks for reply

Apart from DISPLAY/WRITE ,Is there any other method we can do this???
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7314

PostPosted: Sun Mar 03, 2013 8:49 pm    Post subject: Reply to: How to write string vertically
Reply with quote

You want to see the output in the spool but you don't want to use WRITE or DISPLAY?

Other than going back to pre-Cobol II and using EXHIBIT, I don't know. Write and CALL an Assembler program? C/C++? FORTRAN? PL/I?

Why would you not want to use WRITE or DISPLAY?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8187
Location: East Dubuque, Illinois, USA

PostPosted: Sun Mar 03, 2013 8:51 pm    Post subject:
Reply with quote

Quote:
Apart from DISPLAY/WRITE ,Is there any other method we can do this???
What on earth do you want? COBOL allows you to WRITE to produce output to spool or a file, and DISPLAY to produce output to spool, and that is it -- there is no secret COBOL verb to output data a different way.

Topic locked since you have been given your answer, and you are not wanting the answer you were given.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    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 line 52: Name or string > 250 char... Ashishpanpaliya CLIST & REXX 5 Sat Oct 14, 2017 2:29 am
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
No new posts Search for a string in many PDS KARTHIGADEVI CLIST & REXX 5 Fri Sep 08, 2017 2:32 pm
No new posts How to change a string containing the... chong.zhou TSO/ISPF 6 Tue Aug 29, 2017 4:54 pm
No new posts String after '.' (period) is not copy... balaji81_k SYNCSORT 6 Wed Aug 23, 2017 9:35 pm

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