I Don't know if you can get this information from DCBE, but it's available in Format1 DSCB.
TM DS1FLAG1,DS1COMPR JO RETBUFNO Atenciosamente / Regards / Saludos Ituriel do Nascimento Neto Banco Bradesco S/A 4254 - DPCD Engenharia de Software Sistemas Operacionais Mainframes Tel: 55 11 4197-2021 R: 22021 Fax: 55 11 4197-2814 |-----Mensagem original----- |De: IBM Mainframe Discussion List |[mailto:[EMAIL PROTECTED] Em nome de Greg Price |Enviada em: quarta-feira, 25 de junho de 2008 23:07 |Para: [email protected] |Assunto: Sequential compressed (on disk) - how to tell? | |Howdy do. | |When I have an open SAM DCB (OUTPUT, if that matters) I want |to be able to find out if the data set is a DASD compressed |data set. Can this be done? | |AFAIK, compressed sequential data sets must be extended-format |data sets, but extended-format data sets do not have to be |compressed data sets. | |When using a DCBE with the DCB, DCBENSTR can be tested and if |zero the data set is not extended format - and therefore I |think can't be a compressed data set. | |But, if DCBENSTR is non-zero, then the data set is an |extended-format (and therefore DASD) data set, but can I tell |if it is a compressed data set or not? | |(I only mention DASD explicitly here so we don't go down the |tape compaction cul-de-sac.) | |Thanks a bunch. |Greg | |---------------------------------------------------------------------- |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 | | <HTML><font face="Tahoma" size="1"><HR>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. <HTML><font face="Tahoma" size="1"><HR>LEGAL ADVICE <br>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
