Re: Replacement of TSO (was: Rexx SORT ...)

[Elardus Engelbrecht]

Edward Gould wrote:

>>> TSO is dead, IBM wouldn’t offer a new product because it used TSO. What is 
>>> the IBM replacement and what is the migration path?  I have no problem with 
>>> terminating TSO but the functions it provides are still needed.

>Good question. One that has been asked many times. I have the impression IBM 
>is being mysterious here. We are pretty sure that there is no development 
>going on for current TSO and IBM is tight lipped on any possible successor (if 
>any).


My opinion: Think of a two horse wagon. One horse, TSO, is on the left side. 
Second horse, ISPF, is on the right side.

The code for TSO, ISPF (and driver/interpreter software for Clists and REXX) 
are so intermixed, full of things simply for backward compatibility.

So, replacing/upgrading one horse with a donkey or a buffalo will simply not 
work.

Look around in your TSO and ISPF - You will see ancient stuff like 'TSO/E - 
Information Center Facility' or 'Outlist Utility' (=3.6) or lot of (=6 or =3.4) 
commands like ACCOUNT, XMIT, etc. Are you using them or not? Whether you are 
using it or not, there are probably people who has no choice, but still use 
them.

Modifying them (TSO, ISPF, whatever) to use new z/OS facilities will 'break' 
many things in TSO and ISPF as well as hundreds of other software which are 
using ISPF panels like zSecure, DB2 utilities, monitoring software and 
automation software.

Even nice utilities like Search-For(E) are not upgraded or expanded, AFAIK.

Granted, there are many new nice things like Udlist for example, which I find 
very useful.

So, I also found out from IBM that TSO + ISPF and all these utilities are sort 
of 'functionally stabilized'. Simply just look at the ISPxLIB, you will be 
amazed to see how many datasets are associated with them. Dropping one DSN and 
you're basically dead.

Just my personal opinion, but I see those two horses as essential, killing them 
or dismount them, you're at a standstill. If you can replace those TSO/ISPF 
horses, say with an environmental friendly wagon-puller, then you are welcome 
to announce it here on IBM-MAIN.

... with the risk to tell all those vendors how to modify their own software to 
use your TSO/ISPF replacement.

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Rexx SORT (was: ... Job Scheduler ... )

[Edward Gould]

> On Jun 8, 2017, at 3:19 PM, Clark Morris  wrote:
> 
> [Default] On 8 Jun 2017 06:01:57 -0700, in bit.listserv.ibm-main
> edgould1...@comcast.net (Edward Gould) wrote:
> 
>>> On Jun 7, 2017, at 7:06 PM, Phil Smith  wrote:
>>> 
>>> Lionel Dyck wrote:
 If I recall the CMS/TSO Pipes is effectively the same code that is 
 reassembled for z/VM or z/OS. Sadly it is a product that is charged for on 
 z/OS but is included in z/VM at no charge. It should, imho, be included in 
 z/OS as a no charge feature and really give the REXX users a tool to be 
 more productive and thus make z/OS more usable.
>>> 
>>> More than "effectively": IIRC, the same load module works in either OS. It 
>>> can tell where it is and reacts accordingly.
>>> 
>>> And yes, IBM should include it in the product; it could only help! The 
>>> resistance to making z/OS more usable is going to be its downfall, I fear.
>>> 
>>> And no, the web-based stuff isn't the answer-that makes it easier to 
>>> administer, but doesn't help you get real work done.
>> 
>> Phil:
>> 
>> TSO is dead, IBM wouldn’t offer a new product because it used TSO.
> What is the IBM replacement and what is the migration path?  I have no
> problem with terminating TSO but the functions it provides are still
> needed.
> 
> Clark Morris
SNIP

Good question. One that has been asked many times. I have the impression IBM is 
being mysterious here. We are pretty sure that there is no development going on 
for current TSO and IBM is tight lipped on any possible successor (if any).
About 25 years ago an IBMer at Guide we were talking at a restaurant and with a 
few drinks I got out of him that IBM has basically lost track of the innards of 
TSO and really have no idea on how to fix it. He hinted that there maybe a 
replacement on the horizon but wouldn’t say much more than that. I did not have 
the expense account that would buy unlimited booze and I thought it would 
certainly happen soon. I was wrong. Not a peep from IBM of course I stopped 
going all the often to SHARE and with the personnel trimming at IBM, I would 
venture a guess that it is low on IBM’s list of thing to do.

Ed
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Syncsort With Splunk - Product Plug

[Timothy Sipples]

And while we're plugging products, here's another one:

https://ibm.biz/CDPzInfo


Timothy Sipples
IT Architect Executive, Industry Solutions, IBM z Systems, AP/GCG/MEA
E-Mail: sipp...@sg.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Does the JES2 ESTBYTE parm limit STC or just batch output?

[Jesse 1 Robinson]

We have experienced a number of spool-full conditions in the recent past, 
always caused by runaway batch jobs that produce tens of millions of lines of 
garbage until the entire MAS grinds to a halt. So we're experimenting with 
JES2-defined limits. In researching the options, we came across the doc below. 
We're focused on batch, but this passage may be telling. If only we could 
understand it. May you be granted more insight that us. 

"Considerations for started tasks and TSO LOGONs

"Output limits for TSO/E transmits can be set by TSO/E using the
 TSO/E OUTLIM= parameter. JES2 also sets a limit internally. When
 SYSOUT is transmitted in the foreground for started tasks and TSO/E
 LOGONs, the member uses the lower of these two limits. JES2 sets the
 following output limits for started tasks and TSO LOGONs:

"999,999 for lines, cards, and pages
2,147,483 (in 1000s of bytes) for spool utilization.
An installation can change the limits for started tasks or TSO
 LOGONs by using JES2 Exit 20 to change the limit for each particular
 started task or TSO LOGONs The limit for TSO/E transmits which are
 specified thorough the OUTLIM parameter, should not be greater than
 the limit JES2 sets for punches or a X'722' abend will occur.
 See z/OS TSO/E Customization for information about limiting the 
 TSO/E TRANSMIT
 command."

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Thursday, June 08, 2017 4:09 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Does the JES2 ESTBYTE parm limit STC or just batch 
output?

The EST Byte, Line, Page can be dynamically changed. 

The simplest way to avoid an IPL (and JES2 just stops when spool is full - but 
will respond to commands like PURGE)

Is to cycle the STC, add another spool volume, or see what is really going on.

If the STC is filling up spool, it needs to be determined why.  We have 
automated the HASP050 / HASP375 message to send emails and alerts when some of 
the JES2 functions are impacted (BERT, SPOOL, JNUM, etc.)

My understanding is the IEFUSO exit can cancel an STC if it exceeds its limits. 
 You can code the STCCLASS statement in JES2 and allow the IEFUSO to do its job.

You can also use automation tools to monitor for HASP375, HASP050 or other

You can use products like z/OSEM or EASYEXIT (DTS Software) to control your 
jobs names (STC, TSU, or JOB) for determining final action.

Lizette



> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of George Henke
> Sent: Thursday, June 08, 2017 1:59 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Does the JES2 ESTBYTE parm limit STC or just batch output?
> 
> Just averted a near disaster, a mid-day IPL of 4 LPARs, with a STC 
> filling up the spool with 10B bytes of data because the ESTBYTE limit 
> was not turned on for termination, OPT=1.
> 
> But would it have done anything anyway for a STC or does it just apply 
> to batch and APPC.
> 
> The manual is silently ambiguous on this.
> 
> If anyone has had success limiting STC output so, please let me know, 
> else it will probably be JES2 Exit 20.
> 
> --
> George Henke
> (C) 845 401 5614


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: curious: Anybody still use ADDRSPC=REAL ?

[Jesse 1 Robinson]

I don't recall coding V=R for any address space, but when we first got into 
internal DR via XRC between data centers around Y2K, we were forced to carve 
out DR LPARs from existing production boxes. We would configure storage offline 
from a large production LPAR in order to IPL DR LPARs in the newly available 
storage. In order to get that to work reliably, we had to define the storage 
segment as reconfigurable at POR, which I understood to isolate the storage as 
if V=R. Details are fuzzy, but the process was discouraged although supported 
by IBM; without it, CF STOR offline might never succeed. 

Thankfully we are way past those constraints. 

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Thompson
Sent: Thursday, June 08, 2017 6:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: curious: Anybody still use ADDRSPC=REAL ?

On 06/08/2017 11:45 AM, John McKown wrote:
> This still seems to be supported in z/OS 2.2. Does anyone need to run 
> a program V=R in today's world? I'm just curious because this support 
> seems to be a "waste" of protect keys 10 through 15. Of course, if 
> those keys were "freed up", what could they be used for?
> 
IBM Prolog for 370 (MVS) used them and it was a V=V program product.

It had originally used Key9, but CICS pushed the development group and it got 
changed. Seemed that when Prolog was run in a CICS space it caused CICS 
problems by making a page here and there key9.

The keys were set to assist the engine in determining when a heap or stack was 
about to overflow. For either one, the first time it PIC4ed it was noted that 
garbage collection had to be done. If it fell back below the "warning" page, 
the flag was reset. If it got up to and hit the second page, then it began 
cleanup and shutdown due to lack of memory for heap or stack, which ever it was 
that had run out of room.

