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
 

 

To Display the output in vertical manner

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

New User


Joined: 23 Jul 2005
Posts: 6
Location: bangalore

PostPosted: Mon Jul 25, 2005 12:58 am    Post subject: To Display the output in vertical manner
Reply with quote

PROCEDURE DIVISION.
PARA1.
ACCEPT E-NAME.
I AM ACCEPTING A NAME JAYAPRAKASH.....
I WANT AN OUTPUT IN THE VERTICAL MODE..........
LIKE.... J
A
Y
A
P
R
A
K
A
S
H

DISPALY E-NAME.
STOP RUN.
Back to top
View user's profile Send private message

shobam

New User


Joined: 18 Jul 2005
Posts: 34
Location: CN

PostPosted: Mon Jul 25, 2005 3:30 pm    Post subject: Re: To Display the output in vertical manner
Reply with quote

MOVE +1 TO IND

PERFORM UNTIL IND > ENAME-LEN
DISPLAY ENAME(IND:1)
IND = IND + 1
END-PERFORM

Find the length of the ENAME using FUNTION LENGTH() and move it to ENAME-LEN.

Hope it works.
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 Read two inputs and write into output... murali.andaluri DFSORT/ICETOOL 4 Wed Jul 26, 2017 7:35 pm
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts JES2 doesn't honor the priority of th... Aron Lendvai JCL & VSAM 7 Thu Jun 29, 2017 1:41 pm
No new posts vertical bar cvnlynn CLIST & REXX 4 Thu Jun 29, 2017 6:22 am
No new posts Display upon console bipinpeter COBOL Programming 1 Thu Jun 22, 2017 12:35 am


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