Re: ABO Automatic Binary Optimizer

[Timothy Sipples]

Bill Woodger wrote:
>For me, changing any compile option at the moment of going to Production
>invalidates all the testing up to that point.

Then along comes Java :-)

I strongly disagree with the word "all." I don't think that word in this
sentence is grounded in a reasonable, rational, informed assessment of
comparative risks and testing costs.

Consider also this important point: many businesses are moving much, much
faster than this rigid point of view would ever allow. Take a look at this
2011 video, for example:

https://www.youtube.com/watch?v=dxk8b9rSKOo

The whole video is worth watching, but fast forward to about 10:00 for the
key statistics. According to the speaker, Amazon.com (the Web commerce
site, not all of AWS) deployed code changes into production on average once
every 11.6 seconds in May, 2011 (based on weekday deployments; they
evidently have a slower but still rapid deployment pace during weekends).
That was their pace half a decade ago. Are your current testing practices
and policies able to support that sort of business velocity or anything
vaguely similar? If not, why not? Are you helping your business compete? (I
believe at least a couple readers do work for businesses in competition
with Amazon.)

Amazon, the publicly traded company, has a market capitalization of $385.4
billion (as of October 17, 2016). Among companies traded on U.S. exchanges
it's currently #4 by that measure. True, its price-earnings ratio is over
200, i.e. the company isn't all that profitable. But that's yet another
problem if you're in competition with Amazon.


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

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

Re: Intrdr (and IEC141I 013-6)

[Paul Gilmartin]

On Mon, 17 Oct 2016 19:10:23 -0400, scott Ford wrote:

>I am passing sysin data behind the actual JCL , it can be large up to 32k..
>I wasn't sure about punching the JCL and data to the Intrdr when the
>logical record length us that large .
>
"punch"?

The following submits a job that works nicely:

/* Rexx */  signal on novalue;  /*
   Doc: Long records to INTRDR.
*/

trace R
L = 32752  /* ISFUNLD fails with IEC141I 013-6 on SYSUT1 at 32753!?  */
RC = BPXWDYN( 'alloc rtddn(D) sysout writer(INTRDR) recfm(V,B) lrecl('L') blksiz
e(0) msg(2)' )

trace Err
call P '//'
call P '//LONGINP   JOB  505303JOB,''Paul Gilmartin'','
call P '// MSGLEVEL=(1,1),REGION=0M'
call P '//*'
call P '//  EXPORT SYMLIST=*'
call P '//*'
call P '//USERCOUTPUT JESDS=ALL,DEFAULT=YES,'
call P '//*  DEST=,'
call P '//  CLASS=R,PAGEDEF=V0648Z,CHARS=GT12'
call P '//*'
call P '//STEP  EXEC  PGM=IEBGENER'
call P '//SYSPRINT  DD  SYSOUT=(,)'
call P '//SYSIN DD  DUMMY'
call P '//SYSUT2DD  SYSOUT=(,)'
call P '//SYSUT1DD  *'
call P 'Long record test.'
call P right( 'Long record 1', L - 4 )
call P right( 'Long record 2', L - 4 )
call P '//'
return( RC )

P:
trace C
address 'MVS'
S.1 = arg( 1 )
'EXECIO 1 DISKW' D '(STEM S.'
return( RC )

If I try LRECL>=32753 up to 32756 the job runs OK, but I get IEC141I 013-6
on the SYSUT1 spool data set when I try to copy it with code similar to an
example in the SDSF guide.  This might happen if some code were counting
the RDW twice.

-- gil

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

Re: Intrdr

[scott Ford]

I am passing sysin data behind the actual JCL , it can be large up to 32k..
I wasn't sure about punching the JCL and data to the Intrdr when the
logical record length us that large .


Scott

On Monday, October 17, 2016, Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On Mon, 17 Oct 2016 18:23:09 -0400, scott Ford wrote:
> >
> >I read that the Intrdr max recsize was 32760, but am I right if I punch to
> >the Intrdr I am still limited to 80 byte records?
> >
> No.  I've certainly used >80.
>
> o JCL commands ignore all characters beyond 80
>
> o SYSIN data sets may have far more than 80.
>
> o The rules for determining the values of LRECL and RECFM of
>   a SYSIN at DCB OPEN merge are largely undocumented.  I believe
>   they differ between JES2 and JES3.  I have a long unanswered RCF
>   on this.  I should nudge it.
>
> o FTP imposes an antiquated limit of 254 on JESLRECL.  This should be
>   fodder for an RFE.
>
> o LRECL= is allowed on DD SYSIN.  It may not have the effect you want.
>
> o But RECFM= is prohibited on DD SYSIN.  Go figger.
>
> o TSO and ISPF SUBMIT are oblivious; stuck in the 20th century.  ISPF
>   submit quietly truncates to 80.  I consider this data loss.
>
> o Beware that you may cause I/O errors on many utility SYSINs.
>
> -- 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: Intrdr

[Paul Gilmartin]

On Mon, 17 Oct 2016 18:23:09 -0400, scott Ford wrote:
>
>I read that the Intrdr max recsize was 32760, but am I right if I punch to
>the Intrdr I am still limited to 80 byte records?
>
No.  I've certainly used >80.

o JCL commands ignore all characters beyond 80

o SYSIN data sets may have far more than 80.

o The rules for determining the values of LRECL and RECFM of
  a SYSIN at DCB OPEN merge are largely undocumented.  I believe
  they differ between JES2 and JES3.  I have a long unanswered RCF
  on this.  I should nudge it.

o FTP imposes an antiquated limit of 254 on JESLRECL.  This should be
  fodder for an RFE.

o LRECL= is allowed on DD SYSIN.  It may not have the effect you want.

o But RECFM= is prohibited on DD SYSIN.  Go figger.

o TSO and ISPF SUBMIT are oblivious; stuck in the 20th century.  ISPF
  submit quietly truncates to 80.  I consider this data loss.

o Beware that you may cause I/O errors on many utility SYSINs.

-- gil

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

Re: Intrdr

[Lizette Koehler]

What problem are you trying to solve with INTRDR?

Are you using INTRDR in JCL?  

Are you doing a dynamic allocation for INTRDR?

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of scott Ford
> Sent: Monday, October 17, 2016 3:23 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Intrdr
> 
> All,
> 
> I read that the Intrdr max recsize was 32760, but am I right if I punch to the
> Intrdr I am still limited to 80 byte records?
> 
> Scott
> 

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

Re: IGD04001I UNEXPECTED CATALOG LOCATE PROCESSING ERROR - RETURN CODE 246

[Lizette Koehler]

I think if this is an IDC3009I with code 246 - you need to contact IBM L2 
Support for SMS CATALOG.

Without the complete message text - it is hard to determine what you have 
specifically.  But if it is the 246 then you have a big problem.

Contact IBM Support they will be able to help.



RETURN CODE 246 Explanation: An internal error has occurred while processing a 
catalog request.
Reason Code Description
x   Explanation: An internal error has occurred.

System Action: An SVC dump may be produced for the error, depending on the 
reason code. Processing of the catalog request is terminated.

Programmer Response: Determine if an SVC dump was created for this failure, and 
contact the IBM Support Center for assistance.
26  Explanation: An overlay in the Access Control Block (ACB) or CAXWA for 
an ICFCATALOG has been detected. A dump will be taken and the Catalog Address 
Space will be restarted internally to invalidate the affected control blocks.

Programmer Response: Please provide any dumps to IBM support. Prepare to re-IPL 
the system(s) that got the 246-26 dumps to rebuild the ACBs as soon as possible.
28  Explanation: A broken CAXWA chain has been detected. A dump will be 
taken and a IEC366E WTO message will be issued. An IPL is recommended at the 
earliest convenience to avoid any fatal errors because of the broken CAXWA 
chain. Catalog address space is not restarted.

Programmer Response: Please provide any 246-28 dumps to IBM support to make 
sure the overlay has been corrected.
RETURN CODE 254 Explanation: An error was encountered during catalog 
reorientation.
Reason Code Description
2   Explanation: The opening of a catalog failed during catalog 
reorientation.
4   Explanation: The allocation of a catalog unit failed.
Programmer response

See the programmer response for the specific return code and reason code. 
Inspect other messages concerning the DADSM subcomponent or open or close 
processing to aid in solving the problem. If necessary, contact the IBM Support 
Center.

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Bill Woodger
> Sent: Monday, October 17, 2016 3:42 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: IGD04001I UNEXPECTED CATALOG LOCATE PROCESSING ERROR - RETURN CODE
> 246
> 
> Vigilio ,
> 
> I think you've posted to the google groups rather than the listserv itself, so
> perhaps many people won't see your post.
> 
> I poked your message id into a search box, which gets to the IBM Knowledge
> Centre which leads to IDC3009I, which has your code, with explanations per
> reason code.
> 
> It looks like something broke badly.
> 
> --
> 
> Folks,
> 
> I'm having this IGD* error but could not find RC 246 from the System
> Completion Codes list.
> 
> We're running z/OS v2.1.
> 
> Would anyone here have encountered this error? If yes, may I know the cause &
> fix please?
> 
> Thank you.
> Virgilio
> 

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

IGD04001I UNEXPECTED CATALOG LOCATE PROCESSING ERROR - RETURN CODE 246

[Bill Woodger]

Vigilio , 

I think you've posted to the google groups rather than the listserv itself, so 
perhaps many people won't see your post.

I poked your message id into a search box, which gets to the IBM Knowledge 
Centre which leads to IDC3009I, which has your code, with explanations per 
reason code. 

It looks like something broke badly.

--

Folks,

I'm having this IGD* error but could not find RC 246 from the System Completion 
Codes list.

We're running z/OS v2.1.

Would anyone here have encountered this error? If yes, may I know the cause & 
fix please?

Thank you.
Virgilio

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

Intrdr

[scott Ford]

All,

I read that the Intrdr max recsize was 32760, but am I right if I punch to
the Intrdr I am still limited to 80 byte records?

Scott

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

Re: VVDS points to non-existent catalog

[R.S.]

W dniu 2016-10-17 o 21:10, Sean Gleann pisze:

I've made a stupid mistake with one of my z/OS systems, and now I'm hoping
that someone can help me extricate myself..

I was in the process of moving a user catalog from one disk to another.

Following examples from documentation on the IBM web site...
Did an EXPORT TEMPORARY of the ucat to a 'flat' file,
followed by DELETE catname RECOVERY USERCATALOG,
and then a DEFINE of the catalog on it's new volume.
(All going well so far - I should know better)

The subsequent attempt at an IMPORT of the 'flat' file resulted in a JCL
error 'data set not found'.

If I use ISPF 3.4 to look at all the files on the disk involved, I can see
that the file does in fact exist.
If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'

The problem is that the flat file I created has a name that was aliased to
the catalog I've just deleted and redefined. (foot...gun...BANG)

The VVDS entry for the export file points to a catalog that - while it
exists - is empty.

I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH, but
nothing works because SMS can't find the data it needs to complete the task
I specify.

To add to the problem, the same catalog also had my SMS SCDS/ACDS aliased
there, among numerous other datasets necessary for IPL.

Yes, all very stupid, I know, and I believe I've learnt a very harsh lesson.
But if anyone has got any ideas, I'd love to hear them.




Sean,
Did you try to copy the flat file to another name?
IMHO it should be the simplest way to circumvent the problem:

//K10 EXEC PGM=IEBGENER
...
//SYSUT1  DD DSN=you.exported.ucat,DISP=SHR,UNIT=3390,VOL=SER=volser  
<-- no catalog involvement here!

//SYSUT2 DD DSN=SYS1.COPY.OF.EXP.UCAT,DISP=(,CATLG)...

then use import from the copy...

--
Radoslaw Skorupka
Lodz, Poland






---
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

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, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. 
Według stanu na dzień 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości 
wpłacony) wynosi 168.955.696 złotych.


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

