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
 

 

Unwrap in jcl

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
ashwini2002

New User


Joined: 18 Jul 2016
Posts: 1
Location: INDIA

PostPosted: Tue Jul 19, 2016 9:33 pm    Post subject: Unwrap in jcl
Reply with quote

Hi,

Can someone please help .

I have error log as below. which is input

Input desc : Each line is 80 bytes, each set will have 4 or 5 lines. Number of sets would be more than 1000.

PROGRAM: PROGRAM1 DESC: Process A
DATE PROCESSED: 14-07-2016 ON 02:34:31 in BLOCK: PROCESS A
MESSAGE1: DM001
MESSAGE2: Router_account_number: 00015340540

PROGRAM: PROGRAM1 DESC: Process A
DATE PROCESSED: 14-07-2016 ON 02:34:31 in BLOCK: PROCESS A
MESSAGE1: DM001
MESSAGE2: Router_account_number: 00015340631

PROGRAM: PROGRAM2 DESC: Process B
DATE PROCESSED: 14-07-2016 ON 02:40:21 in BLOCK: PROCESS B
MESSAGE1: DM001
MESSAGE2: customer id: 100
MESSAGE3: Classcode is 01

PROGRAM: PROGRAM2 DESC: Process B
DATE PROCESSED: 14-07-2016 ON 02:40:21 in BLOCK: PROCESS B
MESSAGE1: DM001
MESSAGE2: customer id: 101
MESSAGE3: Classcode is 02

PROGRAM: PROGRAM3 DESC: Process C
DATE PROCESSED: 14-07-2016 ON 02:40:21 in BLOCK: PROCESS C
MESSAGE1: DM001
MESSAGE2: customer id: 10011350
MESSAGE3: Classcode is 91

PROGRAM: PROGRAM3 DESC: Process C
DATE PROCESSED: 14-07-2016 ON 02:40:21 in BLOCK: PROCESS C
MESSAGE1: DM001
MESSAGE2: customer id: 10011353
MESSAGE3: Classcode is 92


Output should be as below :

Output desc - All the above input sets which are in 4 lines are 5 lines should be unwrapped in to one line correspondingly with semicolon as delimiter

PROGRAM: PROGRAM1 DESC: Process A;DATE PROCESSED: 14-07-2016 ON 02:34:31 in BLOCK: PROCESS A;MESSAGE1: DM001;MESSAGE2: Router_account_number: 00015340540
PROGRAM: PROGRAM1 DESC: Process A;DATE PROCESSED: 14-07-2016 ON 02:34:31 in BLOCK: PROCESS A;MESSAGE1: DM001;MESSAGE2: Router_account_number: 00015340631
PROGRAM: PROGRAM2 DESC: Process B;DATE PROCESSED: 14-07-2016 ON 02:40:21 in BLOCK: PROCESS B;MESSAGE1: DM001;MESSAGE2: customer id: 100;MESSAGE3: Classcode is 01
PROGRAM: PROGRAM2 DESC: Process B;DATE PROCESSED: 14-07-2016 ON 02:40:21 in BLOCK: PROCESS B;MESSAGE1: DM001;MESSAGE2: customer id: 101;MESSAGE3: Classcode is 02
PROGRAM: PROGRAM3 DESC: Process C;DATE PROCESSED: 14-07-2016 ON 02:40:21 in BLOCK: PROCESS C;MESSAGE1: DM001;MESSAGE2: customer id: 10011350;MESSAGE3: Classcode is 91
PROGRAM: PROGRAM3 DESC: Process C;DATE PROCESSED: 14-07-2016 ON 02:40:21 in BLOCK: PROCESS C;MESSAGE1: DM001;MESSAGE2: customer id: 10011353;MESSAGE3: Classcode is 92
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7234

PostPosted: Tue Jul 19, 2016 10:31 pm    Post subject: Reply to: Unwrap in jcl
Reply with quote

Well, thanks for that. Do you need any assistance, or you just thought you'd let us know?
Back to top
View user's profile Send private message
steve-myers

Active User


Joined: 30 Nov 2013
Posts: 461
Location: The Universe

PostPosted: Tue Jul 19, 2016 10:43 pm    Post subject:
Reply with quote

  • JCL cannot examine or alter data. Only a program can examine or alter data, and prepare a report. Period. End of story.
  • All that JCL can do is define the environment used for a program and direct the system to run a program.
Some of the sort products - a program, in other words - may be able to perform this task.

The purpose of this forum is to assist people in resolving problems using the z/OS system. It is not a substitute for you doing your research and doing your work. Some of the responders in this forum can do consulting work, for which they expect to be paid. If you are prepared to pay a consultant for this project, indicate this and someone may contact you through the private mail facility of this forum.
Back to top
View user's profile Send private message
Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 1610
Location: NY,USA

PostPosted: Tue Jul 19, 2016 11:08 pm    Post subject:
Reply with quote

Quote:
Well, thanks for that. Do you need any assistance, or you just thought you'd let us know?
haha icon_biggrin.gif
ashwini2002,
Welcome!!
Please use a code tags and learn how to explain the problem in right manner. By what you posted ,please look for splice or resize or search on internet or this forum also you posted under wrong section and meaningless subject line and should have been posted under DFSORT/ICETOOL section unless you have sync sort.
Back to top
View user's profile Send private message
Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1529
Location: Andromeda Galaxy

PostPosted: Wed Jul 20, 2016 11:56 am    Post subject:
Reply with quote

Is it possible to change the Input to get output as desired? ( Which means you need to change the routine which produces the input)

Also Please check on RESIZE ( Assuming you have DFSORT product installed)
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Unwrap the data based on delimiter X'25' bhavana yalavarthi DFSORT/ICETOOL 1 Fri Dec 09, 2016 10:25 am


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