BatchPipes and TSO Pipes

2020-03-22 Thread Lionel B Dyck
I have access to a system where BP is installed and discovered that TSO
Pipes works - to a limited degree.  CALLPIPE and ADDPIPE are missing even
though both are clearly documented in the reference manual. Does anyone have
any pointers to any doc that would document what parts of Pipes are missing
with BP?

 

Now that I can use Pipes under TSO I'm being reminded of its power that I
found during my few years using it under z/VM where I only had a very basic
introduction to it. Now I'm trying to learn more but finding a lack of
learning resources other than trial and error. There are some SHARE
presentations and some info on the Marist site that is helpful. Does anyone
have a pointer to a Pipes for novices?

 

 

Lionel B. Dyck <
Website:   http://www.lbdsoftware.com

"Worry more about your character than your reputation.  Character is what
you are, reputation merely what others think you are." - John Wooden

 


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


Re: BatchPipes and TSO Pipes

2020-03-22 Thread Paul Gilmartin
On Sun, 22 Mar 2020 08:20:36 -0500, Lionel B Dyck wrote:

>I have access to a system where BP is installed and discovered that TSO
>Pipes works - to a limited degree.  CALLPIPE and ADDPIPE are missing even
>though both are clearly documented in the reference manual. Does anyone have
>any pointers to any doc that would document what parts of Pipes are missing
>with BP?
> 
First, ask on  http://vm.marist.edu/htbin/wlvindex?CMSPIP-L
Subscription info at bottom.  Also, try (2016):
http://www.vm.ibm.com/library/710pdfs/71625200.pdf

Dammit!  Google is getting nasty wrapping URLs so they can track!

Does anyone know how to associate a Pipelines connector
with an OMVS/Openextensions descriptor?

-- gil

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


Mainframers Working From Home By Trevor Eddolls

2020-03-22 Thread Mark Regan
https://it.toolbox.com/blogs/trevoreddolls/mainframers-working-from-home-032220

or

*https://tinyurl.com/r3m5mjs* 
Regards,

Mark Regan

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


Re: BatchPipes and TSO Pipes

2020-03-22 Thread Lionel B Dyck
That telecourse looks outstanding - thank you


Lionel B. Dyck <
Website: http://www.lbdsoftware.com

"Worry more about your character than your reputation.  Character is what you 
are, reputation merely what others think you are." - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Dave Jones
Sent: Sunday, March 22, 2020 11:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: BatchPipes and TSO Pipes

You might find this of some use, Lionel :
CMS Pipelines Telecourse (an HTML selfstudy course) V1.3
  https://www.vm.ibm.com/download/packages/descript.cgi?TCVM2

DJ

--
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: OT: Mandatory Work From Home at my company

2020-03-22 Thread Bob Bridges
There was a time when I had three laptops (two of them issued by clients),
and space was getting tight.  I thought then about buying one of those
switches, Peter.  A "KVM" switch, is that what it's called (keyboard, video,
mouse)?  I don't remember for sure.  The situation improved before I got
around to it, but I'm thinking about it again now.  How did it work for you?

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* The creditors are a superstitious sect, great observers of set days and
times.  -Poor Richard */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Farley, Peter x23353
Sent: Friday, March 20, 2020 13:01

FWIW, my WFH setup for many years now includes an MS Natural keyboard and a
comfortable Logitech gaming mouse that I use a USB3 switch to change between
my small work laptop, large home desktop and medium-sized home laptop.
IOGear makes the USB3 switch, which can handle up to 4 inputs switched among
up to 4 CPU's.  My 27 inch Dell monitor has multiple HDMI and DisplayPort
inputs so I can switch the screen among all my machines.  Lots of cables of
course, but it has been well worth it.

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


Re: BatchPipes and TSO Pipes

2020-03-22 Thread Lionel B Dyck
Martin - thank you


Lionel B. Dyck <
Website: http://www.lbdsoftware.com

"Worry more about your character than your reputation.  Character is what
you are, reputation merely what others think you are." - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Martin Packer
Sent: Sunday, March 22, 2020 12:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: BatchPipes and TSO Pipes

You're best of searching with the string "batchpipeworks" as that's what it
was called when SmartBatch was created. I believe the term survived into
BatchPipes/MVS V2.

Not all CMS Pipelines functions are supported.

Cheers, Martin

Martin Packer

zChampion, Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: 
https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker

Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/or 
  
https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id112794357
3?mt=2


Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   Lionel B Dyck 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   22/03/2020 17:24
Subject:[EXTERNAL] Re: BatchPipes and TSO Pipes
Sent by:IBM Mainframe Discussion List 



That telecourse looks outstanding - thank you


Lionel B. Dyck <
Website: 
https://urldefense.proofpoint.com/v2/url?u=http-3A__www.lbdsoftware.com=Dw
IFaQ=jf_iaSHvJObTbx-siA1ZOg=BsPGKdq7-Vl8MW2-WOWZjlZ0NwmcFSpQCLphNznBSDQ&
m=pvIHxGgF3aJff3x0OLzJEPZPeaTiZBaOn7cLSXVwS_4=JToobsms7DK2vd66akWU37MZPctq
GvCvZcJf1BvVpUU= 


"Worry more about your character than your reputation.  Character is what
you are, reputation merely what others think you are." - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Dave Jones
Sent: Sunday, March 22, 2020 11:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: BatchPipes and TSO Pipes

You might find this of some use, Lionel :
 CMS Pipelines Telecourse (an HTML selfstudy course) V1.3
  https://www.vm.ibm.com/download/packages/descript.cgi?TCVM2

DJ

--
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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


--
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: BatchPipes and TSO Pipes

2020-03-22 Thread Dave Jones
You might find this of some use, Lionel :
CMS Pipelines Telecourse (an HTML selfstudy course) V1.3
  https://www.vm.ibm.com/download/packages/descript.cgi?TCVM2

DJ

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


Re: OT: Mandatory Work From Home at my company

2020-03-22 Thread Steve Beaver
I ordered the following from amazon 

