根据域值来做下拉框的搜索帮助
代码如下
I视图
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
@AbapCatalog.sqlViewName: 'ZERS_IV_DOMAIN' @AbapCatalog.compiler.compareFilter: true @AbapCatalog.preserveKey: true @AccessControl.authorizationCheck: #NOT_REQUIRED @EndUserText.label: '域值查询' define view ZERS_I_DOMAIN with parameters p_domain_name : domname as select from dd07l as DomainValue left outer join dd07t as DomainText on DomainValue.domname = DomainText.domname and DomainValue.domvalue_l = DomainText.domvalue_l and DomainValue.as4local = DomainText.as4local { @EndUserText.label: '值' key DomainValue.domvalue_l as DValue, @EndUserText.label: '描述' DomainText.ddtext as DText } where DomainValue.as4local = 'A' --Active and DomainText.ddlanguage = $session.system_language and DomainValue.domname = $parameters.p_domain_name |
C视图
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
@AbapCatalog.sqlViewName: 'ZTMS_IV_LSJT_VH' @AbapCatalog.compiler.compareFilter: true @AbapCatalog.preserveKey: true @AccessControl.authorizationCheck: #NOT_REQUIRED @EndUserText.label: '集团内外搜索帮助' @ObjectModel.resultSet.sizeCategory:#XS @VDM.viewType: #COMPOSITE @ObjectModel.dataCategory: #VALUE_HELP define view ztms_i_lsjt_vh as select from ZERS_I_DOMAIN ( p_domain_name: 'ZTMSD_JTNW' ) { @ObjectModel.text.element: ['text'] key DValue as value, @EndUserText.label: '描述' @Semantics.text: true DText as text } |
实现效果
下拉框,值显示文本。