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 Data security erase on RAID device steve-myers All Other Mainframe Topics 0 Sat Jan 13, 2018 6:41 am
No new posts Append the milliseconds to the data s... girishb2 DFSORT/ICETOOL 1 Thu Dec 21, 2017 9:07 pm
No new posts Moving a COMP-3 Variable to a Numeric... ajayachander COBOL Programming 2 Thu Dec 14, 2017 5:46 pm
No new posts Extract record for change in combinat... Trinadh DFSORT/ICETOOL 6 Thu Nov 23, 2017 3:32 pm
No new posts Fetching data from JHS as per the cur... arunsoods All Other Mainframe Topics 4 Wed Nov 22, 2017 1:54 pm

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