Funcion o Procedure

[@-Soft]

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]

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

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]

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]

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.