Re: Z Toolkit for z/OS Install

2011-08-26 Thread Hunkeler Peter (KIUP 4)
Peter,

https://www-304.ibm.com/support/docview.wss?uid=isg1OA15228

Do you have any specific references for how you are indicating 
that the region inheritance works?

Sorry for the late reply to your question, Rob 

I had done some tests some years ago but unfortunately I can't
find the results anymmore, so all I know and wrote is what
my memory is remembering.

The TSO/OMVS case I described below is not completely correct.
(In the darly days, I seem to remember, it was.)

When starting a *non-local* shell using TSO/OMVS, then the 
ASSIZEMAX and MAXASSIZE are used to set the region size for
the shell address space. (If the shell is started locally,
i.e. in the TSO AS, then the region size is not changed.)

I searched the archives of IBM-MAIN and MVS-OE and found 
a post from Don Ault. In December 1998 he explained:

  MAXASSIZE is used whenever you have a setuid/exec or spawn 
   with userid which the kernel interprets as a daemon creating 
   a user process.

(At that time ASSIZEMAX did not yet exist in the OMVS segment.)

This is what I meant with the following statement I posted earlier,
I just could not remember exactly when it happens.

 The ASSIZEMAX and MAXASSIZE values will only apply when it is 
 not reasonable to inherit from the parent such as when logging 
 in. E.g. it is not reasonable to inherit from indetd, so 
 ASSIZEMAX/MAXASSIZE will be used. (I don't have the details 
 handy to tell here.)

--
Peter Hunkeler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Copying file to OMVS

2011-08-26 Thread Hunkeler Peter (KIUP 4)
ICH408I USER(ZOSUSER ) GROUP(OMVSGRP ) NAME(USER NAME)  479
  /TEST/COMPRESS9 CL(FSOBJ   ) FID(38130041)
  INSUFFICIENT AUTHORITY TO OPEN
  ACCESS INTENT(RW-)  ACCESS ALLOWED(OWNER ---)
  EFFECTIVE UID(000999)  EFFECTIVE GID(01)

Someone mentioned that the RACF message say it all. While this is
true, nobody cared to explan what the message says in detail.

John was suggesting to change access rights for the /TEST directory. But
the message says CL(FSOBJ) which means the access is failing on the
actual last part of the pathname shown, i.e. COMPRESS9. 

The message would show CL(DIRSRCH) when the access was failing due to 
missing permission on a directory in the path.

Next the message says you wanted to get rw access (ACCESS INTENT(rw)) 
but do not have any access as owner of the entry (ACCESS ALLOWED(OWNER 
---)). The keyword OWNER in the last part is telling you that you indeed

are the owner of the entry, so you can change permission on you own. 
No need to ask the, obviously somewhat UNIX ignorant (no offence 
intended), RACF admin.

--
Peter Hunkeler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Copying file to OMVS

2011-08-26 Thread Hunkeler Peter (KIUP 4)
Have your RACF person to provide : CHMOD 777  /TEST/COMPRESS9 to 
execute this command in OMVS. Also ask them to change the owner 
by CHOWN command..

Why are you suggesting to change the mode to 777. First, the file
seems to receive the content of a pax archive, so it is not an
executable file. Therefore, *do not* set the executable bit.
Second, why do you think anybody should get full read and write
access to this file? 

It is difficult so tell what the desired permission would be, since
the OP did not tell about the intended use of the file. If you still
want to chown, I'd suggest to set the mode to 644 at most. This
was the owner can read and write and all other can read it.

If you care a bit about security, then:

- only ever set the executable bit it the file is intended to be
  an executable: either a script file or a binary (aka load module).
- only ever allow read when read is requires, only ever allow
  write access when write is required.

Recommendation: UNIXes are case sensitve, you should adhere to this
when writing down commands. Someone might copy and paste and wonder
about an FSUM7351 not found error.

Also, it is not good habit to use all uppercase directory and 
filenames. It is more usual to have them all lower case, and 
sometimes mixed case (especially when developping java code).

--
Peter Hunkeler

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


COPY commands under JCL vs. under Unix System Services

2011-08-26 Thread MONTERO ROMERO, ENRIQUE ELOI
Hi Henrique,

Why don´t you try with the IEBGENER?

I use this one to copy files from OMVS to Z/os. 

//JOB1 JOB 999,'ME',NOTIFY=SYSUID,CLASS=A,MSGCLASS=H,
//MSGLEVEL=(1,1)
//CREAFICH EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=* 
//SYSINDD  DUMMY
//SYSUT1  DD  PATHOPTS=(ORDONLY),RECFM=FB,LRECL=80,BLKSIZE=800, 
//PATH='/u/userid/testcopydataset' 
//SYSUT2   DD DSN=USERID.TEMP.TESTCOPY.DATASET,
//DISP=(,CATLG,DELETE), 
//UNIT=3390,
//SPACE=(CYL,(1,1)),
//RECFM=FB,LRECL=80 
 

Remember the OMVS datasets are case sensitive.

 
Enrique Montero 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Copying file to OMVS

2011-08-26 Thread Hunkeler Peter (KIUP 4)
 //SYSUT2 DD PATH='/TEST/COMPRESS9',
 // PATHOPTS=(OWRONLY,OCREAT,OEXCL),
 // PATHDISP=(KEEP,DELETE)
 //SYSIN DD DUMMY

You also need // PATHMODE=() otherwise the system
creates the file with mode 000 (see JCL manual), which is
what you see in the RACF message.

--
Peter Hunkeler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Dashboard type software for monitoring z/OS - Thank You

2011-08-26 Thread Elardus Engelbrecht
To all,

Many many THANKS to all who replied to me on this list and also offline.

All and every answer were very useful and will be reviewed. Whew! This lists is 
terrific! Many thanks! :-)

Again many thanks to all who kindly replied on this thread! All of you are 100% 
excellent! ;-D

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: ICEGENER and VSAM

2011-08-26 Thread R.S.

W dniu 2011-08-26 05:41, Stewart, David James pisze:

Hi



Can anyone confirm for me if ICEGENER when used to copy to a VSAM
cluster (SYSUT2) will preserve the CI/CA freespace parameters if they
are  0.


I haven't checked it, but I guess it depends. It could depend on VSAM 
file status (is it new or not, is it defined with REUSE, etc.)


--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@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.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


SMPE ZONEINDEX definition for DLIB and TARGET zones

2011-08-26 Thread Alvaro Guirao Lopez
Hi listers,

In the distribution of z/OS V1R11 SMPE is defined to the global zone the
DLIB and TARGET zones of MQSeries V6 and V7.

Well, my problem is that MQ V6 SMP files doesn't exist, so, I cannot update
the rest of the SMP files.

I tried to ZONEDELETE them but then issues messages telling about the
inexistence of the VSAM files, I have defined and initiated them and tried
again but then issues message GIM50801S tellig about the inexistence of
ZONEINDEX of the zones.

Well, I have seen about the definition of ZONEINDEX but I see this is done
at the GLOBAL zone, the GLOBAL zone exists and is correct so I understand
that I don't need to define it, or yes¿?  :-S

When you do ZONEDELETE the set must be done to the ZONE that you want to
delete so the ZONEINDEX, where is¿?


Some help will be appreciated.

Thanks and have a nice day guys.
Álvaro.

-- 
Un saludo.
Álvaro Guirao

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: SMPE ZONEINDEX definition for DLIB and TARGET zones

2011-08-26 Thread Alvaro Guirao Lopez
Hi again,


I have solved my problem, I was convinced that the CSI must be the one that
contains the data, I put the global CSI and reprocess my ZONEDELETEs
succesfully.

Now I cannot know if was really necessary to define the VSAM files...


Thanks anyway.
ByE!

2011/8/26 Alvaro Guirao Lopez alvarogui...@gmail.com

 Hi listers,

 In the distribution of z/OS V1R11 SMPE is defined to the global zone the
 DLIB and TARGET zones of MQSeries V6 and V7.

 Well, my problem is that MQ V6 SMP files doesn't exist, so, I cannot update
 the rest of the SMP files.

 I tried to ZONEDELETE them but then issues messages telling about the
 inexistence of the VSAM files, I have defined and initiated them and tried
 again but then issues message GIM50801S tellig about the inexistence of
 ZONEINDEX of the zones.

 Well, I have seen about the definition of ZONEINDEX but I see this is done
 at the GLOBAL zone, the GLOBAL zone exists and is correct so I understand
 that I don't need to define it, or yes¿?  :-S

 When you do ZONEDELETE the set must be done to the ZONE that you want to
 delete so the ZONEINDEX, where is¿?


 Some help will be appreciated.

 Thanks and have a nice day guys.
 Álvaro.

 --
 Un saludo.
 Álvaro Guirao




-- 
Un saludo.
Álvaro Guirao

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Copying file to OMVS

2011-08-26 Thread Ted MacNEIL
Second, why do you think anybody should get full read and write access to this 
file? 

They were being sarcastic.
Somebody else pointed out, due to cultural and language differences, that not 
everybody would catch on to that.
Appears he was right.


-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Help with an LE problem

2011-08-26 Thread Sambataro, Anthony (NIH/NBS) [E]
Is not the original abend a S322(CPU timeout)?

-Original Message-
From: Skip Robinson [mailto:jo.skip.robin...@sce.com] 
Sent: Thursday, August 25, 2011 6:01 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Help with an LE problem

I've had good luck with COBOL problems by setting a NONPER SLIP trap with 
no abend code specified. Just job name. SLIP is supposed to catch the 
first abend--before any ESTAE gets control--and produce an SVC dump for 
that abend. 

.
.
JO.Skip Robinson
SCE Infrastructure Technology Services
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   Binyamin Dissen bdis...@dissensoftware.com
To: IBM-MAIN@bama.ua.edu
Date:   08/25/2011 02:31 PM
Subject:Help with an LE problem
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



I have a CEEDUMP with 

CEE3250C The system or user abend U 802 R=NULL was issued.

   ABEND code: 0322 Reason code: 

CIB:

   +00 000F37F8  C3C9C240   010C0004  
 00040CB2 61C3C5C5  |CIB /CEE|
   +20 000F3818  000B 000F3908 00040CB2 61C3C5C5  000B
 000EF1C8 C0D68988  |/CEE..1H.Oih|
   +40 000F3838   000F1BF8 43D7CADC 000EC478  0005
000EF2B8    |...8.PD...2.|
   +60 000F3858       
    ||
   +80 000F3878 - +9F 000F3897 same as above
   +A0 000F3898       80015000
0322    |...|
   +C0 000F38B8   43D78DFC 000F1BF8 000F1BF8  43D7CADC
  0001  |.P.8...8.P..|
   +E0 000F38D8  000EF1C8 0005 0064 FFFC  0001
  000E98D0  |..1H..q.|
   +000100 000F38F8  0012 000EC690    E9D4C3C8
0201 43D08008   |..F.ZMCH|

But the neither the PSW nor the registers are consistent with this abend. 
The
registers and PSW are consistent with the Exception location.

The ZMCH block has the exception information.

It is a COBOL program compiled with THREAD.

I guess I will need a real dump, but have no idea how to trap it - after 
all I
do not see an abend.

--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.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: COPY commands under JCL vs. under Unix System Services

2011-08-26 Thread Jan MOEYERSONS
On Thu, 25 Aug 2011 13:45:12 -0500, Henrique Seganfredo 
henrique.seganfr...@bcb.gov.br wrote:

Hello,

I am trying to run a job that calls BPXBATCH do execute a Unix script.
Far easier to use Co:Z batch...


The Unix script tries to copy the file from the Unix environment to a MVS 
dataset. I have tried these two approaches. The filename is variable.

1) cp -P RECFM=FB,SPACE=(CYL,(1,1)),LRECL=96,BLKSIZE=0 $myfilevar.ebcdic 
//'PSTR.TEMP'

I have tested this with exactly your JCL. Works like a charm...

JCL:
//XXX JOB YY,TIME=1
//COPY EXEC PGM=BPXBATCH,REGION=8M,COND=(0,NE)
//STDINDD SYSOUT=*
//STDOUT   DD SYSOUT=*
//STDPARM  DD *
sh /spb/bin/Copy.sh
//*


Why the dataset appears to be in use ?? It DOES NOT EVEN exists!
I suggest you look again. It must exist...

Cheers,

Jantje.

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


IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Alvaro Guirao Lopez
Hi list,

I'm had assembled some exits and I'm trying to apply as USERMOD into SMP
when I had this memory abend, the error is at LNKLST so I cannot increase it
REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA?


Any experiences?

Thanks and best regards.

-- 
Un saludo.
Álvaro Guirao

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: EXEC CICS FORMATTIME issue

2011-08-26 Thread Jan MOEYERSONS
On Thu, 25 Aug 2011 12:41:24 -0700, william janulin wjanu...@yahoo.com wrote:

To list;
  Not sure if this is the correct forum to post this. If not, can someone 
point me in the right diection. 

It is not...

Try CICS-L, there are very competent people over there. You can join the list 
at 
http://www.listserv.uga.edu/cgi-bin/wa?SUBED1=cics-lA=1  

EXEC.                                                                 Call 
DFHEI1 using by content x4a048483078483              -    
f0f0f5f2404040 by reference RAWTIME by content x                   content 
x by content x by content x000                   reference 
DATE-OUT by content x by
 content x                   by content x by content x by content 
x                                                                      = 
IGYPS2106-S BY was found in the CALL statement.  It was not all allowed in 
this     content x by content x by reference TIME-OUT by end-call.  
 
     IGYPS2113-E The explicit scope terminator END-CALL was found without a 
matching            verb.  The scope terminator was discarded.     

Could it be that you have the COBOL compile option APOST on your compile and 
forgot to tell the pre-processor to generated apostrophes instead of (I think 
the default) quotes?