UGREEN USB 3.0 Sharing Switch Selector 4 Port 2 Computers Peripheral
Switcher Adapter Hub for PC, Printer, Scanner, Mouse, Keyboard with One
Button Sw


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Farley, Peter x23353
Sent: Friday, March 20, 2020 1:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: OT: Mandatory Work From Home at my company

IOGear GUS434 - 4x4 USB 3.0 Peripheral Sharing Switch -- 67.18 USD from
NewEgg. 

They also make GUS432 2x4 to switch 4 USB devices between 2 computers.
63.16 USD from NewEgg.

Button provided to switch between computers for both versions.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Steve Beaver
Sent: Friday, March 20, 2020 2:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: OT: Mandatory Work From Home at my company

In my work setup I have 3 Monitors and 2 computers and a Logitech 850 Mouse
and Keyboard.  

For me to switch I have to move the Dongle.

Can anyone suggest a piece of gear I can put a pair of USB-A plugs onto a
switch box and have my dongle on the other side with A button to switch back
and forth?

--

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

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


Re: OT: Mandatory Work From Home at my company

2020-03-22 Thread Bob Bridges
YES!!  I love laptops for travel, and therefore use them at home too; but I
always carry around a real keyboard and trackball to plug into the laptop so
I can type at normal speed without having to find numeric keys, arrows etc.

(Just recently I had one of my sons build me a tower, with a bigger monitor
and tons of RAM and HD space.  (Keeping in mind what "tons of RAM" might
mean to a guy who not so long ago thought 32K was really cool.)  But mostly
I got the new one because I figure my clients shouldn't suffer from my not
having a  backup, not because I really needed bigger and better.)

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Give a man fire and he's warm for a day; set him on fire and he's warm
for the rest of his life.  -found on the web */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Seymour J Metz
Sent: Friday, March 20, 2020 11:47

No, you don't need a big PC with a comfortable keyboard and screen that
doesn't force continual scrolling, but it sure makes life more pleasant and
more productive. It never ceases to amaze me how people put up with terrible
human factors. Take the typical laptop keyboard - please!

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


Re: OT: Mandatory Work From Home at my company

2020-03-22 Thread Bob Bridges
I'm with David on this one.  A few days ago someone in this conversation said 
he wouldn't use a personal cell phone for company business, and I didn't say 
anything about it at the time.  But I put my phone on an unlimited plan years 
ago, and never since thought twice about using it for business and personal.  
(Besides, I'm totally unwilling to carry around two cell phones.)

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* When their love was strong they could sleep on the edge of a sword, but now 
when they have forgotten, a bed sixty feet across is not sufficient.  -Rab 
Akiva, quoted in _The Source_ by James Michener */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: Friday, March 20, 2020 12:53

I haven’t seen a pager since I started in this business.  When was the last 
time you were over here Radoslaw, you might be aging yourself there...    
Pretty much everyone has cell phones, but I doubt that many are company issued 
any more.   For us they are not.  No biggie, I'd have one anyway, and cell 
minutes are no longer a metered item.  I do have company apps on my phone, not 
an employer requirement, more for my own convenience.

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


Re: BatchPipes and TSO Pipes

2020-03-22 Thread Martin Packer
You're best of searching with the string "batchpipeworks" as that's what 
it was called when SmartBatch was created. I believe the term survived 
into BatchPipes/MVS V2.

Not all CMS Pipelines functions are supported.

Cheers, Martin

Martin Packer

zChampion, Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: 
https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker

Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/or 
  
https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id1127943573?mt=2


Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   Lionel B Dyck 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   22/03/2020 17:24
Subject:[EXTERNAL] Re: BatchPipes and TSO Pipes
Sent by:IBM Mainframe Discussion List 



That telecourse looks outstanding - thank you


Lionel B. Dyck <
Website: 
https://urldefense.proofpoint.com/v2/url?u=http-3A__www.lbdsoftware.com=DwIFaQ=jf_iaSHvJObTbx-siA1ZOg=BsPGKdq7-Vl8MW2-WOWZjlZ0NwmcFSpQCLphNznBSDQ=pvIHxGgF3aJff3x0OLzJEPZPeaTiZBaOn7cLSXVwS_4=JToobsms7DK2vd66akWU37MZPctqGvCvZcJf1BvVpUU=
 


"Worry more about your character than your reputation.  Character is what 
you are, reputation merely what others think you are." - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf 
Of Dave Jones
Sent: Sunday, March 22, 2020 11:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: BatchPipes and TSO Pipes

You might find this of some use, Lionel :
 CMS Pipelines Telecourse (an HTML selfstudy course) V1.3
  https://www.vm.ibm.com/download/packages/descript.cgi?TCVM2

DJ

--
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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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


Re: OT: Mandatory Work From Home at my company

2020-03-22 Thread Seymour J Metz
I've seen lots of hangs associated with KVM switches. 


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Bob 
Bridges [robhbrid...@gmail.com]
Sent: Sunday, March 22, 2020 1:46 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: OT: Mandatory Work From Home at my company

There was a time when I had three laptops (two of them issued by clients),
and space was getting tight.  I thought then about buying one of those
switches, Peter.  A "KVM" switch, is that what it's called (keyboard, video,
mouse)?  I don't remember for sure.  The situation improved before I got
around to it, but I'm thinking about it again now.  How did it work for you?

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* The creditors are a superstitious sect, great observers of set days and
times.  -Poor Richard */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Farley, Peter x23353
Sent: Friday, March 20, 2020 13:01

FWIW, my WFH setup for many years now includes an MS Natural keyboard and a
comfortable Logitech gaming mouse that I use a USB3 switch to change between
my small work laptop, large home desktop and medium-sized home laptop.
IOGear makes the USB3 switch, which can handle up to 4 inputs switched among
up to 4 CPU's.  My 27 inch Dell monitor has multiple HDMI and DisplayPort
inputs so I can switch the screen among all my machines.  Lots of cables of
course, but it has been well worth it.

--
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 anybody remember CLIST?

2020-03-22 Thread David Spiegel
How about the ability to force the caller to supply a specific number of 
arguments?


