根据域值来做下拉框的搜索帮助
代码如下
I视图
ABAP
|
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视图
ABAP
|
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 } |
实现效果
下拉框，值显示文本。
声明：本站所有文章，如无特殊说明或标注，均为本站原创发布。任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。
