Re: How to find a PDS member

2012-01-04 Thread Lizette Koehler
 
 Graham Hobbs gho...@cdpwise.net wrote in message
 news:5e97g75eqo2bi4cfbrhqcm9phcacji9...@4ax.com...
  Hello,
  Just returned to z/OS mainframe after 10 years, working alone, nobody
  to talk to:-(. My first elementary question:
 
  - there are many PDS's in the environment I now have access to
  - need to find which PDS(s') members called ABCCOP* exist
  - I don't know which PDS it or they are in
 
  - Question: Can I find it/them with ISPF 3.14 or 3.15; if not then
  how?
 
  Please, thanks, more duqu's to come:-) Graham
 

Graham,

What are you trying to do?
1)  A selected list of PDS datasets and then search for all members of
ABCCOP*
2)  Generate a list of PDS Datasets (unknown number) which include members
for ABCCOP*
3)  Any datasets in my logon proc that contains ABCCOP* (including LINKLST
and LPALST)

In Option 3.4, you can use a command called SRCHFOR that might be of help.

Lizette

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


Re: Copying a PDS to a similiar PDS (backup)

2012-01-04 Thread Lizette Koehler
 Graham Hobbs gho...@cdpwise.net wrote in message
 news:jbb7g7p5l51mvm9oooc549bv1tmh1hc...@4ax.com...
  Hello,
  Just returned to z/OS mainframe after 10 years, working alone, nobody
  to talk to:-(. My next elementary question:
 
  - I need to backup my 80 byte source library PDS's
  - have read that IEBCOPY is no longer authorized .. and I couldn't
  make it work anyway
  - googling doesn't give clear answer
 
  - Question: how to copy such a PDS to an exactly similiar backup PDS
 
  Please, thanks,
  Graham Hobbs

Graham,
You may have heard that in z/OS V1.13 that IEBCOPY no longer needs to be apf
authorized for some functions.  That does not mean that IEBCOPY no longer
works.  You may wish to look at the share presentation from Aug 2011 on
IEBCOPY and changes coming up with z/OS V1.13.

IEBCOPY is still a good backup for PDS datasets.

DFDSS is a good backup for most datasets

What specifically do you want to do with the backup?  Is this archive,
transport, 

I did not see your original post.  Are you on the LISTSERVER or some other
news process?  If you have not joined the listserver please do, a lot more
of us will see your postings then.

Lizette

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


Re: Re-Linkling a load module with AC(1)

2012-01-04 Thread Binyamin Dissen
A blast from the past.

On Tue, 3 Jan 2012 14:42:27 -0800 Schwarz, Barry A
barry.a.schw...@boeing.com wrote:

:Try eliminating the second include.  Also verify that PCOPY actually has text.
:
: -Original Message-
: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
: Behalf Of Fred Kaptein
: Sent: Thursday, November 03, 2011 1:11 PM
: To: IBM-MAIN@bama.ua.edu
: Subject: Re-Linkling a load module with AC(1)
:
: Hello,
:
: I am looking to relink a vendor supplied program module which is set up
: similar to the following:
:   - Module name is PCOPY
:   - Module PCOPY is linked as AC(0)
:   - Module PCOPY has an alias which is PCOPY2
:   - Module PCOPY and PCOPY2 are in 'PCOPY.LOADLIB'
:
: I would like to relink PCOPY with the following:
:- Linked as AC(1)
:- Retain the alias PCOPY2
:- Linked into a test load library called 'PCOPY.TESTLIB'
:
: I tried the following JCL:
: //LKED EXEC  PGM=IEWL,PARM='LET,LIST=SUMMARY,MAP,NCAL,XREF,AC=1'
: //SYSLIB  DD DSN=PCOPY.LOADLIB,DISP=SHR
: //SYSLMOD  DD DSN=PCOPY.TESTLIB,DISP=SHR
: //SYSUT1 DD DSN=SYSUT1,UNIT=SYSDA,SPACE=(CYL,(10,10))
: //SYSPRINT  DD SYSOUT=*
: //SYSLIN  DD *
:   INCLUDE SYSLIB(PCOPY)
:   INCLUDE SYSLIB(PCOPY2)
:   NAME PCOPY
:   AC(1)
:   ALIAS PCOPY2
:
: but it fails with the following errors
:
: IEW2230S 0414 MODULE HAS NO TEXT.
: IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED.
: IEW2621E 4314 EXISTING ALIAS NAME PCOPY2 WITHIN MODULE TEMPNAM0 MATCHES
: ALIAS  BEING ADDED.
: IEW2012I 0F09 ALL TEMPNAMES HAVE BEEN USED. THE MODULE CANNOT BE SAVED.
: IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  12.
:
:--
:For IBM-MAIN subscribe / signoff / archive access instructions,
:send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

--
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: INFO IBM-MAIN


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Mike Wood
Gerard,  RMM has no way to push information out to places that want it, other 
than conventional mvs based options; writing to files/sysout, cmd line output 
 Others mentioned FTP, XMIT/NJE, email, even zFS/HFS 

DFSMS includes NFS support and provides transparent access to mvs programs via 
OPEN, so you could consider writing to a file that can be read from another 
system.

Another option, could be to run a job step that your job scheduler (TWS for 
example) can detect and can drive an activity on your other system to then pull 
the information from rmm.  

rmm includes capabilities via its APIs to request remote execution of a command 
via web services and to return the data as an XML file which you could then 
process. rmm ships sample program which can readily be used to demonstrate that 
capability.  No need to install anything on your clients systems - but some 
small setup required to make the api available via web services.
See the DFSMSrmm Application Programming Interface 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/ez2zo112?filter=rmmSUBMIT=Search+titles

Mike Wood

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


Re: A design question

2012-01-04 Thread Jan MOEYERSONS
On Wed, 4 Jan 2012 14:24:51 +0930, Anthony Thompson 
anthony.thomp...@nt.gov.au wrote:

 What I want to do is write a BCPii interface that is Windoze driven (i.e. 
 Java that calls C++?).
 Any pointers in this direction would be appreciated.

JNI is the word for you. Java can call C++ and vice-versa. Do be carefull about 
obtaining and releasing the global and local references to your Java classes 
and objects in time so you don't run into performance problems and so the 
garbage collector can do its job properly.

http://java.sun.com/docs/books/jni/ is a good start for a long read.

Cheers,

Jantje.

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


Re: How to find a PDS member

2012-01-04 Thread Lindy Mayfield
Hello Graham,

Welcome back.  :-)

You can make TSO Rexx to list datasets based on wild cards, and so on, by 
making a simple hack to this XDELETE Rexx exec by Gilbert Saint-flour which 
uses the catalog search to do the cool stuff.  Here is his page, and you can 
find his stuff on FILE183 on the CBT-TAPE.
http://gsf-soft.com/Freeware/

I also put a copy of just the Rexx exec here:
http://lilliana.eu/downloads/xdelete.rexx.txt

Take the delete logic part out of it so that it simply lists the dataset names. 
 

Then one possible solution is to use the ISPF service to list the members of 
the PDS.  I had a similar example, so I put some sample code below.

At least two things more have to be done.  First you have to check whether it 
is a PDS or not, otherwise LMMLIST gives an ISPF error.   Next  you may want to 
write the results into a file and format that you can easily search, or sort or 
whatever.  I'll leave you to figure these out.

One more thing, if you go the ISPF services route, which is quite easy to code, 
then you may have to run it interactively from ISPF, or run it in ISPF batch, 
which is a bit trickier.  Unless you have this nice edit macro to create the 
JCL for you, called BATCHPDF:
http://www.sillysot.com/mvs/intro.htm

Regards
Lindy



ISPF services here:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ISPZSG90/CCONTENTS

Note that you can get much more information about the dataset when you use the 
ISPF services in these Z variables with STATS(YES):
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ISPZSG90/2.38.3

Rexx reference (see EXECIO for writing to a dataset):
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ4A3A0/CCONTENTS

And for all the zOS 1.13 bookshelves in old style format (which is much 
faster):
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves?filter=z/OS%20V1R13SUBMIT=Find

Sample code to list members of a PDS using ISPF services:
/* Rexx  */  
PDSNAME = 'SYS1.PROCLIB' 
Address ISPEXEC  
LMINIT DATAID(DDVAR) DATASET('PDSNAME') ENQ(SHR) 
LMOPEN DATAID(DDVAR) 
Say PDSNAME  
Do Forever   
  LMMLIST DATAID(DDVAR) OPTION(LIST) MEMBER(MEMNAME) STATS(YES)  
  If RC  0 then do  
Leave
  End
  Say '   'MEMNAME   
End  
LMFREE DATAID(DDVAR) 



If you are interested in talking about plain TSO-REXX you can subscribe to 
this list of really cool people:
For TSO-REXX subscribe / signoff / archive access instructions, send email to 
lists...@vm.marist.edu with the message: INFO TSO-REXX

(For more specific ISPF stuff, there is another list for that.)



And the CBT-Tape with tons of free stuff:
http://www.cbttape.org/



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Vernooij, CP - SPLXM
Sent: Wednesday, January 04, 2012 9:25 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: How to find a PDS member

