date:20100518

Michel Castelein wrote:

Note that z/OS includes a ready-to-use SLEEP program.

Yeah, the BPX1SLP. It is using the STIMERM macro.

Or use this without all those SYSCALL and SYSCALLS things:

/* REXX */  
SAY 'ZZZ AT ' TIME()
CALL SLEEP 5
SAY 'YAWN AT ' TIME()   

Output:
ZZZ AT  11:13:28  
YAWN AT  11:13:33 
***   


Groete / Greetings
Elardus Engelbrecht

--
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: Time Parameter

Elardus Engelbrecht wrote:

[ ... some rubbish ... ]

Please disregard my previous post, the sleep function in my rexx is not the 
correct one as intended. 

Michel, you are 100% correct and thanks for your post and the SUBCOM 
statements.

Sorry to all

Groete / Greetings
Elardus Engelbrecht

--
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: Time Parameter

2010-05-18 Thread Peter Nuttall

To my knowledge there are two ways in rexx to sleep :

/* REXX */ 
/* 
How to make rexx wait for 5 seconds  
ILBOWAT0 is an LE supplied program 
*/ 
  X=5 
  PARM=D2C(X,4) 
  ADDRESS LINKPGM ILBOWAT0 PARM 
/* 
Alternatively you can use a USS program as follows 
*/ 
  bpxbatch pgm /bin/sleep 5s 

They both work  Whichever is the best performer, however, I have no 
clue  
 
 



Elardus Engelbrecht elardus.engelbre...@sita.co.za 
Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
18/05/2010 11:30 AM
Please respond to
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu


To
IBM-MAIN@bama.ua.edu
cc

Subject
Re: Time Parameter








Elardus Engelbrecht wrote:

[ ... some rubbish ... ]

Please disregard my previous post, the sleep function in my rexx is not 
the 
correct one as intended. 

Michel, you are 100% correct and thanks for your post and the SUBCOM 
statements.

Sorry to all

Groete / Greetings
Elardus Engelbrecht

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



This e-mail message, including any attachments transmitted with it, is 
CONFIDENTIAL and may contain legally privileged information. This message is 
intended solely for the use of the individual or entity to whom it is 
addressed. If you have received this message in error, please notify us 
immediately and delete it from your system. Please visit our website to read 
the full disclaimer: http://www.euroclear.com/site/public/disclaimer

Re: ICF Catalog performance options

2010-05-18 Thread Brian Westerman

I agree, I don't see any reason to not put the catalogs on the same drive. 
Maybe when there were still real drives, it might have made a difference,
but with the arrays that most people are using, I would imagine that it's
not really going to make a difference.

I actually have some issues with just about all of the items that were
listed except for the one about not reorganizing them, I would not recommend
doing that.:)

Brian

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

What is the difference between starting a cataloged procedure and submitting a JCL

2010-05-18 Thread ibmnew

Hi all 

 I submit the following JCL

 
//LOGWDSJ  JOB CLASS=A   
//STEP1   EXEC PGM=IEBGENER  
//SYSUT1  DD DUMMY,DCB=(LRECL=133,RECFM=FB)  
//SYSUT2   DD  DISP=(,CATLG,DELETE),RETPD=366,VOL=(,,,1),
// DSN=BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1),  
// UNIT=VTAPE,SPACE=(CYL,(120,50)),DATACLAS=DCCOMP,   
// DCB=(LRECL=133,RECFM=FB)  
//SYSPRINT DD  SYSOUT=*  
//SYSINDD  DUMMY


The JCL allocated the GDG BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1) successfully.


But I start the following cataloged procedure 


//LOGWDS  PROC   
//STEP1   EXEC PGM=IEBGENER  
//SYSUT1  DD DUMMY,DCB=(LRECL=133,RECFM=FB)  
//SYSUT2   DD  DISP=(,CATLG,DELETE),RETPD=366,VOL=(,,,1),
// DSN=BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1),  
// UNIT=VTAPE,SPACE=(CYL,(120,50)),DATACLAS=DCCOMP,   
// DCB=(LRECL=133,RECFM=FB)  
//SYSPRINT DD  SYSOUT=*  
//SYSINDD  DUMMY


The  cataloged procedure cann't allocate the GDG 
BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1) ,but the return code is zero.
   

The JCL is almost similar as the cataloged procedure.

My questions:

1.I wonder why the cataloged procedure cann't allocate the GDG but the JCL can 
do it.

2.There is less messages in SDSF.H for the cataloged procedure output,How can I 
get more messages for it. 

3.What is the differences between starting a cataloged procedure and 
submittinga JCL. 

Any Suggestions are highly appreciated!

Thanks a lot!

Best Regards,

Jason Cai 


 

--
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: What is the difference between starting a cataloged procedure and submitting a JCL

Jason Cai wrote:

The  cataloged procedure cann't allocate the GDG 
BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1) ,but the return code is zero.

What messages are you receiving?

1.I wonder why the cataloged procedure cann't allocate the GDG but the JCL 
can do it.

Perhaps RACF could block the proc? Perhaps your SMS prevented it?
Again, showing the messages will help IBM-MAIN members to help you.

2.There is less messages in SDSF.H for the cataloged procedure output,How 
can I get more messages for it.

Use ST command.

3.What is the differences between starting a cataloged procedure and 
submittinga JCL.

Lots. Too many differences to write here. Check your JCL Ref and JCL Guide.

Groete / Greetings
Elardus Engelbrecht

--
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: What is the difference between starting a cataloged procedure and submitting a JCL

Jason Cai wrote

//STEP1   EXEC PGM=IEBGENER  
//SYSUT1  DD DUMMY,DCB=(LRECL=133,RECFM=FB)  

Why are you using empty SYSUT1 with IEBGENER in both jobs? Is something 
wrong with using IEFBR14?

Groete / Greetings
Elardus Engelbrecht

--
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: Time Parameter

2010-05-18 Thread Matan Cohen

Hi,
I choose this sleep option cause I though that Ravi wasn't looking for a
way to make it rexx to go to sleep in this case SYSCALL is always a better
way in saving CPU .
what i undestood from Ravi question ( maybe I was worng ) is that the rexx
is still preforming actions and he is want it to end when
the the time is over.
i post only an example of how Ravi can check the time which was pass and
exit when this time is over .

On Tue, May 18, 2010 at 12:42 PM, Peter Nuttall peter.nutt...@euroclear.com
 wrote:

 To my knowledge there are two ways in rexx to sleep :

 /* REXX */
 /*
 How to make rexx wait for 5 seconds 
 ILBOWAT0 is an LE supplied program
 */
  X=5
  PARM=D2C(X,4)
  ADDRESS LINKPGM ILBOWAT0 PARM
 /*
 Alternatively you can use a USS program as follows
 */
  bpxbatch pgm /bin/sleep 5s

 They both work  Whichever is the best performer, however, I have no
 clue 





 Elardus Engelbrecht elardus.engelbre...@sita.co.za
 Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 18/05/2010 11:30 AM
 Please respond to
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu


 To
 IBM-MAIN@bama.ua.edu
 cc

 Subject
 Re: Time Parameter








 Elardus Engelbrecht wrote:

 [ ... some rubbish ... ]

 Please disregard my previous post, the sleep function in my rexx is not
 the
 correct one as intended.

 Michel, you are 100% correct and thanks for your post and the SUBCOM
 statements.

 Sorry to all

 Groete / Greetings
 Elardus Engelbrecht

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



 This e-mail message, including any attachments transmitted with it, is
 CONFIDENTIAL and may contain legally privileged information. This message is
 intended solely for the use of the individual or entity to whom it is
 addressed. If you have received this message in error, please notify us
 immediately and delete it from your system. Please visit our website to read
 the full disclaimer: http://www.euroclear.com/site/public/disclaimer




-- 
best regards,
matan cohen
MF System Administrator.

--
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: What is the difference between starting a cataloged procedure and submitting a JCL

2010-05-18 Thread Mary Anne Matyaz

Jason, 
My bet is it's security (Started task has a different security ID than your 
batch job submit). Did you check the SYSLOG to see if there were any 
messages around the time of your proc executing? When your proc starts, 

Getting more output: Started tasks may have a different MSGCLASS 
($DJOBCLASS(STC), then $DMSGCLASS(D) to see where the output is going. 
In my case, it's: 

$DJOBCLASS(STC),MSGCLASS 
$HASP837 JOBCLASS(STC)   MSGCLASS=D  

$HASP842 OUTCLASS(D)   
$HASP842 OUTCLASS(D)  OUTPUT=PRINT,BLNKTRNC=YES,   
$HASP842  OUTDISP=(PURGE,WRITE),TRKCELL=YES  

The OUTDISP of PURGE,WRITE is what's causing the output to disappear. 
You can do a couple of things to alter this. $TJOBCLASS(STC),MSGCLASS=X, 
or some other class that isn't disp purge. You can also change your cataloged 
proc to have sysprint=X instead of sysprint=*, but that will only get you the 
iebgener messages, not the Jesmsglg.   

Differences:
Security  Do you see an IEF695i msg indicating the user assigned to your 
started task? 
WLM - STC's get classified differently and usually have different performance 
goals 
STC's may have a different default region size
See Chapter 7 of the MVS JCL Reference for more info

--
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: What is the difference between starting a cataloged procedure and submitting a JCL

2010-05-18 Thread Mary Anne Matyaz

For tape, yes. IEFBR14 will not create an EOF marker. 
MA

On Tue, 18 May 2010 05:25:47 -0500, Elardus Engelbrecht 

Why are you using empty SYSUT1 with IEBGENER in both jobs? Is something
wrong with using IEFBR14?


--
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: What is the difference between starting a cataloged procedure and submitting a JCL

2010-05-18 Thread Lizette Koehler

With a STC your msgclass is defined in JES.  Depending on your z/OS level
you can start your STC as follows

S LOGWDSJ,MSGCLASS=?? Change ?? to the class that allows the Output to be
held on JES or at least not printed/purged.

Then you can see what is going on.

When you use SYSOUT=* in an STC it defaults the class to what is defined in
JES for Started Tasks.  You can say SYSOUT=X (for example) if X is your Held
class in your STC JCL to hard code the correct class.

You need to review the JES2 USERs guide to understand how the different
elements of JCL are coded.

An STC gets its JCL typically from a JES PROCLIB.  The Security (USER) is
handled through your Security product.  You can see what user is assigned
when the task is started.  Look in SYSLOG.  Syslog should also show you any
security messages for your STC.  See if you are getting any when the GDG
allocation occurs.

A JCL gets its security from the submitting user's security.

You need to work with your security group to make sure the STC has the
appropriate security for running in your environment.

In RACF this is the STARTED Table (IIRC).  

If you are not the sys prog, you will need to contact them to determine
correct SYSOUT Class to use for your process.

Lizette


 
 Hi all
 
  I submit the following JCL
 
 
 //LOGWDSJ  JOB CLASS=A
 //STEP1   EXEC PGM=IEBGENER
 //SYSUT1  DD DUMMY,DCB=(LRECL=133,RECFM=FB)
 //SYSUT2   DD  DISP=(,CATLG,DELETE),RETPD=366,VOL=(,,,1),
 // DSN=BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1),
 // UNIT=VTAPE,SPACE=(CYL,(120,50)),DATACLAS=DCCOMP,
 // DCB=(LRECL=133,RECFM=FB)
 //SYSPRINT DD  SYSOUT=*
 //SYSINDD  DUMMY
 
 
 The JCL allocated the GDG BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1)
 successfully.
 
 
 But I start the following cataloged procedure
 
 
 //LOGWDS  PROC
 //STEP1   EXEC PGM=IEBGENER
 //SYSUT1  DD DUMMY,DCB=(LRECL=133,RECFM=FB)
 //SYSUT2   DD  DISP=(,CATLG,DELETE),RETPD=366,VOL=(,,,1),
 // DSN=BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1),
 // UNIT=VTAPE,SPACE=(CYL,(120,50)),DATACLAS=DCCOMP,
 // DCB=(LRECL=133,RECFM=FB)
 //SYSPRINT DD  SYSOUT=*
 //SYSINDD  DUMMY
 
 
 The  cataloged procedure cann't allocate the GDG
 BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1) ,but the return code is zero.
 
 
 The JCL is almost similar as the cataloged procedure.
 
 My questions:
 
 1.I wonder why the cataloged procedure cann't allocate the GDG but the
 JCL can do it.
 
 2.There is less messages in SDSF.H for the cataloged procedure
 output,How can I get more messages for it.
 
 3.What is the differences between starting a cataloged procedure and
 submittinga JCL.
 
 Any Suggestions are highly appreciated!
 
 Thanks a lot!
 
 Best Regards,
 
 Jason Cai
 
 
 

--
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: Finding a member

2010-05-18 Thread Gilbert Saint-Flour

Howard Brazee said this:
 I need to find a PDS member, and I know it starts with QA05.   
 Trouble is, I don't know the name of the PDS.   
 (The person who created it retired).   
 I suspect the PDS is archived off. 
 What do you recommend?

SCANPDS may be exactly what you need, and it's described here:
  http://gsf-soft.com/Products/SCANPDS.shtml

IIRC, the problem with archived data sets is that you don't know their DSORG, 
i.e. which ones are PDSes or PDSEs.  SCANPDS, by default, does NOT RECALL 
archives data sets, but if you specify the RECALL option, it does it, and 
chances are that it will RECALL many non-PDS data sets.  For example, you can 
specify  SCANPDS JOHNDOE.** MEMBERS(QA05*) RECALL  and it will RECALL all 
JOHNDOE.** data sets that are migrated, and look for QA05* members.   
Again, this will RECALL non-PDS data sets, which is not good.

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

port from z/OS to z/VSE

2010-05-18 Thread Steve Austin

As VSE has been dying since I was an operator 30 years ago I have not
much bothered with it, but now I've been asked to 'port' some MVS
routines to VSE. 

 

I'm investigating porting a z/OS server address space to z/VSE. The
server address space creates PC-ss routines that client address spaces
call. The client call causes the server to schedule an SRB in the client
address space which in turn calls the server via a PC-ss to copy data
from the server to the client. I know that a number of z/OS services and
control blocks can be emulated, ETCON, TCB, etc, but what I'm missing is
the VSE equivalent of an SRB. 

 

Under VSE is it possible to create a new workunit in another address
space?

Is there a VSE equivalent of an SRB?

 

 

Thanks

 

Steve 


- 
This email has been scanned for all known viruses by the MessageLabs Email
Security Service and the Macro 4 internal virus protection 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

Re: Of interest to the Independent Contractors on the list

2010-05-18 Thread Jeff Holst

Getting back to the oringinal topic:

As the article notes, there is a lengthy test that the IRS has to determine if 
one is indeed an independent contractor. As someone who has seasonally 
worked as a tax preparer (and who is an IRS Enrolled Agent), I have seen a lot 
of people who have been (in my opinion) misclassified as independent 
contractors. All too often businesses will do this to avoid having to pay the 
employer portion of FICA and Medicare. I have seen lots of young people who 
have made $2000-$3000 in their first job who owe $300-$500 in self 
employment tax because they were paid on a 1099. They never understood 
that this was happening or the tax consequences of it. If they prepared their 
own tax return or did so with their parents help, they all too often did it 
wrong 
(schedules C and SE are necessary), resulting in penalties. If they paid a 
preparer they discovered it was not the simple (inexpensive) return they 
thought it was.

Jeff Holst

--
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: port from z/OS to z/VSE

2010-05-18 Thread Chuck Arney

There is no SRB type facility in VSE.  Look into using the XPCC facility
for communicating data between address spaces.

It also does not support a System LX for your PC routine though it does
support PC-ss.  I generally use XPCC in VSE instead of PC routines if
you need to provide cross-partition data movement. 

Chuck Arney
illustro Systems International, LLC
http://www.illustro.com
Internet-enable your applications with z/Ware V2
Voice: 214-800-8900 X#5562
--
This e-mail is private and may be confidential and is for the intended
recipient only. If misdirected, please notify us by telephone and
confirm that it has been deleted from your system and any copies
destroyed. If you are not the intended recipient you are strictly
prohibited from using, printing, copying, distributing or disseminating
this e-mail or any information contained in it.  
  
We use reasonable measures to virus scan all E-mails leaving illustro
but no warranty is given that this E-mail and any attachments are virus
free. You should ensure you have adequate measures in place for your own
virus checking.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Steve Austin
Sent: Tuesday, May 18, 2010 8:09 AM
To: IBM-MAIN@bama.ua.edu
Subject: port from z/OS to z/VSE

As VSE has been dying since I was an operator 30 years ago I have not
much bothered with it, but now I've been asked to 'port' some MVS
routines to VSE. 
 
I'm investigating porting a z/OS server address space to z/VSE. The
server address space creates PC-ss routines that client address spaces
call. The client call causes the server to schedule an SRB in the client
address space which in turn calls the server via a PC-ss to copy data
from the server to the client. I know that a number of z/OS services and
control blocks can be emulated, ETCON, TCB, etc, but what I'm missing is
the VSE equivalent of an SRB. 

Under VSE is it possible to create a new workunit in another address
space?

Is there a VSE equivalent of an SRB?

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

Users of Compuware's DevEnterprise?

This came with my latest Compuware upgrade. I have no idea what it really does. 
And I don't seem to be able to find any manuals on it in my downloaded 
material. Does anybody use this? What does it buy me? We don't use any desktop 
based development at present - we are still stuck in the 1970s paradigm of 
mainframe development.

John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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


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

Re: PSF IBM 6500 printer

Is there a font available to allow printing 220 characters per line ..

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files 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: port from z/OS to z/VSE

2010-05-18 Thread Harry Wahl

Steve,

You should try to contact Jerry McCarthy at QMSI (je...@cmpg.com). He wrote 
some amazing code that uses z/OS like PC calls on z/VSE. He coded the internals 
of QMSI's postal software (CASS software, a replacement for Group I's 
mainframe) to run on z/OS or z/VSE and it uses PC calls.

Initially he used XPCC but found its overhead too high for the performance 
requirements of his application. 

He alluded to it on this list in July 2009:
http://groups.google.com/group/bit.listserv.vse-l/browse_thread/thread/4c2f5d849ecfe127#

The code he ended writing is very clever and one of the reasons QMSI's postal 
software is so fast.

Harry
  
--
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: PSF IBM 6500 printer

2010-05-18 Thread Dazzo, Matt

I believe our solution was 18CPI using green bar paper on the IBM 6500.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Ron Wells
Sent: Tuesday, May 18, 2010 10:01 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: PSF IBM 6500 printer

Is there a font available to allow printing 220 characters per line ..

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files 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

--
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: What is the difference between starting a cataloged procedure and submitting a JCL

IEBGENER will create a real dataset with an end of file that can be 
successfully opened and read. IEFBR14 creates only a 'null' file. Most programs 
trying to open and read a 'null' file will fail. 

I can think of several scenarios where an empty, readable file is needed. 


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Elardus Engelbrecht
Sent: Tuesday, May 18, 2010 5:26 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: What is the difference between starting a cataloged procedure and 
submitting a JCL

Jason Cai wrote

//STEP1   EXEC PGM=IEBGENER  
//SYSUT1  DD DUMMY,DCB=(LRECL=133,RECFM=FB)  

Why are you using empty SYSUT1 with IEBGENER in both jobs? Is something 
wrong with using IEFBR14?

Groete / Greetings
Elardus Engelbrecht

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

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

Re: What is the difference between starting a cataloged procedure and submitting a JCL

2010-05-18 Thread R.S.


Hal Merritt pisze:
IEBGENER will create a real dataset with an end of file that can be successfully opened and read. IEFBR14 creates only a 'null' file. Most programs trying to open and read a 'null' file will fail. 

I can think of several scenarios where an empty, readable file is needed. 


I can think of scenarios where such files could be - at minimum - moved 
from tape (even virtual one) to disk. Not to say about programs which 
doesn't fail on empty dataset or even not requiring the existence of 
empty files.

Of course this is developers issue not exploitation one.
g
My €0.02
--
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: Time Parameter

Here's a variation that works for me:

ADDRESS TSO  BPXBATCH sh sleep 30   

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Peter Nuttall
Sent: Tuesday, May 18, 2010 4:42 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Time Parameter

To my knowledge there are two ways in rexx to sleep :

/* REXX */ 
/* 
How to make rexx wait for 5 seconds  
ILBOWAT0 is an LE supplied program 
*/ 
  X=5 
  PARM=D2C(X,4) 
  ADDRESS LINKPGM ILBOWAT0 PARM 
/* 
Alternatively you can use a USS program as follows 
*/ 
  bpxbatch pgm /bin/sleep 5s 

They both work  Whichever is the best performer, however, I have no 
clue  

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

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

Re: PSF IBM 6500 printer

Matt
was that gt18??
as was there a for/page def that went along with it??




From:   Dazzo, Matt mda...@pch.com
To: IBM-MAIN@bama.ua.edu
Date:   05/18/2010 09:20 AM
Subject:Re: PSF IBM 6500 printer
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



I believe our solution was 18CPI using green bar paper on the IBM 6500.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On 
Behalf Of Ron Wells
Sent: Tuesday, May 18, 2010 10:01 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: PSF IBM 6500 printer

