A K RTABLA
A CAMPO1 5S 0
A CAMPO2 50A
A CAMPO3 2S 0
A CAMPO4 2S 0
y ejecuta un CPYFRMIMPF similar a este
CPYFRMIMPF FROMSTMF('/archivo.txt')
TOFILE(BIBLIOTECA/TABLA)
MBROPT(*REPLACE)
RCDDLM(*CRLF)
STRDLM(*NONE)
FLDDLM(';')
Salu2
El día 13/07/06, Paco <
[EMAIL PROTECTED]> escribió:
Hola Compañeros, recibo este archivo y quisiera leerlo par incluirlo en una base de datos,
teneis alguna rutinilla que lo haga teniendo en cuenta que uno de los campos es de varios
tamaños y va separado por ; ¿??¿¿¿
45313;YEPES;045;45
16373;YEMEDA;016;16
28609;VILLAMANTILLA;028;22
28610;VILLAMANTA;028;22
28598;VILLAMANRIQUE DE TAJO;028;36
41850;VILLAMANRIQUE DE LA CONDESA;041;15
Gracias.
Saludos
Paco Medina
Exclusivas Camacho, S.Ltda.
Dtor.Informatica
--
Mi blog sobre as400
http://www.ajut400.com