On 2020-03-22 14:27, Bob Bridges wrote:

As far as I know there are only two useful tricks CLIST can perform that REXX 
can't.  Well, maybe three:

1) WRITENR.  So when I really need it, I use an external REXX exec named SAYNR 
that does the same thing - by calling a CLIST that does a WRITENR.  Works like 
a champ, but I wouldn't want to try it inside a loop.

2) Interacting with subsystems.  In CLIST you can issue FTP commands, for 
example, evaluate the response and decide where to go from there; REXX handles 
subsystems as batch, essentially.

3) Dunno whether you'd count this, but CLIST has a neat built-in functionality 
for evaluating parms.  I get around this by starting every REXX with a SELECT 
statement that evaluates each space-delimited word in the arg list; it's more 
complicated, but it means that in most cases I can enter arguments in any 
order, which pleases me.  Like this (to pick a complex example with many 
possible arguments):

   fnox=0; fall=0; acid=''; ddnfm=''; ddnto=''
   arg args; do while args<>''; parse var args arg args; select
   when arg='DBG' then trace 'I' /* trace mode */
   when arg='NOX' then fnox=1/* no-execute mode */
   when abbrev('LISTALL',arg,5) then fall=1  /* turn on list-all mode */
   when pos('.',arg)>0 then dsn=arg  /* set the DSN */
   when tgetacid(arg)=0 then acid=arg/* set the ACID */
   when length(arg)<9 & ddnfm='' then ddnfm=arg  /* from DD */
   when length(arg)<9 & ddnto='' then ddnto=arg  /* to DD */
   otherwise call abend 'Unrecognized arg' arg; end; end

The only requirement here regarding argument order is that the From DD has to 
be named before the To DD; everything else the operator can type in as it 
happens to occur to him.

This makes my REXX execs a little messy up front, but gives me flexibility that 
I value.  And anyway I'm used to it now.  Easily worth the extra trouble to get 
access to the power REXX affords over CLIST.  Too bad about #2, though.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Give a man fire and he's warm for a day; set him on fire and he's warm for 
the rest of his life.  -found on the web */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of CM Poncelet
Sent: Friday, March 20, 2020 20:39
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Does anybody remember CLIST?

No, there is no problem with that. I assume you meant "EXECIO 1 DISKR
"ddn1" (STEM foo."
  
The problem happens e.g. if a variable X contains the names of other

variables, which in turn contain the names of yet other variables etc.
etc. which finally - with say names Z1 Z2 Z3 etc. - have values that
need to be accessed.
  
We can "VPUT X (and all the other variables' names) SHARED" and call an

external exec. It issues "VGET X SHARED" and then "VGET "X" SHARED". But
how does it then VGET the other variables and their values in such way
that they can be processed? The variable names can be VGET as data, but
REXX cannot use data - such as names Z1 Z2 Z3 etc. - as names of
variables (although INTERPRET *might* be able to fix that.)
  
Clist can allocate variable names dynamically, using &'s, and can then

use SYSSCAN to control how many &'s are interpreted. Its problem is it
cannot ADDRESS environments and cannot process binary data, which REXX can.
  
Cheers.
  


On 20/03/2020 04:22, Seymour J Metz wrote:

I don't see the problem.

/* REXX */
parse arg upper ddn1 ddn2
EXECIO DISKR ddn1 1 '(' STEM foo.
do i=1 to foo.0
   say 'Line' i 'is' foo.i
   end


--
Shmuel (Seymour J.) Metz
https://eur04.safelinks.protection.outlook.com/?url=http:%2F%2Fmason.gmu.edu%2F~smetz3data=02%7C01%7C%7Ce30b389f82d14d9030be08d7ce8ecb52%7C84df9e7fe9f640afb435%7C1%7C0%7C637204985003492202sdata=foJDgkmypalhXavKngxUPu%2BIks9tT%2Fp6wERb64duUbQ%3Dreserved=0


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of CM 
Poncelet [ponce...@bcs.org.uk]
Sent: Friday, March 20, 2020 12:07 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Does anybody remember CLIST?

As mentioned above, EXECIO is part of TSO REXX.

The problem is not EXECIO but with reading the records of a dataset
assigned to an arbitrary DDNAME passed as a parm to REXX.

Consider the folowing:

//*
//* NOTE: 'U' => TSO USERID(S); SPECIFY LIST OF USERIDS UNDER DESTIDS *
//* ¯ 'C' -> CONSOLE; SPECIFY MASTER ETC. UNDER CONSIDS   *
//*   *
//* 04/01/95 CMP  *
//*
//*
//CLIST   EXEC PGM=IKJEFT01,
// REGION=512K,

Re: Does anybody remember CLIST?

2020-03-22 Thread Bob Bridges
As far as I know there are only two useful tricks CLIST can perform that REXX 
can't.  Well, maybe three:

1) WRITENR.  So when I really need it, I use an external REXX exec named SAYNR 
that does the same thing - by calling a CLIST that does a WRITENR.  Works like 
a champ, but I wouldn't want to try it inside a loop.

2) Interacting with subsystems.  In CLIST you can issue FTP commands, for 
example, evaluate the response and decide where to go from there; REXX handles 
subsystems as batch, essentially.

3) Dunno whether you'd count this, but CLIST has a neat built-in functionality 
for evaluating parms.  I get around this by starting every REXX with a SELECT 
statement that evaluates each space-delimited word in the arg list; it's more 
complicated, but it means that in most cases I can enter arguments in any 
order, which pleases me.  Like this (to pick a complex example with many 
possible arguments):

  fnox=0; fall=0; acid=''; ddnfm=''; ddnto=''
  arg args; do while args<>''; parse var args arg args; select
  when arg='DBG' then trace 'I' /* trace mode */
  when arg='NOX' then fnox=1/* no-execute mode */
  when abbrev('LISTALL',arg,5) then fall=1  /* turn on list-all mode */
  when pos('.',arg)>0 then dsn=arg  /* set the DSN */
  when tgetacid(arg)=0 then acid=arg/* set the ACID */
  when length(arg)<9 & ddnfm='' then ddnfm=arg  /* from DD */
  when length(arg)<9 & ddnto='' then ddnto=arg  /* to DD */
  otherwise call abend 'Unrecognized arg' arg; end; end