Is there a font available to allow printing 220 characters per line ..

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the 
sender, which  may be legally privileged information.  This information is 
intended only  for  the use of the individual or entity addressed above. 
If you are not  the  intended  recipient, or  an  employee  or  agent 
responsible for delivering it to the intended recipient, you are hereby 
notified that any disclosure,  copying, distribution, or the taking of any 
action in reliance on the contents of the E-mail or attached files 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

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

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files 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: What is the difference between starting a cataloged procedure and submitting a JCL

On Tue, 18 May 2010 09:36:23 -0500, Hal Merritt wrote:

IEFBR14 creates only a 'null' file. Most programs trying to open and read a 
'null' file will fail.

Depending on SMS, whether DSORG can be determined, etc.

-- 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: Benchmarking the IPL

IBM offers features and pricing options that should fit your needs perfectly. I 
think the feature/pricing you want is called CBU.  

HTH and good luck.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Kelman, Tom
Sent: Friday, May 14, 2010 9:13 AM
To: IBM-MAIN@bama.ua.edu
Subject: Benchmarking the IPL

My management wants to benchmark the IPL process to see how long it will
take at various levels of MIPS, MSUs, or whatever measurement criteria
can be used.  The purpose of this is to determine what the smallest z10
is we can contract for our DR site that will IPL in a reasonable time
frame.   The plans are to contract for the smallest system possible with
the provisions of being able to bump it up during the few times each
year we do a full blown DR test or in the event the is an actual
disaster situation.  So we might contract for a 2098-A03 and the bump it
all the way to a 2098-Z03 when needed.

Has anyone ever done something similar to this?  Is there any way to set
a cap on the system that will take affect immediately and be active
during the IPL process?  I know that the standard softcap won't work
since that doesn't take affect until the MSU four hour rolling average
hits the cap, which wouldn't happen during an IPL.  What I know as a
hard cap involves restricting the LPAR to its weight, so I don't think
that would work either.  Is there any other way to cap a system?

Tom Kelman

Enterprise Capacity Planner

Commerce Bank of Kansas City

(816) 760-7632 

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

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

Re: Time Parameter

On Tue, 18 May 2010 09:45:11 -0500, Hal Merritt wrote:

Here's a variation that works for me:

ADDRESS TSO  BPXBATCH sh sleep 30

And why would you prefer to:

o Issue a TSO command, which

o Executes a load module, which

o Forks an address space, which

o Execs a shell process, which

o Forks an executable, which

o Issues the sleep syscall

rather than 

address SYSCALL 'sleep 30'

???

-- 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: Anyone using TCPAccess?

2010-05-18 Thread Leif Rundberget

Norman,  I did open an issue in March of 2009.  I received the run-around
from CA for three months and that combined with the fact that many third
party vendors stopped supporting CATCPaccess is what put the nail in the
coffin to goto the IBM CS software.
I have been running this software on the system since 1995 when Interlink
owned the product.  When Sterling Software took over the product some
stability issues started with the software.  You have cycle the task every
week to keep it going.  Those issues were never fixed.  And then a new issue
with STN3270 started about 2009.

One nice feature is that it does not need USS constructs to run (i.e. UID,
default group, etc.) just a simple facility entry in the users security
profile can control who gets access.  But it does have it's hooks in USS
with the T010PFSA module.

--
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: Time Parameter

Well, one reason could be that the poster noted that 'sleep' was a locally 
installed function. While superior, not all shops would have that available. 

The *nix function I used should be availble to all. 


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Paul Gilmartin
Sent: Tuesday, May 18, 2010 10:21 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Time Parameter

On Tue, 18 May 2010 09:45:11 -0500, Hal Merritt wrote:

Here's a variation that works for me:

ADDRESS TSO  BPXBATCH sh sleep 30

And why would you prefer to:

o Issue a TSO command, which

o Executes a load module, which

o Forks an address space, which

o Execs a shell process, which

o Forks an executable, which

o Issues the sleep syscall

rather than 

address SYSCALL 'sleep 30'

???

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

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

Re: PSF IBM 6500 printer

just tried gt18  on printer setup...chars=gt18...
chopped off at 128 ??
missing something ??




From:   Dazzo, Matt mda...@pch.com
To: IBM-MAIN@bama.ua.edu
Date:   05/18/2010 09:20 AM
Subject:Re: PSF IBM 6500 printer
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



I believe our solution was 18CPI using green bar paper on the IBM 6500.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On 
Behalf Of Ron Wells
Sent: Tuesday, May 18, 2010 10:01 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: PSF IBM 6500 printer

Is there a font available to allow printing 220 characters per line ..

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the 
sender, which  may be legally privileged information.  This information is 
intended only  for  the use of the individual or entity addressed above. 
If you are not  the  intended  recipient, or  an  employee  or  agent 
responsible for delivering it to the intended recipient, you are hereby 
notified that any disclosure,  copying, distribution, or the taking of any 
action in reliance on the contents of the E-mail or attached files 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

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

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files 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: PSF IBM 6500 printer

2010-05-18 Thread Dazzo, Matt

Yeap gt18 it is. I used SYS1.SAMPLIB(APSUX08X) The exit reads the FCB and 
calculates the forms length from the FCB. Also had to set up a separate PSF 
proc to steplib the library where the exit was stored. 

If you would like I can send you (off line) the printer definition for this 
form.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Ron Wells
Sent: Tuesday, May 18, 2010 10:47 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: PSF IBM 6500 printer

Matt
was that gt18??
as was there a for/page def that went along with it??




From:   Dazzo, Matt mda...@pch.com
To: IBM-MAIN@bama.ua.edu
Date:   05/18/2010 09:20 AM
Subject:Re: PSF IBM 6500 printer
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



I believe our solution was 18CPI using green bar paper on the IBM 6500.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On 
Behalf Of Ron Wells
Sent: Tuesday, May 18, 2010 10:01 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: PSF IBM 6500 printer

Is there a font available to allow printing 220 characters per line ..

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the 
sender, which  may be legally privileged information.  This information is 
intended only  for  the use of the individual or entity addressed above. 
If you are not  the  intended  recipient, or  an  employee  or  agent 
responsible for delivering it to the intended recipient, you are hereby 
notified that any disclosure,  copying, distribution, or the taking of any 
action in reliance on the contents of the E-mail or attached files 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

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

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files 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

--
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: PSF IBM 6500 printer

sure
??had to setup an exitbummer.did not think it would be that 
complicated to print past 123char. on a line..
not uncommon any more...

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files 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: A DFSORT problem 0 IFTHEN and CONVERT

2010-05-18 Thread Frank Yaeger

Ken Leidner wrote on IBM-MAIN
I am trying to take a DCOLLECT output and not only convert it to fixed
block, but do some reformatting at the same time.  All seems well until
I use the IFTHEN verb.

I can only guess that either the syntax to perform the convert changes
or you just can not do the convert and IFTHEN at the same time.

This works fine.

OPTION NOVLSCMP,VLSHRT
 INCLUDE COND=(9,1,CH,EQ,C'V')
  SORT FIELDS=COPY,
  OUTFIL FNAMES=SORTOUT,BUILD=(1:29,6,1X,49,4,1X,81,2),CONVERT.

