iLoveZod-优快云博客

原创几个方便的日期计算函数

1－方便但有缺陷的函数DATE1 = 01.05.2007. CALL FUNCTION ADD_TIME_TO_DATE EXPORTING I_IDATE = DATE1 I_TIME = 1 I_IPRKZ = M IMPORTING O_IDATE = DATE2.结果：DATE2 = 30.04.2007

2007-06-07 14:55:00 1139

原创 XLS文件读取 & cl_gui_frontend_services=>file_open_dialog

DEFINE transe_excel_into_intertable. data : l_intern like alsmex_tabline occurs 0 with header line. data : l_index type i. field-symbols : . call function ALSM_EXCEL_TO_INTERNAL_TABLE exporti

2007-06-07 11:51:00 3056

原创 Unicode版本与None-Unicode版本中，将string赋给structure的不同方式。（cl_abap_container_utilities=>READ_CONTAINER_C）

Unicode版本中有如下声明： data: key(8) value 12345678.DATA: BEGIN OF A, "在Unicode中，一个X变量为1byte长度，但是一个char为2byte长度 "所以此处每个field用两位X数组 1(2) TYPE X, 2(2) TYPE

2007-05-29 22:56:00 1841

原创加密/解密算法（Unicode版本和None-Unicode版本）

Unicode版本：data: key(8) value 12345678.DATA: I TYPE I, J TYPE I.DATA: BEGIN OF A, 1(2) TYPE X, 2(2) TYPE X, 3(2) TYPE X, 4(2) TYPE X, 5(2) TYPE X, 6(2) TYPE X, 7(2) TYPE X, 8(2) TYPE X,END

2007-05-29 22:44:00 1958

原创 Smartforms的使用示例

FORM PrintInSF. CALL FUNCTION SSF_FUNCTION_MODULE_NAME EXPORTING FORMNAME = ZPAYSLIP_SF "Form的名称 IMPORTING FM_NAME = fm_name EXCEPTIONS NO_F

2007-04-25 16:33:00 1046

原创 XLS文件的上传与下载

上传XLS文件：先将XLS保存成TXT文件，然后用WS_UPLOAD或UPLOAD函数上传。注意FILETYPE参数=‘DAT’。CALL FUNCTION UPLOADEXPORTINGCODEPAGE = IBMFILENAME = d:/temp/mytable.txtFILETYPE = DATITEM = Read Test for Excel FileIMP

2007-03-13 10:32:00 1492

原创系统增强时session数据的手动传递

情景：对MFBF做系统exit增强，使得用户在点击保存按钮时将料号、反冲数量等信息mail至特定sap用户。问题：用CMOD系统增强工具对exit object: XMRM0001进行增强，在EXIT_SAPLBARM_002组件中添加了mail动作。但是实际使用时，当输入完成回车时程序做user data check（保存动作还未做），但是不但没有带出相应信息反而将输入数据清掉了。

2007-02-06 15:04:00 1330

原创发送mail例子

注意下面例子中： RECVLIST-REC_TYPE = U. RECVLIST-COM_TYPE = INT.设定发送到internet的mail而非SAP用户inbox。如要发送到SAP mail的话应该将上面设定注释掉。REPORT Z_EMAIL .*********************************************************

2007-02-01 11:35:00 1431

原创对于不能join的表，使用for all entries in语句将该表与内表串联。

像bseg这样的表不是transparent table所以不能做inner join。在这种情况下，可以先从其他表中选出数据放到itab中，然后使用for all entries 语句来串联。如下： SELECT bseg~kunnr bseg~lifnr bseg~belnr INTO TABLE itab_bseg FROM bseg

2007-01-24 09:35:00 2023

原创 WHERE子句中实现字段部分内容的判断。

有两种WHERE子句。在SELECT语句中这种情况下如果需要判断字段的部分值可以使用SQL语句的LIKE:SELECT * FROM SKA1 INTO TABLE ITAB WHERE SAKNR LIKE 00101%.上面的SELECT语句表示选出前5位为00101的所有记录，注意‘%’符号的含义在内表中在这种情况下可以这样实现：loop at src_

2006-12-29 12:45:00 1298

原创使用模板的EXCEL操作（读取和写入，不定数量的行项目）

REPORT ZKEEXLSTEST MESSAGE-ID ZSAP02. INCLUDE ZKEE_OLEINCL. TABLES: VBAK.DATA: BEGIN OF RECORDS OCCURS 0, VBELN LIKE VB

