皮皮网

【在线图片编辑源码】【app启动视频源码】【7公里源码】single sap源码

时间:2024-12-29 07:01:44 来源:pythonping程序源码

1.SAP万能BDC的在线图片编辑源码源代码是什么?

single sap源码

SAP万能BDC的源代码是什么?

       form bdc_dynpro using program dynpro.

        clear bdcdata.

        bdcdata-program = program.

        bdcdata-dynpro = dynpro.

        bdcdata-dynbegin = 'X'.

        append bdcdata.

       endform. " bdc_dynpro

       form bdc_field using fnam fval.

        clear bdcdata.

        bdcdata-fnam = fnam.

        bdcdata-fval = fval.

        append bdcdata.

       endform. " bdc_field

       form bdc_transaction using tcode.

        data: l_mstring().

        data: l_subrc like sy-subrc.

        DATA: zwa_bdcmsgcoll LIKE zbdcmsgcoll.

        refresh messtab.

        REFRESH ZHEAD_RETURN.

        call transaction tcode using bdcdata

        mode ctumode

        update cupdate

        messages into messtab.

        LOOP AT messtab.

        CLEAR zwa_bdcmsgcoll.

        MOVE-CORRESPONDING messtab TO zwa_bdcmsgcoll.

        SELECT SINGLE * FROM t WHERE sprsl = messtab-msgspra

        AND arbgb = messtab-msgid

        AND msgnr = messtab-msgnr.

        IF sy-subrc = 0.

        l_mstring = t-text.

        IF l_mstring CS '&1'.

        REPLACE '&1' WITH messtab-msgv1 INTO l_mstring.

        REPLACE '&2' WITH messtab-msgv2 INTO l_mstring.

        REPLACE '&3' WITH messtab-msgv3 INTO l_mstring.

        REPLACE '&4' WITH messtab-msgv4 INTO l_mstring.

        ELSE.

        REPLACE '&' WITH messtab-msgv1 INTO l_mstring.

        REPLACE '&' WITH messtab-msgv2 INTO l_mstring.

        REPLACE '&' WITH messtab-msgv3 INTO l_mstring.

        REPLACE '&' WITH messtab-msgv4 INTO l_mstring.

        ENDIF.

        CONDENSE l_mstring.

        zwa_bdcmsgcoll-ztext = l_mstring.

        CLEAR l_mstring.

        ENDIF.

        APPEND zwa_bdcmsgcoll TO zhead_return.

        CLEAR zwa_bdcmsgcoll.

        ENDLOOP.

        refresh bdcdata.

推荐资讯
山西:5月受理投诉上万件 为消费者挽回经济损失459万元

山西:5月受理投诉上万件 为消费者挽回经济损失459万元

复古传奇源码_复古传奇源码怎么用

复古传奇源码_复古传奇源码怎么用

账户系统源码_账户系统源码怎么查

账户系统源码_账户系统源码怎么查

最新骆驼源码_最新骆驼源码.基于魔改版本修复EPG 天气 授权全部正常

最新骆驼源码_最新骆驼源码.基于魔改版本修复EPG 天气 授权全部正常

推进质量强国建设|陕西:持续推进小微企业质量提升工作  

推进质量强国建设|陕西:持续推进小微企业质量提升工作  

柚多多源码_柚多多网络科技有限公司

柚多多源码_柚多多网络科技有限公司

copyright © 2016 powered by 皮皮网   sitemap