Cheers,

Jantje.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Copying file to OMVS

2011-08-26 Thread Hunkeler Peter (KIUP 4)
Second, why do you think anybody should get full read and write 
access to this file? 

They were being sarcastic.

I saw those post and I fully agree. But I don't think the post I was 
refering to was meant to be sarcastic. Neither by the wording used
nor by the person posting.

And from my own experience I can tell many MVS people tend to
set permissions wrong in their early days of zO/S UNIX experience. 

But after all, I might as well have been caught by said cultural and 
language differences :-)

--
Peter Hunkeler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Vernooij, CP - SPLXM
Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message 
news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=g...@mail.gmail.com...
 Hi list,
 
 I'm had assembled some exits and I'm trying to apply as USERMOD into SMP
 when I had this memory abend, the error is at LNKLST so I cannot increase it
 REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA?
 
 
 Any experiences?
 
 Thanks and best regards.
 
 -- 
 Un saludo.
 Álvaro Guirao

Of course you can with Region. Even lnklst modules are loaded into your region.
What is the abendcode?

Kees.

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

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



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


Re: Help with an LE problem

2011-08-26 Thread Binyamin Dissen
Yeah, I know I can try that. What I really do not understand is why I do not
have registers that match the alleged user abend.

Also, I cannot find this abend in LE or COBOL.

On Thu, 25 Aug 2011 15:00:54 -0700 Skip Robinson jo.skip.robin...@sce.com
wrote:

:I've had good luck with COBOL problems by setting a NONPER SLIP trap with 
:no abend code specified. Just job name. SLIP is supposed to catch the 
:first abend--before any ESTAE gets control--and produce an SVC dump for 
:that abend. 
:
:.
:.
:JO.Skip Robinson
:SCE Infrastructure Technology Services
:Electric Dragon Team Paddler 
:SHARE MVS Program Co-Manager
:626-302-7535 Office
:323-715-0595 Mobile
:jo.skip.robin...@sce.com
:
:
:
:From:   Binyamin Dissen bdis...@dissensoftware.com
:To: IBM-MAIN@bama.ua.edu
:Date:   08/25/2011 02:31 PM
:Subject:Help with an LE problem
:Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
:
:
:
:I have a CEEDUMP with 
:
:CEE3250C The system or user abend U 802 R=NULL was issued.
:
:   ABEND code: 0322 Reason code: 
:
:CIB:
:
:   +00 000F37F8  C3C9C240   010C0004  
: 00040CB2 61C3C5C5  |CIB /CEE|
:   +20 000F3818  000B 000F3908 00040CB2 61C3C5C5  000B
: 000EF1C8 C0D68988  |/CEE..1H.Oih|
:   +40 000F3838   000F1BF8 43D7CADC 000EC478  0005
:000EF2B8    |...8.PD...2.|
:   +60 000F3858       
:    ||
:   +80 000F3878 - +9F 000F3897 same as above
:   +A0 000F3898       80015000
:0322    |...|
:   +C0 000F38B8   43D78DFC 000F1BF8 000F1BF8  43D7CADC
:  0001  |.P.8...8.P..|
:   +E0 000F38D8  000EF1C8 0005 0064 FFFC  0001
:  000E98D0  |..1H..q.|
:   +000100 000F38F8  0012 000EC690    E9D4C3C8
:0201 43D08008   |..F.ZMCH|
:
:But the neither the PSW nor the registers are consistent with this abend. 
:The
:registers and PSW are consistent with the Exception location.
:
:The ZMCH block has the exception information.
:
:It is a COBOL program compiled with THREAD.
:
:I guess I will need a real dump, but have no idea how to trap it - after 
:all I
:do not see an abend.

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

Director, Dissen Software, Bar  Grill - Israel


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

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

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


Fwd: mfnetdisk - A new message was received in your Site

2011-08-26 Thread shai hess
HI,

Latly I change the CODE_REQ condition to download my code.
The change is that everyone who download my product must agree to enable me
to publish their experience with the product.

 Before this change I enable the user to select option to do not publish my
feedback and my id.

Lately I delete this option.
So, if you download my code, you must let me publish your feedback if I like
to do so.

So, only users who enable me to publish their experience with the product
can download my code.

Why I did it?
Because I work hard to make the product good. I do not ask money for the
product.
I pay money to cover the cost I need to pay for the product.
I support the product in any time.
Even if my city is attacked by rockets (Did I Richard?) I continue to
support the product fi the user need me.

So, I feel that this is OK with me to ask and force my users to enable me to
publish their experience with my product.

I know that in some cases users who works for companies which do not like my
product because it can hurt their business, ask me to keep confident. In
this case I will not publish their feedback.

About charging users with money?
I do not have intention to become company which charge money from users.
The only option which exist for me is to continue with this status, or to
sell my product to big company.
So, no charging money as long as I am the owner of the product.

I attach one of many user code request for my code from today.

Thanks,
Shai



-- Forwarded message --
From: wayn...@gmail.com
Date: Thu, Aug 25, 2011 at 10:13 PM
Subject: mfnetdisk - A new message was received in your Site
To: shai.h...@gmail.com


   *mfnetdisk - A new message was received in your Site*

Dear Administrator!

A new message was received through a form in your site.

Form name:
*code request*
Form content:
*
-
Full name:
Wayne Bickerdike
E-mail:
wayn...@gmail.com
Country and state
Australia Vic
ZOS version
1.8
Linux or Windows
Both
Required MFNetDisk feature (Disk, tape emulation, replication)
All features
MFNetDisk experience and comments. You can attach text file instead.
I have tested replication and this is a feature I would like to implement to
save offsite FTP backups.
OK to publish your MFNetDisk comments?
Yes, with my email and name
Company (optional)

Add MFNetDisk feedback in text file (optional).
No file attached
Contribute in the future?
Yes
-
*

-
To view the message, login as an administrator through the following link:
http://www.livecity.co.il/join/login.asp?depart_id=43973departResell_id=17914pathTXT=/site/include/newfeel/website3/index.asp?toolBoxBOO=1
(If the link does not work, copy and paste it into your browser).

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Help with an LE problem

2011-08-26 Thread Binyamin Dissen
On Fri, 26 Aug 2011 07:16:18 -0400 Sambataro, Anthony (NIH/NBS) [E]
anthony.sambat...@nih.gov wrote:

:Is not the original abend a S322(CPU timeout)?

That isn't what LE says. Also, the multi-threading job keeps running.

:-Original Message-
:From: Skip Robinson [mailto:jo.skip.robin...@sce.com] 
:Sent: Thursday, August 25, 2011 6:01 PM
:To: IBM-MAIN@bama.ua.edu
:Subject: Re: Help with an LE problem
:
:I've had good luck with COBOL problems by setting a NONPER SLIP trap with 
:no abend code specified. Just job name. SLIP is supposed to catch the 
:first abend--before any ESTAE gets control--and produce an SVC dump for 
:that abend. 
:
:.
:.
:JO.Skip Robinson
:SCE Infrastructure Technology Services
:Electric Dragon Team Paddler 
:SHARE MVS Program Co-Manager
:626-302-7535 Office
:323-715-0595 Mobile
:jo.skip.robin...@sce.com
:
:
:
:From:   Binyamin Dissen bdis...@dissensoftware.com
:To: IBM-MAIN@bama.ua.edu
:Date:   08/25/2011 02:31 PM
:Subject:Help with an LE problem
:Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
:
:
:
:I have a CEEDUMP with 
:
:CEE3250C The system or user abend U 802 R=NULL was issued.
:
:   ABEND code: 0322 Reason code: 
:
:CIB:
:
:   +00 000F37F8  C3C9C240   010C0004  
: 00040CB2 61C3C5C5  |CIB /CEE|
:   +20 000F3818  000B 000F3908 00040CB2 61C3C5C5  000B
: 000EF1C8 C0D68988  |/CEE..1H.Oih|
:   +40 000F3838   000F1BF8 43D7CADC 000EC478  0005
:000EF2B8    |...8.PD...2.|
:   +60 000F3858       
:    ||
:   +80 000F3878 - +9F 000F3897 same as above
:   +A0 000F3898       80015000
:0322    |...|
:   +C0 000F38B8   43D78DFC 000F1BF8 000F1BF8  43D7CADC
:  0001  |.P.8...8.P..|
:   +E0 000F38D8  000EF1C8 0005 0064 FFFC  0001
:  000E98D0  |..1H..q.|
:   +000100 000F38F8  0012 000EC690    E9D4C3C8
:0201 43D08008   |..F.ZMCH|
:
:But the neither the PSW nor the registers are consistent with this abend. 
:The
:registers and PSW are consistent with the Exception location.
:
:The ZMCH block has the exception information.
:
:It is a COBOL program compiled with THREAD.
:
:I guess I will need a real dump, but have no idea how to trap it - after 
:all I
:do not see an abend.

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

Director, Dissen Software, Bar  Grill - Israel


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

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

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


Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Binyamin Dissen
On Fri, 26 Aug 2011 13:22:23 +0200 Alvaro Guirao Lopez
alvarogui...@gmail.com wrote:

:I'm had assembled some exits and I'm trying to apply as USERMOD into SMP
:when I had this memory abend, the error is at LNKLST so I cannot increase it
:REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA?

Is it possible that the link-listed library went into an additional extent?

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

Director, Dissen Software, Bar  Grill - Israel


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

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

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


Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Alvaro Guirao Lopez
It's true.. before I tried but i have some error, I cannot see but I
think was only some missing character...


Well, I have started again with REGION=OM OK and rerun my job, it fails
again, this is the abend:


IEW4000I FETCH FOR MODULE IDCLC01  FROM DDNAME -LNKLST- FAILED BECAUSE
INSUFFICI ENT STORAGE WAS AVAILABLE.

CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCLC01 , RETURN CODE 24, REASON
CODE 2 6080021, DDNAME *LNKLST*

CSV028I ABEND106-0C  JOBNAME=IBMUSERD  STEPNAME=MVS


IEA995I SYMPTOM DUMP OUTPUT  510


SYSTEM COMPLETION CODE=106  REASON CODE=000C




2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com

 Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message
 news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=g...@mail.gmail.com
 ...
   Hi list,
 
  I'm had assembled some exits and I'm trying to apply as USERMOD into SMP
  when I had this memory abend, the error is at LNKLST so I cannot increase
 it
  REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA?
 
 
  Any experiences?
 
  Thanks and best regards.
 
  --
  Un saludo.
  Álvaro Guirao

 Of course you can with Region. Even lnklst modules are loaded into your
 region.
 What is the abendcode?

 Kees.
 
 For information, services and offers, please visit our web site:
 http://www.klm.com. This e-mail and any attachment may contain
 confidential and privileged material intended for the addressee only. If you
 are not the addressee, you are notified that no part of the e-mail or any
 attachment may be disclosed, copied or distributed, and that any other
 action related to this e-mail or attachment is strictly prohibited, and may
 be unlawful. If you have received this e-mail by error, please notify the
 sender immediately by return e-mail, and delete this message.

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


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




-- 
Un saludo.
Álvaro Guirao

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Alvaro Guirao Lopez
Only extent Binyamin

2011/8/26 Binyamin Dissen bdis...@dissensoftware.com

 On Fri, 26 Aug 2011 13:22:23 +0200 Alvaro Guirao Lopez
 alvarogui...@gmail.com wrote:

 :I'm had assembled some exits and I'm trying to apply as USERMOD into SMP
 :when I had this memory abend, the error is at LNKLST so I cannot increase
 it
 :REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA?

 Is it possible that the link-listed library went into an additional extent?

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

 Director, Dissen Software, Bar  Grill - Israel


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

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

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




-- 
Un saludo.
Álvaro Guirao

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Fwd: mfnetdisk - A new message was received in your Site

2011-08-26 Thread Richard Pinion
Yes he did!

Richard, Vickie, and Randy Pinion

--- shai.h...@gmail.com wrote:

From: shai hess shai.h...@gmail.com
To: IBM-MAIN@bama.ua.edu
Subject: Fwd: mfnetdisk - A new message was received in your Site
Date: Fri, 26 Aug 2011 04:36:58 -0700

HI,

Latly I change the CODE_REQ condition to download my code.
The change is that everyone who download my product must agree to enable me
to publish their experience with the product.

 Before this change I enable the user to select option to do not publish my
feedback and my id.

Lately I delete this option.
So, if you download my code, you must let me publish your feedback if I like
to do so.

So, only users who enable me to publish their experience with the product
can download my code.

Why I did it?
Because I work hard to make the product good. I do not ask money for the
product.
I pay money to cover the cost I need to pay for the product.
I support the product in any time.
Even if my city is attacked by rockets (Did I Richard?) I continue to
support the product fi the user need me.

So, I feel that this is OK with me to ask and force my users to enable me to
publish their experience with my product.

I know that in some cases users who works for companies which do not like my
product because it can hurt their business, ask me to keep confident. In
this case I will not publish their feedback.

About charging users with money?
I do not have intention to become company which charge money from users.
The only option which exist for me is to continue with this status, or to
sell my product to big company.
So, no charging money as long as I am the owner of the product.

I attach one of many user code request for my code from today.

Thanks,
Shai



-- Forwarded message --
From: wayn...@gmail.com
Date: Thu, Aug 25, 2011 at 10:13 PM
Subject: mfnetdisk - A new message was received in your Site
To: shai.h...@gmail.com


   *mfnetdisk - A new message was received in your Site*

Dear Administrator!

A new message was received through a form in your site.

