Este cursor esta retornando registros? vc nao esta dando commit pq? Olhe o codigo abaixo:
* DECLARE CURSOR *cur_c *IS SELECT *va.idva, va.vi_idvi, va.vi_vm_idvm, vi.idvi, vi.vm_idvm, vm.idvm *FROM *va va, vi vi, vm vm *WHERE *va.vi_idvi = vi.idvi *AND *va.vi_vm_idvm = vi.vm_idvm *AND *vi.vm_idvm = vm.idvm; rec_c cur_c%*ROWTYPE*; cont *NUMBER*; * BEGIN *cont := 0; *FOR *rec_c *IN *cur_c *LOOP IF *cont = 1 *THEN INSERT INTO *va (vi_idvi, vi_vm_idvm, rskg) *VALUES *(rec_c.idvi, rec_c.vm_idvm, :kgpeso); *END IF*; *commit*; cont := cont + 1; *dbms_output*.put_line('Loop Nro: '||cont); *END LOOP*; * END*; 2008/5/9 Alexandre <[EMAIL PROTECTED]>: > Já tentei dar Commit tb . > > ====================== > > Vc está dando Commit depois de executar a procedure?? > > 2008/5/6 Alexandre > <[EMAIL PROTECTED]< > http://br.groups.yahoo.com/group/oracle_br/post?postID=s6VzGiBvcH4g5qHLqq26yMaRG6W_UGGhCAa_boUnAQk81MN5h6grdZyTkZrJfLWvhYeIlW1LmvkLUKxq > > > >: > > > DECLARE > > > > CURSOR cur_c IS SELECT va.idva, va.vi_idvi, va.vi_vm_idvm, vi.idvi, > > vi.vm_idvm, vm.idvm > > > > FROM va va, vi vi, vm vm > > > > WHERE va.vi_idvi=vi.idvi AND va.vi_vm_idvm=vi.vm_idvm > > AND vi.vm_idvm=vm.idvm; > > > > rec_c cur_c%ROWTYPE; > > > > cont NUMBER; > > > > BEGIN > > cont:=0; > > > > for rec_c IN cur_c > > LOOP > > IF cont=1 THEN > > > > INSERT INTO va(vi_idvi, vi_vm_idvm, rskg) > > > > VALUES (rec_c.idvi,rec_c.vm_idvm, :kgpeso); > > > > END IF; > > cont:=cont+1; > > > > END LOOP; > > > > END; > > > > -- > > In Corde Jesu Semper, Alexandre Queiroz de Oliveira > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > -- > -------------------------------------------- > Milton Bastos Henriquis Junior > (41) 9123-0100 > > -- > In Corde Jesu Semper, Alexandre Queiroz de Oliveira > > [As partes desta mensagem que não continham texto foram removidas] > > > -- Roberto Fernandes Sobrinho Deenvolvedor Oracle [As partes desta mensagem que não continham texto foram removidas]