Ver Mensaje Individual
  #4  
Antiguo 30-01-2008
maria.lourdes maria.lourdes is offline
Registrado
 
Registrado: ene 2008
Posts: 6
Reputación: 0
maria.lourdes Va por buen camino
Smile ejemplos de procedimientos almacenados

Te envio 2 ejemplos de procedimientos almacenados, espero que te sirvan.

create procedure verificacion_usuarios (in p1 varchar(10),in iu int(12), in iop int(2),out val varchar(1) )
Begin
declare ban int(2);
set val = 'F';
if (iop > 0 and iop < 14)
then
select count(idrol) into ban from definicion_usuarios_x_proyecto
where cod_proyecto = p1 and
identificacion_usuario = iu and
idrol=iop;
if ( ban > 0 ) then set val = 'T';
end if;
end if;
end;

_________________________________________________

create procedure eliminar_indicadores( in p1 varchar(10),in p2 varchar(10),in A1 varchar(10) )
Begin
if ((select count(valor_medicion) from medicion_indicadores
where cod_proyecto= p1 and
cod_proceso = p2 and
cod_actividad= A1) != 0) then
update indicadores set estado_indicador='R'
where cod_proyecto=p1 and
cod_proceso=p2 and
cod_actividad= A1;
else
delete from indicadores where cod_proyecto= p1 and
cod_proceso = p2 and
cod_actividad= A1;
end if;
update actividades_procesos set iden_actividad_medir='N'
where cod_proyecto= p1 and
cod_proceso = p2 and
cod_actividad= A1;
end;


__________________________________________________________
Responder Con Cita