Re: Can anyone remember "drum" storage?

2017-12-20 Thread Tony Thigpen
I don't believe you looked at the pictures or the short video. The heads 
are not reading the same platters.


Tony Thigpen

Joel C. Ewing wrote on 12/20/2017 09:15 AM:

I don't think so.  Says each R/W head accesses same disk blocks, and
there would be zilch improvement in speed if they were simply seen by OS
as two independent disks.  By electronically selecting which of the two
heads to use to read the track based on which sees the start of the
desired block first, you cut the rotational latency time in half.  With
a single R/W head the only way to get the same reduction in latency
delay would be to double the rotational speed of the platter, which
might cause greater problems.
 J C Ewing

On 12/20/2017 07:18 AM, Tony Thigpen wrote:

 From reading the description, it really just appears to the OS as two
drives in one housing.

Tony Thigpen

John McKown wrote on 12/20/2017 08:08 AM:

It's not really a drum, but it is getting closer. Of course, for true
speed, one should go SSD.

http://www.theregister.co.uk/2017/12/19/seagate_disk_drive_multi_actuator/


[quote]

Seagate is increasing IO performance in disk drives by separating
read-write heads into two separate sets which can operate
independently and
in parallel.

The heads are positioned at one end of actuator arms which rotate
around a
post at their other end to move the heads across the platter surfaces.
Thus, with an eight-platter drive, each read-write head is positioned
above
the same cylindrical track on each platter and reads or writes to and
from
the same disk blocks on each platter's surface.

[\quote]




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





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


Re: Can anyone remember "drum" storage?

2017-12-20 Thread Tony Thigpen
From reading the description, it really just appears to the OS as two 
drives in one housing.


Tony Thigpen

John McKown wrote on 12/20/2017 08:08 AM:

It's not really a drum, but it is getting closer. Of course, for true
speed, one should go SSD.

http://www.theregister.co.uk/2017/12/19/seagate_disk_drive_multi_actuator/

[quote]

Seagate is increasing IO performance in disk drives by separating
read-write heads into two separate sets which can operate independently and
in parallel.

The heads are positioned at one end of actuator arms which rotate around a
post at their other end to move the heads across the platter surfaces.
Thus, with an eight-platter drive, each read-write head is positioned above
the same cylindrical track on each platter and reads or writes to and from
the same disk blocks on each platter's surface.

[\quote]




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


Re: Rexx console question

2017-12-19 Thread Tony Thigpen
Woops. Just realized that (E)JES is a software product. I initially read 
it as JES 4.5, not (E)JES 4.5.


Don't have it, but the SDSF is a good suggestion that I will try.

Still, thanks Ed.

Tony Thigpen

Tony Thigpen wrote on 12/19/2017 11:27 AM:

Ed,

Thanks. I did find you presentation about it when I googled it. I am
going to read it shortly.

Finding doc for this stuff in z/OS is a *lot* harder than in z/VSE. It
seems to be spread over many manuals whereas in z/VSE they mention
everything in the REXX reference manual.

I am still googling to find

One question. I am at RELEASE z/OS 01.13.00. What version of JES2 am I
running?

Tony Thigpen

Ed Jaffe wrote on 12/19/2017 11:06 AM:

On 12/19/2017 1:31 AM, Tony Thigpen wrote:

I am using CONSOLE ACTIVATE in batch jobs to issue messages to the
operator.

Most of the time, it works flawlessly, but if two jobs are running at
the same time, one of the jobs receives an error on the ACTIVATE ane
the message is never issued.


MCS does not allow two consoles with the same name to be active in the
sysplex at the same time. It does not appear from your example that you
need to inspect the command response. Therefore, you probably don't need
a console at all for this command i.e., you could send it from the
internal console.

To do this using (E)JES, you would replace all of your REXX CONSOLE
stuff with simply:

cmd = "$D M,D=OSCAR."who",'"info"'"
rc = ejesrexx("EXECAPI 0 'I/"cmd"' (TERM")

If you only have SDSF available, you could do it like this:

rc = isfcalls('ON')
cmd.0 = 1
cmd.1 = "$D M,D=OSCAR."who",'"info"'"
address SDSF "ISFSLASH (cmd.) (INTERNAL)"
rc = isfcalls('OFF')

There might also be "freeware" programs on the CBT tape that will issue
a simple MGCR[E] for you. Or you could roll your own. It's only a few
lines of code.



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




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


Re: Rexx console question

2017-12-19 Thread Tony Thigpen

Ed,

Thanks. I did find you presentation about it when I googled it. I am 
going to read it shortly.


Finding doc for this stuff in z/OS is a *lot* harder than in z/VSE. It 
seems to be spread over many manuals whereas in z/VSE they mention 
everything in the REXX reference manual.


I am still googling to find

One question. I am at RELEASE z/OS 01.13.00. What version of JES2 am I 
running?


Tony Thigpen

Ed Jaffe wrote on 12/19/2017 11:06 AM:

On 12/19/2017 1:31 AM, Tony Thigpen wrote:

I am using CONSOLE ACTIVATE in batch jobs to issue messages to the
operator.

Most of the time, it works flawlessly, but if two jobs are running at
the same time, one of the jobs receives an error on the ACTIVATE ane
the message is never issued.


MCS does not allow two consoles with the same name to be active in the
sysplex at the same time. It does not appear from your example that you
need to inspect the command response. Therefore, you probably don't need
a console at all for this command i.e., you could send it from the
internal console.

To do this using (E)JES, you would replace all of your REXX CONSOLE
stuff with simply:

cmd = "$D M,D=OSCAR."who",'"info"'"
rc = ejesrexx("EXECAPI 0 'I/"cmd"' (TERM")

If you only have SDSF available, you could do it like this:

rc = isfcalls('ON')
cmd.0 = 1
cmd.1 = "$D M,D=OSCAR."who",'"info"'"
address SDSF "ISFSLASH (cmd.) (INTERNAL)"
rc = isfcalls('OFF')

There might also be "freeware" programs on the CBT tape that will issue
a simple MGCR[E] for you. Or you could roll your own. It's only a few
lines of code.



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


Rexx console question

2017-12-19 Thread Tony Thigpen

I am using CONSOLE ACTIVATE in batch jobs to issue messages to the operator.

Most of the time, it works flawlessly, but if two jobs are running at 
the same time, one of the jobs receives an error on the ACTIVATE ane the 
message is never issued.


I am using running the rexx using IKJEFT01. Both jobs are under the same 
userid.


 /* JOBZSMSG job processing response REXX */
 trace off
 "CONSOLE ACTIVATE"
 pull info
 ii = words(info)
 who = word(info,ii)
 cmd = "$D M,D=OSCAR."who",'"info"'"
 "CONSOLE SYSCMD("Cmd")"
 say cmd
 "CONSOLE DEACTIVATE"
 exit 0

Anybody have any suggestions?

--
Tony Thigpen

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


SysRexx - MPFNREXX bug found

2017-12-08 Thread Tony Thigpen
I have found what I would consider a bug in MPFNREXX. Others may find it 
WOD.


The exit expects the first 8 characters of the message line to be the 
message number.


We are trying to eliminate a product that placed messages on the console 
that were shorter than 8 characters. Such as:

ZADD A B

The exit was passing to AXREXX a rexx name of 'ZADD AAA'. Then, an error 
would be returned saying that rexx 'ZADD AAA' could not be found in the 
rexx library.


I have quick fix now. I will clean it up a bit and see if I can get it 
back to the original author.

*  Author: Dana Mitchell   dmit...@shazam.net

It may not matter to anyone else, but if anyone needs the same fix, let 
me know.


--
Tony Thigpen

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


Re: SysRexx, MPF exit and debugging (answered)

2017-12-08 Thread Tony Thigpen
Found that I have to put a DSN into the MPF exit program that uses the 
ASREXX macro.


Tony Thigpen

Tony Thigpen wrote on 12/08/2017 11:53 AM:

We have SysRexx running.
We are using the MPFNREXX interface that is being shared around.
Everything is working from a set-up perspective.
Short SysRexx members are working.

But, now I tying to write the rexx to handle more significant
situations. When I have some bad code in my rexx, I get a cryptic set of
messages on the console.

Where does the normal 'rexx error messages' and 'trace output' go when
running a SysRexx?



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


SysRexx, MPF exit and debugging

2017-12-08 Thread Tony Thigpen

We have SysRexx running.
We are using the MPFNREXX interface that is being shared around.
Everything is working from a set-up perspective.
Short SysRexx members are working.

But, now I tying to write the rexx to handle more significant 
situations. When I have some bad code in my rexx, I get a cryptic set of 
messages on the console.


Where does the normal 'rexx error messages' and 'trace output' go when 
running a SysRexx?


--
Tony Thigpen

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


Re: Consolidate Consoles

2017-11-27 Thread Tony Thigpen

That is a thought.

Tony Thigpen

Tom Brennan wrote on 11/27/2017 11:58 PM:

A bit far-fetched, but:

Create a HLLAPI application that reads a number of minimized ICC
terminal emulators and piles all the console messages into a single
display.  Use a different text color for each - just like sysplexed
consoles do.

For command input, have the operator open that particular emulator
window.  That way you avoid HLLAPI code for command input and routing,
and (more importantly) you force the user to focus their attention on
one system.  Once the command is entered, minimize the emulator window
and the big HLLAPI application with all the messages shows again.

Tony Thigpen wrote:

That is what I initially suggested. Then they said "but can we do it
with one session window open?" Thus my question.

Tony Thigpen

Porowski, Kenneth wrote on 11/27/2017 04:20 PM:


A single PC with multiple 3270 sessions to an ICC would work, just
get a monitor(s) big enough to see/read all the sessions at the same
time.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
On Behalf Of Tony Thigpen
Sent: Monday, November 27, 2017 2:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [IBM-MAIN] Consolidate Consoles

I have been asked about "Console Consolidation" for our multiple zOS
LPARs. Management wants to know what is available that will let us
have one display with all the console traffic from 5 LPARs. They are
envisioning a PC based solution, but we have the ability to run
something on zVM. (These z/OS LPARs are not under z/VM, but we have
z/VM on another CPU with NJE interconnection.)

Thoughts?
--
Tony Thigpen

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




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


Re: Consolidate Consoles

2017-11-27 Thread Tony Thigpen
That is what I initially suggested. Then they said "but can we do it 
with one session window open?" Thus my question.


Tony Thigpen

Porowski, Kenneth wrote on 11/27/2017 04:20 PM:

A single PC with multiple 3270 sessions to an ICC would work, just get a 
monitor(s) big enough to see/read all the sessions at the same time.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Monday, November 27, 2017 2:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [IBM-MAIN] Consolidate Consoles

I have been asked about "Console Consolidation" for our multiple zOS LPARs. 
Management wants to know what is available that will let us have one display with all the 
console traffic from 5 LPARs. They are envisioning a PC based solution, but we have the 
ability to run something on zVM. (These z/OS LPARs are not under z/VM, but we have z/VM 
on another CPU with NJE interconnection.)

Thoughts?
--
Tony Thigpen

--
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: Consolidate Consoles

2017-11-27 Thread Tony Thigpen

We are currently not set up as a sysplex. And, don't really want to.

Tony Thigpen

John McKown wrote on 11/27/2017 03:03 PM:

On Mon, Nov 27, 2017 at 1:58 PM, Tony Thigpen <t...@vse2pdf.com> wrote:


I have been asked about "Console Consolidation" for our multiple zOS
LPARs. Management wants to know what is available that will let us have one
display with all the console traffic from 5 LPARs. They are envisioning a
PC based solution, but we have the ability to run something on zVM. (These
z/OS LPARs are not under z/VM, but we have z/VM on another CPU with NJE
interconnection.)

Thoughts?



​The simplest way is to have all your LPARs in a single sysplex. That
automatically makes messages from every LPAR available to every other
LPAR.​ If you run a parallel sysplex, then, as Allan said, use OPERLOG
instead of SYSLOG for recording.



--
Tony Thigpen






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


Consolidate Consoles

2017-11-27 Thread Tony Thigpen
I have been asked about "Console Consolidation" for our multiple zOS 
LPARs. Management wants to know what is available that will let us have 
one display with all the console traffic from 5 LPARs. They are 
envisioning a PC based solution, but we have the ability to run 
something on zVM. (These z/OS LPARs are not under z/VM, but we have z/VM 
on another CPU with NJE interconnection.)


Thoughts?
--
Tony Thigpen

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


Re: IEBUPDTE question

2017-11-20 Thread Tony Thigpen
Hundred+ members. As I mentioned (but it got lost in the what is 
midnight argument), I used a CBT program to perform the adds. I just 
modified it to pass-though the ./ INCLUDE cards as data cards.


Tony Thigpen

Wayne Bickerdike wrote on 11/20/2017 11:39 PM:

oops,

Change all the unwanted ./ cards to ## or similar. After the IEBUPDTE,
change them back to ./

On Tue, Nov 21, 2017 at 3:32 PM, Wayne Bickerdike <wayn...@gmail.com> wrote:


Assuming the cards with a ./ don't have the correct syntax, why not do an
EXCLUDE ALL, FIND ALL ./.

EXCLUDE all the correct ./ cards and then do a DEL ALL NX



On Mon, Nov 20, 2017 at 2:45 PM, Tony Thigpen <t...@vse2pdf.com> wrote:


I need to catalog a bunch of jobs into a PDS during a conversion. The
source system utility creates an IEBUPDTE job for this purpose.

Unfortunately, some of the data within these jobs steams contain a './'
at the start of the card record. IEBUPDTE thinks they are control cards and
cancels the catalog of the new member.

At this point, the only thing I think should work is to individually FTP
these members and bypass IEBUPDTE, but that will be a real hassle.

I am looking for suggestions on how to get these members cataloged.

--
Tony Thigpen

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





--
Wayne V. Bickerdike







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


Re: IEBUPDTE question

2017-11-20 Thread Tony Thigpen
Condor from Phoenix Systems. Condor uses the ./ INCLUDE card during job 
submission.


We are not getting away from Condor, but I need to move a couple of 
CamLibs to MVS PDS libs until I can update to a newer release of Condor 
that supports FTP access. (Condor can pretend that a PDS lib is a CamLib 
during this temporary phase so the users don't know the library has been 
relocated.)


Tony Thigpen

Paul Gilmartin wrote on 11/20/2017 11:57 AM:

On Sun, 19 Nov 2017 22:45:10 -0500, Tony Thigpen wrote:


I need to catalog a bunch of jobs into a PDS during a conversion. The
source system utility creates an IEBUPDTE job for this purpose.


Just curious: what are the "source system" and its "utility"?

The "shar" (shell archive) utility, not POSIX but widely available, does
this sort of thing nicely.


Unfortunately, some of the data within these jobs steams contain a './'
at the start of the card record. IEBUPDTE thinks they are control cards
and cancels the catalog of the new member.


The designers of IEBUPDTE had dreadful tunnel vision in failing
to anticipate that your problem would never occur.  Job streams
containing IEBUPDTE steps are commonplace.

-- 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: IEBUPDTE question

2017-11-20 Thread Tony Thigpen

Thanks all.

I have resolved the issue. I extracted PDSLOAD from CBT 316, then 
modified it to retain the ./ INCLUDE as data cards. (Yes, I need to keep 
them in the members as such.)


Tony Thigpen

Wendell Lovewell wrote on 11/20/2017 09:40 AM:

Hey Tony,

For $1000 a year our Global Search and Replace can unload and load a whole PDS, 
optionally making changes to the members.  Maybe not a great one-time solution 
but a handy tool to have around.

You could write a REXX program to read the file and call IEBUPDTE for each 
member, ignoring the ./ records.

Myself, if I was starting with a PC file, I'd write a KEDIT macro to split them 
up and use FTP with MPUT.

Wendell Lovewell
MacKinney Systems

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


IEBUPDTE question

2017-11-19 Thread Tony Thigpen
I need to catalog a bunch of jobs into a PDS during a conversion. The 
source system utility creates an IEBUPDTE job for this purpose.


Unfortunately, some of the data within these jobs steams contain a './' 
at the start of the card record. IEBUPDTE thinks they are control cards 
and cancels the catalog of the new member.


At this point, the only thing I think should work is to individually FTP 
these members and bypass IEBUPDTE, but that will be a real hassle.


I am looking for suggestions on how to get these members cataloged.

--
Tony Thigpen

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


System Rexx - Shutdown Exec

2017-11-14 Thread Tony Thigpen
Before I re-invent the wheel, does anybody have a System Rexx system 
shutdown routine that they are willing to share?


I need something smart enough to actually look at what is running and 
then shutdown everything in sequence as each previous shutdown completes.


--
Tony Thigpen

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


Missing C module 'MSGDLL'

2017-11-06 Thread Tony Thigpen

I am running a vendor supplied program and it is abending with:

CEE3501S THE MODULE MSGDLL WAS NOT FOUND.

The following is some of the logs. (I have masked the vendor program 
name and service.)


CEE3DMP V1 R13.0: CONDITION PROCESSING RESULTED IN THE
UNHANDLED CONDITION

TRACEBACK:
  DSA   ENTRYLOAD MOD PROGRAM UNIT SERVICE  STATUS
  1 CEEHDSP  CEEPLPKA CEEHDSP  UK80866  CALL
  2 CEEHSGLT CEEPLPKA CEEHSGLT HLE7780  EXCEPTION
  3 CEEPTLOR CEEPLPKA CEEPTLOR HLE7780  CALL
  4 @@TRGLOC CEEEV003   CALL
  5 INITIALIZE   *masked*  ***  CALL
  6 MAIN *masked*  ***  CALL
  7 EDCZMINV CEEEV003   CALL
  8 CEEBBEXT CEEPLPKA CEEBBEXT HLE7780  CALL

  DSA   DSA ADDR  COMP DATE  COMPILE ATTRIBUTES
  1 15430860  20120806   CEL   POSIX
  2 1542FCD0  20110318   CEL   POSIX
  3 1542F920  20110318   CEL   POSIX
  4 1542F848  03/18/11   LIBRARYPOSIX
  5 1542F648  20080221   C/C++ POSIX EBCDIC  HFP
  6 1542F230  20080221   C/C++ POSIX EBCDIC  HFP
  7 1542F118  20110318   LIBRARYPOSIX
  8 1542F018  20110318   CEL   POSIX

I am thinking I am missing a STEPLIB, but I can't seem to find 'MSGDLL' 
anywhere.


Thoughts?

--
Tony Thigpen

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


Re: CA1 to RMM conversion

2017-10-25 Thread Tony Thigpen
I find it interesting how much people want to charge for books IBM gave 
away for free.


Tony Thigpen

Norbert Friemel wrote on 10/25/2017 09:08 AM:

On Wed, 25 Oct 2017 06:39:15 -0500, Todd Burrell wrote:


We're investigating what it would take to convert from CA1 to RMM.  I've looked 
back through the archives and most of what I see is very dated, so I was going 
to see if anyone has any documentation they can send me to help with this?  I 
thought there used to be a Redbook for this, but I cannot find it.
Any help would be greatly appreciated.
Thanks



https://www.amazon.com/dp/0738498653

Norbert Friemel

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


Transmit out class

2017-10-10 Thread Tony Thigpen

How does TRANSMIT determine the 'class' as indicated in the NJE headers?

What I am testing shows 'B' when it gets to z/VM, but on this JES2 
system, the definition of OUTCLASS(B) is one of PRINT, not PUNCH so z/VM 
does not recognize that the file is in NETDATA format.


--
Tony Thigpen

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


Re: Question on JES2 and remote non-JES nodes

2017-10-09 Thread Tony Thigpen
Thanks Liz. I was more concerned with figuring out the routing issue 
that I had not had time to really search out the $DEL DEST() command.


I did find the answer to the routing. It has to do with using the 
CONNECT statement.


The JES2 terminology seems to be completely backwards from that used by 
zVM-RSCS or z/VSE-Power.


Tony Thigpen

Lizette Koehler wrote on 10/09/2017 10:23 AM:

Tony

A quick search in www.ibm.com   with the phrase   REMOVE $ADD DESTID

Lead to the command $DEL

This has documented

Processing Considerations

When you dynamically delete a JES2 symbolic destination (destid), JES2 honors 
the deletion across a restart only if you perform a hot start. To permanently 
delete the symbolic destination, remove the DEStid initialization statement 
before restarting JES2.
Scope

Single member. The values supplied for this command will be in effect for this 
member only.

Depending on your installation's setup, however, you might want this command to 
be applied to all members of the MAS (to ensure a consistent environment across 
the MAS). If so, you can use the MVS ROUTE *ALL command to issue this command 
to all active members (if the JES2 command character is the same on all 
members). See z/OS MVS System Commands, SA38-0666 for more information on using 
the ROUTE *ALL command.
Messages



You could try the $DEL to see if that takes it out, or a hot start to 
permanently remove the command.

It would have been nice if the $ADD would have included the remove $DEL command


I have not tried to route through multiple nodes with JES2 - always node to 
node.  So I will not be able to answer that part of your question

Lizette




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Tony Thigpen
Sent: Monday, October 09, 2017 5:24 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Question on JES2 and remote non-JES nodes

I have a question concerning setting up NJE nodes in the following
configuration:

JES2(node=)-RSCS(node=)RSCS(node=)

I have  talking to .

How do I tell  that it can send stuff destined for  via ?

I tried: $add destid(),dest=
But, things sent to  are actually sent to the  machine (as a
synonym), and are not forwarded by  to .

Follow-up question:
How do I 'undo' the incorrect $ADD command.

--
Tony Thigpen

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


Question on JES2 and remote non-JES nodes

2017-10-09 Thread Tony Thigpen
I have a question concerning setting up NJE nodes in the following 
configuration:


JES2(node=)-RSCS(node=)RSCS(node=)

I have  talking to .

How do I tell  that it can send stuff destined for  via ?

I tried: $add destid(),dest=
But, things sent to  are actually sent to the  machine (as a 
synonym), and are not forwarded by  to .


Follow-up question:
How do I 'undo' the incorrect $ADD command.

--
Tony Thigpen

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


Re: Looking for Redbook: Converting to Dfsmsrmm from Zara and Automedia

2017-10-06 Thread Tony Thigpen

Allan, did you even try your own suggestion? Because it fails.

Don't you think that the main redbook site would be the first place 
someone would look for a redbook?


The book does not come up in a search there. And now that I have a copy 
of the book a search for the pub-number also does not show up on the 
redbook site.


Tony Thigpen

Allan Staller wrote on 10/06/2017 09:04 AM:

http://www.redbooks.ibm.com/


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Friday, October 6, 2017 7:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Looking for Redbook: Converting to Dfsmsrmm from Zara and Automedia

I am looking for a copy of the fedbook:

Converting to Dfsmsrmm from Zara and Automedia

I don't have an IBM book number. I found this book using google, but can't find 
it on the redbook site.

--
Tony Thigpen

--
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: Looking for Redbook: Converting to Dfsmsrmm from Zara and Automedia

2017-10-06 Thread Tony Thigpen

I have received a copy off-line. Thanks.

Tony Thigpen

Tony Thigpen wrote on 10/06/2017 08:25 AM:

I am looking for a copy of the fedbook:

Converting to Dfsmsrmm from Zara and Automedia

I don't have an IBM book number. I found this book using google, but
can't find it on the redbook site.



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


Looking for Redbook: Converting to Dfsmsrmm from Zara and Automedia

2017-10-06 Thread Tony Thigpen

I am looking for a copy of the fedbook:

Converting to Dfsmsrmm from Zara and Automedia

I don't have an IBM book number. I found this book using google, but 
can't find it on the redbook site.


--
Tony Thigpen

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


SYS3 datasets

2017-09-24 Thread Tony Thigpen

We have a staff z/OS systems programmer who claims that:
"Almost all shops use the SYS3. HLQ to indicate third party software."

So new software installs *have* to follow that "rule". (Past installs 
did not follow such a rule.)


I am thinking that this "rule" is really just *his* rule.

Opinions?

How many other sites follow such a rule?

--
Tony Thigpen

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


VTAM SWNET LU status question

2017-08-30 Thread Tony Thigpen
I have a SWNET PU which attaches to an AS400. The AS400 acts as a print 
controller with about 200 printer sessions. in this SWNET PU.


We are adding a new LU, but it will not connect. My LU definition is 
identical to the previously added printer.


Existing, working printer:
ICU1P634 LU   LOCADDR=181,ISTATUS=ACTIVE,
   DLOGMOD=RS3262
New, not-working printer:
ICU1P635 LU   LOCADDR=214,ISTATUS=ACTIVE,
   DLOGMOD=RS3262


Output of a STATUS command for the non-working printer:
06.14.18 HUP1   d net,id=ICU1P635
06.14.18 HUP1 STC06991  IST097I DISPLAY ACCEPTED
06.14.18 HUP1 STC06991  IST075I NAME = APPN.ICU1P635, TYPE = LOGICAL UNIT
IST486I STATUS= ACTIVD, DESIRED STATE= ACTIV
IST1447I REGISTRATION TYPE = NETSRVR
IST977I MDLTAB=***NA*** ASLTAB=***NA***
IST861I MODETAB=MODEHUS3 USSTAB=ISTINCNO LOGTAB=***NA***
IST934I DLOGMOD=RS3262 USS LANGTAB=***NA***
IST597I CAPABILITY-PLU INHIBITED,SLU ENABLED  ,SESSION LIMIT 0001
IST136I SWITCHED SNA MAJOR NODE = SWPUF43
IST081I LINE NAME = LE213000, LINE GROUP = GRPPUF43, MAJNOD = XCAPUF43
IST135I PHYSICAL UNIT = PUF43
IST082I DEVTYPE = LU
IST654I I/O TRACE = OFF, BUFFER TRACE = OFF
IST1500I STATE TRACE = OFF
IST171I ACTIVE SESSIONS = 00, SESSION REQUESTS = 00
IST314I END

There is a new programmer on the AS/400. The person that has done this 
in the past is gone. I don't know if they have a bad definition or they 
have not started something right on their end.


When I display the SWNET node, the status shows:
ICU1P635 ACTIVD

What does ACTIVD indicate?

Any thoughts for debugging this?

--
Tony Thigpen

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


Re: grabbing JES output via FTP

2017-08-20 Thread Tony Thigpen
Passive does make a difference. Once I use passive to force the server 
to initiate the connections, I am getting different errors.


Command:
passive
Data connections will be initiated by the server
Command:
get JOB01106.2
>>>EPRT |1|10.10.50.141|1176|
500 unknown command EPRT
>>>PORT 10,10,50,141,4,152
200 Port request OK.
>>>RETR JOB01106.2
501 Invalid data set name "JOB01106.2".  Use MVS Dsname conventions.
Command:
get JOB01106.x
>>>PORT 10,10,50,141,4,153
200 Port request OK.
>>>RETR JOB01106.x
550 Data set PRODAT2.JOB01106.X not found
Command:
get 'JOB01106.1'
DMSSTT062E Invalid character ' in fileid 'JOB0110 1'
DTCFTC0031E Invalid argument string
Invalid local filename; use 'name.type.mode' or 'name.type'
Command:
get 'JOB01106.x'
DMSSTT062E Invalid character ' in fileid 'JOB0110 X'
DTCFTC0031E Invalid argument string
Invalid local filename; use 'name.type.mode' or 'name.type'
Command:
get 'JOB01106.x' job01106..a
>>>PORT 10,10,50,141,4,154
200 Port request OK.
>>>RETR 'JOB01106.x'
550 Data set JOB01106.X not found
Command:



Tony Thigpen

Paul Gilmartin wrote on 08/19/2017 10:33 PM:

On Sat, 19 Aug 2017 21:34:57 -0400, Tony Thigpen <t...@vse2pdf.com> wrote:


I am attempting to use FTP under VM to grab some job output from JES2. I
am getting a strange error that I don't know where to start trying to
resolve it. I also get the same messages when I try to ftp from a local pc.

Command:
site filetype=jes

SITE filetype=jes

200 SITE command was accepted
Command:
get JOB01106.2

EPRT |1|10.10.50.141|1170|

500 unknown command EPRT


Is this an IP address and port number for setting up the separate data port?
Does PASSIVE mode affect this?


PORT 10,10,50,141,4,146

200 Port request OK.

RETR JOB01106.2

451 Nlst failed due to internal error


-- 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: grabbing JES output via FTP

2017-08-20 Thread Tony Thigpen

Output fron SITE JESSOWNER=* command:

>>>SITE JESOWNER=*
200-JESINTERFACELEVEL=1. The value of JESOWNER cannot be modified.
200 SITE command was accepted

I am trying to get the output from a job I submitted via FTP, so the 
owner the same as the userid I am using for FTP.


Tony Thigpen

JIm Thomas wrote on 08/20/2017 05:12 AM:

Depending on JESINTERFACELEVEL .. try issuing a 'SITE JESOWNER=*' <- (or 
submitter's userid) ..


Jim


From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Paul 
Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Saturday, August 19, 2017 9:36:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: grabbing JES output via FTP

On Sat, 19 Aug 2017 21:34:57 -0400, Tony Thigpen wrote:


I am attempting to use FTP under VM to grab some job output from JES2. I
am getting a strange error that I don't know where to start trying to
resolve it. I also get the same messages when I try to ftp from a local pc.

...

EPRT |1|10.10.50.141|1170|

500 unknown command EPRT

thoughts?


RFC 2428?

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




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


grabbing JES output via FTP

2017-08-19 Thread Tony Thigpen
I am attempting to use FTP under VM to grab some job output from JES2. I 
am getting a strange error that I don't know where to start trying to 
resolve it. I also get the same messages when I try to ftp from a local pc.


Command:
site filetype=jes
>>>SITE filetype=jes
200 SITE command was accepted
Command:
get JOB01106.2
>>>EPRT |1|10.10.50.141|1170|
500 unknown command EPRT
>>>PORT 10,10,50,141,4,146
200 Port request OK.
>>>RETR JOB01106.2
451 Nlst failed due to internal error
Command:


thoughts?

--
Tony Thigpen

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


GDPR for US companies (Was: Scrubbing sensitive data in dumps)

2017-08-12 Thread Tony Thigpen

Charles,

Even if the regulation says:

"Non-Eu businesses processing the data of EU citizens will also have to 
appoint a representative in the EU."


What legal recourse does the EU have to go after a US company that does 
not "appoint a representative in the EU"?


I think the trick here is that should a company "appoint a 
representative in the EU" thinking that it's something simple to appease 
the EU, then they have a business presence in the UA. Once they have "a 
representative in the EU", then the EU has a legal entity to go after 
for non-compliance.


The company I work for has determined that under no circumstance will we 
"appoint a representative in the EU". And, if the EU attempts legal 
action, our defense is that EU do not apply to a US business that only 
does work in the US. Just because a EU citizen chooses to use our 
services while in the US, that does not constitute a EU business 
presence. (No matter what the GDPR is trying to claim.)


Take a simple example. A EU person stays at a Florida based Bed & 
Breakfast. And, the guest supplies his address and phone number. The 
GDPR 'claims' that the GDPR now applies. But, such a claim violates the 
the sovereignty of the USA. And, since the Bed & Breakfast does not have 
a presence in the EU, that sovereignty protects it.


In other words, the GDPR can claim to reach into other countries, but 
legally, it can not. It's just trying to scare people into compliance.


Tony Thigpen

Charles Mills wrote on 08/12/2017 10:05 AM:

My understanding is that the XBridge product was successful at this technically. CA has a new 
product in this area that is successful technically. (By "technically" I mean that the 
technology is successful in recognizing credit card numbers, SSNs, and so forth. There is more 
pattern to a credit card number than just "16 numeric digits.")

These products address files and datasets, but the same pattern recognition 
would apply to dumps.

The problem as I see it -- after taking several sessions at SHARE on data privacy -- is that the 
definition of "personal information" is endlessly elastic. Read "What constitutes 
personal data?" on http://www.eugdpr.org/gdpr-faqs.html.

And by the way, if you are in the US and think that the GDPR is a Europe-only thing, read "Who 
does the GDPR affect?" and "What are the penalties for non-compliance?" on the same 
page. Also note the countdown clock on their home page!

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Friday, August 11, 2017 11:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Scrubbing sensitive data in dumps

On Fri, 11 Aug 2017 17:09:10 -0400, Jim Mulder wrote:


  We did have a meeting in z/OS development quite a few years ago to
discuss someone's wish for this type of function for z/OS dumps.  We
concluded that in general, identifying the sensitive data to be
modified would be so problematic that it was not worth pursuing.


This is reminiscent of a question posed (here?) (years?) ago concerning 
detecting credit card numbers in data sets, with the objective of obfuscating 
them.

OK.  Any 16 numeric digits, or packed, or 64-bit binary in range, or ...
Validate check digit?

Same answer.

Or SSNs.

--
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: z13s IOCP with FTP issue

2017-08-08 Thread Tony Thigpen
We don't let *anybody* into the network between the HMC and the SE. Too 
many SEs have default passwords on some of the 'special' IDs that can 
not be easily changed.


We bought a small two-nic nas box and placed it on both the SE network 
and the company network. IOCPs and ICCs go to it as an interim location. 
I.E., copy the IOCP to the nas. Then, access the nas via the company 
network. You could just add another nic card to your FTP server, but 
make sure that the server has all routing turned off.


Also, we set the default route on the SE to 0.0.0.0. An additional 
protection against anybody getting into that network segment.


Tony Thigpen

Eric Chevalier wrote on 08/08/2017 04:42 PM:

On 8/3/17 10:13 AM, Tony Thigpen wrote:


1) The ip address has to be available from SE laptop in the cpu. If
you have the connections between the HMC and the SE on a isolated
network, then the ftp box has to also be on that same isolated network.


We have our HMC on an internal company network so it can be accessed
from anywhere, even remotely via VPN. Is there any good technical reason
why the SE can't also be on that network for better access to FTP
servers in our organization? I realize that having the SE on a separate
private network might be better security, but that caused some grief
recently. We needed to import an IOCDS into our z13, but that file was
in our headquarters office. Because port forwarding isn't enabled on the
HMC, so we couldn't get access to the FTP server hosting the IOCDS.

--
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: Info and Orlando

2017-08-08 Thread Tony Thigpen

Contact me off-list. We have some stuff. It depends what you need.

Tony Thigpen

W Mainframe wrote on 08/08/2017 05:54 PM:

Guys,I am on vacation in Orlando. Does anyone know some place to buy IBM parts 
of ISeries and PSeries?
Thank youDan


Sent from Yahoo Mail for iPhone

--
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: z13s IOCP with FTP issue

2017-08-03 Thread Tony Thigpen

I use FTP all the time. Some tricks:

1) The ip address has to be available from SE laptop in the cpu. If you 
have the connections between the HMC and the SE on a isolated network, 
then the ftp box has to also be on that same isolated network.
2) The 'case' for all items must be correct. Userid, password, and file 
name.
3) The file name must include the full path. Since the patch can change 
depending on what the ftp server considers the user's 'home' path, you 
need to understand how the user is defined on the FTP server.


We use a cheap mini-nas box for storing IOCPs and ICC convfigs.

I have not tried using z/OS as the FTP server as we don't have it on the 
private HMC-SE network. But, I would expect you would have to be 
concerned with normal z/OS FTP stuff, like how the FTP server handles 
adding or not adding the userid to the front of the file name.


Tony Thigpen

Jesse 1 Robinson wrote on 08/03/2017 10:43 AM:

I was never successful in the past with FTP. Relied instead on a thumb drive, 
which worked great but required physical access to the new box.

For our z13s, a colleague was able to get FTP to work. I'm fuzzy on how he did 
it, but I think he piggybacked on some outbound but closely connected hardware 
that not everyone has.

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


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo
Sent: Thursday, August 03, 2017 6:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: z13s IOCP with FTP issue

Ping only proves the stack is up I think, not that the FTP server is up?
I've done this about a year ago when we upgraded to z13s, we loaded or had the 
SE load the initial IOCP from a thumb drive, maybe you can try that, the only 
successful ftp I've done was reloading (importing) the ICC configuration


Carmen

- Original Message -

From: "Rob Schramm" <rob.schr...@gmail.com>
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Thursday, August 3, 2017 8:30:28 AM
Subject: z13s IOCP with FTP issue

Listers,

I am having an issue attempting to use FTP to import the IOCP for a new z13s machine. I can 
ping the z/OS box that the FTP server is running from the HMC and the SE. But when I click 
" ", I get "File not found on remote machine. Recheck the file name, and try 
again.

My only real complaint, is that there is no log of errors to see what is 
happening. My other question is has anyone actually retrieved the IOCP deck 
from a z/OS machine?

Thanks,
Rob Schramm



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


Re: IOCDF issue

2017-07-24 Thread Tony Thigpen

At least tell us what the problem turned out to be.

Tony Thigpen

Dave Jones wrote on 07/24/2017 09:02 AM:

Thanks for all the help with this, problem resolved.
Have a good one, too.
DJ

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




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


Re: z/OS under z/VM (Was: IBM Unveils New IBM Z with Pervasive Encryption)

2017-07-17 Thread Tony Thigpen

Tim,

I am not sure I have a good understanding of this.

Now, to your post. You actually hit a problem we have. We have a z/10 
that is running 5 z/OS LPARs and memory allocation is not the best. You 
indicate that running z/OS under VM might be the answer. But, a few 
years ago, some testing made us discount z/VM for such. Maybe our 
testing was faulty.


