RES: Stunted JES2 spool volume and other questions

2020-03-30 Thread ITURIEL DO NASCIMENTO NETO
Hi,

When you try to increase TGTNUM, JES2 is going to advice that there is no room 
and will show the needed amount.
Then you'll have to change your CKPT structure and dataset for larger ones and 
proceed.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
4250/DITI Engenharia de Software
Tel: +55 11 3684-9602 Canal de voz 23-1404
E-mail: ituriel.nascime...@bradesco.com.br
BANCO BRADESCO S.A.
Cidade de Deus, Osasco, Prédio Vermelho



-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de 
Richards, Robert B.
Enviada em: sábado, 28 de março de 2020 09:14
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Stunted JES2 spool volume and other questions

I tried to add a few spool volumes (z/OS 2.3) without paying attention to the 
TGSPACE value. My bad. Two were added, one was *stunted* and the last two were 
ignored.

Now, I want to dynamically increase TGSPACE and SPOOLNUM and then add more 
spool volumes.

Current TGSPACE=814,375 and 75% used
Current SPOOLNUM=32 with 27 used and #28 stunted

I need to know a few things:


  1.  How big do my checkpoints need to be if I plan to TRIPLE the TGSPACE to 
2,443,200 and raise the SPOOLNUM to 64?
 *   CKPT1 is a structure (150M and 78% used)
 *   CKPT2 is 200 cylinders on DASD
  2.  How do I get the rest of the track groups formatted on SPOOL #28

Plan is to $TSPOOLDEF the TGSPACE followed by the SPOOLNUM. If that goes well, 
handle #28 then $SPL(xxx), format  several more spool volumes.

Any help/understanding would be appreciated.

Bob

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Finding and replying to outstanding reply

2020-02-12 Thread ITURIEL DO NASCIMENTO NETO
Tony,

We do have a SYSREXX code that automates our shutdown process.
There is a part of if related to respond some pending REPLIES, as shown:

CMDRESULT=AXRCMD('P TCAS','OUTPUTVAR.',10);
X  = AXRWAIT(4)   /* Aguarda 4s */
Cmd   = 'D R,R,SYS='Sysid',JOB=TCAS'

Reply = ReplyCMD(Cmd)
If Reply <> 0 Then
   CMDRESULT=AXRCMD('R 'Reply',FSTOP')


/* */
/* Subrotina verifica  REPLY pendente  */
/* */
ReplyCMD:
CMDRESULT=AXRCMD(Cmd,'REPLYVAR.',10)
If CMDResult = 0 Then
   Do
   Outst  =  WORD(REPLYVAR.3,3)
   If Outst  <> 'OUTSTANDING' Then
  Return  WORD(REPLYVAR.4,1)
   Else
  Return  0
   End
Else
   Say "SHUTDOWN Sysrexx - Reply from "Cmd" - RC="CMDResult
   Return 0


Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
4250/DITI Engenharia de Software
Tel: +55 11 3684-9602 Canal de voz 23-1404
E-mail: ituriel.nascime...@bradesco.com.br
BANCO BRADESCO S.A.
Cidade de Deus, Osasco, Prédio Vermelho



-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de Tony 
Thigpen
Enviada em: terça-feira, 11 de fevereiro de 2020 10:31
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Finding and replying to outstanding reply

We have an in-house written automated shutdown program that does everything but 
shutdown NPF. That is because NPF leaves an open reply message during start-up 
to which I must replay xx,STOP to make it shutdown. Within our shutdown 
program, I would like it to programmatically find the outstanding reply number 
so that it can issue the correct response.

Can someone point me to any doc or examples that will help me get started on 
this?

Some items:
The shutdown program is assembler.
I have SysREXX running with a valid MPF exit to call it.
I would prefer to do it all within the assembler program instead of using 
MPF/SysREXX.

Thoughts?

--
Tony Thigpen

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: RES: RES: Rexx or similar to clone a RACF user?

2020-01-29 Thread ITURIEL DO NASCIMENTO NETO
Sri,


Amazing JOB.
Sort is really a magic tool.

Thank you

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
4250/DITI Engenharia de Software
Tel: +55 11 3684-9602 Canal de voz 23-1404
E-mail: ituriel.nascime...@bradesco.com.br
BANCO BRADESCO S.A.
Cidade de Deus, Osasco, Prédio Vermelho




-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de Sri h 
Kolusu
Enviada em: quarta-feira, 29 de janeiro de 2020 11:38
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: RES: RES: Rexx or similar to clone a RACF user?

Ituriel do Nascimento Neto,


Here is the JCL that I was talking about.   You pass the the exiting userid
that you need to clone as a parm named BASEUSER and the new userid as another 
parm CLONUSER.  I split the statements into different files , so that you can 
run them in the sequence you want to.


//   SET BASEUSER='KOLUSU'
//   SET CLONUSER='ITURIEL'
//*
//* create Racf statements to clone the userid   **
//*
//STEP0100 EXEC PGM=SORT,PARM='JP1"",JP2""'
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DISP=SHR,DSN=Your RACF unload Database file
//ADDUSER  DD SYSOUT=*
//ALTUSER  DD SYSOUT=*
//CONNECT  DD SYSOUT=*
//PERMIT   DD SYSOUT=*
//SYSINDD *
  OPTION COPY,VLSCMP
  INCLUDE COND=((005,4,CH,EQ,C'0200',AND,010,8,CH,EQ,JP1),OR,
(005,4,CH,EQ,C'0220',AND,010,8,CH,EQ,JP1),OR,
(005,4,CH,EQ,C'0270',AND,010,8,CH,EQ,JP1),OR,
(005,4,CH,EQ,C'0102',AND,019,8,CH,EQ,JP1),OR,
(005,4,CH,EQ,C'0404',AND,062,8,CH,EQ,JP1),OR,
(005,4,CH,EQ,C'0505',AND,266,8,CH,EQ,JP1))

  INREC IFTHEN=(WHEN=INIT,
 BUILD=(001,004,
005,1100)),

