Re: CLIST/REXX Library Formats

2009-09-11 Thread Hunkeler Peter (KIUP 4)
That plus the ease of seeing everything on one screen
without having to scroll back and forth was great.  

Interesting that you can see 80 characters in the 72 
positions the ISPF editor has to display the data ;-)
LRECL=72 would be the better choice, then.

-- 
Peter Hunkeler
Credit Suisse

--
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: CLIST/REXX Library Formats

2009-09-11 Thread Itschak Mugzach
For writing purpose, I prefer 80 bytes record, whatever is FB or VM. For
program writing TSO commands to a file, a prefer 255 bytes. This way I don't
have to cut it into a 80 bytes pieces.
I don;t think a 255 bytes record is well readable.
ITschak

On Fri, Sep 11, 2009 at 9:24 AM, Hunkeler Peter (KIUP 4) 
peter.hunke...@credit-suisse.com wrote:

 That plus the ease of seeing everything on one screen
 without having to scroll back and forth was great.

 Interesting that you can see 80 characters in the 72
 positions the ISPF editor has to display the data ;-)
 LRECL=72 would be the better choice, then.

 --
 Peter Hunkeler
 Credit Suisse

 --
 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: CLIST/REXX Library Formats

2009-09-11 Thread Andrew Armstrong
I prefer VB255 for ease of editing - especially with modern 3270 emulators
that support big-x-big geometry.

I'm shooting from the hip here as I don't have access to a machine at the
moment, but I've only ever been bitten by the RECFM=VB plus ISPF editor
combo once. In the mid 1990's I created a RECFM VB data file with Rexx, then
edited it with ISPF editor and found to my astonishment that if a record was
exactly 8 bytes long it was saved with a blank appended - making it 9 bytes
long! Not good for a data file! (that particular data file anyway).

Not sure if that feature is still lurking - I vaguely recall it had
something to do with not upsetting the PL/I or COBOL compiler which
sometimes expected sequence numbers in cols 1 to 8.

Cheers,
Andrew

--
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: CLIST/REXX Library Formats

2009-09-11 Thread Gilbert Saint-Flour
On Friday 11 September 2009 02:28, Ted MacNEIL wrote:

o Industry standard?  Not any more.  (But I can remember when ISPF (at
the time SPF) panels were distributed as VB;   IBM later switched to FB
(circa 1980?).
 
 Later, IIRC.
 I think it came out with XA.
 Also, that was the same time they renamed it and split out PDF.

In 1980, the SPF FDP which was 5787-XT2 (Structured Programming Facility) 
became the SPF product 5668-009 (System Productivity Facility), installed 
under SMP, which does not support a PDS with RECFM=VB.

The vast majority of CLIST/REXX libraries are defined with FB/80.  
Before you define one with VB/255, remember that you can NOT concatenate it 
with existing FB/80 libraries.

Of course, it would be nice if concatenated CLIST/REXX libraries could be FB 
and VB, but I'm not sure IBM will make it possible in the future.  Most of my 
products use the GETSEQ/GETDIR/GETMBR run-time routines which allow the 
concatenation of sequential and partitioned data sets with different DCB 
attributes.  If I do it, IBM could do it also.

-- 
 Gilbert Saint-Flour
 GSF Software
 http://gsf-soft.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: User-written ISPF-Editor line commands

2009-09-11 Thread Michael Knigge
* FA - Find All occurrences of a word. 



I did a similar thing using a Macro with Vista tn3270

If I press ALT-ENTER, the word under the Cursor is searched with a FIND 
xxx ALL command.


If I press CTRL-ENTER, the Word under the cursor is searched on column 8 
(-- so I put the cursor on a PERFORM X00-FOO-BA, press CTRL-ENTER and 
the editor jumps to the X00-FOO-BA paragraph...


I really don't wanna miss one of them


But ok, not native for ISPF because it is a 3270-Emulation macro.



Bye,
Michael

--
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: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread R.S.

Edward Jaffe pisze:
[...]

IBM SCRT does not support ISV products. Period.


Why?
SCRT is based on two records:
a) CPU utilization (SMF72 afaik)
b) products launched (SMF89)

Record 72 reporting does not require any change - so ISV would know what 
the 4HRA was on each LPAR.

There is still no report about LPARs where the product was used.
ISV has the following possibilities:

1. Simply trust customer and rely on customers declaration
2. Change the product to write their own SMF89 (or rather add a section 
to it).
3. Change the product to create custom SMF record and create own 
reporting tool. The tool may analyze SMF72 as well otherwise two reports 
will be sent to ISV: SCRT for utilization information and ISV-SCRT for 
product information.
4. Tie the product to given LPAR name. This is what some vendors already 
do. Not only CPC serial is checked, but also LPAR id or LPAR name.




--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy 
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, 
nr rejestru przedsibiorców KRS 025237

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci 
wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 
2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec 
podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym 
BRE Banku SA bd w caoci opacone.

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


Leonard Sasso/GIS/CSC is Out-of-the-Office.

2009-09-11 Thread Leonard Sasso
I will be out of the office starting  09/11/2009 and will not return until
09/14/2009.


If you require immediate attention please contact Deb Hext (518) 257-4212,
Tony Alfonso (518) 257-4640 or Joyce Brooks (518) 257-4208 .  You may also
contact my Team Lead, Sharon King (518) 257-4784 or my manager, David
Richardson (518) 257-4414, otherwise I will respond to your message when I
return.  Please send all emails to our Lotus Notes Group
rdc_applications_...@csc.

  I hope you have a wonderful day !

  Thank You,

   Len

--
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: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread Martin Packer
I thought it was Type 70 rather than Type 72. (70 is CPU, 72 is Workload.)

Being in IBM Software Group I suppose I ought to pay more attention to 
software pricing. :-)

Martin

Martin Packer
Performance Consultant
IBM United Kingdom Ltd
+44-20-8832-5167
+44-7802-245-584

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

Twitter ID: MartinPacker

They're figuring out that collaboration isn't a productivity hit, it 
makes them smarter. Sam Palmisano on BlogCentral, 26 November 2008





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


Re: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread R.S.

Martin Packer pisze:

I thought it was Type 70 rather than Type 72. (70 is CPU, 72 is Workload.)

Being in IBM Software Group I suppose I ought to pay more attention to 
software pricing. :-)


Yes, it is SMF70. I haven't checked before writing. However it is 
irrelevant for the main topic.


--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy 
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, 
nr rejestru przedsibiorców KRS 025237

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci 
wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 
2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec 
podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym 
BRE Banku SA bd w caoci opacone.

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


FTP error checking and recovery

2009-09-11 Thread Jim McAlpine
How reliable is FTP across the internet ?  I have a large number of DFDSS
dumps to move to the IBM Remote Development Facility and the most convenient
way is via FTP.  Can I be confident that if the FTP completes without error
then the DFDSS dump file will get there completely intact and without
errors.  Or should I look for alternate methods of delivery such as copying
the dumps to DVD.

Jim McAlpine

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


your session 2817: Bit Bucket x '25' pitch

2009-09-11 Thread Jan Vanbrabant
Hi Ed, Sam, Skip,

Pls would you like to make available your (usually --- always :-) ) bit bucket 
pitch of the Denver SHARE?
It's not (yet) available on the proceedings disk.

thanks on beforehand,
jan


--
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: FTP error checking and recovery

2009-09-11 Thread Chris Mason
Jim

FTP uses TCP so it's the reliability of TCP that matters here. Of what 
underlying facilities happen to consist is very probably of no relevance. Thus, 
assuming the underlying facilities are inherently *less* reliable that the 
reliability offered by TCP, you get the same level of reliability whether you 
are 
passing data within your local infranet or over the Internet.

So, if you consider TCP offers sufficient reliability, you don't need to go 
looking for another technique for moving your dumps. I suspect that, for 
dumps, TCP is quite adequate.

Chris Mason

On Fri, 11 Sep 2009 09:42:05 +0100, Jim McAlpine 
jim.mcalp...@gmail.com wrote:

How reliable is FTP across the internet ?  I have a large number of DFDSS
dumps to move to the IBM Remote Development Facility and the most 
convenient
way is via FTP.  Can I be confident that if the FTP completes without error
then the DFDSS dump file will get there completely intact and without
errors.  Or should I look for alternate methods of delivery such as copying
the dumps to DVD.

Jim McAlpine

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


Ted Kotlowski is out of the office.

2009-09-11 Thread Ted Kotlowski
I will be out of the office starting  09/11/2009 and will not return until
09/15/2009.

I will respond to your message when I return.
If your request requires immediate attention, Please contact the MVS
Technical Support Hotline
at 1-866-866-4488 x12000


**
This e-mail message and all attachments transmitted with it may contain legally 
privileged and/or confidential information intended solely for the use of the 
addressee(s). If the reader of this message is not the intended recipient, you 
are hereby notified that any reading, dissemination, distribution, copying, 
forwarding or other use of this message or its attachments is strictly 
prohibited. If you have received this message in error, please notify the 
sender immediately and delete this message and all copies and backups thereof.

Thank you.
**

--
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: FTP error checking and recovery

2009-09-11 Thread Jim McAlpine
On Fri, Sep 11, 2009 at 9:56 AM, Chris Mason chrisma...@belgacom.netwrote:

 Jim

 FTP uses TCP so it's the reliability of TCP that matters here. Of what
 underlying facilities happen to consist is very probably of no relevance.
 Thus,
 assuming the underlying facilities are inherently *less* reliable that the
 reliability offered by TCP, you get the same level of reliability whether
 you are
 passing data within your local infranet or over the Internet.

 So, if you consider TCP offers sufficient reliability, you don't need to go
 looking for another technique for moving your dumps. I suspect that, for
 dumps, TCP is quite adequate.

 Chris Mason


Chris, thanks, that's good to hear.  However I've just tried to FTP my first
dump which was approx 1.4 GB and it failed about one third the way through
with -

Netout : Connection reset by peer
451 Transfer aborted due to receive error

which doesn't bode well.

Jim McAlpine

--
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: Sending email via rexx

2009-09-11 Thread Umamaheshwar Iyer
Mark

I want to send an attachment in an email using REXX.

Could you please send me the rexx code if you have one?

TIA


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Joel C. Ewing
Sent: Wednesday, July 29, 2009 6:38 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Sending email via rexx