All of this was done to make it run as much as possible like it had under VM. 
As a result, IBM's Prolog on the MVS platform was much faster than any 
competitors (or so I was told in those days).

That is as much as I can remember. I wrote the CHANGKEY code, cross-memory 
charge back SMF record, and SVC for it back in 1991. 
I haven't seen any of it since.

Regards,
Steve Thompson


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: curious: Anybody still use ADDRSPC=REAL ?

[Steve Thompson]

On 06/08/2017 11:45 AM, John McKown wrote:

This still seems to be supported in z/OS 2.2. Does anyone need to run a
program V=R in today's world? I'm just curious because this support seems
to be a "waste" of protect keys 10 through 15. Of course, if those keys
were "freed up", what could they be used for?


IBM Prolog for 370 (MVS) used them and it was a V=V program product.

It had originally used Key9, but CICS pushed the development 
group and it got changed. Seemed that when Prolog was run in a 
CICS space it caused CICS problems by making a page here and 
there key9.


The keys were set to assist the engine in determining when a heap 
or stack was about to overflow. For either one, the first time it 
PIC4ed it was noted that garbage collection had to be done. If it 
fell back below the "warning" page, the flag was reset. If it got 
up to and hit the second page, then it began cleanup and shutdown 
due to lack of memory for heap or stack, which ever it was that 
had run out of room.


All of this was done to make it run as much as possible like it 
had under VM. As a result, IBM's Prolog on the MVS platform was 
much faster than any competitors (or so I was told in those days).


That is as much as I can remember. I wrote the CHANGKEY code, 
cross-memory charge back SMF record, and SVC for it back in 1991. 
I haven't seen any of it since.


Regards,
Steve Thompson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: LE QuestionT - now CICS

[Anthony Thompson]

STGPROT in the CICS SIT, telling CICS that various Dynamic Storage Areas should 
be allocated in CICS or user key storage. Also dependent parameters TRANISO, 
RENTPGM, TCTUAKEY, CWAKEY.