We had a customer running OS/390 (yes, that old) on a z/800. We have 
since moved them to a z/10 which has worked well for over a year. During 
the initial testing of OS/390 on the z/10, we thought we would need to 
run it under z/VM. What we found was that simple backup processing (full 
volume dumps to tape) took almost twice as long under z/VM than in a 
native LPAR. A couple of posts on the z/VM list seem to tell us that 
using guests (either z/OS or z/VSE) with less than 2 real CPUs would 
affect I-O performance.


Maybe we misunderstood something. What are your thoughts on it?

Tony Thigpen

Timothy Sipples wrote on 07/17/2017 04:22 AM:

OK, I'll start offering some personal thoughts on today's major
announcements, and in no particular order. I'll start in what might be an
unexpected place: sub-capacity z/VM licensing. That announcement letter is
available here:

https://www.ibm.com/common/ssi/rep_ca/9/872/ENUSAP17-0259/ENUSAP17-0259.PDF

I'm quite happy with this announcement, fundamentally because it provides
you all with some interesting, useful flexibility in what you might call
the "hybrid cloud journey." IBM is now allowing sub-capacity licensing of
z/VM and of most IBM z/VM-related products and features. That's for all
operating systems that z/VM supports.

What this means in practice is that you can now configure your machine(s)
with "anchor tenant" LPARs -- LPARs running Linux, z/OS, and/or other
operating systems -- alongside z/VM LPARs. For example, let's suppose you
have z/VM and use it to run Linux guests on your machine. But, sadly, you
don't have z/VM for z/OS yet. Well, now you can license one additional
engine (CP) of z/VM and run z/OS within z/VM on that engine -- even within
a z/VM LPAR that spans CPs, zIIPs, and IFLs if you wish. So you can spin up
lots and lots of z/OS guests for development, testing, system programmer
fun, production, etc., etc. And you can do all that for not very much money
at all. In fact, it'll probably save you money since z/VM can overcommit
memory in many real world scenarios and since you can shrink (or cap) the
number of LPARs to some extent. With z/VM you don't have to "pin" system
memory as you do with LPARs. So you can do "some of all of the above": buy
lots more memory (it's a lot more affordable), allocate more memory to your
"anchor tenant" LPARs, and overcommit memory to some degree using z/VM.

For example, you might have a couple of big, beefy, analytics and database
workloads that make sense to run in LPARs. (Maybe they need a huge amount
of memory, another area where the new IBM z14 excels.) Then, for smaller
and more numerous Linux guests -- such as your developer cloud -- you have
one or a couple IFLs running z/VM. That's fine, you can do that. You have
sub-capacity licensing flexibility. You don't have to license every IFL
and/or every CP on your machine(s). Whatever makes technical sense you
should be able to do in a more financially attractive way.

To net it out, if you haven't adopted z/VM yet -- or if your adoption is
only for one operating system among the two or more than you run -- take a
serious look at licensing at least one z/VM engine (or one more engine).
It's a great deal.

More reactions to come


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




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


Re: z/VM subcapacity pricing (Was: IBM Unveils New IBM Z with Pervasive Encryption)

2017-07-17 Thread Tony Thigpen

Tim,

I am not sure I have a good understanding of this.

Some background:

In our case, we have 7 physical z10 or higher machines. All the current 
processors have 1 CPU, but we are looking at replacing 2 of the machines 
with multi-processors. Most of the machines are running multiple z/OS 
LPARs. A couple of machines are running z/VSE (some LPAR and some under 
z/VM).


Currently, we have 2 z/VM 6.x licenses and 1 z/VM 5.4 license. (The 5.4 
license is used for a small special-purpose function that did not 
justify purchasing an additional 6.x license.)


I would love to have z/VM controlling more machines.

How can z/VM sub-capacity pricing help us?

Tony Thigpen

Timothy Sipples wrote on 07/17/2017 04:22 AM:

OK, I'll start offering some personal thoughts on today's major
announcements, and in no particular order. I'll start in what might be an
unexpected place: sub-capacity z/VM licensing. That announcement letter is
available here:

https://www.ibm.com/common/ssi/rep_ca/9/872/ENUSAP17-0259/ENUSAP17-0259.PDF

I'm quite happy with this announcement, fundamentally because it provides
you all with some interesting, useful flexibility in what you might call
the "hybrid cloud journey." IBM is now allowing sub-capacity licensing of
z/VM and of most IBM z/VM-related products and features. That's for all
operating systems that z/VM supports.

What this means in practice is that you can now configure your machine(s)
with "anchor tenant" LPARs -- LPARs running Linux, z/OS, and/or other
operating systems -- alongside z/VM LPARs. For example, let's suppose you
have z/VM and use it to run Linux guests on your machine. But, sadly, you
don't have z/VM for z/OS yet. Well, now you can license one additional
engine (CP) of z/VM and run z/OS within z/VM on that engine -- even within
a z/VM LPAR that spans CPs, zIIPs, and IFLs if you wish. So you can spin up
lots and lots of z/OS guests for development, testing, system programmer
fun, production, etc., etc. And you can do all that for not very much money
at all. In fact, it'll probably save you money since z/VM can overcommit
memory in many real world scenarios and since you can shrink (or cap) the
number of LPARs to some extent. With z/VM you don't have to "pin" system
memory as you do with LPARs. So you can do "some of all of the above": buy
lots more memory (it's a lot more affordable), allocate more memory to your
"anchor tenant" LPARs, and overcommit memory to some degree using z/VM.

For example, you might have a couple of big, beefy, analytics and database
workloads that make sense to run in LPARs. (Maybe they need a huge amount
of memory, another area where the new IBM z14 excels.) Then, for smaller
and more numerous Linux guests -- such as your developer cloud -- you have
one or a couple IFLs running z/VM. That's fine, you can do that. You have
sub-capacity licensing flexibility. You don't have to license every IFL
and/or every CP on your machine(s). Whatever makes technical sense you
should be able to do in a more financially attractive way.

To net it out, if you haven't adopted z/VM yet -- or if your adoption is
only for one operating system among the two or more than you run -- take a
serious look at licensing at least one z/VM engine (or one more engine).
It's a great deal.

More reactions to come


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




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


Re: IBM customer anchor

2017-06-30 Thread Tony Thigpen

Peter,

Stupid question. If my company has a 3 character prefix reserved with 
the VSE group, does that cross into z/OS? Or, do we need to reserve one 
though the z/OS side also. (We are considering porting one of our 
products to z/OS.)


Tony Thigpen

Peter Relson wrote on 06/30/2017 07:37 AM:

Are you saying we are better off, using our IBM assigned message prefix
..which is MDI ...as part of our Token we use ?


Yes, definitely.

When name collisions would be a problem, the best approach is to begin
with "your" prefix.

In general, names beginning with A-I and SYS are reserved for use by IBM.

Peter Relson
z/OS Core Technology Design


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




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


Re: Customer is Using CPACF (Crypto) purchased Crypto Express

2017-06-19 Thread Tony Thigpen
The "Encryption Facility for z/VSE" product is used to transport data 
between VSE and z/OS or other platform that would accept data encrypted 
by ""Encryption Facility for z/OS".


It does *not* support "data at rest". It does allow you to copy and 
encrypt a file, but the whole file has to be decrypted and restored 
before it can be used by the system. That is not "data at rest"


There is only one "data at rest" product for VSE. Dino/Protect.

I developed Dino/Protect back in 2007. http://www.dinoprotect.com

But, here is the real crux of the matter. While I sold about a dozen 
copies of the back-up encryption piece, nobody in the VSE community 
though "data at rest" was needed. All they want is encrypted backups. 
And, since then, encrypted tape drives have been developed by IBM so 
everybody is going that route.


So, it's available, but nobody came to the party.

For those that are wondering about the key, the root for the key is a 
random string somewhere in the middle of the software. The root is 
manipulated, then ORed, then encrypted, then manipulated again prior to 
actually being used as the key to call CPACF. (The manipulation and 
encryption is also done by the CPACF.) And, while it's just 128 AES, I 
could easily support any key length supported by CPACF.


The software even supports encrypting just specific fields, of any 
length, within the record. It also has program controls so that an 
IDCAMS EXPORT does not decrypt the data during backups.


But, again, nobody came to the party. :-(

Tony Thigpen

Joerg Schmidbauer wrote on 06/19/2017 09:22 AM:

Todd pointed me to this topic, because it's a z/VSE related question, not z/OS.

From my point of view Tony and Todd explained everything correctly.

Just one additional info:
There is an optional feature "Encryption Facility for z/VSE" that allows 
encrypting
data at rest (Librarian members, VSAM files, backup tapes, real tapes and 
vtapes).
It's functionality and usage is described in the z/VSE Administration Guide:
https://www.ibm.com/systems/z/os/zvse/documentation/#vse
It uses CPACF and crypto cards transparently. CPACF is used for encrypting the
data. A crypto card is needed only when using public-key encryption (refer to 
the book)
with an RSA key greater than 1024 bits. The other option is "password-based"
encryption, where the symmetric key gets derived from a password/passphrase.


--
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: ES/9000 microcode

2017-06-14 Thread Tony Thigpen

Yep. Mainframe Services. If you got the stickers, you got the number.

Boy, do we understand the 'old CRT' problem. Most of the old PCs will 
not sync with newer LCD based monitors. (We keep those in stock too.)


Tony Thigpen

William Donzelli wrote on 06/14/2017 11:13 AM:

Is that Mainframe Services? They have stickers all over this machine.

So far, the only problem is that I do not have an old working CRT for
use with the console PC, so I really can not even start! That should
be resolved this weekend, and I can start screwing around with it.

--
Will

On Wed, Jun 14, 2017 at 10:19 AM, Tony Thigpen <t...@vse2pdf.com> wrote:

For those interested, we still have some parts for and some complete
Integrated Servers and MP3000s in our warehouse. One of our divisions is a
3th party maintenance provider and we would purchase compete used units for
parts for many years. Now, we no longer have any customers with the stuff,
so we are slowly selling it as people need it. Recently, we shipped 2
refurbished MP3000s to South America. The replaced a MP2000 that was still
in service a few months ago. (One was to be their DR and/or parts box.)

Will,
I have a guy that can service your equipment should you need it. He is based
out of Chattanooga so his preference would be to talk to you over the phone,
determine the problem and ship you parts.

Tony Thigpen


William Donzelli wrote on 06/14/2017 09:49 AM:


So the ES/9000 is mostly in its new home. I took a roadtrip to inspect
and prep the machine for shipment, and ended up taking the processor
and DASD cabinets home. The console and tape are quite safe - now I
need to get that stuff backed up and verified.

Anyway, I did not get much in the way of documentation. Very little,
actually. There is not a whole lot of ES/9000 documentation online
anymore, so I am going to turn to you folks.

Does anyone have a stash of documentation for the small ES/9000s?
Installation, maintenance, whatever. My system is apparently a very
early example that has been upgraded and eventually ended up as a
9221-191. I could also use docs for the 9394 DASD, 3490-A04 tape, and
6262 printer. If you do not need the docs anymore, and they are just
sitting on the shelf or in a box taking up space, I could certainly
use them. Thank you, as always.

Also, where were the small air cooled ES/9000s built and/or designed?

If anyone cares, I shot a video when I first inspected the pile:

https://youtu.be/ICmTwymgz4E

--
Will

--
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: ES/9000 microcode

2017-06-14 Thread Tony Thigpen
For those interested, we still have some parts for and some complete 
Integrated Servers and MP3000s in our warehouse. One of our divisions is 
a 3th party maintenance provider and we would purchase compete used 
units for parts for many years. Now, we no longer have any customers 
with the stuff, so we are slowly selling it as people need it. Recently, 
we shipped 2 refurbished MP3000s to South America. The replaced a MP2000 
that was still in service a few months ago. (One was to be their DR 
and/or parts box.)


Will,
I have a guy that can service your equipment should you need it. He is 
based out of Chattanooga so his preference would be to talk to you over 
the phone, determine the problem and ship you parts.


Tony Thigpen

William Donzelli wrote on 06/14/2017 09:49 AM:

So the ES/9000 is mostly in its new home. I took a roadtrip to inspect
and prep the machine for shipment, and ended up taking the processor
and DASD cabinets home. The console and tape are quite safe - now I
need to get that stuff backed up and verified.

Anyway, I did not get much in the way of documentation. Very little,
actually. There is not a whole lot of ES/9000 documentation online
anymore, so I am going to turn to you folks.

Does anyone have a stash of documentation for the small ES/9000s?
Installation, maintenance, whatever. My system is apparently a very
early example that has been upgraded and eventually ended up as a
9221-191. I could also use docs for the 9394 DASD, 3490-A04 tape, and
6262 printer. If you do not need the docs anymore, and they are just
sitting on the shelf or in a box taking up space, I could certainly
use them. Thank you, as always.

Also, where were the small air cooled ES/9000s built and/or designed?

If anyone cares, I shot a video when I first inspected the pile:

https://youtu.be/ICmTwymgz4E

--
Will

--
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: IBM customer anchor

2017-06-13 Thread Tony Thigpen

Recently came across this too. In CBT841 files:

"CONTACT PETER RELSON, rel...@us.ibm.com FOR YOUR OWN OFFSET IN THE
CUSTOMER ANCHOR TABLE. ONCE YOU HAVE RECEIVED YOUR ASSIGNED VALUE
MODIFY.."

Also, in the same CBT:

"A possible address off the Customer Anchor Table, X'CC' off the ECVT, 

 could be X'228' (assigned to a particular customer by IBM, but this 

 is an example address). 




 This is just an example.  For your site, you have to ask IBM to 

 assign this address for your site, and they are obligated to do so, 

 for a CUSTOMER.  Besides the fullwords that are assigned for VENDORS, 

 there are also four fullwords that are assignable to customers, if 

 they need a permanent address in the system to anchor some function. 




 At the time of this writing, Peter Relson of IBM is in charge of 

 assigning these addresses to either vendors or customers. 




 You are obligated to make sure that no program or product at your 


 site is already using this address.  "

Tony Thigpen

scott Ford wrote on 06/13/2017 08:35 AM:

All:

I have a question about something called
'customer anchor table entry' . My colleague said IBM can provide this
entry to a ISV like use so we can place an address there for routines.  I
think it's like a vector address .

Has anyone heard of this ?



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


Re: Customer is Using CPACF (Crypto) purchased Crypto Express

2017-06-12 Thread Tony Thigpen
We are talking about encrypting "Data at Rest". There is *no* key 
exchange involved. The only purpose for encrypting keys is so you can 
send them to someone else.


Tony Thigpen

Mark Jacobs - Listserv wrote on 06/12/2017 08:01 AM:

Encryption/decryption without a CryptoExpress only supports clear keys,
not protected or secured encryption keys. Might be enough for the OP,
but wouldn't fly in my environment.



Tony Thigpen <mailto:t...@vse2pdf.com>
June 12, 2017 at 7:22 AM
For encrypting "data at rest", the CPACF is really all he needs. The
Crypto Express is intended to speed up key negotiations between sites,
something not needed for his intended plans.

Tony Thigpen



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


Please be alert for any emails that may ask you for login information
or directs you to login via a link. If you believe this message is a
phish or aren't sure whether this message is trustworthy, please send
the original message as an attachment to 'phish...@timeinc.com'.





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


Re: Customer is Using CPACF (Crypto) purchased Crypto Express

2017-06-12 Thread Tony Thigpen
For encrypting "data at rest", the CPACF is really all he needs. The 
Crypto Express is intended to speed up key negotiations between sites, 
something not needed for his intended plans.


Tony Thigpen

Arye Shemer wrote on 06/12/2017 02:00 AM:

Hello,

Customer is currently using CPACF to encrypt his data before writing to
disks.

Customer intent to purchased Crypto Express and want to use it to continue
to encrypt the data before writing  to the disks,

Are there any compatibility issues ?

Are there any know documents which deals/explain with  issues involved ?

Thanks,

Arye Shemer.

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




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


Re: System REXX

2017-06-10 Thread Tony Thigpen

John,

How did your OPS/MVS replacement project go? I am looking at possibly 
the same thing.


Tony Thigpen

John McKown wrote on 10/25/2016 07:58 AM:

On Mon, Oct 24, 2016 at 7:37 PM, Steve Horein <steve.hor...@gmail.com>
wrote:





Thank you for the explanation and reasoning sir!
I supported OPS/MVS in a previous life (loved it), and I am now supporting
NetView automation (love it), so I am lucky to be able to currently work
with "COMMON" variables, which are accessible to any NetView task, very
similar to OPS' Global variables. There is also the concept of NetView
"task" level variables, known only to the specific task. It's good to know
the overhead associated with filesystems is not as bad as "traditional"
datasets, especially the buffering aspects. On a side note, I always
thought you would be a fun guy to work with, based on the things you do!



​Thank you for the kind words about possibly being "fun to work with". But
this place definitely isn't fun. We're dying ("cloud" sourcing) & I'm
looking. Some of the things that I do are simply because we are, and have
always been, cheap (vs. frugal). So I'm always looking for "zero dollar"
solutions to make my work easier. Part of making my work easier is making
other people's work easier (because then they don't bug me ). I am
"creatively lazy", I guess.




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


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

2017-06-08 Thread Tony Thigpen

Could you point me to the REXX list?

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


Tony Thigpen

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

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

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

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

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

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

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

Paul Gilmartin wrote:


Bernd.Oppolzer wrote:

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

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


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

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



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


You can do the same with REXX statements like this:

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

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



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


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

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

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

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

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

Just some little idle ideas, ya ;-)

Groete / Greetings
Elardus Engelbrecht

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

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




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


Eliminating CA-Optimizer

2017-06-02 Thread Tony Thigpen
We support an old OS/390 (yep!) system that is slowly being eliminated. 
To cut costs, the customer is asking about eliminating CA-Optimizer.


1) Would all the Cobol programs require re-compiling?
2) Or, will the run-time library continue to work once the license is 
cancelled?


--
Tony Thigpen

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


Anybody using Zara with an IBM 7740?

2017-05-11 Thread Tony Thigpen

Anybody using Zara with an IBM 7740?
What level of Zara?
--
Tony Thigpen

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


Re: DFHEXLI vs DFHECI

2017-04-23 Thread Tony Thigpen
I can verify that it really is an online program. It is in CICS and the 
programmer just recompiled it with a small change to verify it was 
really the right compile. The change showed up and I looked at the 
linkmap (which I included with the last email).


Tony Thigpen

esst...@juno.com wrote on 04/23/2017 12:50 PM:

Hello Tony

I'm a bit confused ...
Are You Sure this is a program that runs as a CICS Transaction ?
Can  You issue CEMT I PROG(x), or CEMT I TRANS(*) PROG() or  better 
yet issue a CECI LOAD PRPGRAM()
.
I suspect its a Batch Submitted program using EXCI to LINK To or Start a 
transaction
in a CICS Region.


-- Original Message --
From: Tony Thigpen <t...@vse2pdf.com>
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFHEXLI vs DFHECI
Date: Sat, 22 Apr 2017 15:53:51 -0400

