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

Message to be displayed in 3.4


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
CJT

New User


Joined: 02 Aug 2007
Posts: 83
Location: Here

PostPosted: Mon Sep 10, 2007 1:11 pm
Reply with quote

Hi,

I would like to know how a message can be displayed in 3.4 from a rexx program. Let me elaborate. In the message column I would like my mesage to come in Under the "Message" column. please let me know your ideas.

Code:
    
DSLIST - Data Sets Matching My.DATASET*                          Row 1 of 2
Command ===>                                       Scroll ===> PAGE
                                                                                 
Command - Enter "/" to select action                   Message         Volume
 --------------------------------------------------------------------------------
MY.DATASET                                       MY MESSAGE                TSP053

Back to top
View user's profile Send private message
CJT

New User


Joined: 02 Aug 2007
Posts: 83
Location: Here

PostPosted: Tue Sep 11, 2007 9:42 am
Reply with quote

Any responses?
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Tue Sep 11, 2007 11:04 am
Reply with quote

Try this:
Code:
/* REXX */                                   
                                             
ZDLMSG = 'Message from me'                   
ZDLREF = 'Y'                                 
                                             
ADDRESS ISPEXEC "VPUT (ZDLMSG ZDLREF) SHARED"
                                             
EXIT                                       


O.
Back to top
View user's profile Send private message
CJT

New User


Joined: 02 Aug 2007
Posts: 83
Location: Here

PostPosted: Tue Sep 11, 2007 11:45 am
Reply with quote

Hi O,

I am sorry but the code did not give me the desired result.
However when I tried this code it gives me the message on the top right corner of the screen.

Code:
ZEDSMSG = 'Message from me'     
ZEDLMSG = 'Long Message from me'
ADDRESS ISPEXEC "SETMSG MSG(ISRZ001)"

DSLIST - Data Sets Matching My.Dataset                   Message from me
Command ===>                                                   Scroll ===> PAGE                                                                                  
 Command - Enter "/" to select action                Message      Volume
 -------------------------------------------------------------------------------
  My.Dataset                                                            TSP053






When PF1 is pressed the Long message is displayed. Is there anyway to get the message next to the dataset in 3.4 ?
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 -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
This topic is locked: you cannot edit posts or make replies. how can I proof that message was post... Java & MQSeries 1
No new posts IMS Message : DFS3577A IMS DB/DC 4
No new posts dsnrexx fails without error message CLIST & REXX 9
No new posts Print out all lines with 'IBM' compil... CLIST & REXX 8
No new posts How to get the message id thats trigg... Java & MQSeries 0
Search our Forums:

Back to Top