IFTHEN=(WHEN=(5,4,CH,EQ,C'0200'),
 BUILD=(1,4,
C' ADDUSER ',
JP2,C' OWNER(',30,8,C') DFLTGRP(',100,8,C')   + ',
85:C' PASSWORD(',10,8,C') ',
   C'NAME(''',79,20,C''')')),

 IFTHEN=(WHEN=(5,4,CH,EQ,C'0220'),
  BUILD=(1,4,
C' ALTUSER ',
JP2,C' TSO(PROC(',154,8,C')) ',
C' ACCTNUM(',19,8,C') + ',
   85:C' SIZE(',163,8,C') ',
  C' MAXSIZE(',176,10,C') ',
  C' UNIT(',209,8,C') )')),

 IFTHEN=(WHEN=(5,4,CH,EQ,C'0270'),
  BUILD=(1,4,
C' ALTUSER ',
JP2,C' OMVS(UID(',15,10,C') ',
C' HOME(',30,10,C') ',
C' PROGRAM(',1054,8,C') )')),

 IFTHEN=(WHEN=(5,4,CH,EQ,C'0102'),
  BUILD=(1,4,
C' CONNECT ',
JP2,C' GROUP(',10,8,C') ',
C'OWNER(',10,8,C') ',
C'AUTHORITY(',28,8,C') ')),

 IFTHEN=(WHEN=(5,4,CH,EQ,C'0404'),
  BUILD=(1,4,
C' PERMIT ',
C' ',10,44,C'   GEN + ',
85:C' CLASS(DATASET ) ',
   C'ID(',62,8,C') ',
   C'ACCESS(',71,8,C') ')),

 IFTHEN=(WHEN=(5,4,CH,EQ,C'0505'),
  BUILD=(1,4,
C' PERMIT ',
C' ',10,44,C'   + ',
85:C' CLASS(',257,8,C') ',
   C'ID(',266,8,C') ',
   C'ACCESS(',275,8,C') '))

  OUTFIL FNAMES=ADDUSER,INCLUDE=(5,8,CH,EQ,C' ADDUSER '),
  VTOF,BUILD=(5,80,/,85,80)

  OUTFIL FNAMES=ALTUSER,INCLUDE=(5,8,CH,EQ,C' ALTUSER '),
  VTOF,BUILD=(5,80,/,85,80)

  OUTFIL FNAMES=CONNECT,INCLUDE=(5,8,CH,EQ,C' CONNECT '),
  VTOF,BUILD=(5,80)

  OUTFIL FNAMES=PERMIT,INCLUDE=(5,8,CH,EQ,C' PERMIT '),
  VTOF,BUILD=(5,80,/,85,80)

/*


Further if you have any questions please let me know

Thanks,
Kolusu
DFSORT Development
IBM Corporation


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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since

RES: Rexx or similar to clone a RACF user?

2020-01-29 Thread ITURIEL DO NASCIMENTO NETO
Robert,

As I said, it is old stuff.
I'll follow your recommendation.

Thanks

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
4250/DITI Engenharia de Software
Tel: +55 11 3684-9602 Canal de voz 23-1404
E-mail: ituriel.nascime...@bradesco.com.br
BANCO BRADESCO S.A.
Cidade de Deus, Osasco, Prédio Vermelho   




-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de Robert 
S. Hansel (RSH)
Enviada em: terça-feira, 28 de janeiro de 2020 08:53
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Rexx or similar to clone a RACF user?

Ituriel,

Very clever. However, I recommend using the 0203 record for group connections 
instead of the 0102 record. If the user is connected to a UNIVERSAL group, 
there won't be a 0102 record unless the user has an authority greater than USE.

Regards, Bob

Robert S. Hansel
Lead RACF Specialist
RSH Consulting, Inc.
617-969-8211
www.linkedin.com/in/roberthansel
www.twitter.com/RSH_RACF
www.rshconsulting.com
---
Upcoming RSH RACF Training - WebEx
- RACF Audit & Compliance Roadmap - MAR 23-27, 2020
- RACF Level I Administration - APR 27 - MAY 1, 2020
- RACF Level II Administration - APR 6-10, 2020
- RACF Level III Admin, Audit, & Compliance - MAR 9-13, 2020
- RACF - Securing z/OS UNIX  - FEB 10-14, 2020
---

-Original Message-
Date:Mon, 27 Jan 2020 17:39:29 +
From:    ITURIEL DO NASCIMENTO NETO 
Subject: RES: Rexx or similar to clone a RACF user?

Hi,

In the past i've developed a small ICETOOL that uses output from IRRDBU00 to 
clone a USERID.
Here follows the JCL:

//TSL1USER JOB (),CLASS=S,MSGCLASS=T,MSGLEVEL=(1,1),
// COND=(0,NE),
// REGION=0M,NOTIFY=
//*
//*CLONE RACF USERID
//*
//*CHANGE "USERID" TO YOUR USERID TO BE COPIED
//*
//   EXEC RACFCLON,DBU=AT.UNLOAD.RACF
//SEPARA.SYSIN  DD   *
  OPTION COPY,VLSHRT,SPANINC=RC0
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0200',AND,
  010,8,CH,EQ,C'USERID'),FILES=1,
  CONVERT,OUTREC=(5,300),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0220',AND,
  010,8,CH,EQ,C'USERID'),FILES=2,
  CONVERT,OUTREC=(5,300),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0270',AND,
  010,8,CH,EQ,C'USERID'),FILES=3,
  CONVERT,OUTREC=(5,1100),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0102',AND,
  019,8,CH,EQ,C'USERID'),FILES=4,
  CONVERT,OUTREC=(5,300),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0404',AND,
  062,8,CH,EQ,C'USERID'),FILES=5,
  CONVERT,OUTREC=(5,300),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0505',AND,
  266,8,CH,EQ,C'USERID'),FILES=6,
  CONVERT,OUTREC=(5,300),VLFILL=C' '


//RACFCLON  PROC DBU=
//*
//*FILTRA REGISTROS
//*
//SEPARAEXEC PGM=SORT
//SYSOUTDD   DUMMY
//SORTINDD   DSN=,DISP=SHR
//SORTOF1   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF2   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF3   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF4   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF5   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF6   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//*
//ADDUSER  EXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTFIL  OUTREC=(C' ADDUSER ',
  06,8,C' OWNER(',26,8,C') DFLTGRP(',096,8,C')   + ',
  /,
  C' PASSWORD(',06,8,C') ',
  C'NAME(''',75,20,C''')')
  END
//*
//ALTUTSO  EXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTFIL  OUTREC=(C' ALTUSER ',
  06,8,C' TSO(PROC(',150,8,C')) ',
  C' ACCTNUM(',15,8,C') + ',
  /,
  C' SIZE(',159,8,C') ',
  C' MAXSIZE(',172,10,C') ',
  C' UNIT(',205,8,C') )')
  END
//*
//ALTUOMVS EXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTREC  FIELDS=(C' ALTUSER ',
  06,8,C' OMVS(UID(',15,10,C') ',
  C' HOME(',26,10,C') ',
  C' PROGRAM(',1050,8,C') )')
  END
//*
//CONNECT  EXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTREC  FIELDS=(C' CONNECT ',
  15,8,C'GROUP(',06,8,C') ',
  C'OWNER(',06,8,C') ',
  C'AUTHORITY(

RES: RES: Rexx or similar to clone a RACF user?

2020-01-29 Thread ITURIEL DO NASCIMENTO NETO
Sri,

Thank you, i'll give it a try.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
4250/DITI Engenharia de Software
Tel: +55 11 3684-9602 Canal de voz 23-1404
E-mail: ituriel.nascime...@bradesco.com.br
BANCO BRADESCO S.A.
Cidade de Deus, Osasco, Prédio Vermelho




-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de Sri h 
Kolusu
Enviada em: segunda-feira, 27 de janeiro de 2020 16:31
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: RES: Rexx or similar to clone a RACF user?

> In the past i've developed a small ICETOOL that uses output from
> IRRDBU00 to clone a USERID.

 Ituriel do Nascimento Neto

Just so you know, the JCL can be simplified into a single step with single pass 
of data.

Thanks,
Kolusu
DFSORT Development
IBM Corporation

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Rexx or similar to clone a RACF user?

2020-01-27 Thread ITURIEL DO NASCIMENTO NETO
Hi,

In the past i've developed a small ICETOOL that uses output from IRRDBU00 to 
clone a USERID.
Here follows the JCL:

//TSL1USER JOB (),CLASS=S,MSGCLASS=T,MSGLEVEL=(1,1),
// COND=(0,NE),
// REGION=0M,NOTIFY=
//*
//*CLONE RACF USERID
//*
//*CHANGE "USERID" TO YOUR USERID TO BE COPIED
//*
//   EXEC RACFCLON,DBU=AT.UNLOAD.RACF
//SEPARA.SYSIN  DD   *
  OPTION COPY,VLSHRT,SPANINC=RC0
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0200',AND,
  010,8,CH,EQ,C'USERID'),FILES=1,
  CONVERT,OUTREC=(5,300),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0220',AND,
  010,8,CH,EQ,C'USERID'),FILES=2,
  CONVERT,OUTREC=(5,300),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0270',AND,
  010,8,CH,EQ,C'USERID'),FILES=3,
  CONVERT,OUTREC=(5,1100),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0102',AND,
  019,8,CH,EQ,C'USERID'),FILES=4,
  CONVERT,OUTREC=(5,300),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0404',AND,
  062,8,CH,EQ,C'USERID'),FILES=5,
  CONVERT,OUTREC=(5,300),VLFILL=C' '
  OUTFIL INCLUDE=(005,4,CH,EQ,C'0505',AND,
  266,8,CH,EQ,C'USERID'),FILES=6,
  CONVERT,OUTREC=(5,300),VLFILL=C' '


//RACFCLON  PROC DBU=
//*
//*FILTRA REGISTROS
//*
//SEPARAEXEC PGM=SORT
//SYSOUTDD   DUMMY
//SORTINDD   DSN=,DISP=SHR
//SORTOF1   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF2   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF3   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF4   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF5   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//SORTOF6   DD   DSN=&,DISP=(,PASS),
//  UNIT=(3390),SPACE=(CYL,(1,10),RLSE)
//*
//ADDUSER  EXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTFIL  OUTREC=(C' ADDUSER ',
  06,8,C' OWNER(',26,8,C') DFLTGRP(',096,8,C')   + ',
  /,
  C' PASSWORD(',06,8,C') ',
  C'NAME(''',75,20,C''')')
  END
//*
//ALTUTSO  EXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTFIL  OUTREC=(C' ALTUSER ',
  06,8,C' TSO(PROC(',150,8,C')) ',
  C' ACCTNUM(',15,8,C') + ',
  /,
  C' SIZE(',159,8,C') ',
  C' MAXSIZE(',172,10,C') ',
  C' UNIT(',205,8,C') )')
  END
//*
//ALTUOMVS EXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTREC  FIELDS=(C' ALTUSER ',
  06,8,C' OMVS(UID(',15,10,C') ',
  C' HOME(',26,10,C') ',
  C' PROGRAM(',1050,8,C') )')
  END
//*
//CONNECT  EXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTREC  FIELDS=(C' CONNECT ',
  15,8,C'GROUP(',06,8,C') ',
  C'OWNER(',06,8,C') ',
  C'AUTHORITY(',24,8,C') ')
  END
//*
//PERMITEXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTFIL  OUTREC=(C' PERMIT ',
  C' ',6,44,C'   GEN + ',
  /,
  C' CLASS(DATASET ) ',
  C'ID(',58,8,C') ',
  C'ACCESS(',67,8,C') ')
  END
//*
//PERMITEXEC PGM=SORT
//SYSOUTDD DUMMY
//SORTINDD DSN=&,DISP=SHR
//SORTOUT   DD SYSOUT=*
//SYSIN DD *
  SORTFIELDS=COPY
  OUTFIL  OUTREC=(C' PERMIT ',
  C' ',6,44,C'   + ',
  /,
  C' CLASS(',253,8,C') ',
  C'ID(',262,8,C') ',
  C'ACCESS(',271,8,C') ')
  END

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
4250/DITI Engenharia de Software
Tel: +55 11 3684-9602 Canal de voz 23-1404
E-mail: ituriel.nascime...@bradesco.com.br
BANCO BRADESCO S.A.
Cidade de Deus, Osasco, Prédio Vermelho



-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de Charles 
Mills
Enviada em: sexta-feira, 17 de janeiro de 2020 15:26
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Rexx or similar to clone a RACF user?

X-posted RACF-L and IBM-MAIN.



A Google search reveals that the question "how do I clone a user in RACF?"
has been asked before and the answer is basically "buy Vanguard, Beta88 or 
zSecure." People also mentioned "you might write a Rexx script to do this."



Not having one of those proprietary products I sea

RES: JES3 to JES2 migration experience

2019-11-26 Thread ITURIEL DO NASCIMENTO NETO
Hi,

There is an IBM Redbook about this subject.
We have converted from JES3 to JES2 in 2005 when there was nothing documented 
and, AFAIR, the main points were:

1) ISV products in general and Automation package specifically.
2) We have to code some JES2 exits to cover funtionalities that were present in 
JES3, but not in JES2.
3) Aplications that issue JES3 commands
4) Training

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
4250/DITI Engenharia de Software
Tel: +55 11 3684-9602 Canal de voz 23-1404
E-mail: ituriel.nascime...@bradesco.com.br
BANCO BRADESCO S.A.
Cidade de Deus, Osasco, Prédio Vermelho




-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de 
Mainframe Sysprog
Enviada em: terça-feira, 26 de novembro de 2019 11:28
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: JES3 to JES2 migration experience

Hi List,

I know this topic has been discussed multiple times, and with the recent SOD on 
JES3, I am looking for some hands-on tips or experiences from anyone who has 
had the chance of converting from JES3 to JES2.

Can anyone share their experience on what are the most troublesome areas to be 
considered for such a migration and how were these handled in your case?

Any gotchas, or areas that get overlooked?

I am reviewing the excellent Redbook from IBM, but would want to supplement 
that with some real world experiences.

Thanks
Varun

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: SYSAFF and SCHENV

2019-01-31 Thread ITURIEL DO NASCIMENTO NETO
Not necessarily.
If your JOBDEF is defined with CNVT_SCHENV=HONOR, convertion phase will be done 
at desired Lpar.

Can be changed by $TJOBDEF, CNVT_SCHENV=HONOR or CNVT_SCHENV=IGNORE

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A. 
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404   
Fax: +55 11 3684-4427 



-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de Anthony 
Hirst
Enviada em: domingo, 27 de janeiro de 2019 22:12
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: SYSAFF and SCHENV

One difference that I haven't seen be mentioned is that SYSAFF controls all 
stages of JES2 processing, while the SCHED only controls execution phase, we've 
run into issues where subsystems aren't active on some LPARs and a job with a 
SCHED setting gets interpreted on that system you get a JCL error, only way to 
avoid that we've found is to code SYSAFF.  We keep the SCHED to because it 
points to the actual resource requirement adding documentation.

On Sat, Jan 26, 2019 at 8:53 PM Peter  wrote:

> Hi
>
> It is just general question
>
> I was going through the manual.
>
> Does SCHENV perform the same function as SYSAFF ? Or it does more than 
> that ?
>
> Peter
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Generic query on Region allocation failure

2019-01-08 Thread ITURIEL DO NASCIMENTO NETO
Hi,

A possible reason can be the fragmentation that normally occurs.
It is possble to prevent it by coding VSM CHECKREGIONLOSS(xxxK,xM) on your 
DIAGxx member of PARMLST.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de Jake 
Anderson
Enviada em: terça-feira, 8 de janeiro de 2019 04:16
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Generic query on Region allocation failure

Apology for being vague

IEF085I REGION NOT AVAILABLE ERROR CODE = 20 IEF187I NJJJ FAILED - SYSTEM 
ERROR IN INITIATOR IEF472I NJJJ NJJJ - COMPLETION CODE - SYSTEM = 822 
USER= 0, REASON = 0



On Tue 8 Jan, 2019, 8:20 AM Lizette Koehler  As always, it is helpful to post the complete error message it
> received
>
> Was it an S878
>
> Was it an S40d? if yes, what is the sub codes?
>
> Did you put on any recent maintenance?
>
> Did you increase the number of devices in your IO GEN (Check if HSA
> has
> grown)
>
> How much physical memory did you have on z114 vs z14
>
>
> Lots of things to check into without seeing the exact and complete
> error messages.
>
> Did you ask the Vendor about the issue?  Did they suggest any analysis?
>
>
> Lizette
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> Behalf Of
> > Jake Anderson
> > Sent: Monday, January 07, 2019 9:11 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Generic query on Region allocation failure
> >
> > Hi
> >
> > After we have moved from z114 to z14. Some of our database(ISVs
> > database
> > product) started task failed with region allocation.( When I kept
> > 5m),
> but
> > after increasing the region size it came up .
> >
> > Not sure if z14 requires some task to move above the line ?
> >
> > Could someone please shed some light on the above ?
> >
> > We are at zOS 2.2.
> >
> > Jake
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: DCB Open Exit

2018-10-24 Thread ITURIEL DO NASCIMENTO NETO
Mr Relson,

Thanks for your feed back.
So, i assume that using an interface like VSMLIST should be more effective.
I'll give it a try.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Peter Relson
Enviada em: quarta-feira, 24 de outubro de 2018 08:50
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: DCB Open Exit

(Purely guessing, might be totally wrong)

There is no way to tell because there is no association between the processing 
done for the multiple DCBs other than possibly respect to backing out upon 
error..
Your exit will get control for each of these three and there is no difference 
to the exit between one OPEN with three DCBs and three consecutive OPENs.

So do whatever you would do if you saw three consecutive OPENs. (No fields in 
the LDA are programming interfaces, so use them completely at your own
risk.)

Peter Relson
z/OS Core Technology Design


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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: DCB Open Exit

2018-10-23 Thread ITURIEL DO NASCIMENTO NETO
Mr Dissen,

Since we can enhance BUFNO, we need to check the region available in the 
address space to prevent S878 abend,
specially when DCB buffers are located below 16Mb line.

When OPEN is issued for a single DCB, LDA fields show me the available memory, 
and i can decide if DCBBUFNO
will be modified of not, but when OPEN has more than one DCB in parameter list, 
LDA fields show us that buffers of all
DCBs have already been used in private área.

I want to know if the same OPEN is for many DCBs, to choose if any of these 
DCBs will have its BUFNO modified or not.
For example, if multiple DCBs only the first one will be manipulated.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427




-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Binyamin Dissen
Enviada em: terça-feira, 23 de outubro de 2018 16:27
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: DCB Open Exit

Well  .

You can back up to the RB issuing the OPEN and check the plist.

Be aware that there are different formats for 24 and 31 bit, and that there may 
be ACBs in the list and the OPENs may fail.

Why do you care?

On Tue, 23 Oct 2018 18:51:46 + ITURIEL DO NASCIMENTO NETO 
 wrote:

:>Hi everyone,
:>
:>We do have a DCB OPEN exit (IFG0EX0B) used to manipulate DCBBUFNO.
:>I would like to know if there is a way to detect when OPEN is issued with 
more than one DCB in the parameter list, :>like the example below:
:>
:>
:> 16  OPEN  
(SYSIN,(INPUT),SYSIN1,(INPUT),SYSIN2,(INPUT))
:>14   18+ CNOP  0,4
  Align list to word
:>14 4D10 C0240002419+ BAS   1,*+16 
  Load reg 1 with list
:>18 0020+ DCAL1(0) 
  Option byte
:>19 7421+ DCAL3(SYSIN) 
  DCB or ACB address
:>1C 0022+ DCAL1(0) 
  Option byte
:>1D D423+ DCAL3(SYSIN1)
  DCB or ACB address
:>20 8024+ DCAL1(128)   
  Option byte
:>21 00013425+ DCAL3(SYSIN2)
  DCB or ACB address
:>24 0A13  26+ SVC   19 
  Issue OPEN SVC
:>
:>We have checked field DCBQSWS (bit DCBPOPEN) to detect the situation reported 
above, but apparently :>this bit is turned on only when using Parallel Data 
Access Blocks (PDAB), that is not the case.
:>
:>So, any tip ?

--
Binyamin Dissen  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...@listserv.ua.edu with the message: INFO IBM-MAIN

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


DCB Open Exit

2018-10-23 Thread ITURIEL DO NASCIMENTO NETO
Hi everyone,

We do have a DCB OPEN exit (IFG0EX0B) used to manipulate DCBBUFNO.
I would like to know if there is a way to detect when OPEN is issued with more 
than one DCB in the parameter list,
like the example below:


 16  OPEN  
(SYSIN,(INPUT),SYSIN1,(INPUT),SYSIN2,(INPUT))
14   18+ CNOP  0,4  
Align list to word
14 4D10 C0240002419+ BAS   1,*+16   
Load reg 1 with list
18 0020+ DCAL1(0)   
Option byte
19 7421+ DCAL3(SYSIN)   
DCB or ACB address
1C 0022+ DCAL1(0)   
Option byte
1D D423+ DCAL3(SYSIN1)  
DCB or ACB address
20 8024+ DCAL1(128) 
Option byte
21 00013425+ DCAL3(SYSIN2)  
DCB or ACB address
24 0A13  26+ SVC   19   
Issue OPEN SVC

We have checked field DCBQSWS (bit DCBPOPEN) to detect the situation reported 
above, but apparently
this bit is turned on only when using Parallel Data Access Blocks (PDAB), that 
is not the case.

So, any tip ?

Thanks in advance

Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427





AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: S106 abends after copying into LINKLIST

2018-10-01 Thread ITURIEL DO NASCIMENTO NETO
I agree.
If this loadlib is in linklist, problably an extra extent was created.

During IPL time z/OS builds DEB and it knows exactly how many extentds are 
defined for linklist datasets,
so if a new one is created, it is not mapped.

To circunvent it you have to compress te library and hopes that all modules 
return to the known extents of
this specific dataset.
Another suggestion is to dynamically remove the loadlib from linklist and then 
add it back again.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Carmen Vitullo
Enviada em: segunda-feira, 1 de outubro de 2018 11:29
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: S106 abends after copying into LINKLIST

the only time I've see this problem is when the library went into extends, the 
pds was compressed or LLA was refreshed or updated, I think CICS and IMS may 
act differently, so is DFHLOAD in a steplib contamination and link listed?



Carmen Vitullo

- Original Message -

From: "Eileen Barkow" 
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Monday, October 1, 2018 9:09:58 AM
Subject: S106 abends after copying into LINKLIST

Hi MVS gurus.
Perhaps someone can offer a plausible explanation for this, so that the MVS 
group will stop blaming the CICS group for the problem.

Last friday morning we copied new CICS LINKLIST/LPA modules into the existing 
LINKLIST/LPA loadlibs in use (a rather new scenario in use here - we used to 
use alternative datasets), in anticipation of an IPL to be done sunday morning.
anyway, around 6pm friday evening, an I/O error occured in linklist and other 
jobs started abending with S106 abends.
the linklist library was not allocated with secondary extents and there was no 
LLA refresh issued during the day. I cannot find anything like this situation 
occurring on IBMLINK and we have no dump of the original failure.

Does anyone have any idea of what could have caused the I/O error.
both the input and output datasets have a max blksize of 32760.

IEW4009I FETCH FAILED FOR MODULE DFHXCPRX FROM DDNAME -LNKLST- BECAUSE OF AN 
I/O ERROR.
IEW4005I FETCH FOR MODULE DFHXCPRX FROM DDNAME -LNKLST- FAILED BECAUSE IEWFETCH 
ISSUED RC 0F AND REASON 40 CSV031I LIBRARY ACCESS FAILED FOR MODULE DFHXCPRX, 
RETURN CODE 24, REASON CODE 26080021, DDNAME *LNKLST*







This e-mail, including any attachments, may be confidential, privileged or 
otherwise legally protected. It is intended only for the addressee. If you 
received this e-mail in error or from someone who was not authorized to send it 
to you, do not disseminate, copy or otherwise use this e-mail or its 
attachments. Please notify the sender immediately by reply e-mail and delete 
the e-mail from your system.


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


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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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

RES: SYSLOG and LOGR query

2018-07-19 Thread ITURIEL DO NASCIMENTO NETO
Glen,

Do you have a CFRM CDS defined to a monoplex environment, what for ?

When you list LOGR definitons, are they ok ? (DATA TYPE(LOGR) REPORT(YES) )


Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Sean Gleann
Enviada em: quinta-feira, 19 de julho de 2018 10:04
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: SYSLOG and LOGR query

I'm trying to use a LOGR logstream to gather the SYSLOG data, but I don't 
appear to be able to make it work...
I believe I've correctly followed all the instructions detailed in the relevant 
section of the "z/OS System Logger" redbook.
Modifying the CFRM policy to add the OPERLOG structure, and then defining the 
associated logstream all appears to have gone OK. For what it's worth, I'm 
working with a system in MONOPLEX mode, so the logstream is defined with 
DASDONLY(YES) specified.
My CONSOLxx member includes "HARDCOPY DEVNUM(OPERLOG) ROUTCODE(ALL)
CMDLEVEL(CMDS) HCFORMAT(CENTURY)", which I *think* is right but I'm not 
absolutely certain.
Then to 'activate' the facility, I used the V OPERLOG,HARDCPY command - which 
again I'm not absolutely certain of.

Whenever I try to use the IEAMDBLG program, it either abends with a U0001 or 
ends with message "MLG003I NORECORDS IN RANGE", depending on the PARM that I 
use.

Can anyone see anything wrong with my work here, please?
I can't be the only one trying to do this, so if any one out there can help at 
all, I'd appreciate it mightily.

Sean

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


zAWARE

2018-07-13 Thread ITURIEL DO NASCIMENTO NETO
Hi all,

Do any of you have good or bad experiences with zAWARE that can be shared ?

TIA.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404




AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Rebuilding IODF

2018-06-25 Thread ITURIEL DO NASCIMENTO NETO
You can get IOCDS and rebuild IODF from it.
Of course it is not that simple and you will need to reconstruct EDT, console 
and whatever is missing.

But is a starting point.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
R.S.
Enviada em: sexta-feira, 22 de junho de 2018 06:10
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Rebuilding IODF

W dniu 2018-06-17 o 14:11, Mainframe Sysprog pisze:
> A colleague has run into an issue where the VOLUME where the IODF
> resided has been "reclaimed" from another shared system with no recent
> available backups of IODF available to restore.
>
> They have a very old backup version from which he would be recovering
> the IODF but is not sure how to get it back to the current live
> environment and ensure consistency.
>
> Any thoughts?

That's why we do backups.
Second thought is there is nothing which do the job for you, it will be manual 
work.
However you get help using CONFIG command and CONFIGxx member (do you have 
any?).
Just take a sheet of paper and not all the CU's CHPIDs and DEVices.

--
Radoslaw Skorupka
Lodz, Poland




==


--
 Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając 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 authorized 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.

 mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2018 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 169.248.488 złotych.


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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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

RES: JCL "diagramming"?

2018-04-02 Thread ITURIEL DO NASCIMENTO NETO
John,

May be zBNA can supply some info you need.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
John McKown
Enviada em: quinta-feira, 29 de março de 2018 12:30
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: JCL "diagramming"?

On Thu, Mar 29, 2018 at 10:28 AM, Doug <dsh...@bellsouth.net> wrote:

> JCLPREP can .
> We only use that when testing new releases.
> Doug
>
>
​I forgot my usual disclaimer: This software must not cost any money. That 
really limits my options.​

--
I have a theory that it's impossible to prove anything, but I can't prove it.

Maranatha! <><
John McKown

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: zhyperwrite monitor

2018-03-20 Thread ITURIEL DO NASCIMENTO NETO
Jason,

You can see response time of both primary and secondary dasds, if zHyperwrite 
is enabled, in RMF monitor II.
If zHyperwrite is turned off, you will only see primary dasd.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
ibmm...@foxmail.com
Enviada em: segunda-feira, 12 de março de 2018 22:59
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: zhyperwrite monitor

Hi all

We want to use ZHYPERWRITE.

 If there are any issues (including performance) with FICON channels to the 
secondary DB2 log volume,

DFSMS will give instruction to the DS8880 to start Metro Mirror replication

Could you tell how to know the system use zhyperwrite to  the secondary DB2 log 
volume directly or start

 Metro Mirror replication to the DB2 Log ?


Thanks a lot!

Jason Cai


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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: How to speed up IFASMFDP SMF Dump process

2018-03-14 Thread ITURIEL DO NASCIMENTO NETO
Hello,

One possible action is to enhance BUFSPACE of SYS1.MAN* to 90112.
I think it can be done via ALTER command.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Lizette Koehler
Enviada em: segunda-feira, 12 de março de 2018 16:38
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: How to speed up IFASMFDP SMF Dump process

I was wondering if there are any tricks to making the SMF Dump process more 
efficient or faster?

And parms on the VSAM Define for the MANx files (like STRNO or RLS) that might 
help?

I know about the SMF LOGSTREAM - but not ready to do that yet


I am just using the IBM program IFASMFDP for now



Thanks



Lizette Koehler
statistics: A precise and logical method for stating a half-truth inaccurately

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Dynamic command to Activate NJE TCP

2018-01-22 Thread ITURIEL DO NASCIMENTO NETO
You can try this, on NODE1 :

$PLINE(1-10)
$TLINE(1-10),UNIT=TCP
$SLINE(1-10)

$ADDSOCKET(TCPNODE1),NODE=1,IPADDR=*LOCAL,PORT=175,NETSRV=1
$ADDSOCKET(TCPNODE2),NODE=2,IPADDR=xx.xx.xx.xx,PORT=175/* IP address of 
NODE2   */

$ADDNETSRV(1),SOCKET=TCPNODE1

$SNETSRV(1)

$SN,SOCKET=TCPNODE2


On NODE2, is basically the same:

$PLINE(1-10)
$TLINE(1-10),UNIT=TCP
$SLINE(1-10)

$ADDSOCKET(TCPNODE1),NODE=1,IPADDR=xx.xx.xx.xx,PORT=175/* IP address of 
NODE1  */
$ADDSOCKET(TCPNODE2),NODE=2,IPADDR=*LOCAL,PORT=175,NETSRV=1

$ADDNETSRV(1),SOCKET=TCPNODE2

$SNETSRV(1)

$SN,SOCKET=TCPNODE1

First verify if JES2S001 stc is associated to a userid with OMVS segment.


Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes

Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427




-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Peter
Enviada em: segunda-feira, 22 de janeiro de 2018 13:00
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Dynamic command to Activate NJE TCP

Hello All,

Cross Posted

Is there anyone who have tried activating NJE TCP connections dynamically ?

Any set of commands that can issued sequentially ?

Could someone point me ?

Peter

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: RSU maintenance strategy - Need expert suggestions

2017-12-07 Thread ITURIEL DO NASCIMENTO NETO
Anil,

It depends on the size of your environment.
If you have few lpars then it is possible the enhance the frequency of applying 
Maintenance.
In our case it's almost impossible apply Maintenance more than twice a year, so 
we do apply RSUxx12 and RSUxx06
and critical PTFs, when it's the case.

For ISVs we try to do the same.

Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
ANIL KUMAR
Enviada em: quinta-feira, 7 de dezembro de 2017 02:56
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: RSU maintenance strategy - Need expert suggestions

Hi All,

I needed expert suggestions on following the RSU maintenance strategy for z/OS 
, associated ISV products , DB2 etc. Could you please let me know

1) How many times in a year do we need to apply the maintenance to z/os , ISV 
products , DB2 etc.
2) How to decide which ones to be applied. (latest RSU)
3) Whether the HIPERs included also be applied , even though we have not 
encountered the specific issues in out shop.

So far in the account I was working for , it was not a strict rule to apply 
maintenance be it z/OS or DB2 or associated ISV product. Infact I do not 
remember any maintenance being applied to DB2 unless it was a major upgrade for 
which the pre-req was needed. Even for ISV's if they are running fine, then no 
action was taken.

However for a different shop , we have been asked to come up with the best 
approach on whats needs to be done. If we keep updating the maintenance then 1 
FTE job will be consumed for the work for a year.

Hence needed some advise on what strategy is being used by different shops and 
what is the best practice. Please advise.

If any documents etc are available please point me to them and I shall read. 
Sincerely hoping to get some advise. Thanks.

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Enterprise COBOL V6.2

2017-07-20 Thread ITURIEL DO NASCIMENTO NETO
Hello all,

Is XTIOT supported by Cobol 6.2 ?

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Frank Swarbrick
Enviada em: terça-feira, 18 de julho de 2017 18:35
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Enterprise COBOL V6.2

https://www-01.ibm.com/common/ssi/cgi-bin/ssialias?subtype=ca=an=897=ENUS217-323

- Compiler support for the new z14 hardware and z/OS V2.3 operating system so 
applications can take advantage of the latest IBM Z architecture and operating 
system features and capabilities
- Exploitation of the new Vector Packed Decimal Facility of z14 to increase the 
performance of decimal compute intensive applications without the need for 
source code changes
- Implementation of the new JSON PARSE statement to provide you with additional 
programming and modernization features
- Addition of the COBOL 2002/2014 Conditional Compilation language feature
- New and changed COBOL statements for increased functionality
- New and changed COBOL options for increased flexibility
- Improved usability of the compiler in the z/OS UNIX System Services 
environment
- Improved interfaces to other licensed programs and tools
- Improved listing layout so that compiler diagnostic messages are easier to 
find
- Compile-time improvements (with OPTIMIZE(1) & OPTIMIZE(2)) and runtime 
performance enhancements


Nothing mindblowing.  Conditional complication seems nice.


Vector Packed Decimal Facility sounds interesting.

"The Vector Packed Decimal Facility allows the dominant COBOL data types, 
packed and zoned decimal, to be handled in wide 16-byte vector registers 
instead of in memory. Decimal and floating-point computationally intensive 
COBOL programs, which are optimized with Enterprise COBOL V6.2 and that target 
z14 ARCH(12), can deliver CPU time reduction on the z14 server over the same 
applications built with COBOL V6.1. No source changes are required to take 
advantage of this new facility; just recompile with ARCH(12) to target z14."


And here's a "big one":  "Compiler diagnostic messages now appear at the end of 
the listing, as was the case in COBOL compilers before Enterprise COBOL V5."  
!! :-)

I still long for implementation of some of the more interesting/useful features 
of COBOL 2002 and COBOL 2014.  But at least they are doing something.

Frank

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: GRS CNS system recommandations

2017-06-27 Thread ITURIEL DO NASCIMENTO NETO
Hi,

I don't know if there is a recomendation but, as a rule, we try to direct GRS 
CNS to Lpars with more resources,
by coding the following statment at COMMNDxx:
COM='SETGRS CNS=,NOPROMPT'

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Vernooij, Kees (ITOPT1) - KLM
Enviada em: terça-feira, 27 de junho de 2017 06:26
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: GRS CNS system recommandations

Hello,

I am looking for recommendations of directing the GRS Contention Notification 
System to or keeping it away from certain systems.

I cannot find recommendations from GRS. Only GDPS has a health check to keep 
the CNS system from GDPS K-systems, but only with a vague reason (it is no 
problem to have it there, but I just don't want it there, typical GDPS 
reasoning).

Are there any considerations where to direct the CNS system?

Thanks,
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...@listserv.ua.edu with the message: INFO IBM-MAIN

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Global LOGON options settable in PARMLIB

2017-01-19 Thread ITURIEL DO NASCIMENTO NETO
I didn't like it.
In our environment we have a single tso logon procedure, so know it is not a 
big deal.

And logon takes longer because you have an extra panel to issue ENTER.


Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DITI Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Charles Mills
Enviada em: quinta-feira, 19 de janeiro de 2017 16:26
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Global LOGON options settable in PARMLIB

> what if somebody knows a userid, but not a password

The other thing is that with the "old" way of doing things, a bad guy can try 
random userids all day and all night until he hits on a good one. He still 
needs a password, but he is halfway there. Preprompt fixes that.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sam Golob
Sent: Thursday, January 19, 2017 10:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Global LOGON options settable in PARMLIB

Hi Folks,

 Relatively recently, IBM's TSO people have implemented four global LOGON 
options (valid for the entire LPAR) which are settable with the
(new) LOGON keyword in the IKJTSOxx member of PARMLIB.

 In short, these are (with the bit that sets each one):

Password Phrase Support 08
Applid Verification 04
LOGONHERE Support   02
Password Preprompt Support  01

Of these options, only LOGONHERE support is defaulted to be ON.  Where are 
these bits?  They should be set to match, in both the IKJTSVT and IKJTPVT 
control blocks.  But a SET IKJTSO=xx operator command or a PARMLIB UPDATE(xx) 
TSO command, should really be used to reset these options, because that is the 
safest way to do things, and that's how IBM designed the setup to be 
implemented.

 I want to especially mention the implication of the newest of these 
options, which is Password Preprompt Support, because of its security value.

 Everybody knows that when you LOGON to TSO, you get a full screen display. 
 There is (quite a bit of) information on that display, such as what your LOGON 
proc is, and if there is an initial TSO command to execute at LOGON time, and 
so forth (region size, account number etc.).

 Well, what if somebody knows a userid, but not a password, and not the 
name of the LOGON PROC, etc. or anything that normally shows up on that full 
screen.  Then without knowing the password, he/she can find out all the other 
information.  No need to actually LOGON.  The default is for the LOGON full 
screen to appear, as soon as you type LOGON userid.

 So, the new IBM-supplied "fix" for this is to set the Password Preprompt 
option on.  What does this do?  It forces the user to enter the valid password 
for the ID before all the other full screen information shows up.  This makes 
the LOGON process more secure.

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: IEFUJI and REGION LIMIT - S878 abends in JES2

2016-09-30 Thread ITURIEL DO NASCIMENTO NETO
Linda,

What's the reason code of your S878 abend ?


Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Elardus Engelbrecht
Enviada em: sexta-feira, 30 de setembro de 2016 09:27
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: IEFUJI and REGION LIMIT - S878 abends in JES2

linda golding wrote:

>Apologize for the late response .

It is all right with me. ;-)


>*a)Ok, at what stage of JES2 initializing do you get the 878?*
>JES2 was getting S878 abends during IPL

Ok, what replies were given? $WARM? $S or so? Granted if you could go that far.

Could you see what automatic JES2 commands were given/handled? Do you see JES2 
Monitor starting up?
Can you see what last $HASP was shown?


>MEMLIMIT(8G) -- PARMLIB

Could you try out NOLIMIT to see if that resolves your 878?


>This is a newly built system and we are planning to use as sandbox . There is 
>no maintenance put on these systems  No changes made to JES2PARM and nothing 
>changed with memory settings

Ok.


>*e)What else was running while getting those 878 abends?*
>Probably nothing apart from the system address spaces being a fresh IPL

Nothing? What about things like SMF, VLF, LLA, DLF, NET, OMVS, HSM and 
start/stop things like IRRDPTAB and IFGEDI? Where they also active and running?

It could be that one of these is consuming storage or one of them could using 
UJI eating up memory causing JES2 to die.


>*g)Can you see (source code) what are those two exits doing?*
>Its vanilla code.no changes to the exits as far as i remember . I'll take a 
>look again ...

Vanilla from where? From IBM or CBT or just setting RC=00 while doing nothing? 
Check if you have the RIGHT module with the RIGHT name.

I see 'vanilla' as something with size of x'20' or something.

Perhaps you should compare your system and JES2 and the exits with your other 
systems?

Perhaps you should ask IBM for assistance?

Good luck and all of the best for you!

Groete / Greetings
Elardus Engelbrecht

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: EXTERNAL: System symbols in batch JCL

2016-07-21 Thread ITURIEL DO NASCIMENTO NETO
Look if your jobclass is defined as SYSSYM=ALLOW


Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-9602 R: 49602 3-1404
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Jerry Whitteridge
Enviada em: quinta-feira, 21 de julho de 2016 16:59
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: EXTERNAL: System symbols in batch JCL

Skip - try closing the symbolic with a dot

DSN= TSOSKIP.REPORT.D
Jerry Whitteridge
Manager Mainframe Systems & Storage
Albertsons - Safeway Inc.
925 738 9443
Corporate Tieline - 89443

If you feel in control
you just aren't going fast enough.



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Thursday, July 21, 2016 12:54 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: System symbols in batch JCL

I'm trying to use system symbols in batch JCL under z/OS 2.1. Specifically, I'd 
like to create a DSN like this:

   TSOSKIP.REPORT.D-local-date.T-local-time

I've perused KC but still cannot get to work. Now maybe DSN simply does not 
allow embedded symbolics, but I did not see that prohibition. Here's what I get.

3 // SET D=
4 // SET T=
  //*
5 //TIMETEST EXEC PGM=IKJEFT01
6 //SYSTSIN  DD *
7 //SYSTSPRT DD DISP=(,CATLG),SPACE=(TRK,1),RECFM=FB,LRECL=80,
  //UNIT=SYSALLDA,
  //DSN= TSOSKIP.REPORT.D
  IEFC653I SUBSTITUTION JCL - 
DISP=(,CATLG),SPACE=(TRK,1),RECFM=FB,LRECL=80,UNIT=SYSALLDA,
  DSN= TSOSKIP.REPORT.D
. MESSAGE
7 IEFC627I INCORRECT USE OF AMPERSAND IN THE DSN FIELD

I read that system symbols must be enabled by class, which I did for class A: 
$HASP837 JOBCLASS(A) SYSSYM=ALLOW

But it looks like my job is failing at conversion and never getting to 
execution. Shouldn't this be easy? ;-)

.
.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-302-7535 Office
robin...@sce.com<mailto:robin...@sce.com>


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

 Warning: All e-mail sent to this address will be received by the corporate 
e-mail system, and is subject to archival and review by someone other than the 
recipient. This e-mail may contain proprietary information and is intended only 
for the use of the intended recipient(s). If the reader of this message is not 
the intended recipient(s), you are notified that you have received this message 
in error and that any review, dissemination, distribution or copying of this 
message is strictly prohibited. If you have received this message in error, 
please notify the sender immediately.


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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: WLM and Dispatching Priority

2015-11-26 Thread ITURIEL DO NASCIMENTO NETO
Hello,

Generally it is recommended that "Monitors" should execute at SYSSTC.


Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-2177 R: 42177 3-1404
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
phil yogendran
Enviada em: quinta-feira, 26 de novembro de 2015 13:08
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: WLM and Dispatching Priority

Hello All,

I need some assistance with being able to get a proper DP assigned to a set
of tasks. The problem is this;

I have 2 tasks, SYSVIEW and CICSLOGR and many CICS tasks. CICSLOGR is a
subtask attached by SYSVIEW.

In WLM, SYSVIEW is set to a service class of 'monitor' with an importance
of 1 and velocity of 75.

The CICS regions are set to a service class of 'CICSA' which has an
importance of 1 and velocity goal of 65.

However, what I see is that the CICS regions run at a DP of F6 and SYSVIEW
is at F4.

How can I make sure that SYSVIEW and CICSLOGR run at a higher DP? I'm on
z/OS 1.13 and in a sysplex environment.

Looking forward to your response. Thanks.

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: WLM and Dispatching Priority

2015-11-26 Thread ITURIEL DO NASCIMENTO NETO
You were talking about your monitors, that were using an importance 1 SC
instead of SYSSTC. And what about RMF ? RMF must be SYSSTC too.

Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-2177 R: 42177 3-1404
Fax: +55 11 3684-4427




Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
phil yogendran
Enviada em: quinta-feira, 26 de novembro de 2015 14:53
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: WLM and Dispatching Priority

Thank you all for your response and advise. My only reservation is that
SYSVIEW, at times, tends to be heavy-footed and causes the system to
'pause'. This is only because of the data we capture at periodic intervals.
Anyway, that's for me to investigate further and fix.

Thanks, again,


On Thu, Nov 26, 2015 at 11:16 AM, Ted MacNEIL <eamacn...@yahoo.ca> wrote:

> Put monitors in SYSSTC.
> This gives them the second highest DP in the system. You cannot completely
> control the DP in Service Classes.
>
> -
> -teD
> -
>   Original Message
> From: phil yogendran
> Sent: Thursday, November 26, 2015 11:02
> To: IBM-MAIN@LISTSERV.UA.EDU
> Reply To: IBM Mainframe Discussion List
> Subject: WLM and Dispatching Priority
>
> Hello All,
>
> I need some assistance with being able to get a proper DP assigned to a set
> of tasks. The problem is this;
>
> I have 2 tasks, SYSVIEW and CICSLOGR and many CICS tasks. CICSLOGR is a
> subtask attached by SYSVIEW.
>
> In WLM, SYSVIEW is set to a service class of 'monitor' with an importance
> of 1 and velocity of 75.
>
> The CICS regions are set to a service class of 'CICSA' which has an
> importance of 1 and velocity goal of 65.
>
> However, what I see is that the CICS regions run at a DP of F6 and SYSVIEW
> is at F4.
>
> How can I make sure that SYSVIEW and CICSLOGR run at a higher DP? I'm on
> z/OS 1.13 and in a sysplex environment.
>
> Looking forward to your response. Thanks.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

AVISO LEGAL ...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICE...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: VSAM question

2015-07-20 Thread ITURIEL DO NASCIMENTO NETO
Hi,

It does not need to be sms managed, but you have to assign a DATACLASS with
the appropriated definitions when defining it.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1404
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
william janulin
Enviada em: segunda-feira, 20 de julho de 2015 15:57
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: VSAM question

To list;
  Is there a way around the 4 gig limitation when defining a LINEAR cluster on 
volumes not managed my SMS? I have to download Websphere v8.5 and am attempting 
to define a ZFS dataset large enough to hold the product plus its myriad of 
ptfs.
Thank you in advance, Bill J.

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Notify for XMIT

2015-05-13 Thread ITURIEL DO NASCIMENTO NETO
Hi,

As Skip pointed out, there is no need of any exit, unless you want to WTO some 
messages
to be used by your automation package.

Since z/OS 1.7 exit 13 is discontinued, its functionalities have been replaced 
by exit 40.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1404
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Steve Thompson
Enviada em: terça-feira, 12 de maio de 2015 16:25
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Notify for XMIT

Well, if it takes an exit, that's the end of this query.

It will take longer than it is worth to get that approved and
installed.

I had thought it was some setting that I was missing (ok, I was
hopping it was just some TSO setting that I could get done quickly).

Thanx folks,
Steve Thompson

On 05/12/2015 01:52 PM, Bill Bishop (TEMA TPC) wrote:
 This does require a JES2 exit to be implemented.

 I actually had done this too many years ago to remember.

 Unfortunately, I do not remember which exit it was, but I seem to remember I 
 got the base code either from an old Redbook on JES2 or from the Share or 
 JES2 mods tape.

SNIPPAGE

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Intermittent, not consistently reproducible problems with PDSEs on z/OS V2R1 (incl. infrequent S0F4-20 RSN 1C0752EE ABENDs)

2015-03-20 Thread ITURIEL DO NASCIMENTO NETO
Karl,

I've run the same test you suggest and everything was fine.
One question, how did you create an empty member without SAVE command ?
Do you use AUTOSAVE ON/OFF ?
Did you create them using IEBGENER or some other batch process ?

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1404
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Henn, Karl
Enviada em: sexta-feira, 20 de março de 2015 12:06
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Intermittent, not consistently reproducible problems with PDSEs on 
z/OS V2R1 (incl. infrequent S0F4-20 RSN 1C0752EE ABENDs)

I created the following members, in the order shown below

DUMMY (empty)



 (empty)


EB1135I IEBCOPY  FMID HDZ2210  SERVICE LEVEL UA74516 DATED 20140814 DFSMS 
02.01.00 z/OS02.01.00 HBB7790
EB1013I COPYING FROM PDSE  INDD=SYSUT1   VOL=ST123B DSN=SYSADM.TEST.PDSE#A1
EB1014I   TO PDSE OUTDD=SYSUT2   VOL=ST113B DSN=SYSADM.TEST.PDSE#A2
GW01551I MEMBER   HAS BEEN COPIED
GW01551I MEMBER   HAS BEEN COPIED
GW01551I MEMBER DUMMY  HAS BEEN COPIED
GW01551I MEMBER   HAS BEEN COPIED
GW01551I MEMBER   HAS BEEN COPIED
GW01551I MEMBER   HAS BEEN COPIED
GW01550I 6 OF 6  MEMBERS WERE COPIED
EB147I END OF JOB - 0 WAS HIGHEST SEVERITY CODE

In SYSADM.TEST.PDSE#A2, members , , , and  contain *only* 
blanks. It looks as if no data was copied at all. The lexical order of the 
member names does not seem to play a role.

In addition to that, I did another test.

(a) I created the members as shown above.

(b) *Before* copying, I edited *all* of the empty members: DUMMY and NNN. I 
just went in there with ISPF EDIT, and typed SAVE in the command line, without 
having entered any data.

(c) Ran IEBCOPY - and everything was fine!


So , something is wrong with the empty members in the copy source (PDSE#A1). 
Once they are opened and closed once, the error is gone. I must say that I can 
hardly see how this could be related to anything we have set up wrong in our 
installation. On the other hand, Lizette and Leonardo have indicated that the 
problem does not occur on their respective z/OS V2R1 systems.

Thanks.

Karl


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Bernd Oppolzer
Sent: Friday, March 20, 2015 2:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Intermittent, not consistently reproducible problems with PDSEs on 
z/OS V2R1 (incl. infrequent S0F4-20 RSN 1C0752EE ABENDs)

IMO, this is a bug.

Does the bug depend on the names of the members?

I would think that the bug only appears, if the empty member (in this case 
DUMMY) has a name lexically lower than the non-empty member (in this case ).

Could you give this a try? I don't have access to a z/OS system today, so I 
can't try it myself.

What if there are non-empty members before the first empty member?
Maybe it works in this case, too.

Would you keep us informed? I would appreciate it.

Thank you, kind regards

Bernd



Am 20.03.2015 um 14:03 schrieb Karl Henn:
 Hello,

 The description of the following problem (if you prefer to call it such) 
 sounds a little unusual, and the sample JCL looks - and is! - trivial. I 
 still kindly ask the world to please read it, and maybe try it out. My 
 primary goal is to make sure that I'm not simply just out of my mind.

 Ever since we're running z/OS V2R1, complaints about alleged problems with 
 PDSEs were forwarded to me, sporadically. The error descriptions were fairly 
 fuzzy, ranging from intermittent S0F4-20 RSN 1C0752EE ABENDs, problems with 
 empty members, as well as incomplete copies of PDSEs with IEBCOPY CC 00. 
 Since none of the problems were really consistently reproducible, I kind of 
 just brushed away the issue for a while.

 The S0F4 ABENDs I could not ignore, though. The complaints didn’t stop, 
 either. So, in order to narrow down a possible problem, I started 
 experimenting - yielding a surprising result.

 Please take a look at the following JCL. Don’t laugh, but as simple as it may 
 look, it *sometimes* does not work.


 //*--*
 //DELETE   EXEC PGM=IDCAMS,COND=(0,NE)
 //SYSPRINT DD SYSOUT=*
 //SYSINDD DATA
   DELETE hlq.TEST.PDSE#A1 NVSAM SCRATCH
   DELETE hlq.TEST.PDSE#A2 NVSAM SCRATCH
   SET MAXCC=00
 /*
 //*--*
 //ALLOCEXEC PGM=IEFBR14,COND=(0,NE)
 //SYSPRINT DD SYSOUT=*
 //PDSE#A1  DD DISP=(NEW,CATLG),DSN=hlq.TEST.PDSE#A1,
 //RECFM=FB,LRECL=80,SPACE=(CYL,(1,1,1)),UNIT=SYSALLDA,
 //DSNTYPE=LIBRARY
 //PDSE#A2  DD DISP=(NEW,CATLG),DSN

RES: XREF Members of JCL libs and their datasets

2015-02-13 Thread ITURIEL DO NASCIMENTO NETO
Hi,

There is a product we are testing that does it very well, among other 
capabilities.
The name is DINO Explorer (www.4bears.com.br) and I think they have parters in 
U.S.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1404
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Mitch
Enviada em: quinta-feira, 12 de fevereiro de 2015 20:45
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: XREF Members of JCL libs and their datasets

Everyone,

There are a number of tools that have various levels of XREF capability for 
JCL, but none, I repeat none, can match the RES Suite.  I have supported a 
number and/or competed against JCL tools for the past 33 years.


Mitch





-Original Message-
From: Nims,Alva John (Al) (Al) ajn...@ufl.edu
To: IBM-MAIN IBM-MAIN@LISTSERV.UA.EDU
Sent: Thu, Feb 12, 2015 3:00 pm
Subject: Re: XREF Members of JCL libs and their datasets


Take a look at File 270 from the CBTTAPE (cbttape.org) there is something 
called JCLXREF that might get you started.

There is  also FILE 379 that has a procedure to produce several different XREF 
JCL reports, although it looks to be designed to be used against a PROCLIB.

Al Nims
Systems Admin/Programmer 3
Information Technology
University of Florida
(352) 273-1298

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Wednesday, February 11, 2015 7:22 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: XREF Members of JCL libs and their datasets

I am looking to see if there are any easy ways to do the following

I have a huge JCL PDS.  I need to list out all members and the datasets they 
use (create/Del/open according to DISP= in JCL) I then need an xref by dsn and 
the jobs (member name = Job name in most cases) that use them

Report 1

Member1   DSN1Create
Member2   DSN1Open
  DSN2Open, Migrate (has a another step that issues the HSM 
Migrate command )
  DSN3Delete
  DSN4(mem) Open   -  Indicates control card input


Report 2
DSN1Member1   Member2
DSN2Member2
DSN3Member2
DSN4(mem)   Member2


Control card Input that affects the DSNx is okay to list - no need to know what 
is in the Control member at this time.

This information is not in a Scheduler package.  So this is just grunt type 
work.

I have a couple of options with REXX and SAS.  But thought if anyone had any 
ideas, I would like to see if there is another way to do this.

I will eventually run SMF data and compare it to these reports to see what is 
actually running or in use.

I can unload the JCL PDS into an IEBUPDTE file and go from there or use REXX 
with LM functions to read members one at a time.

Thoughts or suggestions always welcomed.


Lizette

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

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



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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system

RES: SYSNAME command in SDSF and IOF

2014-12-01 Thread ITURIEL DO NASCIMENTO NETO
Mr. Kaptein,

SDSF uses RMF to obtain information and display it in DA panel.
As far as I remember, there is a way to obtain this info from your IOF Lpars,
by loading in LPA some SDSF modules.

There is an explanation in IBM-MAIN archives, I think from Mr. Mark Zelden,
that I've tested and it worked.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Fred Kaptein
Enviada em: sexta-feira, 28 de novembro de 2014 19:54
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: SYSNAME command in SDSF and IOF

We have nine systems running in a sysplex. All of them are z/OS V1.13 and all 
of them are JES2.
The systems are called SYS1, SYS2, SYS3, SYS4, SYS5, SYS6, SYS7, SYS8 and SYS9
SYS1, SYS2, SYS3, SYS4, SYS5, SYS6 use IBM's SDSF to monitor jobs and the spool.
SYS7, SYS8, SYS9 use a product called IOF from Fischer International to do the 
same thing.

When entering the command   SYSNAME *   on SYS1, SYS2, SYS3, SYS4, SYS5, SYS6
we do not see any tasks running on SYS7, SYS8, SYS9.

Does anyone know why we can not see tasks from SYS7, SYS8, SYS9 from any of the 
other systems?

Thank you.

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Linklist load during IPL message

2014-10-07 Thread ITURIEL DO NASCIMENTO NETO
Good Point, verify all the IPL flow.


It seems to be obvious but verify if DSN3INI is in this SYSTEM.DB210.LINKLIST 
and
the dataset is really in LNKL01.

Are you specifying BEGINPARALLEL in IEFSSNxx ?
If so, put DB2/IRLM subsystems before BEGINPARALLEL and after SMS.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Elardus Engelbrecht
Enviada em: terça-feira, 7 de outubro de 2014 07:43
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Linklist load during IPL message

Jake anderson wrote:

 IEFJ004I SUBSYSTEM XXX NOT INITIALIZED - DSN3INI NOT FOUND

Post your IEFSSNxx containing entry for DSN3INI.

Cross check your SYSLOG message with what you intended to use in IEFSSNxx.

The same goes with Linklist, LPA, etc.

Check all your IPL members, all the way from LOADxx up to IEASYSxx, IEFSSNxx, 
etc.

Groete / Greetings
Elardus Engelbrecht

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Linklist load during IPL message

2014-10-06 Thread ITURIEL DO NASCIMENTO NETO
Hi,

In the past we had a problem in IPL when initializing DB2 subsystem.
The cause was that DB2 subsystem were been initialized before SMS subsystem,
causing an error. We changed SMS to be the first subsystem (as it should)
and everything initialized successfully.


Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Banco Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Jake anderson
Enviada em: segunda-feira, 6 de outubro de 2014 12:56
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Linklist load during IPL message

I did D PROG,LNKLST and ISRDDN and i see the SDSNLINK (after IPL) which has
DSN3INI module in it. I am not sure why i received the below message during
IPL

IEE252I MEMBER IEFSSN00 FOUND IN SYS1.PARMLIB
CSR002I BATCH LSR SUBSYSTEM BLSR INITIALIZATION COMPLETE.
IEFJ004I SUBSYSTEM xxx NOT INITIALIZED - DSN3INI NOT FOUND

Strange thing was I was able to remove and add the IEFSSN Subsystem entry
and the issue was fixed.

On Mon, Oct 6, 2014 at 9:18 PM, John McKown john.archie.mck...@gmail.com
wrote:

 As mentioned using DDLIST and doing a LINKLIST is helpful. An alternative
 is the z/OS operator command: d prog,lnklst

 On Mon, Oct 6, 2014 at 10:20 AM, Jake anderson justmainfra...@gmail.com
 wrote:

  Hi Group,
 
  We had a situation where a DB2 program DSN3INI was not found due to which
  the DB2 start up command showed invalid command.
 
  I checked up the SYSLOG and I do not see any evidence where LINKLIST
  libraries are loaded. Then Removed the DB2 subsystem dynamically from the
  IEFSSNxx and readded to the IEFSSNxx.
 
  It worked after the above band aid. Is there a way to verify if the
  LINKLIST library gets loaded during IPL time.
 
  Strange thing to see that DB2  SDSNLINK shows under D PROG,LNKLST and it
  was weird thing was that DSN3INI showed as not found during IPL time.
 
  Could someone throw light on the above.
 
 
  Jake
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 



 --
 There is nothing more pleasant than traveling and meeting new people!
 Genghis Khan

 Maranatha! 
 John McKown

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


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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RMF APIs

2014-05-09 Thread ITURIEL DO NASCIMENTO NETO

Hi all,

I'm doing an assembler program that needs to know actual CPU consumption of 
every Lpar in the Sysplex.
To address it my program is calling a Rexx that invokes SDSF environment to get 
this information.

It works but the design is poor. Are there any other solution, maybe RMF APIs ?

Thanks in advance.


Ituriel do Nascimento Neto
Banco Bradesco S/A
4254 / DPCD - Engenharia de Software
910 / Sistemas Operacionais Mainframe
Tel. :  55 11 3684-2177


Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: PFA (Now, an HZR subject)

2014-05-05 Thread ITURIEL DO NASCIMENTO NETO
I couldn't agree more.
Great tool and very easy to implement.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Marna WALLE
Enviada em: segunda-feira, 5 de maio de 2014 12:02
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: PFA (Now, an HZR subject)

Hi Brian,
Since you do mention HZR (Runtime Diagnostics), I have to say that I strongly 
recommend folks start using it!  It is a great function that costs practically 
nothing to set up and run.  If you want to look at some important system 
conditions extremely quickly and with a very low overhead, it is perfect.  And 
for newer people to platform, it can be particularly helpful.   At SHARE I've 
heard of additional functions that have been suggested for it even.

If you don't want to have PFA (which I view as an entirely different subject), 
still consider running HZR.  PFA can exploit HZR if it's there.  I find that 
several folks think that HZR is either a hard prereq for PFA, or *only* has 
value when using PFA.  Both of those aren't true.

Give HZR a shot...  It certainly won't be a big investment in time, and then 
see what you think.

-Marna WALLE
z/OS System Build
IBM Poughkeepsie

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: PFA (Now, an HZR subject)

2014-05-05 Thread ITURIEL DO NASCIMENTO NETO
Dave,

You can set OPERLOG in MONOPLEX environment.

Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427




Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Gibney, Dave
Enviada em: segunda-feira, 5 de maio de 2014 13:18
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: PFA (Now, an HZR subject)

It wasn't real hard to set up, but complained about missing OPERLOG. What is 
the point of OPERLOG with MONOPLEX?

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On Behalf Of Marna WALLE
 Sent: Monday, May 05, 2014 8:02 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: Re: PFA (Now, an HZR subject)

 Hi Brian,
 Since you do mention HZR (Runtime Diagnostics), I have to say that I
 strongly recommend folks start using it!  It is a great function that
 costs practically nothing to set up and run.  If you want to look at
 some important system conditions extremely quickly and with a very low
 overhead, it is perfect.  And for newer people to platform, it can be
 particularly helpful.   At SHARE I've heard of additional functions
 that have been suggested for it even.

 If you don't want to have PFA (which I view as an entirely different
 subject), still consider running HZR.  PFA can exploit HZR if it's
 there.  I find that several folks think that HZR is either a hard
 prereq for PFA, or *only* has value when using PFA.  Both of those
 aren't true.

 Give HZR a shot...  It certainly won't be a big investment in time, and
 then see what you think.

 -Marna WALLE
 z/OS System Build
 IBM Poughkeepsie

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

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


Test

2014-05-02 Thread ITURIEL DO NASCIMENTO NETO
Test

Ituriel do Nascimento Neto

Banco Bradesco S/A
4250 / DPCD - Engenharia de Software
910 / Sistemas Operacionais Mainframe
Tel. :  55 11 3684-2177


Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Messages Prefix

2014-03-28 Thread ITURIEL DO NASCIMENTO NETO
Charles,

Thanks for your feedback.
I was thinking in some other table, containing messages prefix, not products.
Something like ICH (RACF), HASP (JES2), SBL (BETA88) and so on.

Every time I try to open a new thread i got an error, and I still don't know 
why,
but responding works fine. I'll try to figure it out.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427




Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Charles Mills
Enviada em: sexta-feira, 28 de março de 2014 12:20
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Messages Prefix

Chicago-Soft (with which I am not affiliated) publishes a reference to all (for 
some values of all LOL) IBM and vendor messages.

http://quickref.com/newQuickRef/helpdocs/help?thisDoc=isvmessages7.8

If you think about it, the all requirement is an impossible standard. If such 
a table existed, I could bring out a new product tomorrow and the table would 
no longer contain all messages.

BTW, you should start a new thread, not reply to an existing e-mail. There is a 
thread identifier buried inside an e-mail and some e-mail clients group 
messages based on that identifier.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of ITURIEL DO NASCIMENTO NETO
Sent: Friday, March 28, 2014 7:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Messages Prefix

Hi all,

Does any of you know if there is a message prefix table, regarding all IBM and 
ISV products ?
I've tried to Google it but didn't find out specifically what is wanted.

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


Messages Prefix

2014-03-28 Thread ITURIEL DO NASCIMENTO NETO
Hi all,

Does any of you know if there is a message prefix table, regarding all IBM and 
ISV products ?
I've tried to Google it but didn't find out specifically what is wanted.

TIA

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Mike Schwab
Enviada em: terça-feira, 25 de março de 2014 18:05
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: JFCB LBI Blocksize

http://pic.dhe.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.idad400%2Fblksz.htm

Do not use the BLKSIZE field in the DCB. The system uses it. Use the
BLKSIZE field in the DCBE. For more information about DCBE field
descriptions see z/OS DFSMS Macro Instructions for Data Sets.

http://pic.dhe.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.idad500%2Fdcbem.htm

28(1C) 4 DCBEBLKSI BLKSIZE coded on DCBE macro or, if BLKSIZE=0 was
coded, value set by OPEN. After OPEN, this field is valid only if OPEN
set DCBESLBI on.

On Tue, Mar 25, 2014 at 3:12 PM, Chris Cantrell
chris.cantr...@palmettogba.com wrote:
 I have a COBOL program which flows through MVS storage areas to get the DSN, 
 VOLSERs, etc. for any open DD. I am currently getting the LRECL and BLOCKSIZE 
 from the JFCB area. I always get the LRECL. However, for LBI files ( 32k  
 blocksize) I always get zero for the BLOCKSIZE. This doesn't surprise me 
 because the field in the JFCB is only 2 bytes long. Does anyone know how I 
 would go about getting the larger block size? Thanks!

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



--
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...@listserv.ua.edu with the message: INFO IBM-MAIN

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Difference between MVS and z / OS systems

2014-03-18 Thread ITURIEL DO NASCIMENTO NETO
Hi,

MVS is Big Mac, z/OS is Number 3 (Big Mac+Fries+Coke)

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Chase, John
Enviada em: segunda-feira, 17 de março de 2014 15:34
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Difference between MVS and z / OS systems

 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Helio Jose Da Silva

 Hello list,

 Someone can tell me the relevant differences between the MVS and z / OS 
 systems?

MVS is the kernel; z/OS is the whole package.

-jc-

**
Information contained in this e-mail message and in any attachments thereto is 
confidential. If you are not the intended recipient, please destroy this 
message, delete any copies held on your systems, notify the sender immediately, 
and refrain from using or disclosing all or any part of its content to any 
other person.

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Console status after IEARELCN

2014-02-20 Thread ITURIEL DO NASCIMENTO NETO
Skip,

If you are at z/OS 2.1, you can dynamically add consoles.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Skip Robinson
Enviada em: quinta-feira, 20 de fevereiro de 2014 14:36
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Console status after IEARELCN

We need to activate an IODF to redefine (NIP) consoles. Activate does not
'redefine'. It deletes and adds back. These consoles are currently PINNED
and block IODF activation. I can run IEARELCN to remove them. After IODF
activate, is there any way to get the consoles back short of IPL?

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

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


Enforcing subparameters in a MVS command

2014-02-19 Thread ITURIEL DO NASCIMENTO NETO
Hi everyone,

I would like to know if there is a way to enforce subparameters that are not 
originally mandatory in a MVS command.
I know I could probably use a Console package like AutoOperator to do that, but 
I don’t intend to be tied up to an ISV
product because of it.

Are there any exit that can be used ?

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427


Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Enforcing subparameters in a MVS command

2014-02-19 Thread ITURIEL DO NASCIMENTO NETO
John,

Great.

Thanks.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427




Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Implicit VVDS creation

2014-02-06 Thread ITURIEL DO NASCIMENTO NETO
Since z/OS 1.13 there is a new IGGCATxx member in PARMLIB that
can be used to specify VVDS default space, among other parameters.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
David G. Schlecht
Enviada em: quinta-feira, 6 de fevereiro de 2014 15:55
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Implicit VVDS creation

Hold the presses! The documents for v1r13 say the VVDSSIZE defaults to TRKS(10 
10). Holy cow, that's a whole lot less than 10 cylinders.

One would think that at 10 tracks, the VVDS would run out of space (and 
extents) quite frequently but I don't see this being a frequent topic on 
IBM-MAIN.




David G. Schlecht | Information Technology Professional
State of Nevada | Department of Administration | Enterprise IT Services
T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David G. Schlecht
Sent: Thursday, February 06, 2014 9:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Implicit VVDS creation

Does anyone still build VVDS datasets explicitly when initializing volumes?

I understand that the default allocation for a new VVDS is CYLS(10 10) which 
saves me from having to rebuild the VVDS if it fills up.

What is everyone else doing with VVDS datasets? Is there still a valid argument 
for building them explicitly?


David G. Schlecht | Information Technology Professional State of Nevada | 
Department of Administration | Enterprise IT Services
T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov



This communication, including any attachments, may contain confidential 
information and is intended only for the individual or entity to which it is 
addressed. Any review, dissemination or copying of this communication by anyone 
other than the intended recipient is strictly prohibited. If you are not the 
intended recipient, please contact the sender by reply e-mail and delete all 
copies of the original message.

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

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: JES exit to Limit JOB parm Lines

2014-01-31 Thread ITURIEL DO NASCIMENTO NETO
There is no need of EXIT 4.
Just use EXIT 9.

Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Nims,Alva John (Al)
Enviada em: sexta-feira, 31 de janeiro de 2014 13:21
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: JES exit to Limit JOB parm Lines

One idea is a 2 Prong Attack version: You could code EXIT 4 which will allow 
you to get the /*JOBPARM statement and change the limit there and then use 
EXIT 9 to control what happens when the limit is exceeded.

That is one suggestion.

Alva (Al) John Nims
(352) 273-1298

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of mf db
Sent: Friday, January 31, 2014 9:54 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: JES exit to Limit JOB parm Lines

Hello Paul,

Good afternoon

Is there a EXIT which can limit or control the lines printed by a users Job ? 
Often our Education LPAR users are specifying *JOBPARM LINES= in there Job, 
so the long running jobs consumes the spool quickly.

Any suggestions are appreciated.

Peter

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

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: JES exit to Limit JOB parm Lines

2014-01-31 Thread ITURIEL DO NASCIMENTO NETO
Alva,

I think you are correct.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427




Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Nims,Alva John (Al)
Enviada em: sexta-feira, 31 de janeiro de 2014 14:20
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: JES exit to Limit JOB parm Lines

I would beg to differ, if the users are coding so that there is no limit, how 
will EXIT 9 ever get invoked?  I mentioned EXIT 4 to either now allow a large 
limit or to change it to a smaller amount and use EXIT 9 to control what 
happens when the new limit is exceeded.  Now I agree that I have not done this, 
but it sounds like a possible option.

Alva (Al) John Nims
(352) 273-1298

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of ITURIEL DO NASCIMENTO NETO
Sent: Friday, January 31, 2014 11:04 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: RES: JES exit to Limit JOB parm Lines

There is no need of EXIT 4.
Just use EXIT 9.

Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Nims,Alva John (Al) Enviada em: sexta-feira, 31 de janeiro de 2014 13:21
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: JES exit to Limit JOB parm Lines

One idea is a 2 Prong Attack version: You could code EXIT 4 which will allow 
you to get the /*JOBPARM statement and change the limit there and then use 
EXIT 9 to control what happens when the limit is exceeded.

That is one suggestion.

Alva (Al) John Nims
(352) 273-1298

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of mf db
Sent: Friday, January 31, 2014 9:54 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: JES exit to Limit JOB parm Lines

Hello Paul,

Good afternoon

Is there a EXIT which can limit or control the lines printed by a users Job ? 
Often our Education LPAR users are specifying *JOBPARM LINES= in there Job, 
so the long running jobs consumes the spool quickly.

Any suggestions are appreciated.

Peter

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

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação.
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é

RES: z/OS 2.1 toleration PTFs

2014-01-09 Thread ITURIEL DO NASCIMENTO NETO
Hi,

I don't know if z/OS 1.11 can coexist in the same Sysplex with z/OS 2.1.


Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Migration from Ca-sort to Dfsort (z/os) : any experience or paper ?

2013-12-04 Thread ITURIEL DO NASCIMENTO NETO
There is no need to USERMOD anymore.
You can define ICEMAC parameters in ICEPRMxx of PARMLIB and invoke ICEOPT proc.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Lizette Koehler
Enviada em: quarta-feira, 4 de dezembro de 2013 12:02
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Migration from Ca-sort to Dfsort (z/os) : any experience or paper ?

IIRC - Not difficult if you are not using anything unique to CA Sort. All sort 
products (DFSORT, SYNCSORT, and CA SORT) are mostly interchangeable.  The 
PGM=SORT is the same in all three and I think the Control Cards are mostly the 
same.  Sort is one product where interchangeability seemed to rule.

If DFSORT is not installed as your primary z/OS sort product do one of the 
following:

Add the DFSORT SORTLPA library to the link pack area list; then add the 
DFSORT SICELINK library to the link list.
OR
Add the DFSORT SICELINK library to the link list; then add the DFSORT 
SORTLPA library to the link list.

Important: If any non-IBM primary sort product is installed in the link 
list, install DFSORT in the link list, in system search order.
Recommendation: If any non-IBM primary sort product is installed in the 
link pack area, add the DFSORT libraries to the link list.

For testing, you can
Add the DFSORT SICELINK library to the JOBLIB statement; then add the 
DFSORT SORTLPA library to the JOBLIB statement.

Add the DFSORT SICELINK library to the STEPLIB DD statement; then add the 
DFSORT SORTLPA library to the STEPLIB DD statement.

Add the DFSORT modules to a private library that is equivalent to one of 
the above configurations.

You may need to update IFAPRDxx in SYS1.PARMLIB to enable DFSORT.

Review any configuration done in CA Sort with ICEMACx members.  I think you 
need a usermod for these.

But you can test with STEPLIBs for a few of your sort jobs. Once you know those 
work, you can probably just change the CA Sort to be below DFSORT in LINKLST 
and LPALST

I think the DFSORT libraries are part of the system install so you may already 
have them in your system.

You may just need to review how to locate them and plan how to swap out the CA 
Sort information.

Review the SVC 17 ESR and see if that is still needed.

Review any configuration and see how ICEMACx may need to be updated.


I think IBM Support may have info on this process.

Lizette

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
 Behalf Of Denis Manach
 Sent: Wednesday, December 04, 2013 6:34 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: Migration from Ca-sort to Dfsort (z/os) : any experience or paper ?

 Hi,
 We run z/os 1.13 with ca-sort 7.1 (a Computer Associates product).
 This sort software is discontinued since January 30, 2012 and I’m trying to 
 evaluate
 the project of migration to dfsort in order to be full compatible and 
 supported when
 z/os 2.1 will come.
 Before starting migration, I should be happy finding some document or 
 experience
 about compatibility between these two sort softwares (supported files, sort 
 functions
 and parameters, default sort options) in order to help me answer such 
 questions:
 - Are there parameters wrotten differently ?
 - Are there some ca-sort parameter which has no equivalent in dfsort ?
 - how long migration can spend ?
 Ibm support could not help me in this task.
 This IBM-MAIN Forum topic Has anyone replaced ca-sort with ibm sort recently?
 any issues? says it is not very difficult without bringing more information.
 We use ca-sort in a basic way :
 - Svc 17 esr loaded at ipl time
 - a module defining default sort options
 - 4000 batch sort steps
 o //STEP030  EXEC PGM=SORT
 o //SORTIN   DD   DSN=FPAIMA.AIMA864A,DISP=SHR
 o //SORTOUT  DD   DSN=FPAIMA.AIMA864A,DISP=SHR
 o //SORTWK01 DD   UNIT=SYSWK,SPACE=(CYL,(25,1),RLSE)
 o //SORTWK02 DD   UNIT=SYSWK,SPACE=(CYL,(25,1),RLSE)
 o //SORTWK03 DD   UNIT=SYSWK,SPACE=(CYL,(25,1),RLSE)
 o //SYSOUT   DD   SYSOUT=*
 o //SYSINDD   *
 o  SORT FIELDS=(1,38,A),FORMAT=CH
 - SUM FIELDS=NONE
 o /*
 - Sort modules are in linklist
 - Of course above sysin changes according to application’s need
 - We don’t use sort exits and very few sorts are invoked by programs 
 rather
 than by JCLs
 Regards
 Denis


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

AVISO LEGAL br...Esta mensagem é destinada

RES: Creation Date

2013-08-27 Thread ITURIEL DO NASCIMENTO NETO
Mr Wood,

We do have a tape management product named AFM, from a brazilian company (GFS).
This product does not actually has a data base, using only Catalog Information
to retain volumes. That's why it's important to keep the original creation date.

GFS has a utility that can do that, but we would like an alternative way.

Atenciosamente / Regards / Saludos

BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Ituriel do Nascimento Neto
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427




Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Mike Wood
Enviada em: terça-feira, 27 de agosto de 2013 12:27
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Creation Date

Why is the creation date of the catalog entry so important?

Normally it is the creation date of the data set in the tape management system 
data base that is important. So when copying data from an old volume to a newer 
one, the tools that make the copy normally update the creation date to match 
the original (as well as updating other key information to reflect the original 
creation).

There are no commands to alter/modify catalog entries in the way you ask.

Mike Wood

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: WLM managed workload

2013-07-24 Thread ITURIEL DO NASCIMENTO NETO
Kees,

The intent of JES2 and WLM is not to balance batch workload.
WLM does not want that jobs, transactions be fast, WLM wants them happy, and for
WLM, happy means PI less than 1.

We have seen in the past a terrible work done by JES2 and WLM when spreading 
batch
jobs in several images of a JESPLEX, where a Lpar was running at 90% while 
others
were running at 30%. Despite Load discrepancy, all goals were been met, but it's
ugly to see and hard to explain.

Actually there is a redbook that explains in detail how they work together, and
it is very illustrative 
(http://www.redbooks.ibm.com/redbooks/pdfs/sg246472.pdf).

I think there is no easy way to do what you want, if there is.

Our goal here was to spread batch workload in a way that all Lpars should be 
running
with similar load, and to do so, we have developed a batch load scheduling that 
put
things in order, and now we see no big differences among Lpars involved.



Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Vernooij, CP - SPLXM
Enviada em: quarta-feira, 24 de julho de 2013 10:38
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: WLM managed workload

Allan,

With WLM managing where work is initiated, I meant, that, when more capacity 
is needed, WLM starts WLM Managed Initiators where capacity is available and 
stops them on systems that are full. By means of this it has control over where 
jobs in WLM managed jobclasses are initiated and doint so it can route more 
work to one system and less work to another. In other words, it can help 
balance the load of the systems in the sysplex.

My complaint/wish is, that it should do more to route work from full and 
overloaded systems to full but yet not overloaded systems. However, it 
considers systems over 95% utilized equally as full, as if they cannot be 
helped anymore and I think they can.

Kees.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Staller, Allan
Sent: Wednesday, July 24, 2013 14:50
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: WLM managed workload

WLM considers all LPARs within the sysplex to be equal. WLM by itself, has no 
control over where the work is initiated.

In conjunction with JES2 at the z/OS 2.4 level and higher, the ability was 
created to allow work to be started via workload managed initiators.

Without going into the details, job queue time is now included as part of the 
WLM performance index when deciding whether to add work to the system.

Also with WLM managed initiators, the current PI for the work on a given LPAR 
Is taken into consideration when deciding where to initiate the work (subject 
to other considerations(scheduling environment, system affinity,.) ). This 
can also be complicated by a multiple JESPLEX with a SYSPLEX.

The short story on Workload Managed initiators is as follows:
1) JES2 and WLM initiators can be mixed at will. Each jobclass defined/used 
should be either JES or WLM managed, but not both. i.e. a given jobclass is 
either workload managed or jes managed.
2) A separate WLM service class should be defined for the WLM managed work to 
prevent misleading PI's based on the queue time component of the WLM PI 
calculation.

There is a lot more to this, and I suggest reading the JES2 and WLM manuals 
extensively before proceeding. There are also several presentations from 
SHARE, that are quite helpful.

HTH,

snip
WLM takes the load and performance of LPARs in consideration, by starting and 
stopping WLM Managed Initiators on systems that have capacity available or are 
overloaded. But it does this very coarse, putting a line at 95% utilization.
When you have several LPARs that are running near 100%, some of which are 
overloaded with a bad PI and others still can take more load, WLM considers 
them all the same.
I am looking too at a mechanism to manage WLM managed batch on this type of 
LPARs. I think the way I go is by allowing or withholding certain jobclasses 
from certain systems with the $tjobclass(a,b,c,d),QAFF=-name and QAFF=+name. I 
do this now manually every now and then when I see an overloaded system, but I 
am still looking for an interface to the information you mention (PI, capping) 
to automate this.
it is really a miss, that WLM does not do this more detailed.

Kees.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Munif Sadek
Sent: Wednesday, July 24, 2013 07:02
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: WLM managed workload

Dear Listers

Can some one please point me in the right direction to implement WLM managed 
job

RES: Same LPA library in LPALIST

2013-07-23 Thread ITURIEL DO NASCIMENTO NETO
Actually you can update an entire library by issueing SETPROG 
LPA,ADD,DSN=,MASK=*,
and then you update the SVC with SETPROG 
LPA,ADD,DSN=xxx,MODNAME=,SVCNUMDEC=254.



Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427



Agora é BRA. BRA de Brasil. BRA de Bradesco.
Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Staller, Allan
Enviada em: terça-feira, 23 de julho de 2013 10:08
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: Same LPA library in LPALIST

To modify LPALIST, an IPL is required. Are you saying this product is 
(updating/replacing) the user SVC 254? Or more than just the SVC?

In general, you can replace LPA resident modules w/SETPROG 
LPA,ADD,MOD=lmodname,DSNAME=dsname .  Works for 1 or 2modules, otherwise it 
gets quite cumbersome.

I believe (from a quick reading of the manual (MVS SYSTEM COMMANDs - SETPROG 
LPA) you will need an additional operand (SVCNUMDEC=svcnum) to update the SVC 
table

HTH,

snip
I am in a process of applying a fix to a product which eventually changes the 
LPA library of the product. So as a backup I have overridden the DDDEF by 
specifying a newly created LPA library(Copied from the existing one from LPA 
queue).

Since Current LPA queue addresses SVC 254, for testing purpose can i add the 
new ly updated LPA dynamically to LPALIST ?

Z/OS : 1.13
/snip

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


IEBPDSE

2013-03-11 Thread ITURIEL DO NASCIMENTO NETO
Hi all,

We're trying to monitor some PDSE datasets, mainly concerning fragmentation,
and IEBPDSE was the logical choice to indicate if the dataset is ok or not.

The utility runs successfully, but we couldn't find out any documentation 
regarding
the indicators presented in SYSPRINT.

That's what IEBPDSE shows:

IGW700I PDSE Directory Validation Successful
DSN:XX.
ADPages:17806 IXRecords:716420
NDPages:3462 IXRecords:286228
AD ND Tree Nodes:286228
ADPercentFree:26 NDPercentFree:42

Can you point me to the right direction ?

Thanks in advance.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4250 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 3684-4427


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: PDSE Fragmentation

2012-09-06 Thread ITURIEL DO NASCIMENTO NETO
Lizette,

Thanks for your feedback. I'll check it out.

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4254 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 4197-2814

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Lizette Koehler
Enviada em: segunda-feira, 3 de setembro de 2012 11:41
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Re: PDSE Fragmentation

You might check into the tool

PDSE and HFS Analysis Tool (PHATOOL)

The PHATOOL is a service aid that operates as a application program. Its
purpose is to check
and analyze the directory structures (such as AD and ND) and display the
allocation of data
set pages. Note that:
 The PHATOOL is not a PDSE verification tool.
 The PHATOOL does not perform a consistency check between the attribute and
name
directory structures.
 The PHATOOL does not check member data.

This is documented in the REDBOOK:  Partitioned Data Set Extended Usage
Guide   SG24-6106-01 (May 2005)


It might show you the fragmentation in the Directory of the PDSE which could
allow you to verify a need for a reorg.

Depending on your z/OS level there was a split in z/OS V1.12 (I think) where
a new program for PDS/E datasets was created by IBM so you did not need to
use IEBCOPY.

Lizette


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


PDSE Fragmentation

2012-09-03 Thread ITURIEL DO NASCIMENTO NETO
Hi again,

From time to time we can perceive degradation in some PDSE librarys,
what indicates it's time to reorg. But it's purely based on felling.

Are there any tool or utility that actually shows fragmentation index
of a library ?
Are there any rule of thumb for PDSE reorg ?


Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4254 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 4197-2814


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


zHPF - YES or NO

2012-08-31 Thread ITURIEL DO NASCIMENTO NETO
Hi all,

I was talking with a coworker about zHPF and I want to hear your opinion
about it.
If you turned it on, did you actually measure the benefits ?
If so, did you use RMF reports or any other tool ?

TIA


Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4254 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 4197-2814


AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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


RES: Sad News About Rick Fochtman

2012-07-02 Thread ITURIEL DO NASCIMENTO NETO
Please, send our condolences to his family.
He was a contributor of great value to this list.

Atenciosamente / Regards / Saludos


Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4254 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 3684-2177 R: 42177 3-1402
Fax: +55 11 4197-2814

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em nome de 
Mohammad Khan
Enviada em: segunda-feira, 2 de julho de 2012 10:08
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: Sad News About Rick Fochtman

For all who have know Rick,
 Rick Fochtman has been having some health issues lately. I called Rick 
yesterday to check on him. My call was answered by his brother who informed me 
that Rick passed away on Friday of natural causes. He was a nice person and I 
was fortunate to meet and know him.

Mohammad

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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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