I think storage protection came in around CICS/ESA 3.3 (early 90's).

Ant.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edward Gould
Sent: Friday, 9 June 2017 1:35 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LE QuestionT - now CICS

> On Jun 8, 2017, at 7:49 AM, Peter Relson  wrote:
> SNIP———

Peter, good answer.
This reminds me a little of something long long ago. Maybe someone here can 
refresh (correct?) my memory.
From the time CICS came out the sysprogs were always seemingly fighting storage 
overlays (if memory serves me).
After 5-8 years?? CICS’s answer was to use different storage keys to isolate 
and prevent storage overlays.
Can someone correct my memory of this, please?

Ed

> Tony H's response was right on target. Using different user-region 
> subpools does nothing to help prevent overwrites or corruption.
> It does help a bit with someone unintentionally freeing the wrong thing.
> Some applications might choose unique subpools to accommodate a 
> subpool freemain.
> 
> Peter Relson
> z/OS Core Technology Design
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Does the JES2 ESTBYTE parm limit STC or just batch output?

[Lizette Koehler]

The EST Byte, Line, Page can be dynamically changed. 

The simplest way to avoid an IPL (and JES2 just stops when spool is full - but 
will respond to commands like PURGE)

Is to cycle the STC, add another spool volume, or see what is really going on.

If the STC is filling up spool, it needs to be determined why.  We have 
automated the HASP050 / HASP375 message to send emails and alerts when some of 
the JES2 functions are impacted (BERT, SPOOL, JNUM, etc.)

My understanding is the IEFUSO exit can cancel an STC if it exceeds its limits. 
 You can code the STCCLASS statement in JES2 and allow the IEFUSO to do its job.

You can also use automation tools to monitor for HASP375, HASP050 or other

You can use products like z/OSEM or EASYEXIT (DTS Software) to control your 
jobs names (STC, TSU, or JOB) for determining final action.

Lizette



> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of George Henke
> Sent: Thursday, June 08, 2017 1:59 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Does the JES2 ESTBYTE parm limit STC or just batch output?
> 
> Just averted a near disaster, a mid-day IPL of 4 LPARs, with a STC filling up
> the spool with 10B bytes of data because the ESTBYTE limit was not turned on
> for termination, OPT=1.
> 
> But would it have done anything anyway for a STC or does it just apply to
> batch and APPC.
> 
> The manual is silently ambiguous on this.
> 
> If anyone has had success limiting STC output so, please let me know, else it
> will probably be JES2 Exit 20.
> 
> --
> George Henke
> (C) 845 401 5614
> 
> 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: LE QuestionT

[scott Ford]

Peter,

We write software using COBOL and HLASM and I had a situation where subpool
0 had orphaned blocks of storage and our STC was apparently in control.

I found out that a RMODE=24, AMODE=24 HLASM PGM doing disk I/O and called
by a STC has to do Freepool and after a close.
We were using RACF old macros ICHEINTY to perform extracts and they
defaulted to subpool=0 ..

Regards,
Scott


On Thu, Jun 8, 2017 at 8:50 AM Peter Relson  wrote:

> > My first question is where does LE place the HEAP ( what Subpool ) ?
>
> And my initial response is a question: why would you care what subpool?
> The subpool is almost certainly not a programming interface. You should
> not write any code that depends on the subpool
>
> Any presentation that describes the subpool likely does so to help you in
> diagnosis situations, not in programming situations.
>
> >IIRC subpool 1 is for LE internals and subpool 2 for user heap and
> >stack. Makes sense so presumably a user-space storage overwrite wont
> >corrupt LE so it can shutdown cleanly.
>
> Tony H's response was right on target. Using different user-region
> subpools does nothing to help prevent overwrites or corruption.
> It does help a bit with someone unintentionally freeing the wrong thing.
> Some applications might choose unique subpools to accommodate a subpool
> freemain.
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 
Scott Ford
IDMWORKS
z/OS Development

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Java on z/OS?

[Ken Smith]

Agree, I'd forgotten BPXBATCH STDOUT and ERR can now can be sent to
SYSOUT.  Wasn't so many years ago when I used OSHELL.

Ken

On Thu, Jun 8, 2017 at 11:30 AM, Don Poitras  wrote:

> I think Paul's use of BPXBATCH is clearer. Moving the logic to a
> separate DD I think makes it even better. e.g.
>
> //BPXBAT   EXEC PGM=BPXBATCH,PARMDD=PARMINDD
> //STDINDD DUMMY
> //STDOUT   DD SYSOUT=*
> //STDERR   DD SYSOUT=*
> //PARMINDD DD *
> sh echo '\nPATH=';
>echo $PATH;
>export PATH=$PATH:/u/sasdtp/sasuser;
>echo '\nPATH=';
>echo $PATH;
>echo '\nCLASSPATH=';
>echo $CLASSPATH;
>echo '\nJAVA_HOME=';
>echo $JAVA_HOME;
>java -version;
>java hello
> /*
> //
>
>
> In article <028a01d2e067$108a0620$319e1260$@mcn.org> you wrote:
> > Thanks!
>
> > Really appreciate all the earlier advice (which could certainly come in
> handy down the road) but frankly this is more what I was looking for today.
>
> > Charles
>
>
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On Behalf Of Ken Smith
> > Sent: Thursday, June 8, 2017 7:25 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Java on z/OS?
>
> > JZOS is great but here's a IVP job using OSHELL I run to exercise the
> HelloWorld program supplied in the java bin directory.
> > To write your own no doubt there's a source example out there that you
> can compile (javac) and run.
>
> > //TSO  EXEC PGM=IKJEFT1B,DYNAMNBR=50,REGION=0M
> > //SYSPROC  DD  DISP=SHR,DSN=SYS1.SBPXEXEC //STDENV DD *
> > JAVADIR=/usr/lpp/java/J7.0
> > //SYSTSIN DD *
> >  oshell +
> > PATH=$JAVADIR/bin:$PATH && +
> > echo path=$PATH && +
> > java -version
> >  oshell +
> > PATH=$JAVADIR/bin:$PATH && +
> > java -classpath $JAVADIR HelloWorld
> > //SYSTSPRT DD SYSOUT=*
> > //SYSOUT   DD SYSOUT=*
> > //SYSPRINT DD SYSOUT=*
> > //SYSINDD DUMMY
> > //
> > Output:
>
> > path=/usr/lpp/java/J7.0/bin:/bin:/usr/lpp/java/J5.0_64/bin:.
>
> > java version "1.7.0"
>
> > Java(TM) SE Runtime Environment (build pmz3170sr9fp50-20160720_02(
> SR9fp50))
>
> > IBM J9 VM (build 2.6, JRE 1.7.0 z/OS s390-31 20160630_309948 (JIT
> enabled, AOT enabled) J9VM - R26_Java726_SR9_20160630_1817_B309948
>
> > JIT  - tr.r11_20160630_120374
>
> > GC   - R26_Java726_SR9_20160630_1817_B309948
>
> > J9CL - 20160630_309948)
>
> > JCL - 20160719_01 based on Oracle jdk7u111-b13
>
>
>
> > Hello World
>
>
> > On Mon, Jun 5, 2017 at 9:57 PM, John McKown <
> john.archie.mck...@gmail.com>
> > wrote:
>
> > > On Mon, Jun 5, 2017 at 7:44 PM, Charles Mills 
> wrote:
> > >
> > > > Remember @Steve Beaver's question "where do I find a C++ sample for
> > > z/OS?"
> > > > Well, this is my variant of that question.
> > > >
> > > > If I wanted to write "Hello, World" in Java such that it would run
> > > > in
> > > batch
> > > > on z/OS, where would I start? Where is the "Programmers' Guide" for
> Java?
> > > >
> > > > I know OO concepts, I'm an experienced C++ programmer, and I took a
> > > > Java class once upon a time. I can find Java language and class
> > > > references on the Web. I'm not looking for that. I'm looking for how
> > > > to  get from System.out.println("Hello World"); to //JAVAPGM EXEC
> > > > PGM=HELLOW ?
> > > >
> > > > Charles
> > > >
> > > >
> > > ?The magic word in this case is JZOS. This is the Java batch launcher
> > > for z/OS, which come bundled with the Java JDK.
> > > https://www.ibm.com/support/knowledgecenter/en/SSYKE2_8.0.
> > > 0/com.ibm.java.zsecurity.80.doc/zsecurity-component/jzos.html
> > >
> > > The above page has links to the information you need.
> > >
> > > As an aside, JZOS was originally written by Dovetailed Technologies
> > > (the authors of the excellent Co:Z package). It was so much better
> > > than anything IBM had that IBM now distributes it with the JDK. I
> > > don't know if IBM bought it or has an exclusive license to distribute.
> > >
> > > If you're going to do any UNIX work in batch, go here:
> > > http://dovetail.com/products/cozbatch.html and get this package. It
> > > does not require _any_ special authorities so you could even install
> > > it using your TSO high level qualifier for the data sets and your UNIX
> > > ${HOME} for the UNIX files. Once you've tried this, you'll sneer at
> > > IBM's pathetic BPXBATCH. Oh, and the run-time license is a very
> > > affordable -- FREE You don't even have to register your email or
> > > _anything_. Not even a thank you note.?
> > >
> > >
> > > --
> > > Windows. A funny name for a operating system that doesn't let you see
> > > anything.
> > >
> > > Maranatha! <><
> > > John McKown
>
> --
> Don Poitras - SAS Development  -  SAS Institute Inc. - SAS Campus Drive
> sas...@sas.com   (919) 531-5637Cary, NC 27513
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.

Re: Syncsort With Splunk - Product Plug

[Knutson, Samuel]

Syncsort Ironstream and the Splunk free edition fully support the unique fault 
analysis data from Compuware Abend-Aid and Application Audit for insight into 
failures and application use or privledged users activity.

http://www.compuware.com/partners/syncsort.html

There are free Splunk Apps for both in SplunkBase.

In broad I think that applying analytics and machine learning to mainframe data 
is still a largely untapped gold mine for customers to understand their own 
systems.  All too often we have the best instrumented platform but report on 
that data using tools equivalent to stone knives and bear skins.

Best Regards,

Sam Knutson
Compuware
VP, Product Management
@samknutson
samuel.knut...@compuware.com
M: +1 301 996-1318


On Jun 8, 2017, at 4:41 PM, Blaicher, Christopher Y. 
mailto:cblaic...@syncsort.com>> wrote:

Biased Product Plug by the Product Architect

Syncsort's Ironstream product is designed to supply realtime data from z/OS 
systems to a Splunk repository.

Data can include SYSLOG, SMF records, RMF data, SYSPRINT from the JES spool, 
system performance data, Log4j files, Flat files and data provided via user 
API's.  We continue to add sources as users identify new requirements.

Our growing number of customers use this data for security, operational, 
monitoring and many other functions using Splunk application dash boards.

Splunk has an application store that has a number of free Splunk applications 
that can be used to start getting value from the data on day one.

We also offer a free limited use version of Ironstream that will allow you do 
download any amount of SYSLOG data.  You can go to and get more information at 
http://www.syncsort.com/en/Products/Mainframe/Ironstream.  From that page you 
can see a video that shows some of what can be done using Ironstream and 
Splunk.  Also, at that site you can download the free version and play with it 
yourself.


Chris Blaicher
Technical Architect
Mainframe Development
P: 201-930-8234  |  M: 512-627-3803
E: cblaic...@syncsort.com

Syncsort Incorporated
2 Blue Hill Plaza #1563
Pearl River, NY 10965
www.syncsort.com

Data quality leader Trillium Software is now a part of Syncsort.


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Pew, Curtis G
Sent: Thursday, June 8, 2017 12:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Syncsort With Splunk

On Jun 8, 2017, at 11:03 AM, Jake Anderson 
mailto:justmainfra...@gmail.com>>
 wrote:

Is there anybody in the group who have used syncsort with Splunk ?

We forward our OPERLOG to Splunk, although we don’t use Syncsort’s forwarder. 
(I wrote my own; it wasn’t that hard.)

Our main motivation was to show that the mainframe group are “team players” 
since everyone else around here was investing in Splunk, but it is actually 
quite useful. We’ve set up a few regular reports of classes of ABENDs or other 
errors we like to keep track of, and it allows us to go back and do searches 
for messages when an issue arises that we hadn’t foreseen.


The contents of this e-mail are intended for the named addressee only. It 
contains information that may be confidential. Unless you are the named 
addressee or an authorized designee, you may not copy or use it, or disclose it 
to anyone else. If you received it in error please notify us immediately and 
then destroy it

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Does the JES2 ESTBYTE parm limit STC or just batch output?

[George Henke]

Just averted a near disaster, a mid-day IPL of 4 LPARs, with a STC filling
up the spool with 10B bytes of data because the ESTBYTE limit was not
turned on for termination, OPT=1.

But would it have done anything anyway for a STC or does it just apply to
batch and APPC.

The manual is silently ambiguous on this.

If anyone has had success limiting STC output so, please let me know, else
it will probably be JES2 Exit 20.

-- 
George Henke
(C) 845 401 5614

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Syncsort With Splunk - Product Plug

[Blaicher, Christopher Y.]

Biased Product Plug by the Product Architect

Syncsort's Ironstream product is designed to supply realtime data from z/OS 
systems to a Splunk repository.

Data can include SYSLOG, SMF records, RMF data, SYSPRINT from the JES spool, 
system performance data, Log4j files, Flat files and data provided via user 
API's.  We continue to add sources as users identify new requirements.

Our growing number of customers use this data for security, operational, 
monitoring and many other functions using Splunk application dash boards.

Splunk has an application store that has a number of free Splunk applications 
that can be used to start getting value from the data on day one.

We also offer a free limited use version of Ironstream that will allow you do 
download any amount of SYSLOG data.  You can go to and get more information at 
http://www.syncsort.com/en/Products/Mainframe/Ironstream.  From that page you 
can see a video that shows some of what can be done using Ironstream and 
Splunk.  Also, at that site you can download the free version and play with it 
yourself.


Chris Blaicher
Technical Architect
Mainframe Development
P: 201-930-8234  |  M: 512-627-3803
E: cblaic...@syncsort.com

Syncsort Incorporated
2 Blue Hill Plaza #1563
Pearl River, NY 10965
www.syncsort.com

Data quality leader Trillium Software is now a part of Syncsort.


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Pew, Curtis G
Sent: Thursday, June 8, 2017 12:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Syncsort With Splunk

On Jun 8, 2017, at 11:03 AM, Jake Anderson 
mailto:justmainfra...@gmail.com>> wrote:

Is there anybody in the group who have used syncsort with Splunk ?

We forward our OPERLOG to Splunk, although we don’t use Syncsort’s forwarder. 
(I wrote my own; it wasn’t that hard.)

Our main motivation was to show that the mainframe group are “team players” 
since everyone else around here was investing in Splunk, but it is actually 
quite useful. We’ve set up a few regular reports of classes of ABENDs or other 
errors we like to keep track of, and it allows us to go back and do searches 
for messages when an issue arises that we hadn’t foreseen.


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN





ATTENTION: -

The information contained in this message (including any files transmitted with 
this message) may contain proprietary, trade secret or other confidential 
and/or legally privileged information. Any pricing information contained in 
this message or in any files transmitted with this message is always 
confidential and cannot be shared with any third parties without prior written 
approval from Syncsort. This message is intended to be read only by the 
individual or entity to whom it is addressed or by their designee. If the 
reader of this message is not the intended recipient, you are on notice that 
any use, disclosure, copying or distribution of this message, in any form, is 
strictly prohibited. If you have received this message in error, please 
immediately notify the sender and/or Syncsort and destroy all copies of this 
message in your possession, custody or control.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Rexx SORT (was: ... Job Scheduler ... )

[Clark Morris]

[Default] On 8 Jun 2017 06:01:57 -0700, in bit.listserv.ibm-main
edgould1...@comcast.net (Edward Gould) wrote:

>> On Jun 7, 2017, at 7:06 PM, Phil Smith  wrote:
>> 
>> Lionel Dyck wrote:
>>> If I recall the CMS/TSO Pipes is effectively the same code that is 
>>> reassembled for z/VM or z/OS. Sadly it is a product that is charged for on 
>>> z/OS but is included in z/VM at no charge. It should, imho, be included in 
>>> z/OS as a no charge feature and really give the REXX users a tool to be 
>>> more productive and thus make z/OS more usable.
>> 
>> More than "effectively": IIRC, the same load module works in either OS. It 
>> can tell where it is and reacts accordingly.
>> 
>> And yes, IBM should include it in the product; it could only help! The 
>> resistance to making z/OS more usable is going to be its downfall, I fear.
>> 
>> And no, the web-based stuff isn't the answer-that makes it easier to 
>> administer, but doesn't help you get real work done.
>
>Phil:
>
>TSO is dead, IBM wouldn’t offer a new product because it used TSO.
What is the IBM replacement and what is the migration path?  I have no
problem with terminating TSO but the functions it provides are still
needed.

Clark Morris
>
>Ed
>> 
>> ...phsiii
>> 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Syncsort With Splunk

[Pew, Curtis G]

On Jun 8, 2017, at 11:03 AM, Jake Anderson 
mailto:justmainfra...@gmail.com>> wrote:

Is there anybody in the group who have used syncsort with Splunk ?

We forward our OPERLOG to Splunk, although we don’t use Syncsort’s forwarder. 
(I wrote my own; it wasn’t that hard.)

Our main motivation was to show that the mainframe group are “team players” 
since everyone else around here was investing in Splunk, but it is actually 
quite useful. We’ve set up a few regular reports of classes of ABENDs or other 
errors we like to keep track of, and it allows us to go back and do searches 
for messages when an issue arises that we hadn’t foreseen.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: How to call VS COBOL II RES program from COBOL V5.2-enabled

[Farley, Peter x23353]

Thanks for chiming in Tom.

Using a COBOL "stub" as a top-level main program would certainly be simpler 
from a structural standpoint, but because we are an old and quite large shop 
there are many dozens (in some cases hundreds) of JCL's that would have to be 
changed to invoke the stub routine if we took that approach.  There are also 
assembler E15/E35 exits which invoke COBOL subroutines to be considered for the 
need to modify the SORT MODS control cards to use the new stub name.  The 
change control and regression testing issues become the main problem, not the 
technical solution.

Changing the assembler main program or assembler E15/E35 exit sources to be a 
COBOL stub instead and having the stub call a new program name that is the 
original assembler main program or exit program would be another approach to 
that issue which would avoid having to change JCL's or MODS control cards for 
SORT.

The main issue, as you correctly point out, is whether the VS COBOL II 
subprogram modules can be recompiled with eCOBOL of some version.  In some 
cases (where the VS COBOL II module has limited usage across the shop) that is 
certainly the cleanest approach.

However, when the VS COBOL II subroutine is also invoked widely by other COBOL 
applications as well as the targeted assembler main programs, it is very 
difficult to implement a compiler change to that subprogram with thorough 
regression testing by so many different applications throughout the shop.  It 
becomes a programmer resource constraint and management priority issue rather 
than a technical issue.  Projects to satisfy business, client and regulatory 
needs almost always trump technical issue changes like this one.

There are other technical solutions, such as creating a new source module with 
the VS COBOL II source code and compiling that new subprogram with eCOBOL and 
changing the targeted assembler programs to use the new subprogram name rather 
than the VS COBOL II subprogram name.  Then other COBOL applications still 
using the old VS COBOL II subprogram can be changed in an extended or phased 
timeline compatible with programmer resource constraints and management 
priority considerations.

Tony H.'s suggestion to try using the (init_subr_dp) call to CEEPIPI instead of 
the (init_subr) call has turned out to work flawlessly in my limited testing so 
far.  It remains to be seen if it causes any issues in a real-program 
conversion.

I will post any gotcha's we find as we move forward.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Ross
Sent: Tuesday, June 06, 2017 7:22 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to call VS COBOL II RES program from COBOL V5.2-enabled

assembler?

>EXEC PGM=ASM1 (LOAD and CALL)--> VSCOB2RES
>Also:;ASM1 (LOAD and CALL via CEEPIPI)--> eCOBOL52

>Two different CAL's in one top-level assembler program to COBOL programs
>compiled with different COBOL compilers.  Either or both COBOL programs may
>be called multiple times in one execution of ASM1.

>My question was prompted by the eCOBOL V5.2 migration statement that COBOL
>V5.2 programs can call and be called by VS COBOL II RES programs.  I cannot

They can!  Not all kinds of CALLs (example: DLL CALLs) but most CALLs.
You are not talking about COBOL calling COBOL, hoever.

>use CEEPIPI to CALL the VS COBOL II RES program because CEEPIPI returns RC=20
>when you try to add it to the CEEPIPI table.

Yes, only LE-conforming programs can be used with CEEPIPI. VS COBOL II programs
are LE-enabled (can run with LE) but are not LE-conformaing (must run with LE).

>I can call the VS COBOL II RES program multiple times if I first LOAD and
>call IGZERRE once (the LE version from CEE.SCEERUN), but using IGZERRE and
>CEEPIPI together is not allowed either according to the migration guide
>(cannot establish 2 different COBOL environments at the same time in the same
>LE enclave, which makes sense to me).

If you really cannot recompile wht VS COBOL II programs with newer compilers and
save MSUs/MIPS/CPU, then you have a problem.  The easiest solution, from what
limited info I have here, is to use a different method toe keep LE active
between CALLs to COBOL.  Remove the use of IGZERRE and add a COBOL stub in front
of your ASM program! Then use the COOBL stub in the JCL:

EXEC PGM=COBSTUB (Which then CALLs ASM1, which then LOADs and CALLs any COBOL)

Since COBSTUB is always active, LE is always up, no performance hit for 
repeatedly
LOADing and BASR/BALRing to COBOL

> If eCOBOL V5.2 can call and be called by VS COBOL II RES programs, how does
> it do that, and how can I do the same thing?

Use simple CALLs, not IGZERRE or CEEPIPI.

Cheers,
TomR  >> COBOL is the Language of the Future! <<
--

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

Re: How to call VS COBOL II RES program from COBOL V5.2-enabled assembler?

[Farley, Peter x23353]

Using the (init _subr_dp) call to CEEPIPI instead of the (init_subr) call that 
I originally used seems to have done the trick.  In my assembler main test 
program I can now call an eCOBOL V4.1 subprogram using CEEPIPI and a VS COBOL 
II subprogram using a simple CALL after a one-time call to IGZERRE.  Multiple 
calls to both types of COBOL subprograms do not fail.

I still have to test with an eCOBOL V5.2 subprogram in the mix, but I am 
hopeful at this point.

Thanks again for that suggestion.  I will report any gotcha's that we encounter 
as we move forward with this project for real-world programs.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Farley, Peter x23353
Sent: Wednesday, June 07, 2017 9:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to call VS COBOL II RES program from COBOL V5.2-enabled 
assembler?

Thanks for the idea of trying init_main_dp and IGZERRE together, I will try 
that and  see if it flies.

These are non-LE-enabled assembler main programs (and some E15/E35 exits) 
calling VS COBOL II subroutines.  Some of those COBOL subroutines can and will 
be recompiled to eCOBOL 4.2 first and later eCOBOL 5.2, but some cannot be 
recompiled so easily due to their widespread use elsewhere in the shop and the 
resource constraints on getting all using applications to test in one or even 
multiple QA cycles.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Harminc
Sent: Tuesday, June 06, 2017 7:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to call VS COBOL II RES program from COBOL V5.2-enabled 
assembler?

On 30 May 2017 at 20:44, Farley, Peter x23353  
wrote:
> I can call the VS COBOL II RES program multiple times if I first LOAD 
> and call IGZERRE once (the LE version from CEE.SCEERUN), but using 
> IGZERRE and CEEPIPI together is not allowed either according to the migration 
> guide (cannot establish 2 different COBOL environments at the same time in 
> the same LE enclave, which makes sense to me).

I'm unclear - are these old and new programs COBOL *main* programs or 
subroutines? They sound like main programs, but...

I'm speculating here - never tried it, but if you are desperate... If you use 
CEEPIPI init_main_dp for the new COBOL environment, will it complain that there 
is already an active LE environment? What if you call CEEPIPI init_main_dp 
first, and then IGZERRE? In other words how does LE know (and why does it care 
in the PIPI case) that you have another environment active?

Tony H.
--

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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: LE QuestionT - now CICS

[Edward Gould]

> On Jun 8, 2017, at 7:49 AM, Peter Relson  wrote:
> SNIP———

Peter, good answer.
This reminds me a little of something long long ago. Maybe someone here can 
refresh (correct?) my memory.
From the time CICS came out the sysprogs were always seemingly fighting storage 
overlays (if memory serves me).
After 5-8 years?? CICS’s answer was to use different storage keys to isolate 
and prevent storage overlays.
Can someone correct my memory of this, please?

Ed

> Tony H's response was right on target. Using different user-region 
> subpools does nothing to help prevent overwrites or corruption.
> It does help a bit with someone unintentionally freeing the wrong thing.
> Some applications might choose unique subpools to accommodate a subpool 
> freemain.
> 
> Peter Relson
> z/OS Core Technology Design
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Syncsort With Splunk

[Jake Anderson]

Hi

Is there anybody in the group who have used syncsort with Splunk ?

My understanding about Splunk is that it is just a log analuzer. Apart from
this what are the other benefits that other monitoring products do not
provide ?

Can someone shed your experience on the above.

This is purely for the knowledge purpose not resolving any issue.

Regards
Jake

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

curious: Anybody still use ADDRSPC=REAL ?

[John McKown]

This still seems to be supported in z/OS 2.2. Does anyone need to run a
program V=R in today's world? I'm just curious because this support seems
to be a "waste" of protect keys 10 through 15. Of course, if those keys
were "freed up", what could they be used for?

-- 
Prof: So the American government went to IBM to come up with a data
encryption standard and they came up with ...

Student: EBCDIC!

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Java on z/OS?

[Don Poitras]

I think Paul's use of BPXBATCH is clearer. Moving the logic to a
separate DD I think makes it even better. e.g.

//BPXBAT   EXEC PGM=BPXBATCH,PARMDD=PARMINDD
//STDINDD DUMMY 
//STDOUT   DD SYSOUT=*  
//STDERR   DD SYSOUT=*  
//PARMINDD DD *
sh echo '\nPATH='; 
   echo $PATH; 
   export PATH=$PATH:/u/sasdtp/sasuser;
   echo '\nPATH='; 
   echo $PATH; 
   echo '\nCLASSPATH=';
   echo $CLASSPATH;
   echo '\nJAVA_HOME=';
   echo $JAVA_HOME;
   java -version;  
   java hello  
/* 
// 


In article <028a01d2e067$108a0620$319e1260$@mcn.org> you wrote:
> Thanks!

> Really appreciate all the earlier advice (which could certainly come in handy 
> down the road) but frankly this is more what I was looking for today.

> Charles


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Ken Smith
> Sent: Thursday, June 8, 2017 7:25 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Java on z/OS?

> JZOS is great but here's a IVP job using OSHELL I run to exercise the 
> HelloWorld program supplied in the java bin directory.
> To write your own no doubt there's a source example out there that you can 
> compile (javac) and run.

> //TSO  EXEC PGM=IKJEFT1B,DYNAMNBR=50,REGION=0M
> //SYSPROC  DD  DISP=SHR,DSN=SYS1.SBPXEXEC //STDENV DD *
> JAVADIR=/usr/lpp/java/J7.0
> //SYSTSIN DD *
>  oshell +
> PATH=$JAVADIR/bin:$PATH && +
> echo path=$PATH && +
> java -version
>  oshell +
> PATH=$JAVADIR/bin:$PATH && +
> java -classpath $JAVADIR HelloWorld
> //SYSTSPRT DD SYSOUT=*
> //SYSOUT   DD SYSOUT=*
> //SYSPRINT DD SYSOUT=*
> //SYSINDD DUMMY
> //
> Output:

> path=/usr/lpp/java/J7.0/bin:/bin:/usr/lpp/java/J5.0_64/bin:.

> java version "1.7.0"

> Java(TM) SE Runtime Environment (build pmz3170sr9fp50-20160720_02(SR9fp50))

> IBM J9 VM (build 2.6, JRE 1.7.0 z/OS s390-31 20160630_309948 (JIT enabled, 
> AOT enabled) J9VM - R26_Java726_SR9_20160630_1817_B309948

> JIT  - tr.r11_20160630_120374

> GC   - R26_Java726_SR9_20160630_1817_B309948

> J9CL - 20160630_309948)

> JCL - 20160719_01 based on Oracle jdk7u111-b13



> Hello World


> On Mon, Jun 5, 2017 at 9:57 PM, John McKown 
> wrote:

> > On Mon, Jun 5, 2017 at 7:44 PM, Charles Mills  wrote:
> >
> > > Remember @Steve Beaver's question "where do I find a C++ sample for
> > z/OS?"
> > > Well, this is my variant of that question.
> > >
> > > If I wanted to write "Hello, World" in Java such that it would run 
> > > in
> > batch
> > > on z/OS, where would I start? Where is the "Programmers' Guide" for Java?
> > >
> > > I know OO concepts, I'm an experienced C++ programmer, and I took a 
> > > Java class once upon a time. I can find Java language and class 
> > > references on the Web. I'm not looking for that. I'm looking for how 
> > > to  get from System.out.println("Hello World"); to //JAVAPGM EXEC 
> > > PGM=HELLOW ?
> > >
> > > Charles
> > >
> > >
> > ?The magic word in this case is JZOS. This is the Java batch launcher 
> > for z/OS, which come bundled with the Java JDK.
> > https://www.ibm.com/support/knowledgecenter/en/SSYKE2_8.0.
> > 0/com.ibm.java.zsecurity.80.doc/zsecurity-component/jzos.html
> >
> > The above page has links to the information you need.
> >
> > As an aside, JZOS was originally written by Dovetailed Technologies 
> > (the authors of the excellent Co:Z package). It was so much better 
> > than anything IBM had that IBM now distributes it with the JDK. I 
> > don't know if IBM bought it or has an exclusive license to distribute.
> >
> > If you're going to do any UNIX work in batch, go here:
> > http://dovetail.com/products/cozbatch.html and get this package. It 
> > does not require _any_ special authorities so you could even install 
> > it using your TSO high level qualifier for the data sets and your UNIX 
> > ${HOME} for the UNIX files. Once you've tried this, you'll sneer at 
> > IBM's pathetic BPXBATCH. Oh, and the run-time license is a very 
> > affordable -- FREE You don't even have to register your email or 
> > _anything_. Not even a thank you note.?
> >
> >
> > --
> > Windows. A funny name for a operating system that doesn't let you see 
> > anything.
> >
> > Maranatha! <><
> > John McKown

-- 
Don Poitras - SAS Development  -  SAS Institute Inc. - SAS Campus Drive
sas...@sas.com   (919) 531-5637Cary, NC 27513

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: System Rexx - Console questions

[Tony Harminc]

Thanks, but I don't see how this relates to my questions.

Tony H.

On 8 June 2017 at 02:59, IronSphere by SecuriTeam Software <
imugz...@gmail.com> wrote:

> use axrwto.
>
> ITschak​
>
> On Wed, Jun 7, 2017 at 11:47 PM, Tony Harminc  wrote:
>
> > What causes the AXR0500I message
> >
> > AXR0500I AXREXX OUTPUT DISPLAY 093
> > EXECNAME=TESTX REQTOKEN=4000D29FAA504703A808
> > TESTX running - output from SAY
> >
> > to be written to Syslog? Clearly that last line is from a SAY statement
> of
> > mine, but I seem to always get the AXR0500I even without a SAY. I want to
> > avoid it - I never want to see any indication of the Rexx program
> running,
> > unless it issues a message itself or there is a serious error within
> System
> > Rexx. I don't want that REQTOKEN and such cluttering the console stream.
> >
> > Also, what is the real meaning of the CONSDATA=YES option on AXREXX?
> Again,
> > the book is vague: "CONSDATA=YES Indicates that the exec is invoked as a
> > system command." Does this mean that any WTOs issued by the AXR[ML]WTO
> > functions are marked with DESC=5? I don't know what else this might mean.
> >
> > There is an example in the book of issuing an MVS command from Rexx,
> > retrieving and parsing the command output, and using AXRMLWTO to write
> the
> > result to an extended MCS console set up with MCSOPER in the program that
> > invoked AXREXX. Maybe a bit far-fetched, but I tried the example, and all
> > of the command+output goes to SYSLOG, as well as to the extended
> console.
> > But there is no option to specify DESC or ROUTCDE or any other WTO
> options
> > on AXR[ML]WTO. I would also like to avoid all this stuff going to SYSLOG.
> >
> > Thanks... Tony H.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
>
> --
> ITschak Mugzach
> *|** IronSphere Platform* *|** An IT GRC for Legacy systems* *| Automated
> Security Readiness Reviews (SRR) **|*
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Java on z/OS?

[Charles Mills]

Thanks!

Really appreciate all the earlier advice (which could certainly come in handy 
down the road) but frankly this is more what I was looking for today.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ken Smith
Sent: Thursday, June 8, 2017 7:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Java on z/OS?

JZOS is great but here's a IVP job using OSHELL I run to exercise the 
HelloWorld program supplied in the java bin directory.
To write your own no doubt there's a source example out there that you can 
compile (javac) and run.

//TSO  EXEC PGM=IKJEFT1B,DYNAMNBR=50,REGION=0M
//SYSPROC  DD  DISP=SHR,DSN=SYS1.SBPXEXEC //STDENV DD *
JAVADIR=/usr/lpp/java/J7.0
//SYSTSIN DD *
 oshell +
PATH=$JAVADIR/bin:$PATH && +
echo path=$PATH && +
java -version
 oshell +
PATH=$JAVADIR/bin:$PATH && +
java -classpath $JAVADIR HelloWorld
//SYSTSPRT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSINDD DUMMY
//
Output:

path=/usr/lpp/java/J7.0/bin:/bin:/usr/lpp/java/J5.0_64/bin:.

java version "1.7.0"

Java(TM) SE Runtime Environment (build pmz3170sr9fp50-20160720_02(SR9fp50))

IBM J9 VM (build 2.6, JRE 1.7.0 z/OS s390-31 20160630_309948 (JIT enabled, AOT 
enabled) J9VM - R26_Java726_SR9_20160630_1817_B309948

JIT  - tr.r11_20160630_120374

GC   - R26_Java726_SR9_20160630_1817_B309948

J9CL - 20160630_309948)

JCL - 20160719_01 based on Oracle jdk7u111-b13



Hello World


On Mon, Jun 5, 2017 at 9:57 PM, John McKown 
wrote:

> On Mon, Jun 5, 2017 at 7:44 PM, Charles Mills  wrote:
>
> > Remember @Steve Beaver's question "where do I find a C++ sample for
> z/OS?"
> > Well, this is my variant of that question.
> >
> > If I wanted to write "Hello, World" in Java such that it would run 
> > in
> batch
> > on z/OS, where would I start? Where is the "Programmers' Guide" for Java?
> >
> > I know OO concepts, I'm an experienced C++ programmer, and I took a 
> > Java class once upon a time. I can find Java language and class 
> > references on the Web. I'm not looking for that. I'm looking for how 
> > to  get from System.out.println("Hello World"); to //JAVAPGM EXEC 
> > PGM=HELLOW ?
> >
> > Charles
> >
> >
> ​The magic word in this case is JZOS. This is the Java batch launcher 
> for z/OS, which come bundled with the Java JDK.
> https://www.ibm.com/support/knowledgecenter/en/SSYKE2_8.0.
> 0/com.ibm.java.zsecurity.80.doc/zsecurity-component/jzos.html
>
> The above page has links to the information you need.
>
> As an aside, JZOS was originally written by Dovetailed Technologies 
> (the authors of the excellent Co:Z package). It was so much better 
> than anything IBM had that IBM now distributes it with the JDK. I 
> don't know if IBM bought it or has an exclusive license to distribute.
>
> If you're going to do any UNIX work in batch, go here:
> http://dovetail.com/products/cozbatch.html and get this package. It 
> does not require _any_ special authorities so you could even install 
> it using your TSO high level qualifier for the data sets and your UNIX 
> ${HOME} for the UNIX files. Once you've tried this, you'll sneer at 
> IBM's pathetic BPXBATCH. Oh, and the run-time license is a very 
> affordable -- FREE You don't even have to register your email or 
> _anything_. Not even a thank you note.​
>
>
> --
> Windows. A funny name for a operating system that doesn't let you see 
> anything.
>
> Maranatha! <><
> John McKown
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cool virtual tour of Bletchley Park

[zMan]

ITYM "veddy well done". That's the British version!

On Wed, Jun 7, 2017 at 9:47 PM, Edward Finnell <
000248cce9f3-dmarc-requ...@listserv.ua.edu> wrote:

> Superb. Velly well done.
>
>
> In a message dated 6/7/2017 8:35:26 P.M. Central Daylight Time,
> dbo...@sinenomine.net writes:
>
> https://my.matterport.com/show/?m=Vz8kCqGRjQA
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
zMan -- "I've got a mainframe and I'm not afraid to use it"

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Java on z/OS?

[Ken Smith]

JZOS is great but here's a IVP job using OSHELL I run to exercise the
HelloWorld program supplied in the java bin directory.
To write your own no doubt there's a source example out there that you can
compile (javac) and run.

//TSO  EXEC PGM=IKJEFT1B,DYNAMNBR=50,REGION=0M
//SYSPROC  DD  DISP=SHR,DSN=SYS1.SBPXEXEC
//STDENV DD *
JAVADIR=/usr/lpp/java/J7.0
//SYSTSIN DD *
 oshell +
PATH=$JAVADIR/bin:$PATH && +
echo path=$PATH && +
java -version
 oshell +
PATH=$JAVADIR/bin:$PATH && +
java -classpath $JAVADIR HelloWorld
//SYSTSPRT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSINDD DUMMY
//
Output:

path=/usr/lpp/java/J7.0/bin:/bin:/usr/lpp/java/J5.0_64/bin:.

java version "1.7.0"

Java(TM) SE Runtime Environment (build pmz3170sr9fp50-20160720_02(SR9fp50))

IBM J9 VM (build 2.6, JRE 1.7.0 z/OS s390-31 20160630_309948 (JIT enabled,
AOT enabled)
J9VM - R26_Java726_SR9_20160630_1817_B309948

JIT  - tr.r11_20160630_120374

GC   - R26_Java726_SR9_20160630_1817_B309948

J9CL - 20160630_309948)

JCL - 20160719_01 based on Oracle jdk7u111-b13



Hello World


On Mon, Jun 5, 2017 at 9:57 PM, John McKown 
wrote:

> On Mon, Jun 5, 2017 at 7:44 PM, Charles Mills  wrote:
>
> > Remember @Steve Beaver's question "where do I find a C++ sample for
> z/OS?"
> > Well, this is my variant of that question.
> >
> > If I wanted to write "Hello, World" in Java such that it would run in
> batch
> > on z/OS, where would I start? Where is the "Programmers' Guide" for Java?
> >
> > I know OO concepts, I'm an experienced C++ programmer, and I took a Java
> > class once upon a time. I can find Java language and class references on
> > the
> > Web. I'm not looking for that. I'm looking for how to  get from
> > System.out.println("Hello World"); to //JAVAPGM EXEC PGM=HELLOW ?
> >
> > Charles
> >
> >
> ​The magic word in this case is JZOS. This is the Java batch launcher for
> z/OS, which come bundled with the Java JDK.
> https://www.ibm.com/support/knowledgecenter/en/SSYKE2_8.0.
> 0/com.ibm.java.zsecurity.80.doc/zsecurity-component/jzos.html
>
> The above page has links to the information you need.
>
> As an aside, JZOS was originally written by Dovetailed Technologies (the
> authors of the excellent Co:Z package). It was so much better than anything
> IBM had that IBM now distributes it with the JDK. I don't know if IBM
> bought it or has an exclusive license to distribute.
>
> If you're going to do any UNIX work in batch, go here:
> http://dovetail.com/products/cozbatch.html and get this package. It does
> not require _any_ special authorities so you could even install it using
> your TSO high level qualifier for the data sets and your UNIX ${HOME} for
> the UNIX files. Once you've tried this, you'll sneer at IBM's pathetic
> BPXBATCH. Oh, and the run-time license is a very affordable -- FREE You
> don't even have to register your email or _anything_. Not even a thank you
> note.​
>
>
> --
> Windows. A funny name for a operating system that doesn't let you see
> anything.
>
> Maranatha! <><
> John McKown
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

AW: Re: AW: Rexx SORT (was: ... Job Scheduler ... )

[bernd.oppol...@t-online.de]

May I suggest once again that you use
the quicksort Routine that I posted
Yesterday, using pure REXX?
you will see that it is very fast.
but: you have to use the
non recursive Variant, because
Most REXX Implementations
will be Limited on the number
of call Levels

Kind regards

Bernd




--- Original-Nachricht ---
Von: Nims,Alva John (Al)
Betreff: Re: AW: Rexx SORT (was: ... Job Scheduler ... )
Datum: 08.06.2017, 14:59 Uhr
An: IBM-MAIN@LISTSERV.UA.EDU





No, z/OS REXX does not have a SORTSTEM function built-in. I currently have 
a STEMSORT function, but it is from a 3rd party vendor.

Al Nims
Systems Admin/Programmer 3
UFIT
Universtiy of Florida
(352) 273-1298

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
Behalf Of Tony Thigpen
Sent: Thursday, June 08, 2017 4:54 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: AW: Rexx SORT (was: ... Job Scheduler ... )

Could you point me to the REXX list?

Also, we have had a SORTSTEM function in VSE REXX for a LONG time. Does 
z/OS not have SORTSTEM?

Tony Thigpen

Nims,Alva John (Al) wrote on 06/07/2017 01:27 PM:
> This is getting to be like a discussion that was had on the REXX list 
recently, as in it would be nice if there was an available PIPE type of 
command available, oh wait there is:
>
> The product where IBM has made a PIPE command available:
> http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?infotype=dd&subtype
 =
> sm&htmlfid=897/ENUS5655-D45
>
> Sorting is very simple there:
> PIPE stem xy. | sort 1 5 | stem yx.
> Or PIPE < indsn | sort 1 5 | > outdsn
>
> These are simple examples and not everything that can be done, but when I 
was using it (my previous job) it was reasonably quick in execution. Now I 
have to do the allocation of SORTIN, SORTOUT and SYSIN (control cards) then 
invoke SORT, very cumbersome compared to the simple PIPE command version.
>
> Al Nims
> UFIT
> University of Florida
> (352) 273-1298
> @Home
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On Behalf Of Elardus Engelbrecht
> Sent: Wednesday, June 07, 2017 1:14 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: AW: Rexx SORT (was: ... Job Scheduler ... )
>
> Paul Gilmartin wrote:
>
>> Bernd.Oppolzer wrote:
>>> http://bernd-oppolzer.de/blog_20150115_151000.htm

>>> this Contains a REXX Procedure to sort a stem variable. See
>>> quicksort_nonrec
>> o Of course. But why should it be necessary to reinvent the wheel when 
DFSORT has vast capabilities not practical to duplicate in Rexx?
>
> Could you please be kind to tell us what function(s) you have in mind?
>
> On one side, REXX has this nice PARSE function. hard to duplicate that in 
DFSORT, but do-able.
> On other side, DFSORT handles SMF records and their weird timestamps
> better. (Yes, I know REXX can handle VBS records these days.)
>
>
 I could envision adapting [the ANSI Rexx form] in TSO Rexx something 
like:
 address LINKMVS 'ICEMAN' with ,
 DD:SORTIN stem F1. ,
 DD:SORTOUT stem F2.
>
> You can do the same with REXX statements like this:
>
> "ALLOC F(SORTIN) blah "
> "EXECIO * DISKR SORTIN (STEM F1. FINIS"
> "FREE F(SORTIN)"
> ... and then call DFSORT and sort out your magic
>
> In fact, I have some RYO REXX progs which call DFSORT to sort something 
out...
>
>
>> o And while I chose SORT as an example, I intended to consider a more 
general solution. Imagine a facility that could invoke not only SORT, but:
>> - IEBUPDTE witn SYSIN, SYSUT1, and SYSUT2 assigned to stems.
>> - ISRSUPC with OLD, NEW, and DELTA assigned to stems.
>> - Etc. Much like ANSI Rexx.
>
> You can invoke anything with REXX including SDSF, IEBGENER, IEBCOPY, etc. 
as long you pass/receive parameters and DD correctly.
>
> In fact, zSecure ISPF panels are mostly driven by REXX.
>
> But, I agree with you, something standardised so you can do what you 
desire would really be useful.
>
> Something like "ALLOC F(SYSIN)  ..."
>
> Also FREE(FSYSIN) which -optionally- drops those Stems. (I said
> optionally, because, you may need to free up SYSIN immediately, but
> continue to handle those stems.)
>
> Just some little idle ideas, ya ;-)
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu  with the 
message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu  with the 
message: INFO IBM-MAIN
>
>

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email 
to lis

Re: AW: Rexx SORT (was: ... Job Scheduler ... )

[Lizette Koehler]

To join the REXX list

TSO REXXhttp://www2.marist.edu/htbin/wlvindex?TSO-REXX

Or there is the  REXX-LA group as well

http://rexxla.org/

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Tony Thigpen
> Sent: Thursday, June 08, 2017 1:54 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: AW: Rexx SORT (was: ... Job Scheduler ... )
> 
> Could you point me to the REXX list?
> 
> Also, we have had a SORTSTEM function in VSE REXX for a LONG time. Does z/OS
> not have SORTSTEM?
> 
> Tony Thigpen
> 
> Nims,Alva John (Al) wrote on 06/07/2017 01:27 PM:
> > This is getting to be like a discussion that was had on the REXX list
> recently, as in it would be nice if there was an available PIPE type of
> command available, oh wait there is:
> >
> > The product where IBM has made a PIPE command available:
> > http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?infotype=dd&subtype=
> > sm&htmlfid=897/ENUS5655-D45
> >
> > Sorting is very simple there:
> > PIPE stem xy. | sort 1 5 | stem yx.
> > Or  PIPE < indsn | sort 1 5 | > outdsn
> >
> > These are simple examples and not everything that can be done, but when I
> was using it (my previous job) it was reasonably quick in execution.  Now I
> have to do the allocation of SORTIN, SORTOUT and SYSIN (control cards) then
> invoke SORT, very cumbersome compared to the simple PIPE command version.
> >
> > Al Nims
> > UFIT
> > University of Florida
> > (352) 273-1298
> > @Home
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Elardus Engelbrecht
> > Sent: Wednesday, June 07, 2017 1:14 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: AW: Rexx SORT (was: ... Job Scheduler ... )
> >
> > Paul Gilmartin wrote:
> >
> >> Bernd.Oppolzer wrote:
> >>> http://bernd-oppolzer.de/blog_20150115_151000.htm
> >>> this Contains a REXX Procedure to sort a stem variable. See
> >>> quicksort_nonrec
> >> o Of course.  But why should it be necessary to reinvent the wheel when
> DFSORT has vast capabilities not practical to duplicate in Rexx?
> >
> > Could you please be kind to tell us what function(s) you have in mind?
> >
> > On one side, REXX has this nice PARSE function. hard to duplicate that in
> DFSORT, but do-able.
> > On other side, DFSORT handles SMF records and their weird timestamps
> > better. (Yes, I know REXX can handle VBS records these days.)
> >
> >
>  I could envision adapting [the ANSI Rexx form] in TSO Rexx something
> like:
>  address LINKMVS 'ICEMAN' with ,
>  DD:SORTIN stem F1. ,
>  DD:SORTOUT stem F2.
> >
> > You can do the same with REXX statements like this:
> >
> > "ALLOC F(SORTIN) blah "
> > "EXECIO * DISKR SORTIN (STEM F1. FINIS"
> > "FREE F(SORTIN)"
> > ... and then call DFSORT and sort out your magic
> >
> > In fact, I have some RYO REXX progs which call DFSORT to sort something
> out...
> >
> >
> >> o And while I chose SORT as an example, I intended to consider a more
> general solution.  Imagine a facility that could invoke not only SORT, but:
> >>   - IEBUPDTE witn SYSIN, SYSUT1, and SYSUT2 assigned to stems.
> >>   - ISRSUPC with OLD, NEW, and DELTA assigned to stems.
> >>   - Etc.  Much like ANSI Rexx.
> >
> > You can invoke anything with REXX including SDSF, IEBGENER, IEBCOPY, etc.
> as long you pass/receive parameters and DD correctly.
> >
> > In fact, zSecure ISPF panels are mostly driven by REXX.
> >
> > But, I agree with you, something standardised so you can do what you desire
> would really be useful.
> >
> > Something like "ALLOC F(SYSIN)  ..."
> >
> > Also FREE(FSYSIN) which -optionally- drops those Stems. (I said
> > optionally, because, you may need to free up SYSIN immediately, but
> > continue to handle those stems.)
> >
> > Just some little idle ideas, ya ;-)
> >
> > Groete / Greetings
> > Elardus Engelbrecht
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> >
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Rexx SORT (was: ... Job Scheduler ... )

[Edward Gould]

> On Jun 7, 2017, at 7:06 PM, Phil Smith  wrote:
> 
> Lionel Dyck wrote:
>> If I recall the CMS/TSO Pipes is effectively the same code that is 
>> reassembled for z/VM or z/OS. Sadly it is a product that is charged for on 
>> z/OS but is included in z/VM at no charge. It should, imho, be included in 
>> z/OS as a no charge feature and really give the REXX users a tool to be more 
>> productive and thus make z/OS more usable.
> 
> More than "effectively": IIRC, the same load module works in either OS. It 
> can tell where it is and reacts accordingly.
> 
> And yes, IBM should include it in the product; it could only help! The 
> resistance to making z/OS more usable is going to be its downfall, I fear.
> 
> And no, the web-based stuff isn't the answer-that makes it easier to 
> administer, but doesn't help you get real work done.

Phil:

TSO is dead, IBM wouldn’t offer a new product because it used TSO.

Ed
> 
> ...phsiii
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: AW: Rexx SORT (was: ... Job Scheduler ... )

[Nims,Alva John (Al)]

No, z/OS REXX does not have a SORTSTEM function built-in.  I currently have a 
STEMSORT function, but it is from a 3rd party vendor.

Al Nims
Systems Admin/Programmer 3
UFIT
Universtiy of Florida
(352) 273-1298

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Thursday, June 08, 2017 4:54 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: AW: Rexx SORT (was: ... Job Scheduler ... )

Could you point me to the REXX list?

Also, we have had a SORTSTEM function in VSE REXX for a LONG time. Does z/OS 
not have SORTSTEM?

Tony Thigpen

Nims,Alva John (Al) wrote on 06/07/2017 01:27 PM:
> This is getting to be like a discussion that was had on the REXX list 
> recently, as in it would be nice if there was an available PIPE type of 
> command available, oh wait there is:
>
> The product where IBM has made a PIPE command available:
> http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?infotype=dd&subtype=
> sm&htmlfid=897/ENUS5655-D45
>
> Sorting is very simple there:
>   PIPE stem xy. | sort 1 5 | stem yx.
> OrPIPE < indsn | sort 1 5 | > outdsn
>
> These are simple examples and not everything that can be done, but when I was 
> using it (my previous job) it was reasonably quick in execution.  Now I have 
> to do the allocation of SORTIN, SORTOUT and SYSIN (control cards) then invoke 
> SORT, very cumbersome compared to the simple PIPE command version.
>
> Al Nims
> UFIT
> University of Florida
> (352) 273-1298
> @Home
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Elardus Engelbrecht
> Sent: Wednesday, June 07, 2017 1:14 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: AW: Rexx SORT (was: ... Job Scheduler ... )
>
> Paul Gilmartin wrote:
>
>> Bernd.Oppolzer wrote:
>>> http://bernd-oppolzer.de/blog_20150115_151000.htm
>>> this Contains a REXX Procedure to sort a stem variable. See 
>>> quicksort_nonrec
>> o Of course.  But why should it be necessary to reinvent the wheel when 
>> DFSORT has vast capabilities not practical to duplicate in Rexx?
>
> Could you please be kind to tell us what function(s) you have in mind?
>
> On one side, REXX has this nice PARSE function. hard to duplicate that in 
> DFSORT, but do-able.
> On other side, DFSORT handles SMF records and their weird timestamps 
> better. (Yes, I know REXX can handle VBS records these days.)
>
>
 I could envision adapting [the ANSI Rexx form] in TSO Rexx something like:
 address LINKMVS 'ICEMAN' with ,
 DD:SORTIN stem F1. ,
 DD:SORTOUT stem F2.
>
> You can do the same with REXX statements like this:
>
> "ALLOC F(SORTIN) blah "
> "EXECIO * DISKR SORTIN (STEM F1. FINIS"
> "FREE F(SORTIN)"
> ... and then call DFSORT and sort out your magic
>
> In fact, I have some RYO REXX progs which call DFSORT to sort something out...
>
>
>> o And while I chose SORT as an example, I intended to consider a more 
>> general solution.  Imagine a facility that could invoke not only SORT, but:
>>   - IEBUPDTE witn SYSIN, SYSUT1, and SYSUT2 assigned to stems.
>>   - ISRSUPC with OLD, NEW, and DELTA assigned to stems.
>>   - Etc.  Much like ANSI Rexx.
>
> You can invoke anything with REXX including SDSF, IEBGENER, IEBCOPY, etc. as 
> long you pass/receive parameters and DD correctly.
>
> In fact, zSecure ISPF panels are mostly driven by REXX.
>
> But, I agree with you, something standardised so you can do what you desire 
> would really be useful.
>
> Something like "ALLOC F(SYSIN)  ..."
>
> Also FREE(FSYSIN) which -optionally- drops those Stems. (I said 
> optionally, because, you may need to free up SYSIN immediately, but 
> continue to handle those stems.)
>
> Just some little idle ideas, ya ;-)
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: LE QuestionT

[Peter Relson]

> My first question is where does LE place the HEAP ( what Subpool ) ?

And my initial response is a question: why would you care what subpool?
The subpool is almost certainly not a programming interface. You should 
not write any code that depends on the subpool

Any presentation that describes the subpool likely does so to help you in 
diagnosis situations, not in programming situations.

>IIRC subpool 1 is for LE internals and subpool 2 for user heap and 
>stack. Makes sense so presumably a user-space storage overwrite wont 
>corrupt LE so it can shutdown cleanly.

Tony H's response was right on target. Using different user-region 
subpools does nothing to help prevent overwrites or corruption.
It does help a bit with someone unintentionally freeing the wrong thing.
Some applications might choose unique subpools to accommodate a subpool 
freemain.

Peter Relson
z/OS Core Technology Design


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Ted MacNeil?

[Elardus Engelbrecht]

Tom Conley wrote:

>zMan wrote:
>> Hey, what happened to Ted? He could be a PITA but he contributed value, too. 
>> Haven't seen him here lately.

>Knowing Ted, he's probably still "too busy driving to stop for gas" ;-)

Perhaps ran out of 'gas' for good? 

Reminds me of John Chase, his last post was in February 2015, but according to 
Linked-In he has retired...

Still no news about John Gilmore, Shmuel Metz, and who else too?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: AW: Rexx SORT (was: ... Job Scheduler ... )

[Edward Finnell]

Using Catalist at _www.lsoft.com_ (http://www.lsoft.com) 
 
Found these:
 
_rexxl...@listserv.uga.EDU_ 
(http://www.lsoft.com/scripts/wl.exe?SL1=REXXLIST&H=LISTSERV.UGA.EDU)  
(https://listserv.uga.edu/cgi-bin/wa?LIST=REXXLIST)  
REXX Programming discussion list (356 subscribers) 
_TSO-REXX@VM.MARIST.EDU_ 
(http://www.lsoft.com/scripts/wl.exe?SL1=TSO-REXX&H=VM.MARIST.EDU)  
TSO REXX Discussion List (974 subscribers) 
_VM-REXX@VM.MARIST.EDU_ 
(http://www.lsoft.com/scripts/wl.exe?SL1=VM-REXX&H=VM.MARIST.EDU)  
VM/SP REXX Language Discussion List (120 subscribers)
3  lists matched your search string.
 
 
In a message dated 6/8/2017 3:53:44 A.M. Central Daylight Time,  
t...@vse2pdf.com writes:

Could  you point me to the REXX  list?


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: AW: Rexx SORT (was: ... Job Scheduler ... )

[Tony Thigpen]

Could you point me to the REXX list?

Also, we have had a SORTSTEM function in VSE REXX for a LONG time. Does 
z/OS not have SORTSTEM?


Tony Thigpen

Nims,Alva John (Al) wrote on 06/07/2017 01:27 PM:

This is getting to be like a discussion that was had on the REXX list recently, 
as in it would be nice if there was an available PIPE type of command 
available, oh wait there is:

The product where IBM has made a PIPE command available:
http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?infotype=dd&subtype=sm&htmlfid=897/ENUS5655-D45

Sorting is very simple there:
PIPE stem xy. | sort 1 5 | stem yx.
Or  PIPE < indsn | sort 1 5 | > outdsn

These are simple examples and not everything that can be done, but when I was 
using it (my previous job) it was reasonably quick in execution.  Now I have to 
do the allocation of SORTIN, SORTOUT and SYSIN (control cards) then invoke 
SORT, very cumbersome compared to the simple PIPE command version.

Al Nims
UFIT
University of Florida
(352) 273-1298
@Home

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Wednesday, June 07, 2017 1:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: AW: Rexx SORT (was: ... Job Scheduler ... )

Paul Gilmartin wrote:


Bernd.Oppolzer wrote:

http://bernd-oppolzer.de/blog_20150115_151000.htm
this Contains a REXX Procedure to sort a stem variable. See
quicksort_nonrec

o Of course.  But why should it be necessary to reinvent the wheel when DFSORT 
has vast capabilities not practical to duplicate in Rexx?


Could you please be kind to tell us what function(s) you have in mind?

On one side, REXX has this nice PARSE function. hard to duplicate that in 
DFSORT, but do-able.
On other side, DFSORT handles SMF records and their weird timestamps better. 
(Yes, I know REXX can handle VBS records these days.)



I could envision adapting [the ANSI Rexx form] in TSO Rexx something like:
address LINKMVS 'ICEMAN' with ,
DD:SORTIN stem F1. ,
DD:SORTOUT stem F2.


You can do the same with REXX statements like this:

"ALLOC F(SORTIN) blah "
"EXECIO * DISKR SORTIN (STEM F1. FINIS"
"FREE F(SORTIN)"
... and then call DFSORT and sort out your magic

In fact, I have some RYO REXX progs which call DFSORT to sort something out...



o And while I chose SORT as an example, I intended to consider a more general 
solution.  Imagine a facility that could invoke not only SORT, but:
  - IEBUPDTE witn SYSIN, SYSUT1, and SYSUT2 assigned to stems.
  - ISRSUPC with OLD, NEW, and DELTA assigned to stems.
  - Etc.  Much like ANSI Rexx.


You can invoke anything with REXX including SDSF, IEBGENER, IEBCOPY, etc. as 
long you pass/receive parameters and DD correctly.

In fact, zSecure ISPF panels are mostly driven by REXX.

But, I agree with you, something standardised so you can do what you desire 
would really be useful.

Something like "ALLOC F(SYSIN)  ..."

Also FREE(FSYSIN) which -optionally- drops those Stems. (I said optionally, 
because, you may need to free up SYSIN immediately, but continue to handle 
those stems.)

Just some little idle ideas, ya ;-)

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: System Rexx - Console questions

[IronSphere by SecuriTeam Software]

use axrwto.

ITschak​

On Wed, Jun 7, 2017 at 11:47 PM, Tony Harminc  wrote:

> What causes the AXR0500I message
>
> AXR0500I AXREXX OUTPUT DISPLAY 093
> EXECNAME=TESTX REQTOKEN=4000D29FAA504703A808
> TESTX running - output from SAY
>
> to be written to Syslog? Clearly that last line is from a SAY statement of
> mine, but I seem to always get the AXR0500I even without a SAY. I want to
> avoid it - I never want to see any indication of the Rexx program running,
> unless it issues a message itself or there is a serious error within System
> Rexx. I don't want that REQTOKEN and such cluttering the console stream.
>
> Also, what is the real meaning of the CONSDATA=YES option on AXREXX? Again,
> the book is vague: "CONSDATA=YES Indicates that the exec is invoked as a
> system command." Does this mean that any WTOs issued by the AXR[ML]WTO
> functions are marked with DESC=5? I don't know what else this might mean.
>
> There is an example in the book of issuing an MVS command from Rexx,
> retrieving and parsing the command output, and using AXRMLWTO to write the
> result to an extended MCS console set up with MCSOPER in the program that
> invoked AXREXX. Maybe a bit far-fetched, but I tried the example, and all
> of the command+output goes to SYSLOG, as well as to the extended  console.
> But there is no option to specify DESC or ROUTCDE or any other WTO options
> on AXR[ML]WTO. I would also like to avoid all this stuff going to SYSLOG.
>
> Thanks... Tony H.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
ITschak Mugzach
*|** IronSphere Platform* *|** An IT GRC for Legacy systems* *| Automated
Security Readiness Reviews (SRR) **|*

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN