Re: Replacement product for CA-Vantage

2011-03-16 Thread Roberto Pacheco
Hello Renato,

It depents what CA-Vantage functions you use. If its is related to DASD
infomation only, there are several products in the market.
Let me know what are the functions, I tell you which products you can use.

Regards,

Roberto Pacheco
4bears Technologies
2011/3/15 Renato Schweizer 

> Hello List
>
> does anybody know a product to replace CA-Vantage ? Should be a cheaper
> one. Any suggestions ?
>
> Thanks
> Renato
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>



-- 
Roberto Pacheco
11 8141-2608

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


Re: Check TAPE Contents

2011-03-23 Thread Roberto Pacheco
Hello Sergio,

Usually TMSs have this kind of utility to map tapes. What's the TMS in your
installation? Tell me the name the TMS then I can tell the name of utility
you can use.

Regards,

Roberto Pacheco
4bears Technologies

2011/3/23 Sergio Lima 

> Hello List,
>
> We have some tapes here, that came from another system, and then, We need
> look the contents of that.
> We know that DITTO with TP functions, can help us, but, unfortunatelly ,
> our DITTO is not customized for use, and We can't found the DITTO
> INSTALLATION AND CUSTOMIZATION MANUAL.
> When try run the JOB :
>
> //DITTOPRT JOB MSGCLASS=A,NOTIFY=&SYSUID,REGION=0M,TIME=NOLIMIT
> //DITVERIF EXEC PGM=DITTO
> //STEPLIB  DD  DSN=DIT.SDITMOD1,DISP=SHR
> //SYSPRINT DD  SYSOUT=*
> //DD1  DD  UNIT=/AF01,VOL=SER=GR0039,DISP=OLD
> //SYSABEND DD  SYSOUT=*
> //SYSUDUMP DD  SYSOUT=*
> //SYSINDD  *
> $$DITTO TP INPUT=DD1,NFILES=01
> $$DITTO REW OUTPUT=DD1
> $$DITTO EOJ
> /*
>
> Receive this message :
>
> DITTO/ESA for MVS
> $$DITTO TP INPUT=DD1,NFILES=01
> DIT0330I Not authorized for TP
> Keyword verification for any subsequent commands continues
> $$DITTO REW OUTPUT=DD1
> $$DITTO EOJ
>
> Looking the message DIT0330I  in the Manual, show this :
>
> DIT0330I Not authorized for function
> Explanation: Your user ID is not authorized to use the
> function that you specified.
> User Response: If you need to use this function,
> contact your system support to enable your user ID for
> | this function or function group. Refer to the DITTO/ESA
> | Installation and Customization Guide.
>
>
> Someone can help us please, or if exist another program , or way to see the
> contents of a tape.
>
> Thanks very much,
>
> Sergio Lima Costa
> Sao Paulo - Brazil
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>



-- 
Roberto Pacheco
11 8141-2608

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


RES: EDGINERS erase problem

2009-06-19 Thread Roberto Pacheco
It think the problem is related to MIH (Missing Interrupt Handling), Try to
increase the number to 30 minutes for 3490-c22 tape addresses.

Regards
Roberto Pacheco
GFS Technical Support
Phone: +55 11 3817 6300
e-mail: pach...@gfs.com.br
web:    www.gfs.com.br




-Mensagem original-
De: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] Em nome de
R.S.
Enviada em: sexta-feira, 19 de junho de 2009 17:43
Para: IBM-MAIN@bama.ua.edu
Assunto: EDGINERS erase problem

I have a problem with EDGINERS ERASE job and 3490E-C22 standalone drives.
The following job:
//K10  EXEC PGM=EDGINERS
//SYSPRINT DD SYSOUT=*
//TAPE DD UNIT=(3490,,DEFER)
//SYSINDD *
  ERASE VOLUME(E12345) RACK(E12345)

Ends with


IOS000I 0572,**,SIM,**,**06,,**,,SRSKEDG 

EDG6601E I/O ERROR ERASING VOLUME E12345,SRSKEDG ,K10 
,0572,T,,**- OP,UNKNOWN COND.  ,**,
  EXCP 

EDG6601E CONT:- 

IOS000I 0572,**,SIM,**,**06,,**,,SRSKEDG 

EDG6624E VOLUME E12345 ERASE FAILED 

EDG6631I UTILITY EDGINERS COMPLETED WITH RETURN CODE 12

I tried the same job on other drives. It fails on any 3490E-C22. It 
works on 3590-H and 3592 (with other media of course).
The 3490E drives can be used for read or write without problems. The 
problem occurs with EDGINERS only.

Any clue?

-- 
Radoslaw Skorupka
Lodz, Poland


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

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

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

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


CCW format 1 support

2009-10-19 Thread Roberto Pacheco
Srs.

 

Anybody knows which version of z/OS was included support for CCW format 1?
Was it in z/OS 1.4?

I'm asking this because I have lots of programs using ccw format1 running in
z/OS 1.8 and 1.10 perfectly for tapes, but when I run these programs on z/OS
1.4 I'm receiving abend SB00, that is, 0C4 reason 4 inside IECVXCCW.

 

Could you help me?

 

Thank you in advance.

 

 

Regards,

Roberto Pacheco
Technical Support
GFS Software

 

 


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


Re: Display CSA and ESQA

2011-08-29 Thread Roberto Pacheco
Hello Sergio,

Through RMF monitor 3 you can get this information. 
Access RMF interface, option 3 (Monitor III), option 3 (Resource) and option
10 (STORC Common storage summary) 

Regards,
Roberto Pacheco
4bears Technologies
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Sérgio Lima Costa
Sent: segunda-feira, 29 de agosto de 2011 18:11
To: IBM-MAIN@bama.ua.edu
Subject: Display CSA and ESQA

Hello list,

Someone, know, if have a command that show who is using  the CSA , and ESQA
áreas from ZOS ?

We are running ZOS 1.12.

Thanks very much

Sergio Lima Costa


"Atenção: Esta mensagem foi enviada para uso exclusivo do(s)
destinatários(s) acima identificado(s),
podendo conter informações e/ou documentos confidencias/privilegiados e seu
sigilo é protegido por
lei. Caso você tenha recebido por engano, por favor, informe o remetente e
apague-a de seu sistema.
Notificamos que é proibido por lei a sua retenção, disseminação,
distribuição, cópia ou uso sem
expressa autorização do remetente. Opiniões pessoais do remetente não
refletem, necessariamente,
o ponto de vista da companhia, o qual é divulgado somente por pessoas
autorizadas."

"Warning: This message was sent for exclusive use of the addressees above
identified, possibly
containing information and or privileged/confidential documents whose
content is protected by law.
In case you have mistakenly received it, please notify the sender and delete
it from your system.
Be noticed that the law forbids the retention, dissemination, distribution,
copy or use without
express authorization from the sender. Personal opinions of the sender do
not necessarily reflect
the company's point of view, which is only divulged by authorized
personnel."

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

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


RES: smf question

2006-11-14 Thread Roberto Pacheco
Yes, there are three SMF records:

Record Type 61 - Define Catalog entry,
Record Type 65 - Delete Catalog entry and  
Record Type 66 - Alter  Catalog entry.

If you have any doubt don't hesitate to contact me.

Roberto Pacheco
GFS Software
Phone: +55 11 3817 6313
e-mail: [EMAIL PROTECTED]
 


-Mensagem original-
De: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] Em nome de Matt 
Dazzo
Enviada em: terça-feira, 14 de novembro de 2006 13:41
Para: IBM-MAIN@BAMA.UA.EDU
Assunto: smf question

Is there an smf record to track when a catalog was changed/updated or when a 
dataset was uncataloged? We have a mystery as to how several datasets were 
deleted in the mvs catalog then scratched by the tape management system. Thanks

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

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


RES: Best aproach - IEANTRT+BALR or LINK

2006-12-01 Thread Roberto Pacheco
Hello Ituriel,

You can use the GFSIPL utility, which is part of GFS/AFM Tape Management 
System. Using this, you can load into MLPA your module Dynamically. 
The only restriction, every time you load this module into memory you will 
waste more MLPA, because this utility does not release the module loaded before.


Best regards, 

Roberto Pacheco
Phone: +55 11 3817 6313
e-mail: [EMAIL PROTECTED]
web: www.gfs-software.com.br
 


-Mensagem original-
De: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] Em nome de ITURIEL 
DO NASCIMENTO NETO
Enviada em: sexta-feira, 1 de dezembro de 2006 14:03
Para: IBM-MAIN@BAMA.UA.EDU
Assunto: Best aproach - IEANTRT+BALR or LINK

Mainframers,

We have been using na OPEN exit (IFG0EX0B) for years sucessfully and every time 
we have to do some maintenance an IPL is needed. To circunvent it i`ll change 
it to a front-end exit which actually invokes the real code. I'm thinking in 
something like that :

a) Before

IFG0EX0B:
DO
All Stuff
END



b) After Option 1

PGMA:/* Part of an Address Space started at IPL time */
DO
CSVDYLPA Request=ADD Member=XXX0EX0B
LOAD EP=XXX0EX0B
ST   R0,AddressLpa
IEANTCR  ( AddressLpa )
END

IFG0EX0B:/* OPEN EXIT */
DO
IEANTRT  ( AddressLpa )
LTR  R15,R15
JZ   Do_Not_Call_XXX0EX0B
LR15,AddressLpa
BALR R14,R15
END

XXX0EX0B:/* Loaded previously to LPA by CSVDYLPA  */
DO
All Stuff
END


c) After Option 2

PGMA:/* Part of an Address Space started at IPL time */
DO
CSVDYLPA Request=ADD Member=XXX0EX0B
END

IFG0EX0B:/*  OPEN EXIT  */ 
DO
LINK EP=XXX0EX0B,ERRET=Do_Not_Call_XXX0EX0B
END

XXX0EX0B:/* Loaded previously to LPA by CSVDYLPA  */
DO
All Stuff
END

I would like some advice related to performance aspects specially because there 
are some circunstances where XXX0EX0B may be removed from LPA.
Your help will be very appreciated.

Thanks in advance


Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
Banco Bradesco S/A
4254/DPCD Alphaville
Suporte Técnico - Software Básico Mainframes

Tel: 55 11 4197-2021   Fax: 55 11 4197-2814






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

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