|
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 |
begin:vcard fn;quoted-printable:Fernando P=C3=A9rez n;quoted-printable:P=C3=A9rez;Fernando org:;Sistemas email;internet:[EMAIL PROTECTED] tel;work:Ext. 627 x-mozilla-html:TRUE version:2.1 end:vcard
