create or replace package odwaprop
is
-- this procedure will render all properties of the indicated p_ivid element
-- in the PL/SQL table g_prop_tbl
type t_prop_rec is record
( prompt         varchar2(100)
, name           varchar2(100)
, value          varchar2(2000)
, display_value  varchar2(2000)
, id             number(38)
);

type t_prop_rec_tbl is
table of t_prop_rec
index by binary_integer
;

g_prop_rec_tbl t_prop_rec_tbl;

g_value        varchar2(4000);

g_last_query   varchar2(30000);

-- to read last query quickly under SQL*Plus:
-- set serveroutput on size 99999
-- begin
--   odwaprop.get_props( p_ivid => , p_type_of => );
--   for i in 1..round( length(odwaprop.g_last_query)/80)+1 loop
--      dbms_output.put_line
--      ( substr( odwaprop.g_last_query, (i-1)*80 +1, 80)
--      );
--   end loop;
-- end;



function get_table_name
( p_type_id in number
) return varchar2
;

function palette_link
( p_session_id  in number    default odwactxt.get_session_id
, p_ivid        in number
, p_type_id     in number
, p_type_of     in varchar2   default null
, p_target      in varchar2  default '_TOP'
, p_text        in varchar2  default null
) return varchar2
;


procedure wa_preview_refresh
( p_session_id  in number
, p_wa_irid     in number
, p_mode        in varchar2 default 'V'
);

-- this procedure will create an HTML page with a report of newer versions
-- for objects currently in workarea p_wa_irid
procedure wa_new_version_report
( p_session_id  in number
, p_wa_irid     in number
);


procedure property_palette
( p_session_id  in number
, p_ivid        in number
, p_type_id     in number   default null
, p_classification in varchar2 default null
, p_type_of     in varchar2 default null
, p_print_if_null in varchar2 default 'N'
);


procedure get_props
( p_ivid        in number
, p_type_id     in number
, p_type_of     in varchar2 default null
);

-- function returns a property value for an indicated element
function get_value
( p_ivid     in number
, p_type_id  in number
, p_type_of  in varchar2 default null
, p_property in varchar2
) return varchar2
;


-- function returns a property value for an indicated element
function get_value
( p_ivid        in number
, p_table_name  in varchar2
, p_column_name in varchar2 default null
, p_data_type   in varchar2 default 'VARCHAR2' -- values VARCHAR2, NUMBER, DATE
) return varchar2
;

-- this function may only be called right after a previous get_value or a get_props
-- which passed and initialized the required p_ivid
function get_value
( p_property in varchar2
) return varchar2
;
end; -- odwaprop
/