Correcto.
He cambiado el QCCSID a 1145 y el QCHRID 695-1145 y funciona
perfectamente.
Gracias por la pista.
;)
De: "Alex Martínez" <ajut...@gmail.com>
Para: "forum.help400" <forum.help400@listas.combios.es>
Fecha: 17/09/2019 09:54
Asunto: ** Newsletter ** Re: Recuperar columnas de una tabla
Enviado por: forum.help400-boun...@listas.combios.es
Hola
¿por casualidad el trabajo utiliza el CCSID 65535 ?
El mar., 17 sept. 2019 a las 9:08, Alberto Martinez (<
alberto.marti...@roler.es>) escribió:
Hola Foro
Estoy haciendo una función que me recupere los nombres de las columnas de
una tabla y las pase a un array.
pero al recuperarlas, me da el error SQLCOD -332 Character conversion is
not defined.
E
Tanto column_name como column_heading son dos campos del tipo varchar y
los tengo definidos así en el programa:
D Reg_col DS
D@name 128 Varying
D@Heading 60 Varying
El fuente es éste:
Exec SQl declare @cursor cursor for
select column_name, column_heading from qsys2/syscolumns
where table_name=trim(:@table) and Table_schema=trim(:@esquema);
Exec SQl open @cursor;
Dow sqlcod<>100 and sqlcod>=0;
Exec sql fetch next from @cursor into :reg_col;
If Sqlcod<>100 and sqlcod>=0;
@i+=1;
ds_col(@i)=reg_col;
ENDIF;
Exec SQL close @cursor;
Alguien me puede dar una pista?
Gracias!
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( 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.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
