ITPub博客

一. 编辑资料未保存而退出的确认框﹕操作步骤如下﹕ 1. 定义一個变量接受函数的返回值例如﹕ data: commandname2. 调用函数 POPUP_TO_CONFIRM_LOSS_OF_DATACALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA'EXPORTINGtextline1 = ‘人民万岁’textline2 = ‘伟大的中国'titel = ‘提示’* START_COLUMN = 25* START_ROW = 6* IMPORTINGANSWER = commandnameEXCEPTIONSOTHERS = 1.注解﹕textline1---为MessageBox 第一行內容textline2---为MessageBox 第二行內容title---------为MessageBox 的标题start_column, start_row 决定Message Box 的

CLASS Employee DEFINITION.PUBLIC SECTION.DATA:nEmployeeNo(4) type n, cEmployeeName(30) type c,iNoOfUnits type i,iPayPerUnit type i. METHODS:CalculatePay RETURNING VALUE(iPay) TYPE i,WritePay IMPORTING VALUE(iPay) TYPE i.ENDCLASS.CLASS Employee IMPLEMENTATION.METHOD CalculatePay.iPay = iNoOfUnits * iPayPerUnit.ENDMETHOD.METHOD WritePay.WRITE: / 'The pay for employee ',nEmployeeNo, cEmployeeName,' is : ', iPay.ENDMETHOD.ENDCLASS.CLASS FactoryWorker DEFINITION INHERITING FROM Employee.PUBLIC SECTIO

最近做了一个内表数据导出到excel的开发,在excel模板已经存在的情况下,需要将不同的数据导出到2张工作薄中,关键代码见下：*模块池:slisTYPE-POOLS: slis.TYPE-POOLS: ole2.*EXECL相关DATA g_key TYPE wwwdatatab.DATA: g_excel TYPE ole2_object, "excel g_sheet TYPE ole2_object, "sheet g_workbookl TYPE ole2_object, "work book list g_workbook TYPE ole2_object, "work book g_range TYPE ole2_object, "rang g_cell TYPE ol

通过关于SCREEN的部分输入条件可隐藏的问题（一）的介绍，我想再做一下延伸1.实现根据输入SPFLI-CARRID的内容，决定是否把隐藏界面打开。比如carrid字段中有“AA”、“AZ”、“DL”等，如果输入“AA”的话，隐藏界面打开，否则不打开。通过如下代码实现：REPORT ZT .TYPE-POOLS ICON.TABLES SPFLI.SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TXT-001.PARAMETERS S_CARRID TYPE SPFLI-CARRID.SELECTION-SCREEN END OF BLOCK B1.SELECTION-SCREEN BEGIN OF LINE.SELECTION-SCREEN PUSHBUTTON 1(4) BUT1 USER-COMMAND BUTTON1 VIS

1.开发report中screen都要输入一些诸如“年度”或“公司代码”的条件，有时候为了屏幕的简洁美观，需要把一些输入条件隐藏起来，操作用户根据需要或输入的条件决定是否打开隐藏的界面。怎么办？我在开发过程中特别需要这个隐藏界面,所以就找了些资料,总结一下。2.把下面的代码记住，就可以实现。REPORT ZT.TYPE-POOLS ICON.TABLES SPFLI.SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TXT-001.PARAMETERS S_CARRID TYPE SPFLI-CARRID.SELECTION-SCREEN END OF BLOCK B1.SELECTION-SCREEN BEGIN OF LINE.SELECTION-SCREEN PUSHBUTT

1.首先看看下面这个表格编码数量备注文本AD1012YTAD3223YTBC4534YTAF6545GTFD3245GTBC4556GAF6545YBC4533YAD1067GAD10100G2.现在我想删除“编码”字段重复的行，怎么办？A好！我先在编辑器里做一个这样的内表。REPORT ZT.DATA: BEGIN OF mydata OCCURS 10,z1(4),z2(5),z3(1),END OF mydata..DATA mydata1 LIKE mydata OCCURS 0 WITH HEADER LINE.DATA WA_DATA LIKE mydata.MYDATA-Z1 = 'AD10'.MYDATA-Z2 = '12'.MYDATA-Z3 = 'Y'.APPEND MYDATA.MYDATA-Z1 = 'AD32'.MYDATA-Z2 = '23'.MYDATA-Z3 = 'Y'.APPEND MYDATA.MYDATA-Z1 = 'BC45'.MYD