|
Fernando, muchas gracias, esa es la solución,
estaba enfrascado con WRKOBJPDM y QUSLOBJ
Jaime Villa T.
----- Mensaje original -----
Enviado: Lunes, 08 de Agosto de 2005
09:07 a.m.
Asunto: Re: WRKOBJPDM-Jesús Olague
Una forma de hacerlo:
DSPFD FILE(BIB/*ALL)
TYPE(*BASATR) OUTPUT(*OUTFILE) OUTFILE(QTEMP/FD)
En el campo ADTDAT
tendrás 'D' para una archivo de datos y 'S' para un archivo
fuente.
Jesus Olague escribió:
Jaime. El formato OBJL0200 trae el atributo extendido del objeto a
partir de la posición 31 (32 en RPG OPM), no recuerdo si su valor es
diferente para archivos fisicos de datos y de fuentes, pero supongo
que si.
Saludos.
-- Saludos.
Fernando
Pérez
Cerámica Saloni.
Dpto. Sistemas
|