Graham Hobbs gho...@cdpwise.net wrote in message 
news:5e97g75eqo2bi4cfbrhqcm9phcacji9...@4ax.com...
 Hello,
 Just returned to z/OS mainframe after 10 years, working alone, nobody 
 to talk to:-(. My first elementary question:
 
 - there are many PDS's in the environment I now have access to
 - need to find which PDS(s') members called ABCCOP* exist
 - I don't know which PDS it or they are in
 
 - Question: Can I find it/them with ISPF 3.14 or 3.15; if not then 
 how?
 
 Please, thanks, more duqu's to come:-) Graham

Graham,

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


Re: IBM manual formats

2012-01-04 Thread Jan MOEYERSONS
On Tue, 3 Jan 2012 08:44:07 -0500, Shmuel Metz (Seymour J.) 
shmuel+ibm-m...@patriot.net wrote:

What if you don't run windoze?

Then you cannot use the Library Reader for Windows... 


(IMHO it still is better than the Java stuff they replaced it with)

But less portable.

True. 
But I am more worried about functionnality. If the Softcopy Reader were to 
offer the same ease of use as the Library Reader, then I would probably not 
mind using it. 

Cheers,

Jantje.

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


Re: A design question

2012-01-04 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tony Harminc
 Sent: Tuesday, January 03, 2012 5:38 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: A design question
 
 On 3 January 2012 14:28, McKown, John 
 john.mck...@healthmarkets.com wrote:
 
  This is what you need to get familar with:
 
  
 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/EDC
 LB1B0/3.138
 
  quote
  General Description
 
  Used to communicate with the operator's console. The 
 __console2() function allows users to send messages to the 
 operator's console with the ability to specify routing codes 
 and message descriptor codes, wait on a modify/stop request 
 from the console, and to delete messages from operator 
 console using either message IDs or tokens.
  /quote
 
 The serious problem with __console2() is that it steals from your
 MODIFY namespace. If you use it, you can't aim general commands at
 your program in the usual and expected way
 
 f proc,command
 
 but rather, you have to use
 
 f proc,appl=command
 
 If you issue the normal version, you will be rewarded with
 BPXM022E MODIFY SYNTAX ERROR; command WAS FOUND
 WHERE ONE OF THE FOLLOWING WAS EXPECTED:
 APPL= TERM= FORCE=
 SHUTDOWN= RESTART= DUMP= FILESYS= RECOVER= SUPERKILL=
 
 This is one of those unfortunate decisions made back when UNIX System
 Services (shall we call it USS for short?) was being implemented, and
 it's too late to fix it in a compatible way.
 
 However to the extent that pthreads are MVS tasks, you can continue to
 use your assembler routine.
 
 Tony H.

Very true. I made the assumption that the OP wanted to totally eliminate HLASM 
in favor of C. Assembler, or Metal C perhaps, is a better choice for operator 
communications.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * 
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: INFO IBM-MAIN


Re: How to find a PDS member

2012-01-04 Thread Steve Comstock

On 1/4/2012 12:50 AM, Lizette Koehler wrote:


Graham Hobbsgho...@cdpwise.net  wrote in message
news:5e97g75eqo2bi4cfbrhqcm9phcacji9...@4ax.com...

Hello,
Just returned to z/OS mainframe after 10 years, working alone, nobody
to talk to:-(. My first elementary question:

- there are many PDS's in the environment I now have access to
- need to find which PDS(s') members called ABCCOP* exist
- I don't know which PDS it or they are in

- Question: Can I find it/them with ISPF 3.14 or 3.15; if not then
how?

Please, thanks, more duqu's to come:-) Graham




Graham,

What are you trying to do?
1)  A selected list of PDS datasets and then search for all members of
ABCCOP*
2)  Generate a list of PDS Datasets (unknown number) which include members
for ABCCOP*
3)  Any datasets in my logon proc that contains ABCCOP* (including LINKLST
and LPALST)

In Option 3.4, you can use a command called SRCHFOR that might be of help.

Lizette


Actually, for what he is looking for, the MEMBER command would be
better: From a 3.4 data set list, enter:

=== m abccop*

and each data set that is a PDS or PDSE that contains a member
with that nameing pattern will have a message 'Member: ABCCOP*'
next to the member's name.


SRCHFOR looks for text inside datasets or members.

--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-355-2752
http://www.trainersfriend.com

* To get a good Return on your Investment, first make an investment!
  + Training your people is an excellent investment

* Try our tool for calculating your Return On Investment
for training dollars at
  http://www.trainersfriend.com/ROI/roi.html

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


Re: JES2 $DEBUPD macro

2012-01-04 Thread Steve Mann
Have you found out anything more regarding the $DEBUPD macro?  We are just 
starting our z/OS 1.13 upgrade and have a 3rd party software exit that also 
uses $DEBUPD (still waiting to hear back from the vendor).

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


Re: How to find a PDS member

2012-01-04 Thread Lizette Koehler
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of
 Steve Comstock
 Sent: Wednesday, January 04, 2012 8:06 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: How to find a PDS member
 
 On 1/4/2012 12:50 AM, Lizette Koehler wrote:
 
  Graham Hobbsgho...@cdpwise.net  wrote in message
  news:5e97g75eqo2bi4cfbrhqcm9phcacji9...@4ax.com...
  Hello,
  Just returned to z/OS mainframe after 10 years, working alone,
  nobody to talk to:-(. My first elementary question:
 
  - there are many PDS's in the environment I now have access to
  - need to find which PDS(s') members called ABCCOP* exist
  - I don't know which PDS it or they are in
 
  - Question: Can I find it/them with ISPF 3.14 or 3.15; if not then
  how?
 
  Please, thanks, more duqu's to come:-) Graham
 
 
  Graham,
  Lizette
 
 Actually, for what he is looking for, the MEMBER command would be
 better: From a 3.4 data set list, enter:
 
 === m abccop*
 
 and each data set that is a PDS or PDSE that contains a member with that
nameing
 pattern will have a message 'Member: ABCCOP*'
 next to the member's name.
 
 
 SRCHFOR looks for text inside datasets or members.
 

Steve,

I would not disagree.  However, what if the member had been renamed to
ZZZCOPxx - then the M ABCCOP* would miss it.  So doing the SRCHFOR might be
better if the comments inside the members showed the original name of
ABCCOPxx.  Of course that is an assumption that the member is documented
properly inside.

Second assumption is the version of z/OS (ISPF) he is on supports both
SRCHFOR and Member search.  ;-)


Lizette

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


Re: How to find a PDS member

2012-01-04 Thread Lizette Koehler
  Graham Hobbsgho...@cdpwise.net  wrote in message
  news:5e97g75eqo2bi4cfbrhqcm9phcacji9...@4ax.com...
  Hello,
  Just returned to z/OS mainframe after 10 years, working alone,
  nobody to talk to:-(. My first elementary question:
 
  - there are many PDS's in the environment I now have access to
  - need to find which PDS(s') members called ABCCOP* exist
  - I don't know which PDS it or they are in
 
  - Question: Can I find it/them with ISPF 3.14 or 3.15; if not then
  how?
 
  Please, thanks, more duqu's to come:-) Graham
 
 Actually, for what he is looking for, the MEMBER command would be
 better: From a 3.4 data set list, enter:
 
 === m abccop*
 
 and each data set that is a PDS or PDSE that contains a member with that
nameing
 pattern will have a message 'Member: ABCCOP*'
 next to the member's name.
 
 
 SRCHFOR looks for text inside datasets or members.
 
 
 -Steve Comstock
 The Trainer's Friend, Inc.
 
 303-355-2752
 http://www.trainersfriend.com


Steve,

Another thought would be (if the right level of z/OS) he could filter the
SMF Type 42 records (Subtypes 20 21 24 25 for example) for MEMBERs and maybe
find them that way.  

But I think that he left out a bit of detail on what he was trying to do.  I
can think of a couple of iterations where these actions would not give him
the results he is after.


Lizette

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


Could use a sysplex aware version of IAZXJSAB

2012-01-04 Thread McKown, John
IAZXJSAB has some nice output for executing address spaces. But it only returns 
data from address spaces in the system it is running on. I was wondering if 
there is any way to get some equivalent information from address spaces running 
on other systems in the same sysplex. In particular, I would like to get the 
USERID and the JOBID. I have the jobname, system name, and ASID. I get this 
information out of an ISGQUERY scan of ENQs. What I'm going for is a monitor 
command which can scan ENQ information and output messages. The monitor 
command is actually a UNIX command that I'm writing, not an STC. So I can't 
just run it on all members of the sysplex. This is just for my own amusement, 
not a company necessity. So I'm rather limited on what I can do. I could 
possibly use the SDSF API, but I was trying to avoid that in order to be more 
generic. Also, I don't know how to use talk to SDSF using HLASM. There are REXX 
and Java APIs, but I don't see a basic assembler API for S!
 DSF.
 
--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * 
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: INFO IBM-MAIN


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Scott Ford
Mike,
This is excellent. I know in batch you can copy a file from mvs to hfs or zfs 
and probably nfs
Of the course , the other options you mentioned, the API is nice, never knew 
that existed.

Regards,
Scott


Sent from my iPad

On Jan 4, 2012, at 5:15 AM, Mike Wood mikeww...@hotmail.com wrote:

 Gerard,  RMM has no way to push information out to places that want it, other 
 than conventional mvs based options; writing to files/sysout, cmd line output 
  Others mentioned FTP, XMIT/NJE, email, even zFS/HFS 
 
 DFSMS includes NFS support and provides transparent access to mvs programs 
 via OPEN, so you could consider writing to a file that can be read from 
 another system.
 
 Another option, could be to run a job step that your job scheduler (TWS for 
 example) can detect and can drive an activity on your other system to then 
 pull the information from rmm.  
 
 rmm includes capabilities via its APIs to request remote execution of a 
 command via web services and to return the data as an XML file which you 
 could then process. rmm ships sample program which can readily be used to 
 demonstrate that capability.  No need to install anything on your clients 
 systems - but some small setup required to make the api available via web 
 services.
 See the DFSMSrmm Application Programming Interface 
 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/ez2zo112?filter=rmmSUBMIT=Search+titles
 
 Mike Wood
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

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


Re: Clarification on Sysres Volumes(RMF)

2012-01-04 Thread Ford Prefect
Jags,

If you have an active HASCKPT dataset on your RES volume, then move it.
Once that is done you can see if there are other problems.  There is no
question of whether a HASCKPT will cause performance problems, if JES2 is
using it then it will cause problems.  It does not belong there and needs
to be moved.

On Wed, Jan 4, 2012 at 2:24 AM, jagadishan perumal jagadish...@gmail.comwrote:

 Hi All,

 I ran a report Against a TSO ID which had a volume contention and found the
 below as the result :


 Samples: 100 System: ZOSB  Date: 01/04/12  Time: 12.43.20  Range: 100
 Sec


 Job: *TCHN039*  Primary delay: Excessive pending time on volume
 Z18RS1.


 Probable causes: 1) Contention with another system for use of the
 volume.
 2) Overutilized channel, control unit or head of
 string.




 -- Volume Z18RS1 Device Data
 --
 Number:D700Active:  80%Pending:   69% Average
 Users
 Device:33903   Connect: 11%Delay DB:   0%
 Delayed
 Shared:Yes Disconnect:   0%Delay CM:   0%
 9.9


 --- Job Performance Summary
 ---
Service   WFL -Using%- DLY IDL UKN  % Delayed for 
 Primary
 CX ASID ClassP Cr  %   PRC DEV  %   %   %  PRC DEV STR SUB OPR ENQ
 Reason
 T  0264 TSO  *  90   4  42  45   9   1  41   0   0   0   0
 Z18RS1
TSO  1 220   4  14  45   8   0  14   0   0   0   0
 Z18RS1
TSO  2  00   0  28   0   1   1  27   0   0   0   0
 Z18RS1


 Probable cause says as :

 1) Contention with another system for use of the volume.-  Volume is
 not shared
 2) Overutilized channel, control unit or head of string.  -  We have two
 channels operational but is it again we need to re-look into channel
 activities ?

 Regards,
 Jags

 On Wed, Jan 4, 2012 at 5:11 AM, Gibney, Dave gib...@wsu.edu wrote:

  Dave Gibney
  Information Technology Services
  Washington State University
 
   -Original Message-
   From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Lizette Koehler
   Sent: Tuesday, January 03, 2012 5:47 AM
   To: IBM-MAIN@bama.ua.edu
   Subject: Re: Clarification on Sysres Volumes(RMF)
  
   
