Subject: Programa JSON

2018-09-06 Por tema Jorge Ubeda 
Para Jesús Mª Arzak Capilla...
Nuestra experiencia ha sido con servicios REST, y , si bien no lo hemos
aplicado en el propio servicio, JSON.
En ambos casos hemos partido de las rutinas de Scott Klement. Estimo que
las conocerás, y quizá las estés usando. El problema del juego de
caracteres también lo hemos pasado, y parcialmente lo hemos resuelto. Estoy
seguro de que debemos mejorar la solución, pero será cuando volvamos a
necesitar ocuparnos del problema.
En nuestra solución, basados en varios casos que estuvimos siguiendo y
analizando de otros desarrolladores, hemos optado por convertir primero las
corrientes de datos (strings, streams) al juego de caracteres americano,
que es el que parece ser el que se puede manipular. Si tu problema está en
este nivel, y nuestra aproximación te sirve, puedo tratar de explicarte
nuestra experiencia, que quizá te resulte aplicable.

Jorge Ubeda


Buenos Dias
Estoy intentando crear un WebService JSON en RPGLE
Es la primera vez que lo hago de esta manera pero no tengo forma de
visualizar los datos
Estoy en V73
El prg es muy sencillo
El resultado no es legible en WRK salen chinos.
Alguna sugerencia?
Gracias

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: agrupar y concatenar lineas SQL

2018-09-06 Por tema Fernando Idem 
Tienes toda la razón del mundo :-).
La versión del sistema es la 7.1, pero en otro servidor con la versión 7.3
si funciona.
Gracias por tu respuesta
Un saludo


El jue., 6 sept. 2018 a las 18:01, Carlos ()
escribió:

> Hola
>
> ¿En qué versión estás?. Si no me equivoco LISTAGG es nueva en la 7.2
>
> Saludos
> Carlos
>
>
> El 06/09/18 a las 16:08, Fernando Idem escribió:
>
> Buenas tardes;
>
> Tengo un fichero que quiero agrupar por cliente y concatenar las
> observaciones.
> Estoy utilizando esta orden SQL pero me da error
> *LISTAGG en *LIBL de tipo *N no encontrado.*
>
> SELECT NCCLIE,
>LISTAGG(ncobs, ', ') WITHIN GROUP (ORDER BY ncobs) AS OBS
>   FROM biblioteca/fichero
>  GROUP BY NCCLIE
>
> No se porque sale este error, esta puesto en un libro de IBM.
>
> Agradezco vuestras opiniones.
>
> Un saludo
>
>
>
>
> 
> Ú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.

Re: agrupar y concatenar lineas SQL

2018-09-06 Por tema Carlos 

Hola

¿En qué versión estás?. Si no me equivoco LISTAGG es nueva en la 7.2

Saludos
Carlos


El 06/09/18 a las 16:08, Fernando Idem escribió:

Buenas tardes;

Tengo un fichero que quiero agrupar por cliente y concatenar las 
observaciones.

Estoy utilizando esta orden SQL pero me da error
/LISTAGG en *LIBL de tipo *N no encontrado./

SELECT NCCLIE,
       LISTAGG(ncobs, ', ') WITHIN GROUP (ORDER BY ncobs) AS OBS
  FROM biblioteca/fichero
 GROUP BY NCCLIE

No se porque sale este error, esta puesto en un libro de IBM.

Agradezco vuestras opiniones.

Un saludo




Ú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.

SQL reporte de linea a columnas

2018-09-06 Por tema Juan Gutierrez Ruiz 
Buenos días Foro

Estoy tratando de cambiar una tabla que se genera a través de un RPG a nivel 
línea detalle
y la transfiere a excel

EMPLEADO  NOMBRE Concepto Descripción  Importe
145JUAN   1000   SUELDO  
1500.00
145JUAN   1001   PREMIO ASISTENCIA  279.50
145JUAN   5010   DESCUENTO IMSS 51.49

146 TOÑO 1000 SUELDO 
1200.00
146 TOÑO  1001PREMIO ASISTENCIA  279.50
 146 TOÑO 5010DESCUENTO IMSS 51.49
 .
 .
 .
pero el usuario quiero que salga asi

EMPLEADO   NOMBRE   SUELDO PREMIO ASISTENCIA  DESCUENTOS  IMSS
145  JUAN  1500   
279.5051.49
146  TOÑO 1200   279.50 
   51.49



