In this article I would like to share with you a sample program that will ask the user to give two numbers and then it will compute the quotient of the two numbers using Oracle PL/SQL programming language. I also added a function to check if the given numerator is zero it will display an error message the Divide Over Zero is Not Allowed. The code is very easy to understand and use. Thank you.
My email address are the following jakerpomperada@gmail.com and jakerpomperada@yahoo.com.
My mobile number here in the Philippines is 09173084360.
Sample Program Output
Error Checking Screen Output
Program Listing
/* Division of Two Numbers With Exception Handling */
/* Written By Mr. Jake R. Pomperada */
/* Language : PL/SQL */
/* Date : May 28, 2017 Sunday */
SET SERVEROUTPUT ON;
DECLARE
solve NUMBER;
message1 varchar2(50):= 'Division By Zero is not allow.';
title varchar2(50) :='Division of Two Numbers Program in PL/SQL';
author varchar2(50) :='Written By: Mr. Jake R. Pomperada,MAED-IT';
/* User Input values */
a number:=&a;
b number:=&b;
BEGIN
solve := (a/b);
dbms_output.put_line(chr(13)||chr(10) || title);
dbms_output.put_line(chr(13)||chr(10) || author);
dbms_output.put_line(chr(13)||chr(10));
dbms_output.put_line('The Value of A is ' || a);
dbms_output.put_line('The value of B is ' || b);
dbms_output.put_line(chr(13)||chr(10));
dbms_output.put_line('The result is ' || solve || '.');
EXCEPTION
WHEN ZERO_DIVIDE
THEN
dbms_output.put_line(chr(13)||chr(10) || message1);
dbms_output.put_line(chr(13)||chr(10));
dbms_output.put_line('The Value of A is ' || a);
dbms_output.put_line('The value of B is ' || b);
END;
No comments:
Post a Comment