This has the problem

 OPTION NOVLSCMP,VLSHRT,
 INCLUDE COND=(9,1,CH,EQ,C'V')
  SORT FIELDS=COPY,
  OUTFIL FNAMES=SORTOUT,CONVERT,:
   IFTHEN=(WHEN=(49,4,CH,EQ,X'001A4A2C'),
 BUILD=(1:29,6,1X,C'3 ',1X,81,2,HEX)),
   IFTHEN=(WHEN=(49,4,CH,EQ,X'007EDE85'),,
 BUILD=(1:29,6,1X,C'9 ',1X,81,2,HEX)),
   IFTHEN=(WHEN=(49,4,CH,EQ,X'019EEB0F'),,
 BUILD=(1:29,6,1X,C'27',1X,81,2,HEX)),
   IFTHEN=(WHEN=(49,4,CH,EQ,X'033DD5BD'),,
 BUILD=(1:29,6,1X,C'54',1X,81,2,HEX)),
   IFTHEN=(WHEN=(49,4,CH,EQ,X'000E18B9'),,
 BUILD=(1:29,6,1X,C'1 ',1X,81,2,HEX)),
   IFTHEN=(WHEN=(49,4,CH,EQ,X'000CAA57'),,
 BUILD=(1:29,6,1X,C'C ',1X,81,2,HEX)),
   IFTHEN=(WHEN=NONE,,
 BUILD=(1:29,6,49,4,81,2,HEX))

You cannot use IFTHEN clauses  and CONVERT/VTOF in the same OUTFIL
statement.

Instead, you can use IFTHEN clauses in an INREC or OUTREC statement,
and OUTFIL with VTOF (or CONVERT) and BUILD.

...
   OUTREC IFTHEN=,,,
   OUTFIL VTOF,BUILD=(...)

Note that the OUTREC statement is processed before the OUTFIL statement.

Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration

 = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/

--
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: Stubborn OSA Express-3 ?

2010-05-18 Thread R.S.

Walter Marguccio pisze:

we have a z01-BC model K03, 4 LPARs, equipped with 4 OSA E
Hello list,

we have a z01-BC model K03, 4 LPARs, equipped with 4 OSA Express-3 1GB Ethernet
SX
(CHPID OSD) and 2 OSA Express-2 (CHPID OSC).

Last Sunday we had to swap our network switch with a new one, and after we
connected the cables
coming from all OSAs to the new switch, we were able to ping/telnet to the OSCs
(I had back MCS
consoles and TSO via non-SNA) but we weren't be able to ping/telnet to the OSDs
anymore.
Issuing D TCPIP,,N,DEV from the console showed all 4 devices in ACTIVE status.
Issuing a TSO ping from one LPAR to all others was successful, too.
D NET,TRL,TRLE=trle_name for our TRLEs showed ACTIVE as well.
Eventually we had to shutdown all 4 LPARs, configuring all 4 OSAs OSD off from the Service Element,
put the same cards in Service Mode, put everything back on line, IPL and voila', the OSAs OSD were reachable
again.

I can't believe that a sophisticated hw like the z10 and its OSA-Express cards
need such a reset action
after a switch has been swapped. My impression is that we missed a much easier
solution which could
have prevented us to shutdown an entire Sysplex and be cut off from the rest
ofthe world for two hours.

Can someone shed some light ?

