How to Develop Custom API

/************** Developing Custom API ****************/

Assume xxkl_fedi_tbl is table with following columns
fedi_id,file_name,doc_id,container_type,container_size,container_status,amount,job_status,creation_date,created_by,last_update_date,last_update

d_by

create or replace package xxkl_fedi_api
-- Specifications
is
-- ************** defining table record type ***************** ---
-- xxkl_fedi_row_ rec xxkl_fei_tbl%towtype;
-- ************** defining custom record type ***************** ---
type xxkl_fedi_type is record(fedi_id number,
                                                 file_name varchar2(8),
                                                 doc_id number,
                                                 container_type varchar2(90),
                                                 container_size number,
                                                 container_status varchar2(1),
                                                 amount number,
                                                 job_status varchar2(1),
                                                 creation_date date,
                                                 created_by  number,
                                                 last_update_date date,
                                                 last_updated_by number
                                                 );
begin
procedure create_fedi_record(xxkl_fedi_rec in xxkl_fedi_type,x_return_status out varchar2,x_fedi_id out number);
proceudre validate_fedi_record(fedi_id in varchar2,xxkl_fedi_rec in xxkl_fedi_type,x_return_status out varchar2);
end xxkl_fedi_api;
/


create or replace package body xxkl_fei_api
-- Implementaion
is
begin
procedure create_fedi_record(xxkl_fedi_rec in xxkl_fedi_type,x_return_status out varchar2,x_fedi_id out number)
is
begin
--new record insert.
INSERT INTO xxkl_fedi_tbl(fedi_id,
                                                 file_name,
                                                 doc_id,
                                                 container_type,
                                                 container_size,
                                                 container_status,
                                                 amount,
                                                 job_status,
                                                 creation_date,
                                                 created_by,
                                                 last_update_date,
                                                 last_updated_by
                                                )
                                VALUES(xxkl_fedi_S.nextval,  --sequence
                                                 xxkl_fedi_rec.file_name,
                                                 xxkl_fedi_rec.doc_id number,
                                                 xxkl_fedi_rec.container_type,
                                                 xxkl_fedi_rec.container_size,
                                                 xxkl_fedi_rec.container_status,
                                                 xxkl_fedi_rec.amount,
                                                 xxkl_fedi_rec.job_status,
                                                 xxkl_fedi_rec.creation_date,
                                                 xxkl_fedi_rec.created_by,
                                                 xxkl_fedi_rec.last_update_date,
                                                 xxkl_fedi_rec.last_updated_by
                                               );
x_return_status  := 'S';
x_fedi_id :=  :currval.fedi_id;
-- implement logic if insert statement fail and display following message.
-- x_return_status  := 'F - insert is failed due not some error message ';
--
end create_fedi_record;
/

proceudre validate_fedi_record(fedi_id in varchar2,xxkl_fedi_rec in xxkl_fedi_type,x_return_status out varchar2)
-- implement
is
begin
null;
end validate_fedi_record;
/
end  xxkl_fedi_api;
/