Estoy haciendo un RPG para genera la tabla , sin embargo quisiera saber su 
atraves de un Store Procedure SQL lo pueda transformar la tabla del as400

mil gracias , espero me puedan dar una pista

saludos





Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

agrupar y concatenar lineas SQL

2018-09-06 Por tema Fernando Idem 
Buenas tardes;

Tengo un fichero que quiero agrupar por cliente y concatenar las
observaciones.
Estoy utilizando esta orden SQL pero me da error
*LISTAGG en *LIBL de tipo *N no encontrado.*

SELECT NCCLIE,
   LISTAGG(ncobs, ', ') WITHIN GROUP (ORDER BY ncobs) AS OBS
  FROM biblioteca/fichero
 GROUP BY NCCLIE

No se porque sale este error, esta puesto en un libro de IBM.

Agradezco vuestras opiniones.

Un saludo

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Generar codigos OMR

2018-09-06 Por tema Jose Luis Hernandez Riesgo 
Buenos días a todos

No se si alguno habéis trabajado con códigos OMR (Optical Mark
Recognition), pero necesito generarlos en una serie de documentos es algo
parecido a la generación de códigos de barra.

Os cuento un poco mi casuística

Los códigos son unas marcas que se imprimen y que en función de la ausencia
o presencia de las mismas indica un orden de secuencia de los documentos
impresos. En mi caso esto sirve para controlar la secuencia de documentos
en una ensobradora. Es un sistema que lee las marcas y como espera una
secuencia determinada, garantiza que en cada sobre van los documentos que
tienen que ir.

Imaginad que quiero ensobrar una factura, una carta de cambio de tarifas y
una hoja de marketing para cada proveedor. El programa generará los tres
documentos y tendrá que imprimir una marca (OMR) diferente para cada
documento. Esto se repetirá por cada proveedor.

Una vez generadas e impresas el taco de documentos irá ordenado: Proveedor
1- DOC1-DOC2-DOC3 ; Proveedor 2- DOC1-DOC2-DOC3; y sucesivos.

Se carga en la ensobradora, y esta mediante un software de lectura de OMR
detecta la secuencia y garantiza que ensobra una misma secuencia de tres
documentos en el mismo sobre.

Dicho lo cual, si alguno habéis tenido experiencia generando estos códigos
y me puede ayudar un poco lo agradecería.

Muchas gracias a todos.

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: PASE, QSHELL y manejo de errores

2018-09-06 Por tema marti . riera 
Facil,

Mira este enlace:
https://www-01.ibm.com/support/docview.wss?crawler=1=nas8N1010012

Saludos
Martí Riera
www.as400howto.com




Missatge de Javier Mora  del dia dj., 6 de set. 2018 a
les 11:16:

> Hola a tod@s,
>
>
>
> he de reconocer que estoy un poco oxidado con todo lo relacionado con PASE
> y QSHELL, pero me encuentro con un problema que no sé cómo resolver y llevo
> dos días buscando solución.
>
>
>
> Desde unos programas en CL estoy llamando a PASE (QP2SHELL) para ejecutar
> unos comandos AIX. Cuando éstos fallan normalmente devuelven el error a
> STDERR y aparecen en una especie de consola. Además, tampoco puedo saber si
> ha fallado o no el comando PASE.
>
>
>
> Necesito evitar la salida a pantalla del error y controlar (algo similar a
> MONMSG) si se ha producido el error y qué tipo de error.
>
>
>
> ¿Alguien sabe cómo?
>
>
>
> He hecho pruebas también con QSHELL, pero me encuentro en la misma
> situación. En algunos artículos o comentarios he encontrado opiniones
> dispares. Algunos recomiendan no usar QP2SHELL y otros lo mismo con QSHELL.
> Yo no veo mucha diferencia salvo en la forma de llamar al comando.
>
>
>
> ¿Algún comentario respecto a esto?
>
>
>
> Saludos a todos y gracias por vuestros comentarios.
>
>
>
> Javier Mora
> 
> Ú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.

Para los GALLEGOS

2018-09-06 Por tema Juan Pelaez 
Buenos días,



Me preguntaba si alguno por aquí podría necesitar un “refuerzo temporal” en
su empresa por algún apuro o punta de trabajo…… ¿



Gracias,



Juan Pelaez

610 284 683

i...@isgal.com 







---
El software de antivirus Avast ha analizado este correo electrónico en busca de 
virus.
https://www.avast.com/antivirus

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.