Re: Command program from the cbt

2009-07-07 Thread Brian Westerman
Hi Ken,

The doc is all available on the company web site www.SyzygyInc.com or
www.SyzygyInc.net.  The product you have/want is now called SyzCMDZ (was
Command and then Command/z), and you can download the user guide from there
as well. (on the left side of the page).

Your version must be at least 4 or 5 years old, there have been a lot of
changes and improvements since then, (IF nesting, Pause, more WAITs, more
IF's).  The nice thing about it is that your old scripts can run unchanged
(but there are a lot of new features that you might still want to use).

The new version in beta will allow you to create a virtual console and
read all of the responses back from the commands that you issue so that you
can set up the script to work interactively.  It opens up a whole new world
of automation.

If you decide to buy it, don't forget to remind them that you are a member
of IBMMAIN so that you get the discount.

Brian Westerman

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Command program from the cbt

2009-07-07 Thread Brian Westerman
It is a very handy utility.

the more expensive utilities like Zeke/Zakk, AutoOps, etc. are quite nice as
well, but the expense is very high for what they are providing.  

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: RACF AUDITOR authority and OMVS segment

2009-07-07 Thread Mark Wilson
Lucy,

Do you have any profiles in the RACF FIELD class that are limiting access?

Do a SR CLASS(FIELD) NOMASK and see what profiles you have.Look for a
profile prefixed USER., then do an RL FIELD profile_name and see if the
auditor has access.

Mark



On 07/07/2009 02:45, Lucymarie Ruth lucymarie.r...@safeway.com wrote:

 Hi.  The z/OS V1R10.0 RACF Security Server RACF Administrator's
 Guide says that The user who has the AUDITOR attribute can list all
 of the profile information that is available to the SPECIAL user, as well
 as information that is available to auditors.  In table 40 in the same
 manual,  it says that a userid with AUDITOR authority can also specify
 all operands of the RACF LISTUSER command.
 
 However,  one of our user's with AUDITOR authority received a
 message that she did not authority to view an OMVS segment when
 issueing this:
 
 LU  user-id  NORACF OMVS
 
 
 Is this a bug, a feature, or just an anomaly that needs to be explained?
 
 Anyone else noticed this?
 
 
 Lucymarie Ruth,  Safeway,  Inc.
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Data class with expiration date doesn't work

2009-07-07 Thread Vernooij, CP - SPLXM
I never used expdt/retpd of the dataclass. I think they set the EXPDT in
the F1 dscb, which historically caused problems when you update a
non-expired datasets.
In the Mgmtclas there is a RET LIMIT parameter that limits the EXPDT of
the JCL or the Dataclass. Maybe this blocks your retpd=20?

Kees.

Tommy Tsui tommyt...@gmail.com wrote in message
news:152969820907060743i1ba85e41je8f70a72a9b0e...@mail.gmail.com...
 so why we needs the data class for expiration date and what is it used
 for ? I have some confused about the data class and management class
 expiration date
 
 On Mon, Jul 6, 2009 at 7:25 PM, Vernooij, CP -
 SPLXMkees.vern...@klm.com wrote:
 
 
  Tommy Tsui tommyt...@gmail.com wrote in message
 
news:152969820907060343l763557e0xe4e70f9d65c38...@mail.gmail.com...
  Hi all,,
 
  How comes I activated the data class with expiration date = 20, but
  the expiration date desn't work when I allocated a new dataset? The
  new dataset is assigned to a correct
  data class with expiration date = 20, but the expiration field
still
  shows NONE???
 
 
  thousand thanks
 
  Tommy,
 
  1. SMS expiration dates / retention periods are a function of the
  Managemnt class, not the Data class.
  2. The expdt in the dataset is a different item, which is not
controlled
  by the SMS expdt/retpd.
 
  Kees.
 
**
  For information, services and offers, please visit our web site:
  http://www.klm.com. This e-mail and any attachment may contain
  confidential and privileged material intended for the addressee
  only. If you are not the addressee, you are notified that no part
  of the e-mail or any attachment may be disclosed, copied or
  distributed, and that any other action related to this e-mail or
  attachment is strictly prohibited, and may be unlawful. If you have
  received this e-mail by error, please notify the sender immediately
  by return e-mail, and delete this message.
 
  Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries
  and/or its employees shall not be liable for the incorrect or
  incomplete transmission of this e-mail or any attachments, nor
  responsible for any delay in receipt.
  Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal
  Dutch Airlines) is registered in Amstelveen, The Netherlands, with
  registered number 33014286
 
**
 
 
--
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@bama.ua.edu with the message: GET IBM-MAIN
INFO
  Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
**
For information, services and offers, please visit our web site:
http://www.klm.com. This e-mail and any attachment may contain
confidential and privileged material intended for the addressee
only. If you are not the addressee, you are notified that no part
of the e-mail or any attachment may be disclosed, copied or
distributed, and that any other action related to this e-mail or
attachment is strictly prohibited, and may be unlawful. If you have
received this e-mail by error, please notify the sender immediately
by return e-mail, and delete this message. 

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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TS7740 media types

2009-07-07 Thread Vernooij, CP - SPLXM


pauls2...@yahoo.com wrote in message 
news:f9281777-a544-4af0-8f4d-580cef7a8...@12g2000pri.googlegroups.com...
On Jul 2, 10:28 am, Bruce McKnight mcknight-...@excite.com wrote:
 Greetings all,

 Does a TS7740 VE support 3590 as a virtual tape capacity?  We would
 like to make our DFHSM MIGRAT2 tapes go to virtual instead of real.

 The references we could find in the doc indicate that 3490e was the
 biggest tape that can be virtualized.

The tape emulated is a 3490E but you can set the cartridge emulation
of the tape to 800MB instead of 400MB in the VTS.
--

You can set it to a maximum size of 4 GB.

Kees.

Ps.: this newsgroup is a mirror of a list-server, where most IBM-MAIN users 
reside and read the postings. You won't get much response when posting to the 
newsgroup. See the attached info below.
**
For information, services and offers, please visit our web site:
http://www.klm.com. This e-mail and any attachment may contain
confidential and privileged material intended for the addressee
only. If you are not the addressee, you are notified that no part
of the e-mail or any attachment may be disclosed, copied or
distributed, and that any other action related to this e-mail or
attachment is strictly prohibited, and may be unlawful. If you have
received this e-mail by error, please notify the sender immediately
by return e-mail, and delete this message. 

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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Left Right Scrolling in ISPF

2009-07-07 Thread Mike Wood
Ray, As others have mentioned, the ISPF command table helps support 
scrolling left and right via use of PASSTHRU. However, you really, I think, 
need 
to use a variable. The variable is initially set to SETVERB and only when you 
want to support scrolling left/right, set it to PASSTHRU. See this ISPF book 
http://publibz.boulder.ibm.com/cgi-
bin/bookmgr_OS390/BOOKS/ispzu270/5.10.1?
ACTION=MATCHESREQUEST=PASSTHRUTYPE=FUZZYSHELF=EZ2ZBK0G.bks
DT=20080613002317CASE=searchTopic=TOPICsearchText=TEXTsearchI
ndex=INDEXrank=RANKScrollTOP=FIRSTHIT#FIRSTHIT

RMM uses this technique.

Mike Wood   RMM Development

On Mon, 6 Jul 2009 14:31:24 -0400, Baraniecki, Ray 
ray.baranie...@morganstanley.com wrote:

About two years ago with the help of a very smart IBMer I wrote an ISPF 
application that allowed for Left and Right scrolling when displaying table 
entries. Now I look at the Rexx code and it seems like an alien wrote this 
code. I cannot recall what had to be done to get horizontal scrolling to work. 
I 
need to make some changes to this Rexx and I got curious.

I recall that I had to set up something to pass through the PF10 (Left) and 
PF11 (Right) to my program. Although, at this time I cannot recall, can 
someone enlighten me?


Thanks,


Ray Baraniecki
Morgan Stanley Smith Barney

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


How to analyze/monitor VLF

2009-07-07 Thread Jochen Roehrig
Hello,

any idea how best to monitor/analyze VLF's implementation. Obviously there
is no MVS DISPLAY command available. I am mostly interested in the managed
CLASS NAME(IKJEXEC) and its hit rate.

Thanks in advance
Jochen

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to analyze/monitor VLF

2009-07-07 Thread David Stephens
VLF statistics are recorded in SMF Type 41 (subtype 3) records every 15 
minutes. So SAS/MXG or something similar will get you the answers you're 
looking for.


If that's too hard, you could dump the VLF address space, and use IPCS 
to look at the RETRIEVE statistics using the VLFDATA command. Have a 
look at Chapter 28 in the z/OS Diagnosis Reference.


David Stephens
Lead Systems Programmer
d...@longpelaexpertise.com.au
www.longpelaexpertise.com.au 
http://www.longpelaexpertise.com.au/images/logo.gif

Ph. 0404 757 821 (from Australia)

(Longpela Expertise Logo)
Longpela Expertise - zSeries Mainframe Consultants
Read new expert Mainframe articles every quarter in our LongEx Mainframe 
Quarterly http://www.longpelaexpertise.com.au/ezine




Jochen Roehrig wrote:

Hello,

any idea how best to monitor/analyze VLF's implementation. Obviously there
is no MVS DISPLAY command available. I am mostly interested in the managed
CLASS NAME(IKJEXEC) and its hit rate.

Thanks in advance
Jochen

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


  


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Delete all members of a PDS with JCL

2009-07-07 Thread CUNY Yann
Hi all, 

 

I would like to delete all members of a PDS with JCL but  I don't want to 
specify the members names. (The job will be submitted every day : I don't know 
the members names and how much members are in this PDS).

 

I don't want to use REXX even if it's easier.

 

Regards.

 

Cordialement, 

 

Yann Cuny

Groupe GENERALI

Industrialisation et Gestion des Environnements

* 01 58 34 12 64

* yc...@externe.generali.fr

P Pensez « environnement », n'imprimez ce mail que si cela est nécessaire...

 

 

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: RACF AUDITOR authority and OMVS segment

2009-07-07 Thread Robert S. Hansel (RSH)
Lucymarie,

Does this user have System-level AUDITOR authority or Group-level AUDITOR
authority? If you execute an LU command on her ID and AUDITOR appears in
the first couple of lines associated with ATTRIBUTES, she has System-level
AUDITOR and should be able to execute the command. If instead you see
AUDITOR associated with CONNECT ATTRIBUTES in one or more of her group
connections, she only has Group-level authority and will not be allowed to
examine segments unless she is given FIELD class profile permissions. To
allow her examine OMVS segment information, you might need to define a
profile like USER.OMVS.* in the FIELD class and give her READ access. You'll
first need to review any other profiles you may have defined in the FIELD
class to determine what is appropriate. Bear in mind that this would enable
her to list the OMVS segments of all users, not just those within her
otherwise limited scope of groups.

BTW, if you happen to know Juanita Dean, Jenny Kwok, or Cindy Skeim on the
security staff, please give them my regards.

Regards, Bob

-
Robert S. Hansel   | 2009 RACF Training
Lead RACF Specialist   |  Intro  Basic Admin - Boston - SEPT 22-24
RSH Consulting, Inc.   |  Audit for Results   - Boston - NOV 3-5
www.rshconsulting.com  | Visit our website for registration  details
617-969-8211   |
-


-Original Message-
Date:Mon, 6 Jul 2009 20:41:23 -0500
From:Lucymarie Ruth lucymarie.r...@safeway.com
Subject: RACF AUDITOR authority and OMVS segment

Hi.  The z/OS V1R10.0 RACF Security Server RACF Administrator's
Guide says that The user who has the AUDITOR attribute can list all
of the profile information that is available to the SPECIAL user, as well
as information that is available to auditors.  In table 40 in the same
manual,  it says that a userid with AUDITOR authority can also specify
all operands of the RACF LISTUSER command.

However,  one of our user's with AUDITOR authority received a
message that she did not authority to view an OMVS segment when
issueing this:

LU  user-id  NORACF OMVS


Is this a bug, a feature, or just an anomaly that needs to be explained?

Anyone else noticed this?


Lucymarie Ruth,  Safeway,  Inc.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Question about REUS=NONE

2009-07-07 Thread Michael Knigge

All,

once upon the time, we had to write an application (in VS COBOL II) that
 uses subtasks.

Because this old COBOL release did not support subtasks, we did a trick:
We've attached from an ASM driver a little ASM stub that did just one
thing: call the wanted COBOL prog.

We had to link all COBOL-Modules statically to get all this stuff
working. The COBOL progs are also using some ASM Subs for some special
things (i. e. doing a GETMAIN, FREEMAIN, STIMERM and so on). They are
also statically linked. So the initial ATTACH attaches a really big thing...


Now we are just about 13 years later and I have to convert this
application. We want to use Enterprise COBOL and dynamic CALLs.


Now. I guess all the COBOL-Stuff will work pretty well (I guess that
the WOKING-STORAGE gets getmained for every new copy of the COBOL-Prog
within each subtask).

But I wonder how to migrate the ASM-Subs nearly painless I could
rewrite all this ASM-Subs and use dynamic Saveareas but I wonder if just
using REUS=NONE would do the same job...

So bring it to a question: What is the scope of the REUS-Option?
(Sub)Task-Level? Then using REUS=NONE would bring up a new copy of the
ASM-Stubs for every Subtask - just what I need I don't care for the
wasted memory because the ASM-Subs are mostly rather small (and well,
today they are all statically linked together with some really big
COBOL-Subs)


Thank you for hints


Bye,
Michael



--
Mit freundlichen Grüßen

Michael Knigge
Entwicklung


S.E.T. Software GmbH
Lister Straße 15
30163 Hannover

Tel.  +49 511/3 97 80-23
Fax   +49 511/3 97 80-65
michael.kni...@set-software.de

Handelsregister: HRB52778 Amtsgericht Hannover
Geschäftsführer: Till Dammermann, Klaus Stöhr

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Beesley, Paul
We use a program called PDSCLEAR which I think I got from the CBT site 


Regards
Paul 

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
CUNY Yann
Sent: 07 July 2009 11:07
To: IBM-MAIN@bama.ua.edu
Subject: Delete all members of a PDS with JCL

Hi all, 

 

I would like to delete all members of a PDS with JCL but  I don't want to 
specify the members names. (The job will be submitted every day : I don't know 
the members names and how much members are in this PDS).

 

I don't want to use REXX even if it's easier.

 

Regards.

 

Cordialement, 

 

Yann Cuny

Groupe GENERALI

Industrialisation et Gestion des Environnements

* 01 58 34 12 64

* yc...@externe.generali.fr

P Pensez « environnement », n'imprimez ce mail que si cela est nécessaire...

 

 

 


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at 
http://bama.ua.edu/archives/ibm-main.html


___

Atos Origin and Atos Consulting are trading names used by the Atos Origin 
group.  The following trading entities are registered in England and Wales:  
Atos Origin IT Services UK Limited (registered number 01245534) and Atos 
Consulting Limited (registered number 04312380).  The registered office for 
each is at 4 Triton Square, Regents Place, London, NW1 3HG.The VAT No. for each 
is: GB232327983