I had a little time and looked at this closer. I am trying to determine
what they are really doing and why.

Here is the JCL that they use to compile:

... translate step
... cobol step with output going to
//SYSLIN   DD DSN=&,DISP=(MOD,PASS),
//UNIT=,SPACE=(80,(250,100))
... then
//COPYLINK EXEC PGM=IEBGENER,COND=(7,LT,COB)
//SYSUT1   DD DSN=(DFHEXLI),DISP=SHR
//SYSUT2   DD DSN=&,DISP=(NEW,PASS),
//DCB=(LRECL=80,BLKSIZE=400,RECFM=FB),
//UNIT=,SPACE=(400,(20,20))
//SYSPRINT DD SYSOUT=
//SYSINDD DUMMY
//*
//LKED   EXEC PGM=IEWL,REGION=,
//PARM='',COND=(5,LT,COB)
//SYSLIB   DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
//SYSLMOD  DD DSN=.,DISP=SHR
//SYSUT1   DD UNIT=,DCB=BLKSIZE=1024,
//SPACE=(1024,(200,20))
//SYSPRINT DD SYSOUT=
//SYSLIN   DD DSN=&,DISP=(OLD,DELETE)
// DD DSN=&,DISP=(OLD,DELETE)
// DD DDNAME=SYSIN