The only requirement here regarding argument order is that the From DD has to 
be named before the To DD; everything else the operator can type in as it 
happens to occur to him.

This makes my REXX execs a little messy up front, but gives me flexibility that 
I value.  And anyway I'm used to it now.  Easily worth the extra trouble to get 
access to the power REXX affords over CLIST.  Too bad about #2, though.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Give a man fire and he's warm for a day; set him on fire and he's warm for 
the rest of his life.  -found on the web */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of CM Poncelet
Sent: Friday, March 20, 2020 20:39
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Does anybody remember CLIST?

No, there is no problem with that. I assume you meant "EXECIO 1 DISKR
"ddn1" (STEM foo."
 
The problem happens e.g. if a variable X contains the names of other
variables, which in turn contain the names of yet other variables etc.
etc. which finally - with say names Z1 Z2 Z3 etc. - have values that
need to be accessed. 
 
We can "VPUT X (and all the other variables' names) SHARED" and call an
external exec. It issues "VGET X SHARED" and then "VGET "X" SHARED". But
how does it then VGET the other variables and their values in such way
that they can be processed? The variable names can be VGET as data, but
REXX cannot use data - such as names Z1 Z2 Z3 etc. - as names of
variables (although INTERPRET *might* be able to fix that.)
 
Clist can allocate variable names dynamically, using &'s, and can then
use SYSSCAN to control how many &'s are interpreted. Its problem is it
cannot ADDRESS environments and cannot process binary data, which REXX can.
 
Cheers.
 

On 20/03/2020 04:22, Seymour J Metz wrote:
> I don't see the problem.
>
>/* REXX */
>parse arg upper ddn1 ddn2
>EXECIO DISKR ddn1 1 '(' STEM foo.
>do i=1 to foo.0
>   say 'Line' i 'is' foo.i
>   end
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> CM Poncelet [ponce...@bcs.org.uk]
> Sent: Friday, March 20, 2020 12:07 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Does anybody remember CLIST?
>
> As mentioned above, EXECIO is part of TSO REXX.
>
> The problem is not EXECIO but with reading the records of a dataset
> assigned to an arbitrary DDNAME passed as a parm to REXX.
>
> Consider the folowing:
>
> //*
> //* NOTE: 'U' => TSO USERID(S); SPECIFY LIST OF USERIDS UNDER DESTIDS *
> //* ¯ 'C' -> CONSOLE; SPECIFY MASTER ETC. UNDER CONSIDS   *
> //*   *
> //* 04/01/95 CMP  *
> //*
> //*
> //CLIST   EXEC PGM=IKJEFT01,
> // REGION=512K,
> //*   PARM='%TSOSEND DESTIDS SYSIN USERID'  (DESTLIST=DESTIDS)
> //PARM='%TSOSEND CONSIDS SYSIN CONSOLE' (DESTLIST=CONSIDS)
> //*
> //SYSPROC  DD  DISP=SHR,DSN=
> //SYSTSIN  DD  DUMMY
> //SYSTSPRT DD  SYSOUT=*
> //CONSIDS  DD  *
> 
> //*
> //SYSINDD  *  (all messages below are sent to the console)

Re: Does anybody remember CLIST?

2020-03-22 Thread Bob Bridges
Yes...although on the mainframe this issue isn't quite as critical as it can be 
on other platforms.

There was a time when I considered including in all my REXXes a parm that could 
be evaluated like this:

  arg args; do while args<>''; parse var args arg args; select
  when arg='DBG' then trace 'I'
  when pos('=',arg)>0 then interpret arg  /* <--- initialize any variable 
<--- */
  otherwise call abend 'Unrecognized arg' arg; end; end

I could use this (I thought) to change the default value of ... well, of 
practically anything in the program!  I thought that was pretty useful.

And maybe it would be.  But if I ever called the program with an improperly 
constructed arg like that, I could maybe damage something in ways I could not 
foresee.  And assuming I provided the routine to others, someone could include 
"malware('=')" as one of the arguments and do something even more objectionable.

Now, it's true that on the mainframe such a user could not thus gain access to 
authorities he didn't already have; if his "malware('=')" call would work, then 
he could just call MALWARE himself without going through my exec.  Still, I 
began to have less confidence in my bright idea.  I don't completely eschew 
INTERPRET, but I use it only rarely.

(I do have a REXX named EV (for "evaluate") that's basically just an INTERPRET 
statement; I call it partly as a calculator -

  ==> tso ev 15*75

...and partly as a quick check on the results of a function call:

  ==> tso ev node=mvsvar(sysname)
  ==> tso ev myfunction('XYZ')

But that's about it.)

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* The most important thing a father can do for his children is to love their 
mother.  -Theodore Hesburgh */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Friday, March 20, 2020 21:53

INTERPRET is an invitation to intrusion unless the programmer
strictly controls the source of its operand.  VALUE() somewhat
less so.

--- On Sat, 21 Mar 2020 01:46:07 +, Jackson, Rob wrote:
I'll bite, since no one else has.  What's wrong with Interpret/Value()?  I have 
used both to great benefit before, when there didn't seem to be a good--or 
possible--alternative.  I thought they were both very nice features of the 
language--to be used very sparingly (because I believe they are CPU-costly).  
What other reason not to?  Enlighten me.

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


Re: Does anybody remember CLIST?

2020-03-22 Thread Paul Gilmartin
On Sun, 22 Mar 2020 14:27:53 -0400, Bob Bridges wrote:

>As far as I know there are only two useful tricks CLIST can perform that REXX 
>can't.  Well, maybe three:
>
>1) WRITENR.  So when I really need it, I use an external REXX exec named SAYNR 
>that does the same thing - by calling a CLIST that does a WRITENR.  Works like 
>a champ, but I wouldn't want to try it inside a loop.
>
CHAROUT()?  It seems quaint that so many z/OS utilities don't
accept the reply on the same line as the "Prompt:"

>2) Interacting with subsystems.  In CLIST you can issue FTP commands, for 
>example, evaluate the response and decide where to go from there; REXX handles 
>subsystems as batch, essentially.
>
RXSOCKET?  Lotsa RYO.  And still leaves TSO EDIT.