This e-mail and the documents attached are confidential and intended solely for 
the addressee, and may contain confidential or privileged information.  If you 
receive this e-mail in error, you are not authorised to copy, disclose, use or 
retain it.  Please notify the sender immediately and delete this email from 
your systems.   As emails may be intercepted, amended or lost, they are not 
secure.  Atos Origin therefore can accept no liability for any errors or their 
content.  Although Atos Origin endeavours to maintain a virus-free network, we 
do not warrant that this transmission is virus-free and can accept no liability 
for any damages resulting from any virus transmitted.   The risks are deemed to 
be accepted by everyone who communicates with Atos Origin by email. 
___

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Binyamin Dissen
On Tue, 7 Jul 2009 12:06:55 +0200 CUNY Yann yc...@externe.generali.fr wrote:

:I would like to delete all members of a PDS with JCL but  I don't want to 
specify the members names. (The job will be submitted every day : I don't know 
the members names and how much members are in this PDS).

There is no way to delete a PDS member via pure JCL.

//   DD DSN=PDS(MEMBER),DISP=(OLD,DELETE)

will delete the entire PDS, not just the specified member. 

:I don't want to use REXX even if it's easier.

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

Director, Dissen Software, Bar  Grill - Israel


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

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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Stocker, Herman
Delete and define the data set. 

Regards, 
Herman Stocker 

Snip
I would like to delete all members of a PDS with JCL but  I don't want to
specify the members names. (The job will be submitted every day : I don't
know the members names and how much members are in this PDS).

I don't want to use REXX even if it's easier.
/Snip
 


The sender believes that this E-mail and any attachments were free of any
virus, worm, Trojan horse, and/or malicious code when sent. This message and
its attachments could have been infected during transmission. By reading the
message and opening any attachments, the recipient accepts full
responsibility for taking protective and remedial action about viruses and
other defects. The sender's employer is not liable for any loss or damage
arising in any way from this message or its attachments.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Vernooij, CP - SPLXM
With SAS: PROC PDS;

Kees.

CUNY Yann yc...@externe.generali.fr wrote in message 
news:d1486524d2677a4fa8a3ae049a70f0950336b...@evs2.groupe.generali.fr...
 Hi all, 
 
  
 
 I would like to delete all members of a PDS with JCL but  I don't want to 
 specify the members names. (The job will be submitted every day : I don't 
 know the members names and how much members are in this PDS).
 
  
 
 I don't want to use REXX even if it's easier.
 
  
 
 Regards.
 
  
 
 Cordialement, 
 
  
 
 Yann Cuny
 
 Groupe GENERALI
 
 Industrialisation et Gestion des Environnements
 
 * 01 58 34 12 64
 
 * yc...@externe.generali.fr
 
 P Pensez « environnement », n'imprimez ce mail que si cela est nécessaire...
 
  
 
  
 
  
 
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
**
For information, services and offers, please visit our web site:
http://www.klm.com. This e-mail and any attachment may contain
confidential and privileged material intended for the addressee
only. If you are not the addressee, you are notified that no part
of the e-mail or any attachment may be disclosed, copied or
distributed, and that any other action related to this e-mail or
attachment is strictly prohibited, and may be unlawful. If you have
received this e-mail by error, please notify the sender immediately
by return e-mail, and delete this message. 

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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread John P Kalinich
With the PDS command,

//TSO  EXEC  PGM=IKJEFT01
//SYSTSPRT DD  SYSOUT=*
//SYSTSIN  DD  *
pds 'your.pds.name'
fixpds stowinit

Regards,
John K

IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 07/07/2009
05:06:55 AM:

 CUNY Yann yc...@externe.generali.fr
 Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu

 07/07/2009 05:06 AM

 Please respond to
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu

 I would like to delete all members of a PDS with JCL but  I don't
 want to specify the members names. (The job will be submitted every
 day : I don't know the members names and how much members are in this
PDS).

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Left Right Scrolling in ISPF

2009-07-07 Thread John P Kalinich
The PDS command uses variables for table scrolling.  It sets them to
PASSTHRU before table displays and immediately resets them to blank after
the display.

Regards,
John K

 VERB  T  ACTION
 DESCRIPTION

 LEFT  0  USRLEFT
 USER CONTROLLED VARIABLE FOR LEFT
 LEFT  0  SETVERB
 SCROLL LEFT
 RIGHT 0  USRRIGHT
 USER CONTROLLED VARIABLE FOR RIGHT
 RIGHT 0  SETVERB
 SCROLL RIGHT


IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 07/07/2009
02:48:50 AM:

 Mike Wood mikew_w...@uk.ibm.com

 Ray, As others have mentioned, the ISPF command table helps support
 scrolling left and right via use of PASSTHRU. However, you really, I
 think, need
 to use a variable. The variable is initially set to SETVERB and onlywhen
you
 want to support scrolling left/right, set it to PASSTHRU. See this ISPF
book
 http://publibz.boulder.ibm.com/cgi-
 bin/bookmgr_OS390/BOOKS/ispzu270/5.10.1?
 ACTION=MATCHESREQUEST=PASSTHRUTYPE=FUZZYSHELF=EZ2ZBK0G.bks
 DT=20080613002317CASE=searchTopic=TOPICsearchText=TEXTsearchI
 ndex=INDEXrank=RANKScrollTOP=FIRSTHIT#FIRSTHIT

 RMM uses this technique.

 Mike Wood   RMM Development

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Left Right Scrolling in ISPF

2009-07-07 Thread Baraniecki, Ray
Mike;

Thanks for responding, I now understand how it works. I found the NEWAPPL 
command table with the LEFT  RIGHT with PASSTHRU.

Thanks, 
 
Ray Baraniecki 
Morgan Stanley Smith Barney
18th Floor 
1 New York Plaza 
New York, NY 10004 
Office - 212-276-5641
   Cell - 917-597-5692 
ray.baranie...@morganstanley.com  
BE CARBON CONSCIOUS. PLEASE CONSIDER OUR ENVIRONMENT BEFORE PRINTING THIS 
E-MAIL.

-Original Message-
From: Mike Wood [mailto:mikew_w...@uk.ibm.com] 
Sent: Tuesday, July 07, 2009 3:49 AM
To: IBM-MAIN@bama.ua.edu; Baraniecki, Ray (M/F INFRASTRUCTURE)
Subject: Re: Left  Right Scrolling in ISPF

Ray, As others have mentioned, the ISPF command table helps support 
scrolling left and right via use of PASSTHRU. However, you really, I think, 
need 
to use a variable. The variable is initially set to SETVERB and only when you 
want to support scrolling left/right, set it to PASSTHRU. See this ISPF book 
http://publibz.boulder.ibm.com/cgi-
bin/bookmgr_OS390/BOOKS/ispzu270/5.10.1?
ACTION=MATCHESREQUEST=PASSTHRUTYPE=FUZZYSHELF=EZ2ZBK0G.bks
DT=20080613002317CASE=searchTopic=TOPICsearchText=TEXTsearchI
ndex=INDEXrank=RANKScrollTOP=FIRSTHIT#FIRSTHIT

RMM uses this technique.

Mike Wood   RMM Development

On Mon, 6 Jul 2009 14:31:24 -0400, Baraniecki, Ray 
ray.baranie...@morganstanley.com wrote:

About two years ago with the help of a very smart IBMer I wrote an ISPF 
application that allowed for Left and Right scrolling when displaying table 
entries. Now I look at the Rexx code and it seems like an alien wrote this 
code. I cannot recall what had to be done to get horizontal scrolling to work. 
I 
need to make some changes to this Rexx and I got curious.

I recall that I had to set up something to pass through the PF10 (Left) and 
PF11 (Right) to my program. Although, at this time I cannot recall, can 
someone enlighten me?


Thanks,


Ray Baraniecki
Morgan Stanley Smith Barney


--
Important Notice to Recipients:
It is important that you do not use e-mail to request, authorize or effect the 
purchase or sale of any security or commodity, to send fund transfer 
instructions, or to effect any other transactions. Any such request, orders, or 
instructions that you send will not be accepted and will not be processed by 
Morgan Stanley Smith Barney.
The Global Wealth Management Group of Morgan Stanley  Co. Incorporated and the 
Smith Barney division of Citigroup Global Markets Inc. have combined into 
Morgan Stanley Smith Barney LLC, a new investment adviser and broker-dealer 
registered with the Securities and Exchange Commission. The sender of this 
email is an employee of Morgan Stanley Smith Barney. 
 
Important disclosures on Morgan Stanley and Citi Investment Research  Analysis 
research reports may relate in part to the separate businesses of Citigroup 
Global Markets Inc. and Morgan Stanley that now form Morgan Stanley Smith 
Barney LLC. To view these important research disclosures, go to 
http://www.morganstanley.com/researchdisclosures and 
https://www.citigroupgeo.com/geopublic/Disclosures/index_a.html.
 
If received in error, please destroy and notify sender. Sender does not intend 
to waive confidentiality or privilege. Use of this email is prohibited when 
received in error. We may monitor and store emails to the extent permitted by 
applicable law.
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to analyze/monitor VLF

2009-07-07 Thread Mark Zelden
On Tue, 7 Jul 2009 04:27:43 -0500, Jochen Roehrig
jochen.roeh...@baloise.ch wrote:

Hello,

any idea how best to monitor/analyze VLF's implementation. Obviously there
is no MVS DISPLAY command available. I am mostly interested in the managed
CLASS NAME(IKJEXEC) and its hit rate.



The data is in the SMF 41 records.  If you have MXG (and SAS) it's as
simple as this:


%INCLUDE SOURCLIB(TYPE41); 
RUN;

PROC SORT NODUP DATA=TYPE41VF OUT=T41;  
  BY SYSTEM SMF41CLS SMFTIME;   
PROC PRINT LABEL SPLIT='*'; 
  VAR SMFTIME SYSTEM   SMF41LRG SMF41MVT SMF41USD   
  SMF41ADD SMF41DEL SMF41TRM VLFHITPC;  
  BY SYSTEM SMF41CLS;   
  ID SMF41CLS;  
  FORMAT SMFTIME DATETIME18.;   
  TITLE 'VITUAL LOOKASIDE FACILITY';
  TITLE2 'AS REDUCED FROM SMF TYPE41';  
  FOOTNOTE 'ZELDEN-(MXG41VLF)'; 


--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:mark.zel...@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Mark Zelden
On Tue, 7 Jul 2009 06:41:53 -0500, John P Kalinich jkali...@csc.com wrote:

With the PDS command,

//TSO  EXEC  PGM=IKJEFT01
//SYSTSPRT DD  SYSOUT=*
//SYSTSIN  DD  *
pds 'your.pds.name'
fixpds stowinit



I've always used:

//TSO  EXEC  PGM=IKJEFT01
//SYSTSPRT DD  SYSOUT=*
//SYSTSIN  DD  *
pds 'your.pds.name'
fix reset


What level did stowinit come in at?  I'm 8.6.08 still.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:mark.zel...@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html


Mark

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Alert and Resolve price changes

2009-07-07 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Guy Gardoit
 Sent: Monday, July 06, 2009 5:07 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Alert and Resolve price changes
 
 Completely agree.No one does it better and no vendor 
 uses the Internet
 for release and service delivery better than IBM - at least 
 none that I've
 found in over 30 years.  It's just plain foolish to think otherwise.
 
 /rant
 Personnaly, I'm glad the green screen IBMLINK is gone - 
 old-fashioned and
 doesn't do a quarter of what the Web IBMLINK can do.   Plus, 
 on another
 support note, ShopzSeries is brilliant in organizing and 
 delivering such a
 wide aray of products and options.  

Very much agreed! I get my RSUs via ShopzSeries and it is almost brain-dead 
simple!

 I guess some people out 
 there would
 rather (and probably do) get their products and maintenance 
 via tapes and
 order hard-copy manuals!!  Unreal.

Oh, you know the others in my group? I have one guy who, quite literally, 
downloads PDFs, then prints them locally. Now, part I can understand. You can't 
write margin notes in a PDF. Well, ..., I can if I put the PDF on my Kindle!

 In reading all the complaints about USS, WLM initiators and 
 other items that
 perhaps aren't very well understood by the complainers, IBM 
 just can't win
 with some folks

My main problem with z/UNIX (which I now use to avoid the USS is not the right 
acronym! people) is simply that the bundled utilities (sed, awk, grep, ...) 
appear to do little more than what is demanded to be POSIX compliant. I use the 
GNU versions on Linux and the z/UNIX are pure junk compared to them. Of course, 
the others in my group still hate any mention of z/UNIX. Discouraging because 
there is some groovy stuff in there.

 /unrant


--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread John P Kalinich
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 07/07/2009
07:33:38 AM:
 Mark Zelden mark.zel...@zurichna.com

 What level did (fixpds) stowinit come in at?  I'm 8.6.08 still.

This is in PDS 8.6.09, but update 10 is available on the CBT updates page.
The STOWINIT option was added for regular PDS datasets.  It uses the STOW
STOWDCB,,I macro which is also used for PDSE's.

Regards,
John K

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Question about REUS=NONE

2009-07-07 Thread Thompson, Steve
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Michael Knigge
Sent: Tuesday, July 07, 2009 5:13 AM
To: IBM-MAIN@bama.ua.edu
Subject: Question about REUS=NONE

SNIPPAGE

But I wonder how to migrate the ASM-Subs nearly painless I could
rewrite all this ASM-Subs and use dynamic Saveareas but I wonder if just
using REUS=NONE would do the same job...

So bring it to a question: What is the scope of the REUS-Option?
(Sub)Task-Level? Then using REUS=NONE would bring up a new copy of the
ASM-Stubs for every Subtask - just what I need I don't care for the
wasted memory because the ASM-Subs are mostly rather small (and well,
today they are all statically linked together with some really big
COBOL-Subs)
SNIPPAGE

FIRST: what I am about to say applies to the address space, not just to
a specific subtask. The LOAD of a module affects the whole address
space, not just a subtask.

REUSE=NONE means that every time you issue LOAD you will get a new copy.
So if you do multiple LOADs, you will get as many copies as you have
issued LOAD for. This will result in BTL (Below The Line) storage
creep because of the system control blocks that are built in LSQA,
which means that you might take a short on storage ABEND if you are not
also issuing DELETE for the module.

IF you use REUSE, or RENT, AND the ASM stubs are actually ReENTrant, you
MAY care if you are not also issuing DELETE, because only one copy
will get loaded, but each subsequent LOAD will result in the use count
being incremented by 1 (DELETE decrements by 1). When the count rolls
over, you will ABEND. If you do LINK with REUSE or RENT and those stubs
are not actually Reentrant (or effect serial reusability), results will
probably be unpredictable -- the assumption being that the DSA within
the program is YOUR DSA (your return registers), but meanwhile, your
task has not been dispatched while another has, so that when you start
dispatching again, where you return to...

I hope this answers your questions.

Regards,
Steve Thompson

-- Opinions expressed by this poster may not reflect those held by
poster's employer. --

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: RACF AUDITOR authority and OMVS segment

2009-07-07 Thread Hayim Sokolsky
Lucymarie,

RACF questions are always best asked on the RACF-L. That is the forum for 
RACF related questions.

Now to your specific question... Auditor (system level or group level) 
gives the user the ability to list any RACF base segment within scope. 
What it does not do is give the ability to view segments (OMVS, TSO, CICS, 
etc...) outside the base.

