Tente o while então: While (i < J) do begin --Insira aqui o q vc quer executar end
--- Em delphi-br@yahoogrupos.com.br, "Levi Ribeiro de Freitas" <[EMAIL PROTECTED]> escreveu > Silveira, > > Obrigado pela ajuda. > Mas vê se eu posso fazer de outra forma. > Cada vez que eu inserir um cadastro novo, este cadastro irá conter um campo > que vai me dizer quantos itens preciso inserir na tabela filha. > > Acredito que não consiguirei usar uma estrutura baseada no seu exemplo. > > Levi > > _____ > > De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em > nome de crsilveira > Enviada em: segunda-feira, 5 de setembro de 2005 10:41 > Para: delphi-br@yahoogrupos.com.br > Assunto: [delphi-br] Re: For ou While dentro de uma procedure firebird > > > FOR SELECT CAMPO1 FROM TABELA WHERE XXX = :PARAM > INTO :CAMPO1a > DO > BEGIN > --Insira aqui o q vc quer executar > END; > > --- Em delphi-br@yahoogrupos.com.br, "Levi Ribeiro de Freitas" > <[EMAIL PROTECTED]> escreveu > > Pessoal, > > > > Alguém tem idéia de como posso fazer um while ou for dentro de uma > procedure > > firebird? > > Preciso inserir um lote de registros cada vez que ela for executada. > > Obrigado > > > > Atenciosamente, > > > > Levi Ribeiro de Freitas > > Programador de Computadores > > <mailto:[EMAIL PROTECTED]> > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > Para ver as mensagens antigas, acesse: > http://br.groups.yahoo.com/group/delphi-br/messages > > Para falar com o moderador, envie um e-mail para: > [EMAIL PROTECTED] ou [EMAIL PROTECTED] > > > > > Yahoo! Grupos, um serviço oferecido por: > > PUBLICIDADE > > > > <http://br.rd.yahoo.com/SIG=12fdrc5uu/M=365837.7000707.7924794.2369893/D=brc > lubs/S=2137111264:HM/Y=BR/EXP=1125934877/A=2950750/R=2/id=noscript/SIG=10tif > t5qr/*http://br.movies.yahoo.com/> > > _____ > > Links do Yahoo! Grupos > > > * Para visitar o site do seu grupo na web, acesse: > http://br.groups.yahoo.com/group/delphi-br/ > > > * Para sair deste grupo, envie um e-mail para: > [EMAIL PROTECTED] > <mailto:[EMAIL PROTECTED]> > > > * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do > Serviço do Yahoo! <http://br.yahoo.com/info/utos.html> . > > > > > [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html