Re: VVDS points to non-existent catalog

[Sean Gleann]

Dan... but your response gave me the required clue. I redefined the alias,
and lo the dump file became 'findable' to ISPF.
Renamed it, ran the IMPORT job again (with necessary changes) and
everything is now back to normal

Job done!

Thanks Dan, and to all others who have responded.

Sean
(doing the 'Happy Sean' dance - a weird sight!)

On 17 October 2016 at 20:59, Sean Gleann  wrote:

> Dan - the alias has already gone (as a result of the 'export'?). If I try
> a generic ISPF list, specifying just the HLQ of the file name, I get 'No
> data set names found'
>
> Sean
>
> On 17 October 2016 at 20:50, Blake, Daniel J [CTR] <
> 00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:
>
>> Having not seen this before, I think you will need to delete the alias,
>> so that the master is not searching that 'path' for the data set you are
>> renaming.  Then you should be able to rename and catalog it.
>>
>>
>> Dan
>>
>>
>>
>>
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
>> Behalf Of Sean Gleann
>> Sent: Monday, October 17, 2016 3:48 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: VVDS points to non-existent catalog
>>
>> Dan - yes, I tried that. I get " '(filename)' was not found in catalog. "
>> John
>>
>>
>> On 17 October 2016 at 20:37, Blake, Daniel J [CTR] <
>> 00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:
>>
>> > Did you press PF1 to see more information as to why the rename did not
>> > work?
>> >
>> > Thank You
>> >
>> >
>> > Dan Blake – Team Leader
>> >
>> >
>> > dbl...@fdic.gov
>> > FDIC ISC-3 O Service Delivery | Room B4072
>> > O: (703) 516-5497 | BB: (703) 314-0501 | M: (703) 946-2967
>> >
>> >
>> > Advanced Out of Office Notice:
>> >
>> > Telecommute: October 24-28, 2016.
>> >
>> >
>> >
>> > -Original Message-
>> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
>> > On Behalf Of Sean Gleann
>> > Sent: Monday, October 17, 2016 3:35 PM
>> > To: IBM-MAIN@LISTSERV.UA.EDU
>> > Subject: Re: VVDS points to non-existent catalog
>> >
>> > Dan - no go, I'm afraid. The 'R' command results in the same 'data set
>> > not catalogued' message.
>> >
>> > John - yes, that is very much like one of my attempts, except the file
>> > involved is not a cluster
>> >
>> > Sean
>> >
>> > On 17 October 2016 at 20:20, John McKown
>> > 
>> > wrote:
>> >
>> > > On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann 
>> > > wrote:
>> > >
>> > > > I've made a stupid mistake with one of my z/OS systems, and now
>> > > > I'm
>> > > hoping
>> > > > that someone can help me extricate myself..
>> > > >
>> > > > I was in the process of moving a user catalog from one disk to
>> another.
>> > > >
>> > > > Following examples from documentation on the IBM web site...
>> > > > Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by
>> > > > DELETE catname RECOVERY USERCATALOG, and then a DEFINE of the
>> > > > catalog on it's new volume.
>> > > > (All going well so far - I should know better)
>> > > >
>> > > > The subsequent attempt at an IMPORT of the 'flat' file resulted in
>> > > > a JCL error 'data set not found'.
>> > > >
>> > > > If I use ISPF 3.4 to look at all the files on the disk involved, I
>> > > > can
>> > > see
>> > > > that the file does in fact exist.
>> > > > If I try 'I' or 'S', or 'browse', etc, I get 'data set not
>> catalogued'
>> > > >
>> > > > The problem is that the flat file I created has a name that was
>> > > > aliased
>> > > to
>> > > > the catalog I've just deleted and redefined. (foot...gun...BANG)
>> > > >
>> > > > The VVDS entry for the export file points to a catalog that -
>> > > > while it exists - is empty.
>> > > >
>> > > > I've tried numerous attempts at RECATALOG and DELETE NVR
>> > > > NOSCRATCH, but nothing works because SMS can't find the data it
>> > > > needs to complete the
>> > > task
>> > > > I specify.
>> > > >
>> > >
>> > > ​You tried something like the below & it failed?
>> > >
>> > >
>> > > //RECAT   JOB (H0I),'JOHN MCKOWN',
>> > > // CLASS=Z,
>> > > // MSGCLASS=X,
>> > > // NOTIFY=
>> > > //STEP010  EXEC PGM=IDCAMS
>> > > //SYSPRINT DD   SYSOUT=*
>> > > //SYSINDD   *
>> > >  DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
>> > >  VOLUME(LIHTS1) -
>> > >  RECATALOG ) -
>> > >  CAT(CATALOG.ICF.VI12CAT.MCAT)
>> > > /*
>> > > //
>> > > LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
>> > > /*EOF
>> > >
>> > > ​
>> > >
>> > >
>> > > >
>> > > > To add to the problem, the same catalog also had my SMS SCDS/ACDS
>> > > > aliased there, among numerous other datasets necessary for IPL.
>> > > >
>> > > > Yes, all very stupid, I know, and I believe I've learnt a very
>> > > > harsh lesson.
>> > > > But if anyone has got any ideas, I'd love to hear them.
>> > > >
>> > > > Sean
>> > > >
>> > > > --
>> > > > --
>> > > > -- For 

Re: VVDS points to non-existent catalog

[Matthew Stitt]

This is what I use:

//STEP0   EXEC PGM=IDCAMS 
//SYSPRINT DD  SYSOUT=*   
//SYSUDUMP DD  SYSOUT=*   
//DD1  DD  DSN=MSTITT.UCAT.BKUP,DISP=OLD,VOL=SER=xx,UNIT=3390   
   
//SYSINDD  *  
  IMPORT INFILE(DD1) OUTDATASET(SYS1.ZOS1D.TEST.MCAT) -   
  OBJECTS(SYS1.ZOS1D.MCAT VOLUMES(H3MCAT)) -  
  INTOEMPTY - 
  ALIAS   
/*  

The ALIAS parameter will recreate the ALIAS entries if the EXPORT was done with 
the option to save them.

HTH

Matthew  

On Mon, 17 Oct 2016 20:59:22 +0100, Sean Gleann  wrote:

>Dan - the alias has already gone (as a result of the 'export'?). If I try a
>generic ISPF list, specifying just the HLQ of the file name, I get 'No data
>set names found'
>
>Sean
>
>On 17 October 2016 at 20:50, Blake, Daniel J [CTR] <
>00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:
>
>> Having not seen this before, I think you will need to delete the alias, so
>> that the master is not searching that 'path' for the data set you are
>> renaming.  Then you should be able to rename and catalog it.
>>
>>
>> Dan
>>
>>
>>
>>
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
>> Behalf Of Sean Gleann
>> Sent: Monday, October 17, 2016 3:48 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: VVDS points to non-existent catalog
>>
>> Dan - yes, I tried that. I get " '(filename)' was not found in catalog. "
>> John
>>
>>
>> On 17 October 2016 at 20:37, Blake, Daniel J [CTR] <
>> 00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:
>>
>> > Did you press PF1 to see more information as to why the rename did not
>> > work?
>> >
>> > Thank You
>> >
>> >
>> > Dan Blake – Team Leader
>> >
>> >
>> > dbl...@fdic.gov
>> > FDIC ISC-3 O Service Delivery | Room B4072
>> > O: (703) 516-5497 | BB: (703) 314-0501 | M: (703) 946-2967
>> >
>> >
>> > Advanced Out of Office Notice:
>> >
>> > Telecommute: October 24-28, 2016.
>> >
>> >
>> >
>> > -Original Message-
>> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
>> > On Behalf Of Sean Gleann
>> > Sent: Monday, October 17, 2016 3:35 PM
>> > To: IBM-MAIN@LISTSERV.UA.EDU
>> > Subject: Re: VVDS points to non-existent catalog
>> >
>> > Dan - no go, I'm afraid. The 'R' command results in the same 'data set
>> > not catalogued' message.
>> >
>> > John - yes, that is very much like one of my attempts, except the file
>> > involved is not a cluster
>> >
>> > Sean
>> >
>> > On 17 October 2016 at 20:20, John McKown
>> > 
>> > wrote:
>> >
>> > > On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann 
>> > > wrote:
>> > >
>> > > > I've made a stupid mistake with one of my z/OS systems, and now
>> > > > I'm
>> > > hoping
>> > > > that someone can help me extricate myself..
>> > > >
>> > > > I was in the process of moving a user catalog from one disk to
>> another.
>> > > >
>> > > > Following examples from documentation on the IBM web site...
>> > > > Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by
>> > > > DELETE catname RECOVERY USERCATALOG, and then a DEFINE of the
>> > > > catalog on it's new volume.
>> > > > (All going well so far - I should know better)
>> > > >
>> > > > The subsequent attempt at an IMPORT of the 'flat' file resulted in
>> > > > a JCL error 'data set not found'.
>> > > >
>> > > > If I use ISPF 3.4 to look at all the files on the disk involved, I
>> > > > can
>> > > see
>> > > > that the file does in fact exist.
>> > > > If I try 'I' or 'S', or 'browse', etc, I get 'data set not
>> catalogued'
>> > > >
>> > > > The problem is that the flat file I created has a name that was
>> > > > aliased
>> > > to
>> > > > the catalog I've just deleted and redefined. (foot...gun...BANG)
>> > > >
>> > > > The VVDS entry for the export file points to a catalog that -
>> > > > while it exists - is empty.
>> > > >
>> > > > I've tried numerous attempts at RECATALOG and DELETE NVR
>> > > > NOSCRATCH, but nothing works because SMS can't find the data it
>> > > > needs to complete the
>> > > task
>> > > > I specify.
>> > > >
>> > >
>> > > ​You tried something like the below & it failed?
>> > >
>> > >
>> > > //RECAT   JOB (H0I),'JOHN MCKOWN',
>> > > // CLASS=Z,
>> > > // MSGCLASS=X,
>> > > // NOTIFY=
>> > > //STEP010  EXEC PGM=IDCAMS
>> > > //SYSPRINT DD   SYSOUT=*
>> > > //SYSINDD   *
>> > >  DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
>> > >  VOLUME(LIHTS1) -
>> > >  RECATALOG ) -
>> > >  CAT(CATALOG.ICF.VI12CAT.MCAT)
>> > > /*
>> > > //
>> > > LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
>> > > /*EOF
>> > >
>> > > ​
>> > >
>> > >
>> > > >
>> > > > To add to the problem, 

Re: diagnose 8 / interesting dilemma

[Jim Mulder]

> Of course there's the question of whether z/VM yet supports the large
> pages (EDAT-1) needed to make this work. I don't believe it does as of
> 6.3, though I may have missed an announcement.

  Good point, and the second time in a month that I have embarassingly 
forgotten about that (Peter Relson will remember the first time). 

 z/VM 6.4 will support 1MB pages for guests.

http://www-01.ibm.com/common/ssi/ShowDoc.wss?docURL=/common/ssi/rep_ca/9/897/ENUS216-009/index.html=en_locale=en
 


Jim Mulder z/OS Diagnosis, Design, Development, Test  IBM Corp. 
Poughkeepsie NY



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

Re: VVDS points to non-existent catalog

[Sean Gleann]

Dan - the alias has already gone (as a result of the 'export'?). If I try a
generic ISPF list, specifying just the HLQ of the file name, I get 'No data
set names found'

Sean

On 17 October 2016 at 20:50, Blake, Daniel J [CTR] <
00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:

> Having not seen this before, I think you will need to delete the alias, so
> that the master is not searching that 'path' for the data set you are
> renaming.  Then you should be able to rename and catalog it.
>
>
> Dan
>
>
>
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Sean Gleann
> Sent: Monday, October 17, 2016 3:48 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: VVDS points to non-existent catalog
>
> Dan - yes, I tried that. I get " '(filename)' was not found in catalog. "
> John
>
>
> On 17 October 2016 at 20:37, Blake, Daniel J [CTR] <
> 00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:
>
> > Did you press PF1 to see more information as to why the rename did not
> > work?
> >
> > Thank You
> >
> >
> > Dan Blake – Team Leader
> >
> >
> > dbl...@fdic.gov
> > FDIC ISC-3 O Service Delivery | Room B4072
> > O: (703) 516-5497 | BB: (703) 314-0501 | M: (703) 946-2967
> >
> >
> > Advanced Out of Office Notice:
> >
> > Telecommute: October 24-28, 2016.
> >
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Sean Gleann
> > Sent: Monday, October 17, 2016 3:35 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: VVDS points to non-existent catalog
> >
> > Dan - no go, I'm afraid. The 'R' command results in the same 'data set
> > not catalogued' message.
> >
> > John - yes, that is very much like one of my attempts, except the file
> > involved is not a cluster
> >
> > Sean
> >
> > On 17 October 2016 at 20:20, John McKown
> > 
> > wrote:
> >
> > > On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann 
> > > wrote:
> > >
> > > > I've made a stupid mistake with one of my z/OS systems, and now
> > > > I'm
> > > hoping
> > > > that someone can help me extricate myself..
> > > >
> > > > I was in the process of moving a user catalog from one disk to
> another.
> > > >
> > > > Following examples from documentation on the IBM web site...
> > > > Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by
> > > > DELETE catname RECOVERY USERCATALOG, and then a DEFINE of the
> > > > catalog on it's new volume.
> > > > (All going well so far - I should know better)
> > > >
> > > > The subsequent attempt at an IMPORT of the 'flat' file resulted in
> > > > a JCL error 'data set not found'.
> > > >
> > > > If I use ISPF 3.4 to look at all the files on the disk involved, I
> > > > can
> > > see
> > > > that the file does in fact exist.
> > > > If I try 'I' or 'S', or 'browse', etc, I get 'data set not
> catalogued'
> > > >
> > > > The problem is that the flat file I created has a name that was
> > > > aliased
> > > to
> > > > the catalog I've just deleted and redefined. (foot...gun...BANG)
> > > >
> > > > The VVDS entry for the export file points to a catalog that -
> > > > while it exists - is empty.
> > > >
> > > > I've tried numerous attempts at RECATALOG and DELETE NVR
> > > > NOSCRATCH, but nothing works because SMS can't find the data it
> > > > needs to complete the
> > > task
> > > > I specify.
> > > >
> > >
> > > ​You tried something like the below & it failed?
> > >
> > >
> > > //RECAT   JOB (H0I),'JOHN MCKOWN',
> > > // CLASS=Z,
> > > // MSGCLASS=X,
> > > // NOTIFY=
> > > //STEP010  EXEC PGM=IDCAMS
> > > //SYSPRINT DD   SYSOUT=*
> > > //SYSINDD   *
> > >  DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
> > >  VOLUME(LIHTS1) -
> > >  RECATALOG ) -
> > >  CAT(CATALOG.ICF.VI12CAT.MCAT)
> > > /*
> > > //
> > > LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
> > > /*EOF
> > >
> > > ​
> > >
> > >
> > > >
> > > > To add to the problem, the same catalog also had my SMS SCDS/ACDS
> > > > aliased there, among numerous other datasets necessary for IPL.
> > > >
> > > > Yes, all very stupid, I know, and I believe I've learnt a very
> > > > harsh lesson.
> > > > But if anyone has got any ideas, I'd love to hear them.
> > > >
> > > > Sean
> > > >
> > > > --
> > > > --
> > > > -- For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > send email to lists...@listserv.ua.edu with the message: INFO
> > > > IBM-MAIN
> > > >
> > >
> > >
> > >
> > > --
> > > Heisenberg may have been here.
> > >
> > > Unicode: http://xkcd.com/1726/
> > >
> > > 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: VVDS points to non-existent catalog

[Sean Gleann]

Dan - yes, I tried that. I get " '(filename)' was not found in catalog. "
John


On 17 October 2016 at 20:37, Blake, Daniel J [CTR] <
00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:

> Did you press PF1 to see more information as to why the rename did not
> work?
>
> Thank You
>
>
> Dan Blake – Team Leader
>
>
> dbl...@fdic.gov
> FDIC ISC-3 O Service Delivery | Room B4072
> O: (703) 516-5497 | BB: (703) 314-0501 | M: (703) 946-2967
>
>
> Advanced Out of Office Notice:
>
> Telecommute: October 24-28, 2016.
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Sean Gleann
> Sent: Monday, October 17, 2016 3:35 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: VVDS points to non-existent catalog
>
> Dan - no go, I'm afraid. The 'R' command results in the same 'data set not
> catalogued' message.
>
> John - yes, that is very much like one of my attempts, except the file
> involved is not a cluster
>
> Sean
>
> On 17 October 2016 at 20:20, John McKown 
> wrote:
>
> > On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann 
> > wrote:
> >
> > > I've made a stupid mistake with one of my z/OS systems, and now I'm
> > hoping
> > > that someone can help me extricate myself..
> > >
> > > I was in the process of moving a user catalog from one disk to another.
> > >
> > > Following examples from documentation on the IBM web site...
> > > Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by
> > > DELETE catname RECOVERY USERCATALOG, and then a DEFINE of the
> > > catalog on it's new volume.
> > > (All going well so far - I should know better)
> > >
> > > The subsequent attempt at an IMPORT of the 'flat' file resulted in a
> > > JCL error 'data set not found'.
> > >
> > > If I use ISPF 3.4 to look at all the files on the disk involved, I
> > > can
> > see
> > > that the file does in fact exist.
> > > If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'
> > >
> > > The problem is that the flat file I created has a name that was
> > > aliased
> > to
> > > the catalog I've just deleted and redefined. (foot...gun...BANG)
> > >
> > > The VVDS entry for the export file points to a catalog that - while
> > > it exists - is empty.
> > >
> > > I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH,
> > > but nothing works because SMS can't find the data it needs to
> > > complete the
> > task
> > > I specify.
> > >
> >
> > ​You tried something like the below & it failed?
> >
> >
> > //RECAT   JOB (H0I),'JOHN MCKOWN',
> > // CLASS=Z,
> > // MSGCLASS=X,
> > // NOTIFY=
> > //STEP010  EXEC PGM=IDCAMS
> > //SYSPRINT DD   SYSOUT=*
> > //SYSINDD   *
> >  DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
> >  VOLUME(LIHTS1) -
> >  RECATALOG ) -
> >  CAT(CATALOG.ICF.VI12CAT.MCAT)
> > /*
> > //
> > LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
> > /*EOF
> >
> > ​
> >
> >
> > >
> > > To add to the problem, the same catalog also had my SMS SCDS/ACDS
> > > aliased there, among numerous other datasets necessary for IPL.
> > >
> > > Yes, all very stupid, I know, and I believe I've learnt a very harsh
> > > lesson.
> > > But if anyone has got any ideas, I'd love to hear them.
> > >
> > > Sean
> > >
> > > 
> > > -- For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO
> > > IBM-MAIN
> > >
> >
> >
> >
> > --
> > Heisenberg may have been here.
> >
> > Unicode: http://xkcd.com/1726/
> >
> > Maranatha! <><
> > John McKown
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

Re: VVDS points to non-existent catalog

[Blake, Daniel J [CTR]]

Having not seen this before, I think you will need to delete the alias, so that 
the master is not searching that 'path' for the data set you are renaming.  
Then you should be able to rename and catalog it.  


Dan






-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sean Gleann
Sent: Monday, October 17, 2016 3:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VVDS points to non-existent catalog

Dan - yes, I tried that. I get " '(filename)' was not found in catalog. "
John


On 17 October 2016 at 20:37, Blake, Daniel J [CTR] < 
00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:

> Did you press PF1 to see more information as to why the rename did not 
> work?
>
> Thank You
>
>
> Dan Blake – Team Leader
>
>
> dbl...@fdic.gov
> FDIC ISC-3 O Service Delivery | Room B4072
> O: (703) 516-5497 | BB: (703) 314-0501 | M: (703) 946-2967
>
>
> Advanced Out of Office Notice:
>
> Telecommute: October 24-28, 2016.
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Sean Gleann
> Sent: Monday, October 17, 2016 3:35 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: VVDS points to non-existent catalog
>
> Dan - no go, I'm afraid. The 'R' command results in the same 'data set 
> not catalogued' message.
>
> John - yes, that is very much like one of my attempts, except the file 
> involved is not a cluster
>
> Sean
>
> On 17 October 2016 at 20:20, John McKown 
> 
> wrote:
>
> > On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann 
> > wrote:
> >
> > > I've made a stupid mistake with one of my z/OS systems, and now 
> > > I'm
> > hoping
> > > that someone can help me extricate myself..
> > >
> > > I was in the process of moving a user catalog from one disk to another.
> > >
> > > Following examples from documentation on the IBM web site...
> > > Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by 
> > > DELETE catname RECOVERY USERCATALOG, and then a DEFINE of the 
> > > catalog on it's new volume.
> > > (All going well so far - I should know better)
> > >
> > > The subsequent attempt at an IMPORT of the 'flat' file resulted in 
> > > a JCL error 'data set not found'.
> > >
> > > If I use ISPF 3.4 to look at all the files on the disk involved, I 
> > > can
> > see
> > > that the file does in fact exist.
> > > If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'
> > >
> > > The problem is that the flat file I created has a name that was 
> > > aliased
> > to
> > > the catalog I've just deleted and redefined. (foot...gun...BANG)
> > >
> > > The VVDS entry for the export file points to a catalog that - 
> > > while it exists - is empty.
> > >
> > > I've tried numerous attempts at RECATALOG and DELETE NVR 
> > > NOSCRATCH, but nothing works because SMS can't find the data it 
> > > needs to complete the
> > task
> > > I specify.
> > >
> >
> > ​You tried something like the below & it failed?
> >
> >
> > //RECAT   JOB (H0I),'JOHN MCKOWN',
> > // CLASS=Z,
> > // MSGCLASS=X,
> > // NOTIFY=
> > //STEP010  EXEC PGM=IDCAMS
> > //SYSPRINT DD   SYSOUT=*
> > //SYSINDD   *
> >  DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
> >  VOLUME(LIHTS1) -
> >  RECATALOG ) -
> >  CAT(CATALOG.ICF.VI12CAT.MCAT)
> > /*
> > //
> > LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
> > /*EOF
> >
> > ​
> >
> >
> > >
> > > To add to the problem, the same catalog also had my SMS SCDS/ACDS 
> > > aliased there, among numerous other datasets necessary for IPL.
> > >
> > > Yes, all very stupid, I know, and I believe I've learnt a very 
> > > harsh lesson.
> > > But if anyone has got any ideas, I'd love to hear them.
> > >
> > > Sean
> > >
> > > --
> > > --
> > > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > > send email to lists...@listserv.ua.edu with the message: INFO 
> > > IBM-MAIN
> > >
> >
> >
> >
> > --
> > Heisenberg may have been here.
> >
> > Unicode: http://xkcd.com/1726/
> >
> > Maranatha! <><
> > John McKown
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

Re: VVDS points to non-existent catalog

[Sean Gleann]

Mark - Thanks - that idea flew a little way... The DEFINE went to RC0, but
ISPF still resolutely insists that the file does not exist.
Sean

On 17 October 2016 at 20:47, Sean Gleann  wrote:

> Dan - yes, I tried that. I get " '(filename)' was not found in catalog. "
> John
>
>
> On 17 October 2016 at 20:37, Blake, Daniel J [CTR] <
> 00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:
>
>> Did you press PF1 to see more information as to why the rename did not
>> work?
>>
>> Thank You
>>
>>
>> Dan Blake – Team Leader
>>
>>
>> dbl...@fdic.gov
>> FDIC ISC-3 O Service Delivery | Room B4072
>> O: (703) 516-5497 | BB: (703) 314-0501 | M: (703) 946-2967
>>
>>
>> Advanced Out of Office Notice:
>>
>> Telecommute: October 24-28, 2016.
>>
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
>> Behalf Of Sean Gleann
>> Sent: Monday, October 17, 2016 3:35 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: VVDS points to non-existent catalog
>>
>> Dan - no go, I'm afraid. The 'R' command results in the same 'data set
>> not catalogued' message.
>>
>> John - yes, that is very much like one of my attempts, except the file
>> involved is not a cluster
>>
>> Sean
>>
>> On 17 October 2016 at 20:20, John McKown 
>> wrote:
>>
>> > On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann 
>> > wrote:
>> >
>> > > I've made a stupid mistake with one of my z/OS systems, and now I'm
>> > hoping
>> > > that someone can help me extricate myself..
>> > >
>> > > I was in the process of moving a user catalog from one disk to
>> another.
>> > >
>> > > Following examples from documentation on the IBM web site...
>> > > Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by
>> > > DELETE catname RECOVERY USERCATALOG, and then a DEFINE of the
>> > > catalog on it's new volume.
>> > > (All going well so far - I should know better)
>> > >
>> > > The subsequent attempt at an IMPORT of the 'flat' file resulted in a
>> > > JCL error 'data set not found'.
>> > >
>> > > If I use ISPF 3.4 to look at all the files on the disk involved, I
>> > > can
>> > see
>> > > that the file does in fact exist.
>> > > If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'
>> > >
>> > > The problem is that the flat file I created has a name that was
>> > > aliased
>> > to
>> > > the catalog I've just deleted and redefined. (foot...gun...BANG)
>> > >
>> > > The VVDS entry for the export file points to a catalog that - while
>> > > it exists - is empty.
>> > >
>> > > I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH,
>> > > but nothing works because SMS can't find the data it needs to
>> > > complete the
>> > task
>> > > I specify.
>> > >
>> >
>> > ​You tried something like the below & it failed?
>> >
>> >
>> > //RECAT   JOB (H0I),'JOHN MCKOWN',
>> > // CLASS=Z,
>> > // MSGCLASS=X,
>> > // NOTIFY=
>> > //STEP010  EXEC PGM=IDCAMS
>> > //SYSPRINT DD   SYSOUT=*
>> > //SYSINDD   *
>> >  DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
>> >  VOLUME(LIHTS1) -
>> >  RECATALOG ) -
>> >  CAT(CATALOG.ICF.VI12CAT.MCAT)
>> > /*
>> > //
>> > LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
>> > /*EOF
>> >
>> > ​
>> >
>> >
>> > >
>> > > To add to the problem, the same catalog also had my SMS SCDS/ACDS
>> > > aliased there, among numerous other datasets necessary for IPL.
>> > >
>> > > Yes, all very stupid, I know, and I believe I've learnt a very harsh
>> > > lesson.
>> > > But if anyone has got any ideas, I'd love to hear them.
>> > >
>> > > Sean
>> > >
>> > > 
>> > > -- For IBM-MAIN subscribe / signoff / archive access instructions,
>> > > send email to lists...@listserv.ua.edu with the message: INFO
>> > > IBM-MAIN
>> > >
>> >
>> >
>> >
>> > --
>> > Heisenberg may have been here.
>> >
>> > Unicode: http://xkcd.com/1726/
>> >
>> > Maranatha! <><
>> > John McKown
>> >
>> > --
>> > For IBM-MAIN subscribe / signoff / archive access instructions, send
>> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>> >
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions, send
>> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>
>

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

Re: VVDS points to non-existent catalog

[Blake, Daniel J [CTR]]

Did you press PF1 to see more information as to why the rename did not work?

Thank You


Dan Blake – Team Leader
  

dbl...@fdic.gov
FDIC ISC-3 O Service Delivery | Room B4072
O: (703) 516-5497 | BB: (703) 314-0501 | M: (703) 946-2967 


Advanced Out of Office Notice:

Telecommute: October 24-28, 2016.



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sean Gleann
Sent: Monday, October 17, 2016 3:35 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VVDS points to non-existent catalog

Dan - no go, I'm afraid. The 'R' command results in the same 'data set not 
catalogued' message.

John - yes, that is very much like one of my attempts, except the file involved 
is not a cluster

Sean

On 17 October 2016 at 20:20, John McKown 
wrote:

> On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann 
> wrote:
>
> > I've made a stupid mistake with one of my z/OS systems, and now I'm
> hoping
> > that someone can help me extricate myself..
> >
> > I was in the process of moving a user catalog from one disk to another.
> >
> > Following examples from documentation on the IBM web site...
> > Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by 
> > DELETE catname RECOVERY USERCATALOG, and then a DEFINE of the 
> > catalog on it's new volume.
> > (All going well so far - I should know better)
> >
> > The subsequent attempt at an IMPORT of the 'flat' file resulted in a 
> > JCL error 'data set not found'.
> >
> > If I use ISPF 3.4 to look at all the files on the disk involved, I 
> > can
> see
> > that the file does in fact exist.
> > If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'
> >
> > The problem is that the flat file I created has a name that was 
> > aliased
> to
> > the catalog I've just deleted and redefined. (foot...gun...BANG)
> >
> > The VVDS entry for the export file points to a catalog that - while 
> > it exists - is empty.
> >
> > I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH, 
> > but nothing works because SMS can't find the data it needs to 
> > complete the
> task
> > I specify.
> >
>
> ​You tried something like the below & it failed?
>
>
> //RECAT   JOB (H0I),'JOHN MCKOWN',
> // CLASS=Z,
> // MSGCLASS=X,
> // NOTIFY=
> //STEP010  EXEC PGM=IDCAMS
> //SYSPRINT DD   SYSOUT=*
> //SYSINDD   *
>  DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
>  VOLUME(LIHTS1) -
>  RECATALOG ) -
>  CAT(CATALOG.ICF.VI12CAT.MCAT)
> /*
> //
> LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
> /*EOF
>
> ​
>
>
> >
> > To add to the problem, the same catalog also had my SMS SCDS/ACDS 
> > aliased there, among numerous other datasets necessary for IPL.
> >
> > Yes, all very stupid, I know, and I believe I've learnt a very harsh 
> > lesson.
> > But if anyone has got any ideas, I'd love to hear them.
> >
> > Sean
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
> >
>
>
>
> --
> Heisenberg may have been here.
>
> Unicode: http://xkcd.com/1726/
>
> Maranatha! <><
> John McKown
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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


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

Re: VVDS points to non-existent catalog

[Sean Gleann]

Dan - no go, I'm afraid. The 'R' command results in the same 'data set not
catalogued' message.

John - yes, that is very much like one of my attempts, except the file
involved is not a cluster

Sean

On 17 October 2016 at 20:20, John McKown 
wrote:

> On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann 
> wrote:
>
> > I've made a stupid mistake with one of my z/OS systems, and now I'm
> hoping
> > that someone can help me extricate myself..
> >
> > I was in the process of moving a user catalog from one disk to another.
> >
> > Following examples from documentation on the IBM web site...
> > Did an EXPORT TEMPORARY of the ucat to a 'flat' file,
> > followed by DELETE catname RECOVERY USERCATALOG,
> > and then a DEFINE of the catalog on it's new volume.
> > (All going well so far - I should know better)
> >
> > The subsequent attempt at an IMPORT of the 'flat' file resulted in a JCL
> > error 'data set not found'.
> >
> > If I use ISPF 3.4 to look at all the files on the disk involved, I can
> see
> > that the file does in fact exist.
> > If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'
> >
> > The problem is that the flat file I created has a name that was aliased
> to
> > the catalog I've just deleted and redefined. (foot...gun...BANG)
> >
> > The VVDS entry for the export file points to a catalog that - while it
> > exists - is empty.
> >
> > I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH, but
> > nothing works because SMS can't find the data it needs to complete the
> task
> > I specify.
> >
>
> ​You tried something like the below & it failed?
>
>
> //RECAT   JOB (H0I),'JOHN MCKOWN',
> // CLASS=Z,
> // MSGCLASS=X,
> // NOTIFY=
> //STEP010  EXEC PGM=IDCAMS
> //SYSPRINT DD   SYSOUT=*
> //SYSINDD   *
>  DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
>  VOLUME(LIHTS1) -
>  RECATALOG ) -
>  CAT(CATALOG.ICF.VI12CAT.MCAT)
> /*
> //
> LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
> /*EOF
>
> ​
>
>
> >
> > To add to the problem, the same catalog also had my SMS SCDS/ACDS aliased
> > there, among numerous other datasets necessary for IPL.
> >
> > Yes, all very stupid, I know, and I believe I've learnt a very harsh
> > lesson.
> > But if anyone has got any ideas, I'd love to hear them.
> >
> > Sean
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
>
> --
> Heisenberg may have been here.
>
> Unicode: http://xkcd.com/1726/
>
> Maranatha! <><
> John McKown
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

Re: diagnose 8 / interesting dilemma

[Tony Harminc]

On 17 October 2016 at 13:47, Jim Mulder  wrote:

>  There is IARV64 GETSTOR with TYPE=FIXED and PAGEFRAMESIZE=1M.

It's perhaps not 100% clear how it uses the 64-bit registers, but z/VM
does seem to support AMODE 64 for the caller of Diagnose 8, so I think
this could work. I suppose these days a megabyte of fixed storage here
or there doesn't count for much.

Of course there's the question of whether z/VM yet supports the large
pages (EDAT-1) needed to make this work. I don't believe it does as of
6.3, though I may have missed an announcement.

Tony H.

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

Re: VVDS points to non-existent catalog

[Steely.Mark]

You can also try to create the catalog empty. (Define UCAT) 

Then catalog the ds you need and you can perform the rename.

Thanks

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Monday, October 17, 2016 2:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VVDS points to non-existent catalog

On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann  wrote:

> I've made a stupid mistake with one of my z/OS systems, and now I'm 
> hoping that someone can help me extricate myself..
>
> I was in the process of moving a user catalog from one disk to another.
>
> Following examples from documentation on the IBM web site...
> Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by 
> DELETE catname RECOVERY USERCATALOG, and then a DEFINE of the catalog 
> on it's new volume.
> (All going well so far - I should know better)
>
> The subsequent attempt at an IMPORT of the 'flat' file resulted in a 
> JCL error 'data set not found'.
>
> If I use ISPF 3.4 to look at all the files on the disk involved, I can 
> see that the file does in fact exist.
> If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'
>
> The problem is that the flat file I created has a name that was 
> aliased to the catalog I've just deleted and redefined. 
> (foot...gun...BANG)
>
> The VVDS entry for the export file points to a catalog that - while it 
> exists - is empty.
>
> I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH, 
> but nothing works because SMS can't find the data it needs to complete 
> the task I specify.
>

​You tried something like the below & it failed?


//RECAT   JOB (H0I),'JOHN MCKOWN',
// CLASS=Z,
// MSGCLASS=X,
// NOTIFY=
//STEP010  EXEC PGM=IDCAMS
//SYSPRINT DD   SYSOUT=*
//SYSINDD   *
 DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
 VOLUME(LIHTS1) -
 RECATALOG ) -
 CAT(CATALOG.ICF.VI12CAT.MCAT)
/*
//
LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
/*EOF

​


>
> To add to the problem, the same catalog also had my SMS SCDS/ACDS 
> aliased there, among numerous other datasets necessary for IPL.
>
> Yes, all very stupid, I know, and I believe I've learnt a very harsh 
> lesson.
> But if anyone has got any ideas, I'd love to hear them.
>
> Sean
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



--
Heisenberg may have been here.

Unicode: http://xkcd.com/1726/

Maranatha! <><
John McKown

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

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

Re: VVDS points to non-existent catalog

[John McKown]

On Mon, Oct 17, 2016 at 2:10 PM, Sean Gleann  wrote:

> I've made a stupid mistake with one of my z/OS systems, and now I'm hoping
> that someone can help me extricate myself..
>
> I was in the process of moving a user catalog from one disk to another.
>
> Following examples from documentation on the IBM web site...
> Did an EXPORT TEMPORARY of the ucat to a 'flat' file,
> followed by DELETE catname RECOVERY USERCATALOG,
> and then a DEFINE of the catalog on it's new volume.
> (All going well so far - I should know better)
>
> The subsequent attempt at an IMPORT of the 'flat' file resulted in a JCL
> error 'data set not found'.
>
> If I use ISPF 3.4 to look at all the files on the disk involved, I can see
> that the file does in fact exist.
> If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'
>
> The problem is that the flat file I created has a name that was aliased to
> the catalog I've just deleted and redefined. (foot...gun...BANG)
>
> The VVDS entry for the export file points to a catalog that - while it
> exists - is empty.
>
> I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH, but
> nothing works because SMS can't find the data it needs to complete the task
> I specify.
>

​You tried something like the below & it failed?


//RECAT   JOB (H0I),'JOHN MCKOWN',
// CLASS=Z,
// MSGCLASS=X,
// NOTIFY=
//STEP010  EXEC PGM=IDCAMS
//SYSPRINT DD   SYSOUT=*
//SYSINDD   *
 DEF CLUSTER(NAME(SYS1.OS141774.SCPPEENU) -
 VOLUME(LIHTS1) -
 RECATALOG ) -
 CAT(CATALOG.ICF.VI12CAT.MCAT)
/*
//
LIHTS1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=LIHTS1
/*EOF

​


>
> To add to the problem, the same catalog also had my SMS SCDS/ACDS aliased
> there, among numerous other datasets necessary for IPL.
>
> Yes, all very stupid, I know, and I believe I've learnt a very harsh
> lesson.
> But if anyone has got any ideas, I'd love to hear them.
>
> Sean
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Heisenberg may have been here.

Unicode: http://xkcd.com/1726/

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: VVDS points to non-existent catalog

[Blake, Daniel J [CTR]]

>If I use ISPF 3.4 to look at all the files on the disk involved, I can see 
>that the file does in fact exist.<
>The problem is that the flat file I created has a name that was aliased to the 
>catalog I've just deleted and redefined. (foot...gun...BANG)>


OK, you know where the file is and the volume it is on.  You might want to 
rename it to a HLQ that is not in the catalog you are moving, then catalog it  
then run you r import again.



;-D an



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sean Gleann
Sent: Monday, October 17, 2016 3:10 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: VVDS points to non-existent catalog

I've made a stupid mistake with one of my z/OS systems, and now I'm hoping that 
someone can help me extricate myself..

I was in the process of moving a user catalog from one disk to another.

Following examples from documentation on the IBM web site...
Did an EXPORT TEMPORARY of the ucat to a 'flat' file, followed by DELETE 
catname RECOVERY USERCATALOG, and then a DEFINE of the catalog on it's new 
volume.
(All going well so far - I should know better)

The subsequent attempt at an IMPORT of the 'flat' file resulted in a JCL error 
'data set not found'.

If I use ISPF 3.4 to look at all the files on the disk involved, I can see that 
the file does in fact exist.
If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'

The problem is that the flat file I created has a name that was aliased to the 
catalog I've just deleted and redefined. (foot...gun...BANG)

The VVDS entry for the export file points to a catalog that - while it exists - 
is empty.

I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH, but nothing 
works because SMS can't find the data it needs to complete the task I specify.

To add to the problem, the same catalog also had my SMS SCDS/ACDS aliased 
there, among numerous other datasets necessary for IPL.

Yes, all very stupid, I know, and I believe I've learnt a very harsh lesson.
But if anyone has got any ideas, I'd love to hear them.

Sean

--
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: diagnose 8 / interesting dilemma

[Mark Post]

>>> On 10/17/2016 at 02:23 AM, Paul Schuster  wrote: 
> I am issuing DIAGNOSE 8 on my z/os image under VM (z/vm) to do a QUERY 
> VIRTUAL DASD.  It works*up to a certain point:
> 
> The QUERY VIRTUAL DASD command returns (for me) 38617 (decimal) bytes, 
> according to the CC=0 after the DIAGNOSE 8 command.  My buffer is large 
> enough to accommodate this.  I have tried several different sub-pools of 
> storage.  I PGSER FIX the buffer pages.  I do a SYSEVENT DONTSWAP.  I do a 
> LRA of the virtual address of the start of the buffer.  The DIAGNOSE 
> completes CC=0. But, in my buffer, I am only seeing the first page (4095) 
> bytes of the output.  
> 
> My question: I don*t see any documented restriction in the VM manuals that 
> limits the DIAGNOSE 8 output buffer to 4K (rather the limitation is the 
> architecture limit depending on your amode.) The z/vm manuals say the buffer 
> can cross page boundaries.  So is there a way to force the real storage 
> addresses of the page-fixed pages to be consecutive?  According to the 
> diagnose 8 doc., the buffer needs to be in guest-real storage, hence the LRA. 
>  And it is working for the first 4k page.
> 
> Thank you for any insight you can provide.

I have no idea how well the concepts will transfer, but Linux has had a command 
that issues DIAGNOSE 8 calls for a very long time now.  That command was 
originally "hcp" by Neale Ferguson, but then IBM created a different version 
called "vmcp".  Those commands work, so you might be able to figure out what 
they're doing and apply that to your program.


Mark Post

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

VVDS points to non-existent catalog

[Sean Gleann]

I've made a stupid mistake with one of my z/OS systems, and now I'm hoping
that someone can help me extricate myself..

I was in the process of moving a user catalog from one disk to another.

Following examples from documentation on the IBM web site...
Did an EXPORT TEMPORARY of the ucat to a 'flat' file,
followed by DELETE catname RECOVERY USERCATALOG,
and then a DEFINE of the catalog on it's new volume.
(All going well so far - I should know better)

The subsequent attempt at an IMPORT of the 'flat' file resulted in a JCL
error 'data set not found'.

If I use ISPF 3.4 to look at all the files on the disk involved, I can see
that the file does in fact exist.
If I try 'I' or 'S', or 'browse', etc, I get 'data set not catalogued'

The problem is that the flat file I created has a name that was aliased to
the catalog I've just deleted and redefined. (foot...gun...BANG)

The VVDS entry for the export file points to a catalog that - while it
exists - is empty.

I've tried numerous attempts at RECATALOG and DELETE NVR NOSCRATCH, but
nothing works because SMS can't find the data it needs to complete the task
I specify.

To add to the problem, the same catalog also had my SMS SCDS/ACDS aliased
there, among numerous other datasets necessary for IPL.

Yes, all very stupid, I know, and I believe I've learnt a very harsh lesson.
But if anyone has got any ideas, I'd love to hear them.

Sean

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

Re: Shopz issues?

[George Davis]

On 10/17/2016 9:17 AM, Richards, Robert B. wrote:

Is anyone else having issues doing a RFN from IBM's ShopzSeries?

I get logged in and see the commands CCC followed by BINARY and then nothing. 
Eventually it retries all 10 times and then fails.


I get something close - do you see:
FC1028 authServer: secure_socket_init failed with rc = 8 (Certificate 
validation error)


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

Re: HMCS consoles

[John Wallin]

A good source of information on HMCS is located in redbook "z/OS V2R1 Technical 
Update", SG24-8140.
Look on Chapter 14 "Consoles and Auto-Reply", Section 14.2 "z/OS support for 
integrated 3270 console".

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

Re: ABO Automatic Binary Optimizer/COBOL V5/V6 Migration

[Tom Ross]

>ABO only creates an optimized LOAD MODULE (program object).  It does not=20
>convert your source to V6, and it will not give you all the=20
>optimizations of V6.  Your biggest payback is if you upgrade your CPU,=20
>then you can run your load modules through ABO and get some of the=20
>optimization provided by the new hardware.

I know this was a while ago, but I wanted to comment on the reference to
'convert your source to V6'.  In general, all programs compile cleanly with
COBOL V5 and COBOL V6.  If there are problems, and about 25% of customers
have had some, they are caused by invalid data in the COBOL data items at
runtime.  To fix this, users have to change the data, or the data entry
panels, or use new compiler options to tolerate the bad data.  There is
no way to do source conversion to migrate to COBOL V5/V6, like there
was years ago for OS/VS COBOL to anything newer.

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

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

Re: diagnose 8 / interesting dilemma

[Jim Mulder]

> I am issuing DIAGNOSE 8 on my z/os image under VM (z/vm) to do a 
> QUERY VIRTUAL DASD.  It works?up to a certain point:
> 
> The QUERY VIRTUAL DASD command returns (for me) 38617 (decimal) 
> bytes, according to the CC=0 after the DIAGNOSE 8 command.  My 
> buffer is large enough to accommodate this.  I have tried several 
> different sub-pools of storage.  I PGSER FIX the buffer pages.  I do
> a SYSEVENT DONTSWAP.  I do a LRA of the virtual address of the start
> of the buffer.  The DIAGNOSE completes CC=0. But, in my buffer, I am
> only seeing the first page (4095) bytes of the output. 
> 
> My question: I don?t see any documented restriction in the VM 
> manuals that limits the DIAGNOSE 8 output buffer to 4K (rather the 
> limitation is the architecture limit depending on your amode.) The 
> z/vm manuals say the buffer can cross page boundaries.  So is there 
> a way to force the real storage addresses of the page-fixed pages to
> be consecutive?  According to the diagnose 8 doc., the buffer needs 
> to be in guest-real storage, hence the LRA.  And it is working for 
> the first 4k page.

  RSM internally manages double frames (used for access lists,
and before z/Architecture, for segment tables) and quadframes
(used for segment tables and region tables).  There are no
external interfaces for double frames or quadframes.

 There is IARV64 GETSTOR with TYPE=FIXED and PAGEFRAMESIZE=1M. 

Jim Mulder z/OS Diagnosis, Design, Development, Test  IBM Corp. 
Poughkeepsie NY



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

Re: HMCS consoles

[Ed Jaffe]

On 10/17/2016 10:05 AM, Jesse 1 Robinson wrote:

As of z/OS 2.1, consoles can be added or removed dynamically. It certainly 
applies to MCS/EMCS consoles, but I don't know about HMCS consoles. This 
dynamic process builds control blocks necessary to support a console being 
added. For HMCS, you may need an IPL on each system.


Yes, dynamic console activation/deactivation applies to HMCS. That 
happens to be the specific example I used in my oft-repeated z/OS 2.1 
User Experiences presentation at SHARE. I used the name HMCS 
(not sure why the 'A') but whatevs...


The real question is whether dynamic _deletion_ and subsequent 
_replacement_ of a wrongly-defined IPL-time HMCS specification will 
work. On the surface it seems like it ought to work, but I think there's 
a reasonable chance it won't...


--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
http://www.phoenixsoftware.com/

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

Re: diagnose 8 / interesting dilemma

[Ed Jaffe]

On 10/17/2016 9:16 AM, Paul Gilmartin wrote:


Hmmm... What happens if AMODE 31 code issues LRA and the real address
is above the bar?  Program check?  Or does LRA simply (always?) load a
64-bit register?  Is there an LRAG instruction?


Why not take at least a cursory glance at Principles of Operation before 
asking such questions publicly?


--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
http://www.phoenixsoftware.com/

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

Re: HMCS consoles

[Jesse 1 Robinson]

As of z/OS 2.1, consoles can be added or removed dynamically. It certainly 
applies to MCS/EMCS consoles, but I don't know about HMCS consoles. This 
dynamic process builds control blocks necessary to support a console being 
added. For HMCS, you may need an IPL on each system. 

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


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Barbara Nitz
Sent: Sunday, October 16, 2016 10:41 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: HMCS consoles

>If you need help setting them up, send me an offline email and I can direct 
>you through it.  It will take you all of about 10 minutes to do the OSA 
>changes and another 5 to generate the NIP OS consoles in your IODF.

Thanks Brian, we do have those consoles set up (someone else did it), and the 
HMCS worked great for NIP. Due to the wrong definition I could only use one per 
plex.

To answer my own question: This morning I went and deleted the console named 
HMCS in the sandplex. I corrected the definition to now specify this:
CONSOLE DEVNUM(HMCS) NAME(HMCS) AUTH(MASTER) MSCOPE(*)
INTIDS(Y) LEVEL(ALL) UNKNIDS(Y) ROUTCODE(1-10,11-128) (Note that I also 
limit mscope now to make health checker happy. And we use 4 character system 
names.)

Then I IPL'd the system where the console named HMCS was once active. The new 
console HMCS activated just fine. And a good thing it did because the 
Operating System Messages console is complete crap - the last message it was 
showing was a listing of my IEASYSxx parms. I was running blind until NIP was 
done. IBM will need to fix this - I have encountered it several times now.

It turns out that the other system in the sandplex still cannot activate an 
HMCS console, not even console HMCS. Now that I saw this, it makes sense 
because an MCS console has control blocks built at IPL and (AFAIK) at IPL only, 
and there simply are no control blocks to describe the new HMCS console on 
the not-yet-IPL'd system. We'll take care of that during the day when we move 
that other system to the z13.

Barbara


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

Re: diagnose 8 / interesting dilemma

[Paul Gilmartin]

On Mon, 17 Oct 2016 12:12:38 +0200, Christian Borntraeger wrote:
>
>As you already guessed, the memory you get is virtual, so the pages are not 
>consecutive. The LRA will give you the address of the first page, but the 2nd, 
>3rd and so on will be somewhere else. Please note that your code will even 
>cause random memory overwrites in your z/OS as the diag8 will write to the 
>real address of your LRA, the real address of your LRA+4096 and so on.
>
Ouch!  But can't physical pages nowadays be much larger than 4096 bytes?  Might
the real address be above the bar?  Does DIAG 8 support buffers above the bar?
Otherwise it would be prudent design for DIAG 8 to reject requests when the
reply buffer might cross physical page boundaries?

Do some OSes support allocation of contiguous pages?  I suppose V=R is
obsolete nowadays.

Hmmm... What happens if AMODE 31 code issues LRA and the real address
is above the bar?  Program check?  Or does LRA simply (always?) load a
64-bit register?  Is there an LRAG instruction?

-- gil

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

Re: EXTERNAL: Re: HMCS consoles

[Jerry Whitteridge]

In our case we use the Sysclone to provide unique consoles too

Jerry Whitteridge
Manager Mainframe Systems & Storage
Albertsons - Safeway Inc.
925 738 9443
Corporate Tieline - 89443

If you feel in control
you just aren't going fast enough.




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Conley
Sent: Saturday, October 15, 2016 7:37 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: HMCS consoles

On 10/15/2016 10:22 AM, Barbara Nitz wrote:
> Hi Tom,
>
>> I found this forum post, which says you can have one HMCS console per
>> z/OS image (WTW).
>
> I have this in my (shared) CONSOLxx:
> CONSOLE DEVNUM(HMCS) NAME(HMCS) AUTH(MASTER) ROUTCODE(ALL)
> INTIDS(Y) LEVEL(ALL) UNKNIDS(Y)
>
> I had assumed that this definition would give me one HMCS per system in the 
> 4-way sysplex, but that does not seem to be the case:
> D C,F,CN=HMCS
> CNZ4100I 16.02.52 CONSOLE DISPLAY 102
> CONSOLES MATCHING COMMAND: D C,F,CN=HMCS
> MSG:CURR=0LIM=2000 RPLY:CURR=15   LIM=99SYS=KFW2 PFK=00
> HMCS  TYPE=HMCS STATUS=STDBY-xxx4
>   DEFINED=(xxx4)
>   MATCHED=(xxx4)
>ATTRIBUTES ON xxx4
>   AUTH=(MASTER)CMDSYS=*NBUF=0SUPSBY=Y
>   DEV=NONE LOGON=OPTIONAL  USERID=N/A
>   MFORM=(M)AREA=(Z,A)  PFKTAB=*DEFAULT
>   USE=FC  DEL=RD   RTME=2RNUM=5SEG=19CON=N
>   LEVEL=(ALL)
>   MONITOR=(NONE)   INTIDS=Y  UNKNIDS=Y
>   ROUT=(ALL)
>   MSCOPE=(*ALL)
>
> In a 3 or 4-way sysplex, I see no way to tell z/OS to use *one* HMCS per 
> *system*, much less how to specify which system should have which HMCS 
> console assigned if I were to specify a different name (which I am not sure 
> that I can, hence my question).
>
> This was the first system to be IPL'd on the z13, and I am unable to
> open a second HMCS in that sysplex. No attention generating thing I
> can think of gets me the HMCS to the other system. (And it would work
> on a z196 with z/OS 2.1, so it is not the old hardware.)
>
> In the other sysplex there was one system that was IPL'd on  the z13 using 
> the HMCS, but we had to go back to the old hardware. This time around we 
> moved a different system from that sysplex to the z13, so that console named 
> HMCS was still defined to the other system. While the HMCS worked fine during 
> NIP for the second system, it stopped working once NIP was over. I am able to 
> delete that HMCS console definition, but now no HMCS console works. I did not 
> see a way to get *the* HMCS attached to a different 'owning' system.
>
> So FWIW, I very much doubt that one HMCS per z/OS image can be activated. It 
> seems to me (from what I remember when I did console support, admittedly 
> before console restructure) that we are talking about one HMCS console per 
> sysplex.
>
> That's why I am asking here.
>
> Best regards, Barbara
>

Barbara,

I think the NAME is messing you up.  It needs to be unique in the SYSPLEX.  
Here is the example from that first document I sent you.

For example, you could define the HMCS similar to:
CONSOLE DEVNUM(HMCS)
 NAME()

I think if you add the SYSNAME to the HMCS name, you should be OK.

Regards,
Tom Conley

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

 Warning: All e-mail sent to this address will be received by the corporate 
e-mail system, and is subject to archival and review by someone other than the 
recipient. This e-mail may contain proprietary information and is intended only 
for the use of the intended recipient(s). If the reader of this message is not 
the intended recipient(s), you are notified that you have received this message 
in error and that any review, dissemination, distribution or copying of this 
message is strictly prohibited. If you have received this message in error, 
please notify the sender immediately.


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

Shopz issues?

[Richards, Robert B.]

Is anyone else having issues doing a RFN from IBM's ShopzSeries?

I get logged in and see the commands CCC followed by BINARY and then nothing. 
Eventually it retries all 10 times and then fails.

Thoughts anyone?

Bob

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

HMC logs

[White, Andy]

Hi everyone,

  Has anyone successfully been able to get logs sent from your HMC to let's say 
a server or logs stored on a MF in a PDS. I have people from my team that would 
like to do it been trying to see how this works. The TSO id we put in it and 
password but don't see a successful logon to either TSO or USS. In a perfect 
world we have been asked by the auditors to send these logs weekly to a dataset 
for review.

Anyone have a cheat sheet or a contact someone from my team can talk to 
offline? Thanks


Andy





The information contained in this message may be CONFIDENTIAL and is for the 
intended addressee only.  Any unauthorized use, dissemination of the 
information, or copying of this message is prohibited.  If you are not the 
intended addressee, please notify the sender immediately and delete this 
message.

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

Re: ABO Automatic Binary Optimizer

[Bill Woodger]

There are a number of different items within this topic.



"Just a recompile", where the object is expected to be identical, 
regression-tested?

To my mind, no. It should be verified as identical. If it is not, the reason 
should be identified and what follows depends on what is found out.

I would not expect regression-test cases to necessarily notice that the object 
is different if subtly so.


"Slap on OPT at the last moment before going to Production". I'd never suggest 
this, so for me it is a hypothetical question which does, however, shed some 
light on the "to what extent an ABO'd program should be tested".

For me, changing any compile option at the moment of going to Production 
invalidates all the testing up to that point. So if you're going to Production, 
as in at that time, then no, I don't see what you could do to test it. It's 
like a contradiction in terms, but if you are really going to Production and 
really changing an option which affects the generated code, then I don't see 
how you can test it (effectively you go the "Production Fix" route).



"ABO changes, can they be verified": there is IBM advice on testing of ABO.For 
now, until I can transcribe (or find it written) I'll paraphrase it as "become 
confident with the product with your early testing, then test for performance". 
The "test for performance" suggestion is interesting. Is there an implication 
that sometimes things regress in performance? Oh no, another subject added to 
the already complex mix.


Enterprise COBOL and OPT. Does OPT change the results produced by a program? 
Well, given data which conforms to PICture and COBOL which conforms to the 
Language Reference, and impact of options as described in the Programming 
Guide, and, perhaps, things in the Migration Guide, No. OPT does not change how 
such a program works. If it happens to do so, then it is time to "reach out" to 
IBM.

As an example, if you write a program which only uses literals or "constants", 
OPT (at least up to 4.2) will (I don't know if there is a limit as to the size 
of the program) just work out the result and not bother with executing the 
code. I suspect V5+ does this, even more so.


Might there be difference in output with non-conforming data or a 
non-conforming program, per level of OPT? For sure. Since there is no "defined" 
behaviour for those cases, it would be... difficult... for OPT to be able to 
second-guess what was considered to be the correct result.


"Can all programs which could ever exist in this or any potential Universe be 
verified automatically". No. But, so what?


DSPLAY "A MESSAGE"
GOBACK
.

Can that program (with minimal necessary stuff at the beginning) be verified? 
Yes. (I hate to think of the disavowals of that, so hopefully in a separate 
topic, this one is twisted enough already).

Can something more complex, expressed in a language more suitable to automatic 
verification, be automatically verified, as it is transformed, as being 
equivalent to its starting-point? The claim seems to, from ABO, yes. It is 
their claim, not mine, it is what does underly the quote (from the User Guide 
for ABO, although it may also appear in marketing material).

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

Re: diagnose 8 / interesting dilemma

[Christian Borntraeger]

On 10/17/2016 08:23 AM, Paul Schuster wrote:
> I am issuing DIAGNOSE 8 on my z/os image under VM (z/vm) to do a QUERY 
> VIRTUAL DASD.  It works—up to a certain point:
> 
> The QUERY VIRTUAL DASD command returns (for me) 38617 (decimal) bytes, 
> according to the CC=0 after the DIAGNOSE 8 command.  My buffer is large 
> enough to accommodate this.  I have tried several different sub-pools of 
> storage.  I PGSER FIX the buffer pages.  I do a SYSEVENT DONTSWAP.  I do a 
> LRA of the virtual address of the start of the buffer.  The DIAGNOSE 
> completes CC=0. But, in my buffer, I am only seeing the first page (4095) 
> bytes of the output.  
> 
> My question: I don’t see any documented restriction in the VM manuals that 
> limits the DIAGNOSE 8 output buffer to 4K (rather the limitation is the 
> architecture limit depending on your amode.) The z/vm manuals say the buffer 
> can cross page boundaries.  So is there a way to force the real storage 
> addresses of the page-fixed pages to be consecutive?  According to the 
> diagnose 8 doc., the buffer needs to be in guest-real storage, hence the LRA. 
>  And it is working for the first 4k page.
> 
> Thank you for any insight you can provide. 

As you already guessed, the memory you get is virtual, so the pages are not 
consecutive. The LRA will give you the address of the first page, but the 2nd, 
3rd and so on will be somewhere else. Please note that your code will even 
cause random memory overwrites in your z/OS as the diag8 will write to the real 
address of your LRA, the real address of your LRA+4096 and so on.

I do not know if there is an interface to get consective real memory as I am 
not an Z/OS expert. 

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

Re: TCP/IP ezasoket call interface - connection timeout parameter.

[Cannaerts, Jan]

Thank you Mike, Roberto, and David for the unanimous advice.
I guess we will have to re-implement!


Kind regards,
Jan



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: maandag 17 oktober 2016 6:20
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: TCP/IP ezasoket call interface - connection timeout parameter.

I'm not familiar with EZASOCKET but I assume it supports the usual set 
of socket API calls. To set a connection timeout put the socket into 
non-blocking mode and then call connect(). Check the return code, it's 
probably EINPROGRESS otherwise an error has occured. Call select() with 
a timeout value to wait until the socket is connected or a timeout 
occurs. Put the socket back into blocking mode and send/receive some 
data. I also use setsockopt() to set send/receive timeouts as well.


On 14/10/2016 8:52 PM, Cannaerts, Jan wrote:
> Hello list,
>
>
> We have a situation where we have a CICS transaction which exchanges 
> information
> With another company over TCP/IP, using the ezasoket call interface.
> We are the client, while they are the server.
>
> Through experience we have learned that "because reasons", the server does not
> always accept our connections, but our connection attempts are not being
> actively refused. Instead, the connection attempt waits until its timeout 
> value
> is met and then returns with the appropriate error code. For every pending
> connection that will never succeed, a transaction sits there waiting for its
> timeout. Those queue up, we reach MaxTasks, and other work gets disrupted.
>
> So the question is then; how and/or where we can set this timeout value
> for a connection attempt? From what I gather, it's not possible to set this 
> value
> on a per-socket basis, as some digging through the IP Sockets Application
> Programming Interface Guide and Reference has left me wanting. From the
> z/OS Communications Server: IP Configuration Reference, I find that I can set 
> the
> CONNECTTIMEOUT parameter in the TCPCONFIG statement of our TCP/IP profile, but
> this value will then be enforced on every connection made through that IP 
> stack.
>  From what I gather, we don't set CONNECTTIMEOUT, and as such are subject to 
> the
> 75 second default, which is definitely too long for what we're doing.
>
> We could set up an entirely different IP stack with a lower CONNECTTIMEOUT for
> just this application, but that seems a bit much. Especially if we can set the
> connection timeout on a per-socket basis instead.
>
> Another idea is to make the sockets that perform the connection attempts
> non-blocking. We would check the return code after the connection attempt, 
> and if
> successful continue. If the connection is still pending, we'd issue a select 
> with
> an appropriate timeout parameter. At this point this seems the most logical 
> way
> to continue. But I know I might be missing something, otherwise I wouldn't be
> consulting the list.
>
> Any ideas, or comments about my assumptions are kindly appreciated.
>
>
> Regards,
> Jan
>
> --
> 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

diagnose 8 / interesting dilemma

[Paul Schuster]

I am issuing DIAGNOSE 8 on my z/os image under VM (z/vm) to do a QUERY VIRTUAL 
DASD.  It works—up to a certain point:

The QUERY VIRTUAL DASD command returns (for me) 38617 (decimal) bytes, 
according to the CC=0 after the DIAGNOSE 8 command.  My buffer is large enough 
to accommodate this.  I have tried several different sub-pools of storage.  I 
PGSER FIX the buffer pages.  I do a SYSEVENT DONTSWAP.  I do a LRA of the 
virtual address of the start of the buffer.  The DIAGNOSE completes CC=0. But, 
in my buffer, I am only seeing the first page (4095) bytes of the output.  

My question: I don’t see any documented restriction in the VM manuals that 
limits the DIAGNOSE 8 output buffer to 4K (rather the limitation is the 
architecture limit depending on your amode.) The z/vm manuals say the buffer 
can cross page boundaries.  So is there a way to force the real storage 
addresses of the page-fixed pages to be consecutive?  According to the diagnose 
8 doc., the buffer needs to be in guest-real storage, hence the LRA.  And it is 
working for the first 4k page.

Thank you for any insight you can provide. 
Paul

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

Re: ABO Automatic Binary Optimizer

[Martin Packer]

The advice I gave to anyone who would listen INSIDE IBM was:

Publish information on the kinds of transformations ABO does. That would
help build CONFIDENCE.

My advice to anyone using it, which echoes what's been said here is:

Test the ABO output to the extent you can.

Of course ABO might get a reputation for reliability or otherwise; Time
will tell.

Cheers, Martin

Sent from my iPad

> On 17 Oct 2016, at 00:25, Peter Relson  wrote:
>
> 
> No, that is not what I meant.
>
> It goes back to this: "[ABO] ... produces a functionally equivalent
> executable program", which is a claim somewhere within the ABO site. OK,
I
> can see a search-box at the top of my screen (sorry, "page"). It is in
the
> User's Guide for ABO.
>
> That is either some snake-oil marketing-speak, or something underlies it.

> I assumed the latter, and that now seems to be borne out by further
> research.
>
> To me it amounts to "we can show that the program we produce, works in
the
> same way as the program we started with, it just does it differently".
> This is a very different thing from the mythical program which can test
> any given program.
> 
>
> I cannot agree.  That sort of statement in marketing material that I know

> of (my knowledge of such material is admittedly very limited) amounts to
> "that is our intent; if that is not the case then we will consider that a

> bug that we may fix".
>
> 
> My interpretation is this: "If the program is written in such a way that
> it complies with what is explicitly documented for the version of
> Enterprise COBOL that the program was last compiled with, that
> documentation being the appropriate Language Reference, Programming Guide

> and Migration Guide, and that all the data referenced by the given
program
> "complies with its PICture", then that will work in an identical manner
> with Enterprise COBOL V5+."
> 
>
> And that sounds to me like the intent of the product. And when the intent

> is not met, it is a bug that we may fix.
>
> You seem to be looking for a guarantee of program correctness. If I am
> correct, a vendor (including IBM) cannot in ordinary circumstances offer
> that; they/we can offer only a warranty that defects will be dealt with.
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>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