They run the compile using:
/HBCC08  EXEC CICSCCLH,.
//TRN.SYSIN DD *
./ INCLUDE HBCC08,LIB=PROD
/*
//LKED.SYSIN DD *
  NAME HBCC08(R)
/*
//

It seems that ..SDFHMAC(DFHEXLI) only contains one line:
INCLUDE SYSLIB(DFHXCSTB)

DFHXCSTB is in ..SDFHEXCI

It appears that during the link stage, DFHEI1 is being pulled in
automatically.

BATCH EMULATOR  JOB(HBCC08  ) STEP(HBCC08  ) PGM= IEWL
PROCEDURE(LKED)
IEW2278I B352 INVOCATION PARAMETERS - AMODE(31),RMODE(ANY),LIST,XREF

IEW2322I 1220  1 INCLUDE SYSLIB(DFHXCSTB)
IEW2322I 1220  2   NAME HBCC08(R)
 C R O S S - R E F E R E N C E  T
A B L E

_
TEXT CLASS = B_TEXT

---  R E F E R E N C E  --  T A R G
E T  ---
CLASSELEMENT   |

OFFSET SECT/PART(ABBREV)  OFFSET  TYPE | SYMBOL(ABBREV)
SECTION (ABB
  2A0 HBCC08 50 V-CON | IGZCBSO
IGZCBSO
  30A HBCC08 BA V-CON | CEESTART
CEESTART
  32A HBCC08 DA V-CON | CEESTART
CEESTART
  32E HBCC08 DE V-CON | CEEBETBL
CEEBETBL
  384 HBCC08134 V-CON | DFHEI1
DFHEAI
  388 HBCC08138 V-CON | CEELOCT
CEELOCT
 33BC CEEBETBL4 V-CON | CEEBXITA
$UNRESOLVED(

So, what are they really doing by including something from the EXCI
library instead of the normal INCLUDE?

Tony Thigpen

esst...@juno.com wrote on 04/22/2017 09:59 AM:

Hi Tony

I found two references to DFHEXLI
and also refer to the external interface guide as you mentioned

CICS.SDFHPROC(DFHYXTDL)

CICS.SDFHPROC(DFHEXTAL)

-- Original Message ------
From: Tony Thigpen <t...@vse2pdf.com>
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFHEXLI vs DFHECI
Date: Fri, 21 Apr 2017 21:09:07 -0400

I am working with a site, and their CICS COBOL compile procs include
DFHEXLI instead of DFHECI.

I thought DFHEXLI was only for batch programs using the external
interface link. But, there is not much information about it when I
google it.

Can DFHEXLI safely be used for "normal" CICS programs?



--
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: DFHEXLI vs DFHECI

2017-04-22 Thread Tony Thigpen
I had a little time and looked at this closer. I am trying to determine 
what they are really doing and why.


Here is the JCL that they use to compile:

... translate step
... cobol step with output going to
//SYSLIN   DD DSN=&,DISP=(MOD,PASS),
//UNIT=,SPACE=(80,(250,100))
... then
//COPYLINK EXEC PGM=IEBGENER,COND=(7,LT,COB)
//SYSUT1   DD DSN=(DFHEXLI),DISP=SHR
//SYSUT2   DD DSN=&,DISP=(NEW,PASS),
//DCB=(LRECL=80,BLKSIZE=400,RECFM=FB),
//UNIT=,SPACE=(400,(20,20))
//SYSPRINT DD SYSOUT=
//SYSINDD DUMMY
//*
//LKED   EXEC PGM=IEWL,REGION=,
//PARM='',COND=(5,LT,COB)
//SYSLIB   DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
// DD DSN=,DISP=SHR
//SYSLMOD  DD DSN=.,DISP=SHR
//SYSUT1   DD UNIT=,DCB=BLKSIZE=1024,
//SPACE=(1024,(200,20))
//SYSPRINT DD SYSOUT=
//SYSLIN   DD DSN=&,DISP=(OLD,DELETE)
// DD DSN=&,DISP=(OLD,DELETE)
// DD DDNAME=SYSIN

They run the compile using:
/HBCC08  EXEC CICSCCLH,.
//TRN.SYSIN DD *
./ INCLUDE HBCC08,LIB=PROD
/*
//LKED.SYSIN DD *
NAME HBCC08(R)
/*
//

It seems that ..SDFHMAC(DFHEXLI) only contains one line:
  INCLUDE SYSLIB(DFHXCSTB)

DFHXCSTB is in ..SDFHEXCI

It appears that during the link stage, DFHEI1 is being pulled in 
automatically.


BATCH EMULATOR  JOB(HBCC08  ) STEP(HBCC08  ) PGM= IEWL 
PROCEDURE(LKED)
IEW2278I B352 INVOCATION PARAMETERS - AMODE(31),RMODE(ANY),LIST,XREF 


IEW2322I 1220  1 INCLUDE SYSLIB(DFHXCSTB)
IEW2322I 1220  2   NAME HBCC08(R)
   C R O S S - R E F E R E N C E  T 
A B L E


_
TEXT CLASS = B_TEXT 

---  R E F E R E N C E  --  T A R G 
E T  ---
  CLASSELEMENT   | 

  OFFSET SECT/PART(ABBREV)  OFFSET  TYPE | SYMBOL(ABBREV) 
SECTION (ABB
2A0 HBCC08 50 V-CON | IGZCBSO 
IGZCBSO
30A HBCC08 BA V-CON | CEESTART 
CEESTART
32A HBCC08 DA V-CON | CEESTART 
CEESTART
32E HBCC08 DE V-CON | CEEBETBL 
CEEBETBL
384 HBCC08134 V-CON | DFHEI1 
DFHEAI
388 HBCC08138 V-CON | CEELOCT 
CEELOCT
   33BC CEEBETBL4 V-CON | CEEBXITA 
$UNRESOLVED(


So, what are they really doing by including something from the EXCI 
library instead of the normal INCLUDE?


Tony Thigpen

esst...@juno.com wrote on 04/22/2017 09:59 AM:

Hi Tony

I found two references to DFHEXLI
and also refer to the external interface guide as you mentioned

CICS.SDFHPROC(DFHYXTDL)

CICS.SDFHPROC(DFHEXTAL)

-- Original Message --
From: Tony Thigpen <t...@vse2pdf.com>
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFHEXLI vs DFHECI
Date: Fri, 21 Apr 2017 21:09:07 -0400

I am working with a site, and their CICS COBOL compile procs include
DFHEXLI instead of DFHECI.

I thought DFHEXLI was only for batch programs using the external
interface link. But, there is not much information about it when I
google it.

Can DFHEXLI safely be used for "normal" CICS programs?



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


DFHEXLI vs DFHECI

2017-04-21 Thread Tony Thigpen
I am working with a site, and their CICS COBOL compile procs include 
DFHEXLI instead of DFHECI.


I thought DFHEXLI was only for batch programs using the external 
interface link. But, there is not much information about it when I 
google it.


Can DFHEXLI safely be used for "normal" CICS programs?

--
Tony Thigpen

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


Re: Purchasing opportunity...

2017-04-17 Thread Tony Thigpen
I had similar problems over the weekend. Really strange issues with 
sometimes a message that said "the data sent was too large for the 
server".  I tried many saved IBM links and finally had one page display 
a usable error message that said "Please delete cookies and retry".


That did fix it.

Tony Thigpen

Bill Woodger wrote on 04/17/2017 06:42 PM:

On Mon, 17 Apr 2017 17:28:11 -0500, Mike Schwab <mike.a.sch...@gmail.com> wrote:


Works just fine for me.



Thanks. Tried again, same problem. Closing and restarting Firefox got it back for me. I'm 
in a different country today, and I clicked OK for a bunch of security updates, I guess 
there's no way of finding out exactly what caused that for me (or what I did to cause 
that), and even if I did find no-one would care. "Closed Permanently 
(Workaround)" is cheaper than root-cause analysis.

--
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: Assembler question

2017-04-08 Thread Tony Thigpen

Thanks all. I got it working with MACRF=(GL,PL) and using PUTX.

Tony Thigpen

David W Noon wrote on 04/08/2017 11:20 AM:

On Fri, 7 Apr 2017 19:09:09 -0400, Tony Thigpen (t...@vse2pdf.com) wrote
about "Assembler question" (in <58e81c15.6060...@vse2pdf.com>):

[snip]

  OPEN  (HPPCTL,UPDAT)



HPPCTL   DCB   DSORG=PS,RECFM=F,LRECL=100,DDNAME=HPPCTL,
BLKSIZE=(100),
MACRF=(GM),EODAD=PPCTLOUT


You have specified UPDAT in your OPEN but your MACRF only has GM. If you
really are updating the dataset in place, you should have MACRF=(GL,PL),
or if you are only reading the dataset then your OPEN macro should
specify INPUT rather than UPDAT.

For either INPUT or UPDAT, you do not need to specify RECFM, LRECL or
BLKSIZE, as these will be taken from the format-1 DSCB. Specifying these
unnecessarily can corrupt the format-1, as the access method takes your
word for these values, not the existing ones in the format-1, so any
differences are put into the format-1 during the CLOSE macro -- at least
for UPDAT.

HTH



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


Assembler question

2017-04-07 Thread Tony Thigpen
I am helping on an assembler program that is accessing a sequential file 
in move mode, yet the move is not happening. R1 points to valid data 
after the GET, but the record area specified was not filled in. This 
application is being ported from VSE to z/OS.


Code snippets:

 OPEN  (HPPCTL,UPDAT)
 GET   HPPCTL,PPCT
HPPCTL   DCB   DSORG=PS,RECFM=F,LRECL=100,DDNAME=HPPCTL,
   BLKSIZE=(100),
   MACRF=(GM),EODAD=PPCTLOUT

in program storage:
PPCT DS0CL100  CONTROL RECORD
PPID DSCL5 RECORD IDENT
... and more


Thoughts?

(My expertise is in VSE, not z/OS application programming.)

--
Tony Thigpen

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


Re: Problem Generating CA-7 SASSBSTR Batch LJOB Output

2017-03-03 Thread Tony Thigpen

What I use:

//
//*  SENDS LISTING OF ALL JOBS TO VM FOR PROCESSING
//
//IDCDEL   EXEC PGM=IDCAMS
//SYSPRINT DD  SYSOUT=*
//SYSINDD  *
 DEL SDP.S.CA7MAST.PRINT
 SET MAXCC = 0
/*
//*
//STEP1EXEC CA7BTI
//SYSPRINT DD DSN=SDP.S.CA7MAST.PRINT,
//DISP=(NEW,CATLG,DELETE),
//UNIT=SYSDA,SPACE=(CYL,(4,1),RLSE),
//DCB=(RECFM=FBA,LRECL=133,BLKSIZE=27930)
//ERRORS   DD SYSOUT=*
//SYSIN DD *
/LOGON MASTER
LJOB,LIST=NODD,LRUNDATE=(15001)
/LOGOFF
//*
//FTP1  EXEC  PGM=FTP
//SYSPRINT DD SYSOUT=*
//OUTPUT   DD SYSOUT=*
//INPUTDD DISP=OLD,DSN=SDP.S.VM.FTP.IPADDR
// DD *
 PUT 'SDP.S.VM.FTP.IPADDR'   JOBLOG.CA7LJOB;
 PUT 'SDP.S.CA7MAST.PRINT'   CA7MAST.STORE_H
 DIR
 QUIT
//*

Tony Thigpen

Robert S. Hansel (RSH) wrote on 03/03/2017 03:16 PM:

Greetings all,

I am trying to generate listings of job information from CA-7 with the LJOB
command using the Batch Terminal Interface (BTI) program SASSBSTR (PROC
CA7BTI). The job runs successfully, but the output in SYSPRINT simply shows
the LJOB command I executed and not, as I'd hoped, the output from the LJOB
command. I've searched the manuals and cannot figure out how to the get the
output I desire and was hoping someone could be of assistance. TIA.

Regards, Bob

Robert S. Hansel  *** Celebrating 30 years working with RACF ***
Lead RACF Specialist
RSH Consulting, Inc.
617-969-8211
www.linkedin.com/in/roberthansel
http://twitter.com/RSH_RACF
www.rshconsulting.com

Upcoming RSH RACF Training - WebEx
- RACF Audit & Compliance Roadmap - MAY 15-19, 2017
- RACF Level I Administration - APR 25-28, 2017
- RACF Level II Administration - FEB 27 - MAR 3, 2017
- RACF Level III Admin, Audit, & Compliance - APR 3-7, 2017
- RACF - Securing z/OS UNIX  - OCT 23-27, 2017


--
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: Friday fun with REXX and PARSE

2017-02-24 Thread Tony Thigpen

Steve has it right. Literals take precedent. So it works like this:

Step 1) split as Temp1 '.' Temp2 '.' Temp3
so: Temp1 = word1 word2
Temp2 = word3 word4:word5
Temp3 = word6 word7 hh.mm.ss
Step 2) split the "temps" based on the parsing between literals:
so: Parse Temp1 with var1 var2 var3 var4 var5
giving: var1 = word1
var2 = word2
var3-var5 = nulls because no more words in Temp1
so: Parse Temp2 with war6
giving  var6 = word3 word4:word5 (because only one parse into field)
so: Parse Temp3 with var7
giving  var7 = word6 word7 hh.mm.ss (because only one parse into field)


Tony Thigpen

Steve Horein wrote on 02/24/2017 06:05 AM:

Looks to me your literal delimiter took precedent over space delimiters.
In other words, PARSE looked for "." first, and found "word3 word4:word5"
between the specified literals.

On Fri, Feb 24, 2017 at 3:32 AM, Peter Hunkeler <p...@gmx.ch> wrote:


This is some Friday fun with parsing with REXX. First I was baffled with
the result, now I understand. So *no* I will not join the TSO/REXX list ;-)
I've got a data set to process with REXX. The records are of format:

"word1 word2.word3 word4:word5.word6 word7 hh.mm.ss"


What I need is each record split into:

var1 = "word1"
var2 = "word2.word3"
var3 = "word4:word5.word6"
var4 = "word7"
var5 = "hh"
var6 = "mm"
var7 = "ss"

Easy, I thought and coded:

PARSE VAR input var1 var2 var3 var4 var5 "." var6 "." var7 .


The result baffled me and was far from anything I understood at first.
Here is what the variables look like:


var1 ==> "word1"
var2 ==> "word2"
var3 ==> ""
var4 ==> ""
var5 ==> ""
var6 ==> "word3 word4:word5"
var7 ==> "word6"


Have fun.


--
Peter Hunkeler

--
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: HSM followup question

2017-02-21 Thread Tony Thigpen

I just ran the following:

MIGRATE VOLUME(HDGAC0 MIGRATE(365)) ML2

I got the following:

ARC0570I COMMAND MIGRATION FOR HDGAC6 VOLUME(S) TERMINATED, RC=25 REASON=0

I don't understand what it is trying to tell me:

25  There is a space management request on an SMS-managed volume with 
DBA or DBU specified, or a nonzero value of days on MIGRATE (days) or 
DAYS (days) is specified on a MIGRATE command.


Tony Thigpen

Richards, Robert B. wrote on 02/05/2017 07:20 AM:

But, in my MGMTCLAS ACS routine, where everything is based on the storage group setting, 
there are no specific IF statement for that storage group so it appears that the default 
management class of "" (null) is assigned for these files.


Don't you mean it is based on the SC setting? Because at this point, 
according to what you wrote, the SG has not been set because the SG routine 
sets it by the SC that was assigned in the SC routine.

Sequence of invocation: DC to SC to MC to SG

Based on this, MC can only set three ways: By DC, by SC or by the MC routine 
itself.

1) Changing the MC only affects NEWLY CREATED datasets
2) Yes

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Friday, February 03, 2017 6:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: HSM followup question

For a specific file prefix, my STORCLAS ACS routine sets the storage class to 
SC. Then in my STORGRP ACS routine, that storage class causes the storage 
group to be set to SG.

But, in my MGMTCLAS ACS routine, where everything is based on the storage group setting, 
there are no specific IF statement for that storage group so it appears that the default 
management class of ""
(null) is assigned for these files.

My assumption is that HSM is just going to ignore the files in this storage 
class and never migrate them. Yet, for these specific files, I actually want 
them migrated to tape so I think I need them assigned to a management class. 
(right/wrong?)

Questions:
1) If I change the MGMTCLAS ACS routine so as to assign a real management 
class, will this affect existing files, or only newly created files?

2) These files are for an old system that is no longer used. Since I just want 
them migrated out to tape and left there forever, would it be better to just 
issue a:
MIGRATE VOLUME(xx) MIGRATE(365) ML2
command and force the move to tape and not worry about setting up a valid 
management class for these files?

--
Tony Thigpen

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


HSM followup question

2017-02-03 Thread Tony Thigpen
For a specific file prefix, my STORCLAS ACS routine sets the storage 
class to SC. Then in my STORGRP ACS routine, that storage class 
causes the storage group to be set to SG.


But, in my MGMTCLAS ACS routine, where everything is based on the 
storage group setting, there are no specific IF statement for that 
storage group so it appears that the default management class of "" 
(null) is assigned for these files.


My assumption is that HSM is just going to ignore the files in this 
storage class and never migrate them. Yet, for these specific files, I 
actually want them migrated to tape so I think I need them assigned to a 
management class. (right/wrong?)


Questions:
1) If I change the MGMTCLAS ACS routine so as to assign a real 
management class, will this affect existing files, or only newly created 
files?


2) These files are for an old system that is no longer used. Since I 
just want them migrated out to tape and left there forever, would it be 
better to just issue a:

MIGRATE VOLUME(xx) MIGRATE(365) ML2
command and force the move to tape and not worry about setting up a 
valid management class for these files?


--
Tony Thigpen

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


Re: IMS log files question

2017-01-18 Thread Tony Thigpen
I am thinking that my best option would be to run the following, then 
figure out the storage group settings afterwards.


//DELDSN   EXEC PGM=ADRDSSU
//OUTVOL   DD DUMMY
//SYSPRINT DD   SYSOUT=*
//SYSINDD   *
 DUMP DATASET( -
   INCLUDE(-
   IMSVS.RLDSP.DBCP.**-
   IMSVS.SLDSP.DBCP.**-
   IMSVS.RLDSP.DBCT.**-
   IMSVS.SLDSP.DBCT.**-
  )   -
   BY(EXPDT,LT,*)
) -
   OUTDD(OUTVOL)  -
   DELETE
/*


Tony Thigpen

Tony Thigpen wrote on 01/18/2017 05:26 PM:

At this point, I am trying to familiarize myself with the DFHSM and the
contents of the manuals. With guidance from the list pointing me to the
next step, I am learning a lot. Calling IBM will just get me an answer
with no understanding.

Tony Thigpen

Lizette Koehler wrote on 01/18/2017 04:17 PM:

Of course my favorite last answer would be to open a case with DFHSM
and have them help you through DFSMS and DFSMShsm.  They will probably
be faster

Lizette


-Original Message-

From: Lizette Koehler <stars...@mindspring.com>
Sent: Jan 18, 2017 2:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

The HSM Started task has an ARCCMDxx member that details all the
stuff it is to do.

You can issue a   F dfhsmstcnamehere,Q SETSYS and see what is
currently running.

You can browse the ARCCMDxx member and see what it is going to do.
SETSYS PRIMARYSPMGMTSTART( ) -
   SECONDARYSPMGMTSTART( ) -
   AUTOBACKUPSTART(  ) -
   AUTODUMPSTART(  )

ADDVOL VOL001 UNIT(3390) MIGRATION(ML1 NOSDSP) THRESHOLD(1)

ADDVOL VOL002 UNIT(3390) -
PRIMARY(NOAUTOMIGRATION -
AUTORECALL -
AUTOBACKUP -
MIGRATE(999) -
BACKUPDEVICECATEGORY(TAPE)) -
THRESHOLD(100 100)

You can review the Management class in ISMF and see what the policies
are for the dataset (you only provided a snippet of the details.

Use the DISPLAY function in ISMF for easier read


-Original Message-

From: Tony Thigpen <t...@vse2pdf.com>
Sent: Jan 18, 2017 12:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

How do I determine if the volume is part of the HSM backup process? I
have looked at the HSM backup logs and these volumes are never
mentioned
although other volumes are backed up.

Tony Thigpen

Lizette Koehler wrote on 01/18/2017 10:13 AM:

See if DFHSM is running space management process on those
volumes/pools.

Or you can check on the IMS List and see if someone over there has
had a similar
issue

To join, if you have not done so, use this URL

IMShttp://imslistserv.bmc.com/scripts/wa-BMC.exe?A0=ims-l



Lizette






--
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: IMS log files question

2017-01-18 Thread Tony Thigpen
At this point, I am trying to familiarize myself with the DFHSM and the 
contents of the manuals. With guidance from the list pointing me to the 
next step, I am learning a lot. Calling IBM will just get me an answer 
with no understanding.


Tony Thigpen

Lizette Koehler wrote on 01/18/2017 04:17 PM:

Of course my favorite last answer would be to open a case with DFHSM and have 
them help you through DFSMS and DFSMShsm.  They will probably be faster

Lizette


-Original Message-

From: Lizette Koehler <stars...@mindspring.com>
Sent: Jan 18, 2017 2:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

The HSM Started task has an ARCCMDxx member that details all the stuff it is to 
do.

You can issue a   F dfhsmstcnamehere,Q SETSYS and see what is currently running.

You can browse the ARCCMDxx member and see what it is going to do.
SETSYS PRIMARYSPMGMTSTART( ) -
   SECONDARYSPMGMTSTART( ) -
   AUTOBACKUPSTART(  ) -
   AUTODUMPSTART(  )

ADDVOL VOL001 UNIT(3390) MIGRATION(ML1 NOSDSP) THRESHOLD(1)

ADDVOL VOL002 UNIT(3390) -
PRIMARY(NOAUTOMIGRATION -
AUTORECALL -
AUTOBACKUP -
MIGRATE(999) -
BACKUPDEVICECATEGORY(TAPE)) -
THRESHOLD(100 100)

You can review the Management class in ISMF and see what the policies are for 
the dataset (you only provided a snippet of the details.

Use the DISPLAY function in ISMF for easier read


-Original Message-

From: Tony Thigpen <t...@vse2pdf.com>
Sent: Jan 18, 2017 12:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

How do I determine if the volume is part of the HSM backup process? I
have looked at the HSM backup logs and these volumes are never mentioned
although other volumes are backed up.

Tony Thigpen

Lizette Koehler wrote on 01/18/2017 10:13 AM:

See if DFHSM is running space management process on those volumes/pools.

Or you can check on the IMS List and see if someone over there has had a similar
issue

To join, if you have not done so, use this URL

IMS http://imslistserv.bmc.com/scripts/wa-BMC.exe?A0=ims-l



Lizette






--
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: IMS log files question

2017-01-18 Thread Tony Thigpen

I just found where the storage group has set: AUTO MIGRATE = 'INTERVAL'

Based on my reading, then the volumes will not be 'cleaned' until they 
exceed a usage limit. Right now, the 4 volumes are 12, 12, 50 and 24% free.


I have not been able to find where I can use 'DISPLAY' in ISMF.

When I look at the storage group screen, I see:
Storage Group Name  : SGIMSLOG
To ALTER Storage Group, Specify:
 Description ==> SYSTEM DUMP DATASETS
==>
 Auto Migrate . . I  (Y, N, I or P)   Migrate Sys/Sys Group Name
 Auto Backup  . . N  (Y or N) Backup Sys/Sys Group Name
 Auto Dump  . . . N  (Y or N) Dump Sys/Sys Group Name


 Dump Class . . . (1 to 8 characters)
 Dump Class . . . Dump Class . .
 Dump Class . . . Dump Class . .


 Allocation/migration Threshold: High . . 10  (1-99)  Low  . . 9 
(0-99)
 Guaranteed Backup Frequency  . . . . . . NOLIMIT   (1 to  or 
NOLIMIT)



 ALTER SMS Storage Group Status . . . N   (Y or N)

Tony Thigpen

Lizette Koehler wrote on 01/18/2017 04:03 PM:

The HSM Started task has an ARCCMDxx member that details all the stuff it is to 
do.

You can issue a   F dfhsmstcnamehere,Q SETSYS and see what is currently running.

You can browse the ARCCMDxx member and see what it is going to do.
 SETSYS PRIMARYSPMGMTSTART( ) -
SECONDARYSPMGMTSTART( ) -
AUTOBACKUPSTART(  ) -
AUTODUMPSTART(  )

ADDVOL VOL001 UNIT(3390) MIGRATION(ML1 NOSDSP) THRESHOLD(1)

ADDVOL VOL002 UNIT(3390) -
 PRIMARY(NOAUTOMIGRATION -
 AUTORECALL -
 AUTOBACKUP -
 MIGRATE(999) -
 BACKUPDEVICECATEGORY(TAPE)) -
 THRESHOLD(100 100)

You can review the Management class in ISMF and see what the policies are for 
the dataset (you only provided a snippet of the details.

Use the DISPLAY function in ISMF for easier read


-Original Message-

From: Tony Thigpen <t...@vse2pdf.com>
Sent: Jan 18, 2017 12:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

How do I determine if the volume is part of the HSM backup process? I
have looked at the HSM backup logs and these volumes are never mentioned
although other volumes are backed up.

Tony Thigpen

Lizette Koehler wrote on 01/18/2017 10:13 AM:

See if DFHSM is running space management process on those volumes/pools.

Or you can check on the IMS List and see if someone over there has had a similar
issue

To join, if you have not done so, use this URL

IMS http://imslistserv.bmc.com/scripts/wa-BMC.exe?A0=ims-l



Lizette




--
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: IMS log files question

2017-01-18 Thread Tony Thigpen
How do I determine if the volume is part of the HSM backup process? I 
have looked at the HSM backup logs and these volumes are never mentioned 
although other volumes are backed up.


Tony Thigpen

Lizette Koehler wrote on 01/18/2017 10:13 AM:

See if DFHSM is running space management process on those volumes/pools.

Or you can check on the IMS List and see if someone over there has had a similar
issue

To join, if you have not done so, use this URL

IMS http://imslistserv.bmc.com/scripts/wa-BMC.exe?A0=ims-l



Lizette



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Tony Thigpen
Sent: Wednesday, January 18, 2017 7:30 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

Which makes since. It is using the
"larger of [JCL vs SMS]" & <= RET_LIMIT.

So, I am back to my original problem. I need to identify the process that is
suppose to be deleting the expired files from the VTOC?

Tony Thigpen

Burrell, Todd wrote on 01/18/2017 09:09 AM:

Looks like your RETPD=45 is overriding the SMS parameters.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
On Behalf Of Tony Thigpen
Sent: Wednesday, January 18, 2017 8:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

   From the job logs where the file is created:

//DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
// DISP=(NEW,CATLG,DELETE),RETPD=45,
// UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))

IGD101I SMS ALLOCATED TO DDNAME (DFSSLOGP)
   DSN (IMSVS.SLDSP.DBCT.D17018.T0040131.VF3)
   STORCLAS (SCIMSLOG) MGMTCLAS (MCIMSLOG) DATACLAS ()
   VOL SER NOS= HIMSL2

   From the management class panel:
MGMTCLAS EXPIRE EXPIRERETPARTIAL  PRIMARY
NAME NON-USAGE  DATE/DAYSLIMIT   RELEASE  DAYS
--(2)--- ---(3)---  ---(4)  --(5)--  (6)  ---(7)--
MCIMSLOG 7   7  NOLIMIT  NO  0

SMS is something I am just learning, but, if I am reading the manual right,

I would expect the files to be gone after 7 days.


But, from the VTOC:
Created  Expires
2017.018 2017.063

It appears that I am missing something. Because here is the vtoc dates for

one of the old files:

Created Expires
2015.190 2015.235

Tony Thigpen

Peter Hunkeler wrote on 01/18/2017 01:55 AM:



I am reviewing the system VTOCs and I see a lot of IMS log files
that contain a date/timestamp in their names. I know they are
created by the IMS system using the skeleton proc member ARCHJCL.
What I am seeing is that the file was created with a retention period of

45 days.


//DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
// DISP=(NEW,CATLG,DELETE),RETPD=45,
// UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))

But, I have daily files going back almost 2 years.





Is the RETPD honoured at allocation time? Look for message IGD17364I in the

IMS joblog. What value is set for "RET LIMIT" in the management class. If it
is 0, then EXPDT and RETPD will be ignored, and EXPIRE NON-USAGE and EXPIRE
DATE/DAYS determine when space managment considers to delete the data set. Any
of those could be NOLIMIT. Or the value is larger than your "almost 2 years".



Have you looked a the "Expiration date" in ISPF for any of those data data

sets?



--
Peter Hunkeler





--
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: IMS log files question

2017-01-18 Thread Tony Thigpen

Which makes since. It is using the
"larger of [JCL vs SMS]" & <= RET_LIMIT.

So, I am back to my original problem. I need to identify the process 
that is suppose to be deleting the expired files from the VTOC?


Tony Thigpen

Burrell, Todd wrote on 01/18/2017 09:09 AM:

Looks like your RETPD=45 is overriding the SMS parameters.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Wednesday, January 18, 2017 8:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

  From the job logs where the file is created:

//DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
// DISP=(NEW,CATLG,DELETE),RETPD=45,
// UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))

IGD101I SMS ALLOCATED TO DDNAME (DFSSLOGP)
  DSN (IMSVS.SLDSP.DBCT.D17018.T0040131.VF3)
  STORCLAS (SCIMSLOG) MGMTCLAS (MCIMSLOG) DATACLAS ()
  VOL SER NOS= HIMSL2

  From the management class panel:
MGMTCLAS EXPIRE EXPIRERETPARTIAL  PRIMARY
NAME NON-USAGE  DATE/DAYSLIMIT   RELEASE  DAYS
--(2)--- ---(3)---  ---(4)  --(5)--  (6)  ---(7)--
MCIMSLOG 7   7  NOLIMIT  NO  0

SMS is something I am just learning, but, if I am reading the manual right, I 
would expect the files to be gone after 7 days.

But, from the VTOC:
Created  Expires
2017.018 2017.063

It appears that I am missing something. Because here is the vtoc dates for one 
of the old files:
Created Expires
2015.190 2015.235

Tony Thigpen

Peter Hunkeler wrote on 01/18/2017 01:55 AM:



I am reviewing the system VTOCs and I see a lot of IMS log files that
contain a date/timestamp in their names. I know they are created by
the IMS system using the skeleton proc member ARCHJCL. What I am
seeing is that the file was created with a retention period of 45 days.

//DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
// DISP=(NEW,CATLG,DELETE),RETPD=45,
// UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))

But, I have daily files going back almost 2 years.





Is the RETPD honoured at allocation time? Look for message IGD17364I in the IMS joblog. What value 
is set for "RET LIMIT" in the management class. If it is 0, then EXPDT and RETPD will be 
ignored, and EXPIRE NON-USAGE and EXPIRE DATE/DAYS determine when space managment considers to 
delete the data set. Any of those could be NOLIMIT. Or the value is larger than your "almost 2 
years".


Have you looked a the "Expiration date" in ISPF for any of those data data sets?


--
Peter Hunkeler





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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

--
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: IMS log files question

2017-01-18 Thread Tony Thigpen

From the job logs where the file is created:

//DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
// DISP=(NEW,CATLG,DELETE),RETPD=45,
// UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))

IGD101I SMS ALLOCATED TO DDNAME (DFSSLOGP)
DSN (IMSVS.SLDSP.DBCT.D17018.T0040131.VF3)
STORCLAS (SCIMSLOG) MGMTCLAS (MCIMSLOG) DATACLAS ()
VOL SER NOS= HIMSL2

From the management class panel:
MGMTCLAS EXPIRE EXPIRERETPARTIAL  PRIMARY
NAME NON-USAGE  DATE/DAYSLIMIT   RELEASE  DAYS
--(2)--- ---(3)---  ---(4)  --(5)--  (6)  ---(7)--
MCIMSLOG 7   7  NOLIMIT  NO  0

SMS is something I am just learning, but, if I am reading the manual 
right, I would expect the files to be gone after 7 days.


But, from the VTOC:
Created  Expires
2017.018 2017.063

It appears that I am missing something. Because here is the vtoc dates 
for one of the old files:

Created Expires
2015.190 2015.235

Tony Thigpen

Peter Hunkeler wrote on 01/18/2017 01:55 AM:



I am reviewing the system VTOCs and I see a lot of IMS log files that
contain a date/timestamp in their names. I know they are created by
the IMS system using the skeleton proc member ARCHJCL. What I am
seeing is that the file was created with a retention period of 45 days.

//DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
// DISP=(NEW,CATLG,DELETE),RETPD=45,
// UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))

But, I have daily files going back almost 2 years.





Is the RETPD honoured at allocation time? Look for message IGD17364I in the IMS joblog. What value 
is set for "RET LIMIT" in the management class. If it is 0, then EXPDT and RETPD will be 
ignored, and EXPIRE NON-USAGE and EXPIRE DATE/DAYS determine when space managment considers to 
delete the data set. Any of those could be NOLIMIT. Or the value is larger than your "almost 2 
years".


Have you looked a the "Expiration date" in ISPF for any of those data data sets?


--
Peter Hunkeler





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


IMS log files question

2017-01-17 Thread Tony Thigpen

Can someone point me in the right direction?

I am reviewing the system VTOCs and I see a lot of IMS log files that 
contain a date/timestamp in their names. I know they are created by the 
IMS system using the skeleton proc member ARCHJCL. What I am seeing is 
that the file was created with a retention period of 45 days.


//DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
// DISP=(NEW,CATLG,DELETE),RETPD=45,
// UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))

But, I have daily files going back almost 2 years.

My conclusion is that something stopped cleaning up the files "back when".

Is the clean-up of expired files something normally handled within IMS 
or outside of IMS?



--
Tony Thigpen

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


Timeless TV show NASA mainframe (Was: Hidden Figures)

2017-01-16 Thread Tony Thigpen
I just watched the Timeless episode mentioned by Frank. Yes, the plot 
was a little thin when it came to the adding and removing the virus from 
the mainframe. But, it's not that unexpected of a time travel series.


But, I had to laugh when they installed the tape reel with the write 
protect ring toward the outside, not once, but twice by two different 
characters. :0


Tony Thigpen

Frank Swarbrick wrote on 01/13/2017 01:05 PM:

There was a recent episode of the new TV series "Timeless" that involved this era, and in fact had the 
Katherine G. Johnson<https://en.wikipedia.org/wiki/Katherine_Johnson> "character".  In this show 
she and the main characters fairly easily got themselves access to the computer room and "fed a virus" in 
to the mainframe using paper tape!  I'm guessing the TV show was a bit less realistic than the movie...!  :-)

Frank


From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of David 
Boyes <dbo...@sinenomine.net>
Sent: Friday, January 13, 2017 9:38 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Hidden Figures

It's interesting to note that this mailing list indirectly contributed to the 
movie. The directors contacted several people on this list whose experience 
goes back to the days when 7090s walked the earth, and we were able to correct 
a number of issues about what would have been possible or permitted with such a 
machine.

It's really weird to see how personal computers have influenced people's 
assumptions about what is and is not possible. NASA's 7090 was strictly 
access-controlled, and there would have been no ability to touch the hardware, 
certainly not by applications programmers. The directors had a hard time 
comprehending the idea of leased machines and charging by the CPU meter -- they 
didn't believe it until I was able to show them paperwork from that era that 
laid out IBM's expectations of customer and FE responsibilities and the 
charging model.

So, pat yourselves on the back -- we kept things accurate. The movie's worth 
seeing.



--
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: AW: Re: AW: Re: 32760 vs. 32768

2016-12-16 Thread Tony Thigpen

On z/VSE,
LIOCS limits are 32768. PIOCS limits are 65536 (which we use on tape, a 
lot). Off hand, I don't know if PIOCS supports 64K on DASD or not.



Tony Thigpen

Peter Hunkeler wrote on 12/16/2016 11:55 AM:


  >> Does DOS really support 32768? not 32767?


Not sure why I typed DOS. I meant z/VSE. Sorry



From a vtoc (two different files) where I was trying to move some data

from VSE to z/OS:
  >

RECFM   BLKSIZE Created  Expires
DSORG   LRECL   .DDD .DDD
SAM VBS 56660 32768 2016.339 2016.339





Interesting. So, I wonder why the did not make the limit 65535, since this is 
the maximum number that can be represented in an unsigned haldfword.




--
Peter Hunkeler



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




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


Re: AW: Re: 32760 vs. 32768

2016-12-16 Thread Tony Thigpen

> Does DOS really support 32768? not 32767?

From a vtoc (two different files) where I was trying to move some data 
from VSE to z/OS:


 RECFM   BLKSIZE Created  Expires
 DSORG   LRECL   .DDD .DDD


 SAM VBS 56660 32768 2016.339 2016.339

 SAM VBS 56660 32768 2016.339 2016.339


Tony Thigpen

Peter Hunkeler wrote on 12/16/2016 10:04 AM:



Recently, I had a file transfer issue between z/VSE and z/OS because VSE

support block lengths of 32768 (true 32k) while z/OS only supports 32760
(32k-8).


Does DOS really support 32768? not 32767?
32KiB -7 that is. The maximum positive number is 32767 not 23768.


--
Peter Hunkeler




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


IBM Automatic Binary Optimizer

2016-12-16 Thread Tony Thigpen

With ABO v1.2, is there still a requirement for PDS/E?

--
Tony Thigpen

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


Re: 32760 vs. 32768

2016-12-16 Thread Tony Thigpen
Recently, I had a file transfer issue between z/VSE and z/OS because VSE 
support block lengths of 32768 (true 32k) while z/OS only supports 32760 
(32k-8).


Does anybody know (historically) why z/OS does not support a true 32K 
block? z/VSE has supported it since "way back" in the DOS days.


Tony Thigpen

Bill Woodger wrote on 12/16/2016 07:01 AM:

32760 is the maximum blocksize. You have an LRECL of 32760, which is not at 
least four bytes less than the maximum blocksize.

The RC for the message goes up steps of four, and is already busted. Other RC 
values have multiple items. Some are not even inclusive, and probably can't be.

I think it is unrealistic to expect a separate RC for each possible combination 
of something which is invalid.

You didn't get a 20, so something was more twisted than would be normal for 
this type of error.

34 looks like a catch-all "you've done something 'illogical', you'd best fix it". You 
could experiment and perhaps find other illogical things which cause a 34. The message-text could 
perhaps have a main part which is more explicit, and the individual items listed as a 
"possible explanations" without the implication that all possible causes are covered.

It is like trying to document the exact results of "undefined behaviour", and 
keeping it up-to-date with each change to the software.

Now, what happens if you change your LRECL to 32752 at most? Does it "work" 
(keeping your 32767 for BLKSIZE) and does it give you 32760 for the actual BLKSIZE, or 
does it fail, and how?

With a V rather than VB, you can get to LRECL 32756.

So, you've broken three limits (BLKSIZE, LRECL for V, LRECL for VB), and you want a 
specific RC and message for that, plus, implicitly, additional RCs and specific messages 
for assorted combinations? I don't think anyone would find that worth the effort, or 
possible for all "illogical combinations of parameters" possible.

--
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: p370 & p390

2016-12-14 Thread Tony Thigpen
Do you really expect anybody to respond positively with such a hidden 
email address. I know where parts and running systems can be purchased, 
but you went to so much trouble to hide your identity that I can't give 
you the information.


Tony Thigpen

W Mainframe wrote on 12/14/2016 12:47 PM:

Guys,I am looking for people who is running a P390 or P370 for IBM parts and 
features.Thank youDAN

Sent from Yahoo Mail on Android

--
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: HSM old tape cleanup

2016-12-14 Thread Tony Thigpen
We got by our chpid problem resolved. We were able to perform an audit 
for the bad tape.

Thanks.

Tony Thigpen

Tony Thigpen wrote on 12/14/2016 10:11 AM:

Well, I tried the audit command. Now I have a dead-lock situation.

I did not know that the command would attempt to read the old tape. The
3490 drives and the chipid had been taken offline. Then the 3490 powered
down.

When I issued the command, HSM wants a 3490 tape drive I receive:
STC05537  IEF244I DFSMSHSM DFSMSHSM - UNABLE TO ALLOCATE 1 UNIT(S)
 AT LEAST 1 OFFLINE UNIT(S) NEEDED.
STC05537  IEF877E DFSMSHSM NEEDS 1 UNIT(S)
...
STC05537 *0075 IEF238D DFSMSHSM - REPLY DEVICE NAME OR 'CANCEL'.

We tried CANCEL but the request just comes back immediately.

And we can't vary the CHPID online while the request is active.


Tony Thigpen

Richard Marchant wrote on 12/14/2016 08:19 AM:

Tony,

ARC0378I TTOC RECORD AND TAPE MEDIA CONTENTS ARE INCONSISTENT

You can fix this error by issuing the following:

HSEND AUDIT MEDIACONTROLS VOLUMES(volser) FIX ODS(your.dsn)


For the tapes with "IEC514D DCK OR LBL ERR" you will have to delete
either
the T records in the OCDS or their associated records in the BCDS or MCDS
depending whether they are backup or migration tapes.

Richard Marchant
Johannesburg



On Wed, Dec 14, 2016 at 2:03 PM, Tony Thigpen <t...@vse2pdf.com> wrote:


They are in both catalogs. I am not currently concerned with the CA-1
catalog since CA-1 normally scratches the tape when HSM recycles a tape.
Anyway, I can handle CA-1 when/if I get HSM cleaned up.

I am trying to clean-up un-readable 3490 tapes listed in the output
from:
HSEND LIST TTOC SELECT(FULL) ODS ('xxx')

Tony Thigpen

Linda wrote on 12/14/2016 01:37 AM:


Hi Tony,

Listed in the system catalog or the HSM tape catalog, both?

You should be able to list the catalogue entries, and IF they match,
you
could reset the HSM expiration values to a date in the close future,
and
let them expire through normal HSM processing.

Once the datasets are expired and the tapes are scratched you should be
able to remove or replace the volumes or mark them as deleted.

HTH,

Linda

Sent from my iPhone

On Dec 13, 2016, at 2:02 PM, Tony Thigpen <t...@vse2pdf.com> wrote:


I am looking at my HSM TTOC listing. I have 3 old 3490s that are still
listed. I actually have the tapes, but they are unreadable. On two
of them,
I get a label error:
IEC514D DCK OR LBL ERR

On the other one, the TTOC shows:
RC0378I TTOC RECORD AND TAPE MEDIA CONTENTS ARE INCONSISTENT

Since I can't migrate these volumes, how do I just delete these active
tapes from HSM? They are at least 15 years old so I am not worried
about
the data that may have been on them.

--
Tony Thigpen

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




--
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: HSM old tape cleanup

2016-12-14 Thread Tony Thigpen

Well, I tried the audit command. Now I have a dead-lock situation.

I did not know that the command would attempt to read the old tape. The 
3490 drives and the chipid had been taken offline. Then the 3490 powered 
down.


When I issued the command, HSM wants a 3490 tape drive I receive:
STC05537  IEF244I DFSMSHSM DFSMSHSM - UNABLE TO ALLOCATE 1 UNIT(S)
AT LEAST 1 OFFLINE UNIT(S) NEEDED.
STC05537  IEF877E DFSMSHSM NEEDS 1 UNIT(S)
...
STC05537 *0075 IEF238D DFSMSHSM - REPLY DEVICE NAME OR 'CANCEL'.

We tried CANCEL but the request just comes back immediately.

And we can't vary the CHPID online while the request is active.


Tony Thigpen

Richard Marchant wrote on 12/14/2016 08:19 AM:

Tony,

ARC0378I TTOC RECORD AND TAPE MEDIA CONTENTS ARE INCONSISTENT

You can fix this error by issuing the following:

HSEND AUDIT MEDIACONTROLS VOLUMES(volser) FIX ODS(your.dsn)


For the tapes with "IEC514D DCK OR LBL ERR" you will have to delete either
the T records in the OCDS or their associated records in the BCDS or MCDS
depending whether they are backup or migration tapes.

Richard Marchant
Johannesburg



On Wed, Dec 14, 2016 at 2:03 PM, Tony Thigpen <t...@vse2pdf.com> wrote:


They are in both catalogs. I am not currently concerned with the CA-1
catalog since CA-1 normally scratches the tape when HSM recycles a tape.
Anyway, I can handle CA-1 when/if I get HSM cleaned up.

I am trying to clean-up un-readable 3490 tapes listed in the output from:
HSEND LIST TTOC SELECT(FULL) ODS ('xxx')

Tony Thigpen

Linda wrote on 12/14/2016 01:37 AM:


Hi Tony,

Listed in the system catalog or the HSM tape catalog, both?

You should be able to list the catalogue entries, and IF they match, you
could reset the HSM expiration values to a date in the close future, and
let them expire through normal HSM processing.

Once the datasets are expired and the tapes are scratched you should be
able to remove or replace the volumes or mark them as deleted.

HTH,

Linda

Sent from my iPhone

On Dec 13, 2016, at 2:02 PM, Tony Thigpen <t...@vse2pdf.com> wrote:


I am looking at my HSM TTOC listing. I have 3 old 3490s that are still
listed. I actually have the tapes, but they are unreadable. On two of them,
I get a label error:
IEC514D DCK OR LBL ERR

On the other one, the TTOC shows:
RC0378I TTOC RECORD AND TAPE MEDIA CONTENTS ARE INCONSISTENT

Since I can't migrate these volumes, how do I just delete these active
tapes from HSM? They are at least 15 years old so I am not worried about
the data that may have been on them.

--
Tony Thigpen

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




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


Re: HSM old tape cleanup

2016-12-14 Thread Tony Thigpen
They are in both catalogs. I am not currently concerned with the CA-1 
catalog since CA-1 normally scratches the tape when HSM recycles a tape. 
Anyway, I can handle CA-1 when/if I get HSM cleaned up.


I am trying to clean-up un-readable 3490 tapes listed in the output from:
HSEND LIST TTOC SELECT(FULL) ODS ('xxx')

Tony Thigpen

Linda wrote on 12/14/2016 01:37 AM:

Hi Tony,

Listed in the system catalog or the HSM tape catalog, both?

You should be able to list the catalogue entries, and IF they match, you could 
reset the HSM expiration values to a date in the close future, and let them 
expire through normal HSM processing.

Once the datasets are expired and the tapes are scratched you should be able to 
remove or replace the volumes or mark them as deleted.

HTH,

Linda

Sent from my iPhone


On Dec 13, 2016, at 2:02 PM, Tony Thigpen <t...@vse2pdf.com> wrote:

I am looking at my HSM TTOC listing. I have 3 old 3490s that are still listed. 
I actually have the tapes, but they are unreadable. On two of them, I get a 
label error:
IEC514D DCK OR LBL ERR

On the other one, the TTOC shows:
RC0378I TTOC RECORD AND TAPE MEDIA CONTENTS ARE INCONSISTENT

Since I can't migrate these volumes, how do I just delete these active tapes 
from HSM? They are at least 15 years old so I am not worried about the data 
that may have been on them.

--
Tony Thigpen

--
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: HSM old tape cleanup

2016-12-13 Thread Tony Thigpen

Fails. :-(

Issued:
HSEND DELVOL 153818 MIGRATION(PURGE)
Response was:
ARC0260I MIGRATION VOLUME 153818 ENTRY NOT DELETED - VALID DATA MAY 
EXIST ON

ARC0260I (CONT.) VOLUME

For the one of the volumes:
Issued:
HSEND DELVOL 152215 MIGRATION(PURGE)
Response was:
ARC0378I TTOC RECORD AND TAPE MEDIA CONTENTS ARE INCONSISTENT ON TAPE VOLUME
ARC0378I (CONT.) 152215. TAPE VOLUME CANNOT BE DELETED, VALID DATA SETS MAY
ARC0378I (CONT.) EXIST ON THE VOLUME

Tony Thigpen

Allan Staller wrote on 12/13/2016 05:12 PM:

HSEND DELVOL volser type PURGE IIRC


From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Tony 
Thigpen <t...@vse2pdf.com>
Sent: Tuesday, December 13, 2016 4:02:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: HSM old tape cleanup

I am looking at my HSM TTOC listing. I have 3 old 3490s that are still
listed. I actually have the tapes, but they are unreadable. On two of
them, I get a label error:
IEC514D DCK OR LBL ERR

On the other one, the TTOC shows:
RC0378I TTOC RECORD AND TAPE MEDIA CONTENTS ARE INCONSISTENT

Since I can't migrate these volumes, how do I just delete these active
tapes from HSM? They are at least 15 years old so I am not worried about
the data that may have been on them.

--
Tony Thigpen

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


HSM old tape cleanup

2016-12-13 Thread Tony Thigpen
I am looking at my HSM TTOC listing. I have 3 old 3490s that are still 
listed. I actually have the tapes, but they are unreadable. On two of 
them, I get a label error:

IEC514D DCK OR LBL ERR

On the other one, the TTOC shows:
RC0378I TTOC RECORD AND TAPE MEDIA CONTENTS ARE INCONSISTENT

Since I can't migrate these volumes, how do I just delete these active 
tapes from HSM? They are at least 15 years old so I am not worried about 
the data that may have been on them.


--
Tony Thigpen

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


Re: HSM question

2016-11-24 Thread Tony Thigpen
That's what I thought, but it does not seem to be working. So, I figured 
I was misreading or doing something wrong.


Tony Thigpen

retired mainframer wrote on 11/24/2016 04:42 PM:

Doesn't SETSYS PARTIALTAPE(BAKCUP(MARKFULL)) do what you want?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Thursday, November 24, 2016 7:30 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: HSM question

The elapsed time is 10 minutes.

Before we get off-track too much, the end result we are looking for is:
We want the HSM backup process to *always* use a scratch tape. We never
want it to ask for an existing tape to append to.

--
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: HSM question

2016-11-24 Thread Tony Thigpen

The elapsed time is 10 minutes.

Before we get off-track too much, the end result we are looking for is:
We want the HSM backup process to *always* use a scratch tape. We never 
want it to ask for an existing tape to append to.


We will recycle the tapes to combine them at our convenience.

But, as best I can tell, the HSM control parms are already set to not 
use an existing tape:

SETSYS
  PARTIALTAPE(
   BACKUP(MARKFULL) -
   MIGRATION(MARKFULL))
SETSYS
  SELECTVOLUME(
  BACKUP(SCRATCH)
  MIGRATION(SCRATCH) -
  DUMP(SCRATCH))

Tony Thigpen

Elardus Engelbrecht wrote on 11/24/2016 09:09 AM:

Tony Thigpen wrote:


The remote operator is a human.
Tape management system is CA1
Still researching logs.


Thanks. I see that output and logs you gave to Lizette.

I see you have MOUNT WAIT TIME=010 MINUTE(S), but what are the [elapsed] times 
for these messages and reply?

*IEC501A M 0C01,015010,SL,COMP,DFSMSHSM,DFSMSHSM,DFHSM.BACKTAPE.DATASET
*0037 ARC0310A CAN TAPE 015010 BE MOUNTED? REPLY Y OR N
   R 37,N

You said it asked for another mount, is that for this message for which you 
drove in your car to do that mount?

ARC0421I BACKUP VOLUME 015010 IS NOW MARKED FULL

Just probing questions, because when I was a HSM admin ages ago, I got many 
gray hairs about those mounts...

It is one of those things for which an autoreply is not going to work always in 
a 'lights-out 24/7' environment.

Good luck! You will need all the help you are deserving. I hope you can get a 
good solution for this PITA.

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: HSM question

2016-11-24 Thread Tony Thigpen

Elardus,

The remote operator is a human.
Tape management system is CA1
Still researching logs.

Tony Thigpen

Elardus Engelbrecht wrote on 11/23/2016 02:04 AM:

Tony Thigpen wrote:


Once a week, HSM performs an AUTOBACKUP. Until about 3 months ago, if nobody was at the 
shop, HSM would ask for an exiting tape, wait 10 minutes, and if no tape was mounted, it 
would ask "Can tape be mounted?". If our remote operator replied 'N', then HSM 
would us a scratch tape. About once ever month or so, we would run a recycle job to 
combine all the tapes.


What remote operator? A person or automated task?



Discussions with all the 3 others involved in the discussion 3 months ago came back with 
"I did not change anything 3 months ago."


Really? Do you have any tape management system?



So, I have come to the conclusion that somebody issued a command to HSM but did 
not update the config file so it would be handled at the next IPL.


Hmmm, yes something *has* changed!

What command(s) was issued? What are the results of that change(s)? Can you get 
RACF / SMF / SYSLOG records of that ?


Lizette gave you good questions. I will certainly listen to her! ;-)

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: HSM question

2016-11-24 Thread Tony Thigpen
) from log
*TMS009  IEC501A M 
0C01,015010,SL,COMP,DFSMSHSM,DFSMSHSM,DFHSM.BACKTAPE.DATASET

*IEC501A M 0C01,015010,SL,COMP,DFSMSHSM,DFSMSHSM,DFHSM.BACKTAPE.DATASET
*0037 ARC0310A CAN TAPE 015010 BE MOUNTED? REPLY Y OR N
 R 37,N
 IEE600I REPLY TO 0037 IS;N
 IEA989I SLIP TRAP ID=X13E MATCHED.  JOBNAME=DFSMSHSM, ASID=0027.
 IEA989I SLIP TRAP ID=X13E MATCHED.  JOBNAME=DFSMSHSM, ASID=0027.
 IEA989I SLIP TRAP ID=X33E MATCHED.  JOBNAME=DFSMSHSM, ASID=0027.
 ARC0421I BACKUP VOLUME 015010 IS NOW MARKED FULL
 TMS014  IEF234E K 0C01,015010,PVT,DFSMSHSM,DFSMSHSM
 IEF234E K 0C01,015010,PVT,DFSMSHSM,DFSMSHSM
*TMS009  IEC501A M 
0C02,015128,SL,COMP,DFSMSHSM,DFSMSHSM,DFHSM.BACKTAPE.DATASET

*IEC501A M 0C02,015128,SL,COMP,DFSMSHSM,DFSMSHSM,DFHSM.BACKTAPE.DATASET


Tony Thigpen

Lizette Koehler wrote on 11/22/2016 10:10 PM:

So some basic questions
   1)  What version of z/OS?
   2)  If you do a F dfhsmtaskname,Q SETSYS   does it show the same info as the 
ARCCMDxx member?
   3)  What is the specific messages  you are seeing during autobackup?


Lizette



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Tony Thigpen
Sent: Tuesday, November 22, 2016 4:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: HSM question

HSM is not my ballgame, but I am tasked with figuring out this puzzle, so bear
with me. As for background, the shop attempts to run lights-out 24/7.

Once a week, HSM performs an AUTOBACKUP. Until about 3 months ago, if nobody
was at the shop, HSM would ask for an exiting tape, wait 10 minutes, and if no
tape was mounted, it would ask "Can tape be mounted?". If our remote operator
replied 'N', then HSM would us a scratch tape. About once ever month or so, we
would run a recycle job to combine all the tapes.

About 3 months ago, we had some internal discussions about 'fixing' this so
that it would just use scratch tapes without asking for an existing tape. The
next thing we knew, the weekly tapes would automatically use a scratch tape.
This was good. I assumed that one of the other guys had changed something.

Then came the time change and the resulting IPL. Now everything is different.
It seems to work the way it did prior to 3 months ago, except for one problem.
When the operator replies that the tape can not be mounted, instead of HSM
using a scratch tape, it now asks for another HSM tape. After about 4 hours of
this last week, I got in my car and went down an mounted the tape. (I am the
only one that lives in the same town as the processor.)

Discussions with all the 3 others involved in the discussion 3 months ago came
back with "I did not change anything 3 months ago."

But, the other 2 guys that know HSM also say "We are busy. If you want it
different, figure it out and change it."

Key items I see in the config file are:
SETSYS
PARTIALTAPE(
 BACKUP(MARKFULL) -
 MIGRATION(MARKFULL))
SETSYS
SELECTVOLUME(
BACKUP(SCRATCH)
MIGRATION(SCRATCH) -
DUMP(SCRATCH))
SETSYS
RECYCLEPERCENT(33)
MAXRECYCLETASKS(1)
SETSYS
TAPEUTILIZATION(
 UNITTYPE(3590-1) PERCENTFULL(97))
SETSYS
TAPESPANSIZE(100)

(And the output of HSEND QUERY SETSYS is the same.)

The last update date stamp on the config files was 15/12/22.

So, I have come to the conclusion that somebody issued a command to HSM but
did not update the config file so it would be handled at the next IPL.

Looking for any input.

--
Tony Thigpen


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


HSM question

2016-11-22 Thread Tony Thigpen
HSM is not my ballgame, but I am tasked with figuring out this puzzle, 
so bear with me. As for background, the shop attempts to run lights-out 
24/7.


Once a week, HSM performs an AUTOBACKUP. Until about 3 months ago, if 
nobody was at the shop, HSM would ask for an exiting tape, wait 10 
minutes, and if no tape was mounted, it would ask "Can tape be 
mounted?". If our remote operator replied 'N', then HSM would us a 
scratch tape. About once ever month or so, we would run a recycle job to 
combine all the tapes.


About 3 months ago, we had some internal discussions about 'fixing' this 
so that it would just use scratch tapes without asking for an existing 
tape. The next thing we knew, the weekly tapes would automatically use a 
scratch tape. This was good. I assumed that one of the other guys had 
changed something.


Then came the time change and the resulting IPL. Now everything is 
different. It seems to work the way it did prior to 3 months ago, except 
for one problem. When the operator replies that the tape can not be 
mounted, instead of HSM using a scratch tape, it now asks for another 
HSM tape. After about 4 hours of this last week, I got in my car and 
went down an mounted the tape. (I am the only one that lives in the same 
town as the processor.)


Discussions with all the 3 others involved in the discussion 3 months 
ago came back with "I did not change anything 3 months ago."


But, the other 2 guys that know HSM also say "We are busy. If you want 
it different, figure it out and change it."


Key items I see in the config file are:
SETSYS
  PARTIALTAPE(
   BACKUP(MARKFULL) -
   MIGRATION(MARKFULL))
SETSYS
  SELECTVOLUME(
  BACKUP(SCRATCH)
  MIGRATION(SCRATCH) -
  DUMP(SCRATCH))
SETSYS
  RECYCLEPERCENT(33)
  MAXRECYCLETASKS(1)
SETSYS
  TAPEUTILIZATION(
   UNITTYPE(3590-1) PERCENTFULL(97))
SETSYS
  TAPESPANSIZE(100)

(And the output of HSEND QUERY SETSYS is the same.)

The last update date stamp on the config files was 15/12/22.

So, I have come to the conclusion that somebody issued a command to HSM 
but did not update the config file so it would be handled at the next IPL.


Looking for any input.

--
Tony Thigpen

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


Re: Mainframe systems programmer ID 'vaulting'

2016-11-22 Thread Tony Thigpen

As usual, some pc based person only thinks of the way their world works.

I have been though multiple audits at multiple companies where they 
accepted that:
1) System programmers had two logons. One "normal" and one "higher". The 
"normal" userid still had some privileged access, but nothing like the 
"higher" userid which had basically unlimited access.
2) Additional audit trails were created for the "higher" userid. Both 
that fact that they logged on and what they did.
3) The systems programmers split their libraries and work processes so 
that they only used the "higher" userid when really necessary.


The fact was that we had to negotiate what was considered "daily" work 
and what was considered "special" work. This took a bit of time and was 
refined over time. A lot of the decisions revolved around READ-ONLY vs 
UPDATE rights on many of the libraries.


Also, the security rules were different depending on which LPAR or Guest 
we were logged on to. Our normal userid could do everything on the 
systems programmer test LPAR. On the Development LPAR, it could do most 
everything. Our real limits were on the production LPARs.


That being said, I think you are going to have to also go down the same 
road where you split your work processes and libraries into normal daily 
stuff and "special" stuff. It will take you a while to get into the 
mindset, but in the end you will find that it worth it. It will take a 
lot of negotiating, but it


Since the first place where I was forced into this arrangement, I have 
implemented it at other locations. Yes, the systems programmers thought 
it was terrible at first, but once they got used to it, they realized 
that it sometimes saved their bacon. (Think "SHUTDOWN" under VM!) They 
had to learn to think: Which hat am I wearing right now? A limited 
systems programmer hat or the mainframe "god" hat.


If you get your workloads split correctly, you may not need to use a 
vaulted userid as often.


Tony Thigpen

James Peddycord wrote on 11/22/2016 11:52 AM:

NTAC:3NS-20
Our company is undergoing a project to 'protect privileged access' by using a 
password vaulting product. We have been doing this for quite some time for 
applications teams who require higher levels of access to production datasets 
for problem resolution, installs, etc.
The way it works is that a pool of logonids is created, along with an AD group 
that allows the appropriate applications folks to be able to 'check out' one of 
these pooled logonids for 24 hours via a web interface. The web interface uses 
the users lan password plus their secure key passcode and phrase to validate 
their identity.
The project has now included Windows and Unix server admins, but instead of a 
pooled logonid these users have separate logonids with admin access and they 
'check out' their own individual administrator logonid.
Now the project has moved into the mainframe systems programmer space. So far 
we have used the 'privileges' on the logonid records as defined by our security 
product to limit this vaulting. Users with 'security' access must check out 
logonids from the vault. Users with the non-cncl privilege are next.
During project discussions it has been brought up that the systems programmers, 
with their access to SYS1 datasets and operator commands, are privileged users 
by nature, and that eventually they are going to want to vault this access. We 
(the systems programmers) are strongly against this.
It looks like at some point we will lose our battle and our access to the 
mainframe will be vaulted, meaning my entire team will need to check a logonid 
out of the password vault every morning before starting work. Our main argument 
now is that we do not want these logonids to be generic, pooled logonids, we 
want them to be basically the same as our own logonids so that we can see who 
did what by using the mainframe's built in logging (SMF data, ISPF stats, 
etc...).

My questions are, are other companies using password vaulting or other 
multi-level authentication for mainframe systems programmer access?
What else could we use in our argument against using generic, pooled logonids?

Thanks in advance!

Jim

--
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: z/VSE Connector Client

2016-11-05 Thread Tony Thigpen

You need to ask on VSE-L.

vs...@lists.lehigh.edu
https://lists.lehigh.edu/mailman/listinfo/vse-l


Tony Thigpen

Jack J. Woehr wrote on 11/04/2016 11:40 PM:

Is there any IBM program or ISV providing free access for z/VSE
development?

This veteran of JTOpen and other remote APIs has just discovered the
existence of the z/VSE Connector Client!



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


Re: TV news just now

2016-10-28 Thread Tony Thigpen

Did you see this:

The FAA just officially approved turkey drops.

http://www.avweb.com/avwebflash/news/FAA-Approves-Turkey-Drop-227176-1.html

Tony Thigpen

Edward Finnell wrote on 10/28/2016 07:58 PM:

"Who knew turkeys couldn't fly?"


In a message dated 10/28/2016 6:52:36 P.M. Central Daylight Time,
t...@vse2pdf.com writes:

Any  relation to Les Nessman?


--
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: TV news just now

2016-10-28 Thread Tony Thigpen

Any relation to Les Nessman?

(He was at a radio station in Cincinnati late 70's, early 80's.)

:-)

Tony Thigpen

Tom Brennan wrote on 10/28/2016 07:47 PM:

News channels here in Los Angeles sometimes use a certain expert to
comment on airplane accidents, and he always catches my attention
because his name is Les Abend.

--
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: Language Environment LIBVEC layout?

2016-10-20 Thread Tony Thigpen
I had to sign paperwork to get my copy, back when... I guess it has been 
released to general public since then.


Tony Thigpen

Tony Harminc wrote on 10/20/2016 12:48 PM:

On 20 October 2016 at 08:47, Tony Thigpen <t...@vse2pdf.com> wrote:

If you are a vendor, you should have access to the LE vendor manual. Some of
the pointer locations can be deduced from it. If you are not a vendor, you
don't have access to the manual.


The LE Vendor Interfaces manual, SA38-0688 is no secret. It's part of
the standard collection of LE books. It's also the book that Pete just
mentioned in its KC version.

Unless you know of some other *truly secret* LE Vendor book...

Tony H.

--
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: Language Environment LIBVEC layout?

2016-10-20 Thread Tony Thigpen
If you are a vendor, you should have access to the LE vendor manual. 
Some of the pointer locations can be deduced from it. If you are not a 
vendor, you don't have access to the manual.


Tony Thigpen

Pete Dillon wrote on 10/20/2016 08:36 AM:

Many thanks for that. The documentation for the CEETLOC service* shows
two macros being invoked, CEEXCELV and CEEXCAA - the CAA and the vector
table I alluded to in my original post. But they seem to have gone AWOL
somehow - certainly they are not in the concatenation

SYS1.MACLIB
SYS1.MODGEN
SYSCEE.SCEEMAC

- and a hunt around the usual HLQs (SYS1 and SYSCEE) doesn't find them.
Can anyone assist? It's odd that a documented macro can't be found,
although my admittedly limited knowledge of assembler may be to blame.

Thanks in advance for any pointers!

Pete.

* - at
http://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.c
eev100/ceetloc.htm

--
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: EXTERNAL: Re: remote system support (i.e. the data center is 2 states away from you).

2016-09-30 Thread Tony Thigpen

> Setting up a separate PC (unless your box doesn't support the
> ICC consoles) is really not necessary.

Experience suggests otherwise.

The separate PCs for the primary consoles has come about because of our 
experience with network failures. They are connected directly to the 
same switch as the OSA-C. So, you never loose all the consoles over an 
extended timeframe. (We don't have anyone on-site so they can fail and 
we might not know it for weeks.)


Laptops are used because they are not on the same UPS as the CPU's (we 
have several z CPUs). The battery gives us a long non-power run-time 
since the lid is closed and the screen is off. (We only access them via 
RDP.)


Tony Thigpen

Brian Westerman wrote on 09/30/2016 04:03 AM:

I'm actually kind of surprised at the number of sites that don't code the 
OSA-ICC consoles as NIP available.  They were designed to function in that 
manner, and you can then always have remote access (assuming you have a VPN).  
If you don't have a VPN set up for your mainframe, you are just asking for 
trouble.  If you do have one, then not using it to support the box seems very 
silly indeed.

Setting up a separate PC (unless your box doesn't support the ICC consoles) is 
really not necessary.

Brian


On Wed, 28 Sep 2016 16:17:25 -0400, Tony Thigpen <t...@vse2pdf.com> wrote:


Our remote systems support staff have multiple remote access to the
consoles:
1) The initial IPL console is on a laptop in the computer room with
Windows 7 PRO. If needed, this box can be remotely accessed using RDP
over a VPN.
2) A backup console is always running on a second laptop with the same
RDP over VPN access.
3) Each sysprog has their own dedicated console which is accessed via
the OSA-C. I connect and keep my personal console running all the time
but minimized.
4) We have one person in town that lives only 5 minutes from the
data-center. We can always call them.
5) There is another company in the same building that manages WinTel
servers. They have access to our data-center and can be called 24/7.

Tony Thigpen

Jerry Whitteridge wrote on 09/28/2016 01:34 PM:

This indicates a weakness in your console deployment - my staff have remote 
access to all the consoles they need (including the Master)

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 Edward Gould
Sent: Wednesday, September 28, 2016 9:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: remote system support (i.e. the data center is 2 states 
away from you).


On Sep 28, 2016, at 12:28 AM, Brian Westerman <brian_wester...@syzygyinc.com> 
wrote:

Hi John,

Our company (Syzygy Incorporated) fully supports more than 70 sites remotely, all over 
the world.  On top of that we provide partial support for another 60 to 70 sites.  Some 
are large (300+MSU) and some are quite small (8 to 10 MSU), but they all need our 
expertise and not being "on-site" has never been an issue.  We also have a 
suite of system automation products that we maintain at several hundred sites.

Even 10 to 12 years ago, it was very unusual to be "at" a site or if
you were physically there, to be anywhere near the actual computer
room.  Once a site realizes that the systems programmer doesn't need
to be in that room, it's only a small jump for them to understand that
you get just as much support from the next floor, or the next
building, or the next city, etc.  I can still remember some knock-down
drag out fights between the systems programmers and the operations
group on whether or not the systems programmers should ever be allowed
into the computer room.  We (systems programmers) always won that
argument, but now I wonder why I fought it for so long. :)

——SNIP———

I will disagree with you on this one. Our data center is on 2 floors and 
running upstairs is still needed as consoles (except the master) is still 
needed to this day. Just last week all consoles (except the master) were locked 
out (TSO was dead as were other possibilities). We were able to get the system 
back (and working in good order) by a combination of operator commands.

Ed

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

Re: remote system support (i.e. the data center is 2 states away from you).

2016-09-29 Thread Tony Thigpen

Times have changed.

Just ask the auditors if they have VPN access to their files so that 
they can work from home. If they say yes, then you should be able to 
have VPN consoles too.


Or, just set it up and don't tell them. If they ever figure it out, just 
say that 'Joe' (some retired auditor) approved it many years ago. Let 
them prove he did not.


Tony Thigpen

Edward Gould wrote on 09/29/2016 03:44 AM:

On Sep 28, 2016, at 11:49 PM, Brian Westerman <brian_wester...@syzygyinc.com> 
wrote:

Now that most mainframes (at least for the past several years) have OSA-ICC's, 
there is no reason to worry about not having a console connection remotely.  We 
routinely define 16 consoles and 16 3270's (non-console) to each LPAR (a few 
more for production LPARs sometimes).  I can't think of the last time that I 
couldn't get into any of the client mainframes that wasn't a flat-out network 
issue, and that can't normally be handled from z/OS anyway.  That's why you 
have network appliances to control the network.

You need to make sure that you ALWAYS have multiple points of entry to the 
LPARs available to you, TCP to OSA, TCP to OSA-ICC, LPAR to LPAR, etc.  If a 
site is still using and/or paying for a local control unit and 3270's when 
their system supports OSA-ICC they really need to think about spending their 
money more wisely.  I would trust an OSA-ICC a lot more than some old 3274.  
The ICC's are cheap enough that really worried sites can purchase a backup.

If you need to enter the computer room to get or keep your site working, then 
you are doing something wrong.  I'm not saying that you might not need to get 
to the HMC, but if you physically have to go to it to use it, then you have set 
things up badly.

We do have a couple very old sites (who don't have OSA-ICC's) where the backup 
way in is the HMC, and then a dial-up to the HMC in case the network to the HMC 
fails.  One of the banks we support still has local 3274 control units on a 
z800, and they have a phone line attached to a PC in the computer room that is 
wired directly to the 3274 via CUT.  We have never needed to use it, but we 
still test it out once a month.

In my opinion, in the end, it's up to you as the consultant to make sure that 
you can get in if there is a problem.  If you don't set it up right or can't, 
then you're in the wrong business.  This is not meant as a comment on anyone's 
abilities, not everyone is going to know how to set things up for 100% remote 
support without doing some research.  In my case, I helped to design some of 
it, so I'm able to work comfortably with it.

Brian


Brian:
One of there specific episodes we had was that the master console was the only 
one that was “talking”. As to other options you listed the auditors cut them 
off years ago and no use arguing with them (BTDT).
As for HMC remote access again the auditors wouldn’t allow it no matter how 
much we argued (besides I sort of agree with them on the HMC issue).
I won’t go into the old xmas party story I use regularly on here and what could 
happen.

Ed
--
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: EXTERNAL: Re: remote system support (i.e. the data center is 2 states away from you).

2016-09-28 Thread Tony Thigpen

And, I forgot to include remote access to the HMC.

Tony Thigpen

Tony Thigpen wrote on 09/28/2016 04:17 PM:

Our remote systems support staff have multiple remote access to the
consoles:
1) The initial IPL console is on a laptop in the computer room with
Windows 7 PRO. If needed, this box can be remotely accessed using RDP
over a VPN.
2) A backup console is always running on a second laptop with the same
RDP over VPN access.
3) Each sysprog has their own dedicated console which is accessed via
the OSA-C. I connect and keep my personal console running all the time
but minimized.
4) We have one person in town that lives only 5 minutes from the
data-center. We can always call them.
5) There is another company in the same building that manages WinTel
servers. They have access to our data-center and can be called 24/7.

Tony Thigpen

Jerry Whitteridge wrote on 09/28/2016 01:34 PM:

This indicates a weakness in your console deployment - my staff have
remote access to all the consoles they need (including the Master)

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 Edward Gould
Sent: Wednesday, September 28, 2016 9:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: remote system support (i.e. the data center is
2 states away from you).


On Sep 28, 2016, at 12:28 AM, Brian Westerman
<brian_wester...@syzygyinc.com> wrote:

Hi John,

Our company (Syzygy Incorporated) fully supports more than 70 sites
remotely, all over the world.  On top of that we provide partial
support for another 60 to 70 sites.  Some are large (300+MSU) and
some are quite small (8 to 10 MSU), but they all need our expertise
and not being "on-site" has never been an issue.  We also have a
suite of system automation products that we maintain at several
hundred sites.

Even 10 to 12 years ago, it was very unusual to be "at" a site or if
you were physically there, to be anywhere near the actual computer
room.  Once a site realizes that the systems programmer doesn't need
to be in that room, it's only a small jump for them to understand that
you get just as much support from the next floor, or the next
building, or the next city, etc.  I can still remember some knock-down
drag out fights between the systems programmers and the operations
group on whether or not the systems programmers should ever be allowed
into the computer room.  We (systems programmers) always won that
argument, but now I wonder why I fought it for so long. :)

——SNIP———

I will disagree with you on this one. Our data center is on 2 floors
and running upstairs is still needed as consoles (except the master)
is still needed to this day. Just last week all consoles (except the
master) were locked out (TSO was dead as were other possibilities). We
were able to get the system back (and working in good order) by a
combination of operator commands.

Ed

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




--
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: EXTERNAL: Re: remote system support (i.e. the data center is 2 states away from you).

2016-09-28 Thread Tony Thigpen
Our remote systems support staff have multiple remote access to the 
consoles:
1) The initial IPL console is on a laptop in the computer room with 
Windows 7 PRO. If needed, this box can be remotely accessed using RDP 
over a VPN.
2) A backup console is always running on a second laptop with the same 
RDP over VPN access.
3) Each sysprog has their own dedicated console which is accessed via 
the OSA-C. I connect and keep my personal console running all the time 
but minimized.
4) We have one person in town that lives only 5 minutes from the 
data-center. We can always call them.
5) There is another company in the same building that manages WinTel 
servers. They have access to our data-center and can be called 24/7.


Tony Thigpen

Jerry Whitteridge wrote on 09/28/2016 01:34 PM:

This indicates a weakness in your console deployment - my staff have remote 
access to all the consoles they need (including the Master)

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 Edward Gould
Sent: Wednesday, September 28, 2016 9:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: remote system support (i.e. the data center is 2 states 
away from you).


On Sep 28, 2016, at 12:28 AM, Brian Westerman <brian_wester...@syzygyinc.com> 
wrote:

Hi John,

Our company (Syzygy Incorporated) fully supports more than 70 sites remotely, all over 
the world.  On top of that we provide partial support for another 60 to 70 sites.  Some 
are large (300+MSU) and some are quite small (8 to 10 MSU), but they all need our 
expertise and not being "on-site" has never been an issue.  We also have a 
suite of system automation products that we maintain at several hundred sites.

Even 10 to 12 years ago, it was very unusual to be "at" a site or if
you were physically there, to be anywhere near the actual computer
room.  Once a site realizes that the systems programmer doesn't need
to be in that room, it's only a small jump for them to understand that
you get just as much support from the next floor, or the next
building, or the next city, etc.  I can still remember some knock-down
drag out fights between the systems programmers and the operations
group on whether or not the systems programmers should ever be allowed
into the computer room.  We (systems programmers) always won that
argument, but now I wonder why I fought it for so long. :)

——SNIP———

I will disagree with you on this one. Our data center is on 2 floors and 
running upstairs is still needed as consoles (except the master) is still 
needed to this day. Just last week all consoles (except the master) were locked 
out (TSO was dead as were other possibilities). We were able to get the system 
back (and working in good order) by a combination of operator commands.

Ed

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




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


Re: included text from every other reply in a email chain..

2016-08-19 Thread Tony Thigpen
Unfortunately, my company REQUIRES that any replies include everything 
in the past. Too many people were taking things out of context and 
replying to them and CC'ing others. Then the others would then get 
involved because they thought the original poster was in the wrong.


So, the rule came down.

Of course, we also have to top post which is how *any* civilized person 
does things.


Tony Thigpen

David Boyes wrote on 08/19/2016 09:11 AM:

... Personally, I hate bottom-posting, but the
majority here seem to be in favor of it, so I comply. I don't
bottom-post except on listservs.

I go a somewhat different way:  I trim all the material to which I'm not
directly replying, especially .sigs, disclaimers, and legal notices.


:grump.on

THIS.

If you reply, include ONLY the relevant portion of the note you’re replying to. 
It focuses your reply on the important part of what you’re trying to say.

We don’t need to see 11 copies of the required disclaimers, etc. It’s a 
continuation of good behavior (a la Emily Postnews) and saves space and time. 
If you need context, the messages are in the list archives.

:egrump.


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




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


Re: JCL "COMMAND" statements - Follow-up question

2016-05-18 Thread Tony Thigpen

One other question.

Is there a way to wait between multiple commands when using the TSO 
command processor?


I am guessing that I will need to create a small REXX that waits based 
on a parm.


Tony Thigpen

Tony Thigpen wrote on 05/17/2016 08:01 AM:

Thanks.

It turns out that "OC" is part of OPS/MVS, so I now can document the job.

Tony Thigpen

Jeremy Nicoll wrote on 05/17/2016 07:30 AM:

On Tue, 17 May 2016, at 12:19, Tony Thigpen wrote:

OK, dumb question time.

My job is working with some JCL I found in another job:
//STEP01   EXEC PGM=IKJEFT1A,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSTSPRT  DD SYSOUT=*
//SYSTERM  DD SYSOUT=*
//SYSTSOUT DD SYSOUT=*
//SYSTSIN  DD *
   OC C('DS QD,TYPE=ALL,ONLINE')
/*

But, I want to look at the "OC" rexx and I can not find it in any of the
normal libraries that I have been told are used by our jobs.


Wouldn't it be a TSO Command Processor (not a rexx exec), and thus in
SYS1.CMDLIB ?



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




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


Re: JCL "COMMAND" statements - Follow-up question

2016-05-17 Thread Tony Thigpen

Thanks.

It turns out that "OC" is part of OPS/MVS, so I now can document the job.

Tony Thigpen

Jeremy Nicoll wrote on 05/17/2016 07:30 AM:

On Tue, 17 May 2016, at 12:19, Tony Thigpen wrote:

OK, dumb question time.

My job is working with some JCL I found in another job:
//STEP01   EXEC PGM=IKJEFT1A,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSTSPRT  DD SYSOUT=*
//SYSTERM  DD SYSOUT=*
//SYSTSOUT DD SYSOUT=*
//SYSTSIN  DD *
   OC C('DS QD,TYPE=ALL,ONLINE')
/*

But, I want to look at the "OC" rexx and I can not find it in any of the
normal libraries that I have been told are used by our jobs.


Wouldn't it be a TSO Command Processor (not a rexx exec), and thus in
SYS1.CMDLIB ?



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


Re: JCL "COMMAND" statements - Follow-up question

2016-05-17 Thread Tony Thigpen

OK, dumb question time.

My job is working with some JCL I found in another job:
//STEP01   EXEC PGM=IKJEFT1A,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSTSPRT  DD SYSOUT=*
//SYSTERM  DD SYSOUT=*
//SYSTSOUT DD SYSOUT=*
//SYSTSIN  DD *
 OC C('DS QD,TYPE=ALL,ONLINE')
/*

But, I want to look at the "OC" rexx and I can not find it in any of the 
normal libraries that I have been told are used by our jobs.


How do I find 'OC'? (Or, am I looking for the wrong thing?)

Tony Thigpen

Itschak Mugzach wrote on 05/16/2016 03:20 PM:

OK. my version is based on TSO CONSOLE command. It reads command and
verification value from sysin (see rexx test below), execure the command
and verifies that the command response equal to the one read from sysin. it
can be easily modified to read multiple commands and verification strings.
The idea behind the verification is to ensure that the command executed as
expected (file was closed, job was started, etc.). igone the copywrite
statement of course...

Best,
ITschak

/* MugiRexx V1.3 */
ConsoleCommandInterface:
Signal ConsoleCommandInterface.main
ConsoleCommandInterface.Doc:
--
  CCC
 Console Command Confirmation

