|
Hola
a todos.
He preparado un modulo para exportar un procedimiento de este y usarlo desde
una función SQL, hasta aquí todo ok, el problema me viene a que depurando el
SRVPGM veo que los parámetros de entrada no me los toma (haciendo un debug,
entran sin valor, cuando este se lo paso) y no veo el porque. He probado todas
las opciones posibles, ¡ que se me han ocurrido ¡ y nada de nada....... Líneas
de inicio del modulo ***************
Principio de datos ******************** H
NOMAIN
Ffichero1 IF
E K
Disk
usropn Ffichero2 IF
E K
Disk
usropn * Definición
prototipos
DRecCanal
PR 2s
0
D
Agsin
5s
0
D
Agnin
5s
0
PRecCanal
B
EXPORT DRecCanal
PI 2s
0
D
Agsin
5s
0
D
Agnin
5s 0
* variables de uso
interno
D
Ags
S
5S
0
D
Agn
S
5S
0
. . . Creación
de la función CREATE
FUNCTION RECUPERACANAL (AGS DECIMAL(5, 0) , AGN DECIMAL(5, 0) )
RETURNS DECIMAL(2, 0)
LANGUAGE RPGLE
EXTERNAL NAME 'DTASAL/CARGACNDM@(RECCANAL)'
PARAMETER STYLE GENERAL; Esta
es la llamada al SQL SELECT RECUPERACANAL(agedel, agenum) FROM fichero where agedel=5000 and
agenum=51; ó SELECT RECUPERACANAL(5000, 51) FROM fichero; Y los
valores que paso en el sql están rellenos, los he forzado a mano, etc. Si
alguien ve algo y me puede ayudar ......., me estoy volviendo
loco.............. Un
saludo a todos y gracias de antemano. Jesús |
