Foros Club Delphi - Funcion o Procedure

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - Funcion o Procedure (https://www.clubdelphi.com/foros/showthread.php?t=4808)

@-Soft

29-10-2003 13:51:29

Funcion o Procedure

hola

como puedo realizar una funcion o procedure para crear un numero de secuencia para los recibos, facturas o no de cheques etc.

necesito que me expliquen con un pequeño ejemplo, ya que no soy muy bueno trabajando con los procedures o funtions.

ademas necesito saber como invocar este procedure o function desde cualquier parte del programa.

thanks

__cadetill

29-10-2003 13:59:01

Bueno, antetodo deberías de decir que motor de bases de datos utilizas ya que, hay miles de formas de hacerlo

Una que te puede valer para cualquier motor, puede ser lanzar una consulta SQL

Código:

function DameNumero : integer;

begin

  Query.Close;

  Query.SQL.Clear;

  Query.SQL.Add('select max(CampoClave) + 1');

  Query.SQL.Add('from MiTabla');

  Query.Open;

  Result := Query.Fields[0];

Nota: He obviado algún detallito como el control de errores, que revuelva la consulta algún valor,.....

Si tu SGBD admite procedimientos almacenados, puedes hacerlo mediante ellos
Si tu SGBD admite campos autoincrementales, puedes hacerlo mediante ellos
.........

No se, tu decides

roman

29-10-2003 17:16:54

A lo que bien dice el amigo cadetill quisiera añadir que en el primer método habrá que bloquear la tabla antes de realizar la consulta y desbloquearla apenas se inserte el nuevo registro. De lo contrario dos clientes que accedan simultáneamente podrán confundirse y asignar el mismo código.

Por este tipo de detalles yo pienso que lo mejor es lo de los campos autoincrementales ya que el motor se encargará de cualquier detalle que se nos escape.

// Saludos

@-Soft

01-11-2003 12:53:48

hola

el motor de base de datos es Paradox, ya que es una aplicacion sencilla.

no he tenido buena referencia con respecto a los campos autoincremetables y me dijeron que no eran recomendables.

el objetivo de utilizar procedures o function es para optimizar la programacion y asi evitar el estar escribiendo el mismo codigo por doquier para saber si el registro no ha sido ya tomado debido a que el sistema que estoy desarrollando es en ambiente multiusuario.

ahora, si ustedes tienen una mejor propuesto soy todo ojos para leerla.

Saludos.

La franja horaria es GMT +2. Ahora son las 02:51:04.