Te comento mas sobre esto, primero el mmm01 de archisys lo pase al IFS y este 
se llama casruvip03.txt, ahora lo que quise es regresar para ver la 
funcionalidad del comando, pero el regreso no me da correcto (es decir, el 
carácter de separación decimal es el mismo que se usa en el as400).


De: [email protected] 
[mailto:[email protected]] En nombre de Marti Riera
Enviado el: lunes, 30 de marzo de 2009 14:23
Para: forum.help400
Asunto: Re: Copiar archivos IFS

Hola Mauro,

Ahi tienes un bonito problema. Es tu trabajo el verificar que los datos de los 
campos que vas a copiar son compatibles, en principio tu le dices que que esta 
delimitado, pero cual es el delimitador en el .txt (*TAB?) debes decirselo al 
mandato ya que por omision es ;

Tambien tendras de tener el cuenta si el separador decimal en tu sistema es el 
punto o la coma. En el txt es el punto, no?.

Ahora no recuerdo si el mensaje de error tambien da pistas del campo y/o 
registro que te esta dando error. En fin hay mucho de prueba/error en esto las 
primeras veces.

Suerte
2009/3/30 Peñaherrera, Mauro 
<[email protected]<mailto:[email protected]>>

Correcto, pero tengo algunas inquietudes ya que se me presenta el siguiente 
mensaje:



 CPYFRMIMPF FROMSTMF('/www/casruvip03.txt') TOFILE(ARCHISYS/MMM01) MBROPT(*

ADD) RCDDLM(*ALL) DTAFMT(*DLM) DATFMT(*YMD) TIMFMT(*ISO)



Se ha modificado la propiedad del objeto QCPIMTEMPS en QTEMP del tipo

  *USRSPC.

Se ha modificado la propiedad del objeto QACPTEMP01 en QTEMP del tipo

  *USRSPC.

Se ha modificado la propiedad del objeto QCFT800104 en QTEMP del tipo

  *USRSPC.

Se ha modificado la propiedad del objeto Q3F062 en QTEMP del tipo *FILE.

La copia no se completó debido al código de razón 7.



ID de mensaje  . . . . :   CPF2845       Gravedad . . . . . . . :   40

Tipo de mensaje  . . . :   Diagnóstico



    7 - El campo numérico FROMFILE *N contiene caracteres en blanco, u otros

  caracteres que no son válidos para un campo numérico.



Si el archivo casruvip03.txt tiene:



4073450000028127        2009-03-304073450000028127        282.86           33.70

4073450000071622        2009-03-304073450000071622        1345.90          
201.67

4073450000078163        2009-03-304073450000078163        394.25           23.44

4073450000081175        2009-03-304073450000081175        90.73            .00

4073450000082884        2009-03-304073450000082884        252.17           22.04

4073450000085473        2009-03-304073450000085473        295.37           30.75



Y el archivo mmm01 tiene:



EQEONB          Numero Tarjeta Diners                                  22    0

EQA0DT          Fecha de Castigo                                       10   L

EQBBNB          TARJETA PRINCIPAL                                      22    0

EQRKNB          Capital Castigado                                      15    2

EQRLNB          Interes Castigado                                      15    2

                                                                        Final





De: 
[email protected]<mailto:[email protected]>
 
[mailto:[email protected]<mailto:[email protected]>]
 En nombre de Marti Riera
Enviado el: lunes, 30 de marzo de 2009 13:45
Para: forum.help400
Asunto: Re: Copiar archivos IFS



Mauro,

Mirate la ayuda del mandato CPYFRMIMPF.

Saludos

2009/3/30 Peñaherrera, Mauro 
<[email protected]<mailto:[email protected]>>

Hola Foro:



Necesito copiar un archivo del IFS a una librería del as400, sabe alguien como 
hacer o donde puedo conseguir información.



Gracias.





________________________________

Nota de descargo: La información contenida en este e - mail y sus anexos es 
confidencial y sólo puede ser utilizada por el destinatario del mismo. Esta 
información no debe ser distribuida, ni copiada total o parcialmente por ningún 
medio sin la autorización de DINERS/INTERDIN. Además, DINERS/INTERDIN no asume 
responsabilidad sobre información, opiniones o criterios contenidos en este 
e-mail.

Disclaimer: The information contained in this e-mail and its attached files are 
confidential and intended only for the use of the person to which it is 
addressed. This information can not be totally or partially distributed nor 
copied by any media without the authorization from DINERS/INTERDIN. In 
addition, DINERS/INTERDIN does not assume responsibility about this 
information, opinions or criteria contented in this e-mail.

__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de ServerNEWS.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400



--
Martí Riera

__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de ServerNEWS.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400



--
Martí Riera
__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de ServerNEWS.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a