Mark Zelden wrote:
 On Tue, 28 Jul 2009 13:19:57 -0500, gsg gsg_...@yahoo.com wrote:
 
 Does anyone know how to send a email via a rexx routine?  Also, are
there
 any good LISTSERV specifically for rexx?

 TIA

 
 To start with the 2nd question:  TSO-REXX.  Subscribe at 
 lists...@vm.marist.edu
 
 IBM's SMTPNOTE sample is in REXX.  It lives in hlq.SEZAINST(SMTPNOTE)
.
 
 XMITIP is probably REXX, isn't it?
 
 For a very simple sample, how about this:
 
 /* REXX */   
 parse arg recpt msg  
 smtp.1 = 'HELO' MVSVAR('SYSNAME')
 smtp.2 = 'MAIL FROM:mzel...@zeldenconsulting.com'  
 smtp.3 = 'RCPT TO:'recpt'' 
 smtp.4 = 'DATA'  
 smtp.5 = 'FROM:Mark Zelden mzel...@zeldenconsulting.com' 
 smtp.6 = 'TO:' recpt 
 smtp.7 = 'Subject: SMTPREXX Email Message'   
 smtp.8 = msg 
 /* smtp.9 = 'QUIT'*/ 
 ALLOC F(SMTPOUT) SYSOUT(B) WRITER(SMTP)
 if RC  0 then do   
   say 'Error allocating SYSOUT for SMTP WRITER'  
   exit 12
 end  
 EXECIO * DISKW SMTPOUT (STEM SMTP. FINIS   
 if RC  0 then do   
   say 'Error writing SYSOUT for SMTP WRITER' 
   FREE F(SMTPOUT)  
   Exit 12
 End  
 FREE F(SMTPOUT)
 
 
 Calling the exec and passing parms left as an exercise to the reader.
 
 Mark
 --
 Mark Zelden
 Sr. Software and Systems Architect - z/OS Team Lead
 Zurich North America / Farmers Insurance Group - ZFUS G-ITO
...
A large part of XMITIP is written in REXX (some features like pdf 
generation, etc. call assembler-based code under the covers).  This 
means you can simply CALL XMITIP from another REXX program with the 
same parameters (and optional file allocations) as you would in batch 
XMITIP invocations.  There is also an ISPF dialog interface to XMITIP, 
but we rarely use it.  XMITIP is a freebie available via 
http://www.lbdsoftware.com/tcpip.html and is well documented.

XMITIP, like the simple sample below, produces SYSOUT to the JES queues,

and both presume you have the JES-based SMTP server configured and 
running to pull and process that SYSOUT.  Whether the SYSOUT class is 
B or some other class depends on how that server is configured (we use

a numeric class 3 to keep Email clutter away from the classes 
Operators care about).  The simplest SMTP server set up is to have it 
forward email to a corporate email server on another platform.  That 
relegates any firewall and undeliverable email issues to the corporate 
email server, where they have presumably already been solved.

For simple Email, the direct generation of the Email SYSOUT can be done 
as in Mark's example, but if you want to do anything at all fancy I 
would recommend using XMITIP and letting it deal with all the petty 
syntax and semantics details.  XMITIP does at least require a TSO 
environment (batch or interactive), so there may be some places (like 
Netview automation) where it can't be used.

Usage of these techniques for any mass corporate emailing needs to be 
approached with care to avoid exhausting your JES resources and causing 
serious problems.  For the few batch processes we have that do this, we 
have written a REXX front end to XMITIP which will process a batch of 
messages from a file, but come up for air every several hundred messages

and use the SDSF API to verify there is no shortage of JES resources 
before allowing the process to continue.
   J C Ewing

-- 
Joel C. Ewing, Fort Smith, ARjremoveccapsew...@acm.org

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




Disclaimer:

This message and the information contained herein is proprietary and 
confidential and subject to 

Re: FTP error checking and recovery

2009-09-11 Thread Chris Mason
Jim

Being reliable includes giving up - and saying so - when slings and arrows 
intervene.

Perhaps I picked up the wrong emphasis from your original post. I took it to be 
a concern over FTP rather than a concern over the Internet. As you have 
demonstrated to yourself, the Internet - as they say these days - 
has reliability issues! At some point, TCP will give up retrying to 
compensate 
for the unreliability of the underlying TCP connection path.

Chris Mason

On Fri, 11 Sep 2009 10:26:20 +0100, Jim McAlpine 
jim.mcalp...@gmail.com wrote:

On Fri, Sep 11, 2009 at 9:56 AM, Chris Mason 
chrisma...@belgacom.netwrote:

 Jim

 FTP uses TCP so it's the reliability of TCP that matters here. Of what
 underlying facilities happen to consist is very probably of no relevance.
 Thus,
 assuming the underlying facilities are inherently *less* reliable that the
 reliability offered by TCP, you get the same level of reliability whether
 you are
 passing data within your local infranet or over the Internet.

 So, if you consider TCP offers sufficient reliability, you don't need to go
 looking for another technique for moving your dumps. I suspect that, for
 dumps, TCP is quite adequate.

 Chris Mason


Chris, thanks, that's good to hear.  However I've just tried to FTP my first
dump which was approx 1.4 GB and it failed about one third the way through
with -

Netout : Connection reset by peer
451 Transfer aborted due to receive error

which doesn't bode well.

Jim McAlpine

--
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: Sending email via rexx

2009-09-11 Thread Richards, Robert B.
As was indicated, the REXX code is in XMITIP:

XMITIP is a freebie available for download from 
http://www.lbdsoftware.com/tcpip.html and is well documented.

Bob

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Umamaheshwar Iyer
Sent: Friday, September 11, 2009 6:20 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Sending email via rexx

Mark

I want to send an attachment in an email using REXX.

Could you please send me the rexx code if you have one?

TIA

--
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: PDSE HELP Required.

2009-09-11 Thread Bob Shannon
I don't understand why the vendors are populating the libraries in PDSE

If any of the features of Program Objects are required, then PDSEs are 
mandatory, i.e., Program Objects cannot reside in PDSs. I suspect the majority 
of vendors use PDSs unless their code requires PDSEs.

Bob Shannon
Rocket Software

--
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: file integrity verified - do I care?

2009-09-11 Thread Shmuel Metz (Seymour J.)
In 4aa0113f.6f0f.008...@efirstbank.com, on 09/03/2009
   at 06:55 PM, Frank Swarbrick frank.swarbr...@efirstbank.com said:

Certain classes of I-O status values indicate fatal exception
conditions. These are: any that begin with the digit 3 or 4, and any that
begin with the digit 9 that the implementor defines as fatal.

That seems to say that IBM complied.

So in this case IBM has chosen to make status '97' not only not fatal,
but in fact absolutely successful.  I am unable to determine of the
standard actually allows a '9' error to be considered successful, or if
it should only be a non-fatal or fatal error.

Does the standard define successful? Does it distinguish between
successful and non-fatal?

Anyway, the point(!) to all of this is I would like to make a
requirement to IBM Enterprise Cobol to have an option to no longer set a
file status of 97 when this occurs, but rather to set the file status to
00.

That sounds reasonable.

So since 97 doesn't seem to be useful

What it seems to you may not be what it seems to others. It certainly
seems useful to me.

Yes, I realize we should simply change the programs to conform to the
IBM compiler.  But my feeling is that it's the status 97 that does not
conform to the Cobol standard,

That's reasonable only if you misquoted the text from the standard earlier
in your message; the current behavior certainly conforms to what you
quoted.

Any thoughts? 

Go through channels to endorse the Share requirement.
 
-- 
 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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: file integrity verified - do I care?

2009-09-11 Thread Shmuel Metz (Seymour J.)
In 85ce438477b040f1aa47a93d19a78...@wmk, on 09/04/2009
   at 04:43 PM, Bill Klein wmkl...@ix.netcom.com said:

(Obviously, run-time would have the advantage of no recompile required
while compile-time would have the advantage of NOT impacting existing
programs - without an explicit selection of the feature).

A run-time option would not impact existing programs either. IMHO, the
preferred solution would be to have an installation default, a compile
time option *and* a run-time option to override the compile-time option.

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


Re: $HASP050 JES2 RESOURCE SHORTAGE OF BUFX - 0% UTILIZATION REACHED

2009-09-11 Thread Shmuel Metz (Seymour J.)
In
ofb9c56f43.4d9b77ed-on8825762b.00632f70-8825762b.00643...@ea.epson.com,
on 09/08/2009
   at 11:13 AM, John Mattson john_matt...@ea.epson.com said:

This reminds me of my bank (USAA) which I cannot get to stop 
sending me reminders that my credit card payment of $0.00 is due. 

Send them a check for $.01 and see whether you can trigger another bug. Or
check whether you can convince any national newspaper to run a humorous
article on them.

I am not quite sure WHY JES2, zOS 1.08, puts out this message,

Open a PMR; even if there is a legitimate reason, the message is broken.
 
-- 
 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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Binder API...broke or working as designed

2009-09-11 Thread Shmuel Metz (Seymour J.)
In 2mkk959rl49egrm7msh5j009tv6lou4...@4ax.com, on 08/30/2009
   at 01:22 PM, Binyamin Dissen bdis...@dissensoftware.com said:

Such as?

Anything without a PPT entry, for starters.
 
-- 
 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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: 33 Years In IT/Security/Audit

2009-09-11 Thread Shmuel Metz (Seymour J.)
In 152801ca2b15$d0622140$712663...@co.uk, on 09/01/2009
   at 11:06 AM, Doc Farmer docfarmer9...@yahoo.co.uk said:

Man, do I feel OLD!!!

Old? My first computer[1] used a drum for main storage and vacuum tubes
for logic; there are people on this list who go back further than me.

[1] It was an IBM 650; nostalgia is not an option.
 
-- 
 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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: CA-VIEW (SARBCH)

2009-09-11 Thread Shmuel Metz (Seymour J.)
In 6cd8dd927eba514e9db1e36304be38d7117ad...@hou-mail.kbm1.loc, on
09/09/2009
   at 07:39 AM, Staller, Allan allan.stal...@kbm1.com said:

AFAIK, CALL cannot be used from TSO for APF authorized execution,

You've been able to do that since Old Man Noach cornered the market in
gopher wood. What did you think that the AUTHPGM list was for?

because the TSO CALL command is not authorized.

The TSO CALL command is handled by the TMP.
 
-- 
 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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Catering for ESLs (was Re: ist663i suppression)

2009-09-11 Thread Shmuel Metz (Seymour J.)
In 45d79eacefba9b428e3d400e924d36b902724...@iwdubcormsg007.sci.local, on
08/31/2009
   at 03:06 PM, Thompson, Steve steve_thomp...@stercomm.com said:

My wife speaks German. I speak a very small bite of German (not correct
but a literal for how I would say I speak a little German in Deutsch).
She attempted to say something for me at my level and realized that she
had used the wrong form of to hear. I thought she was telling me that
what I heard belonged here. In context, it kinda made sense (I can hear
a certain poster in Germany having a very good laugh right about
now).

A native Anglophone speaking Hebrew can trip over idioms in an amusing
fashion, e.g., asking how to get to the bathroom when you meant to ask
about a shared taxicab.
 
-- 
 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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP error checking and recovery

2009-09-11 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Jim McAlpine
 
 How reliable is FTP across the internet ?  I have a large number of
DFDSS
 dumps to move to the IBM Remote Development Facility and the most
convenient
 way is via FTP.  Can I be confident that if the FTP completes without
error
 then the DFDSS dump file will get there completely intact and without
 errors.  Or should I look for alternate methods of delivery such as
copying
 the dumps to DVD.

How reliable is the Internet itself?

The only FTP problem we've ever experienced, where a file received was
NOT identical to the file sent, was (finally) traced to a defective
switch.  At random, bytes were trans-positioned within a block such that
the checksum for the block remained unchanged.  That was a real
head-scratcher.

If the files you need to move are sufficiently important to you, do
both.

-jc-

--
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: User-written ISPF-Editor line commands

2009-09-11 Thread Donald Johnson
Paul, I like the sounds of these - would you be free to post/send the source
for these commands?
Don

On Thu, Sep 10, 2009 at 5:53 PM, Beesley, Paul
paul.bees...@atosorigin.comwrote:

 A few more to add ..

 NA, NC, NJ, NR, NP - convert line to a comment (
 Assembler/Cobol/JCL/Rexx/PL1 ) - as per Roscoe equivalents
 JJ - Join JCL lines, removing the // from the front
 JS - Split a JCL line at the cursor, inserting a // and spaces to line
 it up
 / - scroll this line to the top ( cos I kept thinking I was in CMS edit
 ... )


 Regards
 Paul

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of George.William
 Sent: 10 September 2009 22:35
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: User-written ISPF-Editor line commands

 Ya, guess it is.
 Actuall TJ is different from TF.
 TF - Text Flow will 'flow' the indicated line and all subsequent lines
 below it till the end of the paragraph.

 TJ - Text Join, joins the indicated line and ONLY THE ONE LINE BELOW IT
 and will not 'flow' to a 2nd line if the   data is longer than the
 BNDS (bounds). Useful to join two lines of code when using TF would
 create havoc with your code.


 -Original Message-

  ___

 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


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


SV: Synchronizing TOD between mainframe and other platforms

2009-09-11 Thread Brüchmann . Frank FBR
There's one very good reason to get file 501: it comes with ets1, a pc program 
that will connect with your 9037 via RS232, and act as an ETS. This will let 
you syncronize your mainframe time with anything the pc can be synced with.

Regards 
Frank Brüchmann 

Scott Rowe wrote:
z/OS has had it's own time server for quite some time now, no need to use the 
CBT version.

 Angel-Luis Dominguez angel_luis_dominguez_mar...@yahoo.es 8/20/2009 1:06 
 AM 
Have a look at FILE 501 from CBT.

It is a very simple and effective way to sync every machine, even PC's 
obtaining directly time from mainframe.

--
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: FTP error checking and recovery

2009-09-11 Thread John Kington
Jim,
How reliable is FTP across the internet ?  I have a large number of DFDSS
dumps to move to the IBM Remote Development Facility and the most convenient
way is via FTP.  Can I be confident that if the FTP completes without error
then the DFDSS dump file will get there completely intact and without
errors.  Or should I look for alternate methods of delivery such as copying
the dumps to DVD.
I always had problems sending DSS dumps via ftp unless I tersed it. DSS expects 
a short block at the beginning of the file and my ftp, especially to a 
non-mainframe server always seemed to cause the resulting file to be reblocked. 
The result was DSS would state it was not a valid backup. It seems to me that 
you could use struct=r or something like that if you were ftp'ing from a z/os 
directly to another z/os.
As for the Internet, you get what you get. There are ftp clients capable of 
restarting the ftp at the point in the file where it failed. That would allow 
you to avoid resending data that has already been received.
Good luck,
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: Dynamic Cache Management

2009-09-11 Thread John Kington
GSG,
I was reading the Implementing System-Managed Storage book and came
accross Using Cache to improve performance, were it spoke about Dynamic
Cache Magagement.  Is there still a benefit in implementing this?
PROS/CONS.  Is anyone using this?  Got any general guidelines for starting 
out?

I never bothered with DCM(E) since all data written to/read from modern dasd 
subsystems went though cache anyway. It is very complex sometimes trying to 
figure out why allocations are occurring against certain volumes and not 
others. DCM(E) just added another complicating factor that did not seem to have 
any significant benefit in performance.
Your mileage may vary.
Regards,
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: $HASP050 JES2 RESOURCE SHORTAGE OF BUFX - 0% UTILIZATION REACHED

2009-09-11 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Shmuel Metz (Seymour
J.)
 
 on 09/08/2009
at 11:13 AM, John Mattson said:
 
 This reminds me of my bank (USAA) which I cannot get to stop
 sending me reminders that my credit card payment of $0.00 is due.
 
 Send them a check for $.01 and see whether you can trigger another
bug. Or
 check whether you can convince any national newspaper to run a
humorous
 article on them.

Did that once:  In response to a FINAL NOTICE that my balance of $0.00
was PAST DUE and that collection proceedings would commence if payment
was not received by a specified date, I sent them a check for $0.00.  A
few days later, got a phone call from an account manager, the gist of
which was Are you trying to be funny or something?

   -jc-

--
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: your session 2817: Bit Bucket x '25' pitch

2009-09-11 Thread Tom Marchant
On Fri, 11 Sep 2009 08:53:27 +, Jan Vanbrabant wrote:

Hi Ed, Sam, Skip,

Pls would you like to make available your (usually --- always :-) ) 
bit bucket pitch of the Denver SHARE?
It's not (yet) available on the proceedings disk.

