Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
que caca eu tô fazeno aqui...num consigo entender pq o savepoint num tá funcionando...
savepoint venda; -- salvando a vendainsert into venda(id_loja,id_vendedor,num_nota,bloco,data,desconto,venda_func,motivo)values(n_idloja,n_idvendedor,wnum_nota,wbloco, to_date(wdata,'DD/MM/YYYY'),wdesconto,s_checked,'venda»'||to_char(sysdate,'DD/MM/YYYY$HH24-MI-SS'));select max(id_venda) into n_venda from venda; -- salvando os itensfor i in 1..wid_produto.count loop if not(lTrim(wqtd(i)) is null) and to_number(wqtd(i)) >0 then insert into venda_item(id_venda,id_produto,quantidade,preco) values (n_venda,wid_produto(i),wqtd(i),wpreco(i)); gn_correcao_estoque(wid_produto(i),wUserLog.Id,n_idLoja,'S',wqtd(i),15,wdata); update estoque_lojas set estoque = estoque - wqtd(i) where id_loja=n_idloja and id_produto = wid_produto(i); if sql%notfound then insert into estoque_lojas(id_produto,id_loja,estoque) values(wid_produto(i),n_idloja,0-wqtd(i)); end if; end if; end loop; rollback work to savepoint venda; sErro :='Venda não fechada.<br>Por favor confira os dados dos itens';toda hora que executa retorna isso:
Procedure: /ciadoterno.cadVenda Erro: ORA-01086: savepoint 'VENDA' never established
Carregando comentários...