Excelente, funciono. También le tuve que agregar el archivo destino como una
sola variable CHAR
Quedo así:
DCL VAR(&FROMOBJ) TYPE(*CHAR) LEN(132)
DCL VAR(&TOSTMF) TYPE(*CHAR) LEN(132)
CHGVAR VAR(&FROMOBJ) VALUE('/QSYS.LIB/SAVF.LIB/' +
*CAT &ODLBNM *TCAT '.FILE')
CHGVAR VAR(&TOSTMF) VALUE('/PRUEBA/' *CAT &ODLBNM)
CPYTOSTMF FROMMBR(&FROMOBJ) TOSTMF(&TOSTMF)
GRACIAS!!!
José
De: [email protected]
[mailto:[email protected]] En nombre de Raul Bascones
Enviado el: Martes, 01 de Febrero de 2011 05:19 p.m.
Para: forum.help400
Asunto: Re: VARIABLE EN CPYTOSTMF
Sería más o menos así:
DCL &VAR *CHAR 132
CHGVAR &VAR ('/QSYS.LIB/SAVF.LIB/' *CAT &ODLBNM *TCAT '.FILE')
CPYTOSTMF FROMMBR(&VAR) TOSTMF('/PRUEBA/')
Saludos,
Raúl
El 1 de febrero de 2011 21:07, Jose Lingeri <[email protected]
<mailto:[email protected]> > escribió:
Buenas, alguien sabe si se le puede pasar una variable al CPYTOSTMF?
Dentro de un CL luego de realizar una operación quiero copiar el objeto al
IFS pasándole una variable y me dice que no encuentra el objeto &odlbnm.file
CPYTOSTMF FROMMBR('/QSYS.LIB/SAVF.LIB/&ODLBNM.FILE')
TOSTMF('/PRUEBA/')
Gracias.
Jose.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd
<http://bit.ly/db68dd> )
Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