Hi Lizette,
   
Apology for not being precise.
   
Datasets found in SYSRES are :
   
are some BCP related datasets , assembler datasets,language
 environment
datasets,IBM book manager datasets First failure Support
  technology(FFST)
   datasets
are found.
   
During This Situation when I do : /D GRS,C  It does really produces
 any
   information
about Volume or Dataset Contention. As per Mark advise I did TSO
   RMFMON
   and Found
some SYS1.HASCKPT datasets used by JES2, some User Job using their
   Assigned
volumes.
   
Jags
   
  
   Jags,
  
   It is important to provide information when asked.  We cannot see your
   environment.  When you ask a question - How can I fix this.  We must
 ask
   questions to help.
  
   The areas you need to research are
  
   1)  GRS entries.  Is your GRSRNLxx member setup correctly for your
   environment.
   2)  Verify what files are accessed when this occurs
   3)  Verify you only have z/OS TLIB datasets on your SYSRES volume.  If
  you
   have other datasets, you need to determine the impact to your SYSRES
   volume.
   4)  Verify if you have any HFS or zFS files on your SYSRES volume.
   5)  Verify if you have any SYS1.DUMPxx datasets on your SYSRES volume
   6)  Verify if you have any Security (RACF, Top Secret, ACF2) Data bases
  on
   your SYSRES volume
   7)  Run performance reports on your volume to see what is open during
 the
   time of RMF issue.  Identify what datasets have the highest access
 during
   the RMF issue.
  
 
  I would add and move elsewhere after the word Verify in the above
  advice. :)
 
  Dave Gibney
  Information Technology Services
  Washington State University
 
 
   Are you saying you have the JES2 HASPCKPT dataset on your SYSRES
   Volume?
   That needs to move.  It should be on a separate volume.
  
   You must do these steps.  You must review your system.  You will need
 to
  do
   the analysis to determine your issue.
  
   When starting to understand I/O issues with volumes, this is a good
  overview
   http://publib.boulder.ibm.com/tividd/td/TDS390/SH19-6818-
   08/en_US/HTML/DRLM9
   mst61.htm
  
  
   And the following REDBOOKs should help
  
   Effective zSeries Performance Monitoring Using Resource Measurement
   Facility
   http://www.redbooks.ibm.com/abstracts/sg246645.html?Open
  
   Using Resource Measurement Facility Monitor III Efficiently
   http://www.redbooks.ibm.com/abstracts/gg244131.html?Open
  
   Parallel Sysplex Performance Healthcheck Case Study: DMData/Danske Data
   http://www.redbooks.ibm.com/abstracts/sg245373.html?Open
  
  
   The only datasets on a SYSRES IMHO are the Tlibs from the
 

Re: IBM manual formats

2012-01-04 Thread Martin Packer
Are you sure it doesn't run under WINE on Linux? Anyone?

Cheers, Martin

Martin Packer,
Mainframe Performance Consultant, zChampion
Worldwide Banking Center of Excellence, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker
Blog: 
https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker



From:
Jan MOEYERSONS jan.moeyers...@adelior.be
To:
IBM-MAIN@bama.ua.edu, 
Date:
04/01/2012 12:40
Subject:
Re: IBM manual formats
Sent by:
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



On Tue, 3 Jan 2012 08:44:07 -0500, Shmuel Metz (Seymour J.) 
shmuel+ibm-m...@patriot.net wrote:

What if you don't run windoze?

Then you cannot use the Library Reader for Windows... 


(IMHO it still is better than the Java stuff they replaced it with)

But less portable.

True. 
But I am more worried about functionnality. If the Softcopy Reader were to 
offer the same ease of use as the Library Reader, then I would probably 
not mind using it. 

Cheers,

Jantje.

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








Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU






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


Re: Question on adding an SVC routine dynamically to a running system

2012-01-04 Thread Dave Day

Tony,

   As I said in an earlier post, everything is a tradeoff, isn't it.  If 
the profiler code is actually running inside the target address space, and 
it prevents the target from running while it gathers its data, it has the 
ability to run data chains and such without a lot of interference.  But, it 
also will distort the target address space by its presence.  My approach 
does nothing to alter the target address space, other than having another 
adress space active on the system at the same time as the target.  I use 
access registers to get at the target address space when it is necessary. 
But because I pick up and process the trace entry some milliseconds after it 
is made, it is impossible for me to run some data chains and get good data. 
An example of that is register save area chaining.  If the profiler has the 
target stopped, this chain can be run, and caller information can be 
acquired to know what module called the current one, from what offset and 
such.  As far as I know, that is the only advantage that methodology has 
over my approach.


   Using trace table data provides statistics on quite a lot of activity 
that the other methodology misses.  Most of the events recorded have a 
timestamp, so elapsed times and execution counts can be computed.  Program 
Call and Program Return are recorded, so I can report on those.  The number 
of PSWs my code gets to look at compared to the other methodology is 
significant.  One of the other profilers may run at a sampling rate of say 
1000 per minute(that seems to be somewhat common when we are talking to 
potential customers, who usually are a user of one of the others). I believe 
that comes out to about 1 psw every 16 milliseconds.   When z/OS gives 
control to a task or srb to run, it sets a timer.  The length of the time is 
the time slice.  On my machine at the IBM Dallas RDP system, that time slice 
was very short.  I originally thought what I was seeing with these CPU timer 
interrupts had to do with PR/SM, but Peter Relson set me straight on that. 
If I remember correctly, it was something like 41 microseconds.  Means there 
was close to 25000 external interrupts just for the CPU timer being written 
to the trace table every second.  Add in all the other activity, from SVC's, 
I/O interrupts, Start Sub-channel, Dispatch, Lock Suspend...a lot of 'stuff' 
in the trace table to tell my code what the application is doing, and what 
is happening to it.  An active application will usually generate millions of 
events in a fairly short period of time.  The winner so far that I have seen 
has been 52 million in just over two minutes.  If you compare that to one of 
the others running at say 1000 per minute sampling, my code looks at 52 
million events, and there code looks at 2000.


   No, there are no programming interfaces to get this data, as far as I 
know.  I have been asked by a number of people why I didn't hook one of the 
IBM routines that process trace table entries.  I just didn't want to go 
that route.  I wanted code that was as passive as possible.  There are no 
hooks at all using z/XPF, and yet the code can give elapsed times and counts 
on all manner of events happening whithin an application.


   --Dave
- Original Message - 
From: Tony Harminc t...@harminc.net

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@bama.ua.edu
Sent: Tuesday, January 03, 2012 3:35 PM
Subject: Re: Question on adding an SVC routine dynamically to a running 
system




On 3 January 2012 14:33, Dave Day david...@consolidated.net wrote:

I have a software offering that Dave Cole markets. You can go to his
website, and take a look at z/XPF. It competes in a niche market on z/OS,
application profiling. What makes mine different from the other guys in 
this

arena is the approach I use to get the profiling data. Instead of
establishing tasks or running srb's into an address space, my code 
scrapes

the system trace table for entries that are related to the target address
space.


It's an interesting approach, and I must say I'd be just as happy not
to see that extra baggage from other products that clutters dumps and
makes one wonder if it really, truly, doesn't change anything in the
environment my code runs in.

