View previous topic :: View next topic
|
Author |
Message |
pjb
New User
Joined: 27 Sep 2007 Posts: 6 Location: Illinois
|
|
|
|
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 |
|
|
pjb
New User
Joined: 27 Sep 2007 Posts: 6 Location: Illinois
|
|
|
|
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 |
|
|
pjb
New User
Joined: 27 Sep 2007 Posts: 6 Location: Illinois
|
|
|
|
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 |
|
|
Bill Dennis
Active Member
Joined: 17 Aug 2007 Posts: 562 Location: Iowa, USA
|
|
|
|
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 |
|
|
pjb
New User
Joined: 27 Sep 2007 Posts: 6 Location: Illinois
|
|
|
|
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 |
|
|
|