Bit bucket x'25' from Austin and bit bucket x'26' from Denver are both
available on the share web site.

-- 
Tom Marchant 

--
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: your session 2817: Bit Bucket x '25' pitch

2009-09-11 Thread Mark Zelden
On Fri, 11 Sep 2009 08:53:27 +, Jan Vanbrabant
jan.vanbrab...@telenet.be wrote:

Hi Ed, Sam, Skip,

Pls would you like to make available your (usually --- always :-) ) bit
bucket pitch of the Denver SHARE?
It's not (yet) available on the proceedings disk.

thanks on beforehand,
jan


It's out on the SHARE web site. http://www.share.org.  Since Denver is the
current proceedings, you don't have to be registered either AFAIK.

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: Use of RETAIN

2009-09-11 Thread Daniel McLaughlin
I'll be glad to share the JCL, the EXEC, as well once I get it to work. Still 
unable 
to get the tape to go from step to step. Here is JCL from step 1 to step 2.

 //DISKZ  DD UNIT=3390,DISP=SHR,VOL=SER=DB0033
 //TAPEZ  DD DSN=PDR.TSTBKP.DB0033(+1),   
 //  DISP=(NEW,CATLG,DELETE),UNIT=TAPE92, 
 //  DCB=(IPOBAK.PATTERN.DSCB,BUFNO=10),  
 // VOL=REF=PDR.TSTBKP.AIG002,LABEL=(35,SL,EXPDT=99000)   
 //SYSIN  DD DSN=PROD.PARMLIB(DR100),DISP=SHR 
 //SYSPRINT DD SYSOUT=*   
 //SYSPRIN1 DD SYSOUT=*   
 //SYSDUMP  DD SYSOUT=*   
 //ABRMAP   DD SYSOUT=*   
 //* End of Step  
//DuMP2  EXEC PGM=FDR,REGION=8M
//DISK1  DD UNIT=3390,DISP=SHR,VOL=SER=DB0034  
//TAPE1  DD DSN=PDR.TSTBKP.DB0034(+1), 
//  DISP=(NEW,CATLG,DELETE),UNIT=TAPE92,   
//  DCB=(IPOBAK.PATTERN.DSCB,BUFNO=10),
//  LABEL=(36,SL,EXPDT=99000), 
//  VOL=REF=PDR.TSTBKP.AIG002  

This is the latest iteration which just dies off the jump. I'm sure it has to 
do 
with the fact I'm using GDGs with (+1). When I was using a refer back to 
DUMP1, TAPE1 and RETAIN it was dropping the tape after step one and dying.

As I said, I'm happy to share any of this and should have made an update. Mea 
Culpa!

--
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: Use of RETAIN

2009-09-11 Thread Tim Brown
Did you try the one step version with multiple dumps
that I sent you.

Tim

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu]on
Behalf Of Daniel McLaughlin
Sent: Friday, September 11, 2009 9:19 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Use of RETAIN


I'll be glad to share the JCL, the EXEC, as well once I get it to work. Still 
unable 
to get the tape to go from step to step. Here is JCL from step 1 to step 2.

 //DISKZ  DD UNIT=3390,DISP=SHR,VOL=SER=DB0033
 //TAPEZ  DD DSN=PDR.TSTBKP.DB0033(+1),   
 //  DISP=(NEW,CATLG,DELETE),UNIT=TAPE92, 
 //  DCB=(IPOBAK.PATTERN.DSCB,BUFNO=10),  
 // VOL=REF=PDR.TSTBKP.AIG002,LABEL=(35,SL,EXPDT=99000)   
 //SYSIN  DD DSN=PROD.PARMLIB(DR100),DISP=SHR 
 //SYSPRINT DD SYSOUT=*   
 //SYSPRIN1 DD SYSOUT=*   
 //SYSDUMP  DD SYSOUT=*   
 //ABRMAP   DD SYSOUT=*   
 //* End of Step  
