IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Unwrap in jcl


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
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
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

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Jul 19, 2016 10:31 pm
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 Member


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

PostPosted: Tue Jul 19, 2016 10:43 pm
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

Global Moderator


Joined: 21 Sep 2010
Posts: 3048
Location: NYC,USA

PostPosted: Tue Jul 19, 2016 11:08 pm
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

Global Moderator


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

PostPosted: Wed Jul 20, 2016 11:56 am
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Search our Forums:

Back to Top