Muchísimas gracias Àlex,
Voy a ver cómo puedo aplicar esto. Supongo que al tener que automatizar la llegada de estos caracteres para subirlos al Iseries, necesito poder detectarlos antes y substituirlos por las dobles vocales y comillas. Creo que es la mejor solución. En la prueba que me pasaste tu insertas los códigos con un “insert” en SQL sobre cada campo, pero yo necesito hacerlo desde el fichero CSV o directamente desde el EXCEL que sería lo correcto. Lo he probado, pero con el CPYFRMIMPF no me funciona, cada vez que deseo visualizar estos campos con el CCSID cambiado tengo que hacer un CHGJOB y como estas descripciones han de visualizarse para todo el personal tendría que hacer maravillas para automatizarlo tendría que tocar un montón de CL. Os comento la solución salomónica que he adoptado de momento: Primero, reprender a la persona que hace las traducciones en Francés para que deje de utilizar acentos “ ´ ” como apostrofes “ ‘ “, “œ” como “oe”, “ æ” como “ae” y unos “ ̶ “ que creo que es el símbolo de tachado en lugar del “-“ simple. Segundo, he creado una macro sencilla en Excel para Buscar y Reemplazar todos estos caracteres por sus correctos correspondientes. Tercero, subir al ISeriesAS400 el fichero resultante des del mismo Excel con un programa Visual Basic que ya usábamos anteriormente. Finalmente, verificar en el ISeries mediante un pequeño programa que lista todos los artículos que puedan tener aún caracteres x”3F” en su descripción, que son los que nos dan error al trabajar con ellos. Seguiré probando cosas e intentando buscar una solución más directa desde el mismo Excel para subirlo directamente. Os pongo al corriente si llego a alguna parte. Saludos a todos. *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Alex Martínez *Enviado el:* dimarts, 6 de març de 2018 9:37 *Para:* forum.help400 <forum.help400@listas.combios.es> *Asunto:* Re: Caracteres especiales que no suben correctamente al AS400 Hola yo creo que el caracter œ no lo puedes almacenar en archivos con los CCSID que indicas; quizas la solución sencilla sea reemplazar por una doble vocal oe; para el valor jusqu’à creo que simplemente la comilla debe ser una *doble **comilla simple* Lo que si puedes tener es un archivo compilado con CCSID 1145 y puedes tener definidos campos en otro CCSID específico como el 924 (tanto con DDS como con SQL) Consulta las paginas de codigos para salir de dudas CCSID 924 http://www.tachyonsoft.com/cp00924.htm https://en.wikipedia.org/wiki/EBCDIC_924 el caracter œ NO está los CCSID 1147 http://www.tachyonsoft.com/cp01147.htm ni en el 1145 http://www.tachyonsoft.com/cp01145.htm ni en el 297 http://www.tachyonsoft.com/cp00297.htm La prueba que me ha funcionado es definir un campo de la tabla con CCSID 924, y para visualizarlo correctamente en una sesión 5250 el trabajo debería usar también el CCSID 924 *y tener habilitado el soporte unicode * A UNIQUE A R RPRD A PRDCOD 8S 0 COLHDG('Producto') A PRDDES 50 COLHDG('Descripción')* CCSID(924) <= archivo creado con CRTPF y CCSID 1145 pero este campo es CCSID 924* A K PRDCOD Desde sesión 5250 antes de STRSQL cambiar trabajo CHGJOB CCSID(924) INSERT INTO PRODF8 VALUES(1, 'jusqu''à') <== usar doble comilla !!! INSERT INTO PRODF8 VALUES(2, 'nœud') SELECT * FROM PRODF8 Producto Descripción 1 jusqu'à 2 nœud El 5 de marzo de 2018, 17:01, LLuis Segura <lseg...@puntoblanco.com> escribió: Muy buenas tardes Alex, Gracias por responder, el fichero CSV viene de un Excel que he pasado a CSV, al mirarlo en Notepad++ me da la información que está en ANSI. Creo que es el CCSID 367. Y el fichero de destino en el AS400 quiero que traspase a 1145 o lo que es lo mismo el CCSID del sistema que sería *FILE en el mandato. Me convierte correctamente casi todos los caracteres pero hay algunos que no hay manera. He probado con diversas páginas de código y no hay forma. He probado CCSID ORIGEN con: 367 ANSI 1208 UTF8 WITH IBM PUA (pasando el fichero CSV a UTF8 mediante Notepad++) 1209 UTF8 (ídem Anterior) 1010 FRENCH ISO 1147 FRENCH ECECP 1145 ESPAÑA ECECP Y nada no hay manera. Según que códigos me pierde incluso todos los acentos. Ejemplo fichero Excel de entrada: [image: cid:image004.png@01D3B532.9F656150] Ejemplo del fichero convertido a CSV en ANSI: [image: cid:image005.png@01D3B532.9F656150] Ejemplo fichero de salida en ISeries: [image: cid:image006.png@01D3B532.9F656150] No sé si se verán correctamente las imágenes. Saludos. Lluís. *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Alex Martínez *Enviado el:* dilluns, 5 de març de 2018 9:24 *Para:* forum.help400 <forum.help400@listas.combios.es> *Asunto:* Re: Caracteres especiales que no suben correctamente al AS400 Hola Aqui lo importante es las páginas de códigos ASCII y CCSID con los que quieres trabajar, incluyendo archivos y sesión 5250, impresora, transferencia de datos, etc ¿El archivo COMTEXT con qué CCSID está creado? el CSV entiendo que está en 1252 ¿no? ¿vas a usar el CCSID de francia 1147, el español 1145 o UTF-8 1208? por ejemplo. Salu2 El 2 de marzo de 2018, 18:17, LLuis Segura <lseg...@puntoblanco.com> escribió: Muy buenos días a tod@s, Tengo un pequeño problema, seguramente se habrá comentado algo parecido en el foro pero no encuentro nada ni googleando. Nos envían un fichero en Excel con unos textos en Francés que debo subir al Iseries y me encuentro con que llegan caracteres especiales como “œ” de “nœud” o algunos apostrofes “jusqu’à” que no hay forma que me suban correctamente, se quedan con un X”3F” hexa que queda visualizado más o menos como “jusqu□à” en el Archivo del Iseries. Estoy haciendo la transferencia con CPYFRMIMPF con un fichero de descripción de campos, también he probado convirtiendo el Excel a CNV y subirlo con el mismo mandato pero *DLM, también he probado con funciones de transferencia varias des de Iseries Access o desde Access Client Solution y siempre me deja estos caracteres especiales, he probado también con distintas páginas de código CCSID pero no llego a solucionar el problema. Copiar de archivo importación (CPYFRMIMPF) Teclee elecciones, pulse Intro. Archivo continuo origen . . . . > '/home/lluis/comtextCSV.CSV' Desde archivo: Archivo . . . . . . . . . . . Nombre Biblioteca . . . . . . . . . *LIBL Nombre, *LIBL, *CURLIB Miembro . . . . . . . . . . . *FIRST Nombre, *FIRST, *ALL A archivo de base de datos: Archivo . . . . . . . . . . . > COMTEXT Nombre Biblioteca . . . . . . . . . > LLUIS Nombre, *LIBL, *CURLIB Miembro . . . . . . . . . . . *FIRST Nombre, *FIRST, *FROMMBR, *ALL Sustituir o añadir registros . . > *REPLACE *ADD, *REPLACE, *UPDADD Long registro arch continuo . . *TOFILE Número, *TOFILE De CCSID . . . . . . . . . . . . > 1010 1-65533, *FILE A CCSID . . . . . . . . . . . . *FILE 1-65533, *FILE Delimitador de registro . . . . > *CRLF Valor tipo carácter, *ALL... Formato reg arch importación . . *DLM *DLM, *FIXED Más... Copiar de archivo importación (CPYFRMIMPF) Teclee elecciones, pulse Intro. Delimitador de serie . . . . . . *DBLQUOTE Valor tipo carácter... Carácter de escape tipo serie . *STRDLM Valor tipo carácter... Eliminar blancos . . . . . . . . *LEADING *NONE, *LEADING, *TRAILING... Delimitador de campo . . . . . . > ';' Valor tipo carácter, *TAB Archivo de definición campos: Archivo . . . . . . . . . . . Nombre Biblioteca . . . . . . . . . *LIBL Nombre, *LIBL, *CURLIB Miembro . . . . . . . . . . . *FIRST Nombre, *FIRST, *ALL Coma decimal . . . . . . . . . . *PERIOD *PERIOD, *COMMA Modalidad redondeo flot decim . *HALFEVEN *HALFEVEN, *HALFDOWN... Formato de fecha . . . . . . . . *ISO *ISO, *USA, *EUR, *JIS... Separador de fecha . . . . . . . '/' /, -, ., ,, *BLANK Formato de hora . . . . . . . . *ISO *ISO, *USA, *EUR, *JIS, *HMS Separador para horas . . . . . . ':' :, ., *BLANK Más... Alguien tiene una varita mágica y me puede echar una mano. Saludos a todos y muy buen finde. *Lluís Segura i Rosich* *Sistemes d'Informació* [image: cid:image001.jpg@01CE936F.96AB8880] *Industrias Valls 1,S.A. – Av. Balmes, 16 – 08700 IGUALADA* *e-mail: **lseg...@puntoblanco.com* <lseg...@puntoblanco.com> *Tel. **+34 93 8035252* <938%2003%2052%2052>* – Fax: **+34 93 8044362* <938%2004%2043%2062> *www.puntoblanco.com* <http://www.puntoblanco.com/>* / *[image: cid:image002.jpg@01CE936F.96AB8880]*http://www.facebook.com/puntoblanco* <http://www.facebook.com/puntoblanco> ____________________________________________________ Ú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.