//DuMP2  EXEC PGM=FDR,REGION=8M
//DISK1  DD UNIT=3390,DISP=SHR,VOL=SER=DB0034  
//TAPE1  DD DSN=PDR.TSTBKP.DB0034(+1), 
//  DISP=(NEW,CATLG,DELETE),UNIT=TAPE92,   
//  DCB=(IPOBAK.PATTERN.DSCB,BUFNO=10),
//  LABEL=(36,SL,EXPDT=99000), 
//  VOL=REF=PDR.TSTBKP.AIG002  

This is the latest iteration which just dies off the jump. I'm sure it has to 
do 
with the fact I'm using GDGs with (+1). When I was using a refer back to 
DUMP1, TAPE1 and RETAIN it was dropping the tape after step one and dying.

As I said, I'm happy to share any of this and should have made an update. Mea 
Culpa!

--
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: Sending email via rexx

2009-09-11 Thread Mark Zelden
It was already suggested to have a look at XMITIP if you want to do
something that wasn't basic.   Although I haven't looked at it, it does
something
like the JCL example below within the code.  This sample sends my IPLINFO
as an attachment and it is taken from a PDS member: 


//S1  EXEC PGM=IEBGENER  
//SYSIN   DD DUMMY   
//SYSPRINTDD SYSOUT=*
//SYSUT2  DD SYSOUT=B,DEST=SMTP  
//SYSUT1  DD DATA,DLM=## 
helo MYJESNOD
mail from:zeld...@myjesnod 
rcpt to: mark.zel...@zurichna.com  
data 
From: Mark Zelden zeld...@myjesnod   
Subject: Test Email With Attachment  
To: Mark Zelden  mark.zel...@zurichna.com
MIME-Version: 1.0
Content-type: multipart/mixed; boundary=qwerty1234 
Content-Transfer-Encoding: 7bit  
 
--qwerty1234 
 
This is a test email sent from z/OS with an attachment.  
 
 
--qwerty1234 
Content-Type: text/plain; charset=us-ascii   
Content-Description: iplinfo REXX exec   
Content-Disposition: attachment; 
filename=iplinfo.txt   
 
##   
//  DD DISP=SHR,DSN=MY.REXX.LIB(IPLINFO) 
 
--qwerty1234--   
.
Quit 



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


On Fri, 11 Sep 2009 15:49:43 +0530, Umamaheshwar Iyer
ui0037...@techmahindra.com wrote:

Mark

I want to send an attachment in an email using REXX.

Could you please send me the rexx code if you have one?

TIA


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Joel C. Ewing
Sent: Wednesday, July 29, 2009 6:38 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Sending email via rexx

Mark Zelden wrote:
 On Tue, 28 Jul 2009 13:19:57 -0500, gsg gsg_...@yahoo.com wrote:

 Does anyone know how to send a email via a rexx routine?  Also, are
there
 any good LISTSERV specifically for rexx?

 TIA


 To start with the 2nd question:  TSO-REXX.  Subscribe at
 lists...@vm.marist.edu

 IBM's SMTPNOTE sample is in REXX.  It lives in hlq.SEZAINST(SMTPNOTE)
