Plz help me...to display in matrix form

Question

Hi sir..
i want to get this report in matrix form...plz i don't have any idea about matrix form...
Right now iam getting like Below format::
emp_name cat_name     type_name      theme_name                levels_skilllevel
rubin      FE MODELLING SKILLS      A2-Assembly - connectors      N
rubin      FE MODELLING      SKILLS           A2-Assembly - welding                N
rubin      FE MODELLING      SKILLS           A2-Batch meshing                I
rubin      FE MODELLING      SKILLS           A2-CFD meshing                     None
rubin      FE MODELLING      SKILLS           A2-I order Hex meshing                None
rubin      FE MODELLING      SKILLS           A2-I order Tet meshing                None
rubin      FE MODELLING      SKILLS           A2-II order Hex meshing           None
rubin      FE MODELLING      SKILLS           A2-II order Tet meshing           None
rubin      FE MODELLING      SKILLS           A2-Macros                     None     
rubin      FE MODELLING      SKILLS           A2-Mid-plane shell meshing           None
rubin      FE MODELLING      SKILLS           A2-Moldflow meshing                None
rubin      FE MODELLING      SKILLS           A2-Morphing                     B
rubin      FE MODELLING      SKILLS           SKILL2                          None
rubin      POST PROCESSING AUTO[SUB]SYS      AUTO-36                N
rubin      POST PROCESSING AUTO[SUB]SYS      AUTO-6                     B
rubin      POST PROCESSING AUTO[SUB]SYS      AUTO3                     I
rubin      POST PROCESSING AUTO[SUB]SYS      TERMINAL                P
freddy      FE MODELLING      SKILLS           A2-Assembly - welding                B
freddy      FE MODELLING      SKILLS           A2-Batch meshing                P
freddy      FE MODELLING      SKILLS           A2-Macros                     P
freddy      FE MODELLING      SKILLS           A2-Morphing                     I
freddy      THERMAL      SKILLS           SKILL-15                          None
freddy      THERMAL      SKILLS           SKILL-41                          B
freddy      THERMAL      SKILLS           SKILL-42                          I
freddy      THERMAL      SKILLS           SKILL-45                          P
freddy      THERMAL      SKILLS           SKILL-47                          N
freddy      THERMAL      SKILLS           SKILL-57                          None
-->     .....check the below one...
-->Example:see emp_name rubin->cat_name     -> type_name ->theme_name->levels_skilllevel is 'N'
     see emp_name freddy->cat_name-> type_name ->theme_name->levels_skilllevel is 'B'
cat_name     type_name           theme_name                rubin      freddy
FE MODELLING      SKILLS      A2-Assembly - connectors      N     B     
I have written the below query To get it as Above::
SELECT ae.emp_name, am.cat_name, am.type_name, am.theme_name, am.levels_skilllevel
FROM alt_employee ae, (
SELECT *
FROM alt_category ac, alt_type at, alt_theme atm, alt_levels al, alt_employee ae
WHERE ac.cat_id
IN (
SELECT cat_id
FROM alt_category
) AND ac.cat_id = atm.theme_catid
AND atm.theme_typeid = at.type_id
AND atm.theme_id = al.levels_theme_id
AND al.levels_skilllevel
IN ('B', 'N', 'I', 'P', 'None')
GROUP BY cat_name, type_name, theme_name, levels_skilllevel
)am
WHERE ae.emp_id = am.levels_employee_id
Regards
Narendra

Answer 1

My solution was a pivot function.
Using that function will give you something like:
SQL> select * from table( pivot(
  2  'select cat.cat_name
  3       , type.type_name
  4       , theme.theme_name
  5       , emp.emp_name
  6       , levels.levels_skilllevel
  7  from alt_theme theme
  8     , alt_category cat
  9     , alt_type type
10     , alt_levels levels
11     , alt_employee emp
12  where cat.cat_id (+) = theme.theme_catid
13  and   type.type_id = theme.theme_typeid
14  and   levels.levels_theme_id = theme.theme_id
15  and   emp.emp_id = levels.levels_employee_id
16  '
17   ) );
CAT_NAME TYPE_NAME       THEME_NAME                freddy    ruby
FE       MODELLING       A2-Assembly - welding     B         B
FE       MODELLING       A2-Assembly - connectors            N
         THERMAL SKILLS  SKILL-41                  B         I
         THERMAL SKILLS  SKILL-42                  N         P
