1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
| set serveroutput on;
accept v_hdr prompt 'donner heure debut de la reduction :'
accept v_hfr prompt 'donner heure fin de la reduction :'
accept v_tauxred prompt 'donner le taux de la reduction :'
accept v_numcomm prompt 'donner le numero de la communication :'
declare
v_heuredebut reduction.heuredebut%type:=to_char(&v_hdr);
v_heurefin reduction.heurefin%type:=to_char(&v_hfr);
v_tauxreduction reduction.tauxreduction%type:=&v_tauxred;
v_numcommunication communication.numcommunication%type:=&v_numcomm;
v_coutappel ligne.montantdisponible%type;
begin
v_coutappel:=CALCUL_COUT(v_heuredebut,v_heurefin,v_tauxreduction,v_numcommunication);
dbms_output.put_line('le montant total apres reduction est de :'||v_coutappel);
dbms_output.put_line('bravo');
Exception
when VALUE_ERROR then
dbms_output.put_line('Donnees entrees invalides!! respectez le type des donnees');
when others then
dbms_output.put_line('Erreur inattendu, verifiez vos entrees');
End;
/ |
Partager