Form name:
*code request*
Form content:
*
-
Full name:
Wayne Bickerdike
E-mail:
wayn...@gmail.com
Country and state
Australia Vic
ZOS version
1.8
Linux or Windows
Both
Required MFNetDisk feature (Disk, tape emulation, replication)
All features
MFNetDisk experience and comments. You can attach text file instead.
I have tested replication and this is a feature I would like to implement to
save offsite FTP backups.
OK to publish your MFNetDisk comments?
Yes, with my email and name
Company (optional)

Add MFNetDisk feedback in text file (optional).
No file attached
Contribute in the future?
Yes
-
*

-
To view the message, login as an administrator through the following link:
http://www.livecity.co.il/join/login.asp?depart_id=43973departResell_id=17914pathTXT=/site/include/newfeel/website3/index.asp?toolBoxBOO=1
(If the link does not work, copy and paste it into your browser).

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




_
Netscape.  Just the Net You Need.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Copying file to OMVS

2011-08-26 Thread Shane
On Fri, 26 Aug 2011 13:26:06 +0200 Hunkeler Peter (KIUP 4) wrote:

 I can tell many MVS people tend to
 set permissions wrong in their early days of zO/S UNIX experience. 

Including the design and implementation team(s) at IBM.
For example, for way too long it was a requirement to run the ServerPac
scripts as UID 0.
There was a recent thread re security in the *nix world. Cast not
your stones - the initial OE/OMVS/USS security model was appalling. And
only improved in (seemingly obstinate) fits and starts.
It's now better, but was an effort to get here.

Shane ...

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


Re: Help with an LE problem

2011-08-26 Thread Steve Comstock

On 8/26/2011 5:36 AM, Binyamin Dissen wrote:

Yeah, I know I can try that. What I really do not understand is why I do not
have registers that match the alleged user abend.

Also, I cannot find this abend in LE or COBOL.



But it says user abend U 802, so I would suspect
your code. Do you set any user abends? Or is it
someone else's code? Are there any condition handlers
involved here?


[snip]


:From:   Binyamin Dissenbdis...@dissensoftware.com
:To: IBM-MAIN@bama.ua.edu
:Date:   08/25/2011 02:31 PM
:Subject:Help with an LE problem
:Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu
:
:
:
:I have a CEEDUMP with
:
: CEE3250C The system or user abend U 802 R=NULL was issued.



--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

* Special promotion: 15% off on all DB2 training classes
scheduled by September 1, taught by year end 2011

* Check out our entire DB2 curriculum at:
http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Veilleux, Jon L
Did SMPE by any chance compress one of the LINKLIST libraries? That will cause 
fetch errors. If this is a system where you can do it, an LLA REFRESH might 
clear up your problem, but be careful because it will also be an issue if you 
installed maintenance that hit LINKLIST and LPALST since LPALST will not be 
updated and might require an IPL.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Alvaro Guirao Lopez
Sent: Friday, August 26, 2011 7:22 AM
To: IBM-MAIN@bama.ua.edu
Subject: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

Hi list,

I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I 
had this memory abend, the error is at LNKLST so I cannot increase it REGION, 
maybe increasing CSA at IEASYS??, If so, I must decrease ECSA?


Any experiences?

Thanks and best regards.

--
Un saludo.
Álvaro Guirao

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna   

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


SDSF REXX question

2011-08-26 Thread Steve Austin
Hello,

 

I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the
ULOG output to be returned in the isfulog. stem. This works fine under
TSO, but if I run the exec under IRXJCL the command is issued, but no
output returned in the isfulog. stem.

 

Any idea what I'm missing?

 

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: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Vernooij, CP - SPLXM
106-0C is region. Do you have an IEFUSI which is limiting your REGION=0M?

Kees.

Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message 
news:CAGzfoX_2gy_8_EUTjomDJhUF6DhxGBJVaedpV5oWqV=mjtf...@mail.gmail.com...
 It's true.. before I tried but i have some error, I cannot see but I
 think was only some missing character...
 
 
 Well, I have started again with REGION=OM OK and rerun my job, it fails
 again, this is the abend:
 
 
 IEW4000I FETCH FOR MODULE IDCLC01  FROM DDNAME -LNKLST- FAILED BECAUSE
 INSUFFICI ENT STORAGE WAS AVAILABLE.
 
 CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCLC01 , RETURN CODE 24, REASON
 CODE 2 6080021, DDNAME *LNKLST*
 
 CSV028I ABEND106-0C  JOBNAME=IBMUSERD  STEPNAME=MVS
 
 
 IEA995I SYMPTOM DUMP OUTPUT  510
 
 
 SYSTEM COMPLETION CODE=106  REASON CODE=000C
 
 
 
 
 2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com
 
  Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message
  news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=g...@mail.gmail.com
  ...
Hi list,
  
   I'm had assembled some exits and I'm trying to apply as USERMOD into SMP
   when I had this memory abend, the error is at LNKLST so I cannot increase
  it
   REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA?
  
  
   Any experiences?
  
   Thanks and best regards.
  
   --
   Un saludo.
   Álvaro Guirao
 
  Of course you can with Region. Even lnklst modules are loaded into your
  region.
  What is the abendcode?
 
  Kees.
  
  For information, services and offers, please visit our web site:
  http://www.klm.com. This e-mail and any attachment may contain
  confidential and privileged material intended for the addressee only. If you
  are not the addressee, you are notified that no part of the e-mail or any
  attachment may be disclosed, copied or distributed, and that any other
  action related to this e-mail or attachment is strictly prohibited, and may
  be unlawful. If you have received this e-mail by error, please notify the
  sender immediately by return e-mail, and delete this message.
 
  Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its
  employees shall not be liable for the incorrect or incomplete transmission
  of this e-mail or any attachments, nor responsible for any delay in receipt.
  Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch
  Airlines) is registered in Amstelveen, The Netherlands, with registered
  number 33014286
  
 
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
  Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 
 
 
 -- 
 Un saludo.
 Álvaro Guirao
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
 

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

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



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


Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Alvaro Guirao Lopez
I have done refresh to LLA too but fails with the same abend.

2011/8/26 Veilleux, Jon L veilleu...@aetna.com

 Did SMPE by any chance compress one of the LINKLIST libraries? That will
 cause fetch errors. If this is a system where you can do it, an LLA
 REFRESH might clear up your problem, but be careful because it will also be
 an issue if you installed maintenance that hit LINKLIST and LPALST since
 LPALST will not be updated and might require an IPL.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of Alvaro Guirao Lopez
 Sent: Friday, August 26, 2011 7:22 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

 Hi list,

 I'm had assembled some exits and I'm trying to apply as USERMOD into SMP
 when I had this memory abend, the error is at LNKLST so I cannot increase it
 REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA?


 Any experiences?

 Thanks and best regards.

 --
 Un saludo.
 Álvaro Guirao

 --
 For IBM-MAIN subscribe / signoff / archive access instructions, send email
 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 may contain confidential or privileged information. If
 you think you have received this e-mail in error, please advise the
 sender by reply e-mail and then delete this e-mail immediately.
 Thank you. Aetna

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




-- 
Un saludo.
Álvaro Guirao

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Help with an LE problem

2011-08-26 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Binyamin Dissen
 
 Yeah, I know I can try that. What I really do not understand is why I
do not
 have registers that match the alleged user abend.
 
 Also, I cannot find this abend in LE or COBOL.

Remember that LE shows User abends in decimal.  D'802' == X'322'.

-jc-

 
 On Thu, 25 Aug 2011 15:00:54 -0700 Skip Robinson
jo.skip.robin...@sce.com
 wrote:
 
 :I've had good luck with COBOL problems by setting a NONPER SLIP trap
with
 :no abend code specified. Just job name. SLIP is supposed to catch
the
 :first abend--before any ESTAE gets control--and produce an SVC dump
for
 :that abend.
 :
 :.
 :.
 :JO.Skip Robinson
 :SCE Infrastructure Technology Services
 :Electric Dragon Team Paddler
 :SHARE MVS Program Co-Manager
 :626-302-7535 Office
 :323-715-0595 Mobile
 :jo.skip.robin...@sce.com
 :
 :
 :
 :From:   Binyamin Dissen bdis...@dissensoftware.com
 :To: IBM-MAIN@bama.ua.edu
 :Date:   08/25/2011 02:31 PM
 :Subject:Help with an LE problem
 :Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 :
 :
 :
 :I have a CEEDUMP with
 :
 :CEE3250C The system or user abend U 802 R=NULL was issued.
 :
 :   ABEND code: 0322 Reason code: 
 :
 :CIB:
 :
 :   +00 000F37F8  C3C9C240   010C0004

 : 00040CB2 61C3C5C5  |CIB /CEE|
 :   +20 000F3818  000B 000F3908 00040CB2 61C3C5C5
000B
 : 000EF1C8 C0D68988  |/CEE..1H.Oih|
 :   +40 000F3838   000F1BF8 43D7CADC 000EC478
0005
 :000EF2B8    |...8.PD...2.|
 :   +60 000F3858     

 :    ||
 :   +80 000F3878 - +9F 000F3897 same as above
 :   +A0 000F3898     
80015000
 :0322    |...|
 :   +C0 000F38B8   43D78DFC 000F1BF8 000F1BF8
43D7CADC
 :  0001  |.P.8...8.P..|
 :   +E0 000F38D8  000EF1C8 0005 0064 FFFC
0001
 :  000E98D0  |..1H..q.|
 :   +000100 000F38F8  0012 000EC690  
E9D4C3C8
 :0201 43D08008   |..F.ZMCH|
 :
 :But the neither the PSW nor the registers are consistent with this
abend.
 :The
 :registers and PSW are consistent with the Exception location.
 :
 :The ZMCH block has the exception information.
 :
 :It is a COBOL program compiled with THREAD.
 :
 :I guess I will need a real dump, but have no idea how to trap it -
after
 :all I
 :do not see an abend.
 
 --
 Binyamin Dissen bdis...@dissensoftware.com
 http://www.dissensoftware.com
 
 Director, Dissen Software, Bar  Grill - Israel
 
 
 Should you use the mailblocks package and expect a response from me,
 you should preauthorize the dissensoftware.com domain.
 
 I very rarely bother responding to challenge/response systems,
 especially those from irresponsible companies.
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


alter dataset blocksize

2011-08-26 Thread MONTERO ROMERO, ENRIQUE ELOI
Hi,

Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original 
creation date?

LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11  
last ref date=2011/08/15

To alter the blksize, or another dataset specifications, we use this method :
 1.- create a new library with the correct specifications.
 2.- copy from old to the new.
 3.- remove the old lib.
 3.- rename the new lib.

(but it shows the NEW creation date = current date)

I want to know how to alter its blocksize or to alter the creation date.

Happy week end,
 
 
Enrique Montero 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Copying file to OMVS

2011-08-26 Thread R.S.

W dniu 2011-08-26 13:44, Shane pisze:

On Fri, 26 Aug 2011 13:26:06 +0200 Hunkeler Peter (KIUP 4) wrote:


I can tell many MVS people tend to
set permissions wrong in their early days of zO/S UNIX experience.


Including the design and implementation team(s) at IBM.
Agreed, so far. IMHO this is because unix is (was?) terra incognita for 
many mainframers.



For example, for way too long it was a requirement to run the ServerPac
scripts as UID 0.
I disagree, that means: what's wrong with UID(0) for such scripts? 
ServerPac installation is rarely done on live production system ;-) 
ServerPac user do require a lot of very powerful rights, including 
Catalog, RACF, DATASET access, etc. etc. In fact such a person is able 
to destroy target system (although usually he creates the system), or 
damage driving system. All without UID(0).




--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@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.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Alvaro Guirao Lopez
I have IEFUSI at LPA but I do not know if the EXIT is limiting REGION=0M, I
just tried with REGION=20M but fails again...

Any way to see IEFUSI work?

2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com

 106-0C is region. Do you have an IEFUSI which is limiting your REGION=0M?

 Kees.

 Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message
 news:CAGzfoX_2gy_8_EUTjomDJhUF6DhxGBJVaedpV5oWqV=mjtf...@mail.gmail.com
 ...
  It's true.. before I tried but i have some error, I cannot see but I
  think was only some missing character...
 
 
  Well, I have started again with REGION=OM OK and rerun my job, it fails
  again, this is the abend:
 
 
  IEW4000I FETCH FOR MODULE IDCLC01  FROM DDNAME -LNKLST- FAILED BECAUSE
  INSUFFICI ENT STORAGE WAS AVAILABLE.
 
  CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCLC01 , RETURN CODE 24, REASON
  CODE 2 6080021, DDNAME *LNKLST*
 
  CSV028I ABEND106-0C  JOBNAME=IBMUSERD  STEPNAME=MVS
 
 
  IEA995I SYMPTOM DUMP OUTPUT  510
 
 
  SYSTEM COMPLETION CODE=106  REASON CODE=000C
 
 
 
 
  2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com
 
   Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message
   news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=
 g...@mail.gmail.com
   ...
 Hi list,
   
I'm had assembled some exits and I'm trying to apply as USERMOD into
 SMP
when I had this memory abend, the error is at LNKLST so I cannot
 increase
   it
REGION, maybe increasing CSA at IEASYS??, If so, I must decrease
 ECSA?
   
   
Any experiences?
   
Thanks and best regards.
   
