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 do a line break while sending the data for Printing

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
erhema

New User


Joined: 07 Oct 2008
Posts: 23
Location: Chennai

PostPosted: Fri Feb 25, 2011 3:58 pm    Post subject: how to do a line break while sending the data for Printing
Reply with quote

HI,

I have a requirement to Print my IMS DC screen. We have an existing Production program with all the CBLTDLI calls ( CHNG call and ISRT call for Printing). Iam calling this program from my program. I have send the PRint data (80 *24) MSG-PRINT-DATA to the Production program.

Am doing a soft(dummy print), which will print the data to an excel sheet in a share folder. Iam getting the PRINT result in a single line in excel sheet in stead of formatted way in 24 lines.

I have defined

01 WS-PAGE-PRINT.
05 WS-LINE PIC X(80) OCCURS 24 TIMES.

and have moved each line screen data to WS-LINE(x) and again from WS-PAGE-PRINT to MSG-PRINT-DATA in my program.

Can anyone PLease let me know how can i send the print data in such a way that the print happens in 24 lines instead of single line.

Thanks
Hema
Back to top
View user's profile Send private message

erhema

New User


Joined: 07 Oct 2008
Posts: 23
Location: Chennai

PostPosted: Wed Mar 02, 2011 10:53 am    Post subject:
Reply with quote

Hi All,

I did some more searching and found that X'15' is the value for Line feed for IMS.

I have assinged X'15' for the 80th character of each line before sending for printing, and now am getting the output in 24 lines with apporpriate line break.

Earlier i was searching for LIne break for cobol and ended up with X'0A' which doesnt work and was adding some junks to the printed IMS output.

Thanks
Hema
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Mar 02, 2011 11:17 am    Post subject: Reply to: how to do a line break while sending the data for
Reply with quote

Good to hear this is working - thank you for posting the resolution icon_smile.gif

d
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 -> IMS DB/DC 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 sending email from jcl using the mail... niloyarp JCL & VSAM 5 Tue Oct 10, 2017 12:32 pm
No new posts Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts opening a dataset after reading it fr... arunsoods DFSORT/ICETOOL 5 Wed Oct 04, 2017 3:54 pm

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