To give your auditor the ability to list the content of the TSO segment, 
you would need to define FIELD USER.TSO.*, and permit them to the resource 
with READ. Sample commands (assumes  you've never used FIELD):

SETROPTS GENERIC(FIELD) GENCMD(FIELD)
RDEF FIELD USER.TSO.* UACC(NONE) OWNER( specify an owner here )
/* let users see their own TSO segment */
  PE USER.TSO.* ID(RACUID) ACCESS(READ) 
/* let group AUDITORS view all users TSO segments */
  PE USER.TSO.* ID(AUDITORS) ACCESS(READ) 

SETROPTS CLASSACT(FIELD) RACLIST(FIELD)




Hayim
_
Hayim Sokolsky, CISSP
Mainframe Security Architect
DTCC Corporate Information Security
18301 Bermuda Green Dr, MS 1-CIS
Tampa FL 33647-1760

Tel. (813) 470-2177



Lucymarie Ruth lucymarie.r...@safeway.com 
Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
2009.07.06 21:41
Please respond to
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu


To
IBM-MAIN@bama.ua.edu
cc

Subject
RACF AUDITOR authority and OMVS segment






Hi.  The z/OS V1R10.0 RACF Security Server RACF Administrator's 
Guide says that The user who has the AUDITOR attribute can list all 
of the profile information that is available to the SPECIAL user, as well 
as information that is available to auditors.  In table 40 in the same 
manual,  it says that a userid with AUDITOR authority can also specify 
all operands of the RACF LISTUSER command.

However,  one of our user's with AUDITOR authority received a 
message that she did not authority to view an OMVS segment when 
issueing this:

LU  user-id  NORACF OMVS


Is this a bug, a feature, or just an anomaly that needs to be explained?

Anyone else noticed this?


Lucymarie Ruth,  Safeway,  Inc.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html





DTCC DISCLAIMER: This email and any files transmitted with it are
confidential and intended solely for the use of the individual or
entity to whom they are addressed. If you have received this email
in error, please notify us immediately and delete the email and any
attachments from your system. The recipient should check this email
and any attachments for the presence of viruses.  The company
accepts no liability for any damage caused by any virus transmitted
by this email.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: RACF AUDITOR authority and OMVS segment

2009-07-07 Thread Hayim Sokolsky
Lucymarie,

RACF questions are always best asked on the RACF-L. That is the forum for 
RACF related questions.

(Sorry got distracted and posted stuff for TSO segment instead of OMVS 
segment.)

Now to your specific question... Auditor (system level or group level) 
gives the user the ability to list any RACF base segment within scope. 
What it does not do is give the ability to view segments (OMVS, TSO, CICS, 
etc...) outside the base.

To give your auditor the ability to list the content of the OMVS segment, 
you would need to define FIELD USER.OMVS.*, and permit them to the 
resource with READ. Sample commands (assumes  you've never used FIELD):

SETROPTS GENERIC(FIELD) GENCMD(FIELD)
RDEF FIELD USER.OMVS.* UACC(NONE) OWNER( specify an owner here )
/* let users see their own OMVS segment */
  PE USER.OMVS.* ID(RACUID) ACCESS(READ) 
/* let group AUDITORS view all users OMVS segments */
  PE USER.OMVS.* ID(AUDITORS) ACCESS(READ) 

SETROPTS CLASSACT(FIELD) RACLIST(FIELD)




Hayim
_
Hayim Sokolsky, CISSP
Mainframe Security Architect
DTCC Corporate Information Security
18301 Bermuda Green Dr, MS 1-CIS
Tampa FL 33647-1760

Tel. (813) 470-2177



Lucymarie Ruth lucymarie.r...@safeway.com 
Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
2009.07.06 21:41
Please respond to
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu


To
IBM-MAIN@bama.ua.edu
cc

Subject
RACF AUDITOR authority and OMVS segment






Hi.  The z/OS V1R10.0 RACF Security Server RACF Administrator's 
Guide says that The user who has the AUDITOR attribute can list all 
of the profile information that is available to the SPECIAL user, as well 
as information that is available to auditors.  In table 40 in the same 
manual,  it says that a userid with AUDITOR authority can also specify 
all operands of the RACF LISTUSER command.

However,  one of our user's with AUDITOR authority received a 
message that she did not authority to view an OMVS segment when 
issueing this:

LU  user-id  NORACF OMVS


Is this a bug, a feature, or just an anomaly that needs to be explained?

Anyone else noticed this?


Lucymarie Ruth,  Safeway,  Inc.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html





DTCC DISCLAIMER: This email and any files transmitted with it are
confidential and intended solely for the use of the individual or
entity to whom they are addressed. If you have received this email
in error, please notify us immediately and delete the email and any
attachments from your system. The recipient should check this email
and any attachments for the presence of viruses.  The company
accepts no liability for any damage caused by any virus transmitted
by this email.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Chris Hoelscher
her eis an alternative we developer years ago (not the best but it works)


step 1 - IEHLIST - to punch a list of member names
step 2 - report writer to remove unwanted lines from output and format for 
next step
step 3 - IEHPROGM - to delete member by member
step4 - IEBCOPY to itself to free up directory entries



Chris Hoelscher
Senior IDMS  DB2 Database Administrator
Humana Inc
502-476-2538
choelsc...@humana.com

you only need to test the programs that you want to work correctly 






From:
CUNY Yann yc...@externe.generali.fr
To:
IBM-MAIN@bama.ua.edu
Date:
07/07/2009 06:09
Subject:
[IBM-MAIN] Delete all members of a PDS with JCL
Sent by:
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



Hi all, 

 

I would like to delete all members of a PDS with JCL but  I don't want to 
specify the members names. (The job will be submitted every day : I don't 
know the members names and how much members are in this PDS).

 

I don't want to use REXX even if it's easier.

 

Regards.

 

Cordialement, 

 

Yann Cuny

Groupe GENERALI

Industrialisation et Gestion des Environnements

* 01 58 34 12 64

* yc...@externe.generali.fr

P Pensez « environnement », n'imprimez ce mail que si cela est 
nécessaire...

 

 

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html



The information transmitted is intended only for the person or entity to which 
it is addressed and may contain CONFIDENTIAL material.  If you receive this 
material/information in error, please contact the sender and delete or destroy 
the material/information.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Question about REUS=NONE

2009-07-07 Thread Farley, Peter x23353
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of Michael Knigge
 Sent: Tuesday, July 07, 2009 6:13 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Question about REUS=NONE
Snipped 
 Now we are just about 13 years later and I have to convert this
 application. We want to use Enterprise COBOL and dynamic CALLs.
 
 Now. I guess all the COBOL-Stuff will work pretty well (I guess
that
 the WOKING-STORAGE gets getmained for every new copy of the COBOL-Prog
 within each subtask).

AFAIK, WORKING-STORAGE still only gets created once per COBOL program,
on first call of the COBOL program.  I think that what you need to use
is called LOCAL-STORAGE, which is re-allocated on every call.

However, that is not your only problem.  COBOL (even Enterprise-level)
is still NOT guaranteed or warranted by IBM to work in a real
multi-tasking environment.  In particular, the output message file,
normally SYSOUT, cannot be shared among subtasks and you still may need
an assembler stub to keep each subtasks's messages displayable
somewhere.

 But I wonder how to migrate the ASM-Subs nearly painless I could
 rewrite all this ASM-Subs and use dynamic Saveareas but I wonder if
just
 using REUS=NONE would do the same job...

You do not need GETMAIN/FREEMAIN subroutines any more (LE has them), and
you may or may not need the STIMERM subroutine either, depending on what
your application needs to do (LE has a DELAY function, but only for
integer seconds).  There are LE callable subroutines to do at least some
of functions that we used to write our own ASM routines to do.  Check
out the LE Programmer's Reference manual for your level of z/OS, it has
a lot of interesting information you can use.

It may be possible you that don't need *any* of your in-house ASM
routines any more, so you would not have to migrate them at all.

HTH

Peter

P.S. - Feel free to contact me off-list if you want to discuss these
things in more detail.


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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Sysplex timeout problems.

2009-07-07 Thread Klein, Kenneth
 
Has anyone seen a problem with distributed systems timing out when
connected to a mainframe when one of the lpars is shutdown and ipled. In
the 60 seconds from the reply down message to getting the reply typed
in we had 100 timeouts show up on a system connected to the production
lpar, which was not the one ipled. 

Ken Klein
Sr. Systems Programmer
Kentucky Farm Bureau Insurance - Louisville
kenneth.kl...@kyfb.com
502-495-5000 x7011

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Question about REUS=NONE

2009-07-07 Thread Steve Comstock

Farley, Peter x23353 wrote:

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Michael Knigge
Sent: Tuesday, July 07, 2009 6:13 AM
To: IBM-MAIN@bama.ua.edu
Subject: Question about REUS=NONE
Snipped 

Now we are just about 13 years later and I have to convert this
application. We want to use Enterprise COBOL and dynamic CALLs.

Now. I guess all the COBOL-Stuff will work pretty well (I guess

that

the WOKING-STORAGE gets getmained for every new copy of the COBOL-Prog
within each subtask).


AFAIK, WORKING-STORAGE still only gets created once per COBOL program,
on first call of the COBOL program.  I think that what you need to use
is called LOCAL-STORAGE, which is re-allocated on every call.


You need to be careful with dynamic call vs. attaching. Enterprise
COBOL programs can appear in a multitasking environment if they
are compiled with the THREAD option. Each task will have its own
copy of working-storage. COBOL programs cannot do the attach, but
they may be attached.

Otherwise, in a classic dynamic call environment, working-storage
is created once for the first dynamic call of a routine. The values
in working-storage variables remain in their last used state across
subsequent calls unless a) you explicitly reset values or b) the
program has the INITIAL attribute specified on the program-id paragraph.

LOCAL-STORAGE, on the other hand, as Peter points out, is
created fresh each time the routine is entered. You can mix and
match; that is, you can have a working-storage section and a
local-storage section, which can be a useful arrangement sometimes.
If you have a local-storage section, it must appear after any
wokring-storage section and before any linkage section.





However, that is not your only problem.  COBOL (even Enterprise-level)
is still NOT guaranteed or warranted by IBM to work in a real
multi-tasking environment.  In particular, the output message file,
normally SYSOUT, cannot be shared among subtasks and you still may need
an assembler stub to keep each subtasks's messages displayable
somewhere.


There I must disagree, to a degree :). Compile with THREAD; and
you can set your runtime to include MSGFILE(ddname,,,ENQ); this
should allow multiple tasks to share SYSOUT (although the outputs
are likely to be intermixed!).




But I wonder how to migrate the ASM-Subs nearly painless I could
rewrite all this ASM-Subs and use dynamic Saveareas but I wonder if

just

using REUS=NONE would do the same job...


You do not need GETMAIN/FREEMAIN subroutines any more (LE has them), and
you may or may not need the STIMERM subroutine either, depending on what
your application needs to do (LE has a DELAY function, but only for
integer seconds).  There are LE callable subroutines to do at least some
of functions that we used to write our own ASM routines to do.  Check
out the LE Programmer's Reference manual for your level of z/OS, it has
a lot of interesting information you can use.


All of the above is true.

ad

We discuss all the LE callable services in our three day course
Using LE Services in z/OS, which includes lecture and labs in
any or all (your choice) of Assembler, COBOL, PL/I, and C. This
will give you a solid handle for taking advantage of the available
facilities. See here for more details:

  http://www.trainersfriend.com/Language_Environment_courses/m512descr.htm

In addition, the two day course Enterprise COBOL Update I: Essentials
covers all the enhancements and changes to the IBM COBOL compiler for
MVS, OS/390, and z/OS since COBOL II through Enterprise COBOL V4R1.
Here you can learn about features such as INITIAL, LOCAL-STORAGE, as
well as compiler options such as THREAD, and much more. See:

  http://www.trainersfriend.com/COBOL_Courses/d704descr.htm

In just five days you can get a comprehensive, practical update that
it would take you weeks to get on your own; and you get hands on
experience that is carefully structured to let these features
unfold in a natural progression.

/ad



It may be possible you that don't need *any* of your in-house ASM
routines any more, so you would not have to migrate them at all.


Maybe. But if you really need the multi-tasking, you'll need to
use some ASM (or PL/I or C) to get that done. If you don't really
need to have multiple tasks, then I agree.



HTH

Peter

P.S. - Feel free to contact me off-list if you want to discuss these
things in more detail.



P.S. - Feel free to contact me off-list if you want to schedule
an offering of Using LE Services in z/OS and Enterprise COBOL
Update I: Essentials.


Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and 

VLF CLASS NAME(IKJEXEC)

2009-07-07 Thread Jochen Roehrig
Hello,

is LLA STC required to benefit from VLF's CLASS NAME(IKJEXEC)?
We think about running our system with no LLA STC, because we use some ISV's
solution instead of LLA. But my first tests with VLF CLASS NAME(IKJEXEC) and
no LLA up an running fail. Means: it looks like that VLF does not cache
members from IKJEXEC EDSN definitions. Any prerequisites required to benefit
from VLF CLASS NAME(IKJEXEC)?

Thanks in advance,
Jochen

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


COBOL multitasking / threading (was:RE: Question about REUS=NONE)

2009-07-07 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Steve Comstock
 Sent: Tuesday, July 07, 2009 9:44 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Question about REUS=NONE

snip

 
 You need to be careful with dynamic call vs. attaching. Enterprise
 COBOL programs can appear in a multitasking environment if they
 are compiled with the THREAD option. Each task will have its own
 copy of working-storage. COBOL programs cannot do the attach, but
 they may be attached.
 

The COBOL manual mentions POSIX threading along with the THREAD option. I 
wonder if that means that a COBOL program could use the UNIX pthread services 
such as BPX1PTC to create a new pthread (similar to ATTACH, but different) and 
BPX1PTJ to wait for that thread to end (similar to WAIT on the ECB for ATTACH, 
but different).

snip
--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Antwort: Sysplex timeout problems.

2009-07-07 Thread Michael Klaeschen
Hi Ken,

I remember a lecture about TCPIP issues in a parallel sysplex which was 
held at zSeries Technical Conference in Salzburg some years ago. It was 
about distributed source VIPA and WLM. In very short words: one can set up 
WLM and Communication Server so that the TCPIP related address spaces may 
be moved off from the MVS image that is going to be IPLed. Thanks to VIPA, 
the TCPIP-adress is bound to the entire sysplex. As long as there is one 
MVS image up and running, the TCPIP services are still intact.

I am not the network guy, never tried out and even might remember falsely. 
But may be this is worth a look at, e.g. 
http://www.ibmsystemsmag.com/mainframe/julyaugust04/tipstechniques/9918p3.aspx;.
 
Well, I have no clue if it is still supported.

Cheers
Michael




Klein, Kenneth kenneth.kl...@kyfb.com 
Gesendet von: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
07.07.2009 16:37
Bitte antworten an
IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU


An
IBM-MAIN@BAMA.UA.EDU
Kopie

Thema
Sysplex timeout problems.






 
Has anyone seen a problem with distributed systems timing out when
connected to a mainframe when one of the lpars is shutdown and ipled. In
the 60 seconds from the reply down message to getting the reply typed
in we had 100 timeouts show up on a system connected to the production
lpar, which was not the one ipled. 