2006-12-18 10:10:00 1447

原创数值型变量补0——UNPACK关键字

注意点：UNPACK 语句补零时会忽略P类型的数据的小数点。详见SAP F1 Help效果：1234--->00001234

2006-12-06 10:39:00 1673

原创将txt/xls文件读入内表

将txt文件读入内表，这种方式读入的txt文件列之间只能用tab分割不能用其他分隔符 CALL FUNCTION UPLOAD EXPORTING filename = SRC_FILE filetype = DAT item

2006-11-30 11:34:00 1094

原创 BDC例子

先用shdb录一个 bdc程序（数据来源选from recording），然后做相应修改。其中的PERFORM bdc_field USING BDC_CURSOR XXXXXXXX语句是记录鼠标动作的，一般可以去掉。对于带不定数目行项目的BDC程序，可以用下面方法实现。Header Key放在第一列，然后根据Header Key和行项目Key做sort，然后利用AT

2006-11-30 11:21:00 1883

原创如何设置select-option的多项起始默认值

select-options: s_matnr for lips-matnr NO INTERVALS. initialization. s_matnr-low = 100-AB. s_matnr-option = EQ. s_matnr-sign = I. append s_matnr. s_matnr-low = 100-AA. s_matnr-opti

2006-11-30 11:06:00 6984

如下代码：SELECT-OPTIONS: ZVENDOR FOR EKKO-LIFNR.SELECT-OPTIONS: ZPLANT FOR EKBE-WERKS.SELECT-OPTIONS: ZMATNR FOR EKBE-MATNR.SELECT-OPTIONS: ZPONR FOR EKBE-EBELN.SELECT-OPTIONS: ZBUDAT FOR MKPF-BUDAT.SELEC

2006-11-30 11:00:00 1446 2

原创当选择关键字不是MSEG的索引关键字时，用EKBE代替MSEG可以提高查询速度N倍！

*----------------------------------------------------------------------** Program Name : ZKEE13 ** Purpose : check account for purchaser

2006-11-30 10:27:00 2002

原创 WRITE,ALV与FORM不同的输出方式

REPORT ZKEEHOMEWORK1 NO STANDARD PAGE HEADING message-id zasia LINE-SIZE 180 LINE-COUNT 60.INCLUDE ZALV_EXAMPLE_INCL. "在下面**********************Table W

2006-11-30 10:22:00 1809

原创可编辑单元格并且支持usercommand的ALV使用；读写磁盘文件；调用磁盘可执行文件

*&---------------------------------------------------------------------**& Report ZEDI **&

2006-11-30 10:18:00 1538

原创 LOOP内表并对关键字使用AT语句时，必须注意的问题。

EBELN MATNR MBLNR NETPR 一个内表itab结构如上。如果要LOOP该内表并对EBELN做AT 事件，则必须将EBELN放在第一个位置如上。否则AT 事件将执行错误（例如还没到结束就执行AT END

2006-09-14 09:38:00 2119

转载正则表达式教程

2006-08-31 16:36:00 1111

转载 Web Parts, Impersonate and Security Policy

http://rickie.cnblogs.com/archive/2005/01/28/98501.html

2006-05-04 13:42:00 883

原创 VS2003中创建Web App时出现“500-Internal Server Error”的解决方法。

发生：在一台安装了VS2005的机器上又安装了VS2003，于是用VS2003创建Web App时发生如标题中的情况。解决：删除IIS，并一定要删除Interpub目录。重新安装IIS，并运行“aspnet_regiis -i”。如有必要再运行“iisreset”重起IIS。问题解决。原因：不祥！

2006-05-02 21:30:00 1870 1

转载 Flier's Sky的大作，一文搞定.Net PE File Structure!

http://flier.cnblogs.com/archive/2004/07/08/22261.html

2006-04-19 22:16:00 914

原创 StrongName原理分析及实例

StrongName是一种.Net提供的身份识别机制。它基于一些加密算法，例如RSA等，对程序集实施加密或称作签名。从而使得我们可以鉴别某个程序集的身份（该程序集是谁发布的）。其实，从本质上来说，StrongName和证书机制（例如X.509）的身份识别原理是相同的。区别只是，证书机制关心的是客户端能否证明自己具有一定的资格，而StrongName只是表识特定的身份，这个身份无所谓客户端或服务端，

2006-04-19 22:15:00 2082

iLoveZod的备忘录