1. In the old days sophisticated OSA cards had to be varied OFF/ON
whenever Eth signal was lost. It was big pain in the *ss. Nowadays, OSA
Express2 (and newer) cards do not have such feature anymore.
(BTW: No need to shutdown LPARs, it can be done online, only network is
affected - but it's already down)

What happened in your case? I suspect it can be related to ARP
takeover process. Look for messages like:

EZD0041I INTERFACE ethname1 HAS TAKEN BACK ARP RESPONSIBILITY FROM
INTERFACE ethname2

BTW2: Do you really have 4 OSA Ex3 cards and 2 Ex2 cards or PORTs?
If cards then you have 4x4 + 2x2 = 20 Eth ports. Quite a lot. And 4 OSC
servers.
If ports, then you have one OSE Ex3 and one OSA Ex2 card. Sounds more
reasonable.

--
Radoslaw Skorupka
Lodz, Poland

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

Sąd Rejonowy dla m. st. Warszawy
XII Wydział Gospodarczy Krajowego Rejestru Sądowego,
nr rejestru przedsiębiorców KRS 025237

NIP: 526-021-50-88
Według stanu na dzień 01.01.2009 r. kapitał zakładowy BRE Banku SA (w całości
wpłacony) wynosi 118.763.528 złotych. W związku z realizacją warunkowego
podwyższenia kapitału zakładowego, na podstawie uchwały XXI WZ z dnia 16 marca
2008r., oraz uchwały XVI NWZ z dnia 27 października 2008r., może ulec
podwyższeniu do kwoty 123.763.528 zł. Akcje w podwyższonym kapitale zakładowym
BRE Banku SA będą w całości opłacone.

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

partially initialized structures in C


Hello all,

sorry for asking this question on IBM-Main, but the C370 list is so silent
that I doubt that anyone is actually listening.

We observed a sort of problem today which showed up as a 0C4 abend
due to a not proper initialized pointer component of a C structure.

Further examination showed that the structured was initialized as follows

structure_type  structure_identified = { 0 };

The structure has several components; the last component is the pointer.

According to the IBM C language reference, only the first component is
initialized to zero, and the other components have random contents,
because the storage class is automatic. The compiler generates only
initialization logic for the first few bytes of the auto structure. So 
from this

point of view, everything is right.

But: the ANSI C language reference, for example in the Kernighan Ritchie
book appendix, and most other C language references I found on the web,
clearly state that if the number of initializers on structure 
initialization is less

than the number of structure components, the remaining components are
initialized to zero, even for auto structures.

This is not an error in that sense that the compiler does not what is 
written

in the language reference, but instead it is a contradiction between IBM's
language reference and ANSI language reference.

What do you think about this? Does it make sense to complain at IBM
about it? We have hundreds of C programs in production use which use
this kind of initialization (maybe) and now we are afraid that we need to
examine all these programs.

Kind regards

Bernd

--
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: LIBRARY 3494

2010-05-18 Thread HELIO


John,

When I issued the command D SMS,vol(volser) returned the following

-D SMS,VOL(FR0369)  

CBR1180I OAM tape volume status: 311   

VOLUME  MEDIA STORAGE   LIBRARY   USE  W  C SOFTWARE  LIBRARY 

 TYPE  GROUP NAMEATR   P  P  
 ERR STATCATEGORY


FR0369   MEDIA4ROBO  ROBOPN  N 
  NOERROR   CONEJECT


---

RECORDING TECH: 256 TRACKCOMPACTION: YES   


SPECIAL ATTRIBUTE:  NONE ENTER/EJECT DATE:   2010-01-15

CREATION DATE:  2010-01-15   EXPIRATION DATE:  


LAST MOUNTED DATE:  2010-03-18   LAST WRITTEN DATE:  2010-03-18

SHELF LOCATION: 

OWNER: 


---

Eject/Export operation in progress in library.
   
The message of the library is that the volume is being released on the 
shelf and it does not. 




John Kelly escreveu:

snip
... we have a volume within 3494 library that is not identified by 3494 
library ...

/snip

It really looks like the ATL, or at least the TCDB, knows about the 
volume, since you did not get:


CBR1064I Command rejected.  Volume serial number VOLSER undefined. 

What does SMS display or AMS list indicate about the volume? If nothing 
there, what 3494 'category' is the tape in?


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


  



--
Hélio José da Silva
Depto. Software Básico

Banco Rural S/A
Rua Rio de Janeiro 927/10 - Centro
30160-041 Belo Horizonte MG
Tel: +55 31 2126-5719
Fax: +55 31 2126-5831
www.rural.com.br

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

Creating a variable length FTP to ASCII file

2010-05-18 Thread Howard Brazee

I have a job that creates a LRECL=7104 record.Most of this a
variable length comment.It gets FTPd to a Unix machine and loaded
into a database.They want the extra spaces removed.

I doubt if the optimal solution would be to make it variable length,
and wonder if I should create a delimiter then run it through some
kind of script on the Unix side.

Any other recommendations?

--
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: What is the difference between starting a cataloged procedure and submitting a JCL

2010-05-18 Thread Dave Barry

The term to use is uninitialized.  It matters not what DSORG, etc. appears in 
the catalog and/or VTOC entries.

I don't know if it still applies, but an uninitialized dataset opened for input 
by a COBOL program would be automatically closed and reopened for output.  
Other run-time environments are not as accomodating, however.

db 

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Paul Gilmartin
Sent: Tuesday, May 18, 2010 11:07 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: What is the difference between starting a cataloged procedure and 
submitting a JCL

On Tue, 18 May 2010 09:36:23 -0500, Hal Merritt wrote:

IEFBR14 creates only a 'null' file. Most programs trying to open and read a 
'null' file will fail.

Depending on SMS, whether DSORG can be determined, etc.

-- gil

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

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

zOS Data Masking Techniques, Algorithms or utilities?

2010-05-18 Thread Carlos Cordero

Coleagues

 

 

Somebody knows a utility/technique or algorithm that meets whit the purpose to 
data masking inside zOS?

 

 

 

Thanks.

 

 

 
 Date: Tue, 18 May 2010 14:39:59 -0400
 From: dba...@ups.com
 Subject: Re: What is the difference between starting a cataloged procedure 
 and submitting a JCL
 To: IBM-MAIN@bama.ua.edu
 
 The term to use is uninitialized. It matters not what DSORG, etc. appears 
 in the catalog and/or VTOC entries.
 
 I don't know if it still applies, but an uninitialized dataset opened for 
 input by a COBOL program would be automatically closed and reopened for 
 output. Other run-time environments are not as accomodating, however.
 
 db 
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf 
 Of Paul Gilmartin
 Sent: Tuesday, May 18, 2010 11:07 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: What is the difference between starting a cataloged procedure 
 and submitting a JCL
 
 On Tue, 18 May 2010 09:36:23 -0500, Hal Merritt wrote:
 
 IEFBR14 creates only a 'null' file. Most programs trying to open and read a 
 'null' file will fail.
 
 Depending on SMS, whether DSORG can be determined, etc.
 
 -- gil
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives 
 at http://bama.ua.edu/archives/ibm-main.html
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
  
_
Prefiero un día sin coche que sin Messenger
www.vivirmessenger.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: Creating a variable length FTP to ASCII file

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Howard Brazee
 Sent: Tuesday, May 18, 2010 1:40 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Creating a variable length FTP to ASCII file

 I have a job that creates a LRECL=7104 record.Most of this a
 variable length comment.It gets FTPd to a Unix machine and loaded
 into a database.They want the extra spaces removed.

Trailing blanks or embedded blanks?

quote site notrailingblanks

on the ftp to remove trailing blanks, for a UNIX client (ftp initiated by UNIX).

locsite notrailingblanks

for a z/OS client (ftp initiated by z/OS).

 I doubt if the optimal solution would be to make it variable length,
 and wonder if I should create a delimiter then run it through some
 kind of script on the Unix side.

 Any other recommendations?

Simple UNIX code to delete trailing blanks:

sed 's/ +$//' input.file no.trailing.blanks

Simple UNIX command to compress multiple blanks to a single blank:

tr -s ' ' input.file squeezed.out.extra.blanks

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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

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

Re: What is the difference between starting a cataloged procedure and submitting a JCL

On Tue, 18 May 2010 14:39:59 -0400, Dave Barry wrote:

The term to use is uninitialized.  It matters not what DSORG, etc. appears 
in the catalog and/or VTOC entries.

DSORG matters.  If the data set is SMS managed (or is it sufficient that SMS be
active?) and DSORG is given in the DD DISP=NEW,DSORG=PS,... allocation will
initialize the data set; no need for IEBGENER.

I don't know if it still applies, but an uninitialized dataset opened for 
input by a COBOL program would be automatically closed and reopened for 
output.  Other run-time environments are not as accomodating, however.

I'm astonished.  How can COBOL tell whether a data set has been initialized?
Is it that if an EOF is written, DS1LSTAR points to the second sector;
if uninitialized to the first?  What happens if the program attempts to
read the data set now opened for output?

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Paul Gilmartin
Sent: Tuesday, May 18, 2010 11:07 AM

Depending on SMS, whether DSORG can be determined, etc.

-- 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: Creating a variable length FTP to ASCII file

On Tue, 18 May 2010 12:39:36 -0600, Howard Brazee wrote:

I have a job that creates a LRECL=7104 record.Most of this a
variable length comment.It gets FTPd to a Unix machine and loaded
into a database.They want the extra spaces removed.

I doubt if the optimal solution would be to make it variable length,
and wonder if I should create a delimiter then run it through some
kind of script on the Unix side.

Creating the data set as RECFM=V on the z/OS side and omitting any
filtering downstream seems optimum to me.  What arguments favor a
more complicated process?

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

partially initialized structures in C (2)


To make it clear:

 *scp1215ein   in1215 = { 0 };  
   STr6,a5:d272:l4(,r13,272)  
   MVI   a5:d276:l1(r13,276),0
 *scp1215aus   out1215= { 0 };  
   STr6,a5:d296:l4(,r13,296)  
   MVI   a5:d300:l1(r13,300),0


The ST operations initialize the first components of the structures,
which are fullwords. This is what should be done, according to
the IBM C language reference.

The rest of the structures should remain unchanged (uninitialized),
according to IBM's language reference, and should be set to zero,
according to ANSI C language reference. The structure out1215,
for example, is 24 bytes long.

Now the MVI makes absolutely no sense to me.

It would only make some sense, if it was followed by an overlapped MVC
instruction, which would set the rest of the structure to zero. But such a
instruction is not generated by the compiler.

???

Kind regards

Bernd




Bernd Oppolzer schrieb:

Hello all,

sorry for asking this question on IBM-Main, but the C370 list is so 
silent

that I doubt that anyone is actually listening.

We observed a sort of problem today which showed up as a 0C4 abend
due to a not proper initialized pointer component of a C structure.

Further examination showed that the structured was initialized as follows

structure_type  structure_identified = { 0 };

The structure has several components; the last component is the pointer.

According to the IBM C language reference, only the first component is
initialized to zero, and the other components have random contents,
because the storage class is automatic. The compiler generates only
initialization logic for the first few bytes of the auto structure. So 
from this

point of view, everything is right.

But: the ANSI C language reference, for example in the Kernighan Ritchie
book appendix, and most other C language references I found on the web,
clearly state that if the number of initializers on structure 
initialization is less

than the number of structure components, the remaining components are
initialized to zero, even for auto structures.

This is not an error in that sense that the compiler does not what is 
written
in the language reference, but instead it is a contradiction between 
IBM's

language reference and ANSI language reference.

What do you think about this? Does it make sense to complain at IBM
about it? We have hundreds of C programs in production use which use
this kind of initialization (maybe) and now we are afraid that we need to
examine all these programs.

Kind regards

Bernd



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

partially initialized structures in C (3)


Sorry for the missing line feeds.

C statement:
*scp1215ein   in1215 = { 0 };
Pseudo ASSEMBLER (structure starts at 272(r13)):
STr6,a5:d272:l4(,r13,272)
MVI   a5:d276:l1(r13,276),0

C statement:
*scp1215aus   out1215= { 0 };
Pseudo ASSEMBLER (structure starts at 296(r13)):
STr6,a5:d296:l4(,r13,296)
MVI   a5:d300:l1(r13,300),0

Kind regards

Bernd


Bernd Oppolzer schrieb:

To make it clear:


see above


The ST operations initialize the first components of the structures,
which are fullwords. This is what should be done, according to
the IBM C language reference.

The rest of the structures should remain unchanged (uninitialized),
according to IBM's language reference, and should be set to zero,
according to ANSI C language reference. The structure out1215,
for example, is 24 bytes long.

Now the MVI makes absolutely no sense to me.

It would only make some sense, if it was followed by an overlapped MVC
instruction, which would set the rest of the structure to zero. But 
such a

instruction is not generated by the compiler.

???

Kind regards

Bernd




Bernd Oppolzer schrieb:

Hello all,

sorry for asking this question on IBM-Main, but the C370 list is so 
silent

that I doubt that anyone is actually listening.

We observed a sort of problem today which showed up as a 0C4 abend
due to a not proper initialized pointer component of a C structure.

Further examination showed that the structured was initialized as 
follows


structure_type  structure_identified = { 0 };

The structure has several components; the last component is the pointer.

According to the IBM C language reference, only the first component is
initialized to zero, and the other components have random contents,
because the storage class is automatic. The compiler generates only
initialization logic for the first few bytes of the auto structure. 
So from this

point of view, everything is right.

But: the ANSI C language reference, for example in the Kernighan Ritchie
book appendix, and most other C language references I found on the web,
clearly state that if the number of initializers on structure 
initialization is less

than the number of structure components, the remaining components are
initialized to zero, even for auto structures.

This is not an error in that sense that the compiler does not what is 
written
in the language reference, but instead it is a contradiction between 
IBM's

language reference and ANSI language reference.

What do you think about this? Does it make sense to complain at IBM
about it? We have hundreds of C programs in production use which use
this kind of initialization (maybe) and now we are afraid that we 
need to

examine all these programs.

Kind regards

Bernd



--
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: partially initialized structures in C (3)

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Bernd Oppolzer
 Sent: Tuesday, May 18, 2010 2:14 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: partially initialized structures in C (3)

 Sorry for the missing line feeds.

 C statement:
 *scp1215ein   in1215 = { 0 };
 Pseudo ASSEMBLER (structure starts at 272(r13)):
 STr6,a5:d272:l4(,r13,272)
 MVI   a5:d276:l1(r13,276),0

 C statement:
 *scp1215aus   out1215= { 0 };
 Pseudo ASSEMBLER (structure starts at 296(r13)):
 STr6,a5:d296:l4(,r13,296)
 MVI   a5:d300:l1(r13,300),0

 Kind regards

 Bernd

Just me (and I'm not really good with C), but why not just use memset()?

memset(in1215,0,sizeof in1215);

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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

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

Re: Creating a variable length FTP to ASCII file

2010-05-18 Thread Howard Brazee

On 18 May 2010 11:48:00 -0700, john.mck...@healthmarkets.com (McKown,
John) wrote:

Trailing blanks or embedded blanks?

quote site notrailingblanks

on the ftp to remove trailing blanks, for a UNIX client (ftp initiated by 
UNIX).

locsite notrailingblanks

for a z/OS client (ftp initiated by z/OS).

I'm using a mainframe ftp, but the unix command you gave me looks
useful.

--
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: Creating a variable length FTP to ASCII file

2010-05-18 Thread Howard Brazee

On 18 May 2010 11:59:54 -0700, paulgboul...@aim.com (Paul Gilmartin)
wrote:

Creating the data set as RECFM=V on the z/OS side and omitting any
filtering downstream seems optimum to me.  What arguments favor a
more complicated process?

I'll try 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: Anyone using TCPAccess?

2010-05-18 Thread Norman Hollander on DesertWiz

My suggestion about going through support was to get whatever problem you
are having
resolved.  You should not be getting a run-around.  If you have an issue
number,
I'd be happy to nudge the appropriate folks.

znor...@ca.com

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Leif Rundberget
Sent: Tuesday, May 18, 2010 Tuesday 8:24 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Anyone using TCPAccess?

Norman,  I did open an issue in March of 2009.  I received the run-around
from CA for three months and that combined with the fact that many third
party vendors stopped supporting CATCPaccess is what put the nail in the
coffin to goto the IBM CS software.
I have been running this software on the system since 1995 when Interlink
owned the product.  When Sterling Software took over the product some
stability issues started with the software.  You have cycle the task every
week to keep it going.  Those issues were never fixed.  And then a new issue
with STN3270 started about 2009.

One nice feature is that it does not need USS constructs to run (i.e. UID,
default group, etc.) just a simple facility entry in the users security
profile can control who gets access.  But it does have it's hooks in USS
with the T010PFSA module.

--
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: partially initialized structures in C


Yes. I personally use memset all the time. But this is not the point.

We have hundreds of programs in production that use this kind of 
initialization.
And we don't want to check and change them all. If the IBM people are 
wrong in
their interpretation of the C language definition, they should fix their 
compiler,

and we would simply recompile all our programs without having to examine
them and to lookup all such declarations and initializations, which can 
be costly,

given some 2000 programs and 7 millions lines of source code.

Unfortunately, I myself have only written some dozens of these 2000 C 
programs :-)
(and many of these have gone through other hands through the past 15 
years).


Kind regards

Bernd



McKown, John schrieb:

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

Sent: Tuesday, May 18, 2010 2:14 PM
To: IBM-MAIN@bama.ua.edu
Subject: partially initialized structures in C (3)

Sorry for the missing line feeds.

C statement:
*scp1215ein   in1215 = { 0 };
Pseudo ASSEMBLER (structure starts at 272(r13)):
STr6,a5:d272:l4(,r13,272)
MVI   a5:d276:l1(r13,276),0

C statement:
*scp1215aus   out1215= { 0 };
Pseudo ASSEMBLER (structure starts at 296(r13)):
STr6,a5:d296:l4(,r13,296)
MVI   a5:d300:l1(r13,300),0

Kind regards

Bernd



Just me (and I'm not really good with C), but why not just use memset()?

memset(in1215,0,sizeof in1215);

--
John McKown 
Systems Engineer IV

IT

Administrative Services Group

HealthMarkets(r)

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

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

 


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

  


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

Re: Time Parameter

On Tue, 18 May 2010 10:26:17 -0500, Hal Merritt wrote:

The *nix function I used should be availble to all.

I see it much the opposite.  My preference:

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Paul Gilmartin
Sent: Tuesday, May 18, 2010 10:21 AM

address SYSCALL 'sleep 30'

is available under any of:

o TSO TMP (or IKJEFT01)

o PGM=IRXJCL

o Unix shell

whereas your suggestion:

On Tue, 18 May 2010 09:45:11 -0500, Hal Merritt wrote:

ADDRESS TSO  BPXBATCH sh sleep 30

is available under only one of the three.

-- 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: PSF IBM 6500 printer

2010-05-18 Thread Dazzo, Matt

Ron, before you assemble the exit you have to determine the fcb your shop is 
using. Then comment out the one not being used. We happen to use fcb2.

OIXTP8FLAG,XTP8MIGSET THE MIGRATION FLAG FOR 
  4245 FCB (FCB2).  @EXC 
OIXTP8FLAG,XTP8MIG4   SET THE MIGRATION FLAG FOR 
  4248 FCB (FCB4).  @EXA

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Ron Wells
Sent: Tuesday, May 18, 2010 12:33 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: PSF IBM 6500 printer

sure
??had to setup an exitbummer.did not think it would be that 
complicated to print past 123char. on a line..
not uncommon any more...

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files 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

--
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: Heads up ISPF skeleton error

2010-05-18 Thread Shmuel Metz (Seymour J.)

In listserv%201005130927305137.0...@bama.ua.edu, on 05/13/2010
   at 09:27 AM, Robert Birdsall bsqu...@umich.edu said:

This probably belongs in the ISPF list,

Indeed, but it's still on topic here.
 
-- 
 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

Hole in PARMLIB syntax checker

2010-05-18 Thread Shmuel Metz (Seymour J.)

I recently discovered a bug in the z/OS 1.10 PARMLIB syntax checker;
it finds no errors when you omit a trailing apostrophe on a mount in
BPXPRMxx. SETOMVS finds an error, but the error messages don't
describe it correctly. I'm curious as to whether 1.11 or 1.12 catch
the syntax error properly.

Note: despite this lapse, the syntax checker is a very useful tool and
I'd like to thank IBM for making it available.
 
-- 
 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: partially initialized structures in C

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Bernd Oppolzer
 Sent: Tuesday, May 18, 2010 2:27 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: partially initialized structures in C

 Yes. I personally use memset all the time. But this is not the point.

 We have hundreds of programs in production that use this kind of 
 initialization.
 And we don't want to check and change them all. If the IBM people are 
 wrong in
 their interpretation of the C language definition, they 
 should fix their 
 compiler,
 and we would simply recompile all our programs without having 
 to examine
 them and to lookup all such declarations and initializations, 
 which can 
 be costly,
 given some 2000 programs and 7 millions lines of source code.

 Unfortunately, I myself have only written some dozens of these 2000 C 
 programs :-)
 (and many of these have gone through other hands through the past 15 
 years).

 Kind regards

 Bernd

Well, from my reading of the IBM manual, it specifically states that:

quote
You do not have to initialize all members of a structure or union; the
initial value of uninitialized structure members depends on the storage
class associated with the structure or union variable. In a structure
declared as static, any members that are not initialized are implicitly
initialized to zero of the appropriate type; the members of a structure
with automatic storage have no default initialization.
/quote

I think this means that it is WAD (or BAD - Broken As Designed). You'd need IBM 
to agree to fix the compiler. I can't tell because I don't have a copy of the 
actual ANSI C reference. Oh, are you running with C99? I.e. LANGLVL(EXTENDED)? 
I don't know if that would make a difference or not. I don't have the C 
compiler here.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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

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

Re: Of interest to the Independent Contractors on the list

2010-05-18 Thread Ed Gould


SNIP
 This type of article re-appears every two years..

It's suppose to make you fear and maybe you will subscribe to their 
magazine.

Remember the Y2K thing'gie ?

How many of those Prophets of Doom knew what they were talking about 
but it worked for most executives.

Anton

Note: Another example... The oil in the Gulf is about the wipe out all 
the Florida/Alabama/Mississippi/Texas/Louisiana beaches
SNIP--
Having witnessed one fiasco (Y2K) with one place I can attest that management 
cheeped out with the issue and got what it paid for.
I was sure happy to not be near the place when Y2K actually happened.

I do not think (if I read the article correctly) that IPC's are not really 
IPC's (according to the article). To be a really IPC you need some autonomy 
other than pay structure.

I am a bit puzzled by this article, as corporations seem to be using them as 
shields rather than tools (at least when it comes to pay issues).

Ed



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

IBM to announce new MF's this year

2010-05-18 Thread Ed Gould

http://www.theregister.co.uk/2010/05/17/ibm_future_servers_2010/

IBM, like other server makers, has rolled out a bunch of new iron this spring, 
but still has a ways to go to completely revamp its product lineup in 2010, as 
it plans to do.



--
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: Amazing article.

2010-05-18 Thread Hylton Tom P

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of R.S.
Sent: Monday, May 10, 2010 12:58 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Amazing article.

Howard Brazee pisze:
 On 6 May 2010 13:25:37 -0700, r.skoru...@snip.it.pl (R.S.)
 wrote:

 I wonder how many operating systems are being used in such business
 environments.Is Pick still being used?   How about VAX?   Other
 IBM mini-environment OS's (not to mention OS/2)?

OS/2 is dead, so users were forced to migrate off. Possibly some
existing and closed applications are being in use nowadays.

http://searchdatacenter.techtarget.com/news/article/0,289142,sid80_gci15
08584,00.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: Of interest to the Independent Contractors on the list

Bad example. There is more (very sad) truth than not.   

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Anton Britz
Sent: Sunday, May 16, 2010 7:12 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Of interest to the Independent Contractors on the list

..snip 

Note: Another example... The oil in the Gulf is about the wipe out all 
the Florida/Alabama/Mississippi/Texas/Louisiana beaches

..snip

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

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

Re: Amazing article.

2010-05-18 Thread Chase, John

 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Hylton Tom P

 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of R.S.

 Howard Brazee pisze:
  On 6 May 2010 13:25:37 -0700, r.skoru...@snip.it.pl (R.S.)
  wrote:

  I wonder how many operating systems are being used in such business
  environments.Is Pick still being used?   How about VAX?   Other
  IBM mini-environment OS's (not to mention OS/2)?

 OS/2 is dead, so users were forced to migrate off. Possibly some
 existing and closed applications are being in use nowadays.

http://searchdatacenter.techtarget.com/news/article/0,289142,sid80_gci15
 08584,00.html

I won't be going back.  Indeed, I took both my OS/2 boxes to the
recycler last time I cleaned out the basement.  :-)

I still have some OS/2 software; contact me off-list for inventory and
shipping arrangements.

-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: partially initialized structures in C