Re: Moving a Catalog to a Different Volume

[Jake Anderson]

Backup, lock the catalog, delete and create the with same name on a
different volume , restore with replace with same name..

Sorry i might not be accurate but I followed something similar to above.

On Thu, 28 Mar, 2019, 10:22 AM Mike Schwab,  wrote:

> https://www-01.ibm.com/support/docview.wss?uid=isg1II13354 has
> complete instructions.  I have performed it several times.
>
> On Wed, Mar 27, 2019 at 10:02 PM Jason Cai  wrote:
> >
> > Hi all
> >  According z/OS DFSMS Managing Catalogs manual,we could move a Catalog
> to a Different Volume using the following key JCL.
> > //NEWVOL EXEC PGM=IDCAMS
> > //SYSPRINT DD SYSOUT=A
> > //SYSINDD *
> >   IMPORT INDATASET(CATBACK.ICFCAT.USER.VSYS303) -
> >   OUTDATASET(ICFCAT.USER.VSYS303) -
> >   OBJECTS((ICFCAT.USER.VSYS303 -
> >   VOLUMES(SYSNEW)))   -
> >   ALIAS -
> >   LOCK
> > /*
> > My question:
> >  1. If we find any error in the catalog in the new volume(SYSNEW),How to
> recovery the catalog to the Original volume ?  2. before and after we will
> listc the catalog list,how to compare the two output of listc catalog to
> confirm that  the original catalog in the old volume is the same as the
> catalog in new volume
> > Thanks a lot!
> > Jason Cai
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
> --
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?
>
> --
> 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: Remote access to Z14 ZR1 Support Element via HMC question

[Ravi Gaur]

We recently moved to z14 and I exported the OSA-ICC existing configuration via 
FTP to mainframe USS as below.

Exporting OSA-ICC configuration file using OSA Advanced Facilities.

To export the OSA-ICC configuration file, follow these steps:

1. Log on to the HMC, select the CPC you want to operate, and open the OSA 
Advanced
Facility.
2. Select the OSC CHPID to export the OSA-ICC configuration file. Next, select 
Card
specific advanced facilities. Select Manual configuration options and click OK
3. The Manual Configuration Options window opens as below . Select Export source
file and click OK.
4. The task requests that hostname/username and mainframe Password is entered 
with Unix file system to get the configuration in the USS  
6. The HMC displays the ACT2042  window (. Click OK.
7. On Mainframe in USS you can see File should have been exported at the given 
path. 

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

Re: Pervasive encryption and batch temporary datasets

[Timothy Sipples]

Matthew Donald wrote:
>My question is: do batch temporary datasets support extended
>format?  Can they be encrypted using pervasiv encryption?

Yes and yes.


Timothy Sipples
IT Architect Executive, 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: Pervasive encryption and batch temporary datasets

[Vernooij, Kees (ITOP NM) - KLM]

I am afraid the answer is a little too general. 
More specific: the application that uses the temporary file must support 
extended format data sets.

Kees.

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Timothy Sipples
> Sent: 28 March, 2019 8:29
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Pervasive encryption and batch temporary datasets
> 
> Matthew Donald wrote:
> >My question is: do batch temporary datasets support extended
> >format?  Can they be encrypted using pervasiv encryption?
> 
> Yes and yes.
> 
> --
> --
> Timothy Sipples
> IT Architect Executive, 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

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message.

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286


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

Batch edit of large dataset

[Elardus Engelbrecht]

Hi to all,

I've got a requirement where a single line in large dataset (RECFM=VB or FB and 
LRECL=) needs to be edited/changed in batch. Changed dataset 
is then to be used in next job steps.

Sounds easy? Interactively with TSO yes, but they want it to be done in a batch 
job.

Something like c '???' '!!!' which can be easily done interactively.

I have a look at the different utilities. One utility I could find useful is 
the EDIT and CHANGE commands running under IKJEFT.

Unfortunately those IKJEFT01 commands require that the dataset lines need to be 
numbered.

I tried it out:

READY 
  EDIT '??.TEST' OLD TEXT ASIS NONUM
EDIT  
  CHANGE 1  2000 'ONE' 'TWO'   
IKJ52502I DATA SET NOT LINE NUMBERED  
EDIT  
END   

The IKJ52502I is not what I want. Is there a batch utility where I can edit a 
line in large dataset?

I am very sure I am overlooking something obvious.

Many thanks in advance.

Groete / Greetings
Elardus Engelbrecht

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

Re: Batch edit of large dataset

[Ravi Gaur]

Quick just in case you have PDSMAN product you can  use PDSM18 utility with 
replace.

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

Translation table for CSSMTP

[Peter]

Hi

Cross posted

I have built a national language translate table for CSSMTP

How do I ensure if CSSMTP used the translation table source ?

Peter

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

REFVTOC with a user catalog on the volume?

[Joe Ogle]

Client has a busted VTOC, and the volume has a high-impact user catalog on
it. I’ve copied the volume and tested the REFVTOC successfully. I’ve
largely talked myself into the notion that the VTOC and the catalog are two
separate entities and there shouldn’t be an issue with doing the REFVTOC on
the live volume, but still hesitant.

Quiescing this catalog to move it to another volume would be an ordeal, but
could be done. Obviously I would prefer the 30 second DSF job.

Am I being overly cautious? Thanks.

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

[Gil Cardenas]

If you have SAS in house, you might be able to use SAS Output Delivery System 
(ODS) to send data as PDF or HTML and XLS or other such formats.  I've used it 
to send attachments as the 3 formats mentioned above.

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

FTPS breaks on z14-ZR1

[Mike Shorkend]

Hi all,

Strange problem when moving from a z13s to z14-ZR1.
Everything works fine expect for FTP-S(z/OS is the server).
Getting

*Destination host 'HOSTNAME' ftp reply ---> 425 Can't open passive
connection.  *

Where HOSTNAME is the z/OS host name(for the VIPA).


After falling back to the z13s, things went back to normal.

z/OS 2.2
RSU1810
TLS

Opened a a PMR with IBM.

Any ideas? How can the hardware affect FTP?

Thanks

Mike







-- 
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

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

Re: FTPS breaks on z14-ZR1

[Mark Jacobs]

At first guess it might be firewall related. I assume that the z14 has a 
different IP address than the z13.

Mark Jacobs

Sent from ProtonMail, Swiss-based encrypted email.

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

‐‐‐ Original Message ‐‐‐
On Thursday, March 28, 2019 7:32 AM, Mike Shorkend  
wrote:

> Hi all,
>
> Strange problem when moving from a z13s to z14-ZR1.
> Everything works fine expect for FTP-S(z/OS is the server).
> Getting
>
> *Destination host 'HOSTNAME' ftp reply ---> 425 Can't open passive
>
> connection. *
>
> Where HOSTNAME is the z/OS host name(for the VIPA).
>
> After falling back to the z13s, things went back to normal.
>
> z/OS 2.2
> RSU1810
> TLS
>
> Opened a a PMR with IBM.
>
> Any ideas? How can the hardware affect FTP?
>
> Thanks
>
> Mike
>
>
> 
>
> Mike Shorkend
> m...@shorkend.com
> www.shorkend.com
> Tel: +972524208743
> Fax: +97239772196
>
> --
>
> 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: SDSF Edit Function Key disappointment

[Blake, Daniel J [CTR]]

I bit the bullet.

;-D an Blake




-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lionel Dyck
Sent: Thursday, March 28, 2019 7:40 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SDSF Edit Function Key disappointment

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


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

Re: Batch edit of large dataset - Solved

[Elardus Engelbrecht]

Elardus Engelbrecht wrote:

>I've got a requirement where a single line in large dataset (RECFM=VB or FB 
>and LRECL=) needs to be edited/changed in batch. Changed 
>dataset is then to be used in next job steps.

Solved! Whew! ;-)

I am familiar with using ISREDIT MACRO function interactively, so I first tried 
out Alan Young's example in thread 'Re: JCL sample needed' posted on 19 Feb 
2016.

But I have problems to pass the two arguments for the ISREDIT CHANGE command. 
It is easy (after lots of RTFM on KC! ;-D ) to do that interactively, but not 
in batch.

Eventually I discovered Sri h Kolusu's better example in the same thread too!

After some tailoring I get this:

//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*  
//SORTIN   DD DISP=SHR,DSN=...???...
//SORTOUT  DD DISP=SHR,DSN=...???...
//SYSINDD * 
  OPTION COPY   
  OUTREC FINDREP=(INOUT=(C'Pest',C'Breaker'))
//* 

With this, I can change in whole dataset all occurances of 'Pest' to 'Breaker'. 
I (and they who asked me for assistance) don't care for now about the length 
difference after change operation.

Thanks to all who helped offline and online.

And to Sri, you are still amazing with all those magical solutions.

Thanks again!

Groete / Greetings
Elardus Engelbrecht


PS: Someone else posted this, but it is not working (?) even after I did some 
editing and also changed C to CHANGE:



//TSO EXEC PGM=IKJEFT01,REGION=8M,DYNAMNBR=75 
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *   
PROFILE PREFIX(userid)
EDIT NS28.DATA
V ON  
C * 999 /NOT SCRTCH/NOT SCRTCH/ ALL   
END NOSAVE 
DELETE NS28.DATA
LISTD 'SYS1.PARMLIB' M
/*   



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

Re: SDSF Edit Function Key disappointment

[Elardus Engelbrecht]

Lionel Dyck wrote:

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

ISF.SISFTLIB(ISFKEYS) is somewhat different from other ???KEYS members in your 
ISPTLIB concatenation.


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

And thus modify ISF.SISFTLIB(ISFKEYS) yourself. What a little drama.


>BUT WHY?

WAD and BAD, but you can ask the SDSF developers. Let them bite YOUR bullet!

Groete / Greetings
Elardus Engelbrecht

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

Re: Batch edit of large dataset

[John McKown]

On Thu, Mar 28, 2019 at 2:52 AM Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:

> Hi to all,
>
> I've got a requirement where a single line in large dataset (RECFM=VB or
> FB and LRECL=) needs to be edited/changed in batch.
> Changed dataset is then to be used in next job steps.
>
> Sounds easy? Interactively with TSO yes, but they want it to be done in a
> batch job.
>
> Something like c '???' '!!!' which can be easily done interactively.
>
> I have a look at the different utilities. One utility I could find useful
> is the EDIT and CHANGE commands running under IKJEFT.
>
> Unfortunately those IKJEFT01 commands require that the dataset lines need
> to be numbered.
>
> I tried it out:
>
> READY
>   EDIT '??.TEST' OLD TEXT ASIS NONUM
> EDIT
>   CHANGE 1  2000 'ONE' 'TWO'
> IKJ52502I DATA SET NOT LINE NUMBERED
> EDIT
> END
>
> The IKJ52502I is not what I want. Is there a batch utility where I can
> edit a line in large dataset?
>
> I am very sure I am overlooking something obvious.
>
> Many thanks in advance.
>
> Groete / Greetings
> Elardus Engelbrecht
>
>
In my usual "left handed" way, I will recommend using "awk" in a UNIX step
to do this. It is easiest to do if you have Co:Z installed, but it can be
done using the IBM supplied UNIX commands. Yes, IBM awk can read a z/OS
sequential dataset. I have verified this on z/OS 1.12 and 2.3. Something
like:

//PS001   EXEC PGM=BPXBATCH,REGION=0M
//*PARM='SH printenv '
//STDOUT   DD SYSOUT=*
//STDERR   DD SYSOUT=*
//STDINDD DUMMY
//STDPARM  DD *
SH awk 'NR <= 2000 {n=sub(/ONE/,"TWO");print;}
NR > 2000 {n=sub(/./,"+");print  $0;}'
"//'fully-qualified-input-dataset'" |
cp /dev/fd/0 "//'existing-output-dataset'"
//STDENV DD *
/*
//

The above will change the _first_ occurance of "ONE" to "TWO" if the
relative record number is less than or equal to 2000 (NR <= 2000). It will
leave any other occurrences on the line alone. It will simply copy the
current record to the output for all other records (NR > 2000). It would be
easiest to do this if you preallocate the output dataset. Perhaps in a
previous IEFBR14 step. Yes, "cp" can create a new sequential dataset. It is
a PITA and I didn't want to bother with it.

-- 
I just burned 2000 calories!
That's the last time I'll nap with brownies in the oven.

Maranatha! <><
John McKown

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

Re: Using DFSORT to generate data

[Bill Ashton]

I could not find a way for IEBDG to create the first record with 10001
in the first 9 bytes, then the next rec with 10009, then 10017,
etc. In addition, I could not see any use of the time generation. I have
used IEBDG only a few times in my life for simple things, so I am far from
an expert - if someone has some good examples (the ones in the manual are -
ahem - not very extensive), please share them!

Kolusu, thanks for helping with this, and especially with the time value.
This is quite intriguing!
B

On Wed, Mar 27, 2019 at 4:58 PM Mark Jacobs <
0224d287a4b1-dmarc-requ...@listserv.ua.edu> wrote:

> Is there any reason not to use IEBDG for this?
>
> Mark Jacobs
>
> Sent from ProtonMail mobile
>
>  Original Message 
> On Mar 27, 2019, 4:44 PM, Bill Ashton wrote:
>
> > Hi everyone! I am trying to generate a large test file for an internal
> > project, and I wanted to know if anyone has done this with SORT.
> >
> > I need to have the first 9 bytes be incremental from 10001 by 8
> > (...001, ...009, ...017, etc.), followed by a 12byte current timestamp
> > (hhmmss,mi without the dot) and then I need a couple random 7-byte
> > packed fields and a static text field with every record having the same
> > value.
> >
> > Is this possible with SORT? If so, is it good to use this to generate
> about
> > 1Mill records? I will run this multiple times during testing (hence the 1
> > in the first byte, which will be 2 next time).
> >
> > Thanks for your suggestions and recommendations!
> > Billy
> >
> > --
> > 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
>
> --
> 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

Re: Using DFSORT to generate data

[Bill Ashton]

Kolusu, I would like one little tweak, if you please - is it possible to
get the timestamp fresh on each record, instead of using the same timestamp
value for all of them?

Billy

On Wed, Mar 27, 2019 at 6:29 PM Sri h Kolusu  wrote:

> Hi everyone! I am trying to generate a large test file for an internal
> > project, and I wanted to know if anyone has done this with SORT.
>
>
> Bill,
>
> It is quite easy to generate your test data.   I generated 1 million
> records with an LRECL of 100 bytes
>
> TCB:   00:00:00.922436
> ELAPSED:   00:00:09.43
>
>
> //STEP0100 EXEC PGM=SORT
> //SYSOUT   DD SYSOUT=*
> //SORTIN   DD *
> ABC
> //SORTOUT  DD SYSOUT=*
> //SYSINDD *
>   OPTION COPY
>   INREC BUILD=(DATE5)
>
>   OUTFIL REPEAT=100,
>   BUILD=(SEQNUM,9,ZD,START=10001,INCR=8,$ SEQ INCREMENT BY 8
>  12,15,UFF,M11,LENGTH=12,   $ HHMMSSMI
>  SEQNUM,4,PD,START=31,INCR=14,  $ PACKED INCR BY 14
>  C'STATIC TEXT - 01',   $ STATIC TEXT
>  SEQNUM,16,PD,START=23003,INCR=2,   $ PACKED INCR BY 2
>  C'STATIC TEXT - 02',   $ STATIC TEXT
>  SEQNUM,10,PD,START=0,  $ PACKED INCR BY 1
>  C'END OF THE GEN', $ STATIC TEXT
>  100:X) $ LRECL=100
> //*
>
>
> Further if you have any questions please let me know
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
>
> --
> 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

Re: FTPS breaks on z14-ZR1

[Carmen Vitullo]

if nothing else has changed, like host name, I'd be checking your OSA 
configuration via the HMC, that's the only thing I can think of off hand that 
may be related. 
export the OSAD from the OSA advanced features/function and compare the two 


Carmen Vitullo 

- Original Message -

From: "Mike Shorkend"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Thursday, March 28, 2019 6:32:09 AM 
Subject: FTPS breaks on z14-ZR1 

Hi all, 

Strange problem when moving from a z13s to z14-ZR1. 
Everything works fine expect for FTP-S(z/OS is the server). 
Getting 

*Destination host 'HOSTNAME' ftp reply ---> 425 Can't open passive 
connection. * 

Where HOSTNAME is the z/OS host name(for the VIPA). 


After falling back to the z13s, things went back to normal. 

z/OS 2.2 
RSU1810 
TLS 

Opened a a PMR with IBM. 

Any ideas? How can the hardware affect FTP? 

Thanks 

Mike 







-- 
Mike Shorkend 
m...@shorkend.com 
www.shorkend.com 
Tel: +972524208743 
Fax: +97239772196 

-- 
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: Batch edit of large dataset

[Elardus Engelbrecht]

John McKown wrote:

>> Groete / Greetings

>In my usual "left handed" way, I will recommend using "awk" in a UNIX step to 
>do this. It is easiest to do if you have Co:Z installed, but it can be done 
>using the IBM supplied UNIX commands. Yes, IBM awk can read a z/OS sequential 
>dataset. I have verified this on z/OS 1.12 and 2.3. Something like:

>//PS001   EXEC PGM=BPXBATCH,REGION=0M
>//*PARM='SH printenv '
>//STDOUT   DD SYSOUT=*
>//STDERR   DD SYSOUT=*
>//STDINDD DUMMY
>//STDPARM  DD *
>SH awk 'NR <= 2000 {n=sub(/ONE/,"TWO");print;}
>NR > 2000 {n=sub(/./,"+");print  $0;}'
>"//'fully-qualified-input-dataset'" |
>cp /dev/fd/0 "//'existing-output-dataset'"
>//STDENV DD *
>/*

>The above will change the _first_ occurance of "ONE" to "TWO" if the relative 
>record number is less than or equal to 2000 (NR <= 2000). It will leave any 
>other occurrences on the line alone. It will simply copy the current record to 
>the output for all other records (NR > 2000). 

Excellent. Another improvement - Selective change actions based on other 
criterias.

I am aware of awk, but not this NR part. 

Thanks for your excellent contribution. Much appreciated!

Groete / Greetings
Elardus Engelbrecht

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

Re: FTPS breaks on z14-ZR1

[Mike Shorkend]

Thanks Carmen, will give it a go.

On Thu, 28 Mar 2019 at 14:35, Carmen Vitullo  wrote:

> if nothing else has changed, like host name, I'd be checking your OSA
> configuration via the HMC, that's the only thing I can think of off hand
> that may be related.
> export the OSAD from the OSA advanced features/function and compare the
> two
>
>
> Carmen Vitullo
>
> - Original Message -
>
> From: "Mike Shorkend" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Sent: Thursday, March 28, 2019 6:32:09 AM
> Subject: FTPS breaks on z14-ZR1
>
> Hi all,
>
> Strange problem when moving from a z13s to z14-ZR1.
> Everything works fine expect for FTP-S(z/OS is the server).
> Getting
>
> *Destination host 'HOSTNAME' ftp reply ---> 425 Can't open passive
> connection. *
>
> Where HOSTNAME is the z/OS host name(for the VIPA).
>
>
> After falling back to the z13s, things went back to normal.
>
> z/OS 2.2
> RSU1810
> TLS
>
> Opened a a PMR with IBM.
>
> Any ideas? How can the hardware affect FTP?
>
> Thanks
>
> Mike
>
>
>
>
>
>
>
> --
> Mike Shorkend
> m...@shorkend.com
> www.shorkend.com
> Tel: +972524208743
> Fax: +97239772196
>
> --
> 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
>


-- 
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

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

Re: FTPS breaks on z14-ZR1

[Carmen Vitullo]

Your Welcome, I know you've said nothing else has changed but I did find this 
tidbit also 



The 425 error means that the data channel is blocked or closed between you and 
the server you are trying to connect to. 

* 
For Active (PORT) connections open port 21. Also open inbound high ports above 
1024 to the client. You can specify the range of ports the client uses for an 
Active data connection by clicking Tools, Options, Firewall, and check "Limit 
local port range". Open the matching port range you specify in your firewall. 
* 
For Passive (PASV) connections open port 21, and disable any outbound packet or 
command filtering. 


If you still cannot get a successful connection, check all devices that are 
between the client and server to ensure that the proper ports are open (e.g. 
routers). 

Another possible cause of the 425 error code is the SSL requirements on the 
server. In the case of the following error message: 

* 425 unable to build data connection: Operation not permitted. 



Carmen Vitullo 

- Original Message -

From: "Mike Shorkend"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Thursday, March 28, 2019 7:51:48 AM 
Subject: Re: FTPS breaks on z14-ZR1 

Thanks Carmen, will give it a go. 

On Thu, 28 Mar 2019 at 14:35, Carmen Vitullo  wrote: 

> if nothing else has changed, like host name, I'd be checking your OSA 
> configuration via the HMC, that's the only thing I can think of off hand 
> that may be related. 
> export the OSAD from the OSA advanced features/function and compare the 
> two 
> 
> 
> Carmen Vitullo 
> 
> - Original Message - 
> 
> From: "Mike Shorkend"  
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Sent: Thursday, March 28, 2019 6:32:09 AM 
> Subject: FTPS breaks on z14-ZR1 
> 
> Hi all, 
> 
> Strange problem when moving from a z13s to z14-ZR1. 
> Everything works fine expect for FTP-S(z/OS is the server). 
> Getting 
> 
> *Destination host 'HOSTNAME' ftp reply ---> 425 Can't open passive 
> connection. * 
> 
> Where HOSTNAME is the z/OS host name(for the VIPA). 
> 
> 
> After falling back to the z13s, things went back to normal. 
> 
> z/OS 2.2 
> RSU1810 
> TLS 
> 
> Opened a a PMR with IBM. 
> 
> Any ideas? How can the hardware affect FTP? 
> 
> Thanks 
> 
> Mike 
> 
> 
> 
> 
> 
> 
> 
> -- 
> Mike Shorkend 
> m...@shorkend.com 
> www.shorkend.com 
> Tel: +972524208743 
> Fax: +97239772196 
> 
> -- 
> 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 
> 


-- 
Mike Shorkend 
m...@shorkend.com 
www.shorkend.com 
Tel: +972524208743 
Fax: +97239772196 

-- 
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: Pervasive encryption and batch temporary datasets

[Allan Staller]

(z13?) or z14 processor.  Pervasive encryption handled by hardware.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Matthew Donald
Sent: Wednesday, March 27, 2019 9:37 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Pervasive encryption and batch temporary datasets

I'm looking into pervasive encryption and I have a question about batch temp 
files that I have been unable by googling.

In order to have SMS encrypt a dataset, the dataset must be in extended format, 
which I believe is specified in the dataclass.  My question is: do batch 
temporary datasets support extended format?  Can they be encrypted using 
pervasiv encryption?

Matthew

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::
--
The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.
--

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

Re: Moving a Catalog to a Different Volume

[Allan Staller]

http://www-01.ibm.com/support/docview.wss?uid=isg1II13354


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jason Cai
Sent: Wednesday, March 27, 2019 10:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Moving a Catalog to a Different Volume

Hi all
 According z/OS DFSMS Managing Catalogs manual,we could move a Catalog to a 
Different Volume using the following key JCL.
//NEWVOL EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=A
//SYSINDD *
  IMPORT INDATASET(CATBACK.ICFCAT.USER.VSYS303) -
  OUTDATASET(ICFCAT.USER.VSYS303) -
  OBJECTS((ICFCAT.USER.VSYS303 -
  VOLUMES(SYSNEW)))   -
  ALIAS -
  LOCK
/*
My question:
 1. If we find any error in the catalog in the new volume(SYSNEW),How to 
recovery the catalog to the Original volume ?  2. before and after we will 
listc the catalog list,how to compare the two output of listc catalog to 
confirm that  the original catalog in the old volume is the same as the catalog 
in new volume Thanks a lot!
Jason Cai


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::
--
The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.
--

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

Authorized and unauthorized in same address space

[Brian Chapman]

Searching through the archives, I quickly saw that this has been a repeat
heated discussion, but
all of the discussions seem to ignore the fact that CICS initializes as an
authorized address space, performs authorized work, and then disables
authorization to load unathorized programs from the DFHRPL tasklib. It does
what so many people deem to be a security integrity violation.

I have an unauthorized address space that collects information from the
system and uses MQ or CICS EXCI (if MQ is unavailable) to transport the
data to another address space which stores the data to DB2. Having the
ability to execute authorize services would greatly increase the
functionality of this address space. Since neither of these transport
mechanisms are authorized, i cannot run authorized in the current setup.

The idea is to execute the authorized requests as non-system supervisor PC
routines. One of the PC routines would be to simply disable JSCBAUTH (ONLY
disable. NEVER enable). Before invoking this PC routine, I perform a
MODESET to switch back to problem state and key 8. The only authorized
services performed before this switch would be the LXRES, ETDEF, ETCRE, and
ETCON services to build the PC routines. After invoking the JSCBAUTH
disable PC routine from the job step program, I cannot switch back.
Invoking a MODESET after the switch abends address space with a 047.

>From this point forward, all of the ATTACH and LOAD services are performed
with the supplied tasklib. The unauthorized code is COBOL. Before this
program is invoked, it initializes LE and replaces the default CEEZLOD and
CEEZDEL with my own version that loads from the tasklib.


Thank you,

Brian Chapman

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

Re: FTPS breaks on z14-ZR1

[Mike Shorkend]

Thanks Mark.
No firewall. No IP address changes.

On Thu, 28 Mar 2019, 13:34 Mark Jacobs, <
0224d287a4b1-dmarc-requ...@listserv.ua.edu> wrote:

> At first guess it might be firewall related. I assume that the z14 has a
> different IP address than the z13.
>
> Mark Jacobs
>
> Sent from ProtonMail, Swiss-based encrypted email.
>
> GPG Public Key -
> https://api.protonmail.ch/pks/lookup?op=get&search=markjac...@protonmail.com
>
> ‐‐‐ Original Message ‐‐‐
> On Thursday, March 28, 2019 7:32 AM, Mike Shorkend <
> mike.shork...@gmail.com> wrote:
>
> > Hi all,
> >
> > Strange problem when moving from a z13s to z14-ZR1.
> > Everything works fine expect for FTP-S(z/OS is the server).
> > Getting
> >
> > *Destination host 'HOSTNAME' ftp reply ---> 425 Can't open passive
> >
> > connection. *
> >
> > Where HOSTNAME is the z/OS host name(for the VIPA).
> >
> > After falling back to the z13s, things went back to normal.
> >
> > z/OS 2.2
> > RSU1810
> > TLS
> >
> > Opened a a PMR with IBM.
> >
> > Any ideas? How can the hardware affect FTP?
> >
> > Thanks
> >
> > Mike
> >
> >
> >
> 
> >
> > Mike Shorkend
> > m...@shorkend.com
> > www.shorkend.com
> > Tel: +972524208743
> > Fax: +97239772196
> >
> >
> --
> >
> > 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: FTPS breaks on z14-ZR1

[Elardus Engelbrecht]

Carmen Vitullo wrote:

>Another possible cause of the 425 error code is the SSL requirements on the 
>server. In the case of the following error message:

>* 425 unable to build data connection: Operation not permitted.

In this case, check and compare on z13 and z14 what Crypto cards and keys do 
you have.

Groete / Greetings
Elardus Engelbrecht

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

Re: REFVTOC with a user catalog on the volume?

[Allan Staller]

I would expect the REFVTOC to be a very quick operation.
My concern would be getting control of the volume to perform the REFVTOC due to 
the high activity catalog.

This sounds like something to attempt @ 0-dark-thirty, notify everyone of risks 
and keep fingers crossed.

HTH,

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Joe 
Ogle
Sent: Thursday, March 28, 2019 5:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: REFVTOC with a user catalog on the volume?


Client has a busted VTOC, and the volume has a high-impact user catalog on it. 
I’ve copied the volume and tested the REFVTOC successfully. I’ve largely talked 
myself into the notion that the VTOC and the catalog are two separate entities 
and there shouldn’t be an issue with doing the REFVTOC on the live volume, but 
still hesitant.

Quiescing this catalog to move it to another volume would be an ordeal, but 
could be done. Obviously I would prefer the 30 second DSF job.

Am I being overly cautious? Thanks.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::
--
The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.
--

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

Re: Using DFSORT to generate data

[Martin Packer]

ON INREC, if you used IFTHEN WHEN=INIT you could prime with a timestamp 
and then with a subsequent IFTHEN overwrite the last few bytes of the 
timestamp with an incrementing value.

Kind of like a pipeline. Though, when I explained what he'd built to Frank 
Yaeger he didn't respond as a plumber would. :-)

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:   Bill Ashton 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   28/03/2019 12:32
Subject:Re: Using DFSORT to generate data
Sent by:IBM Mainframe Discussion List 



Kolusu, I would like one little tweak, if you please - is it possible to
get the timestamp fresh on each record, instead of using the same 
timestamp
value for all of them?

Billy

On Wed, Mar 27, 2019 at 6:29 PM Sri h Kolusu  wrote:

> Hi everyone! I am trying to generate a large test file for an internal
> > project, and I wanted to know if anyone has done this with SORT.
>
>
> Bill,
>
> It is quite easy to generate your test data.   I generated 1 million
> records with an LRECL of 100 bytes
>
> TCB:   00:00:00.922436
> ELAPSED:   00:00:09.43
>
>
> //STEP0100 EXEC PGM=SORT
> //SYSOUT   DD SYSOUT=*
> //SORTIN   DD *
> ABC
> //SORTOUT  DD SYSOUT=*
> //SYSINDD *
>   OPTION COPY
>   INREC BUILD=(DATE5)
>
>   OUTFIL REPEAT=100,
>   BUILD=(SEQNUM,9,ZD,START=10001,INCR=8,$ SEQ INCREMENT BY 8
>  12,15,UFF,M11,LENGTH=12,   $ HHMMSSMI
>  SEQNUM,4,PD,START=31,INCR=14,  $ PACKED INCR BY 14
>  C'STATIC TEXT - 01',   $ STATIC TEXT
>  SEQNUM,16,PD,START=23003,INCR=2,   $ PACKED INCR BY 2
>  C'STATIC TEXT - 02',   $ STATIC TEXT
>  SEQNUM,10,PD,START=0,  $ PACKED INCR BY 1
>  C'END OF THE GEN', $ STATIC TEXT
>  100:X) $ LRECL=100
> //*
>
>
> Further if you have any questions please let me know
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
>
> --
> 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




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: FTPS breaks on z14-ZR1

[Mike Shorkend]

The z/OS definitions for both systems are identical.
Looking at the other ideas mentioned

Thanks

On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:

> Carmen Vitullo wrote:
>
> >Another possible cause of the 425 error code is the SSL requirements on
> the server. In the case of the following error message:
>
> >* 425 unable to build data connection: Operation not permitted.
>
> In this case, check and compare on z13 and z14 what Crypto cards and keys
> do you have.
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

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

Re: FTPS breaks on z14-ZR1

[Carmen Vitullo]

ok, if you don't mind keep us posted, we'll be moving to a Z14 eventually, if 
there's some gotya's going from Z13 to z14 I'd like to know 
thanks and good luck 



Carmen Vitullo 

- Original Message -

From: "Mike Shorkend"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Thursday, March 28, 2019 8:55:48 AM 
Subject: Re: FTPS breaks on z14-ZR1 

The z/OS definitions for both systems are identical. 
Looking at the other ideas mentioned 

Thanks 

On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht < 
elardus.engelbre...@sita.co.za> wrote: 

> Carmen Vitullo wrote: 
> 
> >Another possible cause of the 425 error code is the SSL requirements on 
> the server. In the case of the following error message: 
> 
> > * 425 unable to build data connection: Operation not permitted. 
> 
> In this case, check and compare on z13 and z14 what Crypto cards and keys 
> do you have. 
> 
> Groete / Greetings 
> Elardus Engelbrecht 
> 
> -- 
> For IBM-MAIN subscribe / signoff / archive access instructions, 
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN 
> 


-- 
Mike Shorkend 
m...@shorkend.com 
www.shorkend.com 
Tel: +972524208743 
Fax: +97239772196 

-- 
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: FTPS breaks on z14-ZR1

[Bill Bishop (TMNA)]

Did you go from an OSA 5 to an OSA 6 card?

We upgraded a z12 to a z14 6 months ago and found out that we missed upgrading 
the OSA software as the OSA 6 cards required a different version.

Thanks

Bill Bishop
Consultant, Mainframe Engineer
Mainframe and Scheduling | Infrastructure Technology Services 
Toyota Motor North America
 bill.bis...@toyota.com
Office:  (469) 292-5149
Cell:  (502) 316-4386

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mike Shorkend
Sent: Thursday, March 28, 2019 8:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: FTPS breaks on z14-ZR1

The z/OS definitions for both systems are identical.
Looking at the other ideas mentioned

Thanks

On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht < 
elardus.engelbre...@sita.co.za> wrote:

> Carmen Vitullo wrote:
>
> >Another possible cause of the 425 error code is the SSL requirements 
> >on
> the server. In the case of the following error message:
>
> >* 425 unable to build data connection: Operation not permitted.
>
> In this case, check and compare on z13 and z14 what Crypto cards and 
> keys do you have.
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

--
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: FTPS breaks on z14-ZR1

[scott Ford]

If your running PASV FTP.DATA and the TCPIP profile must be changed.
Inbound port 20/21 are good for PASV , but outbound is a different story.
Are you running z/OS to z/OS ? Is there an intervening firewall ?

Scott

On Thu, Mar 28, 2019 at 10:02 AM Carmen Vitullo  wrote:

> ok, if you don't mind keep us posted, we'll be moving to a Z14 eventually,
> if there's some gotya's going from Z13 to z14 I'd like to know
> thanks and good luck
>
>
>
> Carmen Vitullo
>
> - Original Message -
>
> From: "Mike Shorkend" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Sent: Thursday, March 28, 2019 8:55:48 AM
> Subject: Re: FTPS breaks on z14-ZR1
>
> The z/OS definitions for both systems are identical.
> Looking at the other ideas mentioned
>
> Thanks
>
> On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht <
> elardus.engelbre...@sita.co.za> wrote:
>
> > Carmen Vitullo wrote:
> >
> > >Another possible cause of the 425 error code is the SSL requirements on
> > the server. In the case of the following error message:
> >
> > > * 425 unable to build data connection: Operation not permitted.
> >
> > In this case, check and compare on z13 and z14 what Crypto cards and
> keys
> > do you have.
> >
> > Groete / Greetings
> > Elardus Engelbrecht
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
> --
> Mike Shorkend
> m...@shorkend.com
> www.shorkend.com
> Tel: +972524208743
> Fax: +97239772196
>
> --
> 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: Using DFSORT to generate data

[Paul Gilmartin]

On Thu, 28 Mar 2019 13:21:40 +, Martin Packer wrote:

>ON INREC, if you used IFTHEN WHEN=INIT you could prime with a timestamp
>and then with a subsequent IFTHEN overwrite the last few bytes of the
>timestamp with an incrementing value.
> 
But what if the OP requires an actual timestamp rather than merely
an incrementing value?

>Kind of like a pipeline. Though, when I explained what he'd built to Frank
>Yaeger he didn't respond as a plumber would. :-)


>From:   Bill Ashton
>Date:   28/03/2019 12:32
>
>Kolusu, I would like one little tweak, if you please - is it possible to
>get the timestamp fresh on each record, instead of using the same
>timestamp
>value for all of them?

--gil

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

Re: Batch edit of large dataset

[Paul Gilmartin]

On Thu, 28 Mar 2019 02:51:59 -0500, Elardus Engelbrecht wrote:
>
>I've got a requirement where a single line in large dataset (RECFM=VB or FB 
>and LRECL=) needs to be edited/changed in batch. Changed 
>dataset is then to be used in next job steps.
>
>Sounds easy? Interactively with TSO yes, but they want it to be done in a 
>batch job.
>
>Something like c '???' '!!!' which can be easily done interactively.
>
>I have a look at the different utilities. One utility I could find useful is 
>the EDIT and CHANGE commands running under IKJEFT.
>
>Unfortunately those IKJEFT01 commands require that the dataset lines need to 
>be numbered.
> 
Could you run ISPF Edit under IKJEFT and use its CHANGE command in an initial 
macro?

-- gil

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

Re: FTPS breaks on z14-ZR1

[Mike Shorkend]

No firewall, and like I said, nothing else has changed.

@Bill - we did go from OSA5 to OSA6. I am not aware of how we would upgrade
the OSA software?


On Thu, 28 Mar 2019 at 16:06, scott Ford  wrote:

> If your running PASV FTP.DATA and the TCPIP profile must be changed.
> Inbound port 20/21 are good for PASV , but outbound is a different story.
> Are you running z/OS to z/OS ? Is there an intervening firewall ?
>
> Scott
>
> On Thu, Mar 28, 2019 at 10:02 AM Carmen Vitullo 
> wrote:
>
> > ok, if you don't mind keep us posted, we'll be moving to a Z14
> eventually,
> > if there's some gotya's going from Z13 to z14 I'd like to know
> > thanks and good luck
> >
> >
> >
> > Carmen Vitullo
> >
> > - Original Message -
> >
> > From: "Mike Shorkend" 
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Sent: Thursday, March 28, 2019 8:55:48 AM
> > Subject: Re: FTPS breaks on z14-ZR1
> >
> > The z/OS definitions for both systems are identical.
> > Looking at the other ideas mentioned
> >
> > Thanks
> >
> > On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht <
> > elardus.engelbre...@sita.co.za> wrote:
> >
> > > Carmen Vitullo wrote:
> > >
> > > >Another possible cause of the 425 error code is the SSL requirements
> on
> > > the server. In the case of the following error message:
> > >
> > > > * 425 unable to build data connection: Operation not permitted.
> > >
> > > In this case, check and compare on z13 and z14 what Crypto cards and
> > keys
> > > do you have.
> > >
> > > Groete / Greetings
> > > Elardus Engelbrecht
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> >
> > --
> > Mike Shorkend
> > m...@shorkend.com
> > www.shorkend.com
> > Tel: +972524208743
> > Fax: +97239772196
> >
> > --
> > 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
>


-- 
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

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

Re: SDSF Edit Function Key disappointment

[Paul Gilmartin]

On Thu, 28 Mar 2019 07:05:28 -0500, Elardus Engelbrecht wrote:

>Lionel Dyck wrote:
>
>>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?
>...
>>BUT WHY?
>
>WAD and BAD, but you can ask the SDSF developers. Let them bite YOUR bullet!
>
Perhaps the developers perceived SDSF SJ and SE as intended to be read-only
facilities and saw no need to spend the effort to define an RCHANGE key.

-- gil

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

Re: FTPS breaks on z14-ZR1

[Bill Bishop (TMNA)]

Sorry, it was the crypto express software.

We went from Crypto 5 to Crypto 6 cards and missed updating the ICSF software 

Thanks

Bill Bishop
Consultant, Mainframe Engineer
Mainframe and Scheduling | Infrastructure Technology Services 
Toyota Motor North America
 bill.bis...@toyota.com
Office:  (469) 292-5149
Cell:  (502) 316-4386

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mike Shorkend
Sent: Thursday, March 28, 2019 9:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: FTPS breaks on z14-ZR1

No firewall, and like I said, nothing else has changed.

@Bill - we did go from OSA5 to OSA6. I am not aware of how we would upgrade the 
OSA software?


On Thu, 28 Mar 2019 at 16:06, scott Ford  wrote:

> If your running PASV FTP.DATA and the TCPIP profile must be changed.
> Inbound port 20/21 are good for PASV , but outbound is a different story.
> Are you running z/OS to z/OS ? Is there an intervening firewall ?
>
> Scott
>
> On Thu, Mar 28, 2019 at 10:02 AM Carmen Vitullo 
> wrote:
>
> > ok, if you don't mind keep us posted, we'll be moving to a Z14
> eventually,
> > if there's some gotya's going from Z13 to z14 I'd like to know 
> > thanks and good luck
> >
> >
> >
> > Carmen Vitullo
> >
> > - Original Message -
> >
> > From: "Mike Shorkend" 
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Sent: Thursday, March 28, 2019 8:55:48 AM
> > Subject: Re: FTPS breaks on z14-ZR1
> >
> > The z/OS definitions for both systems are identical.
> > Looking at the other ideas mentioned
> >
> > Thanks
> >
> > On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht < 
> > elardus.engelbre...@sita.co.za> wrote:
> >
> > > Carmen Vitullo wrote:
> > >
> > > >Another possible cause of the 425 error code is the SSL 
> > > >requirements
> on
> > > the server. In the case of the following error message:
> > >
> > > > * 425 unable to build data connection: Operation not permitted.
> > >
> > > In this case, check and compare on z13 and z14 what Crypto cards 
> > > and
> > keys
> > > do you have.
> > >
> > > Groete / Greetings
> > > Elardus Engelbrecht
> > >
> > > --
> > >  For IBM-MAIN subscribe / signoff / archive access 
> > > instructions, send email to lists...@listserv.ua.edu with the 
> > > message: INFO IBM-MAIN
> > >
> >
> >
> > --
> > Mike Shorkend
> > m...@shorkend.com
> > www.shorkend.com
> > Tel: +972524208743
> > Fax: +97239772196
> >
> > 
> > -- 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
>


--
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

--
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: FTPS breaks on z14-ZR1

[Mike Shorkend]

I would assume that it would be included in the FIXCAT for the z14, but I
will check.

On Thu, 28 Mar 2019 at 16:33, Bill Bishop (TMNA) 
wrote:

> Sorry, it was the crypto express software.
>
> We went from Crypto 5 to Crypto 6 cards and missed updating the ICSF
> software
>
> Thanks
>
> Bill Bishop
> Consultant, Mainframe Engineer
> Mainframe and Scheduling | Infrastructure Technology Services
> Toyota Motor North America
>  bill.bis...@toyota.com
> Office:  (469) 292-5149
> Cell:  (502) 316-4386
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Mike Shorkend
> Sent: Thursday, March 28, 2019 9:28 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: FTPS breaks on z14-ZR1
>
> No firewall, and like I said, nothing else has changed.
>
> @Bill - we did go from OSA5 to OSA6. I am not aware of how we would
> upgrade the OSA software?
>
>
> On Thu, 28 Mar 2019 at 16:06, scott Ford  wrote:
>
> > If your running PASV FTP.DATA and the TCPIP profile must be changed.
> > Inbound port 20/21 are good for PASV , but outbound is a different story.
> > Are you running z/OS to z/OS ? Is there an intervening firewall ?
> >
> > Scott
> >
> > On Thu, Mar 28, 2019 at 10:02 AM Carmen Vitullo 
> > wrote:
> >
> > > ok, if you don't mind keep us posted, we'll be moving to a Z14
> > eventually,
> > > if there's some gotya's going from Z13 to z14 I'd like to know
> > > thanks and good luck
> > >
> > >
> > >
> > > Carmen Vitullo
> > >
> > > - Original Message -
> > >
> > > From: "Mike Shorkend" 
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Sent: Thursday, March 28, 2019 8:55:48 AM
> > > Subject: Re: FTPS breaks on z14-ZR1
> > >
> > > The z/OS definitions for both systems are identical.
> > > Looking at the other ideas mentioned
> > >
> > > Thanks
> > >
> > > On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht <
> > > elardus.engelbre...@sita.co.za> wrote:
> > >
> > > > Carmen Vitullo wrote:
> > > >
> > > > >Another possible cause of the 425 error code is the SSL
> > > > >requirements
> > on
> > > > the server. In the case of the following error message:
> > > >
> > > > > * 425 unable to build data connection: Operation not permitted.
> > > >
> > > > In this case, check and compare on z13 and z14 what Crypto cards
> > > > and
> > > keys
> > > > do you have.
> > > >
> > > > Groete / Greetings
> > > > Elardus Engelbrecht
> > > >
> > > > --
> > > >  For IBM-MAIN subscribe / signoff / archive access
> > > > instructions, send email to lists...@listserv.ua.edu with the
> > > > message: INFO IBM-MAIN
> > > >
> > >
> > >
> > > --
> > > Mike Shorkend
> > > m...@shorkend.com
> > > www.shorkend.com
> > > Tel: +972524208743
> > > Fax: +97239772196
> > >
> > > 
> > > -- 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
> >
>
>
> --
> Mike Shorkend
> m...@shorkend.com
> www.shorkend.com
> Tel: +972524208743
> Fax: +97239772196
>
> --
> 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
>


-- 
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

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

Re: XMITIP Arabic support

[Paul Gilmartin]

On Thu, 28 Mar 2019 10:01:52 +0400, Peter wrote:
>
>When I try to send PDS member as attachment which contains few Arabic words
>in it and users are able to read in Mainframe. When I send that as an
>attachment to the outlook the Arabic character are not coming up properly.
>
>Is anyone in the group able to use it for Arabic words successfully ?
> 
Does the problem lie in XMITIP or in TXT2PDF?

What code page(s) are you using?

Is there a problem in that z/OS stores Arabic text backwards; most desktop
systems store it forwards in a file.

-- gil

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

Re: XMITIP Arabic support

[Lizette Koehler]

Did you have the right code page set in Outlook for it to handle Arabic?  I am 
not sure outlook would know unless you told it what to use

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of
> Peter
> Sent: Wednesday, March 27, 2019 11:02 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: XMITIP Arabic support
> 
> Hi
> 
> When I try to send PDS member as attachment which contains few Arabic words
> in it and users are able to read in Mainframe. When I send that as an
> attachment to the outlook the Arabic character are not coming up properly.
> 
> Is anyone in the group able to use it for Arabic words successfully ?
> 
> 
> Regards
> 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

Re: Authorized and unauthorized in same address space

[Binyamin Dissen]

Two separate things:

1. Prepare user supplied authorized services and then change the job to
unauthorized - perfectly fine,as long as you follow standard authorized
service logic, i.e., never trust any user supplied address and use protected
storage as your worrkarea.

2. Run authorized tasks in parallel with unauthorized tasks - bigger issue.
You cannot use any user key storage - even the passed save area or the LE
anchor. No LM 14,12,12(13) at the end of your module - use SVC 3. All
STORAGE/GETMAIN to protected subpools. And if you will be fetching fetch
protected storage, you must block the unauthorized tasks while doing it so
that they cannot examine your RBs and possible see storage contents.

On Thu, 28 Mar 2019 09:06:02 -0400 Brian Chapman  wrote:

:>Searching through the archives, I quickly saw that this has been a repeat
:>heated discussion, but
:>all of the discussions seem to ignore the fact that CICS initializes as an
:>authorized address space, performs authorized work, and then disables
:>authorization to load unathorized programs from the DFHRPL tasklib. It does
:>what so many people deem to be a security integrity violation.
:>
:>I have an unauthorized address space that collects information from the
:>system and uses MQ or CICS EXCI (if MQ is unavailable) to transport the
:>data to another address space which stores the data to DB2. Having the
:>ability to execute authorize services would greatly increase the
:>functionality of this address space. Since neither of these transport
:>mechanisms are authorized, i cannot run authorized in the current setup.
:>
:>The idea is to execute the authorized requests as non-system supervisor PC
:>routines. One of the PC routines would be to simply disable JSCBAUTH (ONLY
:>disable. NEVER enable). Before invoking this PC routine, I perform a
:>MODESET to switch back to problem state and key 8. The only authorized
:>services performed before this switch would be the LXRES, ETDEF, ETCRE, and
:>ETCON services to build the PC routines. After invoking the JSCBAUTH
:>disable PC routine from the job step program, I cannot switch back.
:>Invoking a MODESET after the switch abends address space with a 047.
:>
:>From this point forward, all of the ATTACH and LOAD services are performed
:>with the supplied tasklib. The unauthorized code is COBOL. Before this
:>program is invoked, it initializes LE and replaces the default CEEZLOD and
:>CEEZDEL with my own version that loads from the tasklib.
:>
:>
:>Thank you,
:>
:>Brian Chapman
:>
:>--
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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

Re: Batch edit of large dataset - Solved

[Paul Gilmartin]

On Thu, 28 Mar 2019 06:58:36 -0500, Elardus Engelbrecht wrote:
>...
>I am familiar with using ISREDIT MACRO function interactively, so I first 
>tried out Alan Young's example in thread 'Re: JCL sample needed' posted on 19 
>Feb 2016.
>
>But I have problems to pass the two arguments for the ISREDIT CHANGE command. 
>It is easy (after lots of RTFM on KC! ;-D ) to do that interactively, but not 
>in batch.
>
Where does the problem arise?  Is it the TSO parser's meddling with delimited 
strings?

ISPF Edit assignment statements allow parenthesized names of Rexx variables to
be used as source or target, bypassing delimiter rigamarole.

Unfortunately, ISREDIT CHANGE has no such capability.

Sounds like an invitation for an RFE.

-- gil

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

Re: FTPS breaks on z14-ZR1

[Mark Jacobs]

If you didn't have the required ICSF FMID installed for CryptoExpress6 Cards, I 
don't think the FIXCAT would have caught it.

The systems assurance meeting (assuming IBM still holds them) should have 
covered it though.

Mark Jacobs


Sent from ProtonMail, Swiss-based encrypted email.

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

‐‐‐ Original Message ‐‐‐
On Thursday, March 28, 2019 10:37 AM, Mike Shorkend  
wrote:

> I would assume that it would be included in the FIXCAT for the z14, but I
> will check.
>
> On Thu, 28 Mar 2019 at 16:33, Bill Bishop (TMNA) bill.bis...@toyota.com
> wrote:
>
> > Sorry, it was the crypto express software.
> > We went from Crypto 5 to Crypto 6 cards and missed updating the ICSF
> > software
> > Thanks
> > Bill Bishop
> > Consultant, Mainframe Engineer
> > Mainframe and Scheduling | Infrastructure Technology Services
> > Toyota Motor North America
> > bill.bis...@toyota.com
> > Office: (469) 292-5149
> > Cell: (502) 316-4386
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> > Behalf Of Mike Shorkend
> > Sent: Thursday, March 28, 2019 9:28 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: FTPS breaks on z14-ZR1
> > No firewall, and like I said, nothing else has changed.
> > @Bill - we did go from OSA5 to OSA6. I am not aware of how we would
> > upgrade the OSA software?
> > On Thu, 28 Mar 2019 at 16:06, scott Ford idfli...@gmail.com wrote:
> >
> > > If your running PASV FTP.DATA and the TCPIP profile must be changed.
> > > Inbound port 20/21 are good for PASV , but outbound is a different story.
> > > Are you running z/OS to z/OS ? Is there an intervening firewall ?
> > > Scott
> > > On Thu, Mar 28, 2019 at 10:02 AM Carmen Vitullo cvitu...@hughes.net
> > > wrote:
> > >
> > > > ok, if you don't mind keep us posted, we'll be moving to a Z14
> > > > eventually,
> > > > if there's some gotya's going from Z13 to z14 I'd like to know
> > > > thanks and good luck
> > > > Carmen Vitullo
> > > > - Original Message -
> > > > From: "Mike Shorkend" mike.shork...@gmail.com
> > > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > > Sent: Thursday, March 28, 2019 8:55:48 AM
> > > > Subject: Re: FTPS breaks on z14-ZR1
> > > > The z/OS definitions for both systems are identical.
> > > > Looking at the other ideas mentioned
> > > > Thanks
> > > > On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht <
> > > > elardus.engelbre...@sita.co.za> wrote:
> > > >
> > > > > Carmen Vitullo wrote:
> > > > >
> > > > > > Another possible cause of the 425 error code is the SSL
> > > > > > requirements
> > > > > > on
> > > >
> > > > > the server. In the case of the following error message:
> > > > >
> > > > > > -   425 unable to build data connection: Operation not permitted.
> > > > >
> > > > > In this case, check and compare on z13 and z14 what Crypto cards
> > > > > and
> > > > > keys
> > > > > do you have.
> > > > > Groete / Greetings
> > > > > Elardus Engelbrecht
> > > > >
> > > > >  For IBM-MAIN subscribe / signoff / archive access
> > > > > instructions, send email to lists...@listserv.ua.edu with the
> > > > > message: INFO IBM-MAIN
> > > >
> > > > --
> > > > Mike Shorkend
> > > > m...@shorkend.com
> > > > www.shorkend.com
> > > > Tel: +972524208743
> > > > Fax: +97239772196
> > > >
> > > > -- 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
> >
> > --
> > Mike Shorkend
> > m...@shorkend.com
> > www.shorkend.com
> > Tel: +972524208743
> > Fax: +97239772196
> >
> > 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
>
> --
>
> Mike Shorkend
> m...@shorkend.com
> www.shorkend.com
> Tel: +972524208743
> Fax: +97239772196
>
> --
>
> 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: part of TSO commands are no RESPONSE from PGM=IKJEFT01

[Barry Merrill]

Only TSO commands that internally use GETLINE/PUTLINE instead of TGET/TPUT 
macros can be executed under TSO in batch.  You can tell by trying it, and if 
it works, then the command used GETLINE/PUTLINE.  A command using TGET/TPUT 
causes the job to act likeit was not executed or to terminate at that point 
without executing
further commands in the input stream.

Barry Merrill

Herbert W “Barry” Merrill, PHD
President-Programmer
Merrill Consultants
MXG Software
10717 Cromwell Drive
Dallas, TX 75229
www.mxg.com
214 351 1966 

ad...@mxg.com for business questions
supp...@mxg.com for technical questions
ba...@mxg.com  



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jason Cai
Sent: Wednesday, March 27, 2019 10:08 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: part of TSO commands are no RESPONSE from PGM=IKJEFT01

Hi 

The part of output  is correct. the others of output is empty.

Whether there are a lot of XQUERY in one job?



Best Regards,
Jason Cai

 
From: Hobart Spitz
Date: 2019-03-25 21:14
To: IBM-MAIN
Subject: Re: part of TSO commands are no RESPONSE from PGM=IKJEFT01 I think you 
need to give us some more information.  I'm not familiar with XQUERY and it's 
quirks.  What kind of response are you expecting?  Is the output dataset empty?
 
That said, it's been so long since I've run anything in batch without REXX I 
don't recall if vanilla TSO reports non-zero return codes.
 
You may want to find/tweak a mainframe version of REXXTRY, and add PARM=REXXTRY 
to your EXEC.  Be sure to have a SYSEXEC DD for the library where you put 
REXXTRY.  In addition to return code reporting REXXTRY let's you use most REXX 
features.  E.g., you can set a variable to the DSN and/or VOL if the change 
between runs. Put your commands in quotation marks, and follow REXX syntax.
 
It looks like you might benefit from writing a batch REXX EXEC to do that work.
 
See these documents for more information.
 
  e741ba69-356d-4ffc-84dd-91ae1e883fb1.pdf

 
  Modernizing z/OS Batch Processing

 
 
 
 
 
 
On Sun, 24 Mar 2019, 8:43 pm Jason Cai,  wrote:
 
>
> Hi all
>
>   We issue a lot of TSO  commands ( XQUERY NP2XRE 
> DATASET('XXX.TST')
> DISP(MOD) VOLUME(BJ2817) DETAIL )
>
> by PGM=IKJEFT01 .The sample is blow:
>
> //S1EXEC PGM=IKJEFT01,REGION=0M
> //SYSTSPRT DD SYSOUT=*
> //SYSPRINT DD SYSOUT=*
> //SYSTSIN  DD *
>  XQUERY NP2XRE DATASET('XXX.TST') DISP(MOD) VOLUME(BJ2817) DETAIL  
> XQUERY NP2XRE DATASET('xxx.TST') DISP(MOD) VOLUME(BJ2897) DETAIL  
> XQUERY NP2XRF DATASET('xxx.TST') DISP(MOD) VOLUME(BJ2917) DETAIL
>
>
> We found there are just  part of this commands responsed.
>
>
>
> Any thoughts/comments/suggestions would be greatly appreciated
>
>
>
>
>
> Best Regards,
> Jason Cai
>
>
> --
> 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: Authorized and unauthorized in same address space

[Brian Chapman]

*2. Run authorized tasks in parallel with unauthorized tasks - bigger
issue.You cannot use any user key storage - even the passed save area or
the LEanchor. No LM 14,12,12(13) at the end of your module - use SVC 3.
AllSTORAGE/GETMAIN to protected subpools. And if you will be fetching
fetchprotected storage, you must block the unauthorized tasks while doing
it so*
*that they cannot examine your RBs and possible see storage contents.  *

Binjamin,

Are supervisor PC routines included? The save areas and PR instruction are
handled by z/OS. I definitely see the exposure of modifying user passed
data without any validation, but this same exposure is present in space
switching PC routines hosted by an authorized address space.




Thank you,

Brian Chapman


On Thu, Mar 28, 2019 at 10:45 AM Binyamin Dissen 
wrote:

> Two separate things:
>
> 1. Prepare user supplied authorized services and then change the job to
> unauthorized - perfectly fine,as long as you follow standard authorized
> service logic, i.e., never trust any user supplied address and use
> protected
> storage as your worrkarea.
>
> 2. Run authorized tasks in parallel with unauthorized tasks - bigger issue.
> You cannot use any user key storage - even the passed save area or the LE
> anchor. No LM 14,12,12(13) at the end of your module - use SVC 3. All
> STORAGE/GETMAIN to protected subpools. And if you will be fetching fetch
> protected storage, you must block the unauthorized tasks while doing it so
> that they cannot examine your RBs and possible see storage contents.
>
> On Thu, 28 Mar 2019 09:06:02 -0400 Brian Chapman 
> wrote:
>
> :>Searching through the archives, I quickly saw that this has been a repeat
> :>heated discussion, but
> :>all of the discussions seem to ignore the fact that CICS initializes as
> an
> :>authorized address space, performs authorized work, and then disables
> :>authorization to load unathorized programs from the DFHRPL tasklib. It
> does
> :>what so many people deem to be a security integrity violation.
> :>
> :>I have an unauthorized address space that collects information from the
> :>system and uses MQ or CICS EXCI (if MQ is unavailable) to transport the
> :>data to another address space which stores the data to DB2. Having the
> :>ability to execute authorize services would greatly increase the
> :>functionality of this address space. Since neither of these transport
> :>mechanisms are authorized, i cannot run authorized in the current setup.
> :>
> :>The idea is to execute the authorized requests as non-system supervisor
> PC
> :>routines. One of the PC routines would be to simply disable JSCBAUTH
> (ONLY
> :>disable. NEVER enable). Before invoking this PC routine, I perform a
> :>MODESET to switch back to problem state and key 8. The only authorized
> :>services performed before this switch would be the LXRES, ETDEF, ETCRE,
> and
> :>ETCON services to build the PC routines. After invoking the JSCBAUTH
> :>disable PC routine from the job step program, I cannot switch back.
> :>Invoking a MODESET after the switch abends address space with a 047.
> :>
> :>From this point forward, all of the ATTACH and LOAD services are
> performed
> :>with the supplied tasklib. The unauthorized code is COBOL. Before this
> :>program is invoked, it initializes LE and replaces the default CEEZLOD
> and
> :>CEEZDEL with my own version that loads from the tasklib.
> :>
> :>
> :>Thank you,
> :>
> :>Brian Chapman
> :>
> :>--
> :>For IBM-MAIN subscribe / signoff / archive access instructions,
> :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>
> --
> 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: Batch edit of large dataset

[Sri h Kolusu]

> I've got a requirement where a single line in large dataset
> (RECFM=VB or FB and LRECL=) needs to be edited/
> changed in batch. Changed dataset is then to be used in next job steps.

> I have a look at the different utilities. One utility I could find
> useful is the EDIT and CHANGE commands running under IKJEFT.

Elardus Engelbrecht,

You skipped over the most important Utility DFSORT. It can find and REPLACE
one or more strings.  Here is an example.


//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DISP=SHR,DSN=Your Input VB file with LRECL>2048
//SORTOUT  DD SYSOUT=*
//SYSINDD *
  OPTION COPY
  INREC FINDREP=(ENDPOS=2004,
 INOUT=(C'ONE',C'TWO',
C'FOUR',C'FIVE'))
//*


Note :  For FB fies the end position would be 2000 ( No addition of the
RDW)

Further if you have any questions please let me know

Thanks,
Kolusu
DFSORT Development
IBM Corporation


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

R+ / Reliability Plus

[Steve Thompson]

Does anyone remember this product? [Did SYS1.LOGREC processing 
and reporting for multiple entities]


Does anyone know if there is an equivalent product for reporting 
on one's own sysplex(es)?


I've been searching and I can't find who owns it or it if is 
still in use/available. And trying to find a similar product, "r" 
is a language, Plus gives you stuff you don't care about, etc. -- 
makes it difficult to search.


Thanks in advance,
Steve Thompson

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

Re: XMITIP Arabic support

[Peter]

Hi

My z/OS system doesn't have IBM-420 to support Arabic character in flight
while sending that to outlook. Outlook side has support for Arabic .


I have seen a member in XMITIP called SMPTBL which builds NLS support for
any language code page you want for

I have build the source for it using EBCDIC IBM-420 and ASCII ISO-8959-6.

When I try to use the newly translation table source as dataset  in CSSMTP
under _ICONV parm at /etc/cssmtp.env it fails saying the CCSID is not
supported.

Which means zOS don't have IBM-420. How do I get create the new IBM-420 in
the system to use it ?

Peter



On Thu, 28 Mar, 2019, 6:40 PM Lizette Koehler, 
wrote:

> Did you have the right code page set in Outlook for it to handle Arabic?
> I am not sure outlook would know unless you told it what to use
>
> Lizette
>
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> Behalf Of
> > Peter
> > Sent: Wednesday, March 27, 2019 11:02 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: XMITIP Arabic support
> >
> > Hi
> >
> > When I try to send PDS member as attachment which contains few Arabic
> words
> > in it and users are able to read in Mainframe. When I send that as an
> > attachment to the outlook the Arabic character are not coming up
> properly.
> >
> > Is anyone in the group able to use it for Arabic words successfully ?
> >
> >
> > Regards
> > 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

Re: R+ / Reliability Plus

[John McKown]

IIRC, R+ was a CA product.

On Thu, Mar 28, 2019 at 10:24 AM Steve Thompson  wrote:

> Does anyone remember this product? [Did SYS1.LOGREC processing
> and reporting for multiple entities]
>
> Does anyone know if there is an equivalent product for reporting
> on one's own sysplex(es)?
>
> I've been searching and I can't find who owns it or it if is
> still in use/available. And trying to find a similar product, "r"
> is a language, Plus gives you stuff you don't care about, etc. --
> makes it difficult to search.
>
> Thanks in advance,
> Steve Thompson
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
I just burned 2000 calories!
That's the last time I'll nap with brownies in the oven.

Maranatha! <><
John McKown

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

Re: R+ / Reliability Plus

[Allan Staller]

It was originally R+ and then acquired by CA (CA-9?).
IIRC, CA stopped marketing it fairly soon thereafter.

At this point, I would guess it has been unavailable for more than 20 years.

HTH,

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John McKown
Sent: Thursday, March 28, 2019 10:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: R+ / Reliability Plus

IIRC, R+ was a CA product.

On Thu, Mar 28, 2019 at 10:24 AM Steve Thompson  wrote:

> Does anyone remember this product? [Did SYS1.LOGREC processing and
> reporting for multiple entities]
>
> Does anyone know if there is an equivalent product for reporting on
> one's own sysplex(es)?
>
> I've been searching and I can't find who owns it or it if is still in
> use/available. And trying to find a similar product, "r"
> is a language, Plus gives you stuff you don't care about, etc. --
> makes it difficult to search.
>
> Thanks in advance,
> Steve Thompson
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
I just burned 2000 calories!
That's the last time I'll nap with brownies in the oven.

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::
--
The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.
--

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

Re: Using DFSORT to generate data

[Martin Packer]

You raise a good point but we don't know what kind of "real" timestamp 
they want. We could increment by, say, 1 second or 1 millisecond. Random 
increments is not something DFSORT can do.

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:   Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   28/03/2019 14:23
Subject:Re: Using DFSORT to generate data
Sent by:IBM Mainframe Discussion List 



On Thu, 28 Mar 2019 13:21:40 +, Martin Packer wrote:

>ON INREC, if you used IFTHEN WHEN=INIT you could prime with a timestamp
>and then with a subsequent IFTHEN overwrite the last few bytes of the
>timestamp with an incrementing value.
> 
But what if the OP requires an actual timestamp rather than merely
an incrementing value?

>Kind of like a pipeline. Though, when I explained what he'd built to 
Frank
>Yaeger he didn't respond as a plumber would. :-)


>From:   Bill Ashton
>Date:   28/03/2019 12:32
>
>Kolusu, I would like one little tweak, if you please - is it possible to
>get the timestamp fresh on each record, instead of using the same
>timestamp
>value for all of them?

--gil

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

CA OPS/MVS

[Martin Packer]

I'm asking on behalf of a customer (but I want to know, too, for all the 
right reasons):

Is it possible with CA OPS/MVS to alter the weights for LPARs? I would 
assume that if it could it would use BCPii.

The background is that we are contemplating shifting weights between LPARs 
at certain times of day. This is their automation tool of choice. And I 
don't know how people alter weights through automation.

Thanks, 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
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: Using DFSORT to generate data

[Steve Smith]

 Some people are never satisfied.  Write a little E15 exit.

sas

On Thu, Mar 28, 2019 at 11:44 AM Martin Packer 
wrote:

> You raise a good point but we don't know what kind of "real" timestamp
> they want. We could increment by, say, 1 second or 1 millisecond. Random
> increments is not something DFSORT can do.
>
> Cheers, Martin

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

Re: XMITIP Arabic support

[Paul Gilmartin]

On 2019-03-28, at 09:23:51, Peter wrote:
> 
> My z/OS system doesn't have IBM-420 to support Arabic character in flight
> while sending that to outlook. Outlook side has support for Arabic .
> 
> I have seen a member in XMITIP called SMPTBL which builds NLS support for
> any language code page you want for
> 
> I have build the source for it using EBCDIC IBM-420 and ASCII ISO-8959-6.
Have you tried  ISO-8859-6?
iconv on Linux has IBM420 and ISO8859-6.
> 
> When I try to use the newly translation table source as dataset  in CSSMTP
> under _ICONV parm at /etc/cssmtp.env it fails saying the CCSID is not
> supported.
> 
> Which means zOS don't have IBM-420. How do I get create the new IBM-420 in
> the system to use it ?

-- gil

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

Re: Remote access to Z14 ZR1 Support Element via HMC question

[R.S.]

Configuring from scratch could mean from text file.
However the text file can be generated from old machine.

BTW: I'm pretty sure I configured ICC using text file and the text file 
was sligthly modified version of exported one from older machine.


--
Radoslaw Skorupka
Lodz, Poland






W dniu 2019-03-27 o 21:54, Laurence Chiu pisze:

I'm wondering that too. The Redbook

https://www.redbooks.ibm.com/redbooks/pdfs/sg248460.pdf

Page 149

says when installing a new Z14 you must configure OSA-ICC from scratch and
I wonder if they thought that could just copy the configuration from the
zBC12

I hate to ask the techs these questions when I'm only the PM but it can't
hurt I guess?

On Wed, Mar 27, 2019, 8:50 PM Peter  wrote:


Could be client IP hasn't been defined in the session table.try adding it
and check

On Wed, 27 Mar, 2019, 11:47 AM Laurence Chiu,  wrote:


Well I don't know what the techs did but they managed to access the z14
HMC, copy across LPAR, IOCDS etc. and we've successfully IPL'ed a couple

of

LPARs from the same DS8870 that our zBC12 uses. That's progress,

But now we are finding that we cannot access the OSA-ICC for remote

access.

The user gets the logon screen but cannot progress. I wonder if it's
because the LU name or client IP hasn't been defined in the session

table?

On Mon, Mar 25, 2019 at 3:54 PM Mike Smith  wrote:


Laurence,

The Top Guns are different for each region.  The best way to get the
proper one involved would be to contact the SSR directly or open a HW
incident.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]

On

Behalf Of Laurence Chiu
Sent: Sunday, March 24, 2019 5:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Remote access to Z14 ZR1 Support Element via HMC question

hi Mike

Your partially right. The tech support people want to access the hmc
remotely because they are located almost 80 kilometres from the

datacenter

so that makes sense.

The zBC12 and the Z14 sit alongside each other in the DR datacenter.

Both

are on the same LAN segment and subnet.

However if they cannot even access the hmc locally in the same LAN

segment

the remote access is not really an issue.

I'm not a technical person in this area but I think the goal is to

somehow

replicate the settings from the z12 hmc to the z14 since we basically

want

to maintain the same iocds LPAR configuration logon credentials etc.

There seems to be a reluctance to use a USB drive because they want all

the

HMC's on the network to replicate credentials and settings from more

one

master copy. Using a USB drive would bypass that process. But it was
certainly allow us to get the new Z 14 up and running.

They are in the datacenter again today and I have not had an update so

far.

But should they still encounter connection problems who is this Top

Gun Z

you speak of?

l to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




==

Jeśli nie jesteś adresatem tej wiadomości:

- powiadom nas o tym w mailu zwrotnym (dziękujemy!),
- usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub zapisałeś 
na dysku).
Wiadomość ta może zawierać chronione prawem informacje, które może wykorzystać 
tylko adresat.Przypominamy, że każdy, kto rozpowszechnia (kopiuje, rozprowadza) 
tę wiadomość lub podejmuje podobne działania, narusza prawo i może podlegać 
karze.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
01.01.2018 r. wynosi 169.248.488 złotych.

If you are not the addressee of this message:

- let us know by replying to this e-mail (thank you!),
- delete this message permanently (including all the copies which you have 
printed out or saved).
This message may contain legally protected information, which may be used 
exclusively by the addressee.Please be reminded that anyone who disseminates 
(copies, distributes) this message or takes any similar action, violates the 
law and may be penalised.

mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the Capital 
City of Warsaw, 12th Commercial Division of the National Court Register, KRS 
025237, NIP: 526-021-50-88. Fully paid-up share capital amounting to PLN 
169,248,488 as at 1 January 2018.

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

Re: R+ / Reliability Plus

[Steve Thompson]

Thanks for the answers. I should have thought to go to CA's site.

But there is no other product similar to what R+ was doing?

I remember that I had to capture all the logrecs and put them on 
a tape and send them off to some place and then we would get a 
report comparing our shop to all the other users. And it allowed 
us to see issues specifically with a certain vendor and/or type 
of hardware.


Made things interesting when looking for certain items like 3350s 
(yeah, it has been that long since I last used it).


But it would seem to be the kind of thing one would want to have 
against a data base of items within one's own shop to run some 
compares with.


Regards,
Steve Thompson

On 3/28/19 11:34 AM, Allan Staller wrote:

It was originally R+ and then acquired by CA (CA-9?).
IIRC, CA stopped marketing it fairly soon thereafter.

At this point, I would guess it has been unavailable for more than 20 years.

HTH,

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John McKown
Sent: Thursday, March 28, 2019 10:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: R+ / Reliability Plus

IIRC, R+ was a CA product.

On Thu, Mar 28, 2019 at 10:24 AM Steve Thompson  wrote:


Does anyone remember this product? [Did SYS1.LOGREC processing and
reporting for multiple entities]

Does anyone know if there is an equivalent product for reporting on
one's own sysplex(es)?

I've been searching and I can't find who owns it or it if is still in
use/available. And trying to find a similar product, "r"
is a language, Plus gives you stuff you don't care about, etc. --
makes it difficult to search.

Thanks in advance,
Steve Thompson

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




--
I just burned 2000 calories!
That's the last time I'll nap with brownies in the oven.

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::
--
The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.
--

--
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: part of TSO commands are no RESPONSE from PGM=IKJEFT01

[Seymour J Metz]

TSO/E Programming Services claims that it is ignored.


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


From: IBM Mainframe Discussion List  on behalf of 
Barry Merrill 
Sent: Thursday, March 28, 2019 10:57 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: part of TSO commands are no RESPONSE from PGM=IKJEFT01

Only TSO commands that internally use GETLINE/PUTLINE instead of TGET/TPUT 
macros can be executed under TSO in batch.  You can tell by trying it, and if 
it works, then the command used GETLINE/PUTLINE.  A command using TGET/TPUT 
causes the job to act likeit was not executed or to terminate at that point 
without executing
further commands in the input stream.

Barry Merrill

Herbert W “Barry” Merrill, PHD
President-Programmer
Merrill Consultants
MXG Software
10717 Cromwell Drive
Dallas, TX 75229
http://secure-web.cisco.com/1ssa1g5Qgl4X9zinV_EdOhpDLJUuei1GfgjAu-gvr50Y_6lGK8Gr9H1-U8fGJ8UDwgpaLwNRMRbsgMnxCV6u_n9JmQg2KJqoHRgYt-LGAAHI3pI0_Ji1lYRwMfz_d1DHzQtzm1ld7y2-5ng5OFg7_-kX4uVIR4cW5c3Xzekp-DkAE8qJzeeBCjOfEB-SLvbAD8zcWvDhzoor7pFnBlDKOopY5DfsKXhZpNsQRrOjCciOgpY7V8cTswaydu_jprYfLDAhGOI7axteg5O67mejoOlhizh1s0x1SAXduo6JGx3ZPP4AqtJK1_H2RJ2gAZssyv6JIgWSkuo_eUuxLVugY6A0bUolmijYYbgo-ms8J03o0ZRnhgx4HsIVmxeh2TD0MY_gf_k4rnNZRufts2vR1zSnZ3p8QjUq77O0h4BONOPYjMwCNVFgaUQ_gwaMvXEmC/http%3A%2F%2Fwww.mxg.com
214 351 1966

ad...@mxg.com for business questions
supp...@mxg.com for technical questions
ba...@mxg.com



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jason Cai
Sent: Wednesday, March 27, 2019 10:08 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: part of TSO commands are no RESPONSE from PGM=IKJEFT01

Hi

The part of output  is correct. the others of output is empty.

Whether there are a lot of XQUERY in one job?



Best Regards,
Jason Cai


From: Hobart Spitz
Date: 2019-03-25 21:14
To: IBM-MAIN
Subject: Re: part of TSO commands are no RESPONSE from PGM=IKJEFT01 I think you 
need to give us some more information.  I'm not familiar with XQUERY and it's 
quirks.  What kind of response are you expecting?  Is the output dataset empty?

That said, it's been so long since I've run anything in batch without REXX I 
don't recall if vanilla TSO reports non-zero return codes.

You may want to find/tweak a mainframe version of REXXTRY, and add PARM=REXXTRY 
to your EXEC.  Be sure to have a SYSEXEC DD for the library where you put 
REXXTRY.  In addition to return code reporting REXXTRY let's you use most REXX 
features.  E.g., you can set a variable to the DSN and/or VOL if the change 
between runs. Put your commands in quotation marks, and follow REXX syntax.

It looks like you might benefit from writing a batch REXX EXEC to do that work.

See these documents for more information.

  e741ba69-356d-4ffc-84dd-91ae1e883fb1.pdf


  Modernizing z/OS Batch Processing







On Sun, 24 Mar 2019, 8:43 pm Jason Cai,  wrote:

>
> Hi all
>
>   We issue a lot of TSO  commands ( XQUERY NP2XRE
> DATASET('XXX.TST')
> DISP(MOD) VOLUME(BJ2817) DETAIL )
>
> by PGM=IKJEFT01 .The sample is blow:
>
> //S1EXEC PGM=IKJEFT01,REGION=0M
> //SYSTSPRT DD SYSOUT=*
> //SYSPRINT DD SYSOUT=*
> //SYSTSIN  DD *
>  XQUERY NP2XRE DATASET('XXX.TST') DISP(MOD) VOLUME(BJ2817) DETAIL
> XQUERY NP2XRE DATASET('xxx.TST') DISP(MOD) VOLUME(BJ2897) DETAIL
> XQUERY NP2XRF DATASET('xxx.TST') DISP(MOD) VOLUME(BJ2917) DETAIL
>
>
> We found there are just  part of this commands responsed.
>
>
>
> Any thoughts/comments/suggestions would be greatly appreciated
>
>
>
>
>
> Best Regards,
> Jason Cai
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

---

Re: CA OPS/MVS

[Jerry Whitteridge]

Martin - I know OPS/MVS has HMC access capabilities/BCPII interfaces, but
have not implemented in our shop yet so couldn't give details.

Jerry Whitteridge
Delivery Manager / Mainframe Architect
GTS - Safeway Account
602 527 4871 Mobile
jerry.whitteri...@ibm.com

IBM Services

IBM Mainframe Discussion List  wrote on
03/28/2019 08:43:28 AM:

> From: Martin Packer 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 03/28/2019 08:44 AM
> Subject: CA OPS/MVS
> Sent by: IBM Mainframe Discussion List 
>
> I'm asking on behalf of a customer (but I want to know, too, for all the
> right reasons):
>
> Is it possible with CA OPS/MVS to alter the weights for LPARs? I would
> assume that if it could it would use BCPii.
>
> The background is that we are contemplating shifting weights between
LPARs
> at certain times of day. This is their automation tool of choice. And I
> don't know how people alter weights through automation.
>
> Thanks, 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://urldefense.proofpoint.com/v2/url?
>
u=https-3A__itunes.apple.com_gb_podcast_mainframe-2Dperformance-2Dtopics_id1127943573-3Fmt-3D2&d=DwIBAg&c=jf_iaSHvJObTbx-

>
siA1ZOg&r=0avyVTgpzBFlo1QAgHxCtqKtRE6Ldl_1M9tI2p7Kc8E&m=CDP0xoxpTkHzYzM0X_L62NRyrf2_Lc0JC9MebTC3P8E&s=NXTZquERd92BU2NFth2FyrvCrKMpSX9SJV8UOULzZmc&e=

>
>
> Youtube channel: https://urldefense.proofpoint.com/v2/url?
>
u=https-3A__www.youtube.com_channel_UCu-5F65HaYgksbF6Q8SQ4oOvA&d=DwIBAg&c=jf_iaSHvJObTbx-

>
siA1ZOg&r=0avyVTgpzBFlo1QAgHxCtqKtRE6Ldl_1M9tI2p7Kc8E&m=CDP0xoxpTkHzYzM0X_L62NRyrf2_Lc0JC9MebTC3P8E&s=dZTRs_SYHWL1C1vKZOlcZM4MznTUiwXoRYTC_pTMqG8&e=

> 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

Utility to parse fullword delimited flat file

[Frank Swarbrick]

Does anyone know of a standard z/OS utility that could parse a flatfile that 
has fullword delimited records?  That is, there is a fullword length followed 
by the record, followed by another fullword length field and another record, 
etc.  It would then write (sans length header) each record to a VB file.

Rather than writing my own program to parse it...

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

Re: Authorized and unauthorized in same address space

[Seymour J Metz]

AFAIK, no IBM code runs APF authorized and unauthorized code concurrently in 
the same address space, but rather makes the unauthorized code nondispatchable 
while the authorized code is running. Doesn't CICS turn off authorization 
before executing transactions? 


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


From: IBM Mainframe Discussion List  on behalf of 
Brian Chapman 
Sent: Thursday, March 28, 2019 9:06 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Authorized and unauthorized in same address space

Searching through the archives, I quickly saw that this has been a repeat
heated discussion, but
all of the discussions seem to ignore the fact that CICS initializes as an
authorized address space, performs authorized work, and then disables
authorization to load unathorized programs from the DFHRPL tasklib. It does
what so many people deem to be a security integrity violation.

I have an unauthorized address space that collects information from the
system and uses MQ or CICS EXCI (if MQ is unavailable) to transport the
data to another address space which stores the data to DB2. Having the
ability to execute authorize services would greatly increase the
functionality of this address space. Since neither of these transport
mechanisms are authorized, i cannot run authorized in the current setup.

The idea is to execute the authorized requests as non-system supervisor PC
routines. One of the PC routines would be to simply disable JSCBAUTH (ONLY
disable. NEVER enable). Before invoking this PC routine, I perform a
MODESET to switch back to problem state and key 8. The only authorized
services performed before this switch would be the LXRES, ETDEF, ETCRE, and
ETCON services to build the PC routines. After invoking the JSCBAUTH
disable PC routine from the job step program, I cannot switch back.
Invoking a MODESET after the switch abends address space with a 047.

>From this point forward, all of the ATTACH and LOAD services are performed
with the supplied tasklib. The unauthorized code is COBOL. Before this
program is invoked, it initializes LE and replaces the default CEEZLOD and
CEEZDEL with my own version that loads from the tasklib.


Thank you,

Brian Chapman

--
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: Batch edit of large dataset - Solved

[Seymour J Metz]

What problem do you have using ISREDIT in batch? How is the semicolon handled 
in ISREDIT?


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


From: IBM Mainframe Discussion List  on behalf of 
Elardus Engelbrecht 
Sent: Thursday, March 28, 2019 7:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Batch edit of large dataset - Solved

Elardus Engelbrecht wrote:

>I've got a requirement where a single line in large dataset (RECFM=VB or FB 
>and LRECL=) needs to be edited/changed in batch. Changed 
>dataset is then to be used in next job steps.

Solved! Whew! ;-)

I am familiar with using ISREDIT MACRO function interactively, so I first tried 
out Alan Young's example in thread 'Re: JCL sample needed' posted on 19 Feb 
2016.

But I have problems to pass the two arguments for the ISREDIT CHANGE command. 
It is easy (after lots of RTFM on KC! ;-D ) to do that interactively, but not 
in batch.

Eventually I discovered Sri h Kolusu's better example in the same thread too!

After some tailoring I get this:

//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DISP=SHR,DSN=...???...
//SORTOUT  DD DISP=SHR,DSN=...???...
//SYSINDD *
  OPTION COPY
  OUTREC FINDREP=(INOUT=(C'Pest',C'Breaker'))
//*

With this, I can change in whole dataset all occurances of 'Pest' to 'Breaker'. 
I (and they who asked me for assistance) don't care for now about the length 
difference after change operation.

Thanks to all who helped offline and online.

And to Sri, you are still amazing with all those magical solutions.

Thanks again!

Groete / Greetings
Elardus Engelbrecht


PS: Someone else posted this, but it is not working (?) even after I did some 
editing and also changed C to CHANGE:



//TSO EXEC PGM=IKJEFT01,REGION=8M,DYNAMNBR=75
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *
PROFILE PREFIX(userid)
EDIT NS28.DATA
V ON
C * 999 /NOT SCRTCH/NOT SCRTCH/ ALL
END NOSAVE
DELETE NS28.DATA
LISTD 'SYS1.PARMLIB' M
/*



--
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: XMITIP Arabic support

[Seymour J Metz]

What happens if you use Unicode with a UTF-8 transform? Also, do you have a 
bidi issue, a character rendering issue, or both?


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


From: IBM Mainframe Discussion List  on behalf of 
Peter 
Sent: Thursday, March 28, 2019 2:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: XMITIP Arabic support

Hi

When I try to send PDS member as attachment which contains few Arabic words
in it and users are able to read in Mainframe. When I send that as an
attachment to the outlook the Arabic character are not coming up properly.

Is anyone in the group able to use it for Arabic words successfully ?


Regards
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

Re: CA OPS/MVS

[Steve Horein]

I was just comparing OPS/MVS (what I grew up on):
https://docops.ca.com/ca-opsmvs/12-3/en/administrating/manage-the-processors/opshmc-parameters

...with System Automation for z/OS (what I support now):
https://www.ibm.com/support/knowledgecenter/SSWRCJ_4.1.0/com.ibm.safos.doc_4.1/OperatorGuide/ICNTL.html?pos=2


OPS/MVS appears to provide getAttribute and setAttribute functions that may
allow you to do what you want.

On Thu, Mar 28, 2019 at 10:43 AM Martin Packer 
wrote:

> I'm asking on behalf of a customer (but I want to know, too, for all the
> right reasons):
>
> Is it possible with CA OPS/MVS to alter the weights for LPARs? I would
> assume that if it could it would use BCPii.
>
> The background is that we are contemplating shifting weights between LPARs
> at certain times of day. This is their automation tool of choice. And I
> don't know how people alter weights through automation.
>
> Thanks, 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
> 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: Batch edit of large dataset

[Seymour J Metz]

EDIT does not require that that dataset be numbered. Of course, without line 
numbers you have to make more use of the DOWN and FIND subcommands, but it's 
still a piece of cake.

 TOP
 DOWN 7
 CHANGE * 1 /foo/bar/


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


From: IBM Mainframe Discussion List  on behalf of 
Elardus Engelbrecht 
Sent: Thursday, March 28, 2019 3:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Batch edit of large dataset

Hi to all,

I've got a requirement where a single line in large dataset (RECFM=VB or FB and 
LRECL=) needs to be edited/changed in batch. Changed dataset 
is then to be used in next job steps.

Sounds easy? Interactively with TSO yes, but they want it to be done in a batch 
job.

Something like c '???' '!!!' which can be easily done interactively.

I have a look at the different utilities. One utility I could find useful is 
the EDIT and CHANGE commands running under IKJEFT.

Unfortunately those IKJEFT01 commands require that the dataset lines need to be 
numbered.

I tried it out:

READY
  EDIT '??.TEST' OLD TEXT ASIS NONUM
EDIT
  CHANGE 1  2000 'ONE' 'TWO'
IKJ52502I DATA SET NOT LINE NUMBERED
EDIT
END

The IKJ52502I is not what I want. Is there a batch utility where I can edit a 
line in large dataset?

I am very sure I am overlooking something obvious.

Many thanks in advance.

Groete / Greetings
Elardus Engelbrecht

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

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

Re: Utility to parse fullword delimited flat file

[retired mainframer]

Have you considered DFSORT?

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Frank Swarbrick
> Sent: Thursday, March 28, 2019 9:16 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Utility to parse fullword delimited flat file
> 
> Does anyone know of a standard z/OS utility that could parse a flatfile
that has
> fullword delimited records?  That is, there is a fullword length followed
by the record,
> followed by another fullword length field and another record, etc.  It
would then write
> (sans length header) each record to a VB file.
> 
> Rather than writing my own program to parse it...

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

Re: FTPS breaks on z14-ZR1

[Mike Shorkend]

Thanks  guys, will keep you posted.

On Thu, 28 Mar 2019, 16:52 Mark Jacobs, <
0224d287a4b1-dmarc-requ...@listserv.ua.edu> wrote:

> If you didn't have the required ICSF FMID installed for CryptoExpress6
> Cards, I don't think the FIXCAT would have caught it.
>
> The systems assurance meeting (assuming IBM still holds them) should have
> covered it though.
>
> Mark Jacobs
>
>
> Sent from ProtonMail, Swiss-based encrypted email.
>
> GPG Public Key -
> https://api.protonmail.ch/pks/lookup?op=get&search=markjac...@protonmail.com
>
> ‐‐‐ Original Message ‐‐‐
> On Thursday, March 28, 2019 10:37 AM, Mike Shorkend <
> mike.shork...@gmail.com> wrote:
>
> > I would assume that it would be included in the FIXCAT for the z14, but I
> > will check.
> >
> > On Thu, 28 Mar 2019 at 16:33, Bill Bishop (TMNA) bill.bis...@toyota.com
> > wrote:
> >
> > > Sorry, it was the crypto express software.
> > > We went from Crypto 5 to Crypto 6 cards and missed updating the ICSF
> > > software
> > > Thanks
> > > Bill Bishop
> > > Consultant, Mainframe Engineer
> > > Mainframe and Scheduling | Infrastructure Technology Services
> > > Toyota Motor North America
> > > bill.bis...@toyota.com
> > > Office: (469) 292-5149
> > > Cell: (502) 316-4386
> > > -Original Message-
> > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On
> > > Behalf Of Mike Shorkend
> > > Sent: Thursday, March 28, 2019 9:28 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: FTPS breaks on z14-ZR1
> > > No firewall, and like I said, nothing else has changed.
> > > @Bill - we did go from OSA5 to OSA6. I am not aware of how we would
> > > upgrade the OSA software?
> > > On Thu, 28 Mar 2019 at 16:06, scott Ford idfli...@gmail.com wrote:
> > >
> > > > If your running PASV FTP.DATA and the TCPIP profile must be changed.
> > > > Inbound port 20/21 are good for PASV , but outbound is a different
> story.
> > > > Are you running z/OS to z/OS ? Is there an intervening firewall ?
> > > > Scott
> > > > On Thu, Mar 28, 2019 at 10:02 AM Carmen Vitullo cvitu...@hughes.net
> > > > wrote:
> > > >
> > > > > ok, if you don't mind keep us posted, we'll be moving to a Z14
> > > > > eventually,
> > > > > if there's some gotya's going from Z13 to z14 I'd like to know
> > > > > thanks and good luck
> > > > > Carmen Vitullo
> > > > > - Original Message -
> > > > > From: "Mike Shorkend" mike.shork...@gmail.com
> > > > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > > > Sent: Thursday, March 28, 2019 8:55:48 AM
> > > > > Subject: Re: FTPS breaks on z14-ZR1
> > > > > The z/OS definitions for both systems are identical.
> > > > > Looking at the other ideas mentioned
> > > > > Thanks
> > > > > On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht <
> > > > > elardus.engelbre...@sita.co.za> wrote:
> > > > >
> > > > > > Carmen Vitullo wrote:
> > > > > >
> > > > > > > Another possible cause of the 425 error code is the SSL
> > > > > > > requirements
> > > > > > > on
> > > > >
> > > > > > the server. In the case of the following error message:
> > > > > >
> > > > > > > -   425 unable to build data connection: Operation not
> permitted.
> > > > > >
> > > > > > In this case, check and compare on z13 and z14 what Crypto cards
> > > > > > and
> > > > > > keys
> > > > > > do you have.
> > > > > > Groete / Greetings
> > > > > > Elardus Engelbrecht
> > > > > >
> > > > > >  For IBM-MAIN subscribe / signoff / archive access
> > > > > > instructions, send email to lists...@listserv.ua.edu with the
> > > > > > message: INFO IBM-MAIN
> > > > >
> > > > > --
> > > > > Mike Shorkend
> > > > > m...@shorkend.com
> > > > > www.shorkend.com
> > > > > Tel: +972524208743
> > > > > Fax: +97239772196
> > > > >
> > > > > -- 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
> > >
> > > --
> > > Mike Shorkend
> > > m...@shorkend.com
> > > www.shorkend.com
> > > Tel: +972524208743
> > > Fax: +97239772196
> > >
> > > 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
> >
> > --
> >
> > Mike Shorkend
> > m...@shorkend.com
> > www.shorkend.com
> > Tel: +972524208743
> > Fax: +97239772196
> >
> >
> --
> >
> > For IBM-MAIN subscribe / signoff / arc

Re: Utility to parse fullword delimited flat file

[Seymour J Metz]

It should be easy in, e.g., Perl, REXX. Even in HLASM. I don't know of a 
utility.


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


From: IBM Mainframe Discussion List  on behalf of 
Frank Swarbrick 
Sent: Thursday, March 28, 2019 12:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Utility to parse fullword delimited flat file

Does anyone know of a standard z/OS utility that could parse a flatfile that 
has fullword delimited records?  That is, there is a fullword length followed 
by the record, followed by another fullword length field and another record, 
etc.  It would then write (sans length header) each record to a VB file.

Rather than writing my own program to parse 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: XMITIP Arabic support

[Peter]

Hi Paul

'Have you tried  ISO-8859-6?
iconv on Linux has IBM420 and ISO8859-6'

Can I call that from CSSMTP ? Any manual which can guide me to do this ?

On Thu, 28 Mar, 2019, 7:49 PM Paul Gilmartin, <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On 2019-03-28, at 09:23:51, Peter wrote:
> >
> > My z/OS system doesn't have IBM-420 to support Arabic character in flight
> > while sending that to outlook. Outlook side has support for Arabic .
> >
> > I have seen a member in XMITIP called SMPTBL which builds NLS support for
> > any language code page you want for
> >
> > I have build the source for it using EBCDIC IBM-420 and ASCII ISO-8959-6.
> Have you tried  ISO-8859-6?
> iconv on Linux has IBM420 and ISO8859-6.
> >
> > When I try to use the newly translation table source as dataset  in
> CSSMTP
> > under _ICONV parm at /etc/cssmtp.env it fails saying the CCSID is not
> > supported.
> >
> > Which means zOS don't have IBM-420. How do I get create the new IBM-420
> in
> > the system to use it ?
>
> -- 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: Utility to parse fullword delimited flat file

[John McKown]

On Thu, Mar 28, 2019 at 11:18 AM Frank Swarbrick <
frank.swarbr...@outlook.com> wrote:

> Does anyone know of a standard z/OS utility that could parse a flatfile
> that has fullword delimited records?  That is, there is a fullword length
> followed by the record, followed by another fullword length field and
> another record, etc.  It would then write (sans length header) each record
> to a VB file.
>
> Rather than writing my own program to parse it...
>

How about a really off the wall method? I am assuming the data consists of
a fullword length indication, followed by that number of data bytes.
Iinterestingly enough, that is exactly what a FILEDATA=RECORD UNIX file
looks like. So you could do something like:


//COPYUNIX EXEC PGM=BPXBATCH
//STDOUT   DD SYSOUT=*
//STDERR   DD SYSOUT=*
//STDINDD DUMMY
//STDPARM  DD *
SH cp -B "//'input.file'" >/tmp/X
/*
//*
//COPYBACK EXEC PGM=IEBGENER
//SYSPRINT DD   SYSOUT=*
//SYSINDD   DUMMY
//SYSUT1   DD   PATH='/tmp/X',FILEDATA=RECORD,
// PATHOPTS=(ORDONLY),PATHDISP=(DELETE,DELETE)
//SYSUT2   DD   DSN=something,DISP=(NEW,CATLG)
// UNIT=SYSDA,SPACE=(CYL,(???,???),RLSE),
// RECFM=VB,LRECL=?,BLKSIZE=0,DSORG=PS
//



-- 
I just burned 2000 calories!
That's the last time I'll nap with brownies in the oven.

Maranatha! <><
John McKown

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

Re: Authorized and unauthorized in same address space

[Brian Chapman]

*Doesn't CICS turn off authorization before executing transactions? *

I believe that is true. I believe it disables authorization before the PLT
(first opportunity for user code).


Thank you,

Brian Chapman


On Thu, Mar 28, 2019 at 12:18 PM Seymour J Metz  wrote:

> AFAIK, no IBM code runs APF authorized and unauthorized code concurrently
> in the same address space, but rather makes the unauthorized code
> nondispatchable while the authorized code is running. Doesn't CICS turn off
> authorization before executing transactions?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of Brian Chapman 
> Sent: Thursday, March 28, 2019 9:06 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Authorized and unauthorized in same address space
>
> Searching through the archives, I quickly saw that this has been a repeat
> heated discussion, but
> all of the discussions seem to ignore the fact that CICS initializes as an
> authorized address space, performs authorized work, and then disables
> authorization to load unathorized programs from the DFHRPL tasklib. It does
> what so many people deem to be a security integrity violation.
>
> I have an unauthorized address space that collects information from the
> system and uses MQ or CICS EXCI (if MQ is unavailable) to transport the
> data to another address space which stores the data to DB2. Having the
> ability to execute authorize services would greatly increase the
> functionality of this address space. Since neither of these transport
> mechanisms are authorized, i cannot run authorized in the current setup.
>
> The idea is to execute the authorized requests as non-system supervisor PC
> routines. One of the PC routines would be to simply disable JSCBAUTH (ONLY
> disable. NEVER enable). Before invoking this PC routine, I perform a
> MODESET to switch back to problem state and key 8. The only authorized
> services performed before this switch would be the LXRES, ETDEF, ETCRE, and
> ETCON services to build the PC routines. After invoking the JSCBAUTH
> disable PC routine from the job step program, I cannot switch back.
> Invoking a MODESET after the switch abends address space with a 047.
>
> From this point forward, all of the ATTACH and LOAD services are performed
> with the supplied tasklib. The unauthorized code is COBOL. Before this
> program is invoked, it initializes LE and replaces the default CEEZLOD and
> CEEZDEL with my own version that loads from the tasklib.
>
>
> Thank you,
>
> Brian Chapman
>
> --
> 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: FTPS breaks on z14-ZR1

[Cieri, Anthony]

I assume that you are doing some type of certificate exchange to 
support FTPS. If so, where are the certificates stored? In a SAF product in 
ICSF?  Crypto hardware could have changed!!


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mike Shorkend
Sent: Thursday, March 28, 2019 12:37 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: FTPS breaks on z14-ZR1

[[ SEI WARNING *** This email was sent from an external source. Do not open 
attachments or click on links from unknown or suspicious senders. *** ]]


Thanks  guys, will keep you posted.

On Thu, 28 Mar 2019, 16:52 Mark Jacobs, <
0224d287a4b1-dmarc-requ...@listserv.ua.edu> wrote:

> If you didn't have the required ICSF FMID installed for CryptoExpress6
> Cards, I don't think the FIXCAT would have caught it.
>
> The systems assurance meeting (assuming IBM still holds them) should have
> covered it though.
>
> Mark Jacobs
>
>
> Sent from ProtonMail, Swiss-based encrypted email.
>
> GPG Public Key -
> https://api.protonmail.ch/pks/lookup?op=get&search=markjac...@protonmail.com
>
> ‐‐‐ Original Message ‐‐‐
> On Thursday, March 28, 2019 10:37 AM, Mike Shorkend <
> mike.shork...@gmail.com> wrote:
>
> > I would assume that it would be included in the FIXCAT for the z14, but I
> > will check.
> >
> > On Thu, 28 Mar 2019 at 16:33, Bill Bishop (TMNA) bill.bis...@toyota.com
> > wrote:
> >
> > > Sorry, it was the crypto express software.
> > > We went from Crypto 5 to Crypto 6 cards and missed updating the ICSF
> > > software
> > > Thanks
> > > Bill Bishop
> > > Consultant, Mainframe Engineer
> > > Mainframe and Scheduling | Infrastructure Technology Services
> > > Toyota Motor North America
> > > bill.bis...@toyota.com
> > > Office: (469) 292-5149
> > > Cell: (502) 316-4386
> > > -Original Message-
> > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On
> > > Behalf Of Mike Shorkend
> > > Sent: Thursday, March 28, 2019 9:28 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: FTPS breaks on z14-ZR1
> > > No firewall, and like I said, nothing else has changed.
> > > @Bill - we did go from OSA5 to OSA6. I am not aware of how we would
> > > upgrade the OSA software?
> > > On Thu, 28 Mar 2019 at 16:06, scott Ford idfli...@gmail.com wrote:
> > >
> > > > If your running PASV FTP.DATA and the TCPIP profile must be changed.
> > > > Inbound port 20/21 are good for PASV , but outbound is a different
> story.
> > > > Are you running z/OS to z/OS ? Is there an intervening firewall ?
> > > > Scott
> > > > On Thu, Mar 28, 2019 at 10:02 AM Carmen Vitullo cvitu...@hughes.net
> > > > wrote:
> > > >
> > > > > ok, if you don't mind keep us posted, we'll be moving to a Z14
> > > > > eventually,
> > > > > if there's some gotya's going from Z13 to z14 I'd like to know
> > > > > thanks and good luck
> > > > > Carmen Vitullo
> > > > > - Original Message -
> > > > > From: "Mike Shorkend" mike.shork...@gmail.com
> > > > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > > > Sent: Thursday, March 28, 2019 8:55:48 AM
> > > > > Subject: Re: FTPS breaks on z14-ZR1
> > > > > The z/OS definitions for both systems are identical.
> > > > > Looking at the other ideas mentioned
> > > > > Thanks
> > > > > On Thu, 28 Mar 2019 at 15:09, Elardus Engelbrecht <
> > > > > elardus.engelbre...@sita.co.za> wrote:
> > > > >
> > > > > > Carmen Vitullo wrote:
> > > > > >
> > > > > > > Another possible cause of the 425 error code is the SSL
> > > > > > > requirements
> > > > > > > on
> > > > >
> > > > > > the server. In the case of the following error message:
> > > > > >
> > > > > > > -   425 unable to build data connection: Operation not
> permitted.
> > > > > >
> > > > > > In this case, check and compare on z13 and z14 what Crypto cards
> > > > > > and
> > > > > > keys
> > > > > > do you have.
> > > > > > Groete / Greetings
> > > > > > Elardus Engelbrecht
> > > > > >
> > > > > >  For IBM-MAIN subscribe / signoff / archive access
> > > > > > instructions, send email to lists...@listserv.ua.edu with the
> > > > > > message: INFO IBM-MAIN
> > > > >
> > > > > --
> > > > > Mike Shorkend
> > > > > m...@shorkend.com
> > > > > www.shorkend.com
> > > > > Tel: +972524208743
> > > > > Fax: +97239772196
> > > > >
> > > > > -- 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
> > >
> > > --
> > > Mike Shorkend
> > > m...@shorkend.com
> > > www.shorkend.com
> > > Tel: +972524208743
> > > Fax: +97

Re: R+ / Reliability Plus

[Allan Staller]

" But there is no other product similar to what R+ was doing?"

AFAIK, NO

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Steve Thompson
Sent: Thursday, March 28, 2019 11:00 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: R+ / Reliability Plus

Thanks for the answers. I should have thought to go to CA's site.

But there is no other product similar to what R+ was doing?

I remember that I had to capture all the logrecs and put them on a tape and 
send them off to some place and then we would get a report comparing our shop 
to all the other users. And it allowed us to see issues specifically with a 
certain vendor and/or type of hardware.

Made things interesting when looking for certain items like 3350s (yeah, it has 
been that long since I last used it).

But it would seem to be the kind of thing one would want to have against a data 
base of items within one's own shop to run some compares with.

Regards,
Steve Thompson

On 3/28/19 11:34 AM, Allan Staller wrote:
> It was originally R+ and then acquired by CA (CA-9?).
> IIRC, CA stopped marketing it fairly soon thereafter.
> 
> At this point, I would guess it has been unavailable for more than 20 years.
> 
> HTH,
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of John McKown
> Sent: Thursday, March 28, 2019 10:27 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: R+ / Reliability Plus
> 
> IIRC, R+ was a CA product.
> 
> On Thu, Mar 28, 2019 at 10:24 AM Steve Thompson  wrote:
> 
>> Does anyone remember this product? [Did SYS1.LOGREC processing and 
>> reporting for multiple entities]
>>
>> Does anyone know if there is an equivalent product for reporting on 
>> one's own sysplex(es)?
>>
>> I've been searching and I can't find who owns it or it if is still in 
>> use/available. And trying to find a similar product, "r"
>> is a language, Plus gives you stuff you don't care about, etc. -- 
>> makes it difficult to search.
>>
>> Thanks in advance,
>> Steve Thompson
>>
>> -
>> - For IBM-MAIN subscribe / signoff / archive access instructions, 
>> send email to lists...@listserv.ua.edu with the message: INFO 
>> IBM-MAIN
>>
> 
> 
> --
> I just burned 2000 calories!
> That's the last time I'll nap with brownies in the oven.
> 
> Maranatha! <><
> John McKown
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> ::DISCLAIMER::
> --
> --
> --
> 
> The contents of this e-mail and any attachment(s) are confidential and 
> intended for the named recipient(s) only. E-mail transmission is not 
> guaranteed to be secure or error-free as information could be intercepted, 
> corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses 
> in transmission. The e mail and its contents (with or without referred 
> errors) shall therefore not attach any liability on the originator or HCL or 
> its affiliates. Views or opinions, if any, presented in this email are solely 
> those of the author and may not necessarily reflect the views or opinions of 
> HCL or its affiliates. Any form of reproduction, dissemination, copying, 
> disclosure, modification, distribution and / or publication of this message 
> without the prior written consent of authorized representative of HCL is 
> strictly prohibited. If you have received this email in error please delete 
> it and notify the sender immediately. Before opening any email and/or 
> attachments, please check them for viruses and other defects.
> --
> --
> --
> 
> 
> --
> 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: CA OPS/MVS

[Peter DeFabritus]

Martin, I have a REXX EXEC that uses BCPii, not OPS/MVS, to dynamically
modify the weights for LPARs, if you'd like it.

On Thu, Mar 28, 2019 at 12:27 PM Steve Horein 
wrote:

> I was just comparing OPS/MVS (what I grew up on):
>
> https://docops.ca.com/ca-opsmvs/12-3/en/administrating/manage-the-processors/opshmc-parameters
>
> ...with System Automation for z/OS (what I support now):
>
> https://www.ibm.com/support/knowledgecenter/SSWRCJ_4.1.0/com.ibm.safos.doc_4.1/OperatorGuide/ICNTL.html?pos=2
>
>
> OPS/MVS appears to provide getAttribute and setAttribute functions that may
> allow you to do what you want.
>
> On Thu, Mar 28, 2019 at 10:43 AM Martin Packer 
> wrote:
>
> > I'm asking on behalf of a customer (but I want to know, too, for all the
> > right reasons):
> >
> > Is it possible with CA OPS/MVS to alter the weights for LPARs? I would
> > assume that if it could it would use BCPii.
> >
> > The background is that we are contemplating shifting weights between
> LPARs
> > at certain times of day. This is their automation tool of choice. And I
> > don't know how people alter weights through automation.
> >
> > Thanks, 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
> > 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
>

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

Re: Utility to parse fullword delimited flat file

[Frank Swarbrick]

Yes.  Not sure what parameters would be required.


From: IBM Mainframe Discussion List  on behalf of 
retired mainframer 
Sent: Thursday, March 28, 2019 10:29 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Utility to parse fullword delimited flat file

Have you considered DFSORT?

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Frank Swarbrick
> Sent: Thursday, March 28, 2019 9:16 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Utility to parse fullword delimited flat file
>
> Does anyone know of a standard z/OS utility that could parse a flatfile
that has
> fullword delimited records?  That is, there is a fullword length followed
by the record,
> followed by another fullword length field and another record, etc.  It
would then write
> (sans length header) each record to a VB file.
>
> Rather than writing my own program to parse 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: Using DFSORT to generate data

[Sri h Kolusu]

> Kolusu, I would like one little tweak, if you please - is it possible to
> get the timestamp fresh on each record, instead of using the same
timestamp
> value for all of them?
>

Bill,

Unfortunately DFSORT cannot get a fresh timestamp on each record. As far as
I know even DB2 does not give you fresh timestamp on each record.

If you want a unique value of timestamp, then I can show you as to what
Martin Packer suggested. Here are the updated control cards for generating
unique timestamp.

//SYSINDD *
  OPTION COPY
  INREC BUILD=(DATE5)

  OUTFIL REPEAT=100,
  IFOUTLEN=100,  $ LRECL=100
  IFTHEN=(WHEN=INIT,
   OVERLAY=(101:SEQNUM,6,ZD,START=0,
108:12,2,ZD,MUL,+3600,ADD,   $ HH * 3600 +
15,2,ZD,MUL,+0060,ADD, MM * 0060 +
18,2,ZD,M11,LENGTH=8,  SS
117:21,6,ZD,ADD,101,6,ZD,$ INCR MICROSEC
M11,LENGTH=6,
124:117,6,CHANGE=(1,C'00',C'1'), $ ADJUST BY 1
 NOMATCH=(C'0'))),

  IFTHEN=(WHEN=GROUP,BEGIN=(124,1,CH,EQ,C'1'),
  PUSH=(124:124,1)),

  IFTHEN=(WHEN=INIT,
   OVERLAY=(108:108,8,ZD,ADD,124,1,ZD,   $ INCR HHMMSS
M11,LENGTH=8)),
  IFTHEN=(WHEN=INIT,
  OVERLAY=(SEQNUM,9,ZD,START=10001,INCR=8,   $ SEQ INCR BY 8
   108,8,ZD,DIV,+3600,EDIT=(TT), $ HH
   (108,8,ZD,MOD,+3600),DIV,+60,EDIT=(TT),   $ MM
   ((108,8,ZD,MOD,+3600),MOD,+60),EDIT=(TT), $ SS
   117,6,$ MICROSEC
   SEQNUM,7,PD,START=31,INCR=14, $ PACKED FIELD 1
   C'STATIC TEXT - 01',  $ STATIC TEXT
   SEQNUM,8,PD,START=23003,INCR=2,   $ PACKED FIELD 2
   C'STATIC TEXT - 02',  $ STATIC TEXT
   SEQNUM,10,PD,START=0, $ PACKED FIELD 3
   C'END OF THE GEN'))   $ STATIC TEXT
//*

>>IFTHEN overwrite the last few bytes of the  timestamp with an
incrementing value.
Kind of like a pipeline. Though, when I explained what he'd built to Frank
Yaeger he didn't respond as a plumber would. :-)

Martin,

You need to watch out for the wrap. Lets say the current timestamp had

2019-03-28-08.46.57.999244

So you would end with zero's in microseconds on the 756 records.

2019-03-28-08.46.58.00

For this record you need to increment the SECONDS portion by 1. You also
need to watch out if addition resulted in 60 and then adjust the minutes
and validate it again and adjust the hours. May be that is the reason Frank
did not respond. :)

Look at the above control cards to see how we need to handle.

Thanks,
Kolusu
DFSORT Development
IBM Corporation


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

Re: CA OPS/MVS

[Peter X. DeFabritus]

Martin, I have a REXX EXEC that uses BCPii, not OPS/MVS, to dynamically
modify the weights for LPARs, if you'd like it.

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

Re: CA OPS/MVS

[Martin Packer]

Thanks. If the customer themselves pops up here that'll be great. I don't 
want to play "man in the middle" on this one.

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:   Peter DeFabritus 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   28/03/2019 17:16
Subject:Re: CA OPS/MVS
Sent by:IBM Mainframe Discussion List 



Martin, I have a REXX EXEC that uses BCPii, not OPS/MVS, to dynamically
modify the weights for LPARs, if you'd like it.

On Thu, Mar 28, 2019 at 12:27 PM Steve Horein 
wrote:

> I was just comparing OPS/MVS (what I grew up on):
>
> 
https://urldefense.proofpoint.com/v2/url?u=https-3A__docops.ca.com_ca-2Dopsmvs_12-2D3_en_administrating_manage-2Dthe-2Dprocessors_opshmc-2Dparameters&d=DwIBaQ&c=jf_iaSHvJObTbx-siA1ZOg&r=BsPGKdq7-Vl8MW2-WOWZjlZ0NwmcFSpQCLphNznBSDQ&m=pa-WscNX4ONUuNvLzmkDJOr3DrWAjF5r-wL5JstEp-A&s=elXJN2ngL6RGuaJ4GOQ-2848gnXvuYesphrjdkwDbYI&e=

>
> ...with System Automation for z/OS (what I support now):
>
> 
https://www.ibm.com/support/knowledgecenter/SSWRCJ_4.1.0/com.ibm.safos.doc_4.1/OperatorGuide/ICNTL.html?pos=2

>
>
> OPS/MVS appears to provide getAttribute and setAttribute functions that 
may
> allow you to do what you want.
>
> On Thu, Mar 28, 2019 at 10:43 AM Martin Packer 

> wrote:
>
> > I'm asking on behalf of a customer (but I want to know, too, for all 
the
> > right reasons):
> >
> > Is it possible with CA OPS/MVS to alter the weights for LPARs? I would
> > assume that if it could it would use BCPii.
> >
> > The background is that we are contemplating shifting weights between
> LPARs
> > at certain times of day. This is their automation tool of choice. And 
I
> > don't know how people alter weights through automation.
> >
> > Thanks, 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://urldefense.proofpoint.com/v2/url?u=https-3A__itunes.apple.com_gb_podcast_mainframe-2Dperformance-2Dtopics_id1127943573-3Fmt-3D2&d=DwIBaQ&c=jf_iaSHvJObTbx-siA1ZOg&r=BsPGKdq7-Vl8MW2-WOWZjlZ0NwmcFSpQCLphNznBSDQ&m=pa-WscNX4ONUuNvLzmkDJOr3DrWAjF5r-wL5JstEp-A&s=5BE5TrA8Lr7Te9nfLjEbeNJUEC6Ux7NixX4-K_XBaHQ&e=

> >
> >
> > Youtube channel:
> 
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.youtube.com_channel_UCu-5F65HaYgksbF6Q8SQ4oOvA&d=DwIBaQ&c=jf_iaSHvJObTbx-siA1ZOg&r=BsPGKdq7-Vl8MW2-WOWZjlZ0NwmcFSpQCLphNznBSDQ&m=pa-WscNX4ONUuNvLzmkDJOr3DrWAjF5r-wL5JstEp-A&s=NYzoVPgw9QtF9eJjV9tMMDpc9wnJC7EZXGQJzOjcXw8&e=

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

--
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: XMITIP Arabic support

[Paul Gilmartin]

On Thu, 28 Mar 2019 20:43:15 +0400, Peter wrote:
>
>'Have you tried  ISO-8859-6?
>iconv on Linux has IBM420 and ISO8859-6'
>
>Can I call that from CSSMTP ? Any manual which can guide me to do this ?
> 
Given that CSSMTP appears to use "iconv", try "iconv -l"; capture the output,
and look for useful character sets.  The name may not match exactly; look
for a match of the numeric part.

I have found that ISPF Edit/View does a creditable job on foreign characters
with x3270 setting the host CCSID as needed and desktop to UTF-8.

>On Thu, 28 Mar, 2019, 7:49 PM Paul Gilmartin wrote:
>
>> On 2019-03-28, at 09:23:51, Peter wrote:
>> >...
>> > When I try to use the newly translation table source as dataset  in CSSMTP
>> > under _ICONV parm at /etc/cssmtp.env it fails saying the CCSID is not 
>> > supported.
>> >
>> > Which means zOS don't have IBM-420. How do I get create the new IBM-420 in
>> > the system to use it ?

-- gil

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

Re: Using DFSORT to generate data

[Paul Gilmartin]

On Thu, 28 Mar 2019 10:18:23 -0700, Sri h Kolusu wrote:

>> Kolusu, I would like one little tweak, if you please - is it possible to
>> get the timestamp fresh on each record, instead of using the same timestamp
>> value for all of them?
>
>Bill,
>
>Unfortunately DFSORT cannot get a fresh timestamp on each record. As far as
>I know even DB2 does not give you fresh timestamp on each record.
> 
I'm astonished; I'd expect data bases to log times of transactions.  Or
is that left the responsibility of the UI/API?

-- gil

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

Re: Using DFSORT to generate data

[Bernd Oppolzer]

Am 28.03.2019 um 19:01 schrieb Paul Gilmartin:

On Thu, 28 Mar 2019 10:18:23 -0700, Sri h Kolusu wrote:


Kolusu, I would like one little tweak, if you please - is it possible to
get the timestamp fresh on each record, instead of using the same timestamp
value for all of them?

Bill,

Unfortunately DFSORT cannot get a fresh timestamp on each record. As far as
I know even DB2 does not give you fresh timestamp on each record.


I'm astonished; I'd expect data bases to log times of transactions.  Or
is that left the responsibility of the UI/API?

-- gil



If you issue a long running SQL SELECT with DB2 (for example),
then a CURRENT TIMESTAMP expression in the SELECT result will show the
same value for all the (millions of) result records, even if the SQL is 
running

for hours; the whole SQL SELECT is one single transaction and the value
shown is the starting time of the transaction (the time when the SQL 
SELECT started).


If you are not happy with this, you need to code some application logic 
and get

a new timestamp on every SQL FETCH (which is possible, of course).

Kind regards

Bernd

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

Re: Using DFSORT to generate data

[Sri h Kolusu]

>I'm astonished; I'd expect data bases to log times of transactions.  Or is
that left the responsibility of the UI/API?

Gil,

When I say DB2 gives a static timestamp is when you are trying to get
EXISTING records from a DB2 table and append a time stamp. Something like
this


SELECT NAME
  ,CURRENT TIMESTAMP
  FROM SYSIBM.SYSTABLES
;


Thanks,
Kolusu
DFSORT Development
IBM Corporation

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

Re: Utility to parse fullword delimited flat file

[Kirk Wolf]

You could do it with Co:Z Batch + Dataset Pipes without creating a
temporary file:

//SHELL EXEC PGM=COZBATCH
//IN  DD DISP=SHR,DSN=...
//OUT DD DISP=(NEW,CATLG),DSN=...,
//   DCB=(RECFM=VB,LRECL=27994),SPACE=
//STDIN DD *
  fromdsn -b //DD:IN  |
 todsn -b -l l4  //DD:OUT
//

Now, if you meant "flat file" as a Unix file, then just:

//STDIN DD *
todsn -b -l l4 //DD:OUT < /path/to/my.flat.file
//

Kirk Wolf
Dovetailed Technologies
http://dovetail.com

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

Re: Using DFSORT to generate data

[Paul Gilmartin]

On Thu, 28 Mar 2019 11:38:24 -0700, Sri h Kolusu wrote:

>>I'm astonished; I'd expect data bases to log times of transactions.  Or is
>>that left the responsibility of the UI/API?
>
>When I say DB2 gives a static timestamp is when you are trying to get
>EXISTING records from a DB2 table and append a time stamp. ...
>
OK.  I RTFM.  The term it uses in a few places is "time of the run".  I'm
happy that means the time of the SELECT rather than time of the FETCH.
May I assume, since neither you nor Bernd said otherwise, that insertion
of a row will use the instantaneous timestamp?

And disappointed, that the format has a granularity of at best µsec,
sacrificing the uniqueness of the (E)TOD clock.  Not an issue
unless/until processors are fast enough to perform more than one
transaction in that time.

-- gil

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

Re: Using DFSORT to generate data

[Martin Packer]

I assumed the time stamp was in a format like STCKE which is really just an
integer - so it doesn’t have the rollover issue.

Cheers, Martin

Sent from my iPad

On 28 Mar 2019, at 17:18, Sri h Kolusu  wrote:

>> Kolusu, I would like one little tweak, if you please - is it possible to
>> get the timestamp fresh on each record, instead of using the same
> timestamp
>> value for all of them?
>>
>
> Bill,
>
> Unfortunately DFSORT cannot get a fresh timestamp on each record. As far
as
> I know even DB2 does not give you fresh timestamp on each record.
>
> If you want a unique value of timestamp, then I can show you as to what
> Martin Packer suggested. Here are the updated control cards for
generating
> unique timestamp.
>
> //SYSINDD *
>  OPTION COPY
>  INREC BUILD=(DATE5)
>
>  OUTFIL REPEAT=100,
>  IFOUTLEN=100,  $ LRECL=100
>  IFTHEN=(WHEN=INIT,
>   OVERLAY=(101:SEQNUM,6,ZD,START=0,
>108:12,2,ZD,MUL,+3600,ADD,   $ HH * 3600 +
>15,2,ZD,MUL,+0060,ADD, MM * 0060 +
>18,2,ZD,M11,LENGTH=8,  SS
>117:21,6,ZD,ADD,101,6,ZD,$ INCR MICROSEC
>M11,LENGTH=6,
>124:117,6,CHANGE=(1,C'00',C'1'), $ ADJUST BY 1
> NOMATCH=(C'0'))),
>
>  IFTHEN=(WHEN=GROUP,BEGIN=(124,1,CH,EQ,C'1'),
>  PUSH=(124:124,1)),
>
>  IFTHEN=(WHEN=INIT,
>   OVERLAY=(108:108,8,ZD,ADD,124,1,ZD,   $ INCR HHMMSS
>M11,LENGTH=8)),
>  IFTHEN=(WHEN=INIT,
>  OVERLAY=(SEQNUM,9,ZD,START=10001,INCR=8,   $ SEQ INCR BY 8
>   108,8,ZD,DIV,+3600,EDIT=(TT), $ HH
>   (108,8,ZD,MOD,+3600),DIV,+60,EDIT=(TT),   $ MM
>   ((108,8,ZD,MOD,+3600),MOD,+60),EDIT=(TT), $ SS
>   117,6,$ MICROSEC
>   SEQNUM,7,PD,START=31,INCR=14, $ PACKED FIELD 1
>   C'STATIC TEXT - 01',  $ STATIC TEXT
>   SEQNUM,8,PD,START=23003,INCR=2,   $ PACKED FIELD 2
>   C'STATIC TEXT - 02',  $ STATIC TEXT
>   SEQNUM,10,PD,START=0, $ PACKED FIELD 3
>   C'END OF THE GEN'))   $ STATIC TEXT
> //*
>
>>> IFTHEN overwrite the last few bytes of the  timestamp with an
> incrementing value.
> Kind of like a pipeline. Though, when I explained what he'd built to
Frank
> Yaeger he didn't respond as a plumber would. :-)
>
> Martin,
>
> You need to watch out for the wrap. Lets say the current timestamp had
>
> 2019-03-28-08.46.57.999244
>
> So you would end with zero's in microseconds on the 756 records.
>
> 2019-03-28-08.46.58.00
>
> For this record you need to increment the SECONDS portion by 1. You also
> need to watch out if addition resulted in 60 and then adjust the minutes
> and validate it again and adjust the hours. May be that is the reason
Frank
> did not respond. :)
>
> Look at the above control cards to see how we need to handle.
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
> --
> 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: Using DFSORT to generate data

[Martin Packer]

Note: With Multi-Row Fetch rows wouldn’t have unique timestamps if the
timestamps WERE generated at fetch time.

Cheers, Martin

Sent from my iPad

> On 28 Mar 2019, at 19:15, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Thu, 28 Mar 2019 11:38:24 -0700, Sri h Kolusu wrote:
>
>>> I'm astonished; I'd expect data bases to log times of transactions.  Or
is
>>> that left the responsibility of the UI/API?
>>
>> When I say DB2 gives a static timestamp is when you are trying to get
>> EXISTING records from a DB2 table and append a time stamp. ...
>>
> OK.  I RTFM.  The term it uses in a few places is "time of the run".  I'm
> happy that means the time of the SELECT rather than time of the FETCH.
> May I assume, since neither you nor Bernd said otherwise, that insertion
> of a row will use the instantaneous timestamp?
>
> And disappointed, that the format has a granularity of at best µsec,
> sacrificing the uniqueness of the (E)TOD clock.  Not an issue
> unless/until processors are fast enough to perform more than one
> transaction in that time.
>
> -- gil
>
> --
> 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: Using DFSORT to generate data

[David W Noon]

On Thu, 28 Mar 2019 14:14:46 -0500, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote abour Re: Using
DFSORT to generate data:

> On Thu, 28 Mar 2019 11:38:24 -0700, Sri h Kolusu wrote:
> 
>>> I'm astonished; I'd expect data bases to log times of transactions.  Or is
>>> that left the responsibility of the UI/API?
>>
>> When I say DB2 gives a static timestamp is when you are trying to get
>> EXISTING records from a DB2 table and append a time stamp. ...
>>
> OK.  I RTFM.  The term it uses in a few places is "time of the run".  I'm
> happy that means the time of the SELECT rather than time of the FETCH.

The CURRENT TIMESTAMP special register is evaluated at the time of the
first query in a transaction; likewise CURRENT TIME and CURRENT DATE.
This is not necessarily the same as the time of the SELECT.

The special registers get re-evaluated after any subsequent COMMIT or
ROLLBACK the terminates a transaction, when the next transaction begins.

> May I assume, since neither you nor Bernd said otherwise, that insertion
> of a row will use the instantaneous timestamp?

No, the INSERT will use the special register, as evaluated at the start
of its transaction. This is why TIMESTAMP data attributes are not ideal
"tie breakers" for key collisions: there are other ways to do that.

> And disappointed, that the format has a granularity of at best µsec,
> sacrificing the uniqueness of the (E)TOD clock.  Not an issue
> unless/until processors are fast enough to perform more than one
> transaction in that time.

The format was decided decades ago by a committee.

The purpose of TIMESTAMP is just its face value: to provide a temporal
log of when a database event occurred. It is a measure of external
times, rather than of the internal clock of the CPU.
-- 
Regards,

Dave  [RLU #314465]
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
david.w.n...@googlemail.com (David W Noon)
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*

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

Re: Utility to parse fullword delimited flat file

[Hobart Spitz]

Pipes.

On Thu, 28 Mar 2019, 2:11 pm Kirk Wolf,  wrote:

> You could do it with Co:Z Batch + Dataset Pipes without creating a
> temporary file:
>
> //SHELL EXEC PGM=COZBATCH
> //IN  DD DISP=SHR,DSN=...
> //OUT DD DISP=(NEW,CATLG),DSN=...,
> //   DCB=(RECFM=VB,LRECL=27994),SPACE=
> //STDIN DD *
>   fromdsn -b //DD:IN  |
>  todsn -b -l l4  //DD:OUT
> //
>
> Now, if you meant "flat file" as a Unix file, then just:
>
> //STDIN DD *
> todsn -b -l l4 //DD:OUT < /path/to/my.flat.file
> //
>
> Kirk Wolf
> Dovetailed Technologies
> http://dovetail.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: Utility to parse fullword delimited flat file

[Paul Gilmartin]

On Thu, 28 Mar 2019 16:07:31 -0500, Hobart Spitz wrote:

>Pipes.
>
>On Thu, 28 Mar 2019, 2:11 pm Kirk Wolf wrote:
>
>> You could do it with Co:Z Batch + Dataset Pipes without creating a
>> temporary file:
>>...
Sure, or with standard z/OS facilities in Rexx:
address SYSCALL
pipe
BPXWDYN( 'alloc dd(SYSUT1) path(output-of-pipe)
spawn cp -B "//'DSN ...'" input-of-pipe
address LINKMVS IEBGENER

-- gil

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

Re: Using DFSORT to generate data

[Paul Gilmartin]

On Thu, 28 Mar 2019 20:36:59 +, David W Noon wrote:
>
>The purpose of TIMESTAMP is just its face value: to provide a temporal
>log of when a database event occurred. It is a measure of external
>times, rather than of the internal clock of the CPU.
>
I believe that in some cases the order in which events occur is also
important, and that was part of the motivation for designing STCK(E)
to return unique, monotonically ascending values.

Sure, a µsec timestamp and an incrementing integer with coordination
among multiple CPUs (CS?) serves the purpose, but why reinvent that
wheel in software?

-- gil

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

Re: Utility to parse fullword delimited flat file

[Frank Swarbrick]

I couldn't get John's method to work and I don't have Co:Z, so I ended up 
writing a program.  In Swift!!  Worked very well, too.
Frank


From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, March 28, 2019 3:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Utility to parse fullword delimited flat file

On Thu, 28 Mar 2019 16:07:31 -0500, Hobart Spitz wrote:

>Pipes.
>
>On Thu, 28 Mar 2019, 2:11 pm Kirk Wolf wrote:
>
>> You could do it with Co:Z Batch + Dataset Pipes without creating a
>> temporary file:
>>...
Sure, or with standard z/OS facilities in Rexx:
address SYSCALL
pipe
BPXWDYN( 'alloc dd(SYSUT1) path(output-of-pipe)
spawn cp -B "//'DSN ...'" input-of-pipe
address LINKMVS IEBGENER

-- 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: R+ / Reliability Plus

[Mike Schwab]

https://www-01.ibm.com/support/docview.wss?uid=swg21291812
EREP from IBM.

How to request the reports.
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.ieav100/lgrep.htm

Specify alternate name / destination.
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieae200/ieae200309.htm

On Thu, Mar 28, 2019 at 10:24 AM Steve Thompson  wrote:
>
> Does anyone remember this product? [Did SYS1.LOGREC processing
> and reporting for multiple entities]
>
> Does anyone know if there is an equivalent product for reporting
> on one's own sysplex(es)?
>
> I've been searching and I can't find who owns it or it if is
> still in use/available. And trying to find a similar product, "r"
> is a language, Plus gives you stuff you don't care about, etc. --
> makes it difficult to search.
>
> Thanks in advance,
> Steve Thompson
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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

Re: R+ / Reliability Plus

[Lester, Bob]

I seem to remember it as UCC-9?

Thanks!
BobL

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mike Schwab
Sent: Thursday, March 28, 2019 4:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: R+ / Reliability Plus [ EXTERNAL ]

https://urldefense.proofpoint.com/v2/url?u=https-3A__www-2D01.ibm.com_support_docview.wss-3Fuid-3Dswg21291812&d=DwIBaQ&c=huW-Z3760n7oNORvLCN2eBo-Ehm9Q_bNeNJaAMovBjQ&r=Qowhtqe2n9CP4j5cKgUfmAFB9ziwNIdru4NRZBXkzeA&m=924bQykyk9DJkHzr8bClVt3b-es45UQIAAGH1lhFEZs&s=ujLIjJ8j9olGC2kdzL96Kz00mgooixoJSE0c72sgW58&e=
EREP from IBM.

How to request the reports.
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_support_knowledgecenter_en_SSLTBW-5F2.3.0_com.ibm.zos.v2r3.ieav100_lgrep.htm&d=DwIBaQ&c=huW-Z3760n7oNORvLCN2eBo-Ehm9Q_bNeNJaAMovBjQ&r=Qowhtqe2n9CP4j5cKgUfmAFB9ziwNIdru4NRZBXkzeA&m=924bQykyk9DJkHzr8bClVt3b-es45UQIAAGH1lhFEZs&s=WJOkHs9vkXd8bFbbyrhB0g7uepmpT1-LUJsHVemqtL4&e=

Specify alternate name / destination.
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_support_knowledgecenter_en_SSLTBW-5F2.1.0_com.ibm.zos.v2r1.ieae200_ieae200309.htm&d=DwIBaQ&c=huW-Z3760n7oNORvLCN2eBo-Ehm9Q_bNeNJaAMovBjQ&r=Qowhtqe2n9CP4j5cKgUfmAFB9ziwNIdru4NRZBXkzeA&m=924bQykyk9DJkHzr8bClVt3b-es45UQIAAGH1lhFEZs&s=gs2ckJucqBIgH97ExAME_PhG_JGr8H-KGlrw7v5wi5U&e=

On Thu, Mar 28, 2019 at 10:24 AM Steve Thompson  wrote:
>
> Does anyone remember this product? [Did SYS1.LOGREC processing and 
> reporting for multiple entities]
>
> Does anyone know if there is an equivalent product for reporting on 
> one's own sysplex(es)?
>
> I've been searching and I can't find who owns it or it if is still in 
> use/available. And trying to find a similar product, "r"
> is a language, Plus gives you stuff you don't care about, etc. -- 
> makes it difficult to search.
>
> Thanks in advance,
> Steve Thompson
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



--
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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

This e-mail transmission may contain information that is proprietary, 
privileged and/or confidential and is intended exclusively for the person(s) to 
whom it is addressed. Any use, copying, retention or disclosure by any person 
other than the intended recipient or the intended recipient's designees is 
strictly prohibited. If you are not the intended recipient or their designee, 
please notify the sender immediately by return e-mail and delete all copies. 
OppenheimerFunds may, at its sole discretion, monitor, review, retain and/or 
disclose the content of all email communications.


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