Main Tables Views Materialized Views Indexes Constraints Triggers Procedures Functions Packages Sequences Java Sources Sanity Check Index DDL scrips
Arguments Source

RHNHISTORYVIEW_ERRATALIST

DDL script

Arguments:

NameData TypeDefault ValueIn/Out
ACTION_IDNUMBER(38) IN
SEPARATORVARCHAR2 IN

Returns:

VARCHAR2

Source

Legend: comment string keyword reserved word operator
     1: function
     2: rhnHistoryView_erratalist(action_id IN NUMBER, separator IN VARCHAR2 DEFAULT chr(10))
     3: return VARCHAR2
     4: is
     5:     store_var  VARCHAR2(4000);
     6:     store_tmp  VARCHAR2(4000);
     7:     select_sql VARCHAR2(4000);
     8:     trimmed NUMBER;
     9:     cursor errata_cursor(action_id_in IN NUMBER, separator IN VARCHAR2 DEFAULT chr(10))
    10:     is
    11:        select
    12:            'Errata Advisory: ' || e.advisory || separator ||
    13: 	   'Errata Synopsis: ' || e.synopsis || separator
    14:        from
    15:            rhnActionErrataUpdate ae, rhnErrata e
    16:        where
    17:            e.id = ae.errata_id
    18:        and ae.action_id = action_id_in;
    19: begin
    20:     store_var := NULL;
    21:     trimmed := 0;
    22:     open errata_cursor(action_id);
    23:     loop
    24: 	fetch errata_cursor into store_tmp;
    25: 	exit when errata_cursor%NOTFOUND;
    26: 	if store_var is NULL then
    27: 	   store_var := store_tmp;
    28: 	else
    29: 	   trimmed := 1;
    30: 	   exit when length(store_var) + length(separator) + length(store_tmp) > 3700;
    31: 	   store_var := store_var || separator || store_tmp;
    32: 	   trimmed := 0;
    33: 	end if;
    34:     end loop;
    35:     close errata_cursor;
    36:     if trimmed <> 0 then
    37:         store_var := store_var || separator || '...';
    38:     end if;
    39:     return store_var;
    40: end;