54 lines
1.6 KiB
Plaintext
Executable File
54 lines
1.6 KiB
Plaintext
Executable File
create or replace package icalendar_util_pkg
|
|
as
|
|
|
|
/*
|
|
|
|
Purpose: Package handles the iCalendar protocol (RFC 5545)
|
|
|
|
Remarks: see http://en.wikipedia.org/wiki/ICalendar and http://tools.ietf.org/html/rfc5545
|
|
|
|
Who Date Description
|
|
------ ---------- --------------------------------
|
|
MBR 26.10.2012 Created
|
|
|
|
*/
|
|
|
|
type t_event is record (
|
|
start_date date,
|
|
end_date date,
|
|
summary varchar2(2000),
|
|
description varchar2(2000),
|
|
location varchar2(2000),
|
|
organizer_name varchar2(2000),
|
|
organizer_email varchar2(2000),
|
|
status varchar2(2000),
|
|
uid varchar2(2000)
|
|
);
|
|
|
|
-- set prodid (company/product name)
|
|
procedure set_prodid (p_prodid in varchar2);
|
|
|
|
-- get event string
|
|
function get_event_str (p_event in t_event) return varchar2;
|
|
|
|
-- download event string
|
|
procedure download_event_str (p_event_str in varchar2,
|
|
p_filename in varchar2 := null);
|
|
|
|
-- download event
|
|
procedure download_event (p_event in t_event);
|
|
|
|
-- create event
|
|
function create_event (p_start_date in date,
|
|
p_end_date in date,
|
|
p_summary in varchar2,
|
|
p_description in varchar2 := null,
|
|
p_location in varchar2 := null,
|
|
p_organizer_name in varchar2 := null,
|
|
p_organizer_email in varchar2 := null,
|
|
p_uid in varchar2 := null) return t_event;
|
|
|
|
end icalendar_util_pkg;
|
|
/
|
|
|