SQL> Anton
create or replace type PivotImpl as object
  ret_type anytype,      -- The return type of the table function
  stmt varchar2(32767),
  cur integer,
  static function ODCITableDescribe( rtype out anytype, p_stmt in varchar2, p_agg in varchar2 := 'max' )
  return number,
  static function ODCITablePrepare( sctx out PivotImpl, ti in sys.ODCITabFuncInfo, p_stmt in varchar2, p_agg in varchar2 := 'max' )
  return number,
  static function ODCITableStart( sctx in out PivotImpl, p_stmt in varchar2, p_agg in varchar2 := 'max' )
  return number,
  member function ODCITableFetch( self in out PivotImpl, nrows in number, outset out anydataset )
  return number,
  member function ODCITableClose( self in PivotImpl )
  return number
create or replace type body PivotImpl
as
  static function ODCITableDescribe( rtype out anytype, p_stmt in varchar2, p_agg in varchar2 := 'max' )
  return number
  is
    atyp anytype;
    cur integer;
    numcols number;
    desc_tab dbms_sql.desc_tab2;
    rc sys_refcursor;
    t_c2 varchar2(32767);
  begin
    cur := dbms_sql.open_cursor;
    dbms_sql.parse( cur, p_stmt, dbms_sql.native );
    dbms_sql.describe_columns2( cur, numcols, desc_tab );
    dbms_sql.close_cursor( cur );
    anytype.begincreate( dbms_types.typecode_object, atyp );
    for i in 1 .. numcols - 2
    loop
      atyp.addattr( desc_tab( i ).col_name
                  , case desc_tab( i ).col_type
                      when 1   then dbms_types.typecode_varchar2
                      when 2   then dbms_types.typecode_number
                      when 9   then dbms_types.typecode_varchar2
                      when 11  then dbms_types.typecode_varchar2  -- show rowid as varchar2
                      when 12  then dbms_types.typecode_date
                      when 208 then dbms_types.typecode_urowid
                      when 96  then dbms_types.typecode_char
                      when 180 then dbms_types.typecode_timestamp
                      when 181 then dbms_types.typecode_timestamp_tz
                      when 231 then dbms_types.typecode_timestamp_ltz
                      when 182 then dbms_types.typecode_interval_ym
                      when 183 then dbms_types.typecode_interval_ds
                    end
                  , desc_tab( i ).col_precision
                  , desc_tab( i ).col_scale
                  , case desc_tab( i ).col_type
                      when 11 then 18  -- for rowid col_max_len = 16, and 18 characters are shown
                      else desc_tab( i ).col_max_len
                    end
                  , desc_tab( i ).col_charsetid
                  , desc_tab( i ).col_charsetform
    end loop;
    open rc for 'select distinct ' || desc_tab( numcols - 1 ).col_name || '
                          from( ' || p_stmt || ' )
                          order by 1';
    loop
      fetch rc into t_c2;
      exit when rc%notfound;
      atyp.addattr( t_c2
                  , case desc_tab( numcols ).col_type
                      when 1   then dbms_types.typecode_varchar2
                      when 2   then dbms_types.typecode_number
                      when 9   then dbms_types.typecode_varchar2
                      when 11  then dbms_types.typecode_varchar2  -- show rowid as varchar2
                      when 12  then dbms_types.typecode_date
                      when 208 then dbms_types.typecode_urowid
                      when 96  then dbms_types.typecode_char
                      when 180 then dbms_types.typecode_timestamp
                      when 181 then dbms_types.typecode_timestamp_tz
                      when 231 then dbms_types.typecode_timestamp_ltz
                      when 182 then dbms_types.typecode_interval_ym
                      when 183 then dbms_types.typecode_interval_ds
                    end
                  , desc_tab( numcols ).col_precision
                  , desc_tab( numcols ).col_scale
                  , case desc_tab( numcols ).col_type
                      when 11 then 18  -- for rowid col_max_len = 16, and 18 characters are shown
                      else desc_tab( numcols ).col_max_len
                    end
                  , desc_tab( numcols ).col_charsetid
                  , desc_tab( numcols ).col_charsetform
    end loop;
    close rc;
    atyp.endcreate;
    anytype.begincreate( dbms_types.typecode_table, rtype );
    rtype.SetInfo( null, null, null, null, null, atyp, dbms_types.typecode_object, 0 );
    rtype.endcreate();
    return odciconst.success;
  exception
    when others then
      return odciconst.error;
  end;
  static function ODCITablePrepare( sctx out PivotImpl, ti in sys.ODCITabFuncInfo, p_stmt in varchar2, p_agg in varchar2 := 'max' )
  return number
  is
    prec     pls_integer;
    scale    pls_integer;
    len      pls_integer;
    csid     pls_integer;
    csfrm    pls_integer;
    elem_typ anytype;
    aname    varchar2(30);
    tc       pls_integer;
  begin
    tc := ti.RetType.GetAttrElemInfo( 1, prec, scale, len, csid, csfrm, elem_typ, aname );
    sctx := PivotImpl( elem_typ, p_stmt, null );
    return odciconst.success;
  end;
  static function ODCITableStart( sctx in out PivotImpl, p_stmt in varchar2, p_agg in varchar2 := 'max' )
  return number
  is
    cur         integer;
    numcols     number;
    desc_tab    dbms_sql.desc_tab2;
    t_stmt      varchar2(32767);
    t_stmt_end  varchar2(32767);
    type_code   pls_integer;
    prec        pls_integer;
    scale       pls_integer;
    len         pls_integer;
    csid        pls_integer;
    csfrm       pls_integer;
    schema_name varchar2(30);
    type_name   varchar2(30);
    version     varchar2(30);
    attr_count  pls_integer;
    attr_type   anytype;
    attr_name   varchar2(100);
    dummy2      integer;
  begin
    cur := dbms_sql.open_cursor;
    dbms_sql.parse( cur, p_stmt, dbms_sql.native );
    dbms_sql.describe_columns2( cur, numcols, desc_tab );
    dbms_sql.close_cursor( cur );
    for i in 1 .. numcols - 2
    loop
      t_stmt := t_stmt || ', "' || desc_tab( i ).col_name || '"';
    end loop;
    t_stmt := substr( t_stmt, 2 );
    t_stmt_end := t_stmt;
    type_code := sctx.ret_type.getinfo( prec
                                      , scale
                                      , len
                                      , csid
                                      , csfrm
                                      , schema_name
                                      , type_name
                                      , version
                                      , attr_count
    for i in numcols - 1 .. attr_count
    loop
      type_code := sctx.ret_type.getattreleminfo( i
                                                 , prec
                                                 , scale
                                                 , len
                                                 , csid
                                                 , csfrm
                                                 , attr_type
                                                 , attr_name
      t_stmt := t_stmt || ', ' || p_agg || '( decode( ' || desc_tab( numcols - 1 ).col_name || ', ''' || attr_name || ''', ' || desc_tab( numcols ).col_name || ' ) )';
    end loop;
    t_stmt := 'select' || t_stmt || ' from ( ' || sctx.stmt || ' ) group by' || t_stmt_end;
    sctx.cur := dbms_sql.open_cursor;
    dbms_sql.parse( sctx.cur, t_stmt, dbms_sql.native );
    for i in 1 .. attr_count
    loop
      type_code := sctx.ret_type.getattreleminfo( i
                                                , prec
                                                , scale
                                                , len
                                                , csid
                                                , csfrm
                                                , attr_type
                                                , attr_name
      case type_code
        when dbms_types.typecode_char          then dbms_sql.define_column( sctx.cur, i, 'x', 32767 );
        when dbms_types.typecode_varchar2      then dbms_sql.define_column( sctx.cur, i, 'x', 32767 );
        when dbms_types.typecode_number        then dbms_sql.define_column( sctx.cur, i, cast( null as number ) );
        when dbms_types.typecode_date          then dbms_sql.define_column( sctx.cur, i, cast( null as date ) );
        when dbms_types.typecode_urowid        then dbms_sql.define_column( sctx.cur, i, cast( null as urowid ) );
        when dbms_types.typecode_timestamp     then dbms_sql.define_column( sctx.cur, i, cast( null as timestamp ) );
        when dbms_types.typecode_timestamp_tz  then dbms_sql.define_column( sctx.cur, i, cast( null as timestamp with time zone ) );
        when dbms_types.typecode_timestamp_ltz then dbms_sql.define_column( sctx.cur, i, cast( null as timestamp with local time zone ) );
        when dbms_types.typecode_interval_ym   then dbms_sql.define_column( sctx.cur, i, cast( null as interval year to month ) );
        when dbms_types.typecode_interval_ds   then dbms_sql.define_column( sctx.cur, i, cast( null as interval day to second ) );
      end case;
    end loop;
    dummy2 := dbms_sql.execute( sctx.cur );
    return odciconst.success;
  end;
  member function ODCITableFetch( self in out PivotImpl, nrows in number, outset out anydataset )
  return number
  is
    c1_col_type pls_integer;
    type_code   pls_integer;
    prec        pls_integer;
    scale       pls_integer;
    len         pls_integer;
    csid        pls_integer;
    csfrm       pls_integer;
    schema_name varchar2(30);
    type_name   varchar2(30);
    version     varchar2(30);
    attr_count  pls_integer;
    attr_type   anytype;
    attr_name   varchar2(100);
    v1     varchar2(32767);
    n1     number;
    d1     date;
    ur1    urowid;
    ids1   interval day to second;
    iym1   interval year to month;
    ts1    timestamp;
    tstz1  timestamp with time zone;
    tsltz1 timestamp with local time zone;
  begin
    outset := null;
    if nrows < 1
    then
-- is this possible???
      return odciconst.success;
    end if;
    if dbms_sql.fetch_rows( self.cur ) = 0
    then
      return odciconst.success;
    end if;
    type_code := self.ret_type.getinfo( prec
                                      , scale
                                      , len
                                      , csid
                                      , csfrm
                                      , schema_name
                                      , type_name
                                      , version
                                      , attr_count
    anydataset.begincreate( dbms_types.typecode_object, self.ret_type, outset );
    outset.addinstance;
    outset.piecewise();
    for i in 1 .. attr_count
    loop
      type_code := self.ret_type.getattreleminfo( i
                                                 , prec
                                                 , scale
                                                 , len
                                                 , csid
                                                 , csfrm
                                                 , attr_type
                                                 , attr_name
        case type_code
          when dbms_types.typecode_char then
            dbms_sql.column_value( self.cur, i, v1 );
            outset.setchar( v1 );
          when dbms_types.typecode_varchar2 then
            dbms_sql.column_value( self.cur, i, v1 );
            outset.setvarchar2( v1 );
          when dbms_types.typecode_number then
            dbms_sql.column_value( self.cur, i, n1 );
            outset.setnumber( n1 );
          when dbms_types.typecode_date then
            dbms_sql.column_value( self.cur, i, d1 );
            outset.setdate( d1 );
          when dbms_types.typecode_urowid then
            dbms_sql.column_value( self.cur, i, ur1 );
            outset.seturowid( ur1 );
          when dbms_types.typecode_interval_ds then
            dbms_sql.column_value( self.cur, i, ids1 );
            outset.setintervalds( ids1 );
          when dbms_types.typecode_interval_ym then
            dbms_sql.column_value( self.cur, i, iym1 );
            outset.setintervalym( iym1 );
          when dbms_types.typecode_timestamp then
            dbms_sql.column_value( self.cur, i, ts1 );
            outset.settimestamp( ts1 );
          when dbms_types.typecode_timestamp_tz then
            dbms_sql.column_value( self.cur, i, tstz1 );
            outset.settimestamptz( tstz1 );
          when dbms_types.typecode_timestamp_ltz then
            dbms_sql.column_value( self.cur, i, tsltz1 );
            outset.settimestampltz( tsltz1 );
        end case;
    end loop;
    outset.endcreate;
    return odciconst.success;
  end;
  member function ODCITableClose( self in PivotImpl )
  return number
  is
    c integer;
    t_id user_objects.object_id%type;
  begin
    c := self.cur;
    dbms_sql.close_cursor( c );
    select object_id
    into t_id
    from user_objects
    where object_name = 'PIVOTIMPL'
    and   object_type = 'TYPE BODY';
-- invalidating of the type body forces that ODCITableDescribe is executed for every call to the pivot function
-- and we do need that to make sure that any new columns are picked up (= new values for the pivoting column)
    dbms_utility.invalidate( t_id );
    return odciconst.success;
  end;
end;
create or replace
function pivot( p_stmt in varchar2, p_agg in varchar2 := 'max' )
return anydataset pipelined using PivotImpl;
/