Re: Ayuda con CPYF

[informatic]

Prueba :     '*IF IPROD *EQ' *CAT &PITEM En/na Gerardo Santillana ha escrit:   Tengo un CL que recibe un parametro (numero de articulo),  y uso el comando CPYF para copiar  solo ese articulo de un archivo a otro,  este es el comando que uso   DCL        VAR(&PITEM) TYPE(*CHAR) LEN(35)   CPYF       FROMFILE(IIM) TOFILE(TV81MMUSRF/PKMIIM) +               MBROPT(*REPLACE) INCREL((*IF IPROD *EQ +              &PITEM))                              lo que esta pasando es que se intento copiar el articulo 'TJ600    ',  resulta que el comando copio todos los registros que tuvieran el TJ600, (e.g.  TJ600-00, TJ600-13....ETC)   si lo ejecuto en modo interactivo funcion bien y solo me copia un solo registro que es lo que necesito   CPYF FROMFILE(IIM)                        TOFILE(PKMIIM)                       MBROPT(*REPLACE)                     INCREL((*IF IPROD *EQ 'TJ600 '))   Alguna idea?   Saludos The New Busy think 9 to 5 is a cute idea. Combine multiple calendars with Hotmail. Get busy. ____________________________________________________ © Publicaciones Help400, S.L.

____________________________________________________
© Publicaciones Help400, S.L.