Are there Programming Interfaces to reading/scraping this trace table
data? In my experience, access to the trace data is something that has
broken more often than anything else when there is an IPCS to system
level mismatch. I assume for your sort of product you would need
access on the live system with reasonable performance, rather than
post processing through IPCS.

Tony H.

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


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

Re: Re-Linkling a load module with AC(1)

2012-01-04 Thread Schwarz, Barry A
I hardly ever look at the dates.  I wonder how my company's email system 
managed to hold it for two months and then deliver it.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of Binyamin Dissen
 Sent: Wednesday, January 04, 2012 2:08 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Re-Linkling a load module with AC(1)

 A blast from the past.

 On Tue, 3 Jan 2012 14:42:27 -0800 Schwarz, Barry A
 barry.a.schw...@boeing.com wrote:

 :Try eliminating the second include.  Also verify that PCOPY actually has
 text.
 :
 : -Original Message-
 : From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 : Behalf Of Fred Kaptein
 : Sent: Thursday, November 03, 2011 1:11 PM
 : To: IBM-MAIN@bama.ua.edu
 : Subject: Re-Linkling a load module with AC(1)
 :
 : Hello,
 :
 : I am looking to relink a vendor supplied program module which is set
 up
 : similar to the following:
 :   - Module name is PCOPY
 :   - Module PCOPY is linked as AC(0)
 :   - Module PCOPY has an alias which is PCOPY2
 :   - Module PCOPY and PCOPY2 are in 'PCOPY.LOADLIB'
 :
 : I would like to relink PCOPY with the following:
 :- Linked as AC(1)
 :- Retain the alias PCOPY2
 :- Linked into a test load library called 'PCOPY.TESTLIB'
 :
 : I tried the following JCL:
 : //LKED EXEC
 PGM=IEWL,PARM='LET,LIST=SUMMARY,MAP,NCAL,XREF,AC=1'
 : //SYSLIB  DD DSN=PCOPY.LOADLIB,DISP=SHR
 : //SYSLMOD  DD DSN=PCOPY.TESTLIB,DISP=SHR
 : //SYSUT1 DD DSN=SYSUT1,UNIT=SYSDA,SPACE=(CYL,(10,10))
 : //SYSPRINT  DD SYSOUT=*
 : //SYSLIN  DD *
 :   INCLUDE SYSLIB(PCOPY)
 :   INCLUDE SYSLIB(PCOPY2)
 :   NAME PCOPY
 :   AC(1)
 :   ALIAS PCOPY2
 :
 : but it fails with the following errors
 :
 : IEW2230S 0414 MODULE HAS NO TEXT.
 : IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED.
 : IEW2621E 4314 EXISTING ALIAS NAME PCOPY2 WITHIN MODULE TEMPNAM0
 MATCHES
 : ALIAS  BEING ADDED.
 : IEW2012I 0F09 ALL TEMPNAMES HAVE BEEN USED. THE MODULE CANNOT BE
 SAVED.
 : IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  12.
 :
 :--
 :For IBM-MAIN subscribe / signoff / archive access instructions,
 :send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

 --
 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: INFO IBM-MAIN

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


deleting jes2 printers

2012-01-04 Thread Tim Brown
Is there a $del to delete jes2 printers



Thanks,



Tim Brown
Systems Specialist - Project Leader
Central Hudson Gas  Electric
284 South Ave
Poughkeepsie, NY 12601
Email: tbr...@cenhud.com mailto:tbr...@cenhud.com
Phone: 845-486-5643
Fax: 845-486-5921
Cell: 845-235-4255




This message contains confidential information and is only for the intended 
recipient. If the reader of this message is not the intended recipient, or an 
employee or agent responsible for delivering this message to the intended 
recipient, please notify the sender immediately by replying to this note and 
deleting all copies and attachments.






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


Re: deleting jes2 printers

2012-01-04 Thread David Andrews
On Wed, 2012-01-04 at 11:39 -0500, Tim Brown wrote:
 Is there a $del to delete jes2 printers

http://publibz.boulder.ibm.com/epubs/pdf/has2a2a0.pdf

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


Re: Could use a sysplex aware version of IAZXJSAB

2012-01-04 Thread Edward Jaffe

On 1/4/2012 6:10 AM, McKown, John wrote:

IAZXJSAB has some nice output for executing address spaces. But it only returns data from address 
spaces in the system it is running on. I was wondering if there is any way to get some equivalent 
information from address spaces running on other systems in the same sysplex. In particular, I 
would like to get the USERID and the JOBID. I have the jobname, system name, and ASID. I get this 
information out of an ISGQUERY scan of ENQs. What I'm going for is a monitor command 
which can scan ENQ information and output messages. The monitor command is actually a 
UNIX command that I'm writing, not an STC. So I can't just run it on all members of the sysplex.


There is no sysplex-wide IAZXJSAB service. (E)JES uses a server on every system 
to act as an agent for such requests.


Using native facilities, the 'D A' command, routed to the appropriate system, 
will give you back information from the JSAB in the following fields:


WUID=(JSABWKID) USERID=(from JSABUSID)


This is just for my own amusement, not a company necessity. So I'm rather limited on 
what I can do. I could possibly use the SDSF API, but I was trying to avoid that in order to be 
more generic. Also, I don't know how to use talk to SDSF using HLASM. There are REXX and Java APIs, 
but I don't see a basic assembler API for SDSF.


I agree, the lack of programming APIs is puzzling. (E)JES offers HLASM, C/C++, 
Java and REXX. I suspect IOF and others do as well. Why IBM chose REXX only--and 
later added Java but nothing else--remains a mystery.


You might be able to leverage the HLASM AXREXX macro/service to run a REXX exec 
under System Rexx (AXR) and have that get the info you're looking for from SDSF. 
Seems like the long way around, but if it's just for fun, and performance is not 
an issue, it should be workable...


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

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


Re: A design question

2012-01-04 Thread Don Poitras
In SAS/C, we implemented this functionality (handling START/STOP/MODIFY)
using a signal. It seemed a natural fit for C.

http://support.sas.com/documentation/onlinedoc/sasc/doc750/html/75chgs/z2474017.htm