Ken Klein
Sr. Systems Programmer
Kentucky Farm Bureau Insurance - Louisville
kenneth.kl...@kyfb.com
502-495-5000 x7011

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Pinned data on 2107 aka DS8000

2009-07-07 Thread Hal Merritt
Actually, you can call IBM. They will happily quote you a price to get things 
running. You'll have to decide if it is worth the price or not. 

Just place a service call and you should get a call back from someone that can 
fix you up. 

HTH and good luck.   



-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Mark Wilson
Sent: Monday, July 06, 2009 12:56 PM
To: IBM-MAIN@bama.ua.edu
Subject: Pinned data on 2107 aka DS8000

Hi,

Does anyone know how to discard a whole bunch of pinned data on a 2107?

We have suffered a power failure in our office and our 2107 has some pinned
data.

Unfortunately, I don¹t have the box on maintenance so I cannot call IBM...

This is my development/training box.


Mark


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
NOTICE: This electronic mail message and any files transmitted with it are 
intended
exclusively for the individual or entity to which it is addressed. The message, 
together with any attachment, may contain confidential and/or privileged 
information.
Any unauthorized review, use, printing, saving, copying, disclosure or 
distribution 
is strictly prohibited. If you have received this message in error, please 
immediately advise the sender by reply email and delete all copies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: RACF AUDITOR authority and OMVS segment

2009-07-07 Thread Walt Farrell
On Tue, 7 Jul 2009 09:48:12 -0400, Hayim Sokolsky hsokol...@dtcc.com wrote:
Now to your specific question... Auditor (system level or group level)
gives the user the ability to list any RACF base segment within scope.
What it does not do is give the ability to view segments (OMVS, TSO, CICS,
etc...) outside the base.

To give your auditor the ability to list the content of the OMVS segment,
you would need to define FIELD USER.OMVS.*, and permit them to the
resource with READ. Sample commands (assumes  you've never used FIELD):

Sorry, Hayim, but users with AUDITOR do not need FIELD authority at least
according to our documentation.  From the RACF Command Language Reference:
quote
 Listing the other segments of a user profile: To list information from
segments other than the RACF segment for a user profile, including your own,
one of the following conditions must be true:

* You have the SPECIAL or AUDITOR attribute

* You have at least READ authority to the desired field within the
segment through field-level access checking. 
/quote

I agree, of course, that RACF questions should be on RACF-L rather than
IBM-MAIN.
-- 
Walt Farrell, CISSP
IBM STSM, z/OS Security Design

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Alert and Resolve price changes

2009-07-07 Thread Ted MacNEIL
You can't write margin notes in a PDF. Well, ..., I can if I put the PDF on my 
Kindle!

Actually, you can.
There is a comment bar in ADOBE for windows.
You have to have document rights enabled.

-
Too busy driving to stop for gas!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: VLF CLASS NAME(IKJEXEC)

2009-07-07 Thread Mark Zelden
On Tue, 7 Jul 2009 09:46:47 -0500, Jochen Roehrig
jochen.roeh...@baloise.ch wrote:

Hello,

is LLA STC required to benefit from VLF's CLASS NAME(IKJEXEC)?
We think about running our system with no LLA STC, because we use some ISV's
solution instead of LLA. But my first tests with VLF CLASS NAME(IKJEXEC) and
no LLA up an running fail. Means: it looks like that VLF does not cache
members from IKJEXEC EDSN definitions. Any prerequisites required to benefit
from VLF CLASS NAME(IKJEXEC)?



It's documented that the operation of LLA is not dependent on VLF (although
it can benefit from VLF by using the CSVLLA class), but the opposite isn't
documented.  So if starting LLA is required for VLF to work at all, this is 
the first I've heard of it.  But I'm pretty sure at shops I've been at that
ran something like PMO/Quickfetch still ran LLA also. 

Do you have any other classes defined that you can check?  What about 
IGGCAS (catalog) or any of the RACF classes.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:mark.zel...@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: RACF AUDITOR authority and OMVS segment

2009-07-07 Thread Hayim Sokolsky
Walt,

I stand corrected. I assume that reference is for System-Special and 
System-Auditor only.

It does looks like a documentation conflict between the Command Language 
Reference and the RACF Security Administrator's Guide. In the SAG, under 
7.3 Field-level access checking there is a statement:

Note: If you do not activate the FIELD class and activate SETROPTS 
RACLIST processing for the FIELD class, only SPECIAL users can access 
fields in segments (other than the base segment) of RACF profiles. 

As I didn't have time to test, I assumed this implied that AUDITOR users 
would not have READ access. My bad.


Hayim
_
Hayim Sokolsky, CISSP
Mainframe Security Architect
DTCC Corporate Information Security
18301 Bermuda Green Dr, MS 1-CIS
Tampa FL 33647-1760

Tel. (813) 470-2177



Walt Farrell wfarr...@us.ibm.com 
Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
2009.07.07 11:45
Please respond to
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu


To
IBM-MAIN@bama.ua.edu
cc

Subject
Re: RACF AUDITOR authority and OMVS segment






On Tue, 7 Jul 2009 09:48:12 -0400, Hayim Sokolsky hsokol...@dtcc.com 
wrote:
Now to your specific question... Auditor (system level or group level)
gives the user the ability to list any RACF base segment within scope.
What it does not do is give the ability to view segments (OMVS, TSO, 
CICS,
etc...) outside the base.

To give your auditor the ability to list the content of the OMVS segment,
you would need to define FIELD USER.OMVS.*, and permit them to the
resource with READ. Sample commands (assumes  you've never used FIELD):

Sorry, Hayim, but users with AUDITOR do not need FIELD authority at least
according to our documentation.  From the RACF Command Language Reference:
quote
 Listing the other segments of a user profile: To list information from
segments other than the RACF segment for a user profile, including your 
own,
one of the following conditions must be true:

* You have the SPECIAL or AUDITOR attribute

* You have at least READ authority to the desired field within the
segment through field-level access checking. 
/quote

I agree, of course, that RACF questions should be on RACF-L rather than
IBM-MAIN.
-- 
Walt Farrell, CISSP
IBM STSM, z/OS Security Design

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html





DTCC DISCLAIMER: This email and any files transmitted with it are
confidential and intended solely for the use of the individual or
entity to whom they are addressed. If you have received this email
in error, please notify us immediately and delete the email and any
attachments from your system. The recipient should check this email
and any attachments for the presence of viruses.  The company
accepts no liability for any damage caused by any virus transmitted
by this email.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: VLF CLASS NAME(IKJEXEC)

2009-07-07 Thread Ed Finnell
 
In a message dated 7/7/2009 11:04:16 A.M. Central Daylight Time,  
mark.zel...@zurichna.com writes:

the first I've heard of it.  But I'm pretty sure at shops I've  been at that
ran something like PMO/Quickfetch still ran LLA also.  

Do you have any other classes defined that you can check?  What  about 
IGGCAS (catalog) or any of the RACF classes.



I'll send both of you copies of Mary de  Vries' paper on LLA/VLF. I'm with 
Mark. Seems like the OEM vendor would have  more complete knowledge of the 
issue. Is VLFAID still available? Can't find it  on IBM site-my notes say 
available from SE-ha,ha,ha
 




**Looking for love this summer? Find it now on AOL Personals. 
(http://personals.aol.com/?ncid=emlcntuslove0003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: VLF CLASS NAME(IKJEXEC)

2009-07-07 Thread John McKown
On Tue, 7 Jul 2009 09:46:47 -0500, Jochen Roehrig
jochen.roeh...@baloise.ch wrote:

Hello,

is LLA STC required to benefit from VLF's CLASS NAME(IKJEXEC)?
We think about running our system with no LLA STC, because we use some ISV's
solution instead of LLA. But my first tests with VLF CLASS NAME(IKJEXEC) and
no LLA up an running fail. Means: it looks like that VLF does not cache
members from IKJEXEC EDSN definitions. Any prerequisites required to benefit
from VLF CLASS NAME(IKJEXEC)?

Thanks in advance,
Jochen


LLA is written to use the interface to VLF. Any APF program can use VLF to
cache whatever by executing the correct COFxxx macro. So, I would say that
your LLA replacement product does not attempt to interface to VLF, or you
have not set up VLF properly to allow caching. I would bet the former (VLF
interface does not exist).

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A890/12.0



--
John

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: VLF CLASS NAME(IKJEXEC)

2009-07-07 Thread Ted MacNEIL
But I'm pretty sure at shops I've  been at that ran something like 
PMO/Quickfetch still ran LLA also.  

When we got LLA (XA?). I led the charge to get rid of Q/F. It saved us a large 
chunk of change, and it performed quite well.
VLF (ESA?) made it even better.
-
Too busy driving to stop for gas!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: COBOL multitasking / threading

2009-07-07 Thread Steve Comstock

McKown, John wrote:

-Original Message-
From: IBM Mainframe Discussion List 
[mailto:ibm-m...@bama.ua.edu] On Behalf Of Steve Comstock

Sent: Tuesday, July 07, 2009 9:44 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Question about REUS=NONE


snip


You need to be careful with dynamic call vs. attaching. Enterprise
COBOL programs can appear in a multitasking environment if they
are compiled with the THREAD option. Each task will have its own
copy of working-storage. COBOL programs cannot do the attach, but
they may be attached.



The COBOL manual mentions POSIX threading along with the 
THREAD option. I wonder if that means that a COBOL program 
could use the UNIX pthread services such as BPX1PTC to create 
a new pthread (similar to ATTACH, but different) and BPX1PTJ 
to wait for that thread to end (similar to WAIT on the ECB for ATTACH, but different).


snip


I thought about that, but I don't think it works; my
guess is that a COBOL program can't handle signal events
and there may be some other restrictions that make it
either impossible or unwieldy to drive multithreading
from a COBOL program.

Might make for some interesting testing though, although
I hope Tom Ross will chime in with his perspective and
insights.



Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

== Ask about being added to our opt-in list:  ==
==   * Early announcement of new courses  ==
==   * Early announcement of new techincal papers ==
==   * Early announcement of new promotions   ==


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: VLF CLASS NAME(IKJEXEC)

2009-07-07 Thread Mark Zelden
The last to appends don't seem to address what I think the OP is asking. 

If I understand correct, the issue is this:

1) The OP has a product that replaces LLA functionality and does not run LLA
(but does run VLF.

2) The OP is using the IKJEXEC VLF class, but does not see it being used

3) The OP is questioning if the LLA STC is required in order for VLF to work
(for 
the other non LLA classes)


As far as I know, it shouldn't matter.  LLA is a VLF exploiter and just because
the OP doesn't run LLA doesn't mean other VLF classes shouldn't work.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:mark.zel...@zurichna.com
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Where does z/unix store each lpar's hostname?

2009-07-07 Thread Bonno, Tuco
actually, I think it's LPARNAME ; you can do something like

lpar_name=$(sysvar LPARNAME) 

and get to it that way ... 

/s/ tuco bonno;
graduate, college of conflict management;
University of Southeast Asia;
I partied on the Ho Chi Minh trail -- tiến lên !!  



-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Miklos Szigetvari
Sent: Friday, 03 July, 2009 10:00 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Where does z/unix store each lpar's hostname?

Use sysvar LPAR , you will get LPAR name

Klein, Kenneth wrote:

I thought it would be in /etc...


Ken Klein
Sr. Systems Programmer

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


  


-- 
Miklos Szigetvari

Development Team
ISIS Information Systems Gmbh 
tel: (+43) 2236 27551 570
Fax: (+43) 2236 21081 

E-mail: miklos.szigetv...@isis-papyrus.com 

Info: i...@isis-papyrus.com 
Hotline: +43-2236-27551-111 

Visit our Website: http://www.isis-papyrus.com 
---
This e-mail is only intended for the recipient and not legally
binding. Unauthorised use, publication, reproduction or
disclosure of the content of this e-mail is not permitted.
This email has been checked for known viruses, but ISIS accepts
no responsibility for malicious or inappropriate content.
--- 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Command program from the cbt

2009-07-07 Thread DanD

I forget what the original poster was really looking for.

If it's just a way of issuing commands in batch why not use a batch TMP and 
the CONSOLE SYSCMD(...) command?  You could create a simple proc and have 
the command passed in the parm field.


Of course, if you're looking for IF/PAUSE and other automation functions 
then a purchased product is the way to go.


Dan

- Original Message - 
From: Brian Westerman

Sent: Tuesday, July 07, 2009 2:27 AM
Subject: Re: Command program from the cbt

It is a very handy utility.

the more expensive utilities like Zeke/Zakk, AutoOps, etc. are quite nice 
as

well, but the expense is very high for what they are providing.

Brian 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread carlos roberto visconde
What about to rename the Dataset and create a new one with the same
characteristics (model).

2009/7/7 Chris Hoelscher choelsc...@humana.com

 her eis an alternative we developer years ago (not the best but it works)


 step 1 - IEHLIST - to punch a list of member names
 step 2 - report writer to remove unwanted lines from output and format for
 next step
 step 3 - IEHPROGM - to delete member by member
 step4 - IEBCOPY to itself to free up directory entries



 Chris Hoelscher
 Senior IDMS  DB2 Database Administrator
 Humana Inc
 502-476-2538
 choelsc...@humana.com

 you only need to test the programs that you want to work correctly






 From:
 CUNY Yann yc...@externe.generali.fr
 To:
 IBM-MAIN@bama.ua.edu
 Date:
 07/07/2009 06:09
 Subject:
 [IBM-MAIN] Delete all members of a PDS with JCL
 Sent by:
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



 Hi all,



 I would like to delete all members of a PDS with JCL but  I don't want to
 specify the members names. (The job will be submitted every day : I don't
 know the members names and how much members are in this PDS).



 I don't want to use REXX even if it's easier.



 Regards.



 Cordialement,



 Yann Cuny

 Groupe GENERALI

 Industrialisation et Gestion des Environnements

 * 01 58 34 12 64

 * yc...@externe.generali.fr

 P Pensez « environnement », n'imprimez ce mail que si cela est
 nécessaire...








 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html



 The information transmitted is intended only for the person or entity to
 which it is addressed and may contain CONFIDENTIAL material.  If you receive
 this material/information in error, please contact the sender and delete or
 destroy the material/information.

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Chris Hoelscher
we have run into may situations where when we are upgrading to a new 
release of a product (say IDMS or DB2) - we warn all users that ad-hoc 
jobs that access the runtime-loadlibs will mis-behave during the upgrade
additionally - many jobs have JCL included for libraries they simply don;t 
need


however - many dont listen and submit jobs anyhow - we chose not to take 
the time to cancel these jobs so we can rename or delete - we just empty 
the PDS and then re-load with the newer contents!



Chris Hoelscher
Senior IDMS  DB2 Database Administrator
Humana Inc
502-476-2538
choelsc...@humana.com

you only need to test the programs that you want to work correctly 






From:
carlos roberto visconde cvisco...@ig.com.br
To:
IBM-MAIN@bama.ua.edu
Date:
07/07/2009 13:45
Subject:
Re: [IBM-MAIN] Delete all members of a PDS with JCL
Sent by:
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



What about to rename the Dataset and create a new one with the same
characteristics (model).

2009/7/7 Chris Hoelscher choelsc...@humana.com

 her eis an alternative we developer years ago (not the best but it 
works)


 step 1 - IEHLIST - to punch a list of member names
 step 2 - report writer to remove unwanted lines from output and format 