>3) Dunno whether you'd count this, but CLIST has a neat built-in functionality 
>for evaluating parms.  I get around this by starting every REXX with a SELECT 
>statement that evaluates each space-delimited word in the arg list; it's more 
>complicated, but it means that in most cases I can enter arguments in any 
>order, which pleases me.  Like this (to pick a complex example with many 
>possible arguments):
>
>  fnox=0; fall=0; acid=''; ddnfm=''; ddnto=''
>  arg args; do while args<>''; parse var args arg args; select
>  when arg='DBG' then trace 'I' /* trace mode */
>  when arg='NOX' then fnox=1/* no-execute mode */
>  when abbrev('LISTALL',arg,5) then fall=1  /* turn on list-all mode */
>  when pos('.',arg)>0 then dsn=arg  /* set the DSN */
>  when tgetacid(arg)=0 then acid=arg/* set the ACID */
>  when length(arg)<9 & ddnfm='' then ddnfm=arg  /* from DD */
>  when length(arg)<9 & ddnto='' then ddnto=arg  /* to DD */
>  otherwise call abend 'Unrecognized arg' arg; end; end
>
>The only requirement here regarding argument order is that the From DD has to 
>be named before the To DD; everything else the operator can type in as it 
>happens to occur to him.
>
>This makes my REXX execs a little messy up front, but gives me flexibility 
>that I value.  And anyway I'm used to it now.  Easily worth the extra trouble 
>to get access to the power REXX affords over CLIST.  Too bad about #2, though.
>
At least you don't use INTERPRET.

-- gil

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


Re: Does anybody remember CLIST?

2020-03-22 Thread Seymour J Metz
> As far as I know there are only two useful tricks CLIST can perform that REXX 
> can't.  Well, maybe three:

> 1) WRITENR. 

Not in the TSO environment, but IBM provides the ANSI REXX stream I/O functions 
in the Unix environment.

> 2) Interacting with subsystems.  

That's a biggie, and there's no way to add it with a function package.

> 3) Dunno whether you'd count this, but CLIST has a neat built-in
> functionality for evaluating parms.

Of course it counts, and it's another biggie

> I get around this by starting every REXX with a SELECT statement
> that evaluates each space-delimited word in the arg list;

Member FOO in SYSPROC concatenation:
PROC 1 TYPE MSG(default)
SAY  

%FOO INFO MSG(bar baz)

I'd rather use PCRE or XPARSE and not have to handle the edge cases the hard 
way.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Bob 
Bridges [robhbrid...@gmail.com]
Sent: Sunday, March 22, 2020 2:27 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Does anybody remember CLIST?

As far as I know there are only two useful tricks CLIST can perform that REXX 
can't.  Well, maybe three:

1) WRITENR.  So when I really need it, I use an external REXX exec named SAYNR 
that does the same thing - by calling a CLIST that does a WRITENR.  Works like 
a champ, but I wouldn't want to try it inside a loop.

2) Interacting with subsystems.  In CLIST you can issue FTP commands, for 
example, evaluate the response and decide where to go from there; REXX handles 
subsystems as batch, essentially.

3) Dunno whether you'd count this, but CLIST has a neat built-in functionality 
for evaluating parms.  I get around this by starting every REXX with a SELECT 
statement that evaluates each space-delimited word in the arg list; it's more 
complicated, but it means that in most cases I can enter arguments in any 
order, which pleases me.  Like this (to pick a complex example with many 
possible arguments):

  fnox=0; fall=0; acid=''; ddnfm=''; ddnto=''
  arg args; do while args<>''; parse var args arg args; select
  when arg='DBG' then trace 'I' /* trace mode */
  when arg='NOX' then fnox=1/* no-execute mode */
  when abbrev('LISTALL',arg,5) then fall=1  /* turn on list-all mode */
  when pos('.',arg)>0 then dsn=arg  /* set the DSN */
  when tgetacid(arg)=0 then acid=arg/* set the ACID */
  when length(arg)<9 & ddnfm='' then ddnfm=arg  /* from DD */
  when length(arg)<9 & ddnto='' then ddnto=arg  /* to DD */
  otherwise call abend 'Unrecognized arg' arg; end; end

The only requirement here regarding argument order is that the From DD has to 
be named before the To DD; everything else the operator can type in as it 
happens to occur to him.

This makes my REXX execs a little messy up front, but gives me flexibility that 
I value.  And anyway I'm used to it now.  Easily worth the extra trouble to get 
access to the power REXX affords over CLIST.  Too bad about #2, though.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Give a man fire and he's warm for a day; set him on fire and he's warm for 
the rest of his life.  -found on the web */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of CM Poncelet
Sent: Friday, March 20, 2020 20:39
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Does anybody remember CLIST?