McKown, John wrote:
 
  -Original Message-
  From: IBM Mainframe Discussion List
  [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tony Harminc
  Sent: Tuesday, January 03, 2012 5:38 PM
  To: IBM-MAIN@bama.ua.edu
  Subject: Re: A design question
 
  On 3 January 2012 14:28, McKown, John
  john.mck...@healthmarkets.com wrote:
 
   This is what you need to get familar with:
  
  
  http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/EDC
  LB1B0/3.138
  
   quote
   General Description
  
   Used to communicate with the operator's console. The
  __console2() function allows users to send messages to the
  operator's console with the ability to specify routing codes
  and message descriptor codes, wait on a modify/stop request
  from the console, and to delete messages from operator
  console using either message IDs or tokens.
   /quote
 
  The serious problem with __console2() is that it steals from your
  MODIFY namespace. If you use it, you can't aim general commands at
  your program in the usual and expected way
 
  f proc,command
 
  but rather, you have to use
 
  f proc,appl=command
 
  If you issue the normal version, you will be rewarded with
  BPXM022E MODIFY SYNTAX ERROR; command WAS FOUND
  WHERE ONE OF THE FOLLOWING WAS EXPECTED:
  APPL= TERM= FORCE=
  SHUTDOWN= RESTART= DUMP= FILESYS= RECOVER= SUPERKILL=
 
  This is one of those unfortunate decisions made back when UNIX System
  Services (shall we call it USS for short?) was being implemented, and
  it's too late to fix it in a compatible way.
 
  However to the extent that pthreads are MVS tasks, you can continue to
  use your assembler routine.
 
  Tony H.
 
 Very true. I made the assumption that the OP wanted to totally eliminate 
 HLASM in favor of C. Assembler, or Metal C perhaps, is a better choice for 
 operator communications.
 
 --
 John McKown
 Systems Engineer IV
 IT

-- 
Don Poitras - zSeries R  D  -  SAS Institute Inc. -  SAS Campus Drive 
mailto:sas...@sas.com   (919)531-5637  Fax:677- Cary, NC 27513

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


Re: A design question

2012-01-04 Thread Scott Ford
Don,
 
Wrote a lot of SAS up until V6 or so. Been awhile, loved it ...very useful to 
me and my customers I had..
and 'yes' i thin C is natural fit for operator interface, as long as the 
threads are not being locked.
My issue now is that everything is single thread( i didnt write it) , so we are 
in the process of changing over to C and multi-threaded STC app..
 Regards,
Scott J Ford
Software Engineer
http://www.identityforge.com
 
 


 From: Don Poitras sas...@sas.com
To: IBM-MAIN@bama.ua.edu 
Sent: Wednesday, January 4, 2012 1:25 PM
Subject: Re: A design question
 
In SAS/C, we implemented this functionality (handling START/STOP/MODIFY)
using a signal. It seemed a natural fit for C.

http://support.sas.com/documentation/onlinedoc/sasc/doc750/html/75chgs/z2474017.htm


McKown, John wrote:
 
  -Original Message-
  From: IBM Mainframe Discussion List
  [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tony Harminc
  Sent: Tuesday, January 03, 2012 5:38 PM
  To: IBM-MAIN@bama.ua.edu
  Subject: Re: A design question
 
  On 3 January 2012 14:28, McKown, John
  john.mck...@healthmarkets.com wrote:
 
   This is what you need to get familar with:
  
  
  http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/EDC
  LB1B0/3.138
  
   quote
   General Description
  
   Used to communicate with the operator's console. The
  __console2() function allows users to send messages to the
  operator's console with the ability to specify routing codes
  and message descriptor codes, wait on a modify/stop request
  from the console, and to delete messages from operator
  console using either message IDs or tokens.
   /quote
 
  The serious problem with __console2() is that it steals from your
  MODIFY namespace. If you use it, you can't aim general commands at
  your program in the usual and expected way
 
  f proc,command
 
  but rather, you have to use
 
  f proc,appl=command
 
  If you issue the normal version, you will be rewarded with
  BPXM022E MODIFY SYNTAX ERROR; command WAS FOUND
  WHERE ONE OF THE FOLLOWING WAS EXPECTED:
  APPL= TERM= FORCE=
  SHUTDOWN= RESTART= DUMP= FILESYS= RECOVER= SUPERKILL=
 
  This is one of those unfortunate decisions made back when UNIX System
  Services (shall we call it USS for short?) was being implemented, and
  it's too late to fix it in a compatible way.
 
  However to the extent that pthreads are MVS tasks, you can continue to
  use your assembler routine.
 
  Tony H.
 
 Very true. I made the assumption that the OP wanted to totally eliminate 
 HLASM in favor of C. Assembler, or Metal C perhaps, is a better choice for 
 operator communications.
 
 --
 John McKown
 Systems Engineer IV
 IT

-- 
Don Poitras - zSeries R  D  -  SAS Institute Inc. -  SAS Campus Drive 
mailto:sas...@sas.com   (919)531-5637  Fax:677-     Cary, NC 27513

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

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


21st Century Migrates Mainframe with Clerity

2012-01-04 Thread Kopischke, David G.
Greetings,
   Here's one I came across a few minutes ago. Not much information as to the 
size of the installation,
but it's apparently a successful re-hosting. And it only took a year ???

http://www.insurancetech.com/architecture-infrastructure/232301250?cid=nl_ins_dailyelq=98a33fd7dd5849f58313c5f02c397bd6



Thanks,
   Dave K.


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

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


Re: 21st Century Migrates Mainframe with Clerity

2012-01-04 Thread Staller, Allan
Last I heard, they were a relatively small Prop/Casualty insurer

Certainly not a State Farm, Prudential, Farmers, Allstate,.


snip
Subject: 21st Century Migrates Mainframe with Clerity

Greetings,
   Here's one I came across a few minutes ago. Not much information as
to the size of the installation,
but it's apparently a successful re-hosting. And it only took a year ???

http://www.insurancetech.com/architecture-infrastructure/232301250?cid=n
l_ins_dailyelq=98a33fd7dd5849f58313c5f02c397bd6

/snip

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


Re: IBM manual formats

2012-01-04 Thread Tony Harminc
On 3 January 2012 08:44, Shmuel Metz (Seymour J.)
shmuel+ibm-m...@patriot.net wrote:
 In 4953978233034455.wa.jan.moeyersonsadelior...@bama.ua.edu, on 01/03/2012
   at 05:39 AM, Jan MOEYERSONS jan.moeyers...@adelior.be said:

I think you can. Just install the old, but still faithfull Library Reader for 
Windows

 What if you don't run windoze?

(IMHO it still is better than the Java stuff they replaced it with)

 But less portable.

Not really. IBM's Java reader has only the GUI in Java, while the code
that processes the .boo files is platform specific JNI stuff,
presumably C or C++. So you get the worst of both worlds - no
portability, and a bad GUI.

Tony H.

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


Re: 21st Century Migrates Mainframe with Clerity

2012-01-04 Thread Roberts, John J
Subject: Re: 21st Century Migrates Mainframe with Clerity

Last I heard, they were a relatively small Prop/Casualty insurer

Certainly not a State Farm, Prudential, Farmers, Allstate,.

Just the same, Clerity has had a few high profile successes doing migrations.  
The NYSE used the Clerity solution back in 2008 to migrate a major trading 
application.  10 million lines of code were re-hosted and a 1660 MIPS mainframe 
complex was retired.

So it can be done.  Back in 2004-2005, I was part of a small team at the 
Washington State Department of Licensing that migrated the Driver and Vehicle 
licensing apps off their UNISYS mainframe onto Windows Servers running Fujitsu 
NetCOBOL.  This too was entirely successful.

I have heard good things about the Oracle solution which is built upon Tuxedo.

There have been some big failures too.  It seems that you need to be very 
selective about what apps you attempt to replatform.  CICS/DB2 seems to be the 
sweet spot.  But once you start introducing the complexities of SYSPLEX, IRC, 
MRO, VSAM, DL/1, PL/I, etc. you are heading into uncharted waters and need to 
be very careful.

My opinion is that such replatforming projects will continue.  But I don't 
think IBM listers need fear, since I believe that the rate of system programmer 
retirements will far exceed the rate of mainframe platform retirements, at 
least for the next decade.

John
P.S I have no relationship with any migration vendors mentioned here.  I used 
to work for Fujitsu/Amdahl/DMR, but that career ended in 2008.  Now I am just 
an independent contractor.

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


Re: JES2 $DEBUPD macro

2012-01-04 Thread Bill Planer
No, I never learned why it is no longer needed.  I'd be interested if your 
vendor has some insight.


I examined each place it was used in 1.11 code and the same place in 1.13 
code.  In each case, the macro call was simply removed with no other 
changes.  So I did the same in my code.  I have not had a chance to test it 
yet.


Bill

-Original Message- 
From: Steve Mann
Sent: Wednesday, January 04, 2012 08:27 Newsgroups: bit.listserv.ibm-main 
Subject: Re: JES2 $DEBUPD macro


Have you found out anything more regarding the $DEBUPD macro?  We are just 
starting our z/OS 1.13 upgrade and have a 3rd party software exit that also 
uses $DEBUPD (still waiting to hear back from the vendor).


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


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


Calling all experts on SMFPRMxx SUBSYS

2012-01-04 Thread Charles Mills
I assume this august group is filled with people who have forgotten more
about SMFPRMxx than I will ever know. 

I am trying to determine the exact relationship between various SUBSYS(
specifications and the writing of specific SMF record types. (And yes, I
know there are OTHER variables involved, but I'm focused on this one
variable at the moment.)

I would assume that the writing of SMF Type 30 records would be controlled
by SUBSYS(TSO and SUBSYS(JESn statements -- is that correct?

The writing of SMF Type 80 records: controlled by SUBSYS(STC ? Or by SUBSYS
for the particular type of event -- for example, the writing of TSO logon
violations would be controlled by SUBSYS(TSO ?

The writing SMF Type 100-102 (DB2) records: controlled by SUBSYS( where
 is the name of the particular DB2 subsystem?

The writing of SMT Type 119 (TCP/IP) records: controlled by SUBSYS(what?

Many thanks.

Charles Mills

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


Re: IBM manual formats

2012-01-04 Thread Kirk Wolf
FWIW, we use Linux on our desktops and have found that the following
process works fantastic for IBM manuals.  Something similar might be
possible on Windoze (or OSX) with a similar tool or under cygwin, but I
haven't tried it.

1) Use the DownLoadThemAll FireFox plugin to download all of the PDFs at
once

2) I wrote the following shell script which makes symlinks to the original
file names, using the PDF title.
This has the advantage that I can very quickly find a manual using find
file name in Nautilus, but the links between PDFs still work.

3) We use Evince as a reader, which works much better if you have fast
processor and even better if you put your manuals on an SSD.
I supposed that you could also use a PDF indexer, like Google Desktop, but
I haven't seen the need.

#!/bin/sh
# Make symlinks to all .pdf files in the current directory to names that
match their Title:
ls -1 *.pdf | while read f
do
  echo Examining: $f
  title=$(pdfinfo $f | grep Title: | cut -c17- | tr -d '/\\:' | tr ' '
'_')
  if test -n $title -a ! -s $title.pdf ; then
echo link $title.pdf - $f
ln -s $f $title.pdf
  fi
done

Kirk Wolf
Dovetailed Technologies
http://dovetail.com

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


Re: 21st Century Migrates Mainframe with Clerity

2012-01-04 Thread Tom Marchant
On Wed, 4 Jan 2012 21:16:49 +, Kopischke, David G. wrote:

Here's one I came across a few minutes ago. Not much information 
as to the size of the installation,
but it's apparently a successful re-hosting. And it only took a year ???

http://www.insurancetech.com/architecture-infrastructure/232301250?cid=nl_ins_dailyelq=98a33fd7dd5849f58313c5f02c397bd6

Re-hosting?

quote
allowed us to port directly from the mainframe to the Unix platform
/quote

-- 
Tom Marchant

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


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Shmuel Metz (Seymour J.)
In
CAJTOO5-ZWSyX4_m41A5d5aKkvm8rU4F+Rdv=1ez4zqqh4xx...@mail.gmail.com,
on 01/03/2012
   at 05:23 PM, Mike Schwab mike.a.sch...@gmail.com said:

There is an SMTP function within JES on z/OS,

No; both the old and the new e-mail client are independent started
tasks, with no JES dependencies.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Shmuel Metz (Seymour J.)
In 02471e7eef1b47c4f856cd74dde2d...@mail.gmail.com, on 01/03/2012
   at 03:59 PM, Gerard Nicol gerard.ni...@tapetrack.com said:

So you are sending to an SMTP server via JES2?

It doesn't matter whether you are using JES2 or JES3.

Does this only work for z/Linux or could you also send to an intel
Linux as well?

That depends on what your network configuration allows. IBM provides
two SMTP clients that take input from SYSOUT data sets, and neither
has any dependency on what platform the receiving mail server is on.
I'm confident that the same is true of the mail client that Mike is
using as well.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: IBM manual formats

2012-01-04 Thread Shmuel Metz (Seymour J.)
In 5899163949644116.wa.jan.moeyersonsadelior...@bama.ua.edu, on
01/04/2012
   at 05:42 AM, Jan MOEYERSONS jan.moeyers...@adelior.be said:

But I am more worried about functionnality. If the Softcopy Reader
were to offer the same ease of use as the Library Reader, then I
would probably not mind using it. 

If ity won't run on my machine then LR is not easier to use and
doesn't offer me functionality. This is another case of IBM's split
personality; they claim to be pushing Linux, but lots of key features
are not available to Linux users.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: Re-Linkling a load module with AC(1)

2012-01-04 Thread Shmuel Metz (Seymour J.)
In
b282be35b5a4494894d4ecfba2bf78471813666...@xch-nw-17v.nw.nos.boeing.com,
on 01/04/2012
   at 08:16 AM, Schwarz, Barry A barry.a.schw...@boeing.com said:

I hardly ever look at the dates.  I wonder how my company's email
system managed to hold it for two months and then deliver it.

Two months is unusual but still by no means a record. There are all
sorts of reasons, and there's no guaranty that the next time it
happens it will have the same cause. I'm more concerned with why some
messages arrive with totally garbled character sets.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Mike Schwab
On Wed, Jan 4, 2012 at 4:37 PM, Shmuel Metz (Seymour J.)
shmuel+ibm-m...@patriot.net wrote:
 In
 CAJTOO5-ZWSyX4_m41A5d5aKkvm8rU4F+Rdv=1ez4zqqh4xx...@mail.gmail.com,
 on 01/03/2012
   at 05:23 PM, Mike Schwab mike.a.sch...@gmail.com said:

There is an SMTP function within JES on z/OS,

 No; both the old and the new e-mail client are independent started
 tasks, with no JES dependencies.

 --
     Shmuel (Seymour J.) Metz, SysProg and JOAT

OK.  Except maybe the site defined DEST=SMTP ?
-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Scott Ford
Guys,
Shades of 3770 and 3780s , man..

In VM we used to write our own line drivers for RSCS...

Sent from my iPad

On Jan 4, 2012, at 6:05 PM, Mike Schwab mike.a.sch...@gmail.com wrote:

 On Wed, Jan 4, 2012 at 4:37 PM, Shmuel Metz (Seymour J.)
 shmuel+ibm-m...@patriot.net wrote:
 In
 CAJTOO5-ZWSyX4_m41A5d5aKkvm8rU4F+Rdv=1ez4zqqh4xx...@mail.gmail.com,
 on 01/03/2012
   at 05:23 PM, Mike Schwab mike.a.sch...@gmail.com said:
 
 There is an SMTP function within JES on z/OS,
 
 No; both the old and the new e-mail client are independent started
 tasks, with no JES dependencies.
 
 --
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 
 OK.  Except maybe the site defined DEST=SMTP ?
 -- 
 Mike A Schwab, Springfield IL USA
 Where do Forest Rangers go to get away from it all?
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

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


Re: IBM manual formats

2012-01-04 Thread Scott Ford
Kirk,

I also like Linux but I run win7 x64 and was running virtual-box running 
Redhat,Fedora and Solaris to name a few. Up side of software deveLopment, we 
also use VMWare..

Regards,
Scott

Sent from my iPad

On Jan 4, 2012, at 5:00 PM, Kirk Wolf k...@dovetail.com wrote:

 FWIW, we use Linux on our desktops and have found that the following
 process works fantastic for IBM manuals.  Something similar might be
 possible on Windoze (or OSX) with a similar tool or under cygwin, but I
 haven't tried it.
 
 1) Use the DownLoadThemAll FireFox plugin to download all of the PDFs at
 once
 
 2) I wrote the following shell script which makes symlinks to the original
 file names, using the PDF title.
 This has the advantage that I can very quickly find a manual using find
 file name in Nautilus, but the links between PDFs still work.
 
 3) We use Evince as a reader, which works much better if you have fast
 processor and even better if you put your manuals on an SSD.
 I supposed that you could also use a PDF indexer, like Google Desktop, but
 I haven't seen the need.
 
 #!/bin/sh
 # Make symlinks to all .pdf files in the current directory to names that
 match their Title:
 ls -1 *.pdf | while read f
 do
  echo Examining: $f
  title=$(pdfinfo $f | grep Title: | cut -c17- | tr -d '/\\:' | tr ' '
 '_')
  if test -n $title -a ! -s $title.pdf ; then
echo link $title.pdf - $f
ln -s $f $title.pdf
  fi
 done
 
 Kirk Wolf
 Dovetailed Technologies
 http://dovetail.com
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

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


Re: Calling all experts on SMFPRMxx SUBSYS

2012-01-04 Thread Lizette Koehler

I assume this august group is filled with people who have forgotten more
about SMFPRMxx than I will ever know. 

I am trying to determine the exact relationship between various SUBSYS(
specifications and the writing of specific SMF record types. (And yes, I
know there are OTHER variables involved, but I'm focused on this one
variable at the moment.)

I would assume that the writing of SMF Type 30 records would be controlled
by SUBSYS(TSO and SUBSYS(JESn statements -- is that correct?

The writing of SMF Type 80 records: controlled by SUBSYS(STC ? Or by SUBSYS
for the particular type of event -- for example, the writing of TSO logon
violations would be controlled by SUBSYS(TSO ?

The writing SMF Type 100-102 (DB2) records: controlled by SUBSYS( where
 is the name of the particular DB2 subsystem?

The writing of SMT Type 119 (TCP/IP) records: controlled by SUBSYS(what?

Many thanks.

Charles Mills



Charles,  

If you are asking about the teh following control cards that can be placed in 
the SMFPRMxx
 SYS(...EXITS(IEFU83,IEFU84,IEFUJI)...)
 SUBSYS(STC,...EXITS(IEFU83,IEFU85)...)
 SUBSYS(TSO,...)
 SUBSYS(JES3,...EXITS(IEFUJI)...)


According to the SMF manual for z/OS V1.11

On the SUBSYS parameter, specify the exits that are to affect work processed by 
a particular SMF-defined subsystem (JES2, JES3, STC, ASCH, or TSO) and no other 
subsystem specific exit points will be taken. 


Is that what you are asking about?  Or are you asking what functions control 
the writing of SMF records?

For example SMF Type 118 and 119 are produced from the Communication Server 
(VTAM).  But there is no SMF SUBSYS exit that could be used for it (I think).


Lizette

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


Re: A design question

2012-01-04 Thread Anthony Thompson
Cheers and thanks for link. 

Ant.
Northern Territory Government of Australia


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Jan MOEYERSONS
Sent: Wednesday, 4 January 2012 9:29 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: A design question

On Wed, 4 Jan 2012 14:24:51 +0930, Anthony Thompson 
anthony.thomp...@nt.gov.au wrote:

 What I want to do is write a BCPii interface that is Windoze driven (i.e. 
 Java that calls C++?).
 Any pointers in this direction would be appreciated.

JNI is the word for you. Java can call C++ and vice-versa. Do be carefull about 
obtaining and releasing the global and local references to your Java classes 
and objects in time so you don't run into performance problems and so the 
garbage collector can do its job properly.

http://java.sun.com/docs/books/jni/ is a good start for a long read.

Cheers,

Jantje.

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

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


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Tony Harminc
On 3 January 2012 19:35, Gerard Nicol gerard.ni...@tapetrack.com wrote:

 I can't believe that IBM didn't provide a APPC connection to their TCP
 address space, if they did you could just IEBEGENER data to a remote SMTP
 server (or other service) from JCL without having to spool the data or
 extend JCL.

Please do show how this would look using APPC. I'm not familiar with
anything like your socket DD.

 That has to be a trivial amount of programming for a huge increase in 
 capability.

Well, perhaps. But there are many options to consider if you want
something like your
//SYSUT2  DD SOCKET=5000

If something like IEBGENER (or presumably any QSAM/BSAM using program)
is going to be able to make use of it, you need to be able to specify
how records are translated into a byte stream, and a few other things:
- where is the data going? Don't you need more than just SOCKET=, e.g.
IP=n.n.n.n or a DNS-resolvable name?
- do you want line ending sequences inserted, and if so, which ones?
CR, CRLF, NL, LF,...?
- do you want character set translation, and if so, which from and to
code pages?
- do you want RDWs or the like to indicate record lengths? In what
far-end-friendly format?
- do you want TCP, UDP, or something else?
- what should happen when something goes wrong?
-- no one is listening at the far end?
-- the far end refuses the connection?
-- the near end won't permit you to bind to the port?
-- etc.
- if you've chosen TCP (or another reliable protocol) do you want a
timeout, and if so, how should it be indicated to IEBGENER?

These are certainly not unanswerable questions, but for almost all
cases a fair bit more information than SOCKET=5000 would have to be
provided.

Tony H.

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


Re: Calling all experts on SMFPRMxx SUBSYS

2012-01-04 Thread Charles Mills
Shoot. I thought I was super clear. (I mean I really hoped I was clear; I don't 
mean you are criticizing me unjustly.)

I understand I think the basics of what is in the IT Reference under 
Parameters for SMFPRMxx. I understand the basic concept of SYS controlling 
things as a whole and being overridden on a subsystem by subsystem basis by 
SUBSYS. I get EXITS/NOEXITS and TYPE/NOTYPE.

What I don't understand is the exact mapping of SUBSYS names to record-level 
functionality.

Let's for argument's sake say I wanted to get every possible SMF Type 30 
record, and let's say I wanted to do that entirely with SUBSYS statements. I 
would code SUBSYS(xxx,EXIT(IEFU83)) and ditto for IEFU84 and IEFU85. I would 
code SUBSYS(xxx,(TYPE(30)). I assume I would have to do that with xxx equal to 
JESn, TSO, STC, and ASCH. Am I correct? (Or I could omit TYPE entirely and let 
it default to 0:255, but let's ignore that for now.)

But let's for argument's sake say I wanted to get every possible SMF Type 80 
record, and I wanted to do that entirely with SUBSYS statements. I would code 
SUBSYS(xxx,EXIT(IEFU83)) and ditto for IEFU84 and IEFU85. I would code 
SUBSYS(xxx,(TYPE(80)). What would xxx be? Would it be JESn and TSO and 
everything else that might generate RACF records, or what? (I have some 
evidence that this is the case; one would have to code every possible 
RACF-affected category.)

What about SMF 100, 101, and 102 records? xxx would have to be every DB2 
subsystem name?

What about SMF 119 records? xxx would be STC? Or what? Or would they be 
controlled exclusively by any SYS(TYPE and EXIT specifications?

Am I making a particle of sense?

I'm not trying to come up with the world's most obscure SMFPRMxx member. I am 
trying to learn to interpret the effect of what customers have coded in their 
SMFPRMxx members, and trust me, many have layers and layers of SYS and SUBSYS 
and TYPE this and NOTYPE that. I'm trying to understand the atomic effect of 
each statement so I can say well, you have to change X to Y.

Comprende?

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Lizette Koehler
Sent: Wednesday, January 04, 2012 3:41 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Calling all experts on SMFPRMxx SUBSYS


I assume this august group is filled with people who have forgotten 
more about SMFPRMxx than I will ever know.

I am trying to determine the exact relationship between various SUBSYS( 
specifications and the writing of specific SMF record types. (And yes, 
I know there are OTHER variables involved, but I'm focused on this one 
variable at the moment.)

I would assume that the writing of SMF Type 30 records would be 
controlled by SUBSYS(TSO and SUBSYS(JESn statements -- is that correct?

The writing of SMF Type 80 records: controlled by SUBSYS(STC ? Or by 
SUBSYS for the particular type of event -- for example, the writing 
of TSO logon violations would be controlled by SUBSYS(TSO ?

The writing SMF Type 100-102 (DB2) records: controlled by SUBSYS( 
where  is the name of the particular DB2 subsystem?

The writing of SMT Type 119 (TCP/IP) records: controlled by SUBSYS(what?

Many thanks.

Charles Mills



Charles,  

If you are asking about the teh following control cards that can be placed in 
the SMFPRMxx
 SYS(...EXITS(IEFU83,IEFU84,IEFUJI)...)
 SUBSYS(STC,...EXITS(IEFU83,IEFU85)...)
 SUBSYS(TSO,...)
 SUBSYS(JES3,...EXITS(IEFUJI)...)


According to the SMF manual for z/OS V1.11

On the SUBSYS parameter, specify the exits that are to affect work processed by 
a particular SMF-defined subsystem (JES2, JES3, STC, ASCH, or TSO) and no other 
subsystem specific exit points will be taken. 


Is that what you are asking about?  Or are you asking what functions control 
the writing of SMF records?

For example SMF Type 118 and 119 are produced from the Communication Server 
(VTAM).  But there is no SMF SUBSYS exit that could be used for it (I think).

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


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Kirk Wolf
I agree with Tony -  there is more to it than just raw socket I/O.

You could port netcat to z/OS and combine it with something that handles
the rest.
Like this:

// EXEC PGM=MYPGM
//OUTPUT DD DSN=TEMP,DISP=(NEW,PASS),...
//*
// EXEC PGM=COZBATCH  an improved BPXBATCH
//INPUTDD DSN=TEMP,DISP=(OLD,DELETE)
//STDIN DD *
# format and translate the records into
# a stream that is piped into netcat
fromdsn -l crlf -t ISO8859-1 //DD:INPUT |
nc myhost.com 5000
//

But, *you don't have to port netcat to z/OS*, since you could use the Co:Z
Launcher to reach out and run netcat on a Unix/Linux appliance (zBX
blade?), like this:

(changing one line)
// EXEC PGM=MYPGM
//OUTPUT DD DSN=TEMP,DISP=(NEW,PASS),...
//*
// *EXEC PROC=COZLNCH,ARGS='u1@linuxappliance'*
//INPUTDD DSN=TEMP,DISP=(OLD,DELETE)
//STDIN DD **
# Same commands, but this now runs on the linuxappliance,
# but fromdsn reaches back to z/OS to read the DD
fromdsn -l crlf -t ISO8859-1 //DD:INPUT |
nc myhost.com 5000
//


Kirk Wolf
Dovetailed Technologies
http://dovetail.com


On Wed, Jan 4, 2012 at 6:07 PM, Tony Harminc t...@harminc.net wrote:


 Well, perhaps. But there are many options to consider if you want
 something like your
 //SYSUT2  DD SOCKET=5000

 If something like IEBGENER (or presumably any QSAM/BSAM using program)
 is going to be able to make use of it, you need to be able to specify
 how records are translated into a byte stream, and a few other things:
 - where is the data going? Don't you need more than just SOCKET=, e.g.
 IP=n.n.n.n or a DNS-resolvable name?
 - do you want line ending sequences inserted, and if so, which ones?
 CR, CRLF, NL, LF,...?
 - do you want character set translation, and if so, which from and to
 code pages?
 - do you want RDWs or the like to indicate record lengths? In what
 far-end-friendly format?
 - do you want TCP, UDP, or something else?
 - what should happen when something goes wrong?
 -- no one is listening at the far end?
 -- the far end refuses the connection?
 -- the near end won't permit you to bind to the port?
 -- etc.
 - if you've chosen TCP (or another reliable protocol) do you want a
 timeout, and if so, how should it be indicated to IEBGENER?

 These are certainly not unanswerable questions, but for almost all
 cases a fair bit more information than SOCKET=5000 would have to be
 provided.

 Tony H.

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


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


Re: z/OS version of NetCat or native JCL support

2012-01-04 Thread Gerard Nicol
Kirk,

I didn't mean to trivialize it, but it's not rocket science either.
So what's the deal with Co:Z Launcher? Did someone say it's free as in
beer?

Gerard

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Kirk Wolf
Sent: Wednesday, January 04, 2012 5:47 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: z/OS version of NetCat or native JCL support

I agree with Tony -  there is more to it than just raw socket I/O.

You could port netcat to z/OS and combine it with something that handles
the rest.
Like this:

// EXEC PGM=MYPGM
//OUTPUT DD DSN=TEMP,DISP=(NEW,PASS),...
//*
// EXEC PGM=COZBATCH  an improved BPXBATCH
//INPUTDD DSN=TEMP,DISP=(OLD,DELETE)
//STDIN DD *
# format and translate the records into
# a stream that is piped into netcat
fromdsn -l crlf -t ISO8859-1 //DD:INPUT | nc myhost.com 5000 //

But, *you don't have to port netcat to z/OS*, since you could use the Co:Z
Launcher to reach out and run netcat on a Unix/Linux appliance (zBX
blade?), like this:

(changing one line)
// EXEC PGM=MYPGM
//OUTPUT DD DSN=TEMP,DISP=(NEW,PASS),...
//*
// *EXEC PROC=COZLNCH,ARGS='u1@linuxappliance'*
//INPUTDD DSN=TEMP,DISP=(OLD,DELETE)
//STDIN DD **
# Same commands, but this now runs on the linuxappliance, # but fromdsn
reaches back to z/OS to read the DD fromdsn -l crlf -t ISO8859-1
//DD:INPUT | nc myhost.com 5000 //


Kirk Wolf
Dovetailed Technologies
http://dovetail.com

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


Re: Copying a PDS to a similiar PDS (backup)

2012-01-04 Thread Graham Hobbs

Lizette/Kees,
I looked up the Share document and it said nothing about JCL changes, plus 
what you explained about 'Authorize' (which I quite misunderstood), so 
reasoned that my JCL had to be wrong .. what else:-(.


Found another JCL example and notes in another doc .. glaring errors in 
SYSUT2! SYSUT2 has to have exactly the same attributes as SYSUT1 i.e. RECFM, 
LRECL, BLKSIZE, allocated CYLS, EXTENTS and BLOCKS, don't use RLSE and it 
works.


//STEP1EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=CONRAD.CBL.PGMS,DISP=SHR
//SYSUT2   DD DSN=CONRADZ.CBL.PGMS.BK120105,DISP=(NEW,CATLG),
// UNIT=SYSDA,VOL=SER=VPWRKA,SPACE=(CYL,(60,1,200)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSINDD *
   COPY INDD=SYSUT1,OUTDD=SYSUT2
/*
.. that worked a treat.
Thanks muchly for the pointers.
Graham

- Original Message - 
From: Lizette Koehler stars...@mindspring.com

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@bama.ua.edu
Sent: Wednesday, January 04, 2012 2:46 AM
Subject: Re: Copying a PDS to a similiar PDS (backup)



Graham Hobbs gho...@cdpwise.net wrote in message
news:jbb7g7p5l51mvm9oooc549bv1tmh1hc...@4ax.com...
 Hello,
 Just returned to z/OS mainframe after 10 years, working alone, nobody
 to talk to:-(. My next elementary question:

 - I need to backup my 80 byte source library PDS's
 - have read that IEBCOPY is no longer authorized .. and I couldn't
 make it work anyway
 - googling doesn't give clear answer

 - Question: how to copy such a PDS to an exactly similiar backup PDS

 Please, thanks,
 Graham Hobbs


Graham,
You may have heard that in z/OS V1.13 that IEBCOPY no longer needs to be 
apf

authorized for some functions.  That does not mean that IEBCOPY no longer
works.  You may wish to look at the share presentation from Aug 2011 on
IEBCOPY and changes coming up with z/OS V1.13.

IEBCOPY is still a good backup for PDS datasets.

DFDSS is a good backup for most datasets

What specifically do you want to do with the backup?  Is this archive,
transport, 

I did not see your original post.  Are you on the LISTSERVER or some other
news process?  If you have not joined the listserver please do, a lot more
of us will see your postings then.

Lizette

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


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


Re: Copying a PDS to a similiar PDS (backup)

2012-01-04 Thread Paul Gilmartin
On Wed, 4 Jan 2012 20:01:54 -0500, Graham Hobbs wrote:

Found another JCL example and notes in another doc .. glaring errors in
SYSUT2! SYSUT2 has to have exactly the same attributes as SYSUT1 i.e. RECFM,
LRECL, BLKSIZE, allocated CYLS, EXTENTS and BLOCKS, don't use RLSE and it
works.

//STEP1EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=CONRAD.CBL.PGMS,DISP=SHR
//SYSUT2   DD DSN=CONRADZ.CBL.PGMS.BK120105,DISP=(NEW,CATLG),
// UNIT=SYSDA,VOL=SER=VPWRKA,SPACE=(CYL,(60,1,200)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSINDD *
COPY INDD=SYSUT1,OUTDD=SYSUT2
 
I hope SPACE, at least, needn't be exactly the same, merely
at least as great, or even just great enough to hold the members
being copied.

And I believe that if you leave RECFM, LRECL, and BLKSIZE blank
IEBCOPY will fill them in from INDD.  (Or am I thinking only of IEBGENER?)
And if SMS is being nice to you, you needn't specify VOL=SER.

-- gil

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


Re: How to find a PDS member

2012-01-04 Thread Graham Harris
May not really be what you want, but there are vendor products out there
that create an index of all members from all (online) PDSs in your
system/sysplex.

I had the pleasure of using this one at a site I worked at for a while, and
it was a very convenient tool to have at one's disposal (has a nice ISPF
dialog).  The index is built purely on the member name (i.e. not member
contents!), but it is a good 'nice to have' tool, nonetheless.

http://www.ufd.ch/downloads/1214227064_pdsxref_flyer_e.pdf



On 4 January 2012 13:55, Lizette Koehler stars...@mindspring.com wrote:

   Graham Hobbsgho...@cdpwise.net  wrote in message
   news:5e97g75eqo2bi4cfbrhqcm9phcacji9...@4ax.com...
   Hello,
   Just returned to z/OS mainframe after 10 years, working alone,
   nobody to talk to:-(. My first elementary question:
  
   - there are many PDS's in the environment I now have access to
   - need to find which PDS(s') members called ABCCOP* exist
   - I don't know which PDS it or they are in
  
   - Question: Can I find it/them with ISPF 3.14 or 3.15; if not then
   how?
  
   Please, thanks, more duqu's to come:-) Graham
 
  Actually, for what he is looking for, the MEMBER command would be
  better: From a 3.4 data set list, enter:
 
  === m abccop*
 
  and each data set that is a PDS or PDSE that contains a member with that
 nameing
  pattern will have a message 'Member: ABCCOP*'
  next to the member's name.
 
 
  SRCHFOR looks for text inside datasets or members.
 
 
  -Steve Comstock
  The Trainer's Friend, Inc.
 
  303-355-2752
  http://www.trainersfriend.com


 Steve,

 Another thought would be (if the right level of z/OS) he could filter the
 SMF Type 42 records (Subtypes 20 21 24 25 for example) for MEMBERs and
 maybe
 find them that way.

 But I think that he left out a bit of detail on what he was trying to do.
  I
 can think of a couple of iterations where these actions would not give him
 the results he is after.


 Lizette

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


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


Re: How to find a PDS member

2012-01-04 Thread Graham Hobbs
OK, thanks, 'member' is the ticket!

Downside is that Dsname Level is mandatory implying some knowledge of the high 
level qualifier. I happened to know that IGYCOP* is what I wanted so found my 
members. In the real world am not sure this is a downside?

Specifically, was looking for member IGYCOPT since I have to change the LIB 
parm to YES from NO so COBOL compiles work with copybooks - so if there's more 
than one, question then becomes 'which one, both, all?'. Have asked VIC Support 
- they're really good!.

Thanks for the info, am learning!
cheers
Graham Hobbs

- Original Message - 
From: Steve Comstock st...@trainersfriend.com
Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@bama.ua.edu
Sent: Wednesday, January 04, 2012 8:06 AM
Subject: Re: How to find a PDS member


 On 1/4/2012 12:50 AM, Lizette Koehler wrote:

 Graham Hobbsgho...@cdpwise.net  wrote in message
 news:5e97g75eqo2bi4cfbrhqcm9phcacji9...@4ax.com...
 Hello,
 Just returned to z/OS mainframe after 10 years, working alone, nobody
 to talk to:-(. My first elementary question:

 - there are many PDS's in the environment I now have access to
 - need to find which PDS(s') members called ABCCOP* exist
 - I don't know which PDS it or they are in

 - Question: Can I find it/them with ISPF 3.14 or 3.15; if not then
 how?

 Please, thanks, more duqu's to come:-) Graham


 Graham,

 What are you trying to do?
 1)  A selected list of PDS datasets and then search for all members of
 ABCCOP*
 2)  Generate a list of PDS Datasets (unknown number) which include members
 for ABCCOP*
 3)  Any datasets in my logon proc that contains ABCCOP* (including LINKLST
 and LPALST)

 In Option 3.4, you can use a command called SRCHFOR that might be of help.

 Lizette
 
 Actually, for what he is looking for, the MEMBER command would be
 better: From a 3.4 data set list, enter:
 
 === m abccop*
 
 and each data set that is a PDS or PDSE that contains a member
 with that nameing pattern will have a message 'Member: ABCCOP*'
 next to the member's name.
 
 
 SRCHFOR looks for text inside datasets or members.
 
 -- 
 
 Kind regards,
 
 -Steve Comstock
 The Trainer's Friend, Inc.
 
 303-355-2752
 http://www.trainersfriend.com
 
 * To get a good Return on your Investment, first make an investment!
   + Training your people is an excellent investment
 
 * Try our tool for calculating your Return On Investment
 for training dollars at
   http://www.trainersfriend.com/ROI/roi.html
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

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


Re: Calling all experts on SMFPRMxx SUBSYS

2012-01-04 Thread Barbara Nitz
Charles,

What I don't understand is the exact mapping of SUBSYS names to record-level 
functionality.

If *I* understand you right, then you're confusing SUBSYS as indicated in 
SMFPRM and a subsystem defined to the SSI.

The SMF SUBSYS types *I* am aware of are JESx, STC, TSO, OMVS, ASCH. That's it. 
The type assigned to the address space the SMF record is either written for or 
that writes it determines under which subsys it will appear. I was going to say 
that you can see the subsystem it is classified to in the TYPE column of SDSF 
(alternate panel for DA), but that's not true here. SUBSYS OMVS shows up there 
as STC. (Any idle BPXOINIT is TYPE(OMVS) and shows up in SDSF as TYPE(STC).) 

TYPE30 can be written for any SUBSYS type. As can TYPE80. 100, 101, 102, 119:  
Same thing. If an application that is TYPE OMVS (let's say one of my much-hated 
USS applications, say, WBI) has calls into DB2, then they would get written for 
TYPE OMVS if that address space was started using the USS interfaces for 
creating an address space.

When in doubt, have your customer have one SYS statement that only specifies 
the types that are to be written. Have your customer remove all TYPE statements 
from any SUBSYS statements they have. In our installation, all TYPEs are 
specified like that and the SUBSYS statements look like this:
SUBSYS(STC,INTERVAL(002000),NODETAIL) 
SUBSYS(TSO,DETAIL)

I think I specified STC nodetail because we do collect TYPE30 and did not need 
the DD stuff that gets written whenever an HSM or DB2 terminates (that quickly 
fills up all SMF buffers). I have no clue why TSO has DETAIL (hysterically 
grown).

The SUBSYS type an address space is classified to are seen in IEFUSI (and in 
all SMF exits). I use them to set a different memlimit in iefusi for the 
different types of asids. From the memlimit value (as shown in SDSF) I can see 
what TYPE an asid is classified to. The exception is the ever-growing list of 
address spaces that consistently override what the installation has specified 
with ridiculously high values that are NOT supported by any paging subsystem. 
And I doubt they all have code in place that prevents a wait03C.

HTH, Barbara

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


Re: Calling all experts on SMFPRMxx SUBSYS

2012-01-04 Thread Hunkeler Peter (KIUP 4)
The SMF SUBSYS types *I* am aware of are JESx, STC, TSO, OMVS, ASCH.
That's it. 

There are three, let's say kinds of address spaces: STC, TSO, and
Initiator address spaces. The latter type comprises JESx initiators,
APPC initiators, and z/OS UNIX initiators, which all run the MVS
initiator module IEFIIC with different parms that tell it how to behave
and how to identify themselves to SMF. This is what SMF's SUBSYS type
refers to: STC, TSO, JESx, APPC, and OMVS. 

JESx distinguishes only between STC, TSO and batch jobs (JOB), and
maintains a range of number for each type. APPC and OMVS never managed
to get their own JESx type, that is why they always show up as type
STCn.

You may have noticed that batch initiator address spaces show up with
jobname = INIT and type STCn when idle. While running a batch job,
they change to show up under the name specified in the batch job's JOB
statement and change the type to JOBn.


 (Any idle BPXOINIT is TYPE(OMVS) and shows up in SDSF as TYPE(STC).) 
You probably meant idle BPXAS here. Furthermore, any non-idle BPXAS,
i.e. one that is currently hosting a forked process, also is of SMF type
OMVS and still shows up as STCn.

--
Peter Hunkeler 

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