for
 next step
 step 3 - IEHPROGM - to delete member by member
 step4 - IEBCOPY to itself to free up directory entries



 Chris Hoelscher
 Senior IDMS  DB2 Database Administrator
 Humana Inc
 502-476-2538
 choelsc...@humana.com

 you only need to test the programs that you want to work correctly






 From:
 CUNY Yann yc...@externe.generali.fr
 To:
 IBM-MAIN@bama.ua.edu
 Date:
 07/07/2009 06:09
 Subject:
 [IBM-MAIN] Delete all members of a PDS with JCL
 Sent by:
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



 Hi all,



 I would like to delete all members of a PDS with JCL but  I don't want 
to
 specify the members names. (The job will be submitted every day : I 
don't
 know the members names and how much members are in this PDS).



 I don't want to use REXX even if it's easier.



 Regards.



 Cordialement,



 Yann Cuny

 Groupe GENERALI

 Industrialisation et Gestion des Environnements

 * 01 58 34 12 64

 * yc...@externe.generali.fr

 P Pensez « environnement », n'imprimez ce mail que si cela est
 nécessaire...








 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html



 The information transmitted is intended only for the person or entity to
 which it is addressed and may contain CONFIDENTIAL material.  If you 
receive
 this material/information in error, please contact the sender and delete 
or
 destroy the material/information.

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html



The information transmitted is intended only for the person or entity to which 
it is addressed and may contain CONFIDENTIAL material.  If you receive this 
material/information in error, please contact the sender and delete or destroy 
the material/information.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: RACF AUDITOR authority and OMVS segment

2009-07-07 Thread Lucymarie Ruth
Sorry for the confusion. When I tested this the first time, I gave my 
alternate userid AUDITOR authority, and apparently did not log off and 
log back on before testing the LISTUSER command.  Now when I logon 
with my alternate userid (which still has AUDITOR authority), I do see 
the OMVS segment.  so the RACF System Admin manual is telling the 
truth. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Communications Server

2009-07-07 Thread Ward, Mike S
Hello all, I have been tasked to move our old sna\sdlc communications
controllers to a Windows communications server environment. We currently
have z\os V1.7 with VTAM and TCP\IP. We will be getting Windows
Communications Server V6 for the windows server that will take the place
of the old LU0 controllers at remote locations. I'm not sure where to
start in setting up communications from our VTAM environment to this
Windows environment. We currently use DLSW and Cisco routers to do the
sna/polling of the old controllers. Are there any books red or otherwise
that can help me with this? I have searched the IBM site for Windows
Communications server and LANDP, but I mostly get z/os communications
server books there. Any help will be appreciated. Thank you in advance.
==
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to which they are addressed. If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you
have received this e-mail by mistake and delete this e-mail from your system. 
If you are not the intended recipient
you are notified that disclosing, copying, distributing or taking any action in 
reliance on the contents of this
information is strictly prohibited.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Symbolic parameters inside SYSIN

2009-07-07 Thread Victor Gil
Henrique,

The below PROC is a sample of what you'd like to accomplish as it deletes a 
passed VSAM ds-name. The method is useful when SYSIN has only several 
VARIABLE cards. Also the PROC is easily convertable to plain JCL with the SET 
symbols:

//DELVSAM PROC VDSN='?' - VSAM DSN
//*/
/* (1) GENERATE TEMP INSTRUCTION WITH THE DSN: 
//*/
/GENTEMP  EXEC PGM=ASMA90,X
// PARM=('SYSPARM(   VDSN -)') 
//SYSINDD  DSN=your.source.pds(PARMTODD),DISP=SHR   
//SYSUT1   DD  SPACE=(4096,(2,2)),UNIT=VIO  
//SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR 
//SYSPRINT DD  DUMMY
//SYSLIN   DD  UNIT=VIO,DISP=(,PASS),SPACE=(TRK,1,1)),
// DSN=amp;WORK, 
// DCB=(BLKSIZE=80,LRECL=80,RECFM=FB)   
//*/
/* (2) RUN IDCAMS TO DELETE CLUSTER 
//*/
/DELDEFIN EXEC PGM=IDCAMS  
//SYSPRINT DD SYSOUT=*  
//SYSINDD  DISP=SHR,DSN=skeleton(DELDEF1)   - DELETE ( -  
//   DD  DISP=(SHR,PASS),DSN=amp;WORK- VDSN
//   DD  DISP=SHR,DSN=skeleton(DELDEF2) - ) PURGE SCRATCH 
//PEND  


where member PARMTODD is the following 2-line program placed in your source 
library

  PUNCH 'SYSPARM'  
  END   

Hope this helps,
-Victor-


On Mon, 6 Jul 2009 13:05:52 -0500, Henrique Seganfredo 
henri...@seganfredo.com wrote:

Hello,

I am trying to optimize some tasks I perform with my MQ Series. My idea is to
delete a bunch of MQ objects just passing am unique number reference that
identifies our partners.

The JCL would look like this:

//DLPARTNR  PROC REF=
//CSQUTIL1 EXEC PGM=CSQUTIL,REGION=0M,
//PARM='BCMH'
//STEPLIB  DD DISP=SHR,DSN=SSTP.HZ19.MQS600.SCSQANLE
// DD DISP=SHR,DSN=SSTP.HZ19.MQS600.SCSQAUTH
//SYSPRINT DD SYSOUT=*
//SYSINDD DISP=SHR,DSN=SSTP.SYSIN(DEL1)
//CSQUCMD  DD DISP=SHR,DSN=SSTP.SYSIN(DEL2)

So I have several MQ-delete commands contained inside of the DEL1 and 
DEL2
SYSIN datasets, somewhat like this:
 DELETE CHANNEL(MYCOMPANY.TO.REF)

I ended up discovering that symbols parameters I submit do not replace the
ones contained on SYSIN data, is this true? Is there any workaround?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Command program from the cbt

2009-07-07 Thread carlos roberto visconde
You can code an assembler program with svc 34.

carlos.

2009/7/7 DanD mvs-j...@sympatico.ca

 I forget what the original poster was really looking for.

 If it's just a way of issuing commands in batch why not use a batch TMP and
 the CONSOLE SYSCMD(...) command?  You could create a simple proc and have
 the command passed in the parm field.

 Of course, if you're looking for IF/PAUSE and other automation functions
 then a purchased product is the way to go.

 Dan

 - Original Message - From: Brian Westerman
 Sent: Tuesday, July 07, 2009 2:27 AM
 Subject: Re: Command program from the cbt

 It is a very handy utility.

 the more expensive utilities like Zeke/Zakk, AutoOps, etc. are quite nice
 as
 well, but the expense is very high for what they are providing.

 Brian


 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Where does z/unix store each lpar's hostname?

2009-07-07 Thread Lucymarie Ruth
Don't know whether you are trying to get SYSNAME via REXX or via   
   shell command.  If you are using shell commands,  try  
  
  
  
   uname -n   
  
  
   That returns the SYSNAME specified at IPL time.
  
  
  
  
   If you want to create a variable set the that value, try this: 
  
  
 sysname=`uname -n` 
  

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Communications Server

2009-07-07 Thread Hal Merritt
Sounds like you have Windows issues, not z/os. Also sounds like you also have 
some serious political issues in insisting on spending a lot of money just so 
you can use Windows servers. Not too sure we can be of much help.  

Doesn't make much business or technical sense when everything you need is 
available for free. 

Anyway, the doc you will be needing would be furnished with the Windows 
Communications Server V6 product and not any IBM site. That would include any 
and all VTAM or TCP/IP configuration options needed to make their product work. 

HTH and good luck (you are going to need it). 


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Ward, Mike S
Sent: Tuesday, July 07, 2009 12:52 PM
To: IBM-MAIN@bama.ua.edu
Subject: Communications Server

Hello all, I have been tasked to move our old sna\sdlc communications
controllers to a Windows communications server environment. We currently
have z\os V1.7 with VTAM and TCP\IP. We will be getting Windows
Communications Server V6 for the windows server that will take the place
of the old LU0 controllers at remote locations. I'm not sure where to
start in setting up communications from our VTAM environment to this
Windows environment. We currently use DLSW and Cisco routers to do the
sna/polling of the old controllers. Are there any books red or otherwise
that can help me with this? I have searched the IBM site for Windows
Communications server and LANDP, but I mostly get z/os communications
server books there. Any help will be appreciated. Thank you in advance.
==
 
NOTICE: This electronic mail message and any files transmitted with it are 
intended
exclusively for the individual or entity to which it is addressed. The message, 
together with any attachment, may contain confidential and/or privileged 
information.
Any unauthorized review, use, printing, saving, copying, disclosure or 
distribution 
is strictly prohibited. If you have received this message in error, please 
immediately advise the sender by reply email and delete all copies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Hal Merritt
IMS came with a utility that did exactly that and I adopted the 
empty-and-repopulate process with very good results for a number of products. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Chris Hoelscher
Sent: Tuesday, July 07, 2009 12:48 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Delete all members of a PDS with JCL

we have run into may situations where when we are upgrading to a new 
release of a product (say IDMS or DB2) - we warn all users that ad-hoc 
jobs that access the runtime-loadlibs will mis-behave during the upgrade
additionally - many jobs have JCL included for libraries they simply don;t 
need


however - many dont listen and submit jobs anyhow - we chose not to take 
the time to cancel these jobs so we can rename or delete - we just empty 
the PDS and then re-load with the newer contents!



Chris Hoelscher
Senior IDMS  DB2 Database Administrator
Humana Inc
502-476-2538
choelsc...@humana.com

 
NOTICE: This electronic mail message and any files transmitted with it are 
intended
exclusively for the individual or entity to which it is addressed. The message, 
together with any attachment, may contain confidential and/or privileged 
information.
Any unauthorized review, use, printing, saving, copying, disclosure or 
distribution 
is strictly prohibited. If you have received this message in error, please 
immediately advise the sender by reply email and delete all copies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread esst...@juno.com
Have you looked at IEHMOVE to an TEMP datasets.
IEHMOVE will MOVE the members to another PDS ( A TEMP dataset)
and it would remove the original members in the original PDS.

Thus clearing the PDS.

I don't recall if You can substitue generic or wild cards. 


Get your dream car or truck. Click here.
http://thirdpartyoffers.juno.com/TGL2141/fc/BLSrjpTLa8ua2DG0gg7mtyEjwXC45rhzNy77jaD3eRjqIpIDTcSc7zrNhss/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Where does z/unix store each lpar's hostname?

2009-07-07 Thread Mark Pace
If you're looking for the actual LPAR name
cat /proc/sysinfo
Manufacturer: IBM
Type: 2096
Model:J01  R07
Sequence Code:000xx
Plant:02
Model Capacity:   J01  

CPUs Total:   7
CPUs Configured:  1
CPUs Standby: 0
CPUs Reserved:6
Capability:   4920 6480
Adjustment 02-way:245 249
Adjustment 03-way:238 241
Adjustment 04-way:232 235
Adjustment 05-way:226 229
Adjustment 06-way:226 229
Adjustment 07-way:226 229
Secondary Capability: 1760

LPAR Number:  1
LPAR Characteristics: Shared
*LPAR Name:IT*
LPAR Adjustment:  1000
LPAR CPUs Total:  1
LPAR CPUs Configured: 1
LPAR CPUs Standby:0
LPAR CPUs Reserved:   0
LPAR CPUs Dedicated:  0
LPAR CPUs Shared: 1

VM00 Name:SLES001
VM00 Control Program: z/VM5.4.0
VM00 Adjustment:  1000
VM00 CPUs Total:  1
VM00 CPUs Configured: 1
VM00 CPUs Standby:0
VM00 CPUs Reserved:   0


On Tue, Jul 7, 2009 at 2:21 PM, Lucymarie Ruth
lucymarie.r...@safeway.comwrote:

 Don't know whether you are trying to get SYSNAME via REXX or via
   shell command.  If you are using shell commands,  try



   uname -n


   That returns the SYSNAME specified at IPL time.




   If you want to create a variable set the that value, try this:


 sysname=`uname -n`


 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html




-- 
Mark Pace
Mainline Information Systems
1700 Summit Lake Drive
Tallahassee, FL. 32317

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread carlos roberto visconde
You can use iebupdte.

2009/7/7 Hal Merritt hmerr...@jackhenry.com

 IMS came with a utility that did exactly that and I adopted the
 empty-and-repopulate process with very good results for a number of
 products.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of Chris Hoelscher
 Sent: Tuesday, July 07, 2009 12:48 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Delete all members of a PDS with JCL

 we have run into may situations where when we are upgrading to a new
 release of a product (say IDMS or DB2) - we warn all users that ad-hoc
 jobs that access the runtime-loadlibs will mis-behave during the upgrade
 additionally - many jobs have JCL included for libraries they simply don;t
 need


 however - many dont listen and submit jobs anyhow - we chose not to take
 the time to cancel these jobs so we can rename or delete - we just empty
 the PDS and then re-load with the newer contents!



 Chris Hoelscher
 Senior IDMS  DB2 Database Administrator
 Humana Inc
 502-476-2538
 choelsc...@humana.com


 NOTICE: This electronic mail message and any files transmitted with it are
 intended
 exclusively for the individual or entity to which it is addressed. The
 message,
 together with any attachment, may contain confidential and/or privileged
 information.
 Any unauthorized review, use, printing, saving, copying, disclosure or
 distribution
 is strictly prohibited. If you have received this message in error, please
 immediately advise the sender by reply email and delete all copies.

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Where does z/unix store each lpar's hostname?

2009-07-07 Thread Steve Comstock

Mark Pace wrote:

If you're looking for the actual LPAR name
cat /proc/sysinfo
Manufacturer: IBM
Type: 2096
Model:J01  R07
Sequence Code:000xx
Plant:02
Model Capacity:   J01  

CPUs Total:   7
CPUs Configured:  1
CPUs Standby: 0
CPUs Reserved:6
Capability:   4920 6480
Adjustment 02-way:245 249
Adjustment 03-way:238 241
Adjustment 04-way:232 235
Adjustment 05-way:226 229
Adjustment 06-way:226 229
Adjustment 07-way:226 229
Secondary Capability: 1760

LPAR Number:  1
LPAR Characteristics: Shared
*LPAR Name:IT*
LPAR Adjustment:  1000
LPAR CPUs Total:  1
LPAR CPUs Configured: 1
LPAR CPUs Standby:0
LPAR CPUs Reserved:   0
LPAR CPUs Dedicated:  0
LPAR CPUs Shared: 1

VM00 Name:SLES001
VM00 Control Program: z/VM5.4.0
VM00 Adjustment:  1000
VM00 CPUs Total:  1
VM00 CPUs Configured: 1
VM00 CPUs Standby:0
VM00 CPUs Reserved:   0


Not for everybody

=== cat /proc/sysinfo
cat: /proc/sysinfo: EDC5129I No such file or directory.



Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

== Ask about being added to our opt-in list:  ==
==   * Early announcement of new courses  ==
==   * Early announcement of new techincal papers ==
==   * Early announcement of new promotions   ==


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Where does z/unix store each lpar's hostname?

2009-07-07 Thread Mark Pace
Ah, sorry, I was not aware of that.
Mine from a SLES 10 or 11.

