Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > MySQL
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 22-01-2008
sancarlos sancarlos is offline
Miembro
 
Registrado: sep 2007
Ubicación: Cartago , Tres Rios , Costa Rica
Posts: 48
Poder: 0
sancarlos Va por buen camino
Store procedure

Necesito con caracter de urgencia algun manual o ejemplos de store procedure con mysql.

Agradezco, la ayuda

Trabajo con delphi 7 y mysql
Responder Con Cita
  #2  
Antiguo 22-01-2008
Avatar de Luis M.
[Luis M.] Luis M. is offline
Miembro Premium
 
Registrado: sep 2004
Ubicación: Ripollet - Barcelona
Posts: 212
Poder: 20
Luis M. Va por buen camino
http://dev.mysql.com/doc/refman/5.0/...rocedures.html

Un saludo.
Responder Con Cita
  #3  
Antiguo 23-01-2008
Avatar de poliburro
[poliburro] poliburro is offline
Miembro Premium
 
Registrado: ago 2004
Ubicación: México D.F
Posts: 3.068
Poder: 23
poliburro Va por buen camino
Mejor referencia que la proporcionda por el amigo Luis no hay :P.
__________________
Conoce mi blog http://www.edgartec.com
Responder Con Cita
  #4  
Antiguo 30-01-2008
maria.lourdes maria.lourdes is offline
Registrado
 
Registrado: ene 2008
Posts: 6
Poder: 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
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Store Procedure sépoco MS SQL Server 5 10-01-2008 17:11:54
Store procedure php jorgito MySQL 1 06-06-2006 09:55:12
Modificar un Store Procedure Ricardo León Firebird e Interbase 3 24-05-2006 20:48:53
incremento de store procedure uper Firebird e Interbase 5 21-04-2004 20:15:59
store procedure ronimaxh Firebird e Interbase 2 24-06-2003 21:20:22


La franja horaria es GMT +2. Ahora son las 13:25:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi