[firebase-br] While not Eof Do

[HPensador]

Rubem Nascimento da Rocha wrote:

> Pessoal, eu já falei! O lance é FOR..SELECT! Pesquisem sobre
> FOR..SELECT no site da FireBase! 

Amigo eu já pesquisei só para vc ver taí abaixo o codigo da SP. Só que
desta forma a mesma esta entrando em loop infinito.
Sds,
HPesnador.

CREATE PROCEDURE REPLICA_ENTIDADE 
as
declare variable icodigo integer;
declare variable snome varchar(60);
declare variable snewnome varchar(60);
BEGIN
  iCodigo = 418;
  FOR SELECT SUBSTRING(e.entidade FROM 5 FOR 60)
      FROM entidade e
  INTO :sNome
  DO
  BEGIN
    sNewNome = '';
    sNewNome = 'CM. ' || sNome;
    INSERT INTO entidade (COD_ENTIDADE, ENTIDADE) VALUES (:iCodigo,
:sNewNome);
    iCodigo = iCodigo + 1;
  END
END