--
Un saludo.
Álvaro Guirao
  
   Of course you can with Region. Even lnklst modules are loaded into your
   region.
   What is the abendcode?
  
   Kees.
   
   For information, services and offers, please visit our web site:
   http://www.klm.com. This e-mail and any attachment may contain
   confidential and privileged material intended for the addressee only.
 If you
   are not the addressee, you are notified that no part of the e-mail or
 any
   attachment may be disclosed, copied or distributed, and that any other
   action related to this e-mail or attachment is strictly prohibited, and
 may
   be unlawful. If you have received this e-mail by error, please notify
 the
   sender immediately by return e-mail, and delete this message.
  
   Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or
 its
   employees shall not be liable for the incorrect or incomplete
 transmission
   of this e-mail or any attachments, nor responsible for any delay in
 receipt.
   Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch
   Airlines) is registered in Amstelveen, The Netherlands, with registered
   number 33014286
   
  
  
   --
   For IBM-MAIN subscribe / signoff / archive access instructions,
   send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
   Search the archives at http://bama.ua.edu/archives/ibm-main.html
  
 
 
 
  --
  Un saludo.
  Álvaro Guirao
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
  Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 
 For information, services and offers, please visit our web site:
 http://www.klm.com. This e-mail and any attachment may contain
 confidential and privileged material intended for the addressee only. If you
 are not the addressee, you are notified that no part of the e-mail or any
 attachment may be disclosed, copied or distributed, and that any other
 action related to this e-mail or attachment is strictly prohibited, and may
 be unlawful. If you have received this e-mail by error, please notify the
 sender immediately by return e-mail, and delete this message.

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


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




-- 
Un saludo.
Álvaro Guirao

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

Re: Copying file to OMVS

2011-08-26 Thread Shane
On Fri, 26 Aug 2011 13:53:19 +0200 R.S. wrote:

 I disagree, that means: what's wrong with UID(0) for such scripts? 
 ServerPac installation is rarely done on live production system ;-) 

I've seen plenty of customers with a common (i.e. only one) RACF
database ...

Shane ...

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


Re: Help with an LE problem

2011-08-26 Thread Binyamin Dissen
On Fri, 26 Aug 2011 05:44:05 -0600 Steve Comstock st...@trainersfriend.com
wrote:

:On 8/26/2011 5:36 AM, Binyamin Dissen wrote:
: Yeah, I know I can try that. What I really do not understand is why I do not
: have registers that match the alleged user abend.

: Also, I cannot find this abend in LE or COBOL.

:But it says user abend U 802, so I would suspect
:your code. Do you set any user abends? Or is it
:someone else's code? Are there any condition handlers
:involved here?

So would I.

There are some vendor condition handlers, but would LE mask the real
condition?

The exception registers are appropriate for the exception PSW which has
nothing to do with a user abend.

: :From:   Binyamin Dissenbdis...@dissensoftware.com
: :To: IBM-MAIN@bama.ua.edu
: :Date:   08/25/2011 02:31 PM
: :Subject:Help with an LE problem
: :Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu

: :I have a CEEDUMP with

: : CEE3250C The system or user abend U 802 R=NULL was issued.

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

Director, Dissen Software, Bar  Grill - Israel


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

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

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


Re: alter dataset blocksize

2011-08-26 Thread R.S.

W dniu 2011-08-26 13:50, MONTERO ROMERO, ENRIQUE ELOI pisze:

Hi,

Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original 
creation date?

IMHO not without tricks.


LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11  
last ref date=2011/08/15

To alter the blksize, or another dataset specifications, we use this method :
  1.- create a new library with the correct specifications.
  2.- copy from old to the new.
  3.- remove the old lib.
  3.- rename the new lib.

(but it shows the NEW creation date = current date)

I want to know how to alter its blocksize or to alter the creation date.


Few thoughts:

a) If you really need it, then ...change the time!
0.- Set clock to the time of creation of old lib
1.- create a new library with the correct specifications.

While ad hoc time change is usually unacceptable on production system, 
you can use non-prod one.


b) Why do you need original creation time? I'm really curious. Maybe the 
requirement is miss?


c) The best idea is to create library with good blocksize. ;-)
SDB coulb be your friend here, and for program libraries rule of thumb 
BLKSIZE=32760. Then educate the users and cane those who do not follow...


d) The least recommended: zap VTOC fields.
--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@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.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Help with an LE problem

2011-08-26 Thread Binyamin Dissen
On Fri, 26 Aug 2011 06:48:59 -0500 Chase, John jch...@ussco.com wrote:

: -Original Message-
: From: IBM Mainframe Discussion List On Behalf Of Binyamin Dissen
 
: Yeah, I know I can try that. What I really do not understand is why I
:do not
: have registers that match the alleged user abend.
 
: Also, I cannot find this abend in LE or COBOL.

:Remember that LE shows User abends in decimal.  D'802' == X'322'.

Also looked for that. Didn't find it.

: On Thu, 25 Aug 2011 15:00:54 -0700 Skip Robinson
:jo.skip.robin...@sce.com
: wrote:
 
: :I've had good luck with COBOL problems by setting a NONPER SLIP trap
:with
: :no abend code specified. Just job name. SLIP is supposed to catch
:the
: :first abend--before any ESTAE gets control--and produce an SVC dump
:for
: :that abend.

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

Director, Dissen Software, Bar  Grill - Israel


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

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

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


Re: Help with an LE problem

2011-08-26 Thread Sambataro, Anthony (NIH/NBS) [E]
Does your application use IMS?

0802
Explanation: Replace tried to obtain space from space management to replace a 
variable-length segment. The new
'LL' or minimum 'LL' is greater than the old 'LL'. Therefore, Replace requested 
additional space from space
management, but received a return code indicating that no more space is 
available in the data set.
Analysis: This is issued from module DFSDLD00 and can be a standard or a 
pseudoabend.
Abend 0802 is traced in the Buffer Handler Trace Table in a series of entries, 
each of which is identified by a
character D (X'C4') in its first byte. This series of entries immediately 
precedes the current entry in the trace table.
The important field in each trace entry is the second word (offset 4), called 
ENTRY1. This word identifies the abend
and the routine within the Delete/Replace module that encountered the problem.
The ENTRY1 word in the first entry of the Delete/Replace abend trace in the key 
shown in the following table:
Key Description
43430028 The Replace module issued a space request to lengthen a segment. The 
return code from
space management indicated no space available.
Possible cause: A rearrangement of the data set is needed to make free, or 
potentially free space available for access.
This can be accomplished by an UNLOAD, followed by a reload of the data set.
System action: The application program terminates abnormally.
Programmer response: Reorganize the database.
Problem determination: 17a through 17g, 35
Source: IMS abends
0802
Chapter 5. IMS abend codes 0501 - 1000 355

-Original Message-
From: Binyamin Dissen [mailto:bdis...@dissensoftware.com] 
Sent: Friday, August 26, 2011 8:00 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Help with an LE problem

On Fri, 26 Aug 2011 05:44:05 -0600 Steve Comstock st...@trainersfriend.com
wrote:

:On 8/26/2011 5:36 AM, Binyamin Dissen wrote:
: Yeah, I know I can try that. What I really do not understand is why I do not
: have registers that match the alleged user abend.

: Also, I cannot find this abend in LE or COBOL.

:But it says user abend U 802, so I would suspect
:your code. Do you set any user abends? Or is it
:someone else's code? Are there any condition handlers
:involved here?

So would I.

There are some vendor condition handlers, but would LE mask the real
condition?

The exception registers are appropriate for the exception PSW which has
nothing to do with a user abend.

: :From:   Binyamin Dissenbdis...@dissensoftware.com
: :To: IBM-MAIN@bama.ua.edu
: :Date:   08/25/2011 02:31 PM
: :Subject:Help with an LE problem
: :Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu

: :I have a CEEDUMP with

: : CEE3250C The system or user abend U 802 R=NULL was issued.

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

Director, Dissen Software, Bar  Grill - Israel


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

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

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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Alvaro Guirao Lopez
Yeah! Just done right down, there was limitation for the job of 4096K, I was
including REGION=0M into the STEP but this fails, I have changed the REGION
at JOB sentence and works OK.

Thanks for your comments.

2011/8/26 Alvaro Guirao Lopez alvarogui...@gmail.com

 I have IEFUSI at LPA but I do not know if the EXIT is limiting REGION=0M, I
 just tried with REGION=20M but fails again...

 Any way to see IEFUSI work?

   2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com

 106-0C is region. Do you have an IEFUSI which is limiting your REGION=0M?

 Kees.

 Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message
 news:CAGzfoX_2gy_8_EUTjomDJhUF6DhxGBJVaedpV5oWqV=mjtf...@mail.gmail.com
 ...
  It's true.. before I tried but i have some error, I cannot see but I
  think was only some missing character...
 
 
  Well, I have started again with REGION=OM OK and rerun my job, it fails
  again, this is the abend:
 
 
  IEW4000I FETCH FOR MODULE IDCLC01  FROM DDNAME -LNKLST- FAILED BECAUSE
  INSUFFICI ENT STORAGE WAS AVAILABLE.
 
  CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCLC01 , RETURN CODE 24,
 REASON
  CODE 2 6080021, DDNAME *LNKLST*
 
  CSV028I ABEND106-0C  JOBNAME=IBMUSERD  STEPNAME=MVS
 
 
  IEA995I SYMPTOM DUMP OUTPUT  510
 
 
  SYSTEM COMPLETION CODE=106  REASON CODE=000C
 
 
 
 
  2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com
 
   Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message
   news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=
 g...@mail.gmail.com
   ...
 Hi list,
   
I'm had assembled some exits and I'm trying to apply as USERMOD into
 SMP
when I had this memory abend, the error is at LNKLST so I cannot
 increase
   it
REGION, maybe increasing CSA at IEASYS??, If so, I must decrease
 ECSA?
   
   
Any experiences?
   
Thanks and best regards.
   
--
Un saludo.
Álvaro Guirao
  
   Of course you can with Region. Even lnklst modules are loaded into
 your
   region.
   What is the abendcode?
  
   Kees.
   
   For information, services and offers, please visit our web site:
   http://www.klm.com. This e-mail and any attachment may contain
   confidential and privileged material intended for the addressee only.
 If you
   are not the addressee, you are notified that no part of the e-mail or
 any
   attachment may be disclosed, copied or distributed, and that any other
   action related to this e-mail or attachment is strictly prohibited,
 and may
   be unlawful. If you have received this e-mail by error, please notify
 the
   sender immediately by return e-mail, and delete this message.
  
   Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or
 its
   employees shall not be liable for the incorrect or incomplete
 transmission
   of this e-mail or any attachments, nor responsible for any delay in
 receipt.
   Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal
 Dutch
   Airlines) is registered in Amstelveen, The Netherlands, with
 registered
   number 33014286
   
  
  
   --
   For IBM-MAIN subscribe / signoff / archive access instructions,
   send email to lists...@bama.ua.edu with the message: GET IBM-MAIN
 INFO
   Search the archives at http://bama.ua.edu/archives/ibm-main.html
  
 
 
 
  --
  Un saludo.
  Álvaro Guirao
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
  Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 
 For information, services and offers, please visit our web site:
 http://www.klm.com. This e-mail and any attachment may contain
 confidential and privileged material intended for the addressee only. If you
 are not the addressee, you are notified that no part of the e-mail or any
 attachment may be disclosed, copied or distributed, and that any other
 action related to this e-mail or attachment is strictly prohibited, and may
 be unlawful. If you have received this e-mail by error, please notify the
 sender immediately by return e-mail, and delete this message.

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


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

Re: Copying file to OMVS

2011-08-26 Thread R.S.

W dniu 2011-08-26 13:58, Shane pisze:

On Fri, 26 Aug 2011 13:53:19 +0200 R.S. wrote:


I disagree, that means: what's wrong with UID(0) for such scripts?
ServerPac installation is rarely done on live production system ;-)


I've seen plenty of customers with a common (i.e. only one) RACF
database ...


Couldn't they use dedicated userid?
Another idea: to use copy od RACF db, at least temporarily.

--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@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.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Check out Hurricane Irene : Tracking Map : Weather Underground

2011-08-26 Thread Staller, Allan
Do you mean a direct hit on Wash. DC?

snip
_Hurricane  Irene : Tracking Map : Weather Underground_ 
(http://www.wunderground.com/tropical/tracking/at201109.html)  
 
We'll be hoping for the best.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 REXX question

2011-08-26 Thread Roberto Halais
Steve:

Don't knowabout IRXJCL situation  but I use:

//TSOBAT   EXEC  PGM=IKJEFT01,PARM='RXCMD'

where rxcmd is the rexx using isfexec. It works fine.

Roberto

On Fri, Aug 26, 2011 at 7:46 AM, Steve Austin steve.aus...@macro4.comwrote:

 Hello,



 I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the
 ULOG output to be returned in the isfulog. stem. This works fine under
 TSO, but if I run the exec under IRXJCL the command is issued, but no
 output returned in the isfulog. stem.



 Any idea what I'm missing?



 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




-- 
Those who can make you believe religious absurdities, can make you commit
atrocities.  Voltaire

The philosopher has never killed any priests, whereas the priest has
killed a great many philosophers.  Denis Diderot

Men will never be free until the last king is strangled with the entrails
of the last priest. Denis Diderot

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: alter dataset blocksize

2011-08-26 Thread Peter X. DeFabritus
Suggestion: If you are licensed for DFSMSdss, and you want to use a 
system-determined block size:

 COPY DS(INCLUDE(dsn)) +  
 CATALOG DELETE OUTDYN(outvol) ALLDATA(*) REBLOCK(*)

ADRDSSU will preserve the reference date.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Help with an LE problem

2011-08-26 Thread Binyamin Dissen
Nope.

On Fri, 26 Aug 2011 08:02:38 -0400 Sambataro, Anthony (NIH/NBS) [E]
anthony.sambat...@nih.gov wrote:

:Does your application use IMS?
:
:0802
:Explanation: Replace tried to obtain space from space management to replace a 
variable-length segment. The new
:'LL' or minimum 'LL' is greater than the old 'LL'. Therefore, Replace 
requested additional space from space
:management, but received a return code indicating that no more space is 
available in the data set.
:Analysis: This is issued from module DFSDLD00 and can be a standard or a 
pseudoabend.
:Abend 0802 is traced in the Buffer Handler Trace Table in a series of 
entries, each of which is identified by a
:character D (X'C4') in its first byte. This series of entries immediately 
precedes the current entry in the trace table.
:The important field in each trace entry is the second word (offset 4), called 
ENTRY1. This word identifies the abend
:and the routine within the Delete/Replace module that encountered the problem.
:The ENTRY1 word in the first entry of the Delete/Replace abend trace in the 
key shown in the following table:
:Key Description
:43430028 The Replace module issued a space request to lengthen a segment. The 
return code from
:space management indicated no space available.
:Possible cause: A rearrangement of the data set is needed to make free, or 
potentially free space available for access.
:This can be accomplished by an UNLOAD, followed by a reload of the data set.
:System action: The application program terminates abnormally.
:Programmer response: Reorganize the database.
:Problem determination: 17a through 17g, 35
:Source: IMS abends
:0802
:Chapter 5. IMS abend codes 0501 - 1000 355
:
:-Original Message-
:From: Binyamin Dissen [mailto:bdis...@dissensoftware.com] 
:Sent: Friday, August 26, 2011 8:00 AM
:To: IBM-MAIN@bama.ua.edu
:Subject: Re: Help with an LE problem
:
:On Fri, 26 Aug 2011 05:44:05 -0600 Steve Comstock st...@trainersfriend.com
:wrote:
:
::On 8/26/2011 5:36 AM, Binyamin Dissen wrote:
:: Yeah, I know I can try that. What I really do not understand is why I do 
not
:: have registers that match the alleged user abend.
:
:: Also, I cannot find this abend in LE or COBOL.
:
::But it says user abend U 802, so I would suspect
::your code. Do you set any user abends? Or is it
::someone else's code? Are there any condition handlers
::involved here?
:
:So would I.
:
:There are some vendor condition handlers, but would LE mask the real
:condition?
:
:The exception registers are appropriate for the exception PSW which has
:nothing to do with a user abend.
:
:: :From:   Binyamin Dissenbdis...@dissensoftware.com
:: :To: IBM-MAIN@bama.ua.edu
:: :Date:   08/25/2011 02:31 PM
:: :Subject:Help with an LE problem
:: :Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu
:
:: :I have a CEEDUMP with
:
:: : CEE3250C The system or user abend U 802 R=NULL was issued.

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

Director, Dissen Software, Bar  Grill - Israel


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

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

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


Re: SDSF REXX question

2011-08-26 Thread Elardus Engelbrecht
Steve Austin wrote:

I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the ULOG 
output to be returned in the isfulog. stem. This works fine under TSO, but if 
I run the exec under IRXJCL the command is issued, but no output returned in 
the isfulog. stem.

How are you capturing the output into that stem variable?

Please show us the statements used, if possible...

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: Copying file to OMVS

2011-08-26 Thread Angel Tamayo
It works !!!

// PATHMODE=(SIRWXU,SIRGRP,SIROTH),

Thanks a lot John and thank you all for your help and interest.

Angel

2011/8/25 John McKown joa...@swbell.net

 Had a power outage causing a delay in replying. I am an idiot (nothing
 new about that). The owner access is --- which is none. And I noticed
 you did not include the DD parameter
 PATHMODE. Try:

 //SYSUT2 DD PATH='/TEST/COMPRESS9',
 // PATHOPTS=(OWRONLY,OCREAT,OEXCL),
 // PATHMODE=(SIRWXU,SIRGRP,SIROTH),
 // PATHDISP=(KEEP,DELETE)

 The default in JCL if PATHMODE is not specified is no access at all to
 anyone according to:
 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B680/12.48.3

 But you may need to delete the existing file first.

 On Thu, 2011-08-25 at 19:36 -0300, Angel Tamayo wrote:
  The directory /TEST already is 777
 
  Display File Attributes
  Pathname : /TEST
  File type . . . . . . : Directory
  Permissions . . . . . : 777 rwxrwxrwx
 
  and COMPRESS9 is created by the job.
 
  Angel
 
  2011/8/25 jagadishan perumal jagadish...@gmail.com
 
   Hi,
  
   Have your RACF person to provide : CHMOD 777  /TEST/COMPRESS9 to
 execute
   this command in OMVS. Also ask them to change the owner by CHOWN
 command..
   Simple.. then submitting the JCL again
  
   On Thu, Aug 25, 2011 at 6:19 PM, Angel Tamayo a.tamay...@gmail.com
   wrote:
  
Hi List,
   
Maybe someone here could have the same or similar case.
   
I run job:
   
//COPY1 EXEC PGM=IEBGENER,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DISP=SHR,DSN=HLQ.COMPRESS.PAX
//SYSUT2 DD PATH='/TEST/COMPRESS9',
// PATHOPTS=(OWRONLY,OCREAT,OEXCL),
// PATHDISP=(KEEP,DELETE)
//SYSIN DD DUMMY
   
I received message:
   
ICH408I USER(ZOSUSER ) GROUP(OMVSGRP ) NAME(USER NAME)  479
 /TEST/COMPRESS9 CL(FSOBJ   )
FID(38130041)
 INSUFFICIENT AUTHORITY TO
OPEN
 ACCESS INTENT(RW-)  ACCESS ALLOWED(OWNER
---)
 EFFECTIVE UID(000999)  EFFECTIVE GID(01)
   
   
The RACF persons says that I need to have OMVS segment setup for my
   userid
with UID(0).
   
I suppose UID(0) will solve the problem but it is really the only way
 to
solve it?.
I'm looking for a solution without UID(0), any idea on this will be
appreciated.
   
As additional information ZOSUSER have authority to use SU
 (superuser) in
OMVS environment, don't really know if this helps to this case.
   
Angel
   
   
 --
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN
 INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
   
  
   --
   For IBM-MAIN subscribe / signoff / archive access instructions,
   send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
   Search the archives at http://bama.ua.edu/archives/ibm-main.html
  
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
  Search the archives at http://bama.ua.edu/archives/ibm-main.html
 --
 John McKown
 Maranatha! 

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email 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: alter dataset blocksize

2011-08-26 Thread Elardus Engelbrecht
ENRIQUE ELOI wrote:

Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original 
creation date?

Why changing the creation date? Just curious, if you don't mind, please?

(but it shows the NEW creation date = current date)

Of course! This is WAD!

Groete / Greetings
Elardus Engelbrecht

Q: What lies at the bottom of the ocean and twitches?
A: A nervous wreck...

Q: What do you get from a pampered cow?
A: Spoiled milk...

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: alter dataset blocksize

2011-08-26 Thread Staller, Allan
AFAIK, this cannot be done using standard facilities. 
Others have indicated various ways to change the create date after the
fact.

There is an additional way. A program, on the CBT TAPE(www.cbttape.org)
- DMOD. Sorry, I have no idea in which of the 700 plus files to look.

HTH, 

snip
Is there some way to modify the (PO) dataset BLOCKSIZE keeping the
original creation date?

LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation
date=2011/08/11  last ref date=2011/08/15

To alter the blksize, or another dataset specifications, we use this
method :
 1.- create a new library with the correct specifications.
 2.- copy from old to the new.
 3.- remove the old lib.
 3.- rename the new lib.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: EXEC CICS FORMATTIME issue

2011-08-26 Thread Shmuel Metz (Seymour J.)
In 1314301284.8441.yahoomailclas...@web160118.mail.bf1.yahoo.com, on
08/25/2011
   at 12:41 PM, william janulin wjanu...@yahoo.com said:

Not sure if this is the correct forum to post this.

This is a correct list; it's not the only one.

I get the  IGYPS2106-S error. 

Could the translator be case sensitive?
 
-- 
 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: Help with an LE problem

2011-08-26 Thread Hunkeler Peter (KIUP 4)
I guess I will need a real dump, but have no idea how to trap it 
- after all I do not see an abend.

Have you tried EXEC PARM='/TRAP(OFF)' (For Cobol, LE runtime options
are after the /, right?)

TRAP(OFF) disables LE's usual ESPIE and ESTAE. If there is an abend
you should get a dump to either //SYSABEND, /SYSUDUMP, etc.

--
Peter Hunkeler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 REXX question

2011-08-26 Thread Steve Austin
Here is the REXX exec;

rc=isfcalls(ON)   
isfcons = NODDY  /* EMCS console name */  
isfdelay =10 /* WAIT time */  
ADDRESS SDSF ISFEXEC '/D M=CPU' (WAIT VERBOSE)
if isfmsg then  
  say isfmsg
do i2 = 1 to isfmsg2.0 /* loop though messages */   
  say isfmsg2.i2
end 
if rc = 8 then do  
  say Number of ulog rows returned isfulog.0  
  if isfulog.0  1 then do  
do ix=1 to isfulog.0   /* loop through rows */  
  say isfulog.ix
end 
  end   
end 
RC=ISFCALLS(OFF)  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: 26 August 2011 13:25
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF REXX question

Steve Austin wrote:

I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the
ULOG output to be returned in the isfulog. stem. This works fine under
TSO, but if I run the exec under IRXJCL the command is issued, but no
output returned in the isfulog. stem.

How are you capturing the output into that stem variable?

Please show us the statements used, if possible...

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

-

 -
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: Help with an LE problem

2011-08-26 Thread Binyamin Dissen
On Fri, 26 Aug 2011 14:39:22 +0200 Hunkeler Peter (KIUP 4)
peter.hunke...@credit-suisse.com wrote:

:I guess I will need a real dump, but have no idea how to trap it 
:- after all I do not see an abend.

:Have you tried EXEC PARM='/TRAP(OFF)' (For Cobol, LE runtime options
:are after the /, right?)

:TRAP(OFF) disables LE's usual ESPIE and ESTAE. If there is an abend
:you should get a dump to either //SYSABEND, /SYSUDUMP, etc.

There is vendor code that screws with the LE options.

But, the basic point - nothing in the CEEDUMP shows that there was an abend,
other than the message.

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

Director, Dissen Software, Bar  Grill - Israel


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

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

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


Re: SDSF REXX question

2011-08-26 Thread Elardus Engelbrecht
Steve Austin wrote:

Here is the REXX exec;

isfcons = NODDY  

:-D I asked BIGEARS with help and ... :-D

Thanks. I tried it out in TSO / ISPF and also with this JCL:

//ZYX  EXEC PGM=IKJEFT01
//SYSPROC  DD  DISP=SHR,DSN=REXX  
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *   
  PROF NOPREF 
  %SDSF2  

READY   
  %SDSF2
COMMAND ISSUED  
ISF754I Command 'SET CONSOLE NODDY' generated from associated variable ISFCONS. 
ISF754I Command 'SET DELAY 10' generated from associated variable ISFDELAY. 
ISF766I Request completed, status: COMMAND ISSUED.  
NUMBER OF ULOG ROWS RETURNED 34 
  2011238  14:49:24.56 ISF031I CONSOLE NODDY ACTIVATED  
  2011238  14:49:24.56-D M=CPU  
  2011238  14:49:24.57 IEE174I 14.49.24 DISPLAY M
   PROCESSOR STATUS 
   ID  CPU  SERIAL  

Output is shown in SYSTSPRT...

Is this what you wanted? Perhaps I missed something from your original post?

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: alter dataset blocksize

2011-08-26 Thread Dana Mitchell

snip
Is there some way to modify the (PO) dataset BLOCKSIZE keeping the
original creation date?
/snip


Also the great PDS command from cbttape.org  file 182.  

FIXPDS file.name BLKSIZE(1234)

Dana

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 REXX question

2011-08-26 Thread Steve Austin
I too have the REXX exec working under TSO, but I'm trying to get it to
work in batch under IRXJCL.

Thanks

Steve 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: 26 August 2011 13:56
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF REXX question

Steve Austin wrote:

Here is the REXX exec;

isfcons = NODDY  

:-D I asked BIGEARS with help and ... :-D

Thanks. I tried it out in TSO / ISPF and also with this JCL:

//ZYX  EXEC PGM=IKJEFT01
//SYSPROC  DD  DISP=SHR,DSN=REXX  
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD *   
  PROF NOPREF 
  %SDSF2  

READY

  %SDSF2

COMMAND ISSUED

ISF754I Command 'SET CONSOLE NODDY' generated from associated variable
ISFCONS. 
ISF754I Command 'SET DELAY 10' generated from associated variable
ISFDELAY. 
ISF766I Request completed, status: COMMAND ISSUED.

NUMBER OF ULOG ROWS RETURNED 34

  2011238  14:49:24.56 ISF031I CONSOLE NODDY
ACTIVATED  
  2011238  14:49:24.56-D M=CPU

  2011238  14:49:24.57 IEE174I 14.49.24 DISPLAY M

   PROCESSOR STATUS

   ID  CPU
SERIAL  

Output is shown in SYSTSPRT...

Is this what you wanted? Perhaps I missed something from your original
post?

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

-

 -
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: alter dataset blocksize

2011-08-26 Thread Chicklon, Thomas
We all know you can trash a partitioned dataset by writing to one
specifying a different block size. Maybe you can use this to your
advantage.

How about moving all members out to a different library, then use a
batch job to copy them back, specifying the new block size you now want.

Before:

Data Set Name . . . . : E00.JCL.TEMP

 

General Data  Current Allocation

 Management class . . : MCLMNNRAllocated tracks  . : 15

 Storage class  . . . : SCNORM Allocated extents . : 1

  Volume serial . . . : PCF050 Maximum dir. blocks : 15

  Device type . . . . : 3390

 Data class . . . . . : DCDEFALT

  Organization  . . . : POCurrent Utilization

  Record format . . . : FB Used tracks . . . . : 2

  Record length . . . : 80 Used extents  . . . : 1

  Block size  . . . . : 27920  Used dir. blocks  . : 1

  1st extent tracks . : 15 Number of members . : 0

  Secondary tracks  . : 15

  Data set name type  : PDS   Dates

   Creation date . . . : 2011/06/21

   Referenced date . . : 2011/08/26

   Expiration date . . : ***None***


Warnings in IEBCOPY:

IEB1139W THE OUTPUT DATA SET BLOCK SIZE IS BEING REDUCED FROM 27920 TO
800 BYTES.  ANY EXISTING PHYSICAL RECORDS LONGER 
 THAN 800 BYTES ARE FAT BLOCKS AND MAY CAUSE I/O ERRORS.   

After:

Data Set Name . . . . : E00.JCL.TEMP   
   
General Data  Current Allocation   
 Management class . . : MCLMNNRAllocated tracks  . : 15
 Storage class  . . . : SCNORM Allocated extents . : 1 
  Volume serial . . . : PCF050 Maximum dir. blocks : 15
  Device type . . . . : 3390   
 Data class . . . . . : DCDEFALT   
  Organization  . . . : POCurrent Utilization  
  Record format . . . : FB Used tracks . . . . : 2 
  Record length . . . : 80 Used extents  . . . : 1 
  Block size  . . . . : 800Used dir. blocks  . : 1 
  1st extent tracks . : 15 Number of members . : 4 
  Secondary tracks  . : 15 
  Data set name type  : PDS   Dates
   Creation date . . . : 2011/06/21
   Referenced date . . : 2011/08/26
   Expiration date . . : ***None***

 
Tom Chicklon



Hi,

Is there some way to modify the (PO) dataset BLOCKSIZE keeping the
original creation date?

LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation
date=2011/08/11  last ref date=2011/08/15

To alter the blksize, or another dataset specifications, we use this
method :
 1.- create a new library with the correct specifications.
 2.- copy from old to the new.
 3.- remove the old lib.
 3.- rename the new lib.

(but it shows the NEW creation date = current date)

I want to know how to alter its blocksize or to alter the creation date.

Happy week end,
 
 
Enrique Montero 


This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 REXX question

2011-08-26 Thread Ted MacNEIL
I too have the REXX exec working under TSO, but I'm trying to get it to work 
in batch under IRXJCL.

Why?
If it works don't break it.
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 REXX question

2011-08-26 Thread Elardus Engelbrecht
Steve Austin wrote:

I too have the REXX exec working under TSO, but I'm trying to get it to work 
in batch under IRXJCL.

Will this (tested before posting) one be suitable for you?

//STEP1EXEC PGM=IRXJCL,PARM='SDSF2'   
//SYSTSPRT DD   SYSOUT=*  
//SYSEXEC  DD   DSN=REXX,DISP=SHR 

I have used your posted example successfully for this JCL.

If not desired solution, could you be kind to tell us how you want to use 
IRXJCL?

Groete / Greetings
Elardus Engelbrecht


Q: What’s black and brown and looks good on an attorney?
 
A: A Doberman pinscher.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 REXX question

2011-08-26 Thread Mark Zelden
On Fri, 26 Aug 2011 12:46:12 +0100, Steve Austin steve.aus...@macro4.com 
wrote:

Hello,

 

I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the
ULOG output to be returned in the isfulog. stem. This works fine under
TSO, but if I run the exec under IRXJCL the command is issued, but no
output returned in the isfulog. stem.

 

Run it under the TMP in batch (TSO) instead of IRXJCL (IKJEFT01 / IKJEFT1A / 
IKJEFT1B).

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.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: SDSF REXX question

2011-08-26 Thread Steve Austin
Thanks,

Yes that is exactly what I want, but it is not working for me here. I
suspect an environmental problem of some sort; possibly something in
ISFPRMxx. 

Here is the REXX group in my ISPPRMxx. Can you see anything different to
yours?

/*/   
/* GROUP ISFREXX - Rexx Users*/   
/*/   
 GROUP NAME(ISFREXX),/* Group name  */
 IUID(ISFREXX),  /* Iuid*/
 ACTION(ALL),/* All route codes displayed   */
 ACTIONBAR(YES), /* Display action bar on panels*/
 APPC(ON),   /* Include APPC sysout */
 AUPDT(2),   /* Minimum auto update interval*/
 AUTH(I,O,H,DA,PREF,SE,SR,ST),   /* Authorized functions*/
 CMDAUTH(ALL),   /* Commands allowed for all jobs   */
 CMDLEV(7),  /* Authorized command level*/
 CONFIRM(ON),/* Enable cancel confirmation  */
 CURSOR(ON), /* Leave cursor on last row processed  */
 DADFLT(IN,OUT,TRANS,STC,TSU,JOB),  /* Default rows shown on DA */
 DATE(MMDD), /* Default date format */
 DATESEP('/'),   /* Default datesep format  */
 DISPLAY(OFF),   /* Do not display current values   */
 DSPAUTH(USERID,NOTIFY,AMSG),  /* Browse authority  */
 GPLEN(2),   /* Group prefix length */
 ILOGCOL(1), /* Initial display column in log   */
 ISYS(NONE), /* Initial system default for DA   */
 LANG(ENGLISH),  /* Default language*/
 LOGOPT(OPERACT),/* Default log option  */
 OWNER(NONE),/* Default owner   */
 UPCTAB(TRTAB2), /* Upper case translate table name */
 VALTAB(TRTAB),  /* Valid character translate table */
 VIO(SYSALLDA)   /* Unit name for page mode output  */
  
  NTBL NAME(ISFREXX)  
NTBLENT STRING(SA2)   

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: 26 August 2011 14:12
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF REXX question

Steve Austin wrote:

I too have the REXX exec working under TSO, but I'm trying to get it to
work in batch under IRXJCL.

Will this (tested before posting) one be suitable for you?

//STEP1EXEC PGM=IRXJCL,PARM='SDSF2'   
//SYSTSPRT DD   SYSOUT=*  
//SYSEXEC  DD   DSN=REXX,DISP=SHR 

I have used your posted example successfully for this JCL.

If not desired solution, could you be kind to tell us how you want to
use IRXJCL?

Groete / Greetings
Elardus Engelbrecht


Q: What's black and brown and looks good on an attorney?
 
A: A Doberman pinscher.

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

 

-
This email has been scanned for all known viruses by the MessageLabs
Email
Security Service and the Macro 4 internal virus protection system.
 

-

 -
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: SDSF REXX question

2011-08-26 Thread Pinnacle

On 8/26/2011 7:46 AM, Steve Austin wrote:

Hello,



I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the
ULOG output to be returned in the isfulog. stem. This works fine under
TSO, but if I run the exec under IRXJCL the command is issued, but no
output returned in the isfulog. stem.



Any idea what I'm missing?





Steve,

I haven't run a test, but I'm pretty sure that SDSF requires TSO in 
order to function.  We normally run it in ISPF, but you can also run it 
with TSO SDSF.  IRXJCL only works for Rexx execs that don't require TSO 
services.


Regards,
Tom Conley

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: alter dataset blocksize

2011-08-26 Thread Mark Zelden
On Fri, 26 Aug 2011 13:50:24 +0200, MONTERO ROMERO, ENRIQUE ELOI 
enriqueeloi.mont...@servifactory.com wrote:

Hi,

Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original 
creation date?

LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11  
last ref date=2011/08/15

To alter the blksize, or another dataset specifications, we use this method :
 1.- create a new library with the correct specifications.
 2.- copy from old to the new.
 3.- remove the old lib.
 3.- rename the new lib.

(but it shows the NEW creation date = current date)

I want to know how to alter its blocksize or to alter the creation date.

Happy week end,


Enrique Montero


I'm always surprised when this question comes up, because we talk about the best
tool for this sort of thing often.   The freeware PDS command (currently 
PDS86).  
Do yourself a favor and download / install it from http://www.cbttape.org. File 
182.

Another tool on the CBT that will do this is (and a few things PDS86 can't) is
CDSCB (File 300).  Some functions of CDSCB need to be APF authorized.

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.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: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Mark Zelden
On Fri, 26 Aug 2011 13:56:02 +0200, Alvaro Guirao Lopez 
alvarogui...@gmail.com wrote:

I have IEFUSI at LPA but I do not know if the EXIT is limiting REGION=0M, I
just tried with REGION=20M but fails again...

Any way to see IEFUSI work?

2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com

 106-0C is region. Do you have an IEFUSI which is limiting your REGION=0M?


It does look like a region size issue.

What I have done to see the effects of IEFUSI is to use my REXXSTOR exec.
See my web site for the exec and sample JCL (REXXSTOJ) to execute it with 
various
region sizes and see the results.

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.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: SDSF REXX question

2011-08-26 Thread Mark Zelden

I haven't run a test, but I'm pretty sure that SDSF requires TSO in
order to function.  We normally run it in ISPF, but you can also run it
with TSO SDSF.  IRXJCL only works for Rexx execs that don't require TSO
services.

SDSF is batch generally doesn't require TSO and IRKJCL is fine.  However,
ULOG probably does.

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.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: SDSF REXX question

2011-08-26 Thread Elardus Engelbrecht
Steve Austin wrote:

Yes that is exactly what I want, but it is not working for me here.

Ouch. More painful than a bored attorney's fee... :-D

 I suspect an environmental problem of some sort; possibly something in 
 ISFPRMxx.

Perhaps. Try these lines just before your own ADDRESS SDSF ISFEXEC for some 
diagnostics.

ADDRESS SDSF ISFEXEC  WHO   
DO IX=1 TO ISFRESP.0 
  SAY ISFRESP.IX IS: ISFRESP.IX  
END  

Then compare the results to see what is the difference for your TSO and Batch 
execution.

You may need extra access permission in ISFPRMxx or in RACF.

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: SDSF REXX question

2011-08-26 Thread Mark Zelden
On Fri, 26 Aug 2011 08:35:46 -0500, Mark Zelden m...@mzelden.com wrote:


I haven't run a test, but I'm pretty sure that SDSF requires TSO in
order to function.  We normally run it in ISPF, but you can also run it
with TSO SDSF.  IRXJCL only works for Rexx execs that don't require TSO
services.

SDSF is batch generally doesn't require TSO and IRKJCL is fine.  However,
ULOG probably does.


I didn't really mean SDSF is batch.  That would be PGM=SDSF or PGM=ISFAFD.

Of course I was referring to the REXX API  since that was the subject of this
thread.   I also forgot to mention my SDSF@DR example on my web site 
which I run using PGM=IRXJCL (sample JCL is in the source).

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.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: Copying file to OMVS

2011-08-26 Thread McKown, John
I should have caught that the first time, rather than going on the wild goose 
chase. Too many weekends at work doing file conversions by myself then catching 
hell on Monday from arm-chair coaches who couldn't be bothered to attend any 
meetings or do any work.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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

 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Angel Tamayo
 Sent: Friday, August 26, 2011 7:26 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Copying file to OMVS
 
 It works !!!
 
 // PATHMODE=(SIRWXU,SIRGRP,SIROTH),
 
 Thanks a lot John and thank you all for your help and interest.
 
 Angel
 
 2011/8/25 John McKown joa...@swbell.net
 
  Had a power outage causing a delay in replying. I am an 
 idiot (nothing
  new about that). The owner access is --- which is none. 
 And I noticed
  you did not include the DD parameter
  PATHMODE. Try:
 
  //SYSUT2 DD PATH='/TEST/COMPRESS9',
  // PATHOPTS=(OWRONLY,OCREAT,OEXCL),
  // PATHMODE=(SIRWXU,SIRGRP,SIROTH),
  // PATHDISP=(KEEP,DELETE)
 
  The default in JCL if PATHMODE is not specified is no 
 access at all to
  anyone according to:
  
 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA
 2B680/12.48.3
 
  But you may need to delete the existing file first.
 
  On Thu, 2011-08-25 at 19:36 -0300, Angel Tamayo wrote:
   The directory /TEST already is 777
  
   Display File Attributes
   Pathname : /TEST
   File type . . . . . . : Directory
   Permissions . . . . . : 777 rwxrwxrwx
  
   and COMPRESS9 is created by the job.
  
   Angel
  
   2011/8/25 jagadishan perumal jagadish...@gmail.com
  
Hi,
   
Have your RACF person to provide : CHMOD 777  /TEST/COMPRESS9 to
  execute
this command in OMVS. Also ask them to change the owner by CHOWN
  command..
Simple.. then submitting the JCL again
   
On Thu, Aug 25, 2011 at 6:19 PM, Angel Tamayo 
 a.tamay...@gmail.com
wrote:
   
 Hi List,

 Maybe someone here could have the same or similar case.

 I run job:

 //COPY1 EXEC PGM=IEBGENER,REGION=0M
 //SYSPRINT DD SYSOUT=*
 //SYSUT1 DD DISP=SHR,DSN=HLQ.COMPRESS.PAX
 //SYSUT2 DD PATH='/TEST/COMPRESS9',
 // PATHOPTS=(OWRONLY,OCREAT,OEXCL),
 // PATHDISP=(KEEP,DELETE)
 //SYSIN DD DUMMY

 I received message:

 ICH408I USER(ZOSUSER ) GROUP(OMVSGRP ) NAME(USER NAME 
)  479
  /TEST/COMPRESS9 CL(FSOBJ   )
 FID(38130041)
  INSUFFICIENT AUTHORITY TO
 OPEN
  ACCESS INTENT(RW-)  ACCESS ALLOWED(OWNER
 ---)
  EFFECTIVE UID(000999)  EFFECTIVE GID(01)


 The RACF persons says that I need to have OMVS 
 segment setup for my
userid
 with UID(0).

 I suppose UID(0) will solve the problem but it is 
 really the only way
  to
 solve it?.
 I'm looking for a solution without UID(0), any idea 
 on this will be
 appreciated.

 As additional information ZOSUSER have authority to use SU
  (superuser) in
 OMVS environment, don't really know if this helps to 
 this case.

 Angel


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

   

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

Not mainframe, but interesting - 120 PetaByte DASD cluster

2011-08-26 Thread McKown, John
http://www.extremetech.com/computing/94082-ibm-builds-120-petabyte-cluster-made-out-of-20-hard-drives

quote
Smashing all known records by a multiple of 10, IBM Research Almaden, 
California, has developed hardware and software technologies that will allow it 
to strap together 200,000 hard drives to create a single storage cluster of 120 
petabytes - or 120 million gigabytes. The drive collective, when it is 
complete, is expected to store one trillion files - or to put it in Apple 
terms, two billion hours of MP3 music.
/quote

John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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


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


Re: CSA and SQA problem

2011-08-26 Thread Richard L Peurifoy

On 8/25/2011 1:21 PM, Staller, Allan wrote:

The manual previously cited does not state either case (pro or con)
clearly under the discussion of the INITSQA parameter.

My understanding was that this parameter was used to increase the
initial allocation until the SQA parameters of IEASYSxx were processed.
At that time the allocation would be included in the full
initialization. See quote and references below.


The initial ESQA is not replaced by the SQA parm in IEASYSxx, but
is added to. To verify this, I changed the INITSQA value in my sandbox
and IPL'd. The new ESQA after the system was up was increased by the
amount I increased INITSQA by.

--
Richard

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


Re: Check out Hurricane Irene : Tracking Map : Weather Underground

2011-08-26 Thread Ed Finnell
Nope. Apolitical on IBM-Main, I've still got friends and family in  D.C. 
area. 
 
 
In a message dated 8/26/2011 7:10:29 A.M. Central Daylight Time,  
allan.stal...@kbmg.com writes:

Do you  mean a direct hit on Wash.  DC?



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 REXX question

2011-08-26 Thread Steve Austin
Yes that helped identify the problem. I changed group AUTH parameter
from AUTH(I,O,H,DA,PREF,SE,SR,ST) to AUTH(ALL) and now all works as I
hoped.

Thanks

Steve 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: 26 August 2011 14:40
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF REXX question

Steve Austin wrote:

Yes that is exactly what I want, but it is not working for me here.

Ouch. More painful than a bored attorney's fee... :-D

 I suspect an environmental problem of some sort; possibly something in
ISFPRMxx.

Perhaps. Try these lines just before your own ADDRESS SDSF ISFEXEC for
some diagnostics.

ADDRESS SDSF ISFEXEC  WHO   
DO IX=1 TO ISFRESP.0 
  SAY ISFRESP.IX IS: ISFRESP.IX  
END  

Then compare the results to see what is the difference for your TSO and
Batch execution.

You may need extra access permission in ISFPRMxx or in RACF.

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

-

 -
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: Help with an LE problem

2011-08-26 Thread Skip Robinson
An ESTAE routine has the power to suppress any indication of abend, 
including a return code of zero if that's what it wants to do. The point 
of a SLIP trap is that the operating system intervenes ahead of any 
internal ESTAE action and tells you what happened *first*. 

.
.
JO.Skip Robinson
SCE Infrastructure Technology Services
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   Binyamin Dissen bdis...@dissensoftware.com
To: IBM-MAIN@bama.ua.edu
Date:   08/26/2011 05:51 AM
Subject:Re: Help with an LE problem
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



On Fri, 26 Aug 2011 14:39:22 +0200 Hunkeler Peter (KIUP 4)
peter.hunke...@credit-suisse.com wrote:

:I guess I will need a real dump, but have no idea how to trap it 
:- after all I do not see an abend.

:Have you tried EXEC PARM='/TRAP(OFF)' (For Cobol, LE runtime options
:are after the /, right?)

:TRAP(OFF) disables LE's usual ESPIE and ESTAE. If there is an abend
:you should get a dump to either //SYSABEND, /SYSUDUMP, etc.

There is vendor code that screws with the LE options.

But, the basic point - nothing in the CEEDUMP shows that there was an 
abend,
other than the message.

--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.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: COPY commands under JCL vs. under Unix System Services

2011-08-26 Thread Henrique Seganfredo
Folks,

The suggestion made by Mark did work here fine.

I just added a new DD cards that sets some environment variables that control 
the way new processes are started under BPXBATCH.

//STDENV   DD * 
_BPX_SHAREAS=YES
_BPX_SPAWN_SCRIPT=YES

This made the JCL run fine.

One thing to note, I tried to set this variables inside of my Unix script 
Copy.sh (export _BPX_SHAREAS=YES...) and it did not work.

Thanks for the feedback folks!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED

2011-08-26 Thread Shmuel Metz (Seymour J.)
In
CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=g...@mail.gmail.com,
on 08/26/2011
   at 01:22 PM, Alvaro Guirao Lopez alvarogui...@gmail.com said:

I'm had assembled some exits and I'm trying to apply as USERMOD into
SMP when I had this memory abend, the error is at LNKLST so I cannot
increase it REGION,

Why not?

maybe increasing CSA at IEASYS??

How is CSA relevant? Were you trying to replace an LPA module?
 
-- 
 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: CSA and SQA problem

2011-08-26 Thread Staller, Allan
Thank you for the update. I learned something new today.

snip
On 8/25/2011 1:21 PM, Staller, Allan wrote:
 The manual previously cited does not state either case (pro or con)
 clearly under the discussion of the INITSQA parameter.

 My understanding was that this parameter was used to increase the
 initial allocation until the SQA parameters of IEASYSxx were
processed.
 At that time the allocation would be included in the full
 initialization. See quote and references below.

The initial ESQA is not replaced by the SQA parm in IEASYSxx, but
is added to. To verify this, I changed the INITSQA value in my sandbox
and IPL'd. The new ESQA after the system was up was increased by the
amount I increased INITSQA by.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Help with an LE problem

2011-08-26 Thread Shmuel Metz (Seymour J.)
In 4e578705.1090...@trainersfriend.com, on 08/26/2011
   at 05:44 AM, Steve Comstock st...@trainersfriend.com said:

But it says user abend U 802, so I would suspect
your code.

Why? For half a century the run-time libraries for language processors
have been issuing documented user ABEND's.

I read the message as saying that LE issued an ABEND U802 after
interceptins an ABEND S322. Or is LE giving the user ABEND code in
*both* hex and decimal? Nornal pracrivwe is to use decimal for user
codes and hex for system codes.
 
-- 
 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: SDSF REXX question

2011-08-26 Thread Shmuel Metz (Seymour J.)
In
d3571c7d425590479eb3adb197bfc47b01133...@m4ukex02.intranet.macro4.com,
on 08/26/2011
   at 12:46 PM, Steve Austin steve.aus...@macro4.com said:

Any idea what I'm missing?

Off the top of my head, SDSF can run either as a stand-alone TSO
command or as an ISPF facility. There are differences in behavior
depending on how you run it. How did you invoke ISPF under TSO? Does
it work the other way?

There's also the issue that IRXJCL doesn't establish a TSO environment
at all. Perhaps you need to tun under IKJEFT01.
 
-- 
 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


SMS and Not Cataloged Datasets

2011-08-26 Thread Donnelly, John P
Good FRIDAY morning,

In our SMS world of storage we have encountered not cataloged datasets which, 
when deleted through ISPF 3.4 list, or IDCAMS, or IEHPROGM, have created some 
unusual results.

In an ISPF 3.4 list specifying the datasetname and the specific volume serial 
number where the not cataloged dataset resides has resulted in the cataloged 
version of the dataset being uncataloged and not deleted.

These datasets turn up not cataloged because of statements in our production 
JCL which specify things like NOSCRATCH NOERASE for a simple dataset.

An IEHPROGM execution returns:

X'04'


 X'06'


 X'00'


 X'1E'


 Verification of SMS flags failed; caller
 indicates the data set is not cataloged,
 but the FMT1 DSCB indicates the data set
 is cataloged.

Our question is,  how do we delete these not cataloged datasets?


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: SMS and Not Cataloged Datasets

2011-08-26 Thread Staller, Allan
1) Rename cataloged version of the dataset
2) DEF NVSAM or DEF RECATALOG as appropriate
3) Delete
4) Rename verision In step 1 back to original name

Alternative:
DEL 'dsn' (VVR or NVR) file(DD1)

VVR - VSAM
NVR - Non-VSAM
DD1 volser in question

HTH,

snip
In an ISPF 3.4 list specifying the datasetname and the specific volume
serial number where the not cataloged dataset resides has resulted in
the cataloged version of the dataset being uncataloged and not deleted.

These datasets turn up not cataloged because of statements in our
production JCL which specify things like NOSCRATCH NOERASE for a simple
dataset.

Snippage

Our question is,  how do we delete these not cataloged datasets?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: SMS and Not Cataloged Datasets

2011-08-26 Thread Starr, Alan
Hello,

The following JCL shows an example

//IDCAMSEXEC PGM=IDCAMS   
//SYSPRINT   DD SYSOUT=*  
//POOP   DD DISP=SHR,UNIT=3390,VOL=SER=volser 
 DELETE dsn   FILE(POOP)   +
   VVRCAT(catalog.name)   

If no entry exists in the volume's VVDS (unlikely), change VVR to TRUENAME. You 
may need to add FORCE or PURGE if IDCAMS squawks.

Cheers,
Alan 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Donnelly, John P
Sent: Friday, August 26, 2011 10:32 AM
To: IBM-MAIN@bama.ua.edu
Subject: SMS and Not Cataloged Datasets

Good FRIDAY morning,

In our SMS world of storage we have encountered not cataloged datasets which, 
when deleted through ISPF 3.4 list, or IDCAMS, or IEHPROGM, have created some 
unusual results.

In an ISPF 3.4 list specifying the datasetname and the specific volume serial 
number where the not cataloged dataset resides has resulted in the cataloged 
version of the dataset being uncataloged and not deleted.

These datasets turn up not cataloged because of statements in our production 
JCL which specify things like NOSCRATCH NOERASE for a simple dataset.

An IEHPROGM execution returns:

X'04'


 X'06'


 X'00'


 X'1E'


 Verification of SMS flags failed; caller  indicates the data 
set is not cataloged,  but the FMT1 DSCB indicates the data set  is cataloged.

Our question is,  how do we delete these not cataloged datasets?


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: SMS and Not Cataloged Datasets

2011-08-26 Thread Mike Schwab
TSO I (ISMF) 1 (datasets)
Specify dataset name and volser.
Delete.  It will display the dataset, volser, and that the dataset is
not cataloged.  Will delete.

Also a IEFBR14 with DSN,UNIT,VOL=SER= and DISP=(OLD,DELETE)

On Fri, Aug 26, 2011 at 12:31 PM, Donnelly, John P
john.p.donne...@nsc.com wrote:
 Good FRIDAY morning,

 In our SMS world of storage we have encountered not cataloged datasets which, 
 when deleted through ISPF 3.4 list, or IDCAMS, or IEHPROGM, have created some 
 unusual results.

 In an ISPF 3.4 list specifying the datasetname and the specific volume serial 
 number where the not cataloged dataset resides has resulted in the cataloged 
 version of the dataset being uncataloged and not deleted.

 These datasets turn up not cataloged because of statements in our production 
 JCL which specify things like NOSCRATCH NOERASE for a simple dataset.

 An IEHPROGM execution returns:

 X'04'


                 X'06'


                 X'00'


                 X'1E'


                 Verification of SMS flags failed; caller
  indicates the data set is not cataloged,
  but the FMT1 DSCB indicates the data set
  is cataloged.

 Our question is,  how do we delete these not cataloged datasets?


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




-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: Copying file to OMVS

2011-08-26 Thread Ed Gould
 Radoslaw:

I have never done a server PAC install on any thing other than a production 
systems. That meaning production jobs along side the serv PAC jobs.

I have been doing servpac installs since day one of serv pacs. The same thing 
goes for CBIPO and CBPDO installs. 

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


DFHSM QUESTION - PRIMARY,SECONDARY INTERVAL SPACE MGMT.

2011-08-26 Thread willie bunter
Good Day To All,
 
I have noticed that a storage pool has dsns which go back to 2 months even 
thought the management class is set to 3 days.  On this partition we have HSM 
running however there is no ML2 migration, however migration is turned on :
Auto Migrate . . Y  (Y, N, I or P) 
Auto Backup  . . Y  (Y or N)   
Auto Dump  . . . N  (Y or N)   
Overflow . . . . N  (Y or N)   

 PRIMARY, SECONDARY  INTERVAL SPACE management kicks off at the designated 
times.
Could it be that space management is ignoring some of the volumes in the pool 
because of the migration threshold?  This is what it is set to:
 
Allocation/migration Threshold : High . . 75  (1-99)  Low  . . 3   
(0-99) 
Alloc/Migr Threshold Track-Managed:  High . . 85  (1-99)  Low  . . 1   (0-99) 
 
Below are the Expiration Attributes of this management class:
   
  Expire after Days Non-usage  . : 3   
  Expire after Date/Days . . . . : 3   
  Retention Limit  . . . . . . . : 0   

If this is the case (migration threshold) how could I have HSM perform a clean 
up of these datasets which are over 3 days old?  If this is not the case could 
someone tell me where else I should look?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: DFHSM QUESTION - PRIMARY,SECONDARY INTERVAL SPACE MGMT.

2011-08-26 Thread Mike Schwab
Until a volume goes above the high threshold, it is not examined for
datasets to migrate.  Reduce the high threshold.

