[[Ivanzinho]]

Hola foro, estoy desarrollando el proceso de albaraneado de las líneas de pedido de los clientes de una empresa de distribución. Utilizo D5 y FB1.5.

Cuando se quieren servir las líneas de un cliente compruebo que por lo menos se pueda servir una línea, para de esta manera crear la cabecera de albarán y con posterioridad añadir la líneas a dicha cabecera. Este proceso lo hago en un SP de la siguiente manera.

Código SQL [-]
for select campos from linped do
   begin
      comprobar si la línea se puede servir
      if (linea puede servir) then
         servible = 1;
      else
         servible = 0;
   end

Cuando encuentro la primera línea ya no me interesa comprobar el resto (la cabecera de albarán se puede crear), por lo que desearía salirm de la ejecución del for select. Yo había pensado en lo siguente :

Código SQL [-]
Salir = 0;
for select campos from linped do
   if (Salir = 0) then
      begin
         comprobar si la línea se puede servir
         if (linea puede servir) then
            begin
               servible = 1;
               Salir = 1;
            end
         else
            servible = 0;
      end

Para así evitar las comprobaciones, pero no me parece una forma muy ortodoxa de realizarlo, por lo que pregunto si alguien conoce alguna forma de salir de la ejecución del for select.

Gracias por vuestra atención.