On Tue, Jul 7, 2009 at 3:18 PM, Steve Comstock st...@trainersfriend.comwrote:

 Mark Pace wrote:

 If you're looking for the actual LPAR name
 cat /proc/sysinfo
 Manufacturer: IBM
 Type: 2096
 Model:J01  R07
 Sequence Code:000xx
 Plant:02
 Model Capacity:   J01  

 CPUs Total:   7
 CPUs Configured:  1
 CPUs Standby: 0
 CPUs Reserved:6
 Capability:   4920 6480
 Adjustment 02-way:245 249
 Adjustment 03-way:238 241
 Adjustment 04-way:232 235
 Adjustment 05-way:226 229
 Adjustment 06-way:226 229
 Adjustment 07-way:226 229
 Secondary Capability: 1760

 LPAR Number:  1
 LPAR Characteristics: Shared
 *LPAR Name:IT*
 LPAR Adjustment:  1000
 LPAR CPUs Total:  1
 LPAR CPUs Configured: 1
 LPAR CPUs Standby:0
 LPAR CPUs Reserved:   0
 LPAR CPUs Dedicated:  0
 LPAR CPUs Shared: 1

 VM00 Name:SLES001
 VM00 Control Program: z/VM5.4.0
 VM00 Adjustment:  1000
 VM00 CPUs Total:  1
 VM00 CPUs Configured: 1
 VM00 CPUs Standby:0
 VM00 CPUs Reserved:   0


 Not for everybody

 === cat /proc/sysinfo
 cat: /proc/sysinfo: EDC5129I No such file or directory.



 Kind regards,

 -Steve Comstock
 The Trainer's Friend, Inc.

 303-393-8716
 http://www.trainersfriend.com

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

 == Ask about being added to our opt-in list:  ==
 ==   * Early announcement of new courses  ==
 ==   * Early announcement of new techincal papers ==
 ==   * Early announcement of new promotions   ==



 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html




-- 
Mark Pace
Mainline Information Systems
1700 Summit Lake Drive
Tallahassee, FL. 32317

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Communications Server

2009-07-07 Thread Ward, Mike S
The communications server is an IBM product so I would have guessed that
on the z/os side a guide would show me how to connect the CS as an APPN
node or better yet, how I could continue to use the DLSW\CISCO
connectivity already there. It's not an issue as much as it's what
should I do first and how.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Hal Merritt
Sent: Tuesday, July 07, 2009 1:32 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Communications Server

Sounds like you have Windows issues, not z/os. Also sounds like you also
have some serious political issues in insisting on spending a lot of
money just so you can use Windows servers. Not too sure we can be of
much help.  

Doesn't make much business or technical sense when everything you need
is available for free. 

Anyway, the doc you will be needing would be furnished with the Windows
Communications Server V6 product and not any IBM site. That would
include any and all VTAM or TCP/IP configuration options needed to make
their product work. 

HTH and good luck (you are going to need it). 


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Ward, Mike S
Sent: Tuesday, July 07, 2009 12:52 PM
To: IBM-MAIN@bama.ua.edu
Subject: Communications Server

Hello all, I have been tasked to move our old sna\sdlc communications
controllers to a Windows communications server environment. We currently
have z\os V1.7 with VTAM and TCP\IP. We will be getting Windows
Communications Server V6 for the windows server that will take the place
of the old LU0 controllers at remote locations. I'm not sure where to
start in setting up communications from our VTAM environment to this
Windows environment. We currently use DLSW and Cisco routers to do the
sna/polling of the old controllers. Are there any books red or otherwise
that can help me with this? I have searched the IBM site for Windows
Communications server and LANDP, but I mostly get z/os communications
server books there. Any help will be appreciated. Thank you in advance.
==
 
NOTICE: This electronic mail message and any files transmitted with it
are intended
exclusively for the individual or entity to which it is addressed. The
message, 
together with any attachment, may contain confidential and/or privileged
information.
Any unauthorized review, use, printing, saving, copying, disclosure or
distribution 
is strictly prohibited. If you have received this message in error,
please 
immediately advise the sender by reply email and delete all copies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
==
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to which they are addressed. If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you
have received this e-mail by mistake and delete this e-mail from your system. 
If you are not the intended recipient
you are notified that disclosing, copying, distributing or taking any action in 
reliance on the contents of this
information is strictly prohibited.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Alert and Resolve price changes

2009-07-07 Thread Pommier, Rex R.
Greg,

Since nobody really responded to your inquiry - other than to not
hijack the thread... :-)


I can't find any price hike notification either, but I just got a bill
from IBM starting July 1 that sure looks like it is a price adjustment
to raise my monthly Resolve bill from $165 to $190 as well.  My
quarterly bill started June 23, so apparently the date of the hike is
7/1.

I vaguely recall seeing something talking about the price hike a while
back but the spider webs that used to be my brain aren't working too
well.

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Greg Shirey
Sent: Monday, July 06, 2009 2:19 PM
To: IBM-MAIN@bama.ua.edu
Subject: Alert and Resolve price changes

Hello all,

Was there a recent announcement from IBM that the charges for zSeries
Alert and/or zSeries Resolve were going up?  I don't remember one, and
searching for one has not turned up anything, so I'm turning to the
group for help.   

The following link on IBM's website shows the price for Resolve is $165
a month per user ID, but our most recent invoice indicates it is $190 a
month.  (a 15% increase!)  Alert has gone up similarly. 
http://www-935.ibm.com/services/us/index.wss/offering/its/a1000175/dt005

I'd appreciate it if someone can point me to an announcement I have
missed or any other information that sheds light on this situation.  

Thanks,
Greg Shirey
Ben E. Keith Co. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Where does z/unix store each lpar's hostname?

2009-07-07 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Mark Pace
 Sent: Tuesday, July 07, 2009 2:24 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Where does z/unix store each lpar's hostname?
 
 Ah, sorry, I was not aware of that.
 Mine from a SLES 10 or 11.

Mark,

OP was not for z/Linux but z/UNIX aka UNIX System Services for z/OS. Well, at 
least that's what I assumed.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


SHOWzOS 7.19 ready

2009-07-07 Thread Roland Schiradin
Hi folks, 

as of now I deliever the final release of SHOWzOS 7.19. It will be ready 
at cbttape.org soon. Please verify the update link on the left.
This version tolerate z/OS R11.

Whats new

*$719RS0309
* Implement enhancements contributed by Roland Schiradin RS0309
*   Report wrong ECVTEORM setting (potential real storage)   RS0609
*   APAR OA18766 cause ASMA057E in IOSDIOFC z/OS R7 and R8   RS0609
* Apply OA29017 to fix this problem  RS0609
*   Support IWMWSYSQ EXTENDED_DATA=YES z/OS R9 (HBB7740) 
RS0609
* Apply OA27032  RS0609
*   Report GDATotalCSAHWM and GDATotalECSAHWM z/OS R10   RS0509
* Includes also the converted CSA/ECSA   RS0509
*   Use CVTMAXMP instead of hardcoded value. Report also RS0509
* ECVT_Installed_CPU_HWM for z/OS R10RS0509
*   Show dynamic CDT (RACFDATA) and a bit more for   RS0409
* RACF Classes z/OS R6   RS0409
*   Support for 24bit LX (LXINFO and PCINFO) z/OS R6 RS0409
*   DFHRPL/STEPLIB concatination could be wrong  RS0309
*   Use SSAIR among other to support REUSASID(YES)   RS0309


In case of problems/abends please email PSW and Regs only. No dump is 
needed unless I ask for it. 

Pleas also note I'll held a presentation about SHOWzOS and COBANAL at the 
share confer in denver´. I hope to see and meet your there. Don't hesitate to 
drop me an email or discuss your issue at share. I'll be s SCIDS mostly hanging 
at the CICS table. 

Rgeards Roland

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Where does z/unix store each lpar's hostname?

2009-07-07 Thread Mark Pace
Oh, DUH!   You're probably correct.  I subscribe to to many lists.  Trying
to be helpful without fully paying attention.

On Tue, Jul 7, 2009 at 3:27 PM, McKown, John jmck...@healthmarkets.comwrote:

 
  Ah, sorry, I was not aware of that.
  Mine from a SLES 10 or 11.

 Mark,

 OP was not for z/Linux but z/UNIX aka UNIX System Services for z/OS.
 Well, at least that's what I assumed.

 --
 John McKown
 Systems Engineer IV
 IT

 Administrative Services Group

 HealthMarkets(r)

 9151 Boulevard 26 * N. Richland Hills * TX 76010
 (817) 255-3225 phone * (817)-961-6183 cell
 john.mck...@healthmarkets.com * www.HealthMarkets.com


-- 
Mark Pace
Mainline Information Systems
1700 Summit Lake Drive
Tallahassee, FL. 32317

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Alert and Resolve price changes

2009-07-07 Thread Eric Bielefeld
I can't really shed any light on the original question, but I am curious - 
can IBM raise rates without telling anyone?  If your shop had 3 users, and 
they raised the price $35 per user, you probably won't go broke.  If you had 
100 users, that would be $3,500 a month - something that might get noticed. 
Of course if you had 100 sysprogs all with userids, you'd be a mighty big 
shop!


I know the last shop I worked at didn't subscribe to any of the pay for 
services.  The few times I had problems, I had to call the support center. 
Never quite made sense, as I'm sure they could have givin me the internet 
access and saved money by not having to take my calls.  But then, IBM is 
primarily a marketing company, and very skilled at making the most money for 
the goods and services they provide.


Eric

Eric Bielefeld
Sr. Systems Programmer
Milwaukee, Wisconsin
414-475-7434


- Original Message - 
From: Pommier, Rex R. rex.pomm...@cnasurety.com




Greg,

Since nobody really responded to your inquiry - other than to not
hijack the thread... :-)


I can't find any price hike notification either, but I just got a bill
from IBM starting July 1 that sure looks like it is a price adjustment
to raise my monthly Resolve bill from $165 to $190 as well.  My
quarterly bill started June 23, so apparently the date of the hike is
7/1.

I vaguely recall seeing something talking about the price hike a while
back but the spider webs that used to be my brain aren't working too
well.

Rex 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Pinned data on 2107 aka DS8000

2009-07-07 Thread Eric Bielefeld
I hate to ask a dumb question, but what is pinned data?  I'm sure I once 
knew the answer to that question, but I can't for the life of me remember 
what it is.


Eric Bielefeld
Sr. Systems Programmer
Milwaukee, Wisconsin
414-475-7434 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Pinned data on 2107 aka DS8000

2009-07-07 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Eric Bielefeld
 Sent: Tuesday, July 07, 2009 2:50 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Pinned data on 2107 aka DS8000
 
 I hate to ask a dumb question, but what is pinned data?  I'm 
 sure I once 
 knew the answer to that question, but I can't for the life of 
 me remember 
 what it is.
 
 Eric Bielefeld

Data in cache which cannot be flushed onto the physical DASD, IIRC.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Skip Robinson
The problem with many simple delete-member processes for PDS--DSORG(PO)--
is that while the result is a PDS with no members, it may not be not truly
'empty'. That is, the data portion of the allocation is still occupied by
whatever content was there before member deletion. In order to finish the
process, you need to compress the memberless PDS to reclaim the space.

Programs like PDSCLEAR or StarTool FIX RESET render a PDS truly empty is a
single user operation.

PDSE behaves differently. Deleting a member makes previously occupied space
available for the next member to be added.

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


   
 carlos roberto
 visconde  
 cvisco...@ig.com  To 
 .BR  IBM-MAIN@bama.ua.edu
 Sent by: IBM   cc 
 Mainframe 
 Discussion List   Subject 
 ibm-m...@bama.ua Re: Delete all members of a PDS 
 .edu with JCL
   
   
 07/07/2009 12:06  
 PM
   
   
 Please respond to 
   IBM Mainframe   
  Discussion List  
 ibm-m...@bama.ua 
   .edu   
   
   




You can use iebupdte.

2009/7/7 Hal Merritt hmerr...@jackhenry.com

 IMS came with a utility that did exactly that and I adopted the
 empty-and-repopulate process with very good results for a number of
 products.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of Chris Hoelscher
 Sent: Tuesday, July 07, 2009 12:48 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Delete all members of a PDS with JCL

 we have run into may situations where when we are upgrading to a new
 release of a product (say IDMS or DB2) - we warn all users that ad-hoc
 jobs that access the runtime-loadlibs will mis-behave during the upgrade
 additionally - many jobs have JCL included for libraries they simply
don;t
 need


 however - many dont listen and submit jobs anyhow - we chose not to take
 the time to cancel these jobs so we can rename or delete - we just empty
 the PDS and then re-load with the newer contents!



 Chris Hoelscher
 Senior IDMS  DB2 Database Administrator
 Humana Inc
 502-476-2538
 choelsc...@humana.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Alert and Resolve price changes

2009-07-07 Thread Greg Shirey
Eric,

At this link: 
http://www-935.ibm.com/services/us/index.wss/offering/its/a1000175/dt005

which describes the pricing details for Resolve for zSeries ($165 a
month per user), it states: 

*Price is U.S. only, subject to change without notice and does not
include tax. Additional shipping charges may apply.
 
So, I guess IBM can change the price without notifying anybody, since
they say they can.  I'm just used to them announcing things like this
ahead of time.  

You make a good point about shops with multiple users.  They may want to
re-evaluate the number of subscriptions they have in these tight
economic times...  

Greg Shirey
Ben E. Keith Co. 

-Original Message-
From: IBM Mainframe Discussion List On Behalf Of Eric Bielefeld
Sent: Tuesday, July 07, 2009 2:35 PM

I can't really shed any light on the original question, but I am curious
- 
can IBM raise rates without telling anyone?  If your shop had 3 users,
and 
they raised the price $35 per user, you probably won't go broke.  If you
had 
100 users, that would be $3,500 a month - something that might get
noticed. 
Of course if you had 100 sysprogs all with userids, you'd be a mighty
big 
shop!

I know the last shop I worked at didn't subscribe to any of the pay for 
services.  The few times I had problems, I had to call the support
center. 
Never quite made sense, as I'm sure they could have givin me the
internet 
access and saved money by not having to take my calls.  But then, IBM is

