Fazer update do registro

[binho_oracle]

Olá pessoal. Sou iniciante (comecei ontem a tarde... ) e não
consigo identificar o erro nesse update. Ele dá erro no "COMMIT_FORM".
Coloquei um monte de coisa antes dele, mas nada dá certo. Se vocês
pudessem me ajudar... vlw amigos, segue o código:

Selecionar tudo

BEGIN
       UPDATE FUNCIONARIO SET FABRICA = :BL_MANUT.LST_FABRICA
       ,LINHA = :BL_MANUT.LST_LINHA
       ,NOME = :BL_MANUT.TXT_NOME
       ,DATA_NASC = :BL_MANUT.TXT_DATA_NASC
       ,ENDERECO = :BL_MANUT.TXT_ENDERECO 
       ,TELEFONE = :BL_MANUT.TXT_TELEFONE
      ,FUNCAO = :BL_MANUT.TXT_DESC_FUNCAO
      WHERE ID_FUNC = :BL_PRINCIPAL.ID_FUNC 
				
      COMMIT_FORM;
      PRC_ALERTA ('ALTERAÇÃO REALIZADA COM SUCESSO');
						
      EXCEPTION WHEN OTHERS THEN
      PRC_ALERTA(SQLERRM);
END;

[dr_gori]

Falta um ; nessa linha:

Selecionar tudo

  WHERE ID_FUNC = :BL_PRINCIPAL.ID_FUNC 

Deve ficar assim:

Selecionar tudo

  WHERE ID_FUNC = :BL_PRINCIPAL.ID_FUNC;  

[binho_oracle]

Putz...hauhauhua, verdade amigo.
Eu tinha colocado o ";" mas o erro era outro.
Arrumei o erro anterior e tirei o ";" não sei porque.

Só que agora, depois de alterar o registro eu preciso
fechar essa janela e carregar uma outra que vai mostrar
o dado alterado.

Como consigo fechar uma janela e carregar outra?

[binho_oracle]

Na verdade é assim, depois de atualizar esse registro,
o usuário irá clicar no botão OK e ele precisa fechar a
janela atual e carregar novamente uma outra, que mostrará
o registro modificado (essa janela já está aberta, mas ela mostra
o registro antigo, antes da modificação), por isso o botão OK
precisa fechar a janela onde a alteração foi feita e "atualizar"
a outra.

Se alguém puder ajudar...