RECORRER REGISTROS DE UN PROCEDIMIENTO ALMACENADO
Publicado por JUAN (1 intervención) el 26/08/2010 15:42:50
Buen día, les agradezco su ayuda..
necesito crear un procedimiento almacenado que me recorra una tabla y me actualice en otra, este es el codigo que llevo, pero no me funciona..
LA BASE ES DB2
CREATE PROCEDURE SIPLA.PRUEBA2 ( )
LANGUAGE SQL
BEGIN
DECLARE VRTIPIDE VARCHAR ( 30 ) ;
DECLARE VRNUMIDE VARCHAR ( 20 ) ;
DECLARE VRAGENCIA DECIMAL ;
DECLARE C_CLIENTES CURSOR FOR
SELECT TIPO_ID_CLIENTE ,
ID_CLIENTE ,
AGENCIA
FROM APORTES
WHERE ESTADOS = 0 ;
OPEN C_CLIENTES ;
FETCH NEXT FROM C_CLIENTES INTO VRTIPIDE ,
VRNUMIDE ,
VRAGENCIA ;
WHILE @@FETCH_STATUS = 0
BEGIN
UPDATE SIPLA . TERCEROS SET SUCURSAL_CODIGO = VRAGENCIA , COMENTARIOS = '1'
WHERE TIPIDE_CODIGO = VRTIPIDE AND NUMIDE = VRNUMIDE ;
END ;
END;
CLOSE C_CLIENTES ;
COMMIT ;
END ;
necesito crear un procedimiento almacenado que me recorra una tabla y me actualice en otra, este es el codigo que llevo, pero no me funciona..
LA BASE ES DB2
CREATE PROCEDURE SIPLA.PRUEBA2 ( )
LANGUAGE SQL
BEGIN
DECLARE VRTIPIDE VARCHAR ( 30 ) ;
DECLARE VRNUMIDE VARCHAR ( 20 ) ;
DECLARE VRAGENCIA DECIMAL ;
DECLARE C_CLIENTES CURSOR FOR
SELECT TIPO_ID_CLIENTE ,
ID_CLIENTE ,
AGENCIA
FROM APORTES
WHERE ESTADOS = 0 ;
OPEN C_CLIENTES ;
FETCH NEXT FROM C_CLIENTES INTO VRTIPIDE ,
VRNUMIDE ,
VRAGENCIA ;
WHILE @@FETCH_STATUS = 0
BEGIN
UPDATE SIPLA . TERCEROS SET SUCURSAL_CODIGO = VRAGENCIA , COMENTARIOS = '1'
WHERE TIPIDE_CODIGO = VRTIPIDE AND NUMIDE = VRNUMIDE ;
END ;
END;
CLOSE C_CLIENTES ;
COMMIT ;
END ;
Valora esta pregunta


0