WDA Program text translation OTR

Source: Internet
Author: User

1. For data elements that use table fields directly:

1.1 Modify the language value for the data element: DD04T.

1.2 Analog SE63 Insert translation entry: Lxe_log

1.3 Runtime file Translation entry: DDFTX

*&---------------------------------------------------------------------**& Report ZHSICRM_TEXTMD*&*&---------------------------------------------------------------------**&*& Maintain data element text in batches to ensure that the screen position using the data element text is displayed correctly in multiple languages*& Liyuan 20170113 creation*& Upload files with table DD04T as structure fields*&---------------------------------------------------------------------* ReportZHSICRM_TEXTMD.TABLES:D d04t,lxe_log,ddftx.DATA: gt_dd04tTYPE TABLE  ofdd04t, gw_dd04t like  Line  ofgt_dd04t, gs_dd04t like  Line  ofgt_dd04t, Gt_lxe_logTYPE TABLE  ofLxe_log, Gw_lxe_log like  Line  ofGt_lxe_log, Gs_lxe_log like  Line  ofGt_lxe_log, Gt_ddftxTYPE TABLE  ofDdftx, Gw_ddftx like  Line  ofGt_ddftx, Gs_ddftx like  Line  ofGT_DDFTX.Selection-screen:BEGIN  of BLOCKBLK01 withFRAME TITLETEXT-001.PARAMETERS:P _TBMATYPECrmtables-tabname No-display,"Rsrd1-tbma_val,P_file likerlgrap-FILENAME.Selection-screen END  of BLOCKBLK01.*selection-screen FUNCTION KEY 1. at Selection-screen  on value-request  forP_file. PERFORMFrm_get_filepath.start-of-selection.CHECKP_file is  not INITIAL.PERFORMPrm_upload_excel.PERFORMprm_update_table.*&---------------------------------------------------------------------**& Form Frm_get_filepath*&---------------------------------------------------------------------**text*----------------------------------------------------------------------**- P1 text*<--P2 text*----------------------------------------------------------------------*FORMFrm_get_filepath. Pager FUNCTION 'Ws_filename_get'    ExportingMASK=', Excel (*.xls), *. xls,*. XLSX,'TITLE='Select File'( -)    ImportingFILENAME=P_fileEXCEPTIONSInv_winsys=1No_batch=2Selection_cancel=3Selection_error=4OTHERS=5. IFSY-SUBRC <>0. "MESSAGE E100 (zdev) with ' Select File ' ERROR! ' (007).  ENDIF.EndForm.*&---------------------------------------------------------------------**& Form Prm_upload_excel*&---------------------------------------------------------------------**text*----------------------------------------------------------------------**- P1 text*<--P2 text*----------------------------------------------------------------------*FORMPrm_upload_excel.IFP_file is  not INITIAL.*passing Excel data into the inner table    Pager FUNCTION 'zalsm_excel_to_internal_table'      ExportingFILENAME=p_file I_begin_col='1'I_begin_row='2'I_end_col=' -'I_end_row='50000'      TABLESINTERN=gt_dd04t. ENDIF.EndForm.*&---------------------------------------------------------------------**& Form prm_update_table*&---------------------------------------------------------------------**text*----------------------------------------------------------------------**- P1 text*<--P2 text*----------------------------------------------------------------------*FORMprm_update_table. CHECKGt_dd04t[] is  not INITIAL. LOOP  atgt_dd04t intogw_dd04t. Gs_lxe_log-CUSTMNR ='999999'.  Casegw_dd04t-Ddlanguage. when'E'. Gs_lxe_log-TARGLNG ='Enus'.*When ' 1 '.*gs_lxe_log-targlng = ' Enus '.When'I'. Gs_lxe_log-TARGLNG ='Itit'. when'D'. Gs_lxe_log-TARGLNG ='DeDE'. when'S'. Gs_lxe_log-TARGLNG ='EsES'. when'J'. Gs_lxe_log-TARGLNG ='JAJP'.        When OTHERS. CONTINUE. Endcase. Gs_lxe_log-objtype ='Dtel'. Gs_lxe_log-objname = gw_dd04t-Rollname. Gs_lxe_log-uname = sy-UNAME. Gs_lxe_log-udate = sy-DATUM. Gs_lxe_log-utime = sy-Uzeit. APPENDGs_lxe_log toGt_lxe_log. SELECT  Single* intoGs_ddftx fromDDFTXWHERETabName = gw_dd04t-Rollname andDdlanguage ='E'       andRollname = gw_dd04t-Rollname. IFSY-SUBRC =0. GS_DDFTX-ddlanguage = gw_dd04t-Ddlanguage. GS_DDFTX-scrtext_s = gw_dd04t-scrtext_s. GS_DDFTX-scrtext_m = gw_dd04t-scrtext_s. GS_DDFTX-scrtext_l = gw_dd04t-scrtext_s. GS_DDFTX-reptext = gw_dd04t-Reptext. GS_DDFTX-fieldtext = gw_dd04t-Ddtext. APPENDGs_ddftx toGT_DDFTX. ENDIF. Endloop. MODIFYdd04t from TABLEgt_dd04t. MODIFYLxe_log from TABLEGt_lxe_log. IFGt_ddftx[] is  not INITIAL. MODIFYDdftx from TABLEGT_DDFTX. ENDIF. IFSY-SUBRC =0. MESSAGE 'Import succeeded' TYPE 'S'. ELSE. MESSAGE 'Import Failed' TYPE 'S'DISPLAY like 'E'. EXIT. ENDIF.EndForm.

2.WDA Write dead value in text

2.1sotr_edit

You can get a single text and key value.

2.2 Re-enter maintenance modification values.

Refer to modifying Sotr_text

WDA Program text translation OTR

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.