harga_total.txt

create or replace procedure hargatotal2(idpemesanan in integer)
IS
totalnya number;
jumlahnya number;
harganya number;
BEGIN
select a.jumlah into jumlahnya from detail_pemesanan a join produk b on a.id_produk = b.id_produk where a.id_pemesanan=idpemesanan;
select a.harga_satuan into harganya from produk a join detail_pemesanan b on a.id_produk = b.id_produk where b.id_pemesanan=idpemesanan;
totalnya :=jumlahnya*harganya;
update pemesanan set pemesanan.harga_total=totalnya where pemesanan.id_pemesanan=idpemesanan;
END;
/