Re: z/OS ssh git issue

[Lionel Dyck]

I have z/OS git working on at least 5 other z/OS systems - this one is the 
anomaly.

_
Lionel B. Dyck 
Senior Software Engineer
21st Century Software
940 West Valley Road
Suite 1604
Wayne, PA 19087
www.21stcenturysoftware.com

lion...@21csw.com
(800) 555-6845  x610
(610) 710-4832 – Office

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Saturday, February 27, 2021 2:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: z/OS ssh git issue

On Sat, 27 Feb 2021 14:36:56 -0600, Lionel B Dyck wrote:

>Dave - that it does - but what we haven't figured out is why ☹
>
I have had success with other FOSS (not git) fetching tarballs, .zip, or .bz2 
to a Solaris server; unpacking on a Solaris server; NFS sharing to z/OS with 
OEMVS311 translation.

>-Original Message-
>From:  Gibney, Dave
>Sent: Saturday, February 27, 2021 2:32 PM
>
>Looks like ASCII to me

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
This e-mail (including any attachments) may contain privileged, confidential, 
proprietary, private, copyrighted, or other legally protected information. The 
information is intended to be for the use of the individual or entity 
designated above. If you are not the intended recipient (even if the e-mail 
address above is yours), please notify us by return e-mail immediately, and 
delete the message and any attachments. Any disclosure, reproduction, 
distribution or other use of this message or any attachments by an individual 
or entity other than the intended recipient is prohibited.

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

Re: REXX Compiler

[Lionel Dyck]

Good point that I missed in the doc - catch 22 isn't it.  Too bad IBM doesn't 
include the REXX compiler (and TSO Pipes) with z/OS by default 

_
Lionel B. Dyck  
Senior Software Engineer 
21st Century Software
940 West Valley Road
Suite 1604
Wayne, PA 19087
www.21stcenturysoftware.com

lion...@21csw.com
(800) 555-6845  x610
(610) 710-4832 – Office

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Charles Mills
Sent: Thursday, January 28, 2021 12:19 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX Compiler

Ah! Right you are.

But NOSLINE disables SOURCELINE and full Rexx TRACE, and more importantly 
prevents execution with the alternate library, that is, prevents execution 
unless the target system licenses (pays for) the full library.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lionel B Dyck
Sent: Thursday, January 28, 2021 10:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX Compiler

There are two compiler options in the IBM Compiler - SLINE and NOSLINE - use of 
NOSLINE will prevent the sourcelines from being included in the load module. 

--
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: Can System REXX run Sub=MSTR ??

[Lionel Dyck]

You are correct - AXR itself runs under MSTR but the spawned AXR## are running 
under JES.

That is what I meant to ask but my thinking at the time was it all ran under 
JES until you asked your question.


Lionel B. Dyck 
Senior Software Engineer 
21st Century Software
940 West Valley Road
Suite 1604
Wayne, PA 19087
www.21stcenturysoftware.com


lion...@21csw.com
(800) 555-6845  x610
(610) 710-4832 – Office

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jackson, Rob
Sent: Friday, August 21, 2020 7:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Can System REXX run Sub=MSTR ??

At our house, System REXX already runs under MSTR (under 2.2 and 2.4); we never 
did anything to make it that way that I remember.  I'm more curious what you 
all did to make it _not_ run under MSTR.  Do you have an AXR proc?  If so, does 
it have SYSOUT in it?

First Horizon Bank
Mainframe Technical Support


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Barbara Nitz
Sent: Friday, August 21, 2020 3:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Can System REXX run Sub=MSTR ??

[External Email. Exercise caution when clicking links or opening attachments.]

>Just add a "FORCE AXR,ARM" command to your shutdown automation.

That would require RACF to allow automation to issue a force command (yes, I 
know I can set it MVS.FORCEARM.STC.AXR*.* specifically). I have been at great 
pains to install a policy where Automation is not even allowed to cancel, much 
less force anything. Not that I am very successful now that I'm not responsible 
for RACF anymore.

I still think that AXR and its AXRnn should show up on a D A,L. As long as they 
run under the JES subsystem.

Regards, Barbara

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN Confidentiality 
notice: 
This e-mail message, including any attachments, may contain legally privileged 
and/or confidential information. If you are not the intended recipient(s), or 
the employee or agent responsible for delivery of this message to the intended 
recipient(s), you are hereby notified that any dissemination, distribution, or 
copying of this e-mail message is strictly prohibited. If you have received 
this message in error, please immediately notify the sender and delete this 
e-mail message from your computer.


--
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: COPYING PDS TO PDS ...

[Lionel Dyck]

PDSE's support member generations but you don't see IBM's ISPF, utilities, JCL, 
etc. supporting them.  Thinking that when one part of IBM does something that 
another part will take advantage may have worked 30 years ago but this isn't 
the IBM that we grew up with.

And the PDS command is open source so feel free to contact John Kalinich and 
I'm sure he would love the help of anyone who wanted to provide the case 
insensitivity capabilities to it.