On Fri, Aug 26, 2011 at 1:05 PM, willie bunter williebun...@yahoo.com wrote:
 Good Day To All,

 I have noticed that a storage pool has dsns which go back to 2 months even 
 thought the management class is set to 3 days.  On this partition we have HSM 
 running however there is no ML2 migration, however migration is turned on :
 Auto Migrate . . Y  (Y, N, I or P)
 Auto Backup  . . Y  (Y or N)
 Auto Dump  . . . N  (Y or N)
 Overflow . . . . N  (Y or N)

  PRIMARY, SECONDARY  INTERVAL SPACE management kicks off at the designated 
 times.
 Could it be that space management is ignoring some of the volumes in the pool 
 because of the migration threshold?  This is what it is set to:

 Allocation/migration Threshold : High . . 75  (1-99)  Low  . . 
 3   (0-99)
 Alloc/Migr Threshold Track-Managed:  High . . 85  (1-99)  Low  . . 1   (0-99)

 Below are the Expiration Attributes of this management class:

   Expire after Days Non-usage  . : 3
   Expire after Date/Days . . . . : 3
   Retention Limit  . . . . . . . : 0

 If this is the case (migration threshold) how could I have HSM perform a 
 clean up of these datasets which are over 3 days old?  If this is not the 
 case could someone tell me where else I should look?


-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: DFHSM QUESTION - PRIMARY,SECONDARY INTERVAL SPACE MGMT.

2011-08-26 Thread Staller, Allan
Check the migration log. There are many possible reasons for a dataset not to 
migrate.

ARC0734I present you with a return code and reason code for each action taken.
Lookup the ARC0734I will refer you to another ARC12xx or ARC13xx message that 
contains the detailed explanation based to the return and reason codes.

Common retcodes that show up in my shot are 8, 37, 19, 20,  99
8 - dataset too large for  ML1 migration
37 - insufficient space on ML1 for dataset
19 - data set in use
20 - invalid file (usually a null file or invalid dsorg)
99 - other, in my case the other sysprog APF auths a personal dataset for 
testing.


HTH,

snip
I have noticed that a storage pool has dsns which go back to 2 months even 
thought the management class is set to 3 days.  On this partition we have HSM 
running however there is no ML2 migration, however migration is turned on :
Auto Migrate . . Y  (Y, N, I or P) 
Auto Backup  . . Y  (Y or N)   
Auto Dump  . . . N  (Y or N)   
Overflow . . . . N  (Y or N)   

 PRIMARY, SECONDARY  INTERVAL SPACE management kicks off at the designated 
times.
Could it be that space management is ignoring some of the volumes in the pool 
because of the migration threshold?  This is what it is set to:
 
Allocation/migration Threshold : High . . 75  (1-99)  Low  . . 3   
(0-99) 
Alloc/Migr Threshold Track-Managed:  High . . 85  (1-99)  Low  . . 1   (0-99) 
 
Below are the Expiration Attributes of this management class:
   
  Expire after Days Non-usage  . : 3   
  Expire after Date/Days . . . . : 3   
  Retention Limit  . . . . . . . : 0   

If this is the case (migration threshold) how could I have HSM perform a clean 
up of these datasets which are over 3 days old?  If this is not the case could 
someone tell me where else I should look?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: SMS and Not Cataloged Datasets

2011-08-26 Thread Ted MacNEIL
These datasets turn up not cataloged because of statements in our production 
JCL which specify things like NOSCRATCH NOERASE for a simple dataset.

I would change the JCL.
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Help with an LE problem

2011-08-26 Thread Tom Marchant
On Fri, 26 Aug 2011 07:16:18 -0400, Sambataro, Anthony wrote:

Is not the original abend a S322(CPU timeout)?

No.  ABEND code: 0322 Reason code:  is what LE said.  The 322 in 
bits 20-31 
is the user abend code, decimal 802.  System abend codes are in bits 8-19.  
Also, the 
DUMP bit is not set, so it is unlikely that any attempt to circumvent LE's 
ESTAEX would 
provide any useful information. I would go with Skip's suggestion or try to 
trap a U0802 abend 
in the job.

-- 
Tom Marchant


-Original Message-
From: Skip Robinson [mailto:jo.skip.robin...@sce.com]
Sent: Thursday, August 25, 2011 6:01 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Help with an LE problem

I've had good luck with COBOL problems by setting a NONPER SLIP trap with
no abend code specified. Just job name. SLIP is supposed to catch the
first abend--before any ESTAE gets control--and produce an SVC dump for
that abend.

.
.
JO.Skip Robinson
SCE Infrastructure Technology Services
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   Binyamin Dissen bdis...@dissensoftware.com
To: IBM-MAIN@bama.ua.edu
Date:   08/25/2011 02:31 PM
Subject:Help with an LE problem
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



I have a CEEDUMP with

CEE3250C The system or user abend U 802 R=NULL was issued.

   ABEND code: 0322 Reason code: 

CIB:

   +00 000F37F8  C3C9C240   010C0004  
 00040CB2 61C3C5C5  |CIB /CEE|
   +20 000F3818  000B 000F3908 00040CB2 61C3C5C5  000B
 000EF1C8 C0D68988  |/CEE..1H.Oih|
   +40 000F3838   000F1BF8 43D7CADC 000EC478  0005
000EF2B8    |...8.PD...2.|
   +60 000F3858       
    ||
   +80 000F3878 - +9F 000F3897 same as above
   +A0 000F3898       80015000
0322    |...|
   +C0 000F38B8   43D78DFC 000F1BF8 000F1BF8  43D7CADC
  0001  |.P.8...8.P..|
   +E0 000F38D8  000EF1C8 0005 0064 FFFC  0001
  000E98D0  |..1H..q.|
   +000100 000F38F8  0012 000EC690    E9D4C3C8
0201 43D08008   |..F.ZMCH|

But the neither the PSW nor the registers are consistent with this abend.
The
registers and PSW are consistent with the Exception location.

The ZMCH block has the exception information.

It is a COBOL program compiled with THREAD.

I guess I will need a real dump, but have no idea how to trap it - after
all I
do not see an abend.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: SMS and Not Cataloged Datasets

2011-08-26 Thread Lizette Koehler
 Good FRIDAY morning,
 
 In our SMS world of storage we have encountered not cataloged datasets
which, when
 deleted through ISPF 3.4 list, or IDCAMS, or IEHPROGM, have created some
unusual
 results.
 
 In an ISPF 3.4 list specifying the datasetname and the specific volume
serial number
 where the not cataloged dataset resides has resulted in the cataloged
version of the
 dataset being uncataloged and not deleted.


My favorite is using DFDSS to do this.  Using PARM='TYPRUN=NORUN' will list
all files that meet the criteria.  

//*   
//*  LIST DATA SETS NOT CATALOGED ON A VOLUME 
//*   
//NOCAT   EXEC  PGM=ADRDSSU,PARM='TYPRUN=NORUN'   
//SYSPRINT DD SYSOUT=*   
//OUTPUT   DD DUMMY   
//SYSIN   DD *   
DUMP DS (BY ((CATLG EQ NO))) -   
 INDYNAM(   -
 (11) , - 
 (22) , - 
 (33) , - 
 (..) , - 
 (..) , - 
 (..) , -   
 (nn)   -
)  ODD(OUTPUT)  

You can backup the files and then restore them if needed.  To delete you
would add a DELETE PURGE to the control cards.

Lizette

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


Inforpac RDS to Treev OVS

2011-08-26 Thread gsg
Is anyone familar with these products?  We might convert from RDS to OVS, but 
are not sure how to convert the archives.  Has anyone had to do this?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: SMS and Not Cataloged Datasets

2011-08-26 Thread Gibney, Dave
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of Ted MacNEIL
 Sent: Friday, August 26, 2011 11:33 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: SMS and Not Cataloged Datasets
 
 These datasets turn up not cataloged because of statements in our
 production JCL which specify things like NOSCRATCH NOERASE for a simple
 dataset.
 
 I would change the JCL.

I have to agree, I have trouble thinking of an excuse for routine NOSCRATCH 
NOERASE even back when. In an SMS world, it just doesn't make sense and I would 
take measures to stop it if I found it here.

Dave Gibney
Information Technology Services
Washington State University

 -
 Ted MacNEIL
 eamacn...@yahoo.ca
 Twitter: @TedMacNEIL
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email 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


Trouble with testcase.boulder.ibm.com

2011-08-26 Thread Dana Mitchell
Has anyone had trouble today trying to send data to testcase.boulder.ibm.com?   
It won't let anonymous sign on for me.

Sitting here on hold enjoying music, waiting to ask IBM about it.

Dana

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Trouble with testcase.boulder.ibm.com

2011-08-26 Thread Srivastava, Rajesh
I did encounter problem with testcase.boulder.ibm.com an hour ago.
Use ftp.ecurep.ibm.com  instead of testcase.boulder.ibm.com. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Dana Mitchell
Sent: Friday, August 26, 2011 3:23 PM
To: IBM-MAIN@bama.ua.edu
Subject: Trouble with testcase.boulder.ibm.com

Has anyone had trouble today trying to send data to
testcase.boulder.ibm.com?   It won't let anonymous sign on for me.

Sitting here on hold enjoying music, waiting to ask IBM about it.

Dana

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html
Please visit our website at 
http://financialservicesinc.ubs.com/wealth/E-maildisclaimer.html 
for important disclosures and information about our e-mail 
policies. For your protection, please do not transmit orders 
or instructions by e-mail or include account numbers, Social 
Security numbers, credit card numbers, passwords, or other 
personal information.

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


Re: Copying file to OMVS

2011-08-26 Thread Shmuel Metz (Seymour J.)
In 20110826214422.6ca4399d@xpfs, on 08/26/2011
   at 09:44 PM, Shane ibm-m...@tpg.com.au said:

For example, for way too long it was a requirement to run the
ServerPac scripts as UID 0.

I believe that derived from an SMP/E limitation, now lifted.

There was a recent thread re security in the *nix world. Cast not
your stones - the initial OE/OMVS/USS security model was appalling.

The initial OE implementation was appalling, period. That's true from
both an MVS perspective and a Unix perspective.
 
-- 
 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: Copying file to OMVS

2011-08-26 Thread Shmuel Metz (Seymour J.)
In 4e57892f.4060...@bremultibank.com.pl, on 08/26/2011
   at 01:53 PM, R.S. r.skoru...@bremultibank.com.pl said:

I disagree, that means: what's wrong with UID(0) for such scripts? 

Plenty, over and above violating the principle of least privilege.

In another life I had RACF special and had free reign as long as I
sent an e-mail explaining what I had done and why. The SOB with RACF
special wouldn't give me UID(0) for my normal userid ;-)
 
-- 
 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: ICEGENER and VSAM

2011-08-26 Thread Rick Fochtman

---snip--
Can anyone confirm for me if ICEGENER when used to copy to a VSAM 
cluster (SYSUT2) will preserve the CI/CA freespace parameters if they 
are  0.


We use it successfully to copy QSAM to VSAM for CI/CA freespace=0 with 
significant performance gains.

---unsnip
Dumb questions:

1.  Is that a supported mechanism for getting data into a VSAM cluster?

2.  What's wrong with the REPRO control statement for IDCAMS ??

Rick

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: alter dataset blocksize

2011-08-26 Thread Rick Fochtman

---snip-


Hi,

Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original 
creation date?

LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11  
last ref date=2011/08/15

To alter the blksize, or another dataset specifications, we use this method :
1.- create a new library with the correct specifications.
2.- copy from old to the new.
3.- remove the old lib.
3.- rename the new lib.

(but it shows the NEW creation date = current date)

I want to know how to alter its blocksize or to alter the creation date.

Happy week end,
 


-unsnip---
If you're going to a LARGER BLKSIZE, you can IEBGENER a dummy member 
into it, specifying the new BLKSIZE on the SYSUT2 DD statement.


Why is this necessary ??

Rick

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


Book: What On Earth is a Mainframe?

2011-08-26 Thread Phil Smith III
Anyone read this? I have PC kids I work with who are likely to read it,
wonder what others thought. I read the pages Amazon would let me preview,
and it didn't seem horrible, though it loses points for being published in
2008 and calling System z zSeries. But who knows, he may have been working
on the project since before 2005, and of course (too!) many people still use
the old name.

http://www.amazon.com/exec/obidos/ASIN/1409225356/pakoracom
-- 
...phsiii

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: SMS and Not Cataloged Datasets

2011-08-26 Thread Rick Fochtman

snip--


These datasets turn up not cataloged because of statements in our production 
JCL which specify things like NOSCRATCH NOERASE for a simple dataset.
   



I would change the JCL.
 


---unsnip
Same here, Ted.

If there's a pressing need or business case for keeping a previous 
version, use a GDG. (But try not to overdo it!)  :-)


Rick

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: JCL Changes and SMS and Not Cataloged Datasets

2011-08-26 Thread Donnelly, John P
This poor practice was something instilled in the Tata contractors we have 
employed.

We change one and another crops up...
We are looking to change of change control management software to capture...

Thankyou all...

 
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Rick Fochtman
Sent: Friday, August 26, 2011 1:29 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: SMS and Not Cataloged Datasets

snip--

These datasets turn up not cataloged because of statements in our production 
JCL which specify things like NOSCRATCH NOERASE for a simple dataset.



I would change the JCL.
  

---unsnip
Same here, Ted.

If there's a pressing need or business case for keeping a previous version, use 
a GDG. (But try not to overdo it!)  :-)

Rick

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: JCL Changes and SMS and Not Cataloged Datasets

2011-08-26 Thread Ted MacNEIL
This poor practice was something instilled in the Tata contractors we have 
employed.

Simple answer to that: don't hire them again.

Long before SMS, in 1981 (when I started), we had utilities to automatically 
delete uncatalogued datasets.

There has been no reason, aside from SYSRES, JES SPOOL and the like, for 
uncatalogued datasets for aeons!
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

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


  1   2   >