RES: [firebase-br] SOS - Store Procedure

[Rubem Rocha]

Cadê o ';' no final do INSERT?
[]s

-----Mensagem original-----
De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br] Em nome de Marcos Oliveira
Enviada em: terça-feira, 28 de dezembro de 2004 08:58
Para: lista em firebase.com.br
Assunto: [firebase-br] SOS - Store Procedure


Criei esta procedure, mas esta dando um erro...naum consegui resolver, ja vai com um mes, alguem pode me ajudar....
    CREATE PROCEDURE EMM_TRANSFTURMA (
        VALU_COD INTEGER,
        VMATR_ANOLETIVO INTEGER,
        VMATR_NUMERO INTEGER,
        VTUR_COD INTEGER,
        VMATR_DATA DATE,
        VMATR_DATASAIDA DATE)
    AS
     DECLARE VARIABLE VCODIGO_TURMA INTEGER;
     DECLARE VARIABLE VANO_LETIVO INTEGER;
     DECLARE VARIABLE VNOVA_TURMA INTEGER;
    begin
      For Select ALU_COD, MATR_ANOLETIVO, MATR_NUMERO, TUR_COD, 
MATR_DATA, MATR_DATASAIDA From emm_dadosmatr
               Where TUR_COD = :VCODIGO_TURMA and MATR_DATA = 
:VANO_LETIVO Into
               :valu_cod    , :vmatr_anoletivo,
               :vmatr_numero, :vtur_cod,
               :vmatr_data  , :vmatr_datasaida Do
      Begin
        Insert Into emm_dadosmatr(ALU_COD, MATR_ANOLETIVO, MATR_NUMERO, 
TUR_COD, MATR_DTA, MATR_DATASAIDA) Values (:valu_cod    , :VANO_LETIVO 
+ 1, :vmatr_numero, :VNOVA_TURMA, :vmatr_data, :vmatr_datasaida)
      End;   <===================dando erro neste 
ponto...........................
    end;

    naum entendi o porque dando erro no "End;"..........
    se tiro o insert o erro some...o que poderia ser.......???

__________________________________________________
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br Para editar sua configuração na lista, use o endereço http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br


---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.799 / Virus Database: 543 - Release Date: 19/11/2004