Lionel B. Dyck 
Senior Software Engineer 
21st Century Software
940 West Valley Road
Suite 1604
Wayne, PA 19087
www.21stcenturysoftware.com

lion...@21csw.com
(800) 555-6845  x610
(610) 710-4832 – Office

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Charles Mills
Sent: Tuesday, December 3, 2019 12:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COPYING PDS TO PDS ...

That's the point. z/OS PDS(E) *does* already support mixed-case member names.

Silly for a utility to defeat their usage. If IBM found the capability useful 
for SMP, certainly others might find the capability useful as well.

Silly for JCL to defeat their usage too, but that's a different thread.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lionel B Dyck
Sent: Tuesday, December 3, 2019 10:47 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COPYING PDS TO PDS ...

While mixed case dataset names, mixed case member names, etc. would be nice, 
that would require a major update to z/OS that I don't see IBM doing. At least 
with OMVS you can have mixed case directories and file names - and 
OEdit/OBrowse work with them - even ISPF Browse/Edit/View will. Then there is 
OSHELL and the better UDList (3.17).  Not much else in native ISPF supports the 
OMVS.

It is what it is and we work within those constraints. We can hope that someday 
IBM will enhance the system for many additional capabilities and if they do I 
suspect many of us will be long gone from IT, if not long gone from this planet.

--
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: Share Website

[Lionel Dyck]

Loaded fine for me


Lionel B. Dyck 
Senior Software Engineer 
21st Century Software
940 West Valley Road
Suite 1604
Wayne, PA 19087
www.21stcenturysoftware.com

lion...@21csw.com
(800) 555-6845  x610
(610) 710-4832 – Office

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mark Jacobs
Sent: Thursday, November 21, 2019 8:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Share Website

Is www.share.org loading for you? I'm getting an internal server error message.

Mark Jacobs

Sent from [ProtonMail](https://protonmail.com), Swiss-based encrypted email.

GPG Public Key - 
https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com

--
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: listcat with only dsn

[Lionel Dyck]

I suggest getting  a copy of SYS1.SAMPLIB(IGGCSIRX) and with a few simple 
changes you can get what you want quick and easy.


Lionel B. Dyck 
Senior Software Engineer 
21st Century Software

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Elaine Beal
Sent: Thursday, June 27, 2019 9:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: listcat with only dsn

I need to generate a listcat with only the dsn. like in 3.4 but I want it in a 
dataset with ONLY the dsn.
TSO SAVE and IDCAMS produce additional lines.
Any recommendations?

Thanks,
Elaine

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

ISPF Development Tips and Tricks package updated

[Lionel Dyck]

The ISPF Development Tips and Tricks package has been updated to release 1.1 
and is now available on my personal website at 
www.lbdsoftware.com for all to enjoy.

This update incorporates several updates suggested by the readers of the 
initial 1.0 release. Both the documentation and the sample code are updated.


Lionel B. Dyck 



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

Re: ADRDSSU

[Lionel Dyck]

On the RESTORE you can add NMC and NSC - no management class and no storage 
class.

Hope that helps (no guarantee as I haven't tried it).


Lionel B. Dyck 
Senior Software Engineer 
21st Century Software
From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Nai, Dean
Sent: Wednesday, May 29, 2019 12:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: ADRDSSU

Hi,

   Running a DR test. Trying to restore an SMS managed dataset on a floor 
system that isn't SMS managed. Getting message ADR709E because it's looking for 
a storage class that doesn't exist on the floor system. Any parameters needed? 
Any thoughts would be appreciated. 


Dean Nai




>

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

Finally Logic and Sanity for Passwords

[Lionel Dyck]

https://www.computerworld.com/article/3391365/microsoft-tells-it-admins-to-nix-obsolete-password-reset-practice.html#tk.rss_all

snip:
Like Microsoft and NIST, Pescatore thought periodic password resets are the 
hobgoblins of little minds. "Having [this] as part of the baseline makes it 
easier for security teams to claim compliance, because auditors are happy," 
Pescatore said. "Focusing on password reset compliance was a huge part of all 
the money wasted on Sarbanes-Oxley audits 15 years ago. Great example of how 
compliance does not*equal security."*



Lionel B. Dyck 
Senior Software Engineer
21st Century Software
www.21stcenturysoftware.com
>From the Leaders in Data Stewardship(tm)

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU


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

Re: ISPF development tips and tricks

[Lionel Dyck]

MS Word because that’s what I’m writing the doc in 

I’ll consider ISO

—
Lionel B. Dyck 
Senior Software Engineer
21st Century Software
940 West Valley Road
Suite 1604 
Wayne, PA 19087

www.21stcenturysoftware.com<https://urldefense.proofpoint.com/v2/url?u=http-3A__www.21stcenturysoftware.com=DwMFAw=jf_iaSHvJObTbx-siA1ZOg=O9Yt-0q7UsiUaBSmIwennw=ze6XIIO6XqAm_rFtn1zF8hbYK-3sN7_ZCV0uDjSUFWI=C0xITJTTxnixxEtO9UXS82AE82iV9VszD9838jfcEcs=>
yourem...@21csw.com<mailto:da...@21csw.com>

(800) 555-6845
(610) 971-4832 - Office

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

On Apr 22, 2019, at 3:31 PM, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu<mailto:000433f07816-dmarc-requ...@listserv.ua.edu>>
 wrote:

On Mon, 22 Apr 2019 12:09:07 +, Lionel Dyck wrote:

You requested:

1) Please add LibreOffice's .ODT as a allowable format (LO can even produce 
"fat" PDFs, that contain the .ODT)