the program receives input from Parmlib in the format of:
SET CMDTEXT   = 'command'
SET CMDVERIFY = 'value to look in the command response'

> CmdVerify must follow CMDTEXT.
> example:
  set cmdtext   = '+dbr db pge'
  set cmdverify = 'DFS0488I  DBR COMMAND COMPLETED'

Copyright (c) SecuriTeam Software, 1999-2012.  All Rights Reserved
--
ConsoleCommandInterface.Main:
Call ReadParmlib
Call ConsoleCmd
Return
--
ConsoleCmd:
MsgMode = Msg('OFF')
xTrap   = Outtrap('xMsgs.')
"CONSPROF SOLDISP(NO) UNSOLDISP(NO)"
"CONSOLE ACTIVATE NAME(IMS)"
Do i = 1 to K
   CmdText   = CmdBuff.i.Cmd
   CmdVerify = CmdBuff.i.Verify
   "CONSOLE SYSCMD("CmdText") cart(x1938)"
   MsgResp = GetMsg('Msg.','SOL',x1938,,162)
   say 'number of responses from cmd:' msg.0
   do j = 1 to Msg.0
  say 'response from mvs:' msg.j
  If ((Pos(CmdVerify,Msg.j)>0) | (Pos('DFS058I',Msg.j) > 0)) ,
 Then Do
 Say 'STE5006I Command execution confirmed by server.',