.

 XMITIP is probably REXX, isn't it?

 For a very simple sample, how about this:

 /* REXX */
 parse arg recpt msg
 smtp.1 = 'HELO' MVSVAR('SYSNAME')
 smtp.2 = 'MAIL FROM:mzel...@zeldenconsulting.com'
 smtp.3 = 'RCPT TO:'recpt''
 smtp.4 = 'DATA'
 smtp.5 = 'FROM:Mark Zelden mzel...@zeldenconsulting.com'
 smtp.6 = 'TO:' recpt
 smtp.7 = 'Subject: SMTPREXX Email Message'
 smtp.8 = msg
 /* smtp.9 = 'QUIT'*/
 ALLOC F(SMTPOUT) SYSOUT(B) WRITER(SMTP)
 if RC  0 then do
   say 'Error allocating SYSOUT for SMTP WRITER'
   exit 12
 end
 EXECIO * DISKW SMTPOUT (STEM SMTP. FINIS
 if RC  0 then do
   say 'Error writing SYSOUT for SMTP WRITER'
   FREE F(SMTPOUT)
   Exit 12
 End
 FREE F(SMTPOUT)


 Calling the exec and passing parms left as an exercise to the reader.

 Mark
 --
 Mark Zelden
 Sr. Software and Systems Architect - z/OS Team Lead
 Zurich North America / Farmers Insurance Group - ZFUS G-ITO
...
A large part of XMITIP is written in REXX (some features like pdf
generation, etc. call assembler-based code under the covers).  This
means you can simply CALL XMITIP from another REXX program with the
same parameters (and optional file allocations) as you would in batch
XMITIP invocations.  There is also an ISPF dialog interface to XMITIP,
but we rarely use it.  XMITIP is a freebie available via
http://www.lbdsoftware.com/tcpip.html and is well documented.

XMITIP, like the simple sample below, produces SYSOUT to the JES queues,

and both presume you have the JES-based SMTP server configured and
running to pull and process that SYSOUT.  Whether the SYSOUT class is
B or some other class depends on how that server is configured (we use

a numeric class 3 to keep Email clutter away from the classes

Re: CLIST/REXX Library Formats

2009-09-11 Thread Paul Gilmartin
On Fri, 11 Sep 2009 09:44:40 +0200, Gilbert Saint-Flour wrote:

In 1980, the SPF FDP which was 5787-XT2 (Structured Programming Facility)
became the SPF product 5668-009 (System Productivity Facility), installed
under SMP, which does not support a PDS with RECFM=VB.

AFAIK, there was always at least partial suppord for PDS with RECFM=VB.
They could always be delivered in SYSMODs in relative file format, but
not in inline elements.  Nowadays, with GIMDTS, there is no such
restriction.

-- 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: file integrity verified - do I care?

2009-09-11 Thread Howard Brazee
On 11 Sep 2009 04:50:03 -0700, shmuel+ibm-m...@patriot.net (Shmuel
Metz  , Seymour J.) wrote:

So since 97 doesn't seem to be useful

What it seems to you may not be what it seems to others. It certainly
seems useful to me.

So how do you use it?   What do you do differently when you get a 97
than when you get a 00?

--
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: FTP error checking and recovery

2009-09-11 Thread Paul Gilmartin
On Fri, 11 Sep 2009 09:42:05 +0100, Jim McAlpine wrote:

How reliable is FTP across the internet ?  ...

(That's how it is most commonly used.)

How reliable is FTP across the internet ?  I have a large number of DFDSS
dumps to move to the IBM Remote Development Facility and the most convenient
way is via FTP.  Can I be confident that if the FTP completes without error
then the DFDSS dump file will get there completely intact and without
errors.  Or should I look for alternate methods of delivery such as copying
the dumps to DVD.

With either technique, you will probably need to protect the record
structure with an envlope.  IBM usually recommends AMATERSE.  Do TERSE
envelopes use any sort checksum for verification?  You will need to
investigate:

o Does the RDF provide support for data on DVD?

o Does the RDF provide support for verifying checksums?  The base
  z/OS provides the POSIX cksum(1), and ICSF supports SHA-1, perhaps
  others, and MD5 is widely available as source in an RFC and as
  executables for various platforms.

-- 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: $HASP050 JES2 RESOURCE SHORTAGE OF BUFX - 0% UTILIZATION REACHED

2009-09-11 Thread Howard Brazee
On 11 Sep 2009 05:13:20 -0700, jch...@ussco.com (Chase, John) wrote:

Did that once:  In response to a FINAL NOTICE that my balance of $0.00
was PAST DUE and that collection proceedings would commence if payment
was not received by a specified date, I sent them a check for $0.00.  A
few days later, got a phone call from an account manager, the gist of
which was Are you trying to be funny or something?

I got a letter back when I tried this.   But it was about 4 decades
ago.

I also once wrote a check out using mills, when the calculation
indicated I should do so, and there were no instructions on how to
round.   It may be legal tender, but they couldn't handle it.

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


RES: Sytem Managed Buffering

2009-09-11 Thread ITURIEL DO NASCIMENTO NETO
In the past we were a heavy user of SMB, just in batch, and there were
no easy way
of determinig if it was really working as expected. In your tests pay
attention to
the ACB to be opened. If it specifies DIR and SEQ in ACB/RPL (or ACCESS
MODE IS DYNAMIC
 - Cobol), you will have to specify the desired approach in JCL
(AMP='ACCBIAS=xx')
or ask the developer to change the code. 

The indicators are elapsed time that drops dramatically and a huge
increase in storage.

I think CICS will not used it.
 

Atenciosamente / Regards / Saludos 

Ituriel do Nascimento Neto
Banco Bradesco S/A 
4254 - DPCD Engenharia de Software 
Sistemas Operacionais Mainframes 
Tel: 55 11 4197-2021 R: 22021 Fax: 55 11 4197-2814 

 

|-Mensagem original-
|De: IBM Mainframe Discussion List 
|[mailto:ibm-m...@bama.ua.edu] Em nome de gsg
|Enviada em: quinta-feira, 10 de setembro de 2009 19:45
|Para: IBM-MAIN@bama.ua.edu
|Assunto: Re: Sytem Managed Buffering
|
|We are looking at implementing SMB and I'm wondering how do 
|you know if SMB is kicking in for a dataset?  Is there a 
|message stating SMB is active for this dataset?
|
|Also, is there any problems with SMB and datasets that are 
|used by CICS.  I think most of our CICS online files utilize 
|LSR, does SMB ignore these datasets?  Is there anything we 
|need to be concerned with regarding SMB and CICS files?
|
|TIA
|
| 
|
|--
|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
|

HTMLfont face=Tahoma size=1HRAVISO LEGAL brEsta mensagem é 
destinada exclusivamente para a(s) pessoa(s) a quem é dirigida, podendo conter 
informação confidencial e/ou legalmente privilegiada. Se você não for 
destinatário desta mensagem, desde já fica notificado de abster-se a 
divulgar, copiar, distribuir, examinar ou, de qualquer forma, utilizar a 
informação contida nesta mensagem, por ser ilegal. Caso você tenha recebido 
esta mensagem por engano, pedimos que nos retorne este E-Mail, promovendo, 
desde logo, a eliminação do seu conteúdo em sua base de dados, registros ou 
sistema de controle. Fica desprovida de eficácia e validade a mensagem que 
contiver vínculos obrigacionais, expedida por quem não detenha poderes de 
representação. 

HTMLfont face=Tahoma size=1HRLEGAL ADVICE brThis message is 
exclusively destined for the people to whom it is directed, and it can bear 
private and/or legally exceptional information. If you are not addressee of 
this message, since now you are advised to not release, copy, distribute, check 
or, otherwise, use the information contained in this message, because it is 
illegal. If you received this message by mistake, we ask you to return this 
email, making possible, as soon as possible, the elimination of its contents of 
your database, registrations or controls system. The message that bears any 
mandatory links, issued by someone who has no representation powers, shall be 
null or void.

--
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: FTP error checking and recovery

2009-09-11 Thread Paul Gilmartin
On Fri, 11 Sep 2009 10:26:20 +0100, Jim McAlpine wrote:

On Fri, Sep 11, 2009 at 9:56 AM, Chris Mason wrote:

 FTP uses TCP so it's the reliability of TCP that matters here. Of what
 underlying facilities happen to consist is very probably of no relevance.
 Thus,

Chris, thanks, that's good to hear.  However I've just tried to FTP my first
dump which was approx 1.4 GB and it failed about one third the way through
with -

Netout : Connection reset by peer
451 Transfer aborted due to receive error

which doesn't bode well.

In days of yore, transmitting binary files (SMP/E sysmods) from desktop
systems to MVS FTP servers, I have observed massive unreported failures
such as dropouts of entire 8KiByte blocks.  I don't know whether z/OS
is better nowadays.

-- 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: Catering for ESLs (was Re: ist663i suppression)

2009-09-11 Thread Howard Brazee
On 31 Aug 2009 12:08:10 -0700, steve_thomp...@stercomm.com (Thompson,
Steve) wrote:

She attempted to say something for me at my level and realized that she
had used the wrong form of to hear.

Speaking of which, even in English, there seems to be significant
disagreement about the correct spelling/meaning of the expression
Hear here.

I suspect in this case, people assume long enough that what they think
it means becomes what it means.For instance, I would say the
primary definition of begging the question is no longer the original
logicicians' definition.

I wonder what mainframe and legacy mean to the CIO of most
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


EGL Café | Community: EGL Community Edition Hub

2009-09-11 Thread McKown, John
I don't know if anybody is interested, but there is a community version of 
EGL available for free.

http://www-949.ibm.com/software/rational/cafe/community/egl/ce

John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets®

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® is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company®, 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


TOP SECRET to IBM-RACF migration --- trace setup between Datacom/DB (CA) RACF

2009-09-11 Thread Jan Vanbrabant
*** cross-posted in RACF-L ***

Hi,

We are migrating TOP SECRET to RACF.

But we’ve a problem with the CA_Datacom (database) interface to RACF.

The definitions have been setup as described in the Datacom Security guide, but 
the external interface to RACF doesn’t get active.

We would like now to set up a RACF security trace uitvoeren to find out which 
RACROUTE commands are exchanged from (generated by) Datacom towards RACF.

I suppose this has to be done via a GTF-trace? 

Afterwards that trace will have to interpreted. Via IPCS, I assume?

Can you put us on orbit in setting up the GTF trace  it’s analysis with IPCS?
At your knowledge, by chance some reading material available somewhere?

Thanks on beforehand,
jan



--
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: CLIST/REXX Library Formats

2009-09-11 Thread Paul Gilmartin
On Fri, 11 Sep 2009 10:32:59 +0300, Itschak Mugzach wrote:

For writing purpose, I prefer 80 bytes record, whatever is FB or VM. For
program writing TSO commands to a file, a prefer 255 bytes. This way I don't
have to cut it into a 80 bytes pieces.

And SYSIN data sets are no longer restricted to FB80.  I employ
this facility in jobs submitted either via FTP or with an Edit macro
that submits jobs with the attributes of the file being edited rather
than forcing them to FB 80 as the SUBmit command does.

-- 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: SDSF Display Active Server Indicator

2009-09-11 Thread John Kelly
snip
I've sent an ETR to IBM but since I don't have Q  A support they are 
trying to get me to pay for clarification of their documentation.
unsnip

I find it hard to believe that someone else has difficulty finding 
ANYTHING in the SDSF documentation. That's the only document that I've 
found that won't respond to the 'Reader Comment/Suggestion'. The SDSF 
folks really believe that the manual is 'adequate'.

Jack Kelly
202-502-2390 (Office)

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


SV: CLIST/REXX Library Formats

2009-09-11 Thread Thomas Berg
 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] För Paul Gilmartin
 Skickat: den 11 september 2009 01:42
 Till: IBM-MAIN@bama.ua.edu
 Ämne: Re: CLIST/REXX Library Formats
 
 On Thu, 10 Sep 2009 15:44:12 -0500, Rick Fochtman wrote:
 
 I'm involved in a discussion (read argument) with co-workers where 
 I'm currently doing a consulting gig.
 
 Which is more effieient for CLIST/REXX libraries? the choices are 
 RECFM=FB, LRECL=255 or RECFM=FB,LRECL=80?
 
 I lean toward the VB-format, btt I have at least one person here 
 insisting that FB/80 is a Industry standard and is absolutely 
 mandatory. The libraries are NOT LLA/VLF managed.
 
 Opinions and/or criticisms, please.
 
 o First, silicon is cheaper than carbon.  The criterion
   for more efficient should consider the cost of human
   resources, before computer resources.
 

 SNIP

Somewhat OT:  I have the experience that VB files (lrecl1000 at least) 
have *much* worse prestanda than FB files in the ISPF editor.
Anyone with the same or other experience ?

(Is that because of bad coding by IBM or what ?) 

 

Regards, 
Thomas Berg 
__ 
Thomas Berg   Specialist   IT-U   SWEDBANK 

--
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: your session 2817: Bit Bucket x '25' pitch

2009-09-11 Thread Jan Vanbrabant
Yep Mark, it's uploaded now!
thanks, Jan


- Oorspronkelijk bericht - 
Van : Mark Zelden [mailto:mark.zel...@zurichna.com]
Verzonden : vrijdag , september 11, 2009 03:15 PM 
Aan : IBM-MAIN@bama.ua.edu
Onderwerp : Re: your session 2817: Bit Bucket x '25' pitch

On Fri, 11 Sep 2009 08:53:27 +, Jan Vanbrabant 
jan.vanbrab...@telenet.be wrote: 
 
Hi Ed, Sam, Skip, 
 
Pls would you like to make available your (usually --- always :-) ) bit 
bucket pitch of the Denver SHARE? 
It's not (yet) available on the proceedings disk. 
 
thanks on beforehand, 
jan 
 
 
It's out on the SHARE web site. http://www.share.org. Since Denver is the 
current proceedings, you don't have to be registered either AFAIK. 
 
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 
 



--
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: your session 2817: Bit Bucket x '25' pitch

2009-09-11 Thread Knutson, Sam
All Eighteen Years of the Bit Bucket!  Here 

http://tinyurl.com/kltw89 

http://www.share.org/Volunteers/ProgramsandProjects/MVSProgram/MVSArchiv
es/tabid/309/Default.aspx 


Best Regards, 

Sam Knutson, GEICO 
System z HW/SW/Automation Team Leader 
mailto:sknut...@geico.com 
(office)  301.986.3574 
(cell) 301.996.1318
  
Think big, act bold, start simple, grow fast... 

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Jan Vanbrabant
Sent: Friday, September 11, 2009 4:53 AM
To: IBM-MAIN@bama.ua.edu
Subject: your session 2817: Bit Bucket x '25' pitch

Hi Ed, Sam, Skip,

Pls would you like to make available your (usually --- always :-) ) bit
bucket pitch of the Denver SHARE?
It's not (yet) available on the proceedings disk.

thanks on beforehand,
jan



This email/fax message is for the sole use of the intended
recipient(s) and may contain confidential and privileged information.
Any unauthorized review, use, disclosure or distribution of this
email/fax is prohibited. If you are not the intended recipient, please
destroy all paper and electronic copies of the original message.

--
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: SV: CLIST/REXX Library Formats

2009-09-11 Thread P S
On Fri, Sep 11, 2009 at 10:19 AM, Thomas Berg thomas.b...@swedbank.se wrote:
  SNIP
 Somewhat OT:  I have the experience that VB files (lrecl1000 at least)
 have *much* worse prestanda than FB files in the ISPF editor.
 Anyone with the same or other experience ?

prestanda is Swedish for performance (to save the rest of you from
having to look it up!)

--
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: NEON zPrime Business, Legal and Technical Facts Webinar

2009-09-11 Thread Ken Porowski
There is a different link off of www.neon.com home page 

-Original Message-
Thompson, Steve

Seems that Eloqua is Firefox unfriendly, so this link can only be read
from a computer system running Windows and IE.

Regards,
Steve Thompson

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

-Original Message-
Ken Porowski

I guess IBM's letter generated some FUD

http://now.eloqua.com/e/es.aspx?s=3D1331e=3D328elq=3Dafd32854d7c047509
a=
3a5e1
65b96bd5a

--
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: CLIST/REXX Library Formats

2009-09-11 Thread Paul Gilmartin
On Fri, 11 Sep 2009 02:36:21 -0500, Andrew Armstrong wrote:

edited it with ISPF editor and found to my astonishment that if a record was
exactly 8 bytes long it was saved with a blank appended - making it 9 bytes
long! Not good for a data file! (that particular data file anyway).

Not sure if that feature is still lurking - I vaguely recall it had
something to do with not upsetting the PL/I or COBOL compiler which
sometimes expected sequence numbers in cols 1 to 8.

It's apparently fixed in z/OS 1.7.  Yy!

I can't imagine that PL/I's or COBOL's expectation of sequence numbers
is somehow assisted by adding a blank in col. 9.  I can only imagine
that some product had a defect that was triggered only by records with
a data length of 8 (Subtract 13 from length, then EX MVC?), and that
it was circumvented by changing the editor rather than by fixing the
problem where it lay.  Shamefully irresponsible; I suppose such an
engineering decision was most plausible if the offender was ISPF itself.

And ISPF Copy (3.3) no longer trims trailing blanks.  Yy again!

-- 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: SV: CLIST/REXX Library Formats

2009-09-11 Thread Paul Gilmartin
On Fri, 11 Sep 2009 10:35:48 -0400, P S wrote:

On Fri, Sep 11, 2009 at 10:19 AM, Thomas Berg wrote:
  SNIP
 Somewhat OT:  I have the experience that VB files (lrecl1000 at least)
 have *much* worse prestanda than FB files in the ISPF editor.
 Anyone with the same or other experience ?

prestanda is Swedish for performance (to save the rest of you from
having to look it up!)

Is this comparing RECFM=VB to RECFM=FB with equivalent data length?
I have long believed that this is because ISPF (and XEDIT) really don't
understand variable length records; rather they pad each record with
blanks on input to the maximum length; proceed as for FB; then strip
trailing blanks on SAVE.  Further evidence: it's surprisingly easy
to overflow available REGION with a fairly small (on DASD) RECFM=VB
file with only one very long record and many short records.

--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: FTP error checking and recovery

2009-09-11 Thread Kirk Wolf
FWIW, SSH protocol 2 includes MAC (message authentication code) checking (as
well as compression and encryption).   SSH/SFTP is therefore verified,
compressed, and encrypted automatically.

Kirk Wolf
Dovetailed Technologies
http://dovetail.com

On Fri, Sep 11, 2009 at 8:44 AM, Paul Gilmartin paulgboul...@aim.comwrote:

 On Fri, 11 Sep 2009 10:26:20 +0100, Jim McAlpine wrote:

 On Fri, Sep 11, 2009 at 9:56 AM, Chris Mason wrote:
 
  FTP uses TCP so it's the reliability of TCP that matters here. Of what
  underlying facilities happen to consist is very probably of no
 relevance.
  Thus,
 
 Chris, thanks, that's good to hear.  However I've just tried to FTP my
 first
 dump which was approx 1.4 GB and it failed about one third the way through
 with -
 
 Netout : Connection reset by peer
 451 Transfer aborted due to receive error
 
 which doesn't bode well.
 
 In days of yore, transmitting binary files (SMP/E sysmods) from desktop
 systems to MVS FTP servers, I have observed massive unreported failures
 such as dropouts of entire 8KiByte blocks.  I don't know whether z/OS
 is better nowadays.

 -- 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: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread Edward Jaffe

Kelman, Tom wrote:

A vendor could write SMF Type 89 records that record something other
than MSUs.  IBM actually does this with their Check Processing Control
System (CPCS) and imaging software.  Those products write Type 89
records that record the number of items processed.  I have to run those
Type 89 records through a special program near the end of the year and
send reports to IBM to determine the charges for the products for the
next year based on the number of items processed. The upshot is that any
vendor could have its software write TYPE 89 records with any kind of
costing metric recorded in them, and then have a program to process that
and report on it.
  


SMF 70 records have the information needed to compute peak monthly R4HA. 
SMF89 is used by SCRT only to keep track of when a product was active, 
to know whether the associated R4HA CPU samples should be considered, 
when calculating the peak monthly R4HA.


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SV: SV: CLIST/REXX Library Formats

2009-09-11 Thread Steve Comstock

Thomas Berg wrote:
[snip]

This makes it somewhat unusable when You want/need to work 
fast.  Which I normally do.


Yeah, that's the word on the street. At least from the ladies. :-)


--

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: PDSE HELP Required.

2009-09-11 Thread Mark Zelden
On Fri, 11 Sep 2009 09:01:02 -0700, Edward Jaffe
edja...@phoenixsoftware.com wrote:


In our shop we use SMS to assign default data classes that specify Data
Set Name Type  . . . . . : LIBRARY. So, if you think you're allocating
a PDS in batch, it's really a PDSE unless you specify DSNTYPE=PDS to
explicitly override this behavior.


One of our small monoplex LPARs (absorbed via consolidation) has their
default set to DSNTYPE(LIBRARY) in IGDSMSxx.This applies to everything,
SMS assigned or not.  So even ISPF data sets that are not recommended
to be PDSE are (but I've never seen a problem because of it).

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: PDSE HELP Required.

2009-09-11 Thread Edward Jaffe

Bob Shannon wrote:

I don't understand why the vendors are populating the libraries in PDSE



If any of the features of Program Objects are required, then PDSEs are 
mandatory, i.e., Program Objects cannot reside in PDSs. I suspect the majority 
of vendors use PDSs unless their code requires PDSEs.
  


So far, we still deliver all of our software in PDS-eligible format. (No 
program objects yet.)


I have seen some customers allocate PDSE for our libraries. Though not 
necessary from a program perspective, it might be because they like the 
performance and features offered by PDSE.


In our shop we use SMS to assign default data classes that specify Data 
Set Name Type  . . . . . : LIBRARY. So, if you think you're allocating 
a PDS in batch, it's really a PDSE unless you specify DSNTYPE=PDS to 
explicitly override this behavior.


That could be true in those customer sites as well. Our batch jobs that 
allocate target libraries as part of product installation do not specify 
DSNTYPE at all...


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread Norman Hollander on DesertWiz
Vendors also use these reports to validate the size of the LPAR that
products run in.
It would be nice if IBM would allow non-IBM products to participate in the
SCRT.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Edward Jaffe
Sent: Friday, September 11, 2009 SYSN 10:19 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Sub Capacity Reporting for non IBM Vendors

R.S. wrote:
 Edward Jaffe pisze:
 [...]
 IBM SCRT does not support ISV products. Period.

 Why?
 SCRT is based on two records:
 a) CPU utilization (SMF72 afaik)
 b) products launched (SMF89)

[I know you mean SMF 70.] The above is only partially true. SCRT has a 
hard-coded list of supported products inside. (Browse the module under 
ISPF to find their names.) These are the only products for which SCRT 
reporting is possible. If you don't believe me, try writing your own 
program that uses the IFA macros to generate SMF89 records and see 
what you see on SCRT. Hint: you will see NOTHING.

SCRT reports the monthly peak R4HA for each of the supported IBM 
products only.

If the ISV and customer agree that the ISV product is tied to one of the 
supported IBM products, everywhere it runs, then the SCRT report *can* 
be used by the ISV to verify the customer's entitled capacity has not 
been exceeded. (See IBM's IPLA contracts for how this works.)

If the ISV product is not tied to any supported IBM product or runs in a 
subset of LPARs, there are no applicable fields on the (normal) SCRT 
report that can be used to do this verification. It is possible for the 
customer to run SCRT again, using the SMF records from the subset of 
LPARs in which the ISV product is licensed, to get a peak monthly R4HA 
for that subset of LPARs. With this approach, the customer must agree 
that the ISV product is assumed to be running 24x7 and, therefore, tied 
to z/OS itself.

SMF89, which is used by SCRT to know when a product is actively being 
used, is useless in this and all other scenarios when considering 
products that are not listed in SCRT's hard-coded internal list of products.

-- 
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: 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: NEON zPrime Business, Legal and Technical Facts Webinar

2009-09-11 Thread Edward Jaffe

Eric Bielefeld wrote:

Thanks for the posting.  I signed up.


Looks like they'll have their attorney present. If I could attend the 
webinar, I would probably ask him something simple like:


Will Neon agree to indemnify and hold buyer harmless from all monetary 
claims made by IBM that are directly attributable to the excess 
exploitation of Specialty Engines made possible by buyer's usage of the 
zPrime product?  If not then why not?


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Use of RETAIN

2009-09-11 Thread Ted MacNEIL
I'm sure it has to do with the fact I'm using GDGs with (+1). When I was using 
a refer back to DUMP1, TAPE1 and RETAIN it was dropping the tape after step 
one and dying.


GDG's are funny in the way relative generations work.
The catalogue is not fully updated until after the job finished.
So, if you are creating two generations in the same job, the second one has to 
be '(+2)'.
'(+1)', even in a later step refers to the original 'new' generation.
This continues with subsequent generations within the same job.
-
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: PDSE HELP Required.

2009-09-11 Thread Edward Jaffe

Mark Zelden wrote:


One of our small monoplex LPARs (absorbed via consolidation) has their
default set to DSNTYPE(LIBRARY) in IGDSMSxx.This applies to everything,
SMS assigned or not.  So even ISPF data sets that are not recommended
to be PDSE are (but I've never seen a problem because of it).
  


I forgot. We have that too...

--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread Edward Jaffe

R.S. wrote:

Edward Jaffe pisze:
[...]

IBM SCRT does not support ISV products. Period.


Why?
SCRT is based on two records:
a) CPU utilization (SMF72 afaik)
b) products launched (SMF89)


[I know you mean SMF 70.] The above is only partially true. SCRT has a 
hard-coded list of supported products inside. (Browse the module under 
ISPF to find their names.) These are the only products for which SCRT 
reporting is possible. If you don't believe me, try writing your own 
program that uses the IFA macros to generate SMF89 records and see 
what you see on SCRT. Hint: you will see NOTHING.


SCRT reports the monthly peak R4HA for each of the supported IBM 
products only.


If the ISV and customer agree that the ISV product is tied to one of the 
supported IBM products, everywhere it runs, then the SCRT report *can* 
be used by the ISV to verify the customer's entitled capacity has not 
been exceeded. (See IBM's IPLA contracts for how this works.)


If the ISV product is not tied to any supported IBM product or runs in a 
subset of LPARs, there are no applicable fields on the (normal) SCRT 
report that can be used to do this verification. It is possible for the 
customer to run SCRT again, using the SMF records from the subset of 
LPARs in which the ISV product is licensed, to get a peak monthly R4HA 
for that subset of LPARs. With this approach, the customer must agree 
that the ISV product is assumed to be running 24x7 and, therefore, tied 
to z/OS itself.


SMF89, which is used by SCRT to know when a product is actively being 
used, is useless in this and all other scenarios when considering 
products that are not listed in SCRT's hard-coded internal list of products.


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


SV: SV: CLIST/REXX Library Formats

2009-09-11 Thread Thomas Berg
 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] För Paul Gilmartin
 Skickat: den 11 september 2009 17:24
 Till: IBM-MAIN@bama.ua.edu
 Ämne: Re: SV: CLIST/REXX Library Formats
 
 On Fri, 11 Sep 2009 10:35:48 -0400, P S wrote:
 
 On Fri, Sep 11, 2009 at 10:19 AM, Thomas Berg wrote:
   SNIP
  Somewhat OT:  I have the experience that VB files (lrecl1000 at 
  least) have *much* worse prestanda than FB files in the 
 ISPF editor.
  Anyone with the same or other experience ?
 
 prestanda is Swedish for performance (to save the rest 
 of you from 
 having to look it up!)
 
 Is this comparing RECFM=VB to RECFM=FB with equivalent data length?
 I have long believed that this is because ISPF (and XEDIT) 
 really don't understand variable length records; rather they 
 pad each record with blanks on input to the maximum length; 
 proceed as for FB; then strip trailing blanks on SAVE.  
 Further evidence: it's surprisingly easy to overflow 
 available REGION with a fairly small (on DASD) RECFM=VB file 
 with only one very long record and many short records.
 