---> I will add that flavor with the next edition/version (after checking 
that MS Word can create that kind of document)

Why should MS Word be the parameter?  Does ISPF invoke MSW for its processing?

2) Please use international standard dates on pages: ISO 8601 (-mm-dd), and 
not the completely and utterly illogical US-only mm/dd/ format!

> In the next iteration the date in the footer will be month dd,  - 
hope that is better

No.  ISO 8601 is the international standard.  Follow it; don't be anglocentric.
   https://xkcd.com/1179/

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu<mailto: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: ISPF development tips and tricks

[Lionel Dyck]

You requested:

1) Please add LibreOffice's .ODT as a allowable format (LO can even produce 
"fat" PDFs, that contain the .ODT)

---> I will add that flavor with the next edition/version (after checking 
that MS Word can create that kind of document)

2) Please use international standard dates on pages: ISO 8601 (-mm-dd), and 
not the completely and utterly illogical US-only mm/dd/ format!

> In the next iteration the date in the footer will be month dd,  - 
hope that is better

The next edition/version will not be published until I get additional chapters 
or sub-chapters, with examples, and right now I'm running on empty in that area.


Lionel B. Dyck 
Senior Software Engineer 
21st Century Software

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Robert Prins
Sent: Friday, April 19, 2019 9:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ISPF development tips and tricks

On 2019-04-19 14:10, Lionel B. Dyck wrote:
> I am announcing a new, free, ebook with usable examples for all ISPF 
> developers with tips and tricks to jump start or improve your dialog writing.
> It is 70+ pages and the zip includes to doc in pdf, ePub, and mobi 
> formats so you can read it anywhere (or go old school and print it). 
> Upload the included samples PDS, provided in xmit format, and look at the 
> code.
 >
> This is not a stand alone doc, you’ll still need the IBM pubs to delve 
> into the full capabilities of the ISPF services.
> 
> It is also a work in progress, meaning if you would like to contribute 
> a chapter, with examples, then please do so - see the section on 
> contributing on how to do that.
> 
> Go to www.lbdsoftware.com and you can download it.
> 
> Enjoy

1) Please add LibreOffice's .ODT as a allowable format (LO can even produce 
"fat" PDFs, that contain the .ODT)

2) Please use international standard dates on pages: ISO 8601 (-mm-dd), and 
not the completely and utterly illogical US-only mm/dd/ format!

Robert
--
Robert AH Prins
robert.ah.prins(a)gmail.com

--
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: JCL for WTO

[Lionel Dyck]

Many sites have a program that takes as a parm the WTO message. I’m sure one 
can be found on the CBT tape.


Lionel B. Dyck 
Senior Software Engineer
21st Century Software

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

Sent from my iPad

On Apr 6, 2019, at 2:32 PM, Bill Giannelli 
mailto:billgianne...@gmail.com>> wrote:

can you run a WTO command directly from JCL?
I want to execute a WTO directly from my job.
thanks
Bill

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

SDSF Edit Function Key disappointment

[Lionel Dyck]

I've not used SDSF for a number of years but now I am and I have found a 
disconnect between the way SDSF works and the say every other ISPF application 
works when in Edit.

When using SJ or SE any user of ISPF Edit will expect F6 to be RCHANGE - but it 
isn't. It is defined as blank. F5 is defined as RFIND, which is expected as are 
other function keys.

What is different for Repeat Change?

True the user can always use the KEYS command and change the definition of F6 
to RCHANGE, or the user can just bite the bullet and do a change all.

BUT WHY?


Lionel B. Dyck 
Senior Software Engineer
21st Century Software

>From the Leaders in Data Stewardship(tm)

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU


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

Re: CSSMTP attachment as PDF

[Lionel Dyck]

No hate 


Lionel B. Dyck 
Senior Software Engineer 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Nims,Alva John (Al)
Sent: Wednesday, March 27, 2019 8:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: CSSMTP attachment as PDF

Actually, for the PDF creation option, you need to download both XMITIP AND 
TXT2PDF, the XMITIP package no longer contains the TXT2PDF package, so I would 
recommend this webpage, also Lionel's web page, but just a little higher up:

http://www.lbdsoftware.com/index.htm