No, there is no problem with that. I assume you meant "EXECIO 1 DISKR
"ddn1" (STEM foo."

The problem happens e.g. if a variable X contains the names of other
variables, which in turn contain the names of yet other variables etc.
etc. which finally - with say names Z1 Z2 Z3 etc. - have values that
need to be accessed.

We can "VPUT X (and all the other variables' names) SHARED" and call an
external exec. It issues "VGET X SHARED" and then "VGET "X" SHARED". But
how does it then VGET the other variables and their values in such way
that they can be processed? The variable names can be VGET as data, but
REXX cannot use data - such as names Z1 Z2 Z3 etc. - as names of
variables (although INTERPRET *might* be able to fix that.)

Clist can allocate variable names dynamically, using &'s, and can then
use SYSSCAN to control how many &'s are interpreted. Its problem is it
cannot ADDRESS environments and cannot process binary data, which REXX can.

Cheers.


On 20/03/2020 04:22, Seymour J Metz wrote:
> I don't see the problem.
>
>/* REXX */
>parse arg upper ddn1 ddn2
>EXECIO DISKR ddn1 1 '(' STEM foo.
>do i=1 to foo.0
>   say 'Line' i 'is' foo.i
>   end
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> CM Poncelet [ponce...@bcs.org.uk]
> Sent: Friday, March 20, 2020 12:07 AM
> To: 

Re: OT: Mandatory Work From Home at my company

2020-03-22 Thread scott Ford
Shmuel,

I have used them remotely connected to the Net then into a Linux box. I had
pretty good luck. The only issue I bumped into was were power outages ,
hard to recover from with a KVM.

Scott

On Sun, Mar 22, 2020 at 1:56 PM Seymour J Metz  wrote:

> I've seen lots of hangs associated with KVM switches.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Bob Bridges [robhbrid...@gmail.com]
> Sent: Sunday, March 22, 2020 1:46 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: OT: Mandatory Work From Home at my company
>
> There was a time when I had three laptops (two of them issued by clients),
> and space was getting tight.  I thought then about buying one of those
> switches, Peter.  A "KVM" switch, is that what it's called (keyboard,
> video,
> mouse)?  I don't remember for sure.  The situation improved before I got
> around to it, but I'm thinking about it again now.  How did it work for
> you?
>
> ---
> Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>
> /* The creditors are a superstitious sect, great observers of set days and
> times.  -Poor Richard */
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Farley, Peter x23353
> Sent: Friday, March 20, 2020 13:01
>
> FWIW, my WFH setup for many years now includes an MS Natural keyboard and a
> comfortable Logitech gaming mouse that I use a USB3 switch to change
> between
> my small work laptop, large home desktop and medium-sized home laptop.
> IOGear makes the USB3 switch, which can handle up to 4 inputs switched
> among
> up to 4 CPU's.  My 27 inch Dell monitor has multiple HDMI and DisplayPort
> inputs so I can switch the screen among all my machines.  Lots of cables of
> course, but it has been well worth it.
>
> --
> 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
>
-- 
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: BatchPipes and TSO Pipes

2020-03-22 Thread scott Ford
Can’t you also use Unix Pipes? Just a thought Lionel

On Sun, Mar 22, 2020 at 1:52 PM Lionel B Dyck  wrote:

> Martin - thank you
>
>
> Lionel B. Dyck <
> Website: http://www.lbdsoftware.com
>
> "Worry more about your character than your reputation.  Character is what
> you are, reputation merely what others think you are." - John Wooden
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of
> Martin Packer
> Sent: Sunday, March 22, 2020 12:43 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: BatchPipes and TSO Pipes
>
> You're best of searching with the string "batchpipeworks" as that's what it
> was called when SmartBatch was created. I believe the term survived into
> BatchPipes/MVS V2.
>
> Not all CMS Pipelines functions are supported.
>
> Cheers, Martin
>
> Martin Packer
>
> zChampion, Systems Investigator & Performance Troubleshooter, IBM
>
> +44-7802-245-584
>
> email: martin_pac...@uk.ibm.com
>
> Twitter / Facebook IDs: MartinPacker
>
> Blog:
> https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker
>
> Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/
> or
>
>
> https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id112794357
> 3?mt=2
> 
>
>
> Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA
>
>
>
> From:   Lionel B Dyck 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date:   22/03/2020 17:24
> Subject:[EXTERNAL] Re: BatchPipes and TSO Pipes
> Sent by:IBM Mainframe Discussion List 
>
>
>
> That telecourse looks outstanding - thank you
>
>
> Lionel B. Dyck <
> Website:
>
> https://urldefense.proofpoint.com/v2/url?u=http-3A__www.lbdsoftware.com=Dw
>
> IFaQ=jf_iaSHvJObTbx-siA1ZOg=BsPGKdq7-Vl8MW2-WOWZjlZ0NwmcFSpQCLphNznBSDQ&
>
> m=pvIHxGgF3aJff3x0OLzJEPZPeaTiZBaOn7cLSXVwS_4=JToobsms7DK2vd66akWU37MZPctq
> GvCvZcJf1BvVpUU=
> 
>
>
> "Worry more about your character than your reputation.  Character is what
> you are, reputation merely what others think you are." - John Wooden
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of
> Dave Jones
> Sent: Sunday, March 22, 2020 11:51 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: BatchPipes and TSO Pipes
>
> You might find this of some use, Lionel :
>  CMS Pipelines Telecourse (an HTML selfstudy course) V1.3
>   https://www.vm.ibm.com/download/packages/descript.cgi?TCVM2
>
> DJ
>
> --
> 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
>
>
>
>
> Unless stated otherwise above:
> IBM United Kingdom Limited - Registered in England and Wales with number
> 741598.
> Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU
>
>
> --
> 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
>
-- 
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: BatchPipes and TSO Pipes

2020-03-22 Thread Lionel B Dyck
Haven't looked into pipes in omvs (unix) but that is an interesting idea.

thx


Lionel B. Dyck <
Website: http://www.lbdsoftware.com

"Worry more about your character than your reputation.  Character is what you 
are, reputation merely what others think you are." - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
scott Ford
Sent: Sunday, March 22, 2020 3:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: BatchPipes and TSO Pipes

Can’t you also use Unix Pipes? Just a thought Lionel

On Sun, Mar 22, 2020 at 1:52 PM Lionel B Dyck  wrote:

> Martin - thank you
>
>
> Lionel B. Dyck <
> Website: http://www.lbdsoftware.com
>
> "Worry more about your character than your reputation.  Character is 
> what you are, reputation merely what others think you are." - John 
> Wooden
>
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Martin Packer
> Sent: Sunday, March 22, 2020 12:43 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: BatchPipes and TSO Pipes
>
> You're best of searching with the string "batchpipeworks" as that's 
> what it was called when SmartBatch was created. I believe the term 
> survived into BatchPipes/MVS V2.
>
> Not all CMS Pipelines functions are supported.
>
> Cheers, Martin
>
> Martin Packer
>
> zChampion, Systems Investigator & Performance Troubleshooter, IBM
>
> +44-7802-245-584
>
> email: martin_pac...@uk.ibm.com
>
> Twitter / Facebook IDs: MartinPacker
>
> Blog:
> https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker
>
> Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/ 
> or
>
>
> https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id112
> 794357
> 3?mt=2
>  27943573?mt=2>
>
>
> Youtube channel: 
> https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA
>
>
>
> From:   Lionel B Dyck 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date:   22/03/2020 17:24
> Subject:[EXTERNAL] Re: BatchPipes and TSO Pipes
> Sent by:IBM Mainframe Discussion List 
>
>
>
> That telecourse looks outstanding - thank you
>
>
> Lionel B. Dyck <
> Website:
>
> https://urldefense.proofpoint.com/v2/url?u=http-3A__www.lbdsoftware.co
> m=Dw
>
> IFaQ=jf_iaSHvJObTbx-siA1ZOg=BsPGKdq7-Vl8MW2-WOWZjlZ0NwmcFSpQCLphNz
> nBSDQ&
>
> m=pvIHxGgF3aJff3x0OLzJEPZPeaTiZBaOn7cLSXVwS_4=JToobsms7DK2vd66akWU37
> MZPctq
> GvCvZcJf1BvVpUU=
>  om=DwIFaQ=jf_iaSHvJObTbx-siA1ZOg=BsPGKdq7-Vl8MW2-WOWZjlZ0NwmcFSp
> QCLphNznBSDQ=pvIHxGgF3aJff3x0OLzJEPZPeaTiZBaOn7cLSXVwS_4=JToobsms7
> DK2vd66akWU37MZPctqGvCvZcJf1BvVpUU=>
>
>
> "Worry more about your character than your reputation.  Character is 
> what you are, reputation merely what others think you are." - John 
> Wooden
>
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Dave Jones
> Sent: Sunday, March 22, 2020 11:51 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: BatchPipes and TSO Pipes
>
> You might find this of some use, Lionel :
>  CMS Pipelines Telecourse (an HTML selfstudy course) V1.3
>   
> https://www.vm.ibm.com/download/packages/descript.cgi?TCVM2
>
> DJ
>
> --
> 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
>
>
>
>
> Unless stated otherwise above:
> IBM United Kingdom Limited - Registered in England and Wales with 
> number 741598.
> Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 
> 3AU
>
>
> --
> 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
>
--
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

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


Re: Does anybody remember CLIST?

2020-03-22 Thread Bob Bridges
I said "useful" tricks, knowing that CLIST has its own list of specialty items. 
 Maybe "important" would have been a better word; it's what I was thinking.  It 
isn't hard to get REXX to complain if certain arguments aren't provided; I 
usually do it like this:

  acid=''
  arg args; do while args<>''; parse var args arg args; select
  when arg='DBG' then trace 'I' /* trace mode */
  when tgetacid(arg)=0 then acid=arg/* set the ACID */
  otherwise call abend arg'?','Unrecognized arg' arg; end; end
  if acid='' then call abend 'No ACID!',"You're supposed to supply an ACID",
'for me to work with.'

Of course, importance is in the eye of the beholder.  But I gave only honorable 
mention to CLIST's very convenient argument parser; this doesn't make the cut, 
in my beholding.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* I never noticed them actually using English words in the finals of the 
spelling bee.  They seem to have reached a point where the spellers can spell 
all the English words and have moved on to words from around the world that may 
once have been used in an English sentence.  -Dogsbody at Norton's Patrick 
O'Brian forum */

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Spiegel
Sent: Sunday, March 22, 2020 14:30

How about the ability to force the caller to supply a specific number of 
arguments?

--- On 2020-03-22 14:27, Bob Bridges wrote:
> As far as I know there are only two useful tricks CLIST can perform that REXX 
> can't.  Well, maybe three:
>
> 1) WRITENR.  So when I really need it, I use an external REXX exec named 
> SAYNR that does the same thing - by calling a CLIST that does a WRITENR.  
> Works like a champ, but I wouldn't want to try it inside a loop.
>
> 2) Interacting with subsystems.  In CLIST you can issue FTP commands, for 
> example, evaluate the response and decide where to go from there; REXX 
> handles subsystems as batch, essentially.
>
> 3) Dunno whether you'd count this, but CLIST has a neat built-in 
> functionality for evaluating parms.  I get around this by starting every REXX 
> with a SELECT statement that evaluates each space-delimited word in the arg 
> list; it's more complicated, but it means that in most cases I can enter 
> arguments in any order, which pleases me.  Like this (to pick a complex 
> example with many possible arguments):
>
>fnox=0; fall=0; acid=''; ddnfm=''; ddnto=''
>arg args; do while args<>''; parse var args arg args; select
>when arg='DBG' then trace 'I' /* trace mode */
>when arg='NOX' then fnox=1/* no-execute mode */
>when abbrev('LISTALL',arg,5) then fall=1  /* turn on list-all mode 
> */
>when pos('.',arg)>0 then dsn=arg  /* set the DSN */
>when tgetacid(arg)=0 then acid=arg/* set the ACID */
>when length(arg)<9 & ddnfm='' then ddnfm=arg  /* from DD */
>when length(arg)<9 & ddnto='' then ddnto=arg  /* to DD */
>otherwise call abend 'Unrecognized arg' arg; end; end
>
> The only requirement here regarding argument order is that the From DD has to 
> be named before the To DD; everything else the operator can type in as it 
> happens to occur to him.
>
> This makes my REXX execs a little messy up front, but gives me flexibility 
> that I value.  And anyway I'm used to it now.  Easily worth the extra trouble 
> to get access to the power REXX affords over CLIST.  Too bad about #2, though.
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of CM Poncelet
> Sent: Friday, March 20, 2020 20:39
>   
> Clist can allocate variable names dynamically, using &'s, and can then
> use SYSSCAN to control how many &'s are interpreted. Its problem is it
> cannot ADDRESS environments and cannot process binary data, which REXX can.

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


Re: BatchPipes and TSO Pipes

2020-03-22 Thread Paul Gilmartin
On Sun, 22 Mar 2020 16:20:41 -0500, Lionel B Dyck wrote:

