Compile a response data set package in Oracle

Create or replace package tgatePack is

-- Author: GSL
-- Created: 2007-06-01 10:30:24
-- Purpose:

-- Public type declarations
Type rDataSet is ref cursor;

-- Public function and procedure declarations
Procedure GetAlarmVehicle (p_id alarm_data.id % type, ResultCursor out rDataSet );
End tgatePack;

After the packet header is defined, define the packet body and return the data with a cursor.

Create or replace package body tgatePack is
Procedure GetAlarmVehicle (
P_id alarm_data.id % type,
ResultCursor out rDataSet
) Is
Begin

Open ResultCursor
Select * from tablename where id = p_id;
End;

End tgatePack;