Prueba con:
c/EXEC SQL
c+  SET :j_Return=week(:p_Data)
c/END-EXEC

-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] 
Enviado el: viernes, 21 de marzo de 2003 12:47
Para: [EMAIL PROTECTED]
Asunto: [SQLRPGLE] Retornar el valor de una funci�n SQL a un campo RPG sin
la instrucci�n SELECT



Hola iSauris, tengo un problema, y me suena que si que se puede hacer, pero
ni recuerdo como, ni encuentro en ningun sitio como hacerlo.

Tengo que recuperar el n�mero de la semana a partir de una fecha, y la
instrucci�n Week del SQL me va bien, as� que hago:


d p_Data          s               d   DatFmt(*EUR) Inz(*Sys)
d j_Return        s              2p 0
c*
c/EXEC SQL SET OPTION DATFMT = *EUR, TIMFMT = *ISO
c/END-EXEC
c*
c/EXEC SQL
c+  Select week(:p_Data) into :j_Return
c+  from prifusu where rrn(prifusu)=1
c/END-EXEC

Lo del Select de un archivo para un unico registro es un WorkArround para no
llamarlo chapuza, y eso, si alguien me puede indicar como poner el valor de
una funci�n SQL en una variable, estar� muy agradecido :-)

fins aviat...
�lex Corretg�





_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es _____________________________________________________

Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]

_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]

Responder a