Juan Carlos
Veamos te tomaste un minuto para ver el PRINTSCREEN, que te envíe,
respuesta NO
si lo hubieses visto, te darías cuenta que el separador para *EUR es el
Punto(.)
Si quieres concatenar datos para obtener una fecha

Exec SQL Set :ParmFecha = to_date(char(:TempDia)||
char(:TempMes)||char(:TempAno), 'dd/mm/yyyy')

Debe ser
Exec SQL Set :ParmFecha = char(:TempDia) + '.'
                                           + char(:TempMes) + '.'
                                           + char(:TempAno)

*Sergio Luis Puentes Valladares*
Desarrollador SR IBM AS400 - RPG/COBOL



*Móvil/WhatsApp **(AR)+54 911  5341 3272*

*               (CL)+56 9    9612 8330*

*Skype/Hangouts  [email protected] <[email protected]>*








El lun, 22 mar 2021 a las 17:10, Juan Pelaez (<[email protected]>)
escribió:

> En la máquina donde estoy compilando el formato por omisión es DMY (ddmmaa
> ), he cambiado al compilar por *EUR para que cogiera el dd.MM.AAAA pero
> sigue dando el mismo error ….
>
>
>
>
>
>
>
> *De:* Forum.help400 [mailto:[email protected]] *En
> nombre de *Juan Carlos Paredes
> *Enviado el:* lunes, 22 de marzo de 2021 20:52
> *Para:* forum.help400
> *Asunto:* RE: Problemas al compilar con sentencias Free
>
>
>
> Me suena a error en el formato de fecha. Hay parámetros en el compilador
> para indicar el formato que quieres usar. También lo puedes cambiar en el
> código con una sentencia SET OPTION. No tengo ahora la máquina delante pero
> creo recordar que el formato por defecto es *DMY, que trabaja con el año de
> 2 digitos.
>
> Puede que en alguno de los dos equipos estén modificados los valores por
> defecto.
>
> Obtener BlueMail para Android <http://www.bluemail.me/r?b=16696>
>
> En 22 mar. 2021, en 20:45, [email protected] escribió:
>
> La línea a que apunta es esta :
>
>
>
> Exec SQL
>
>   Set :ParmFecha =
>
>        to_date(char(:TempDia)||char(:TempMes)||char(:TempAno),
>
>                'dd/mm/yyyy');
>
>
>
> *De:* Forum.help400 <[email protected]> *En
> nombre de *Juan Carlos Paredes
> *Enviado el:* lunes, 22 de marzo de 2021 20:42
> *Para:* forum.help400 <[email protected]>
> *Asunto:* RE: Problemas al compilar con sentencias Free
>
>
>
> Ojo. Es un error del pre-compilador de SQL, no del compilador. Mira a ver
> en qué sentencia está utilizando ese campo. Ten en cuenta que el motor de
> DB2 ha cambiado mucho en las últimas versiones. Es posible que se esté
> utilizando de alguna manera que no está soportada en 7.1
>
> Obtener BlueMail para Android <http://www.bluemail.me/r?b=16696>
>
> En 22 mar. 2021, en 20:34, [email protected] escribió:
>
> Me dice :
>
>
>
> SQL0303  30    1162  Posición 21 La variable PARMFECHA no es compatible o
> el
>
>                      valor es demasiado largo.
>
>
>
> La definición :
>
>
>
> D parmFecha       S               d
>
> D TempDia           S              2  0
>
>
>
> He copiado dos campos para tener una referencia de las posiciones
>
>
>
>
>
>
>
> *De:* Forum.help400 <[email protected]> *En
> nombre de *Juan Carlos Paredes
> *Enviado el:* lunes, 22 de marzo de 2021 20:27
> *Para:* forum.help400 <[email protected]>
> *Asunto:* RE: Problemas al compilar con sentencias Free
>
>
>
> Eso ya es bastante más raro. ¿Puedes enviar los errores exactos que da el
> compilador?
>
> Obtener BlueMail para Android <http://www.bluemail.me/r?b=16696>
>
> En 22 mar. 2021, en 20:24, [email protected] escribió:
>
> Gracias,
>
>
>
> No nos importa añadirle el /free  /end-free, no es nuestro mayor problema
> pero que NO reconozca nombres largos en free o el tipo D de campo Fecha
>
>
>
> Nos tiene moscas …
>
>
>
> Gracias
>
>
>
>
>
>
>
> *De:* Forum.help400 <[email protected]> *En
> nombre de *Juan Carlos Paredes
> *Enviado el:* lunes, 22 de marzo de 2021 20:18
> *Para:* forum.help400 <[email protected]>
> *Asunto:* Re: Problemas al compilar con sentencias Free
>
>
>
> No, Sergio. Creo que fue en la versión 7.2 cuando dejó de ser necesario el
> free y end-free. Si la máquina de origen está en 7.3 es lógico que compile
> sin errores.
>
> Obtener BlueMail para Android <http://www.bluemail.me/r?b=16696>
>
> En 22 mar. 2021, en 20:13, Sergio Luis Puentes-Valladares <
> [email protected]> escribió:
>
> Juan
>
> Me perdonaras, pero no puede ser que sin /free  y /end-free, no de error
>
> sabemos por experiencia, que no todo lo que dice un usuario es correcto
>
> o verdadero, una pregunta uds están trabajando en Free Rpg o Full Free?
>
> porque si es Full Free solo requieres indicar como primera linea de codigo
>
> /Free y se da por entendido que es Full Free (Algo para tener en cuenta)
>
> con respecto a la longitud del nombre de las variables, eso me parece muy
>
> rarisimo, tengo SubRutinas de 9 y 10 Caracteres, Variable con igual o mas
>
> caracteres y nunca he tenido problemas
>
> favor envia listado de source o compilación
>
> Saludos
>
>
>
> *Sergio Luis Puentes Valladares*
> Desarrollador SR IBM AS400 - RPG/COBOL
>
>
>
> *Móvil/WhatsApp (AR)+54 911  5341 3272*
>
> *               (CL)+56 9    9612 8330*
>
> *Skype/Hangouts  [email protected] <[email protected]>*
>
>
>
>
>
>
>
>
>
>
>
> El lun, 22 mar 2021 a las 16:01, <[email protected]> escribió:
>
> Buenas tardes,
>
>
>
> Vamos a iniciar un trabajos que consiste en mejorar y ampliar unos
> programas hechos en Free y mezcla ( normal y Free ), provienen de una
>
> Máquina en versión 7.3, hemos instalado el savf en una máquina en 7.1.
>
>
>
> Los programas son casi todos SQLRPGLE
>
>
>
> Nos hemos encontrado con programas con sentencias Free pero sin el
> consabido /free   /end-Free nos comenta el cliente que el no tiene problema
> al compilar
>
> 14 (CRTSQLRPGI) no le da problemas pero nosotros hemos tenido que
> añadírselo, aún así los problemas de compilación persisten, por ejemplo
> subrutinas en free
>
> Con nombre muy largos no los reconoce así como definición de campos como
> el parmFecha :
>
>
>
> Me parece muy extraño que de una 7.1 a una 7.3 exista tanta diferencia
> como para tener semejantes errores.
>
>
>
> ¿ Se nos escapa algo al compilar ¿?
>
>
>
> Muchas gracias,
>
>
>
>
>
>
>
> D parmFecha       S               d
>
> D TempDia         S              2  0
>
>
>
>
> <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=emailclient>
>
> Libre de virus. www.avast.com
> <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=emailclient>
>
> ____________________________________________________
> Ú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.
>
> ------------------------------
>
>
> �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.
____________________________________________________
�nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 � Publicaciones Help400, S.L.

Reply via email to