Re: F against a REXX STC

2005-11-04 Thread Jan MOEYERSONS

Can I send MVS modify command against a REXX that is running as an STC?

I did something very similar with a Cobol program. I guess that you can do
the same in Rexx (set-up of the environment may be a little harder, though).

I've written an assembler program that set's up the plumbing for handling
the start, modify and stop MVS commands and then attaches a subtask that is
running the Cobol program.

Communication between the assembler and the Cobol program, in my case, is a
simple structure in the assembler programs' working storage, mapped in the
Cobol LINKAGE SECTION. When a modify command comes in, the assembler code
handles it, analyzes the meaning of it and puts the corresponding values in
the communication structure. It then POSTs an ECB on which the Cobol
program (through a call to an other little assembler sub-routine) is
waiting. Cobol program picks up the parameters from its linkage and
processes.

In the main assembler program I have also a STIMER that pops every-so-often
and writes out a WTO to say it is still alive. This prevents the process
from abending for inactivity time-out when it is running as a simple job
(handy during testing...)

Cheers,

Jantje.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: F against a REXX STC

2005-11-04 Thread Farley, Peter x23353
More specifically, google for QEDIT +assembler +MVS and look at the
WAITREXX page from Xephon.

Just googling QEDIT gets you to the semware.com page for the PC file editor
QEDIT, now named The Semware Editor, a fine tool indeed (disclaimer: I
have owned/used/recommended it since PCDOS days) but not what you would be
looking for here.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] 
Sent: Thursday, November 03, 2005 8:40 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: F against a REXX STC

In [EMAIL PROTECTED],
on 11/03/2005
   at 03:25 PM, Zafiropoulos Konstantinos [EMAIL PROTECTED]
said:

Can I send MVS modify command against a REXX that is running as an STC?

Not in pure REXX, but you can do it with a small REXX-callable assembler
program. Google for QEDIT.

_
This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: F against a REXX STC

2005-11-03 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Zafiropoulos Konstantinos
 Sent: Thursday, November 03, 2005 7:26 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: F against a REXX STC
 
 
 Hi all,
 
 Can I send MVS modify command against a REXX that is running 
 as an STC? I
 just want to trigger a specific function using this modify 
 command on a
 loop-wait REXX STC. How this is implementing?
 

Well, the only thing that comes to my mind is to run an HLASM program
within your REXX code which would test the CIB chain (QEDIT macro) and,
if one exists, process the first MODIFY command and return the
parameters from it in REXX variables. You will likely need to have
another HLASM program to set the address space up to accept MODIFY
commands in the first place.

Thinking more about it, I might look at running an HLASM program as the
main routine so that it can set up the environment properly as well as
set up a SUBCOM environment. It would then invoke the IRXEXEC program to
set up and run the REXX code. The REXX code could then use the ADDRESS
xyz to get any pending data sent via the MODIFY command and process it.
You could also use this same functionality to write to the operator
console.

The above is not simple. I am not aware of any builtin REXX facilities
for z/OS console communications.


--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its'
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited.
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: F against a REXX STC

2005-11-03 Thread Kok, Howi
Instead of accepting command via console you can try using TCPIP.  The
IP API rexx exec sample members RSCLIENT and RSSERVER in TCPIP.SEZAINST
or whatever TCPIP data set name your shop uses can be modified to do
what you want.  You can code your rexx stc to accept connection from a
rexx client and receive a command from it.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Zafiropoulos Konstantinos
Sent: Thursday, November 03, 2005 7:26 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: F against a REXX STC

Hi all,

Can I send MVS modify command against a REXX that is running as an STC?
I
just want to trigger a specific function using this modify command on a
loop-wait REXX STC. How this is implementing?

 

Best regards,

Zafiropoulos Konstantinos

Main Systems support sector   

E.F.G. Eurobank-Ergasias 

1-3 Lyssikratous Str,

17674 Kallithea Attikis, Hellas

Tel: +30 (10) 9474082

E-mail: [EMAIL PROTECTED]


**
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager.

This footnote also confirms that this email message has been swept by
MIMEsweeper for the presence of computer viruses.

www.clearswift.com
**

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: F against a REXX STC

2005-11-03 Thread Walt Farrell

On 11/3/2005 11:24 AM, Kok, Howi wrote:

Instead of accepting command via console you can try using TCPIP.  The
IP API rexx exec sample members RSCLIENT and RSSERVER in TCPIP.SEZAINST
or whatever TCPIP data set name your shop uses can be modified to do
what you want.  You can code your rexx stc to accept connection from a
rexx client and receive a command from it.


That sounds like an interesting approach, but accepting commands via 
TCP/IP has some major differences from accepting commands from an 
operator console.


You have a much more restricted set of users who could give you a 
command when it has to come from an operator console, but anyone could 
send you a command via TCP/IP.


Walt

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: F against a REXX STC

2005-11-03 Thread Kok, Howi
If the stc is doing serious tasks then proper coding is needed to
examine the user who sends the command.  Can RACF be used to restrict
the client exec and port access?

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Walt Farrell
Sent: Thursday, November 03, 2005 11:11 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: F against a REXX STC

On 11/3/2005 11:24 AM, Kok, Howi wrote:
 Instead of accepting command via console you can try using TCPIP.  The
 IP API rexx exec sample members RSCLIENT and RSSERVER in
TCPIP.SEZAINST
 or whatever TCPIP data set name your shop uses can be modified to do
 what you want.  You can code your rexx stc to accept connection from a
 rexx client and receive a command from it.

That sounds like an interesting approach, but accepting commands via 
TCP/IP has some major differences from accepting commands from an 
operator console.

You have a much more restricted set of users who could give you a 
command when it has to come from an operator console, but anyone could 
send you a command via TCP/IP.

Walt

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

**
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager.

This footnote also confirms that this email message has been swept by
MIMEsweeper for the presence of computer viruses.

www.clearswift.com
**

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: F against a REXX STC

2005-11-03 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Kok, Howi
 Sent: Thursday, November 03, 2005 1:29 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: F against a REXX STC
 
 
 If the stc is doing serious tasks then proper coding is needed to
 examine the user who sends the command.  Can RACF be used to restrict
 the client exec and port access?

No. RACF can secure a PORT in that it can disallow a server to
listen on that port. However, RACF cannot do any validation for
incoming connection requests. That would be up to the server to do.

It appears, from my short reading, that the z/OS firewall technologies
could be use to restrict incoming connection requests. But, as all
things IBM, it appears to be complicated to set up.

--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its'
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited.
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: F against a REXX STC

2005-11-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED],
on 11/03/2005
   at 03:25 PM, Zafiropoulos Konstantinos [EMAIL PROTECTED]
said:

Can I send MVS modify command against a REXX that is running as an
STC?

Not in pure REXX, but you can do it with a small REXX-callable
assembler program. Google for QEDIT.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html