create or replace package pkg_nkw_cmm
timestamp '2006-07-07:10:10:10'
is
   ------------------------------------------------------------------
   -- 2006 DataPRO Developers - m@urelio
   ------------------------------------------------------------------
   -- Version: 2.0.2
   ------------------------------------------------------------------
   -- Collections, Records, Variables, Constants, Exceptions, Cursors
   ------------------------------------------------------------------
   type rec_tabs is record (object_name   user_objects.object_name%TYPE,
                            comments      pkg_nkw_env.gv_char%TYPE);
   type tab_tabs is table of rec_tabs index by binary_integer;
   gt_tabs  tab_tabs;
   type rec_cols is record (object_name   user_objects.object_name%TYPE,
                            column_name   user_tab_columns.column_name%TYPE,
                            comments      pkg_nkw_env.gv_char%TYPE);
   type tab_cols is table of rec_cols index by binary_integer;
   gt_cols  tab_cols;
   --------------------------------------------------------------------
   -- SET_COMMENTS
   --------------------------------------------------------------------
   procedure set_comments(ft_tabs in gt_tabs%TYPE);
   --------------------------------------------------------------------
   procedure set_comments(ft_cols in gt_cols%TYPE);
   --------------------------------------------------------------------
   procedure set_comments(fv_object   in pkg_nkw_env.gv_char%TYPE,
                          fv_comments in pkg_nkw_env.gv_char%TYPE);
   --------------------------------------------------------------------
   procedure set_comments(fv_object   in pkg_nkw_env.gv_char%TYPE,
                          fv_column   in pkg_nkw_env.gv_char%TYPE,
                          fv_comments in pkg_nkw_env.gv_char%TYPE);
   --------------------------------------------------------------------
   -- GET_TAB_CMM
   --------------------------------------------------------------------
   procedure get_tab_cmm;
   --------------------------------------------------------------------
   -- GET_COL_CMM
   --------------------------------------------------------------------
   procedure get_col_cmm;
   --------------------------------------------------------------------
   -- POP_COMMENTS
   --------------------------------------------------------------------
   procedure pop_comments(fv_object in pkg_nkw_env.gv_char%TYPE := null);
end pkg_nkw_cmm;
/
show errors