primarily a marketing company, and very skilled at making the most money
for 
the goods and services they provide.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Roach, Dennis (N-GHG)
PDS86 is a free version (subset) of StarTool that supports both PDS and
PDS/E. You can get it from the CBT tape (http://www.cbttape.org) file
182. 

Dennis Roach
GHG Corporation
Lockheed Martin Mission Services
Facilities Design and Operations Contract
NASA/JSC
Address:
   2100 Space Park Drive 
   LM-15-4BH
   Houston, Texas 77058
Mail:
   P.O. Box 58487
   Mail Code H4C
   Houston, Texas 77258
Phone:
   Voice:  (281)336-5027
   Cell:   (713)591-1059
   Fax:(281)336-5410
E-Mail:  dennis.ro...@lmco.com

All opinions expressed by me are mine and may not agree with my employer
or any person, company, or thing, living or dead, on or near this or any
other planet, moon, asteroid, or other spatial object, natural or
manufactured, since the beginning of time.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of Skip Robinson
 Sent: Tuesday, July 07, 2009 3:17 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Delete all members of a PDS with JCL
 
 The problem with many simple delete-member processes for PDS--
 DSORG(PO)--
 is that while the result is a PDS with no members, it may not be not
 truly
 'empty'. That is, the data portion of the allocation is still occupied
 by
 whatever content was there before member deletion. In order to finish
 the
 process, you need to compress the memberless PDS to reclaim the space.
 
 Programs like PDSCLEAR or StarTool FIX RESET render a PDS truly empty
 is a
 single user operation.
 
 PDSE behaves differently. Deleting a member makes previously occupied
 space
 available for the next member to be added.
 
 .
 .
 JO.Skip Robinson
 Southern California Edison Company
 Electric Dragon Team Paddler
 SHARE MVS Program Co-Manager
 626-302-7535 Office
 323-715-0595 Mobile
 jo.skip.robin...@sce.com
 
 
 
  carlos roberto
  visconde
  cvisco...@ig.com
 To
  .BR  IBM-MAIN@bama.ua.edu
  Sent by: IBM
 cc
  Mainframe
  Discussion List
 Subject
  ibm-m...@bama.ua Re: Delete all members of a PDS
  .edu with JCL
 
 
  07/07/2009 12:06
  PM
 
 
  Please respond to
IBM Mainframe
   Discussion List
  ibm-m...@bama.ua
.edu
 
 
 
 
 
 
 You can use iebupdte.
 
 2009/7/7 Hal Merritt hmerr...@jackhenry.com
 
  IMS came with a utility that did exactly that and I adopted the
  empty-and-repopulate process with very good results for a number of
  products.
 
  -Original Message-
  From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
  Behalf Of Chris Hoelscher
  Sent: Tuesday, July 07, 2009 12:48 PM
  To: IBM-MAIN@bama.ua.edu
  Subject: Re: Delete all members of a PDS with JCL
 
  we have run into may situations where when we are upgrading to a new
  release of a product (say IDMS or DB2) - we warn all users that ad-
 hoc
  jobs that access the runtime-loadlibs will mis-behave during the
 upgrade
  additionally - many jobs have JCL included for libraries they simply
 don;t
  need
 
 
  however - many dont listen and submit jobs anyhow - we chose not to
 take
  the time to cancel these jobs so we can rename or delete - we just
 empty
  the PDS and then re-load with the newer contents!
 
 
 
  Chris Hoelscher
  Senior IDMS  DB2 Database Administrator
  Humana Inc
  502-476-2538
  choelsc...@humana.com
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Guy Gardoit
Wow.  I'd never want to follow such a, well, non-standard, practice.  But,
to each his own.Ever consider using SYMBOLICRELATE??

Guy Gardoit
z/OS Systems Programming

On Tue, Jul 7, 2009 at 10:48 AM, Chris Hoelscher choelsc...@humana.comwrote:

 we have run into may situations where when we are upgrading to a new
 release of a product (say IDMS or DB2) - we warn all users that ad-hoc
 jobs that access the runtime-loadlibs will mis-behave during the upgrade
 additionally - many jobs have JCL included for libraries they simply don;t
 need


 however - many dont listen and submit jobs anyhow - we chose not to take
 the time to cancel these jobs so we can rename or delete - we just empty
 the PDS and then re-load with the newer contents!



 Chris Hoelscher
 Senior IDMS  DB2 Database Administrator
 Humana Inc
 502-476-2538
 choelsc...@humana.com



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Anynet

2009-07-07 Thread Ward, Mike S
Hello all, is anynet incorporated into z/os vtam like enterprise
extender is? Or is there any way to communicate with an SNA
Gateway(Communications Server) from z/os 1.7 using the enterprise
extender functions?

Thanks.
==
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to which they are addressed. If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you
have received this e-mail by mistake and delete this e-mail from your system. 
If you are not the intended recipient
you are notified that disclosing, copying, distributing or taking any action in 
reliance on the contents of this
information is strictly prohibited.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Alert and Resolve price changes

2009-07-07 Thread Ken Porowski
I have never found reliable pricing information of the various
SoftwareXcel features.  
It was hard enough finding ANY information on them.

Matrix of SoftwareXcel features (no prices though)

http://www.vm.ibm.com/service/zmatrix.pdf 

IIRC we always got SoftwareXcel bundled with our hardware maint
contract.  Supposedly if you do this you get a break (10%?) on the
hardware side.  The savings on the hardware easily pays for the SwXcel
features (at least for one user anyway.  We were able to save a bundle
by getting prices for the individual components.

SwXcel Basic
SwXcel Enterprise
Alert
Resolve

I think we ended up with just Alert  Resolve so I gave up ASKQ and
premium response but the savings were over 6 figures for just one
userid.


-Original Message-
Greg Shirey

Eric,

At this link: 
http://www-935.ibm.com/services/us/index.wss/offering/its/a1000175/dt005

which describes the pricing details for Resolve for zSeries ($165 a
month per user), it states: 

*Price is U.S. only, subject to change without notice and does not
include tax. Additional shipping charges may apply.
 
So, I guess IBM can change the price without notifying anybody, since
they say they can.  I'm just used to them announcing things like this
ahead of time.  

You make a good point about shops with multiple users.  They may want to
re-evaluate the number of subscriptions they have in these tight
economic times...  

Greg Shirey
Ben E. Keith Co. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Alert and Resolve price changes

2009-07-07 Thread Eric Bielefeld

Greg,

Thanks for the info.  I didn't find the part about raising rates at any time 
that you quoted (I didn't look too hard), but I really think they shouldn't 
quote the $165 / month rate and then charge you more!  That just seems to be 
a bad business practice.


Eric

Eric Bielefeld
Sr. Systems Programmer
Milwaukee, Wisconsin
414-475-7434


- Original Message - 
From: Greg Shirey wgshi...@benekeith.com

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@bama.ua.edu
Sent: Tuesday, July 07, 2009 3:33 PM
Subject: Re: Alert and Resolve price changes



Eric,

At this link:
http://www-935.ibm.com/services/us/index.wss/offering/its/a1000175/dt005

which describes the pricing details for Resolve for zSeries ($165 a
month per user), it states:

*Price is U.S. only, subject to change without notice and does not
include tax. Additional shipping charges may apply.

So, I guess IBM can change the price without notifying anybody, since
they say they can.  I'm just used to them announcing things like this
ahead of time.

You make a good point about shops with multiple users.  They may want to
re-evaluate the number of subscriptions they have in these tight
economic times...

Greg Shirey
Ben E. Keith Co.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Pinned data on 2107 aka DS8000

2009-07-07 Thread Eric Bielefeld
John - Thanks for the definition.  That brings furthur questions.  How does 
data get into the cache that can't be written to disk?  Is that something 
caused by a power failure for the device, or some other failure?  Also, I 
would think that if that condition can cause the 2107 not to work, that 
there should be some easy way for the customer to push a button or type in 
something on the service console to clear the cache.  To me it sounds like a 
design flaw, although I haven't kept up with the technical details of the 
2107 as well as I should be.


Eric

Eric Bielefeld
Sr. Systems Programmer
Milwaukee, Wisconsin
414-475-7434


- Original Message - 
From: McKown, John jmck...@healthmarkets.com



-Original Message-
From: IBM Mainframe Discussion List
[mailto:ibm-m...@bama.ua.edu] On Behalf Of Eric Bielefeld
Sent: Tuesday, July 07, 2009 2:50 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Pinned data on 2107 aka DS8000

I hate to ask a dumb question, but what is pinned data?  I'm
sure I once
knew the answer to that question, but I can't for the life of
me remember
what it is.

Eric Bielefeld


Data in cache which cannot be flushed onto the physical DASD, IIRC.

--
John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Paul Gilmartin
On Tue, 7 Jul 2009 13:17:24 -0700, Skip Robinson wrote:

PDSE behaves differently. Deleting a member makes previously occupied space
available for the next member to be added.

But perhaps not immediately, if other jobs are holding
the PDSE OPEN.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Pinned data on 2107 aka DS8000

2009-07-07 Thread Bruno Sugliani
On Tue, 7 Jul 2009 16:26:55 -0500, Eric Bielefeld eric-ibmm...@wi.rr.com
wrote:

John - Thanks for the definition.  That brings furthur questions.  How does
data get into the cache that can't be written to disk?  Is that something
caused by a power failure for the device, or some other failure?  Also, I
would think that if that condition can cause the 2107 not to work, that
there should be some easy way for the customer to push a button or type in
something on the service console to clear the cache.  To me it sounds like a
design flaw, although I haven't kept up with the technical details of the
2107 as well as I should be.

Device end came back , power went off before data for thre track was 
hardened onto the disk .
The command to use is setcache with the proper parameters cfw pendingoff 
or else  
The problem is that this was tried by the OP but did not succeed .
But it is normaly the simple way to do it so there is no design flaw.
Perhaps there is a hardware problem.
Bruno Sugliani 
zxnetconsult(at)free(dot)fr
http://zxnetconsult.free.fr 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Communications Server

2009-07-07 Thread Hal Merritt
I stand corrected. Here's your doc:

http://www-01.ibm.com/software/network/commserver/windows/

It seems to be a -network- product, not a z/os product. 



-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Ward, Mike S
Sent: Tuesday, July 07, 2009 2:25 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Communications Server

The communications server is an IBM product so I would have guessed that
on the z/os side a guide would show me how to connect the CS as an APPN
node or better yet, how I could continue to use the DLSW\CISCO
connectivity already there. It's not an issue as much as it's what
should I do first and how.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Hal Merritt
Sent: Tuesday, July 07, 2009 1:32 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Communications Server

Sounds like you have Windows issues, not z/os. Also sounds like you also
have some serious political issues in insisting on spending a lot of
money just so you can use Windows servers. Not too sure we can be of
much help.  

Doesn't make much business or technical sense when everything you need
is available for free. 

Anyway, the doc you will be needing would be furnished with the Windows
Communications Server V6 product and not any IBM site. That would
include any and all VTAM or TCP/IP configuration options needed to make
their product work. 

HTH and good luck (you are going to need it). 


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Ward, Mike S
Sent: Tuesday, July 07, 2009 12:52 PM
To: IBM-MAIN@bama.ua.edu
Subject: Communications Server

Hello all, I have been tasked to move our old sna\sdlc communications
controllers to a Windows communications server environment. We currently
have z\os V1.7 with VTAM and TCP\IP. We will be getting Windows
Communications Server V6 for the windows server that will take the place
of the old LU0 controllers at remote locations. I'm not sure where to
start in setting up communications from our VTAM environment to this
Windows environment. We currently use DLSW and Cisco routers to do the
sna/polling of the old controllers. Are there any books red or otherwise
that can help me with this? I have searched the IBM site for Windows
Communications server and LANDP, but I mostly get z/os communications
server books there. Any help will be appreciated. Thank you in advance.
==
 
NOTICE: This electronic mail message and any files transmitted with it
are intended
exclusively for the individual or entity to which it is addressed. The
message, 
together with any attachment, may contain confidential and/or privileged
information.
Any unauthorized review, use, printing, saving, copying, disclosure or
distribution 
is strictly prohibited. If you have received this message in error,
please 
immediately advise the sender by reply email and delete all copies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
==
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to which they are addressed. If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you
have received this e-mail by mistake and delete this e-mail from your system. 
If you are not the intended recipient
you are notified that disclosing, copying, distributing or taking any action in 
reliance on the contents of this
information is strictly prohibited.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
NOTICE: This electronic mail message and any files transmitted with it are 
intended
exclusively for the individual or entity to which it is addressed. The message, 
together with any attachment, may contain confidential and/or privileged 
information.
Any unauthorized review, use, printing, saving, copying, disclosure or 
distribution 
is strictly prohibited. If you have received this message in error, please 
immediately advise the sender by reply email and delete all copies.

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

Re: Pinned data on 2107 aka DS8000

2009-07-07 Thread Shane
On Tue, 2009-07-07 at 16:26 -0500, Eric Bielefeld wrote:

 Also, I 
 would think that if that condition can cause the 2107 not to work, that 
 there should be some easy way for the customer to push a button or type in 
 something on the service console to clear the cache.  To me it sounds like a 
 design flaw, although I haven't kept up with the technical details of the 
 2107 as well as I should be.

Allow customers yet another way to easily destroy their own data. I
don't think so - they seem to find enough ways on their own.
Pinned data has (potentially) existed for as long as (nonvolatile)
cached controllers have. If the data haven't made it out to the
(customer) disk, it is kept until it can be destaged cleanly. During
that time, the data on the disk is not current/valid. The problem is
that the application has been told otherwise.
Ron (and others no doubt) will be able to give some idea of what will
cause pinned events on current kit.

Shane ...

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Alert and Resolve price changes

2009-07-07 Thread Bruno Sugliani
On Tue, 7 Jul 2009 16:21:42 -0500, Eric Bielefeld eric-ibmm...@wi.rr.com
wrote:

Greg,

Thanks for the info.  I didn't find the part about raising rates at any time
that you quoted (I didn't look too hard), but I really think they shouldn't
quote the $165 / month rate and then charge you more!  That just seems to be
a bad business practice.

Another common practice in Europe, is to receive  a letter saying that in
order to 
adjust rates of change between USA and Europe as well as reducing price
differences between european country , some of the product will be reajusted
in a range of -3 % to + 6%  ( it is an example) 
They normally provide a target date. You have no say in the matter. 

Bruno Sugliani 
zxnetconsult(at)free(dot)fr
http://zxnetconsult.free.fr

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Anynet

2009-07-07 Thread Patrick O'Keefe
On Tue, 7 Jul 2009 16:03:10 -0500, Ward, Mike S 
mw...@ssfcu.org wrote:

Hello all, is anynet incorporated into z/os vtam like enterprise
extender is? Or is there any way to communicate with an SNA
Gateway(Communications Server) from z/os 1.7 using the enterprise
extender functions?


ANYNET is no longer supposed (as of 1.8 I think).
I'm not sure what you mean by 
SNA Gateway(Communications Server).

There are a number of products called SNA Gateway.  They only 
one(s) I know of that are Communication Servers are the IBM one
for AIX and maybe for AS/400.   I think both AIX and AS/400 support 
EE, but I'm not sure what the software is called. 


Do you maybe mean the microsoft SNA gateway?  I think it supports
EE.  So do Cisco routers through the Cisco SNASwitch.  SNASw and
DLSw can run in the same router with a virtual LAN between them.
That is sort of the standard was of supporting DLSW-connected 
SNA devices.   If your remote routers are powerful enough you can
run SNASw out at the remote sites and benefit from HPR APPN all 
the way out to those devices, but I think it is more common to 
replace the FEP with a DLSw/SNASw router.

Pat O'Keefe

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Computerworld: London Stock Exchange to Abandon Windows

2009-07-07 Thread Paul Gilmartin
On Mon, 6 Jul 2009 11:28:29 -0500, McKown, John wrote:

 -Original Message-
 From: IBM Mainframe Discussion List
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Edward Jaffe

 But, Linux runs on z. Windows doesn't. It's a big step in the right
 direction.

Proportedly, Windows can run on z. z/VOS (CMS based) from Mantissa is said to 
allow MS Windows (unmodified) to run under z/VM. It is some sort of jit type 
intepreter / compiler for x86.

http://www.mantissa.com/SHARE-conference

But why would anyone choose to run Windows on z?  Aside from:

o He can afford a z, but not a PC (stranger things have
  happened).

o He's titillated by the sheer irony of running notoriously
  unreliable software on outstandingly reliable hardware.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete all members of a PDS with JCL

2009-07-07 Thread Richard Peurifoy

Paul Gilmartin wrote:

On Tue, 7 Jul 2009 13:17:24 -0700, Skip Robinson wrote:

PDSE behaves differently. Deleting a member makes previously occupied space
available for the next member to be added.


But perhaps not immediately, if other jobs are holding
the PDSE OPEN.


Does anyone know how to find who has connections to members in
a PDSE? I looked for an API or command once, but didn't find anything.

Maybe I just didn't look in the right place.

If a PDSE is in LNKLST, is there a connection to each member?
If so, the library might need to be much larger to allow replacing
members without an IPL. I guess the safe thing would be to create a
new library and dynamically add it to LNKLST, but then if you want
running jobs to use it you have to issue
SETPROG LNKLST,UPDATE,JOB=name or *.

--
Richard

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Preview: z/VM V6.1; IBM Declares New Architecture Level Set (ALS)

2009-07-07 Thread Timothy Sipples
IBM has released a preview announcement of z/VM Version 6.1, Statements of
Direction, an FAQ list, and other details here:

http://www.vm.ibm.com/zvm610

z/VM Version 6.1 has planned general availability in the fourth quarter of
2009.

Through this preview announcement, IBM is declaring a second architecture
level set (ALS) for z/Architecture. The System z10 (EC and BC) machines
implement the new ALS. z/VM V6.1 requires the new ALS.

Reminder: what I post is only what I say. What IBM posts is what IBM says.
These two categories are completely different, so please don't confuse
them. Thanks.

- - - - -
Timothy Sipples
IBM Consulting Enterprise Software Architect
Based in Tokyo, Serving IBM Japan / Asia-Pacific
E-Mail: timothy.sipp...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Symbolic parameters inside SYSIN

2009-07-07 Thread Kirk Wolf
All of you Unix-haters, please look away  :-)

It turns out that the Unix shell has nice variable substitution
capabilities, and with our free Co:Z Batch utility (think BPXBATCH without
the warts), you can run it to tailor data with variable substitution.

Here's Victor's example reworked to do this:

//*/
/* (1) Run an inline shell to tailor input using env vars
//*/
//DELVSAM PROC VDSN='?' - VSAM DSN
//S1  EXEC PGM=COZBATCH,PARM='/VDSN=VDSN'
//STDIN DD *   Input to the Unix shell
cat  EOF
  DELETE ( $VDSN ) PURGE SCRATCH
EOF
//STDOUT   DD  UNIT=VIO,DISP=(,PASS),
// SPACE=(TRK,1,1)),
// DSN=WORK,
// DCB=(BLKSIZE=80,LRECL=80,RECFM=FB)
//*/
/* (2) RUN IDCAMS TO DELETE CLUSTER
//*/
/DELDEFIN EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSINDD  DISP=SHR,DSN=WORK
//PEND

Another feature of COZBATCH is its ability to deal with the 100 character
PARM limit by stringing multiple steps together that set environment
variables.   See example #6 here:
http://dovetail.com/docs/cozbatch/examples.html

OK - Pardon me if I sound like the Sham-Wow guy, but what if you wanted to
delete all the clusters that matched a certain catalog search pattern
(IGGCSI00)?   The following combines COZBATCH with our catsearch shell
command (also included the free Co:Z Toolkit) and the Unix awk command:

//*/
/* (1) Run an inline shell to generate IDCAMS stmnts
//*/
//DELVSAM PROC PAT='HLQ.TEST.**.KSDS'
//S1  EXEC PGM=COZBATCH,PARM='/PAT=PAT'
//STDIN DD *   Input to the Unix shell
catsearch $PAT  |
awk '{  print DELETE ( $1 ) PURGE SCRATCH  }'
//STDOUT   DD  UNIT=VIO,DISP=(,PASS),
// SPACE=(TRK,1,1)),
// DSN=WORK,
// DCB=(BLKSIZE=80,LRECL=80,RECFM=FB)
//*/
/* (2) RUN IDCAMS TO DELETE CLUSTERS
//*/
/DELDEFIN EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSINDD  DISP=SHR,DSN=WORK
//PEND

Kirk Wolf
Dovetailed Technologies
http://dovetail.com

On Tue, Jul 7, 2009 at 12:53 PM, Victor Gil victor@broadridge.comwrote:

 Henrique,

 The below PROC is a sample of what you'd like to accomplish as it deletes a
 passed VSAM ds-name. The method is useful when SYSIN has only several
 VARIABLE cards. Also the PROC is easily convertable to plain JCL with the
 SET
 symbols:

 //DELVSAM PROC VDSN='?' - VSAM DSN
 //*/
 /* (1) GENERATE TEMP INSTRUCTION WITH THE DSN:
 //*/
 /GENTEMP  EXEC PGM=ASMA90,X
 // PARM=('SYSPARM(   VDSN -)')
 //SYSINDD  DSN=your.source.pds(PARMTODD),DISP=SHR
 //SYSUT1   DD  SPACE=(4096,(2,2)),UNIT=VIO
 //SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR
 //SYSPRINT DD  DUMMY
 //SYSLIN   DD  UNIT=VIO,DISP=(,PASS),SPACE=(TRK,1,1)),
 // DSN=amp;WORK,
 // DCB=(BLKSIZE=80,LRECL=80,RECFM=FB)
 //*/
 /* (2) RUN IDCAMS TO DELETE CLUSTER
 //*/
 /DELDEFIN EXEC PGM=IDCAMS
 //SYSPRINT DD SYSOUT=*
 //SYSINDD  DISP=SHR,DSN=skeleton(DELDEF1)   - DELETE ( -
 //   DD  DISP=(SHR,PASS),DSN=amp;WORK- VDSN
 //   DD  DISP=SHR,DSN=skeleton(DELDEF2) - ) PURGE SCRATCH
 //PEND


 where member PARMTODD is the following 2-line program placed in your source
 library

  PUNCH 'SYSPARM'
  END

 Hope this helps,
 -Victor-



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Communications Server

2009-07-07 Thread Timothy Sipples
Mike,

Any chance you could sketch out a mental picture for us of your network and
application architecture? I think I understand that you have something that
currently requires an LU0 connection to your mainframe. (What is that
something? How many of them are there? And what's on the mainframe end?) I
think the concern is that you might be doing extra work (and adding extra
cost) that is unnecessary. Gateways of various kinds were very common a
couple decades ago, but at least an awful lot of them are no longer
required since so much of that function is built-in now. So people kind of
get worried when somebody asks about rolling out lots of new gateways.

IBM Communications Server for Windows has its uses, but (since I speak only
for myself anyway) I'd be happy to tell you whether or not you actually
need it. I'm like the Santa who works at Macy's. :-)

- - - - -
Timothy Sipples
IBM Consulting Enterprise Software Architect
Based in Tokyo, Serving IBM Japan / Asia-Pacific
E-Mail: timothy.sipp...@us.ibm.com
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Computerworld: London Stock Exchange to Abandon Windows

2009-07-07 Thread Gibney, Dave
  Because the Window Server Application is not available in native z
or Linux and they want the reliability of the zHardware :)

Dave Gibney
Information Technology Services
Washington State University


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of Paul Gilmartin
 Sent: Tuesday, July 07, 2009 3:25 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Computerworld: London Stock Exchange to Abandon Windows
 
 On Mon, 6 Jul 2009 11:28:29 -0500, McKown, John wrote:
 
  -Original Message-
  From: IBM Mainframe Discussion List
  [mailto:ibm-m...@bama.ua.edu] On Behalf Of Edward Jaffe
 
  But, Linux runs on z. Windows doesn't. It's a big step in the right
  direction.
 
 Proportedly, Windows can run on z. z/VOS (CMS based) from Mantissa is
 said to allow MS Windows (unmodified) to run under z/VM. It is some
 sort of jit type intepreter / compiler for x86.
 
 http://www.mantissa.com/SHARE-conference
 
 But why would anyone choose to run Windows on z?  Aside from:
 
 o He can afford a z, but not a PC (stranger things have
   happened).
 
 o He's titillated by the sheer irony of running notoriously
   unreliable software on outstandingly reliable hardware.
 
 -- gil
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Pinned data on 2107 aka DS8000

2009-07-07 Thread Ted MacNEIL
To me it sounds like a. design flaw, although I haven't kept up with the 
technical details of the 2107 as well as I should be.

Pinned data is not new with the 2107.
It's been around since the 3990-3, at least.
-
Too busy driving to stop for gas!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Messages as Programming Interfaces

2009-07-07 Thread W. Kevin Kelley
On Mon, 6 Jul 2009 20:07:54 -0500, Paul Gilmartin paulgboul...@aim.com 
wrote:

It is my understanding that IBM discourages the use of
message texts as programming interfaces.  Can anyone
point me to a clear statement of this in IBM documentation?

(Notwithstanding that IBM is very reluctant to change
messages lest that disrupt automated operations.)

Your understanding is correct -- but I doubt that there has ever been a formal 
pronouncement to that effect. 

I wouldn't say that we are very reluctant to make changes to messages so 
much as we want to make sure that the change is necessary, and if 
necessary, is done in the least disruptive way possible both for people and 
automatons. We have made changes to certain messages so that they are 
more easily automatable.

W. Kevin Kelley  IBM POK Lab -- z/OS Core Technical Development

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Bo Decker III is out of the office.

2009-07-07 Thread Bo Decker III
I will be out of the office starting  07/07/2009 and will not return until
07/11/2009.

I will respond to your message when I return.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Question about REUS=NONE

2009-07-07 Thread Bill Klein
Others may have given you most of the answers that you want, but you should
check out:
   Handling COBOL limitations with multithreading
at:
   http://publibfp.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/igy3pg40/4.4.6 

and
   THREAD
at
   http://publibfp.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/igy3pg40/2.4.54 

and
  Comparison of WORKING-STORAGE and LOCAL-STORAGE
at
   http://publibfp.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/igy3pg40/1.1.3.2 

and 
  Sharing data in recursive or multithreaded programs
at
   http://publibfp.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/igy3pg40/1.1.3.3.3 



 * * * * * *

In general, I think that when you convert (upgrade) to Enterprise COBOL, you
will find that (as long as you keep using an Assembler driver to start the
threads), that you can have supported COBOL applications that do what you
want.

Michael Knigge michael.kni...@set-software.de wrote in message
news:4a531f8e.6060...@set-software.de...
 All,
 
 once upon the time, we had to write an application (in VS COBOL II) that
   uses subtasks.
 
 Because this old COBOL release did not support subtasks, we did a trick:
 We've attached from an ASM driver a little ASM stub that did just one
 thing: call the wanted COBOL prog.
 
 We had to link all COBOL-Modules statically to get all this stuff
 working. The COBOL progs are also using some ASM Subs for some special
 things (i. e. doing a GETMAIN, FREEMAIN, STIMERM and so on). They are
 also statically linked. So the initial ATTACH attaches a really big
thing...
 
 
 Now we are just about 13 years later and I have to convert this
 application. We want to use Enterprise COBOL and dynamic CALLs.
 
 
 Now. I guess all the COBOL-Stuff will work pretty well (I guess that
 the WOKING-STORAGE gets getmained for every new copy of the COBOL-Prog
 within each subtask).
 
 But I wonder how to migrate the ASM-Subs nearly painless I could
 rewrite all this ASM-Subs and use dynamic Saveareas but I wonder if just
 using REUS=NONE would do the same job...
 
 So bring it to a question: What is the scope of the REUS-Option?
 (Sub)Task-Level? Then using REUS=NONE would bring up a new copy of the
 ASM-Stubs for every Subtask - just what I need I don't care for the
 wasted memory because the ASM-Subs are mostly rather small (and well,
 today they are all statically linked together with some really big
 COBOL-Subs)
 
 
 Thank you for hints
 
 
 Bye,
 Michael
 
 
 
 -- 
 Mit freundlichen Grüßen
 
 Michael Knigge
 Entwicklung
 
 
 S.E.T. Software GmbH
 Lister Straße 15
 30163 Hannover
 
 Tel.  +49 511/3 97 80-23
 Fax   +49 511/3 97 80-65
 michael.kni...@set-software.de
 
 Handelsregister: HRB52778 Amtsgericht Hannover
 Geschäftsführer: Till Dammermann, Klaus Stöhr
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Command program from the cbt

2009-07-07 Thread Brian Westerman
The main problem is security.  How do you keep someone from doing things you
really didn't intend them to do?  Auditors get kind of upset with utilities
that don't have built-in security, and tend to become happy when you point
out a interface to the security system, (that you are actually using).  It's
fairly easy to circumvent static Userids in the programs, and much more
difficult to fool RACF or ACF/2, (though not entirely impossible, but
auditors don't think that way:) ).  

You're right though, if all you want to do is stream a bunch of commands
with no logic to drive them, then there are lots of ways to accomplish that.

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Offload work to ziip

2009-07-07 Thread O'Connor, David
Here is a link to a whitepaper from CA on zIIP exploitation, so it is
not product marketing as such but may shed some light on the
discussion... (or raise a whole lot more questions).
 
http://www.ca.com/files/WhitePapers/ziip_exploitation_wp3.pdf

Cheers, DOC


-Original Message-
From: McKown, John [mailto:jmck...@healthmarkets.com] 
Sent: Tuesday, 7 July 2009 3:30 AM
Subject: Re: Offload work to ziip

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Bob Shannon
 Sent: Monday, July 06, 2009 12:21 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Offload work to ziip
 
 Some people seem to think they are going to get something for 
 nothing. IBM provides specialty engines for limited purposes. 
 Does anyone really believe they will purchase a specialty 
 engine at reduced cost and then be able use it to run 
 unlimited work? Specialty engines do not count against 
 aggregated CPU capacity. Does anyone really believe that 
 every other vendor (including IBM) will allow their products 
 to run on specialty engines without paying an upgrade fee?
 
 Bob Shannon

That's my feeling as well. IBM created IFLs, zIIPs, and zAAPs for
specific purposes. Getting around that, even if legal (as I assume it
is), is simply going to invite some sort of retaliation from IBM and
vendors. Such as discontinuing their use or charging for MSUs, or (my
way) doing something sneaky in the microcode to cause the bypass
functionality to fail.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or
proprietary information. If you are not the intended recipient, please
contact the sender by reply e-mail and destroy all copies of the
original message. HealthMarkets(r) is the brand name for products
underwritten and issued by the insurance subsidiaries of HealthMarkets,
Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life
Insurance Company of TennesseeSM and The MEGA Life and Health Insurance
Company.SM

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


TCO calculator saves mainframe MIPs

2009-07-07 Thread Ed Gould
http://www.computerweekly.com/Articles/2009/07/07/236797/tco-calculator-saves-mainframe-mips.htm
(watch wrap)
Businesses running IBM zSeries mainframes can now see how much they could save 
by offloading workloads to IBM's add-on zIIP processor.The z Integrated 
Information Processor (zIIP) is a lower-cost alternative for running certain 
mainframe applications.Analyst company WinterGreen Research has built a 
web-based calculator to measure the total cost of ownership of mainframe 
service oriented architecture (SOA) applications that use zIIP in combination 
with DataDirect Shadow integration middleware from DataDirect Technologies.




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html