Answer Posted / aritra

TRY THIS ONE ...

CREATE TABLE FARE_DETAILS
( SOURCE VARCHAR2(100),
DESTINATION VARCHAR2(100),
FARES NUMBER(10,2));


create or replace procedure PROC_TCKT_RESERVATION
(m_source IN VARCHAR2,
m_destination IN VARCHAR2,
m_age IN NUMBER
)
is
v_source FARE_DETAILS.SOURCE%TYPE;
v_destination FARE_DETAILS.DESTINATION%TYPE;
v_fares FARE_DETAILS.FARES%TYPE;
v_fares_out FARE_DETAILS.FARES%TYPE;
begin
IF m_source= m_destination THEN
RAISE_APPLICATION_ERROR(-20001,'SOURCE, DESTINATION
SHOULD NOT BE SAME');
END IF;
SELECT FARES
INTO v_fares
FROM FARE_DETAILS
WHERE SOURCE= m_source
AND DESTINATION= m_destination ;
IF m_age>=60 THEN
v_fares_out:= (v_fares-v_fares*0.3);
DBMS_OUTPUT.PUT_LINE('GIVEN AGE IS FOR SENIOR CITIZEN,
FARE IS '||v_fares_out);
ELSE
v_fares_out:= v_fares;
DBMS_OUTPUT.PUT_LINE(' FARE IS '||v_fares_out);
END IF;

EXCEPTION
WHEN NO_DATA_FOUND THEN
RAISE_APPLICATION_ERROR(-20001,'NO DATA FOUND ..ENTER
COREECT SOURCE/DESTINATION');

end PROC_TCKT_RESERVATION;

What is offset in sql query?

1132

---

How to start oracle sql developer?

1050

---

What is pls_integer in pl sql?

1113

---

what are the different tables present in mysql? : Sql dba

996

---

What is a loop in sql?

993

---

what is the difference between char and varchar data types? : Sql dba

1134

---

How does sql profiler work?

1027

---

what is data integrity? : Sql dba

1047

---

What is pl sql package?

1045

---

Do we need commit after truncate?

1090

---

How do you sort in sql?

1034

---

Is natural join and inner join same?

936

---

What are the advantages of pl sql?

1132

---

how to drop an existing index in mysql? : Sql dba

1076

---

What are the different tcl commands in sql?

1186

---