>Haven't looked into pipes in omvs (unix) but that is an interesting idea.
> 
You'll find a collection of utilities quite different from what you're used to.

It's tediious but possible to use omvs pipes to connect Classic OS utilities.
No one has shown me that TSO Pipelines can connect omvs utilities.

-- gil

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


Re: Mandatory Work From Home at my company

2020-03-22 Thread Timothy Sipples
Paul Gilmartin wrote:
>Do you mean that VPN clients for mainframe are rare?

Tony Thigpen wrote:
>I would not even think about a VPN client for the mainframe.

Too late, Tony. :-) The base z/OS operating system includes IPSec IKEv2 
support. Details are available here (z/OS 2.4 link, subject to change):

https://www.ibm.com/support/knowledgecenter/SSLTBW_2.4.0/com.ibm.zos.v2r4.halz002/security_ipsec_vpn.htm

The commercial product SSH Tectia Server for IBM z/OS supports SSH 
tunneling.

There are many VPN clients/servers for Linux on Z and LinuxONE. One the 
latest and now fashionable ones is called WireGuard. Installation details 
are available here:

https://www.wireguard.com/install/

Checking the various Linux distributions for IBM Z and LinuxONE, WireGuard 
is at least available for Ubuntu Linux Server and Debian Linux, probably 
others too.

- - - - - - - - - -
Timothy Sipples
I.T. Architect Executive
Digital Asset & Other Industry Solutions
IBM Z & LinuxONE
- - - - - - - - - -
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 anybody remember CLIST?

2020-03-22 Thread Bob Bridges
Gil, I can't tell whether you're suggesting more things that CLIST can do that 
REXX cannot, or things that REXX can do even though I said it cannot.  a) I 
don't know what CHAROUT is, but it sounds like the same issue as WRITENR.  Or 
are you saying it's some sort of REXX function that can imitate CLIST's 
WRITENR?  b) I don't know what "RYO" is either ("rite your own"?), but unless 
I'm thinking of something different, RXSOCKET isn't trick CLIST can do that 
REXX cannot; I used it to write a socket server (and a separate client) in 
REXX.  And c) TSO EDIT isn't an exception to what I wrote, it's a perfect 
example of #2 below, a subsystem that CLIST can interact with dynamically (if 
that's the word) and REXX cannot.  Exactly what I was talking about, although I 
used FTP as my example because FTP is what I've encountered most recently.  I 
haven't used TSO Edit in ... well, must be the early '80s at the latest, maybe 
the late '70s.

So what am I missing?

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* In religion, as in war and everything else, comfort is the one thing you 
cannot get by looking for it.  If you look for truth, you may find comfort in 
the end; if you look for comfort you will not get either comfort or truth — 
only soft soap and wishful thinking to begin with and, in the end, despair.  
-CS Lewis in _The Case for Christianity_ */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Sunday, March 22, 2020 15:06

--- On Sun, 22 Mar 2020 14:27:53 -0400, Bob Bridges wrote:
>As far as I know there are only two useful tricks CLIST can perform that REXX 
>can't.  Well, maybe three:
>
>1) WRITENR.  So when I really need it, I use an external REXX exec named SAYNR 
>that does the same thing - by calling a CLIST that does a WRITENR.  Works like 
>a champ, but I wouldn't want to try it inside a loop.
>
CHAROUT()?  It seems quaint that so many z/OS utilities don't
accept the reply on the same line as the "Prompt:"

>2) Interacting with subsystems.  In CLIST you can issue FTP commands, for 
>example, evaluate the response and decide where to go from there; REXX handles 
>subsystems as batch, essentially.
>
RXSOCKET?  Lotsa RYO.  And still leaves TSO EDIT.

>3) Dunno whether you'd count this, but CLIST has a neat built-in functionality 
>for evaluating parms.  I get around this by starting every REXX with a SELECT 
>statement that evaluates each space-delimited word in the arg list; it's more 
>complicated, but it means that in most cases I can enter arguments in any 
>order, which pleases me.  Like this (to pick a complex example with many 
>possible arguments):
>
>  fnox=0; fall=0; acid=''; ddnfm=''; ddnto=''
>  arg args; do while args<>''; parse var args arg args; select
>  when arg='DBG' then trace 'I' /* trace mode */
>  when arg='NOX' then fnox=1/* no-execute mode */
>  when abbrev('LISTALL',arg,5) then fall=1  /* turn on list-all mode */
>  when pos('.',arg)>0 then dsn=arg  /* set the DSN */
>  when tgetacid(arg)=0 then acid=arg/* set the ACID */
>  when length(arg)<9 & ddnfm='' then ddnfm=arg  /* from DD */
>  when length(arg)<9 & ddnto='' then ddnto=arg  /* to DD */
>  otherwise call abend 'Unrecognized arg' arg; end; end
>
>The only requirement here regarding argument order is that the From DD has to 
>be named before the To DD; everything else the operator can type in as it 
>happens to occur to him.
>
>This makes my REXX execs a little messy up front, but gives me flexibility 
>that I value.  And anyway I'm used to it now.  Easily worth the extra trouble 
>to get access to the power REXX affords over CLIST.  Too bad about #2, though.
>
At least you don't use INTERPRET.

-- gil

--
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: OT: Mandatory Work From Home at my company

2020-03-22 Thread Bob Bridges
I'd be interested in hearing a quick review, Steve, once you've tried it out
and have an opinion.  I don't know how serious I am about it, but it sounds
convenient.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* That sort of wit which employs itself insolently in criticizing and
censuring the words and sentiments of others in conversation is absolute
folly; for it answers none of the ends of conversation.  He who uses it
neither improves others, is improved himself, nor pleases anyone.  -Poor
Richard's Almanack, 1756 */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Steve Beaver
Sent: Sunday, March 22, 2020 13:06

I ordered the following from amazon 

UGREEN USB 3.0 Sharing Switch Selector 4 Port 2 Computers Peripheral
Switcher Adapter Hub for PC, Printer, Scanner, Mouse, Keyboard with One
Button Sw

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