Note: Lionel is going to hate me for this, but there appears to be a little bug 
when you attempt to use the option: "FORMAT (PDF/DS: ...)"  [Specifying a Data 
Set that contains the PDF configuration file, I had to put the configuration in 
a DD and then use, "FORMAT (PDF/DD: ...)".

Al Nims
Systems Admin/Programmer III
UF Information Technology
720 Bld. 3rd Floor, #9
P.O. Box 112050
Gainesville, FL. 32611
(e) ajn...@ufl.edu 
(p) (352) 273-1298


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Gadi Ben-Avi
Sent: Wednesday, March 27, 2019 6:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: CSSMTP attachment as PDF

There is a utility called XMITIP that send email with attachments.
https://urldefense.proofpoint.com/v2/url?u=http-3A__www.lbdsoftware.com_xmitip.html=DwIGaQ=sJ6xIWYx-zLMB3EPkvcnVg=O7pcwLlWwta39a92GW-AQQ=C_ltFaF8c-SxZT_QxD9S8MS8XBI2PWMbQe7lheKhBR4=zQoWrPQfLMOT0gQi77s3STK5VdRTTLvxWyDhr0y6wCc=
Gadi

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter
Sent: Wednesday, March 27, 2019 12:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: CSSMTP attachment as PDF

Hi

Cross posted

Does anyone have sample JCL to send mainframe dataset using CSSMTP PDS member 
with PDF extension ?

Peter

--
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: Vacation over, back to work

[Lionel Dyck]

Congratulations - vacations are overstated anyway 

Best of luck in your new gig.


Lionel B. Dyck 
Senior Software Engineer 
21st Century Software

From the Leaders in Data Stewardship™

THIS E-MAIL MAY CONTAIN PRIVILEGED, CONFIDENTIAL, COPYRIGHTED, OR OTHER LEGALLY 
PROTECTED INFORMATION. IF YOU ARE NOT THE INTENDED RECIPIENT (EVEN IF THE 
E-MAIL ADDRESS ABOVE IS YOURS), YOU MAY NOT USE, COPY, OR RE-TRANSMIT IT. IF 
YOU HAVE RECEIVED THIS BY MISTAKE PLEASE NOTIFY US BY RETURN E-MAIL, THEN 
DELETE. THANK YOU

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mark Jacobs
Sent: Tuesday, March 26, 2019 7:06 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Vacation over, back to work

After a two month paid vacation when my previous job ended on January 31st 
2019, I'm very happy to begin my next adventure as a Senior Systems Programmer 
with ASG Technologies beginning April 1st.

Mark Jacobs

Sent from [ProtonMail](https://protonmail.com), Swiss-based encrypted email.

GPG Public Key - 
https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com

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

TSO Help - ISPF Dialog

[Lionel Dyck]

I have released a new ISPF Dialog called ZTSOHELP that presents a searchable
table of TSO Help entries with descriptions.

 

Sample (non graphic as IBM-Main does not allow graphics)

 

Command:  L cmd -Locate  RL - Repeat Locate  O str - Only R -
Refresh

  S cmd -Select  SE - Set Viewer SOrt col A/D - Sort

Line: S -Select

 

Sel  Command   Component  Description

_ACCOUNT TSO  Modify/add/delete user attributes in UADS

_ADDGROUPRACF Add group profile

_ADDSD   RACF Add data set profile

_ADDUSER RACF Add user profile

 

I received a compliment from one site that appears to really like it:

 

ZTSOHELP is the whipped cream on my Hagan Daaz!

 

You can find it at www.lbdsoftware.com   along
with other free, open source (yes there is z/OS open source) tools

 

LIonel


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

Exploiting PDSE V2 Member Generations, plus

[Lionel Dyck]

I have posted an update on my website to PDSEGEN - get it at
www.lbdsoftware.com  

 

If you haven't tried PDSEGEN then you should check it out - it's free and
works and allows the user to take full advantage of the PDSE V2 member
generations capability (providing that generations have been enabled in
parmlib).

 

I've also posted some new tools:

 

ZTSOHELP is an ISPF dialog to simplify the challenge of finding information
on available TSO commands.

 

OMVSMAN is an ISPF dialog to simplify the challenge of finding information
on the available OMVS commands.

 

Enjoy - note you can also find these on the CBTTape (www.cbttape.org
 ) 

 

 

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

New ISPF command - SETCLIP

[Lionel Dyck]

I've just posted a new tool to www.lbdsoftware.com
  for y'all.

 

SETCLIP is an ISPF dialog that makes it easy for a user to create from


one to ten (the ISPF max) ISPF Edit Clipboards from existing datasets


for use during the ISPF session.


 


The dialog has two modes that are determined by how the command is


called.


 


Mode 1:  Define, or update, user clipboards


 


This mode is enabled when the SETCLIP command is invoked without any


parameters and will display an ISPF panel on which the user enters:


 


   - Clipboard Name


   - Dataset Name where the clipboard data resides


   - Optional Starting and/or Ending records to be copied into the


 clipboard


 


The Clipboard name is a 1 to 8 character name that must follow the


standard PDS member naming convention.


 


The Dataset name is the dataset, or dataset member, where the data is


located to be copied into the clipboard.


 


The starting and ending record numbers are optional. If not specified


then all records are copied into the clipboard.


 


Usage note:  By using the starting and ending record numbers the user


can have one dataset with data for multiple clipboards in it.


 


When the clipboards are defined the ENTER key will create, or update,


the active clipboards. PF3 will update and then exit while CANCEL will


exit without making any updates.


 


Mode 2: Create clipboards only


 


This mode is enabled when the SETCLIP command is invoked with any


non-blank parameter and will process the defined clipboard information


to create the clipboards.


 


This mode is designed to be used out of the ISPF ZSTART process that


runs when ISPF starts so that the clipboards are available for any


ISPF Edit session during the current ISPF session.


 



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

PDSEGEN Update

[Lionel Dyck]

For those working with, or experimenting, with PDSE Version 2 Member
Generations there is nothing better than PDSEGEN (at least for the price).

 

PDSEGEN is an ISPF dialog that works makes working with Member Generations
easy and intuitive. Included with PDSEGEN is the ability to Backup all
member and generations, retaining all ISPF statistics, to a normal PDS that
can be processed by any software that works with a PDS (e.g. IEBCOPY, TSO
Transmit, etc.). There is a Restore capability to restore the backup PDS to
a PDSE with all members and generations in tact. Another tool included is
the ability to Copy PDSE members with their generations.  In addition to
those you can Browse and View any member or generation, Edit the base member
(edit is prevented on non-0 generations until JCL and dynamic allocation
enable access to them at which point PDSEGEN can be changed to allow Edit on
non-0 generations. The capability is also provided to compare 2 generations
(non-0 to 0 and non-0 to non-0). And more.

 

I've just posted version 3.8 to www.lbdsoftware.com
  and it has the following updates:

 

  Version 3.8   August 05, 2016


 - ASM changes


   PDSEGDEL   - Added as a REXX function to delete members and


member generations (not to be used for non member


generation enabled datasets)


 - Exec changes


   $RECV  - Updated to properly handle the source dataset name


   PDSEGEN- Update locate routine when member not located


  - update reName newname to mbr


  - correction for null tso prefix users


  - use PDSEGEL to delete members/generations if the


generations are enabled


- used in the rename routine as well


  - LMMDEL will be used for non-generation enabled


datasets


  - fix bug in rename and recover thx to Bill Fleury


   PDSEGENC   - correction for null tso prefix users


 - Misc changes


   $RECV  - Correction for received dsn


   $INSTALL   - Added


 - Panel changes


   PDSEGH0- Correction for abbreviation comment


  - Add Delete to the Rename tutorial panel


   PDSEGHR- Add some more info to restrictions


   PDSEGHRN   - Add Delete to the Rename tutorial panel


   PDSEGHT- Add tip on use of delete 


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

PDSEGEN 3.7 Posted

[Lionel Dyck]

Check out the latest version of PDSEGEN which you can download from
www.lbdsoftware.com  

 

This tool is getting great feedback as a tool that makes PDSE Member
Generations accessible and usable.  

 

Try it - You'll Like It :)

 

The updates are: 

 
 
  Version 3.7   August 2, 2016
 - Exec changes
   GNAME  - ISPF Edit command (macro) added based on suggestion
from John Kalinich.
* Use in PDSEGBAK PDS on backup member to find
  real member name and generation information
   PDSEGEN- Update to change the color of the sorted column
Thanks to a suggestion from Bruce Koss
  - allow sort field-name order (order = a or d)
  - add new SET command to change line selection S
action (browse, edit, or view)
  - Remove Control Display Save/Restore as not needed
in some places
  - Changed to use NEWAPPL(PDSE)
  - Support SORT ? as a command to display the SORT
popup information
  - Add C command to change to a different dataset.
  - If Find in a backup pds use alternate find
routine Thanks to John Kalinch
   PDSEGENS   - Add base_color and sort_color defaults
   PDSEGFND   - New exec for find within backup PDS
 - Panel changes
   PDSEGENT   - Update for dynamic colors for sorted columns
   PDSEGHBR   - Update for new GNAME command info
   PDSEGHF- Update to add command abbreviation
   PDSEGHFS   - Update to add command abbreviation
   PDSEGHR- Updates to restrictions
   PDSEGHT- Add FTP to the list of restrictions
   PDSEGHU- Added to document unsupported products
   PDSEGH0- Updated for PDSEGH8
   PDSEGH10   - Renamed from PDSEGH15
   PDSEGH11   - Added for the C command
   PDSEGH2- Update to add command abbreviation
   PDSEGH4- Update to add command abbreviation
   PDSEGH5- Update to add command abbreviation
   PDSEGH6- Update for sort order
   PDSEGH8- Added for SET command help
   PDSEGH9- Added for Validate command
   PDSEGSET   - Added for SET command

 

 

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

PDSE Member Generation ISPF Application

[Lionel Dyck]

Here is the latest update of PDSEGEN just in time for SHARE.
 
You can download it from www.lbdsoftware.com 
or www.cbttape.org   (updates page file 312)
 
I think this is a very useful tool that finally makes it very
easy to take advantage of PDSE member generations. It isn't
perfect but it does a lot.
 
Comments, suggestions, corrections, etc. (including occasional
constructive criticisms) welcome.
 
The list of changes include:
 
  Version 3.5   July 28, 2016
 - Exec changes
   PDSEGEN- Fix member display list
  - Dynamically get the system maxgen limit and
use it for the COPY operation
   PDSEGBAK   - Update to check system maxgen limit and compare
to $ALLOC maxgen value. If $ALLOC value is greater
then use system limit and inform user.
   PDSEGENC   - Correction if used to copy a non-generation enabled
PDS
 - Panel changes
   PDSEGHAU   - update version
   PDSEGHCG   - update change history
   PDSEGCPY   - Add system maxgen limit and verify the range
if the maxgen changed
   PDSEGENT   - Add REINIT(ZCMD)
 
Some ways to use it besides the traditional member list:
 
1. Create a portable copy (pdsegbak) for backup
   and transfer to other locations then use pdsegbak
   to restore
2. Change the maxgen value using pdsegenc (copy)
   or pdsegbak (backup then restore)
3. Create a backup (pdsegbak) on a daily basis in
   case ca-disk archives the primary file
 
In the dialog/member list:
1.  Find a string of text in all members and generations
2.  Protection from editing a non-0 generation
a.  ISPF allows this (bozo no no)
3.  Promote a non-0 generation to the base generation
a.  The base will become generation -1 so it isnt lost
b.  This allows it to be accessed using jcl, dynamic allocation,
or other dialogs
4.  Recover a non-0 generation to a non-0 generation member
a.  This allows it to be accessed using jcl, dynamic allocation,
or other dialogs
5.  Compare a non-0 generation to the base (generation 0)
6.  Compare two non-0 generations

 

 

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

PDSE V2 Member Generation Tool

[Lionel Dyck]

I have just posted an update to my PDSEGEN ISPF application. This tool is
extremely helpful if you are using PDSE Version 2 libraries with generations
enabled.

 

You can find it at http://www.lbdsoftware.com

 

Check it out - comments and suggestions appreciated.  It is distributed
under GPL with no warranty or guarantee.

 

>From the $DOC member of the distribution pds:

 

Notes:


 


1.  Browse works as you would expect it to


2.  Using Edit or View you can use all normal edit commands,


including edit macros. However commands that reference other


members can only reference the base, or generation 0, member.


3.  Multiple members may be selected for Browse or View but Edit


will only work if the member IS NOT saved or updated.  If a


member is saved or updated then all rows for that member are


deleted and re-added to include the updated generation info.


4.  It shouldn't have to be stated but generations are only


supported for PDSE Version 2 datasets where generations have


been enabled.


5.  Edit will be converted to View for non-0 generation members.


6.  The Compare command only accepts relative generation numbers.


7.  The Compare line option will compare the generation to the base


generation


8.  It is possible to allow Edit to edit a generation BUT when that


happens only the generation is updated and the base member is


NOT updated. Thus the generation with the update could be lost


and/or hidden since it is not possible to access a generation


using dynamic allocation or JCL.


 


This application has been configured to prevent editing non-0


generations.


11. The e-mail option utilizes XMITIP using the XMITIPFE (front end)


exec. This option is only available if the mail variable is


customized to 1.


12. Aliases are NOT supported by the PDSEGENI Rexx Function so this


application does not support aliases (at this time) 

 

Restrictions of PDSE V2 Generations:


 


1. The MAXGENS option defines the number of generations plus 1 for the


   base or generation 0 member.  Thus a MAXGENS of 10 yields 11 members.


2. A Rename of a member leaves the generations under the original name.


   This will result in this application not seeing the generations for the


   renamed member unless a new member with the same name is created.


   * this option is not available with this application


3. You can delete an individual generation and that will leave a gap


   in the generations. This will result in this application stopping its


   member search at the 1st gap.


   * this option is not available with this application


4. Use of TSO DELETE will delete the base member BUT will NOT Delete


   any generations. The ISPF LMMDEL service will delete the base


   member and ALL generations. This application uses the LMMDEL


   service.


   - If you delete a member and all generations and then create a new


 member with the same name. All generations for the new member


 will start with the previous members generation next high


 generation number.


   - Some ISPF applications do not use LMMDEL to delete members but


 use the equivalent of the TSO DELETE, with the same results.


5. The use of ISPF copy services, including 3.3, will NOT copy any


   generations. Nor will IEBCOPY. The only tool to copy generations


   is DFDSS (a full dataset dump/restore/copy). This application does


   not support copying at this time.


6. If you Edit a generation other than 0 and save it then no new generation


   is generated. That only happens when editing generation 0.


7. You CANNOT access any generations using JCL or dynamic allocation.


8. You can force a new generation, when editing generation 0, by using


   the Edit command SAVE NEWGEN.


9. You can prevent the creation of a new generation by using the Edit


   command SAVE NOGEN 

 

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

New Updates to lbdsoftware.com

[Lionel Dyck]

I've made a few updates:

 

1.   FASTPATH was updated to clear up a point and shoot bug that has
been there for several years but only showed up today

2.   zFSTOOLS was updated with some cosmetic improvements thanks to
Peter Giles

 

The NEWEST addition to my site is PDSEGEN which is an ISPF dialog designed
to provide a robust and user friendly tool for working with PDSE Version 2
Member Generations. This tool provides the following capabilities:

 

* Commands:  Compare member old-gen new-gen  *


 *Copy to copy current PDSE to another/new PDSE   *


 *Edit member *


 *Locate member or member**


 *Refresh - rebuild the member list   *


 *Sort Create, Change, or User A/D*


 *  - only one at a time  *


 *  - A for ascending and D for descending*


 **


 * Selection  *


 *   Commands: B - browse *


 * C - compare  (for non-0 generations to gen 0)  *


 * D - delete   (for gen 0 only)  *


 * E - edit (for gen 0 only)  *


 * converted to V for non-0 gen)  *


 * M - mail the member (if enabled)   *


 * P - promote  (for non-0 generations)   *


 * R - recover  (for non-0 generations)   *


 * S - select   (based on the prompt panel*


 * O - tutorial panel *


 * V - view   *


 * X - execute the member (clist or rexx) *


 * / - tutorial panel *  

 

Be aware when using it that it uses a rather (extremely) slow technique for
determining the member generations since there is no IBM provided capability
in either TSO, REXX, or ISPF. That means that the initial entry to a PDSE
can take awhile but once you are in there it hums and really demonstrates
the capabilities that are available with generations.

 

As usual all of these tools are provided without warranty, guarantee, or
promise that they will work for you and yours.  If you choose to install
them be sure to test, test, and test again.

 

Comements, suggestions, corrections, bug reports, etc. are welcome and
appreciated but come with no promise that I'll be able to address them.

 

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: New and Updated tools

[Lionel Dyck]

I'm sorry for the problem - it appears that I trusted Microsoft Expressions Web 
to have copied the files but it appears that it didn't.

The problem has been resolved.

Here are direct links:

http://lbdsoftware.com/txt2csv_v06.zip
and
http://lbdsoftware.com/xmitip_v16.04.zip

be sure to try out zstart - I think you'll like it
http://lbdsoftware.com/zstart.zip

and if you use omvs (and who doesn't to some degree of another) check out my 
zfstools dialog
http://lbdsoftware.com/zfstools.zip

Cheers

-Original Message-
From: Gary Peters [mailto:gary.a.pet...@gmail.com] 
Sent: Thursday, June 2, 2016 5:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU; Lionel B Dyck 
Cc: Gary Peters 
Subject: Re: New and Updated tools

Lionel,

First let me say thank you very much for providing these tools.  My site 
(Municipality of Anchorage) has made extensive use of this software over the 
years, particularly XMITIP, FTPB, and TXT2PDF.

Unfortunately I am unable to download the latest/greatest XMITIP or TXT2CSV.  
Everything else downloads fine.

Gary

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

Formatting a Number with comma's

[Lionel Dyck]

I ran across this code from Doug Nadel several years ago and hope that 
y'all will find it useful.


  /* - */
  /* number format code thanks to Doug Nadel   */
  /* - */
   str=strip(translate('0,123,456,789,abc,def', ,
   right(bytes,16,','), ,
   '0123456789abcdef'),'L',',')
   bytes = strip(str)

Here are two examples from oorexx under windows (this works well under 
z/OS and z/VM)

C:\t\newtest.rex 12345678
Bytes: 12,345,678

C:\t\newtest.rex 12345678.12
Bytes: 12,345,678,.12



Lionel B. Dyck 
z Client Architect
IBM Corporation - West IMT

Mobile Phone: 1-925-207-4518
E-mail: lionel.d...@us.ibm.com
System z: www-03.ibm.com/systems/z/
Linux on z: http://www-03.ibm.com/systems/z/os/linux/
Destination z: http://www-03.ibm.com/systems/z/destinationz/index.html/

Think Inside the z Box



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

Re: FTP ERRORS [was: RACF on an ADCD system]

[Lionel Dyck]

If you want a simple tool to FTP files between z/OS LPARs and also between 
other platforms check out my ISPF dialog FTPBATCH (
http://www.lbdsoftware.com/ftpb223.zip) which will:

prompt for from/to dataset
if a PDS you can send the entire PDS or just selected members
optionally invoke DFDSS to unload the dataset at the from and restore at 
the target
runs either in batch or interactively
optionally generates batch JCL so you can repeat the process without using 
the ISPF dialog


Hope this helps 

Lionel B. Dyck 
z Client Architect
IBM Corporation - West IMT

Mobile Phone: 1-925-207-4518
E-mail: lionel.d...@us.ibm.com
System z: www-03.ibm.com/systems/z/
Linux on z: http://www-03.ibm.com/systems/z/os/linux/
Destination z: http://www-03.ibm.com/systems/z/destinationz/index.html/

Think Inside the z Box



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

Re: Formatting a Number with comma's

[Lionel Dyck]

Nice simple addition


Lionel B. Dyck 
z Client Architect
IBM Corporation - West IMT

Mobile Phone: 1-925-207-4518
E-mail: lionel.d...@us.ibm.com
System z: www-03.ibm.com/systems/z/
Linux on z: http://www-03.ibm.com/systems/z/os/linux/
Destination z: http://www-03.ibm.com/systems/z/destinationz/index.html/

Think Inside the z Box






From:   Roberto Halais roberto.hal...@gmail.com
To: IBM-MAIN@listserv.ua.edu, 
Date:   01/04/2013 12:13 PM
Subject:Re: Formatting a Number with comma's
Sent by:IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu



Will take numbers with decimal point or not.
/* rexx */
bytes = 1234567.89
parse var bytes num '.' dec
num=strip(translate('0,123,456,789,abc,def', ,
  right(num,16,','), ,
  '0123456789abcdef'),'L',',')
bytes = strip(strip(num)||'.'||dec,'T','.')
say bytes

On Fri, Jan 4, 2013 at 4:02 PM, Roberto Halais 
roberto.hal...@gmail.comwrote:

 /* rexx */
 num = '123,456,789'
 num = space(translate(num,'',','),0)
 say num

 123456789



 On Fri, Jan 4, 2013 at 3:48 PM, John McKown 
john.archie.mck...@gmail.comwrote:

 sure

 nocommas=strip(input,b,,)

 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ4A390/4.3.55



 On Fri, Jan 4, 2013 at 1:44 PM, Bill Ashton bill00ash...@gmail.com
 wrote:
  Now, on a related note...is there a simple way to remove commas from 
a
  number that is input as a string?
 
  For example, if a variable has 2,143,628 in it, how can I easily 
strip
  the commas to wind up with 2143628?
 
  Billy
 
  On Fri, Jan 4, 2013 at 1:58 PM, Lionel Dyck lionel.d...@us.ibm.com
 wrote:
 
  The 'extra' comman before the .12 on the second example as just that
 the
  code does not handle numbers with decimal but works well with pure
 numbers
 
 
 
  Lionel B. Dyck 
  z Client Architect
  IBM Corporation - West IMT
 
  Mobile Phone: 1-925-207-4518
  E-mail: lionel.d...@us.ibm.com
  System z: www-03.ibm.com/systems/z/
  Linux on z: http://www-03.ibm.com/systems/z/os/linux/
  Destination z:
 http://www-03.ibm.com/systems/z/destinationz/index.html/
 
  Think Inside the z Box
 
 
 
 
 
 
  From:   Mark Zelden m...@mzelden.com
  To: IBM-MAIN@listserv.ua.edu,
  Date:   01/04/2013 10:54 AM
  Subject:Re: Formatting a Number with comma's
  Sent by:IBM Mainframe Discussion List 
 IBM-MAIN@listserv.ua.edu
 
 
 
  On Fri, 4 Jan 2013 10:43:18 -0800, Lionel Dyck 
lionel.d...@us.ibm.com
 
  wrote:
 
  I ran across this code from Doug Nadel several years ago and hope 
that
  y'all will find it useful.
  
  
/* - 
*/
/* number format code thanks to Doug Nadel */
/* - 
*/
 str=strip(translate('0,123,456,789,abc,def', ,
 right(bytes,16,','), ,
 '0123456789abcdef'),'L',',')
 bytes = strip(str)
  
  Here are two examples from oorexx under windows (this works well 
under
  z/OS and z/VM)
  
  C:\t\newtest.rex 12345678
  Bytes: 12,345,678
  
  C:\t\newtest.rex 12345678.12
  Bytes: 12,345,678,.12
  
  
 
  May need a tweak (or cut/paste does).  What's that extra comma 
before
  the decimal point in the 2nd example?
 
  There was a recent thread on the TSO-REXX list that had some
  nice examples - probably including this one (I don't follow TSO-REXX
  too closely).
 
  --
  Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
  mailto:m...@mzelden.com
  Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
  Systems Programming expert at
 http://expertanswercenter.techtarget.com/
 
  Mark
 
  
--
  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
 
 
 
 
  --
  Thank you and best regards,
  *Billy Ashton*
 
  
--
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@listserv.ua.edu with the message: INFO 
IBM-MAIN



 --
 Maranatha! 
 John McKown

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




 --
 Men will never be free until the last king is strangled with the 
entrails
 of the last priest. Denis Diderot




-- 
Men will never be free until the last king is strangled with the entrails
of the last priest. Denis Diderot

--
For IBM-MAIN subscribe / signoff / archive access