'command:' CmdText
 Leave
 End
  End
   If (j > Msg.0) Then Do
  Say 'STE5007E Command execution not confirmed by server.'
  Say 'STE5008W Command text:' CmdText
  Say 'STE500iE Rest of commands not executed!'
  Exit 20
  End
   End
"CONSOLE DEACTIVATE"
Say 'STE5010I Console session completed.'
Return
--
ReadParmlib:
/*  */
/* Parmlib should be pre-allocated by the caller, as the  main  */
/* use of this program is to run under a job step.  */
/*  */
AuthVars   = 'CMDTEXT CMDVERIFY'
FileStatus = ListDsi('PARMLIB FILE')
If (FileStatus > 4) Then Do
   If (sysreason <> 3) Then Do
  Say 'STE5001E Parmlib not allocated in JCL.',
 FileStatus SysReason
  Say 'STE5002I Fix JCL and re-run the job.'
  Exit 20
  End
   End
"ExecIO * DiskR PARMLIB (Stem Parm. finis"
K = 0
Do i = 1 to Parm.0
   parm.i = Substr(Parm.i,1,71)
   xPos = Pos(';',Parm.i)
   If (xPos > 0) Then Do
  parm.i = Substr(Parm.i,1,xPos-1)
  End
   Parse Upper Var Parm.i CmdOpt CmdVar . CmdValue
   If (CmdOpt = 'SET') Then Do
  If (POS(CmdVar,AuthVars) = 0) Then Do
 Say 'STE5003E Variable' CmdVar 'is not defined to Program'
 Say 'STE5004I Please verify PARMLIB syntax.'
 Exit 20
 End
  Interpret CmdVar '=' CmdValue
  If (CmdVar = 'CMDTEXT') Then Do
 CmdFound = 'YES'
 End
  If (CmdVar = 'CMDVERIFY') Then Do
 If (CmdFound Ž= 'YES') Then Do
