Vfs_Activation_State

@AbapCatalog.sqlViewName: 'VFS8'
@AbapCatalog.compiler.compareFilter: true
@AccessControl.authorizationCheck: #CHECK
@EndUserText.label: 'Activation state for virtual folders'
define view Vfs_Activation_State
  as select distinct from dwinactiv
    left outer join       euobjedit on dwinactiv.object = euobjedit.e071 or dwinactiv.object = euobjedit.tadir
{
  object                         as object_type,
  rtrim(left(obj_name, 30), '=') as object_name,
  uname,
  delet_flag,
  'X'                            as inactive,
  euobjedit.tadir                as maintype
}

union all

// L..U to function modules

select distinct from tfdir
  left outer join    dwinactiv on tfdir.funcname = dwinactiv.obj_name
{
  object   as object_type,
  funcname as object_name,
  uname,
  delet_flag,
  case
    when dwinactiv.obj_name is not initial then 'X'
    else ''
  end      as inactive,
  'FUNC'   as maintype
}

union all

// function group from function group include (SAPL...)

select distinct from tfdir
  left outer join    dwinactiv on tfdir.pname = dwinactiv.obj_name
{
  'FUGR' as object_type,
  case
    when pname like '/%/SAPL%' then replace(substring(pname,1,30), '/SAPL', '/')
    when pname like 'SAPL%'    then replace(substring(pname,1,30), 'SAPL', ' ')
    else ''
    end  as object_name,
  uname,
  delet_flag,
  case
    when dwinactiv.obj_name is not initial then 'X'
    else ''
  end    as inactive,
  'FUGR' as maintype
}
/*+[internal] {
"BASEINFO":
{
"FROM":
[
"DWINACTIV",
"EUOBJEDIT",
"TFDIR"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/