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
 
Is it possible to extract the contents of message

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
karthikr44

Active User


Joined: 25 Aug 2007
Posts: 235
Location: Chennai

PostPosted: Fri Jun 20, 2008 2:02 pm    Post subject: Is it possible to extract the contents of message
Reply with quote

Hi,

Is it possible to extract the contents of message through REXX

/JSTP0010 EXEC CMDCPRL2,
.
.
.
.
.
// TEMPUNIT='SYSDA'
==MSG> CAY6081E DISP OF CATLG INVALID
==MSG> "DEV2.US.DOHBXAPP.E1CLAIM1.JUN0208.SRT" - DATA SET ALREADY CATALOGED
==MSG>

Actually i want to extract that dataset name by using the code and placing the cursor on that MSG line

/* REXX */
ADDRESS ISREDIT MACRO
"ISREDIT (LIN,COL) = CURSOR"
"ISREDIT (DATA) = LINE .ZCSR"
SAY DATA

BUt i got the output for DATA as
// TEMPUNIT='SYSDA'
Back to top
View user's profile Send private message

UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 757
Location: Germany

PostPosted: Fri Jun 20, 2008 2:16 pm    Post subject:
Reply with quote

Hi karthikr44 !

Your desired string is in a messaage-line. Make it a data-line before.
Use MD for that.
Back to top
View user's profile Send private message
karthikr44

Active User


Joined: 25 Aug 2007
Posts: 235
Location: Chennai

PostPosted: Fri Jun 20, 2008 3:40 pm    Post subject: Reply to: Is it possible to extract the contents of message
Reply with quote

HI UmeySan,

I am new to REXX. Will u explain more about MD command or send any samples.


Regards
R KARTHIK
Back to top
View user's profile Send private message
UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 757
Location: Germany

PostPosted: Fri Jun 20, 2008 5:07 pm    Post subject:
Reply with quote

Hi karthikr44 !

Nothing to do especially with REXX. Just a Edit-Line-Command.

To see how it's function, edit a member, type cols in a line, a straightedge is displayed. Then type MD over the "=COLS>" Position. This line now becomes a normal data-line.

000001 SPACE-1
=COLS> ----+----1----+----2----+----3----+---
000002 IKJTCB DSECT=YES,LIST=YES

000001 SPACE-1
MDOLS> ----+----1----+----2----+----3----+---
000002 IKJTCB DSECT=YES,LIST=YES

000001 SPACE-1
000002 ----+----1----+----2----+----3----+
000003 IKJTCB DSECT=YES,LIST=YES

Nice weekend
Back to top
View user's profile Send private message
karthikr44

Active User


Joined: 25 Aug 2007
Posts: 235
Location: Chennai

PostPosted: Fri Jun 20, 2008 6:11 pm    Post subject: Reply to: Is it possible to extract the contents of message
Reply with quote

Hi UMEY,

Thanks ... Now i got it...
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Spool Extract for Z /os 1.04 version Khadhar Basha CLIST & REXX 3 Thu Sep 28, 2017 3:14 pm
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts Extract Data till prev hour balaji81_k DB2 16 Fri Aug 25, 2017 9:25 pm
No new posts Default Message in Rexx cvnlynn CLIST & REXX 9 Wed Aug 02, 2017 12:38 am
No new posts REXX WTO for console message bipinpeter CLIST & REXX 6 Tue Jun 27, 2017 3:56 pm

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