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

Rexx To copy JEM "==>MSG" Lines to a File


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Shiva Reddy Munagala

New User


Joined: 26 May 2014
Posts: 2
Location: India

PostPosted: Mon May 26, 2014 4:34 pm
Reply with quote

Hello,

I'm new to Rexx and this is my first post,

Could any of you guide me to write to file the "==>MSG" lines that we get after JEM command in a JCL i would be very glad.

My intention is to clear all the File Catalog Error that i get, if this is successful i will enhance to clear also GDG errors, my current algorithm is below,

1. Write jem errors to a temp file
2. Find first Catlog error using string search, Take file name, Queue to JCL for delete list, Delete all the lines till that line
3. Repeat Step 2 untill no more catlog errors.
4. Submit JCL which has the list that needs to be deleted.

I have read a material which helped me to have some basic knowledge on the file handling through Rexx.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley

PostPosted: Tue May 27, 2014 7:32 pm
Reply with quote

Show us what you tried and what problems you have encountered.
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 202
Location: Toronto, ON, Canada

PostPosted: Tue May 27, 2014 10:46 pm
Reply with quote

I am not sure this is possible. The MSG> line is for display purpose and is not part of the actual data. If it were possible I would be curious to know how

Try using the JSCAN command since this will create a temporary dataset. JobScan also has an ISPF feature to to jcl verification.
Back to top
View user's profile Send private message
Shiva Reddy Munagala

New User


Joined: 26 May 2014
Posts: 2
Location: India

PostPosted: Wed May 28, 2014 11:08 am
Reply with quote

Thanks for your response, I will try with JSCAN and will get back to u guys.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley

PostPosted: Wed May 28, 2014 10:22 pm
Reply with quote

It is not clear how many MSG lines are there. If it is contained within the displayed data, you can use ZSCREENI to get an image of the current screen.
Back to top
View user's profile Send private message
Steve Coalbran

New User


Joined: 01 Feb 2007
Posts: 89
Location: Stockholm, Sweden

PostPosted: Fri Aug 29, 2014 3:59 pm
Reply with quote

2 thoughts (perhaps?):
  • MD999999 and COMPARE * to see which were MSG-(/INFO-/NOTE-)LINEs.
    You can run the MakeData inside a Macro
  • PANEXIT/*REXX section quizing ZDATA for ==MSG> lines (has limitations)
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Sat Aug 30, 2014 2:46 am
Reply with quote

ADDRESS 'ISREDIT'

"LOCATE FIRST NOTELINE"

IF RC > 0
THEN DO
"LOCATE FIRST MSGLINE"
"LOCATE NEXT MSGLINE"
"LOCATE NEXT MSGLINE"
"LOCATE NEXT MSGLINE"
END

This is how I have done this in the past. this example I was only looking for the first 4 msglines.
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 -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
Search our Forums:

Back to Top