(Sorry for mixing in swedish, I'm somewhat tired today.)

If You with data length mean actual, existing data, not the 
LRECL of the dataset; then Yes.

I'm using VB 32756/32760 as a way to catch all needs.
When I then have 1000 rows in an existing member (this is 
a PDSE), it take someting like 3 seconds to repeat a row.
(Line command R.)
Then length of the data in a row is max 80 bytes.

This makes it somewhat unusable when You want/need to work 
fast.  Which I normally do.



Regards, 
Thomas Berg 
__ 
Thomas Berg   Specialist   IT-U   SWEDBANK 

--
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: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread Kelman, Tom
A vendor could write SMF Type 89 records that record something other
than MSUs.  IBM actually does this with their Check Processing Control
System (CPCS) and imaging software.  Those products write Type 89
records that record the number of items processed.  I have to run those
Type 89 records through a special program near the end of the year and
send reports to IBM to determine the charges for the products for the
next year based on the number of items processed. The upshot is that any
vendor could have its software write TYPE 89 records with any kind of
costing metric recorded in them, and then have a program to process that
and report on it. 

Tom Kelman
Enterprise Capacity Planner
Commerce Bank of Kansas City
(816) 760-7632
 Why?
 SCRT is based on two records:
 a) CPU utilization (SMF72 afaik)
 b) products launched (SMF89)
 
 Record 72 reporting does not require any change - so ISV would know
what
 the 4HRA was on each LPAR.
 There is still no report about LPARs where the product was used.
 ISV has the following possibilities:
 
 1. Simply trust customer and rely on customers declaration
 2. Change the product to write their own SMF89 (or rather add a
section
 to it).
 3. Change the product to create custom SMF record and create own
 reporting tool. The tool may analyze SMF72 as well otherwise two
reports
 will be sent to ISV: SCRT for utilization information and ISV-SCRT for
 product information.
 4. Tie the product to given LPAR name. This is what some vendors
already
 do. Not only CPC serial is checked, but also LPAR id or LPAR name. 
 --
 Radoslaw Skorupka
 Lodz, Poland 
 --
 BRE Bank SA
 ul. Senatorska 18
 00-950 Warszawa
 www.brebank.pl



*
If you wish to communicate securely with Commerce Bank and its
affiliates, you must log into your account under Online Services at 
http://www.commercebank.com or use the Commerce Bank Secure
Email Message Center at https://securemail.commercebank.com

NOTICE: This electronic mail message and any attached files are
confidential. The information is exclusively for the use of the
individual or entity intended as the recipient. If you are not
the intended recipient, any use, copying, printing, reviewing,
retention, disclosure, distribution or forwarding of the message
or any attached file is not authorized and is strictly prohibited.
If you have received this electronic mail message in error, please
advise the sender by reply electronic mail immediately and
permanently delete the original transmission, any attachments
and any copies of this message from your computer 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


Carrier Pigeon beats Internet Speed

2009-09-11 Thread Kelman, Tom
I know this isn't actually a mainframe topic, but it is computer related
and kind of funny.  I'm just glad I'm not a performance analyst for
Telkom.

 

http://news.yahoo.com/s/nm/20090910/od_nm/us_safrica_pigeon

 

 

Tom Kelman

Enterprise Capacity Planner

Commerce Bank of Kansas City

(816) 760-7632 

 



*
If you wish to communicate securely with Commerce Bank and its
affiliates, you must log into your account under Online Services at 
http://www.commercebank.com or use the Commerce Bank Secure
Email Message Center at https://securemail.commercebank.com

NOTICE: This electronic mail message and any attached files are
confidential. The information is exclusively for the use of the
individual or entity intended as the recipient. If you are not
the intended recipient, any use, copying, printing, reviewing,
retention, disclosure, distribution or forwarding of the message
or any attached file is not authorized and is strictly prohibited.
If you have received this electronic mail message in error, please
advise the sender by reply electronic mail immediately and
permanently delete the original transmission, any attachments
and any copies of this message from your computer 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


CICS BWO is not an option

2009-09-11 Thread Ward, Mike S
Hello all, I am looking for a product that would allow us to copy a VSAM
dataset both ksds and esds to another file and copy all the records in
the file while the file is still open to CICS. I have looked at the CICS
BWO option and I don't think it's a good fit for us. There are too many
items to be installed and in place in order to support BWO. Any help
will be appreciated.


Thanks 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: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread R.S.

Edward Jaffe pisze:
[...]
[I know you mean SMF 70.] The above is only partially true. SCRT has a 
hard-coded list of supported products inside. (Browse the module under 
ISPF to find their names.) These are the only products for which SCRT 
reporting is possible. If you don't believe me, try writing your own 
program that uses the IFA macros to generate SMF89 records and see 
what you see on SCRT. Hint: you will see NOTHING.


I stand corrected. That's stupid IMHO. [rhetorical] Why SCRT does not 
rely on SMF89 content?



SCRT reports the monthly peak R4HA for each of the supported IBM 
products only.


