create or replace package pkg_nkw_dnt timestamp '2006-07-07:10:10:10' is ------------------------------------------------------------------ -- 2006 DataPRO Developers - m@urelio ------------------------------------------------------------------ -- Version: 2.0.2 ------------------------------------------------------------------ -- Collections, Records, Variables, Constants, Exceptions, Cursors ------------------------------------------------------------------ gt_data pkg_nkw_obj.gt_data%TYPE; gt_old_data pkg_nkw_obj.gt_data%TYPE; gt_new_data pkg_nkw_obj.gt_data%TYPE; gr_dtgc nkw_dnt_dtgc%ROWTYPE; gv_object pkg_nkw_env.gv_char%TYPE; gv_action pkg_nkw_env.gv_char%TYPE; ge_dnt exception; gv_message pkg_nkw_env.gv_char%TYPE; gr_session v$session%ROWTYPE; gv_session pkg_nkw_env.gv_char%TYPE; gv_label pkg_nkw_env.gv_char%TYPE; ------------------------------------------------------------------ -- INIT_DNT ------------------------------------------------------------------ procedure init_dnt(fv_object in pkg_nkw_env.gv_char%TYPE); ------------------------------------------------------------------ -- BIND_COLUMN ------------------------------------------------------------------ procedure bind_column(fv_column in pkg_nkw_env.gv_char%TYPE, fv_old in date := null, fv_new in date := null); ------------------------------------------------------------------ procedure bind_column(fv_column in pkg_nkw_env.gv_char%TYPE, fv_old in number := null, fv_new in number := null); ------------------------------------------------------------------ procedure bind_column(fv_column in pkg_nkw_env.gv_char%TYPE, fv_old in pkg_nkw_env.gv_char%TYPE := null, fv_new in pkg_nkw_env.gv_char%TYPE := null); ------------------------------------------------------------------ -- PARSE_ACTION ------------------------------------------------------------------ procedure parse_action; ------------------------------------------------------------------ -- SET_NEW ------------------------------------------------------------------ procedure set_new(fv_column in pkg_nkw_env.gv_char%TYPE, fv_value out date); procedure set_new(fv_column in pkg_nkw_env.gv_char%TYPE, fv_value out number); procedure set_new(fv_column in pkg_nkw_env.gv_char%TYPE, fv_value out pkg_nkw_env.gv_char%TYPE); end pkg_nkw_dnt; / show errors