ris_adt_executable_objects

@AbapCatalog.sqlViewName: 'RIS_V_EXECUTABLS'                  
@EndUserText.label: 'View on executable objects'
define view ris_adt_executable_objects as 

select from tadir
{
  object as objtype_tr,
  'YA' as subtype_wb,
  obj_name as object_name  
} where pgmid = 'R3TR' and object = 'WDYC'

union

select from tadir
{
  object as objtype_tr,
  'DF' as subtype_wb,
  obj_name as object_name  
} where pgmid = 'R3TR' and object = 'DDLS'

union

select distinct from dd02l
{
  'TABL' as objtype_tr,
  'DT' as subtype_wb,
  tabname as object_name  
} where as4local = 'A' and ( tabclass = 'TRANSP' or tabclass = 'CLUSTER' or tabclass = 'POOL' )

union

select distinct from dd02l
{
  'VIEW' as objtype_tr,
  'DV' as subtype_wb,
  tabname as object_name  
} where as4local = 'A' and tabclass = 'VIEW'

union

select from seoclass 
{
  'CLAS' as objtype_tr,
  'OC' as subtype_wb,
  clsname as object_name
} where clstype = '0'

union

select from trdir
{
  'PROG' as objtype_tr,
  'P' as subtype_wb,
  name as object_name
} where subc = '1' and name not like '_______________________________%'

union

select from tstc
{
  'TRAN' as objtype_tr,
  'T' as subtype_wb,
  tcode as object_name  
}

union

select from tfdir
{
  'FUGR' as objtype_tr,
  'FF' as subtype_wb,
  funcname as object_name  
}

union

select from o2appl
{
  'WAPA' as objtype_tr,
  'WO' as subtype_wb,
  applname as object_name  
} where version = 'A'

union

select from wdy_application
{
  'WDYA' as objtype_tr,
  'YY' as subtype_wb,
  application_name as object_name  
}
/*+[internal] {
"BASEINFO":
{
"FROM":
[
"DD02L",
"O2APPL",
"SEOCLASS",
"TADIR",
"TFDIR",
"TSTC",
"WDY_APPLICATION",
"TRDIR"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/