If the ISV and customer agree that the ISV product is tied to one of the 
supported IBM products, everywhere it runs, then the SCRT report *can* 
be used by the ISV to verify the customer's entitled capacity has not 
been exceeded. (See IBM's IPLA contracts for how this works.)


If the ISV product is not tied to any supported IBM product or runs in a 
subset of LPARs, there are no applicable fields on the (normal) SCRT 
report that can be used to do this verification. It is possible for the 
customer to run SCRT again, using the SMF records from the subset of 
LPARs in which the ISV product is licensed, to get a peak monthly R4HA 
for that subset of LPARs. With this approach, the customer must agree 
that the ISV product is assumed to be running 24x7 and, therefore, tied 
to z/OS itself.


SMF89, which is used by SCRT to know when a product is actively being 
used, is useless in this and all other scenarios when considering 
products that are not listed in SCRT's hard-coded internal list of 
products.




Well. I thought the rules are slightly different: it is enough to run 
some product ONCE during reporting period (month) to pay for that. More 
precisely: if you run ABC product on LPAR1 (only) and LPAR1 highest 
usage is nnn MSU then you pay for product ABC as it would consume nnn 
MSU on that LPAR. And it doesn't matter that you ran the product only 
once, 3 days before the peak occured.

(This is what I heard from IBMer, however I consider him as an oracle. )

BTW: other ways are still valid despite of SMF89 impossibilities.

Regards
--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy 
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, 
nr rejestru przedsibiorców KRS 025237

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci 
wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 
2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec 
podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym 
BRE Banku SA bd w caoci opacone.

--
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: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread Edward Jaffe

R.S. wrote:
Well. I thought the rules are slightly different: it is enough to run 
some product ONCE during reporting period (month) to pay for that. 
More precisely: if you run ABC product on LPAR1 (only) and LPAR1 
highest usage is nnn MSU then you pay for product ABC as it would 
consume nnn MSU on that LPAR. And it doesn't matter that you ran the 
product only once, 3 days before the peak occured.

(This is what I heard from IBMer, however I consider him as an oracle. )


You could very well be right about this. (And, you probably are. I 
looked just now and could find nothing to contradict your statement.)


In any case, it doesn't change my basic point that SCRT supports only 
IBM products--no matter if it recognizes their presence on an LPAR from 
SMF Type 89 records or via customer specification through the NO89 DD 
statement.


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Carrier Pigeon beats Internet Speed

2009-09-11 Thread Edward Jaffe

P S wrote:

On Fri, Sep 11, 2009 at 5:31 PM, Edward Jaffe
edja...@phoenixsoftware.com wrote:
  

And, airfare from Japan to the U.S. isn't free...



? Not trying to be confrontational, but what does that have to do with it?
  


Cost/benefit analysis...

--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Carrier Pigeon beats Internet Speed

2009-09-11 Thread P S
On Fri, Sep 11, 2009 at 5:31 PM, Edward Jaffe
edja...@phoenixsoftware.com wrote:
 And, airfare from Japan to the U.S. isn't free...

? Not trying to be confrontational, but what does that have to do with it?

--
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: CLIST/REXX Library Formats

2009-09-11 Thread Paul Gilmartin
On Fri, 11 Sep 2009 19:38:21 +0200, Thomas Berg wrote:

 -Ursprungligt meddelande-
 [mailto:ibm-m...@bama.ua.edu] För Paul Gilmartin

 Is this comparing RECFM=VB to RECFM=FB with equivalent data length?
 I have long believed that this is because ISPF (and XEDIT)
 really don't understand variable length records; rather they
 pad each record with blanks on input to the maximum length;
 proceed as for FB; then strip trailing blanks on SAVE.
 Further evidence: it's surprisingly easy to overflow
 available REGION with a fairly small (on DASD) RECFM=VB file
 with only one very long record and many short records.

If You with data length mean actual, existing data, not the
LRECL of the dataset; then Yes.

I'm using VB 32756/32760 as a way to catch all needs.
When I then have 1000 rows in an existing member (this is
a PDSE), it take someting like 3 seconds to repeat a row.
(Line command R.)
Then length of the data in a row is max 80 bytes.

Indeed, I failed to write what I meant, length in the DCB.
Your observation supports my surmise that ISPF (like XEDIT)
pads all records to that length.

This makes it somewhat unusable when You want/need to work
fast.  Which I normally do.

This ought to be a topic for a performance APAR.  You likely
would get no better than SUG.

-- 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: Carrier Pigeon beats Internet Speed

2009-09-11 Thread P S
On Fri, Sep 11, 2009 at 3:00 PM, Kelman, Tom
thomas.kel...@commercebank.com wrote:
 I know this isn't actually a mainframe topic, but it is computer related
 and kind of funny.  I'm just glad I'm not a performance analyst for
 Telkom.

 http://news.yahoo.com/s/nm/20090910/od_nm/us_safrica_pigeon

Cute, but not so dramatic. In 2001, I was doing a gig, and one of the
things they asked about was transferring a 100TB disk array from Japan
to the US. They were thinking of renting a 1GB line, but that was
pretty expensive. I did a quick calculation and pointed out that if
they could shut it down, unship it, get it on a plane, fly it to the
US, and plug it back in over a 24-hour period, that was about the same
throughput…

(Of course, if the plane went down, they were out of business!)

--
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: Carrier Pigeon beats Internet Speed

2009-09-11 Thread Edward Jaffe

P S wrote:

Cute, but not so dramatic. In 2001, I was doing a gig, and one of the
things they asked about was transferring a 100TB disk array from Japan
to the US. They were thinking of renting a 1GB line, but that was
pretty expensive. I did a quick calculation and pointed out that if
they could shut it down, unship it, get it on a plane, fly it to the
US, and plug it back in over a 24-hour period, that was about the same
throughput…

(Of course, if the plane went down, they were out of business!)
  


And, airfare from Japan to the U.S. isn't free...

--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: CLIST/REXX Library Formats

2009-09-11 Thread Scott Ford
There is always some historical reason that IBM would create a library with the 
FB/80 attribute.
Gilbert is right i remember this also and we had problems when trying to 
concatenate a VB/255 Clist library.
So most folks stuck with FB/80...


 
Scott J Ford
www.identityforge.com
 
'old dinosaurs still roam the earth..'
 





From: Gilbert Saint-Flour usenet5...@yahoo.com
To: IBM-MAIN@bama.ua.edu
Sent: Friday, September 11, 2009 3:44:40 AM
Subject: Re: CLIST/REXX Library Formats

On Friday 11 September 2009 02:28, Ted MacNEIL wrote:

o Industry standard?  Not any more.  (But I can remember when ISPF (at
the time SPF) panels were distributed as VB;  IBM later switched to FB
(circa 1980?).
 
 Later, IIRC.
 I think it came out with XA.
 Also, that was the same time they renamed it and split out PDF.

In 1980, the SPF FDP which was 5787-XT2 (Structured Programming Facility) 
became the SPF product 5668-009 (System Productivity Facility), installed 
under SMP, which does not support a PDS with RECFM=VB.

The vast majority of CLIST/REXX libraries are defined with FB/80.  
Before you define one with VB/255, remember that you can NOT concatenate it 
with existing FB/80 libraries.

Of course, it would be nice if concatenated CLIST/REXX libraries could be FB 
and VB, but I'm not sure IBM will make it possible in the future.  Most of my 
products use the GETSEQ/GETDIR/GETMBR run-time routines which allow the 
concatenation of sequential and partitioned data sets with different DCB 
attributes.  If I do it, IBM could do it also.

-- 
Gilbert Saint-Flour
GSF Software
http://gsf-soft.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: NEON zPrime Business, Legal and Technical Facts Webinar

2009-09-11 Thread Blaicher, Chris
A slightly loaded, but I think a very appropriate, question.  In my opinion, if 
you cannot get that in writing, along with a pre-funded liability insurance 
policy specifically for your account for the duration of your contract to use 
Z/Prime, then I would walk away.  The reason I say pre-funded is because here 
in Texas a common occurrence is someone gets automobile insurance and pays for 
the first month and then lets the policy lapse.  In this case, I would assume 
that Neon would be good to keep up the payments, but if IBM gets on their high 
horse and wipes Neon out, then where are you?

As with most things in life, it is up to the user to determine the risk/reward 
balance and make their own choices.

The preceding is my personal opinion and does not reflect those of my employer 
or anyone else.

Chris Blaicher
Phone: 512-340-6154
Mobile: 512-627-3803

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Edward Jaffe
Sent: Friday, September 11, 2009 12:32 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: NEON zPrime Business, Legal and Technical Facts Webinar

Eric Bielefeld wrote:
 Thanks for the posting.  I signed up.

Looks like they'll have their attorney present. If I could attend the 
webinar, I would probably ask him something simple like:

Will Neon agree to indemnify and hold buyer harmless from all monetary 
claims made by IBM that are directly attributable to the excess 
exploitation of Specialty Engines made possible by buyer's usage of the 
zPrime product?  If not then why not?

-- 
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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: 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: PDSE HELP Required.

2009-09-11 Thread Frank Swarbrick
Everyone might be interested to know that there are some IMS datasets (I forget 
which) that *cannot* be PDSE.  They must be PDS.  Trust me, I tried them as 
PDSE and spend a long time trying to figure out why I couldn't get things 
working!  :-)  So to make life easy on yourselves if you have IMS I wouldn't 
even think about converting any to PDSE.  (I think it was the ACBLIB, and maybe 
also the DBDLIB and PSBLIB.  Probably the actual load libs are OK, but why 
chance it?)

On 9/11/2009 at 10:17 AM, in message
listserv%20090917406313.0...@bama.ua.edu, Mark Zelden
mark.zel...@zurichna.com wrote:
 On Fri, 11 Sep 2009 09:01:02 -0700, Edward Jaffe
 edja...@phoenixsoftware.com wrote:
 
 
In our shop we use SMS to assign default data classes that specify Data
Set Name Type  . . . . . : LIBRARY. So, if you think you're allocating
a PDS in batch, it's really a PDSE unless you specify DSNTYPE=PDS to
explicitly override this behavior.

 
 One of our small monoplex LPARs (absorbed via consolidation) has their
 default set to DSNTYPE(LIBRARY) in IGDSMSxx.This applies to everything,
 SMS assigned or not.  So even ISPF data sets that are not recommended
 to be PDSE are (but I've never seen a problem because of it).
 
 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 



 

The information contained in this electronic communication and any document 
attached hereto or transmitted herewith is confidential and intended for the 
exclusive use of the individual or entity named above.  If the reader of this 
message is not the intended recipient or the employee or agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
examination, use, dissemination, distribution or copying of this communication 
or any part thereof is strictly prohibited.  If you have received this 
communication in error, please immediately notify the sender by reply e-mail 
and destroy this communication.  Thank you.

-- 

Frank Swarbrick
Applications Architect - Mainframe Applications Development
FirstBank Data Corporation - Lakewood, CO  USA
P: 303-235-1403

--
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: Sub Capacity Reporting for non IBM Vendors

2009-09-11 Thread Ted MacNEIL
More precisely: if you run ABC product on LPAR1 (only) and LPAR1 highest usage 
is nnn MSU then you pay for product ABC as it would consume nnn MSU on that 
LPAR.
And it doesn't matter that you ran the product only once, 3 days before the 
peak occured.

We ran into something similar when we convinced an ISV to go to usage base, 
rather than the entire footprint.
The alternative for the vendor was the discontinuation of the licence.

Anyway, the product ran under a CIC region that consumed (under peak) less than 
3% of the physical processor.
So, I implemented an SCRT process for the product.
The 4HRA peak was at night (all batch) when the CICS region wasn't even up.
My management complained, at first, but I pointed out, while it wasn't perfect, 
it saved us 180,000USD.
-
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: Carrier Pigeon beats Internet Speed

2009-09-11 Thread P S
On Fri, Sep 11, 2009 at 6:26 PM, Edward Jaffe
edja...@phoenixsoftware.com wrote:
 Cost/benefit analysis...

Ah. Well, still cheaper than a 1Gbit/sec line for 24 hours...

--
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: Carrier Pigeon beats Internet Speed

2009-09-11 Thread Tom Moulder

You laugh ...

I am working with a company that literally did this.  They shipped a 
very large disk array to the central computing center and placed it next 
to the production array; synchronously copied all the data; found a 
quiet point on a Sunday morning and split the link; uncabled the array; 
shipped it across country to the BC site (Business Continuity now, not 
Disaster Recovery); they are in the process of cabling it up; will turn 
it on next weekend and away with go with a recovery drill.


I didn't write the cost/benefit analysis for this.

Tom Moulder

P S wrote:

On Fri, Sep 11, 2009 at 6:26 PM, Edward Jaffe
edja...@phoenixsoftware.com wrote:
  

Cost/benefit analysis...



Ah. Well, still cheaper than a 1Gbit/sec line for 24 hours...

--
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: PDSE HELP Required.

2009-09-11 Thread Greg Price
Frank Swarbrick wrote:
 Everyone might be interested to know that there are some IMS datasets (I 
 forget which) that *cannot* 
be PDSE.  They must be PDS.

Yes, PDSEs do not allow NOTE list TTRs in the directory entry.
This is one reason why regular load modules cannot be
housed in PDSEs.

Cheers,
Greg

--
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: Carrier Pigeon beats Internet Speed

2009-09-11 Thread Robert A. Rosenberg
At 17:02 -0400 on 09/11/2009, P S wrote about Re: Carrier Pigeon 
beats Internet Speed:



On Fri, Sep 11, 2009 at 3:00 PM, Kelman, Tom
thomas.kel...@commercebank.com wrote:

 I know this isn't actually a mainframe topic, but it is computer related
 and kind of funny.  I'm just glad I'm not a performance analyst for
 Telkom.

 http://news.yahoo.com/s/nm/20090910/od_nm/us_safrica_pigeon


Cute, but not so dramatic. In 2001, I was doing a gig, and one of the
things they asked about was transferring a 100TB disk array from Japan
to the US. They were thinking of renting a 1GB line, but that was
pretty expensive. I did a quick calculation and pointed out that if
they could shut it down, unship it, get it on a plane, fly it to the
US, and plug it back in over a 24-hour period, that was about the same
throughputŠ

(Of course, if the plane went down, they were out of business!)


You make a copy of the Drive and send it. Also, what about the 
backups of the drive you are supposed to be making (if you need to 
recreate it)?


--
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: Carrier Pigeon beats Internet Speed

2009-09-11 Thread Robert A. Rosenberg
At 14:31 -0700 on 09/11/2009, Edward Jaffe wrote about Re: Carrier 
Pigeon beats Internet Speed:



P S wrote:

Cute, but not so dramatic. In 2001, I was doing a gig, and one of the
things they asked about was transferring a 100TB disk array from Japan
to the US. They were thinking of renting a 1GB line, but that was
pretty expensive. I did a quick calculation and pointed out that if
they could shut it down, unship it, get it on a plane, fly it to the
US, and plug it back in over a 24-hour period, that was about the same
throughputŠ

(Of course, if the plane went down, they were out of business!)



And, airfare from Japan to the U.S. isn't free...


Only if it is being hand copied as opposed to being shipped.

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