@AbapCatalog.sqlViewName: 'RIS_QUICK_SEARCH'
@EndUserText.label: 'Quick Search: Ctrl.+Shift.+A'
define view ris_quick_search_view as
// CLAS INTF TYPE WDYN XSLT program includes
select from tadir inner join sedt_prog_tadir on tadir.object = object_type and tadir.obj_name = object_name
{
tadir.object as object_type,
tadir.obj_name as parent_object_name,
program_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
tadir.object as alias_type,
'X' as is_special_include
} where
( func_name = '' and method_name = '' ) and
( tadir.pgmid = 'R3TR' and ( tadir.object = 'CLAS' or tadir.object = 'INTF' or tadir.object = 'TYPE' or tadir.object = 'WDYN' or tadir.object = 'XSLT' ) and (tadir.delflag <> 'X') )
union all
// executable programs
select distinct from tadir inner join progdir on tadir.obj_name = progdir.name and tadir.object = 'PROG'
{
tadir.object as object_type,
tadir.obj_name as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
'REPO' as alias_type,
' ' as is_special_include
} where
( tadir.pgmid = 'R3TR' and tadir.delflag <> 'X' and ( progdir.subc = '1' or progdir.subc = 'M' ) )
union all
// program includes
select distinct from tadir inner join progdir on tadir.obj_name = progdir.name and tadir.object = 'PROG'
{
tadir.object as object_type,
tadir.obj_name as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
'INCL' as alias_type,
' ' as is_special_include
} where
( tadir.pgmid = 'R3TR' and tadir.delflag <> 'X' and progdir.subc = 'I')
union all
select distinct from tadir inner join progdir on tadir.obj_name = progdir.name and tadir.object = 'PROG'
{
tadir.object as object_type,
tadir.obj_name as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
tadir.object as alias_type,
' ' as is_special_include
} where
( tadir.pgmid = 'R3TR' and tadir.delflag <> 'X' and progdir.subc <> '1' and progdir.subc <> 'I')
union all
//TADIR objects excluding some object types for which special handling is required
select distinct from tadir inner join euobjedit on tadir.object = euobjedit.tadir
{
euobjedit.tadir as object_type,
'' as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
euobjedit.tadir as alias_type,
' ' as is_special_include
} where ( tadir.pgmid = 'R3TR' and tadir.object <> 'PROG' and tadir.object <> 'STOB' and tadir.object <> 'WDCC' and
tadir.object <> 'WDCA' and tadir.object <> 'TABL' and tadir.delflag <> 'X' and
tadir.object <> 'APIS' and // API States should not be found
tadir.object <> 'HOTA' and tadir.object <> 'SHI3' and
tadir.object <> 'IWSV' and tadir.object <> 'G4BA' and
tadir.object <> 'G4BS' and tadir.object <> 'GCPM') // dummy object types introduced to release Gateway Services
union all
//Tables and structures
select distinct from tadir inner join dd02l on tadir.obj_name = dd02l.tabname and tadir.object = 'TABL'
{
tadir.object as object_type,
'' as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
'STRU' as alias_type,
' ' as is_special_include
} where ( tadir.pgmid = 'R3TR' and tadir.delflag <> 'X' and ( dd02l.tabclass = 'INTTAB' or dd02l.tabclass = 'APPEND' ) )
union all
//Tables and structures
select distinct from tadir inner join dd02l on tadir.obj_name = dd02l.tabname and tadir.object = 'TABL'
{
tadir.object as object_type,
'' as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
'DTAB' as alias_type,
' ' as is_special_include
} where ( tadir.pgmid = 'R3TR' and tadir.delflag <> 'X' and dd02l.tabclass <> '' and dd02l.tabclass <> 'INTTAB' and dd02l.tabclass <> 'APPEND' )
union all
//Tables and structures
select distinct from tadir inner join dd02l on tadir.obj_name = dd02l.tabname and tadir.object = 'TABL'
{
tadir.object as object_type,
'' as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
tadir.object as alias_type,
' ' as is_special_include
} where ( tadir.pgmid = 'R3TR' and tadir.delflag <> 'X' and dd02l.tabclass = '' )
union all
// Web Dynpro Component/Application Configurations
select from tadir
{
object as object_type,
'' as parent_object_name,
substring( obj_name, 1, 30 ) as object_name,
author as author,
devclass as devclass,
object as alias_type,
' ' as is_special_include
} where ( pgmid = 'R3TR' and ( object = 'WDCC' or object = 'WDCA' ) and delflag <> 'X' )
union all
// Function moduls
select from tadir inner join sedt_prog_tadir on tadir.object = object_type and tadir.obj_name = object_name
{
tadir.object as object_type,
tadir.obj_name as parent_object_name,
func_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
'FUNC' as alias_type,
' ' as is_special_include
} where
( func_name <> '' ) and
( tadir.pgmid = 'R3TR' and tadir.delflag <>'X' and
( tadir.object = 'FUGR' or tadir.object = 'FUGS' ))
union all
// Function group includes
select from tadir inner join sedt_prog_tadir on tadir.object = object_type and tadir.obj_name = object_name
{
tadir.object as object_type,
tadir.obj_name as parent_object_name,
program_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
'PROG' as alias_type,
' ' as is_special_include
} where
tadir.pgmid = 'R3TR' and ( tadir.object = 'FUGR' or tadir.object = 'FUGS' ) and tadir.delflag <>'X'
union all
// View Entities
select distinct from v_ddldep inner join tadir on tadir.object = 'DDLS' and tadir.obj_name = v_ddldep.ddlname
{
v_ddldep.objecttype as object_type,
v_ddldep.ddlname as parent_object_name,
v_ddldep.objectname as object_name,
tadir.author as author,
tadir.devclass as devclass,
v_ddldep.objecttype as alias_type,
' ' as is_special_include
} where v_ddldep.objecttype = 'STOB'
union all
// BAdIs
select from badi_spot inner join tadir on tadir.object = 'ENHS' and tadir.obj_name = badi_spot.enhspotname
{
tadir.object as object_type,
tadir.obj_name as parent_object_name,
badi_spot.badi_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
tadir.object as alias_type,
' ' as is_special_include
} where tadir.pgmid = 'R3TR' and tadir.delflag <> 'X'
union all
// Packages starting with $
select from tdevc
{
'DEVC' as object_type,
'' as parent_object_name,
tdevc.devclass as object_name,
tdevc.as4user as author,
tdevc.devclass as devclass,
'DEVC' as alias_type,
' ' as is_special_include
} where tdevc.devclass like '$%'
union all
// HOTA: exclude old v1 entries
select from tadir
left outer join cts_hot_package on tadir.obj_name = cts_hot_package.abap_hana_package_id
{
tadir.object as object_type,
'' as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
tadir.object as alias_type,
' ' as is_special_include
}
where
pgmid = 'R3TR'
and tadir.object = 'HOTA'
and cts_hot_package.abap_hana_package_id is null
and delflag <> 'X'
union all
// SHI3: exclude old v1 entries
select from tadir
left outer join ttree on tadir.obj_name = ttree.id
{
tadir.object as object_type,
'' as parent_object_name,
tadir.obj_name as object_name,
tadir.author as author,
tadir.devclass as devclass,
tadir.object as alias_type,
' ' as is_special_include
}
where
tadir.pgmid = 'R3TR' and tadir.object = 'SHI3' and tadir.delflag <> 'X' and ttree.type = 'BMENU'
/*+[internal] {
"BASEINFO":
{
"FROM":
[
"SEDT_PROG_TADIR",
"BADI_SPOT",
"CTS_HOT_PACKAGE",
"DD02L",
"EUOBJEDIT",
"TADIR",
"TDEVC",
"TTREE",
"PROGDIR",
"V_DDLDEP"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/