Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

 
 
Herramientas Buscar en Tema Desplegado
  #8  
Antiguo 05-07-2007
Avatar de Ivanzinho
[Ivanzinho] Ivanzinho is offline
Miembro Premium
 
Registrado: ene 2005
Ubicación: Galicia
Posts: 595
Poder: 22
Ivanzinho Va por buen camino
Si lo quieres hacer todo dentro de un procedimiento prueba lo siguiente :
Código SQL [-]
begin
  /* Procedure Text */
  //Obtenemos el campo sección como un entero
  FOR SELECT Cast(max(seccion) as integer) FROM SECCIONES
     WHERE RECTORIA = :c_rectoria and DIVISION = :c_division and DEPARTAMENTO = :c_depto
     INTO :c_seccionint DO
  begin
    //Si es nulo lo inicializamos a 0
    if (c_seccionint is null) then
      c_seccion = 0;
    
    //Aumentamos el contador
    c_seccionint = c_seccionint + 1;

    //Pasamos el campo a VarChar(3)
    c_seccion = Cast(c_seccionint as VarChar(3))

    //Comprobamos que el campo tenga siempre tres caracteres,
    //esto lo pongo porque creo que quieres que el campo tenga
    //el formato 001 y no 1. Si te vale la forma 1 olvidate del while.
    while length(c_seccion) < 3 do
       c_seccion = '0' || c_seccion;

    //Para finalizar con el campo c_seccion ejecutas la acción que
    //desees, un insert, update, ...
   
  end
end

Espero que te sirva

Un saúdo.
__________________
Si no lees esto no vivirás tranquilo
Non lle poñades chatas â obra namentras non se remata. O que pense que vai mal que traballe n’ela; hai sitio para todos. (Castelao)

Última edición por Ivanzinho fecha: 05-07-2007 a las 09:17:38.
Responder Con Cita
 


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
LLaves foraneas... Luis Castillo SQL 2 13-11-2005 18:45:34
Problema de llaves primarias y foráneas!! romansiux Varios 2 10-04-2005 16:20:57
Llaves Foraneas RainFall MySQL 1 26-07-2004 04:19:28
Llaves foraneas en BDD distintas StartKill Firebird e Interbase 7 31-01-2004 01:14:01
Borrar una tabla que tiene llaves foraneas afarenas Firebird e Interbase 2 10-10-2003 22:00:15


La franja horaria es GMT +2. Ahora son las 23:30:35.


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