Hola Raul. Ya está solucionado. Era el CCSID que tenía puesto el que viene por defecto. Gracias.
De: "Raul Bascones" <[email protected]> Para: "forum.help400" <[email protected]> Fecha: 17/09/2019 11:04 Asunto: ** Newsletter ** Re: Recuperar columnas de una tabla Enviado por: [email protected] Buenas días, Tal vez te pueda valer así: select column_name, cast(column_heading as char(100)) from qsys2/syscolumns where table_name=trim(:@table) and Table_schema=trim(:@esquema); He puesto 100 por poner algo. Un saludo. El mar., 17 sept. 2019 a las 9:08, Alberto Martinez (< [email protected]>) 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.