Say 'STE5006E Sequence error. No command definded for',
   'verification by line' i'.'
exit 20
End
 K = K + 1
 say 'k='k cmdtext
 CmdBuff.k.Cmd= CmdText
 CmdBuff.k.Verify = CmdVerify
 CmdFound = 'NO'
 End
  Say 'STE5005I Variable' CmdVar 'SET TO' Value(CmdVar)'.'
  End
   End
Return


ITschak Mugzach
Z/OS, ISV Products and Application Security & Risk Assessments Professional

On Mon, May 16, 

Re: JCL "COMMAND" statements

2016-05-16 Thread Tony Thigpen
These are 'system' jobs that are running with higher security. Most are 
nightly to stop some regions for nightly processes.


Tony Thigpen

Jeremy Nicoll wrote on 05/16/2016 12:19 PM:

On Mon, 16 May 2016, at 17:03, Itschak Mugzach wrote:

Tony. You may already seen that the //comand1 is not a dd nor exe jcl
card.
It is a jcl command statement and has nothing to do with the job steps.
Jcl
commands and jes /* commands are executed at conversion tome independed
with the job status. They are executed even if the job will never run.

As others explained, u can use tso console command and even verify
response. This way u can use a single jobstep.


Quite a few years ago, we used steps which issued a WTOR asking for
something to be done, and
either - even longer ago - real operators then did it, or more recently
AOC would issue the command
PROVIDED THE JOB ASKING FOR IT WAS ALLOWED TO DO IT and then reply to
the WTOR.

Generally I discouraged people from coding actual commands in the WTOR
text, and made the AOC
code NOT execute the arbitrary contents of the WTOR as a command.  So we
end up with, if you like,
plain text requests "PLEASE DO SOMETHING OR OTHER" and translated them
into the actual
command or commands required.

I can't imagine working in a site that would allow any job to issue any
arbitrary command!



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


Re: JCL "COMMAND" statements

2016-05-16 Thread Tony Thigpen

Thanks all.

After the many suggestions, it 'rang a bell' with something I had worked 
on before:


//STEP01   EXEC PGM=IKJEFT1A,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSTSPRT  DD SYSOUT=*
//SYSTERM  DD SYSOUT=*
//SYSTSOUT DD SYSOUT=*
//SYSTSIN  DD *
 OC C('DS QD,TYPE=ALL,ONLINE')
/*

I have used the same OC exec to make one of my jobs work right.

Tony Thigpen

Nims,Alva John (Al) wrote on 05/16/2016 11:46 AM:

Check CBTTAPE.ORG there might be a couple of them there.

Create a REXX program to interface with TSO "OPERATOR" command or interface 
with SDSF API.
Can check results

IEBGENER to STDRDR, use $VS'' to issue MVS commands.
   Can't check results.

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

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Monday, May 16, 2016 11:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: JCL "COMMAND" statements

I have spent most of my life as a z/VSE and z/VM systems programmer, but during 
the last year, I have been managing a couple of z/OS systems in our small 
outsourcing shop.

At this point, I would consider myself just a very knowledgeable, but still 
novice z/OS systems programmer. So, be gentle with your replies. :-) And, 
please don't laugh.

Last night/this morning, I have stumped because I noticed that some JCL set up 
by a previous systems programmer was not working as it appeared it should. [At 
least, until I read the manual.]

We have many jobs set up something like thus:

//STEP1EXEC PGM=IEFBR14
//COMMD1   COMMAND 'S CICSPTOR'
//WAIT1EXEC PGM=WAITRCAB,PARM='30'   wait 30 seconds
//STEP2EXEC PGM=IEFBR14
//COMMD1   COMMAND 'S CICSPDOR'
//WAIT2EXEC PGM=WAITRCAB,PARM='30'   wait 30 seconds
//STEP3EXEC PGM=IEFBR14
//COMMD1   COMMAND 'S CICSPAOR1'
//COMMD1   COMMAND 'S CICSPAOR2'
//WAIT3EXEC PGM=WAITRCAB,PARM='30'   wait 30 seconds
//*

I, of course, though the commands would be synchronized with the execution JCL. 
But, we were seeing timing errors that could not be corrected by just 
increasing the wait timers. So, I started looking for the problem and found 
that all the commands were being issued to the console before the first IEFBR14 
even executed.

I was totally surprised when I found that IBM documents the COMMAND jcl card as 
being processed during the JCL conversion phase and not during the execution 
phase. *And* that a previous systems programmer must not have known it either.

So, now I have 2 questions for the knowledgeable people on the list:

1) Are there any other jcl statements that are executed outside the normal 
execution phase?

2) What is the 'normal' method to issue console commands synchronized with the 
job execution?

--
Tony Thigpen

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


JCL "COMMAND" statements

2016-05-16 Thread Tony Thigpen
I have spent most of my life as a z/VSE and z/VM systems programmer, but 
during the last year, I have been managing a couple of z/OS systems in 
our small outsourcing shop.


At this point, I would consider myself just a very knowledgeable, but 
still novice z/OS systems programmer. So, be gentle with your replies. :-)

And, please don't laugh.

Last night/this morning, I have stumped because I noticed that some JCL 
set up by a previous systems programmer was not working as it appeared 
it should. [At least, until I read the manual.]


We have many jobs set up something like thus:

//STEP1EXEC PGM=IEFBR14
//COMMD1   COMMAND 'S CICSPTOR'
//WAIT1EXEC PGM=WAITRCAB,PARM='30'   wait 30 seconds
//STEP2EXEC PGM=IEFBR14
//COMMD1   COMMAND 'S CICSPDOR'
//WAIT2EXEC PGM=WAITRCAB,PARM='30'   wait 30 seconds
//STEP3EXEC PGM=IEFBR14
//COMMD1   COMMAND 'S CICSPAOR1'
//COMMD1   COMMAND 'S CICSPAOR2'
//WAIT3EXEC PGM=WAITRCAB,PARM='30'   wait 30 seconds
//*

I, of course, though the commands would be synchronized with the 
execution JCL. But, we were seeing timing errors that could not be 
corrected by just increasing the wait timers. So, I started looking for 
the problem and found that all the commands were being issued to the 
console before the first IEFBR14 even executed.


I was totally surprised when I found that IBM documents the COMMAND jcl 
card as being processed during the JCL conversion phase and not during 
the execution phase. *And* that a previous systems programmer must not 
have known it either.


So, now I have 2 questions for the knowledgeable people on the list:

1) Are there any other jcl statements that are executed outside the 
normal execution phase?


2) What is the 'normal' method to issue console commands synchronized 
with the job execution?


--
Tony Thigpen

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


Re: 1620 veterans! [was:RE: What was a 3314?]

2016-05-16 Thread Tony Thigpen

"sensible students"

*OXYMORON*

Tony Thigpen

Farley, Peter x23353 wrote on 05/16/2016 10:48 AM:

You too?  Hey, this is a small world indeed.  You didn't happen to attend a 
certain engineering college (now gone, sad to say) in Brooklyn, NY in the late 
1960's, did you?

At one point I was addicted to beating 3D TicTacToe using the 1620 console late 
nights when all sensible students were sleeping . . .

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Monday, May 16, 2016 10:20 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: What was a 3314? (was: Whither VIO)

On Mon, May 16, 2016 at 9:09 AM, R.S. <r.skoru...@bremultibank.com.pl>
wrote:


W dniu 2016-05-16 o 16:01, Jerry Callen pisze:


In the "Whither VIO" thread, J.O.Skip Robinson wrote:

   In a previous life, we defined VIO (I believe) to device 3314 even

though we had none left on the floor


That's a device type I've never heard of, and the Google knows not of.
Could this be a typo for "2314"?


IMHO anything older than 3380 is prehistory or a myth ;-)



​Hum, I had a 1316 disk volume (dismountable like )​ when I was in college. It was 
used in the 1311 disk storage unit, attached to a 1620 computer. I loved that machine. A 
kind of "personal computer" for running FORTRAN II programs.

--


This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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




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


Re: can a program determine the capacity setting of a z-box?

2016-04-26 Thread Tony Thigpen
Yep. I can get there. Getting in and out of supervisor state is common 
in my code.


Tony Thigpen

Greg Dyck wrote on 04/26/2016 01:13 PM:

Tony,
If you can get into supervisor state, use the STSI instruction.

Under z/OS the CSRSI service uses STSI to provide the data that it
returns to problem program state requestors.  I don't know if VSE
provides any equivalent service.
Greg

On 4/25/2016 10:55 AM, Tony Thigpen wrote:

Is there a way for a program to check the capacity setting for a
processor? For instance, are we running on a A01 or a w04, etc.
processor?


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


<    1   2   3   4   5   6   >