Lectura de un miembro de PDS

[Rubén Fernández]

Favor, alguien me puede corregir..
tengo un programa Assembler que debe procesar un miembro de PDS y siempre tengo ABEND 0C4.
mis definiciones y accesos:

ENTRADA DCB DDNAME=ENTRA,MACRF=R,EODAD=FINARCH,DSORG=PO, X
RECFM=FB,LRECL=80
...


OPEN (ENTRADA,INPUT)


*==============================================
* Lectura del archivo de entrada
*==============================================
LEER GET ENTRADA,REGENT

No entiendo que es lo que estoy haciendo mal, ya que cambio la DCB a PS y funciona impecable.

Gracias
RFF

[Vicente]

Hola Ruben.
A diferencia del fichero que es la liberia, para el sistema un miembro de una librería es un fichero secuencial.
PO identifica una organización PDS (librería) y es utilizado a la hora de crearla o de tratamientos especificos al utilizar el fichero como librería; pero ojo este fichero es la librería no un miembro cualquiera de ella.
Los miembros de las librerías siempre son tratados como organización secuencial es decir PS, es por ello que con PO no construyes el Bloque de Control de manejo correctamente.

Para más información puedes consultar el manual: DFSMS Using Data Sets, libro de cabecera para el programados que maneje ficheros, en particular tu caso se explica en el capítulo Specifyin and Initializing Data Control Blocks, en el apartado Selecting Dataset Options.

Un saludo

[Rubén Fernández]

Gracias Vicente, seguire tu consejo y te cuento.
Atte
RFF