create or replace procedure last_citytime ( routecode out varchar2, flightno out varchar2, acrnumber out varchar2, class out varchar2, source out varchar2, destination out varchar2, via out varchar2, fromdate out varchar2, todate out varchar2, city1 out varchar2, city2 out varchar2, city3 out varchar2, city4 out varchar2, city5 out varchar2, mon out varchar2, tue out varchar2, wed out varchar2, thu out varchar2, fri out varchar2, sat out varchar2, sun out varchar2, deptime1 out varchar2, deptime2 out varchar2, deptime3 out varchar2, deptime4 out varchar2, arrtime2 out varchar2, arrtime3 out varchar2, arrtime4 out varchar2, arrtime5 out varchar2, changeofflight out varchar2, fdcode out number, ctcode out number) as ccode citytime.ct_code%type; rcode flightdetails.route_code%type; fcode flightdetails.fd_code%type; acrcode aircraft.acr_code%type; fircode aircraft.fir_code%type; ecocode aircraft.eco_code%type; execode aircraft.exe_code%type; begin select max(ct_code) into ccode from citytime; select ct_code,fd_code,from_date,to_date, dep_time1,dep_time2,dep_time3,dep_time4, arr_time2,arr_time3,arr_time4,arr_time5, change_of_flight into ctcode,fcode,fromdate,todate, deptime1,deptime2,deptime3,deptime4, arrtime2,arrtime3,arrtime4,arrtime5, changeofflight from citytime where ct_code = ccode; fdcode := fcode; select route_code,flight_no,acr_code1,city1,city2,city3,city4,city5,mon,tue,wed,thu,fri,sat,sun into rcode,flightno,acrcode,city1,city2,city3,city4,city5,mon,tue,wed,thu,fri,sat,sun from flightdetails where fd_code = fcode; routecode := rcode; select source,destination,via into source,destination,via from flight where route_code = rcode; select acr_number,fir_code,eco_code,exe_code into acrnumber,fircode,ecocode,execode from aircraft where acr_code = acrcode; class := fircode || execode || ecocode; exception when no_data_found then raise_application_error(-20101,'Record does not exist'); null; end; /