@AbapCatalog.viewEnhancementCategory: [#NONE]
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label : 'Change Document Item with UUID Table Field'
@VDM.viewType: #BASIC
@VDM.private: true
@Metadata.ignorePropagatedAnnotations: true
@ObjectModel.usageType:{
serviceQuality: #C,
sizeCategory: #L,
dataClass: #MIXED
}
define view entity P_ChgDocItmWithUUIDTableField
with parameters P_ChangeDocObjectClass : cdobjectcl, P_DatabaseTable : tabname, P_DatabaseTableField : fieldname
as select from cdpos
{
key cdpos.objectid as ChangeDocObject,
key cdpos.objectclas as ChangeDocObjectClass,
key cdpos.changenr as ChangeDocument,
key cdpos.tabname as DatabaseTable,
key cdpos.tabkey as ChangeDocTableKey,
key cdpos.fname as ChangeDocDatabaseTableField,
key cdpos.chngind as ChangeDocItemChangeType,
case
when cdpos.objectclas = $parameters .P_ChangeDocObjectClass and cdpos.fname = $parameters .P_DatabaseTableField
and cdpos.value_old <> ''
then cast (substring(cdpos.value_old, 1, 32) as prevhexadecimalcharfieldvalue preserving type )
else cast ('00000000000000000000000000000000' as prevhexadecimalcharfieldvalue )
end as PrevHexadecimalCharFieldValue,
case
when cdpos.objectclas = $parameters .P_ChangeDocObjectClass and cdpos.fname = $parameters .P_DatabaseTableField
and cdpos.value_new <> ''
then cast (substring(cdpos.value_new, 1, 32) as newhexadecimalcharfieldvalue preserving type )
else cast ('00000000000000000000000000000000' as newhexadecimalcharfieldvalue )
end as NewHexadecimalCharFieldValue
} where objectclas = $parameters .P_ChangeDocObjectClass
and tabname = $parameters .P_DatabaseTable
and fname = $parameters .P_DatabaseTableField
and cdpos.objectclas like 'ATP%'
and length( tabkey ) = 35
and fname like '%UUID'
/*+[internal] {
"BASEINFO":
{
"FROM ":
[
"CDPOS"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/
Depth:
1
2
3
4
5
All
Reload
P_ChgDocItmWithUUIDTableField view_entity