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
 
TSO SEND command from assembler program.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
pjb

New User


Joined: 27 Sep 2007
Posts: 6
Location: Illinois

PostPosted: Tue Feb 26, 2008 8:31 pm    Post subject: TSO SEND command from assembler program.
Reply with quote

Some years ago a had a nifty assembler program that I would run interactively via CLIST. it would read instream data fro the screen and output TSO SEND commands to another user. I lost it and can't remeber how to output the SEND command. I formatted the data string and user id on a single line and then either did some kind of write, or called something for output. Has anybody ever done this?
Back to top
View user's profile Send private message

pjb

New User


Joined: 27 Sep 2007
Posts: 6
Location: Illinois

PostPosted: Tue Feb 26, 2008 11:20 pm    Post subject: Reply to: TSO SEND command from assembler program.
Reply with quote

Is it possible to do this with a TPUT and specify another user? I have tried with a TPUT and it will send output back to me, but if I include the USERIDL on the TPUT command, the output message is lost
Back to top
View user's profile Send private message
pjb

New User


Joined: 27 Sep 2007
Posts: 6
Location: Illinois

PostPosted: Wed Feb 27, 2008 12:44 am    Post subject: TPUT message to another user with USERIDL parm
Reply with quote

This is similiar to my prvious question about SEND messages. Has anyone
DOES the USERIDL parameter work on TPUT. I should be able to send a message to another user, but it will not work. The message goes nowhere. If I pull the USERIDL parm, the message goes to my terminal.
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Wed Feb 27, 2008 2:41 am    Post subject:
Reply with quote

How about doing it all in the CLIST? Enter repeated messages until DONE is entered. Be sure to enter only alpha numerics and no * / - +

Code:
PROC 1 USERID                             
TOP: -                                   
WRITE ENTER MESSAGE                       
READ                                     
IF &SYSDVAL = DONE THEN GOTO FINI         
SEND '&SYSDVAL',USER(&USERID)             
GOTO TOP                                 
FINI: -                                   
EXIT                                     
Back to top
View user's profile Send private message
pjb

New User


Joined: 27 Sep 2007
Posts: 6
Location: Illinois

PostPosted: Wed Feb 27, 2008 2:50 am    Post subject: CLIST could work
Reply with quote

That would work if I can find a way to enter up to ten lines of text and then being able to send all when done. I'm not much of a CLIST guy. Is there a way to table up the lines and the release when done?

Thanks
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Command to find TMEMBER name for a TPIPE Siva NKK Kothamasu IMS DB/DC 0 Wed Aug 16, 2017 6:08 pm
This topic is locked: you cannot edit posts or make replies. rexx to create a tso command Bharath Vikraman CLIST & REXX 1 Tue Aug 08, 2017 3:32 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm
No new posts pre-compiler for program in an HFS Pedro DB2 0 Fri Jun 23, 2017 11:13 pm
No new posts Compiling program in endeavor for tra... RALAKKAL Compuware & Other Tools 4 Mon Jun 05, 2017 8:27 pm


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