- 博客(19)
- 收藏
- 关注
原创 自制流水码获取-优化
任务编号 * 任务编号 * MODIFICATION LOG*& CREATE ON : 2024-04-10。*& CREATE ON : 2024-04-10。
2024-04-10 14:47:37 485 1
原创 ABAP 简单容器分割 split
涉及类:cl_gui_splitter_containercl_gui_container代码重点:*1. 拆分界面CREATEOBJECTgs_splitEXPORTINGlink_dynnr=sy-dynnrlink_repid=sy-repidparent=cl_gui_container=>sc...
2020-03-02 16:51:28 2031
原创 表显示/编辑
注意:编辑的字段超过内表定义的长度,内表会自动换行,建议不用DATA:lt_maraTYPETABLEOFmara.SELECT*FROMmaraINTOTABLElt_maraUPTO1ROWS.可编辑:EDITOR-CALLFOR table不可编辑:EDITOR-CALLFOR tableDISPLAY-MODE.EDITOR-CALLFO...
2019-12-02 10:45:33 202
原创 SAP abap 附件清单管理
功能包含:上传、查看、修改、删除此程序可直接运行*&---------------------------------------------------------------------**&ReportZTEST_QH_0081*&-------------------------------------------------------------...
2019-08-05 10:31:13 2673
原创 ABAP 数据动态计算
DATA: lv_num TYPE cha_class_data-sollwert, lv_formula TYPE string, lv_out_num TYPE cha_class_view-sollwert.PARAMETERS : p_num_01 TYPE i, p_num_02 TYPE i, ...
2018-09-17 15:18:48 626
原创 ABAP生成XML文件
REPORT ztext_qh_0007.*常量-重复节点名称CONSTANTS : con_repeat TYPE string VALUE 'CON_REPEAT'.* xml 数据DATA: lr_ixml TYPE REF TO if_ixml, lr_document TYPE REF TO if_ixml_document, ...
2018-07-23 18:17:37 2263
原创 ABAP 二分法查找
二分法查找前必须排序,且必须为正序。TYPES : BEGIN OF ty_data, id(2), id_ms(6), END OF ty_data.DATA :l_id(2), lt_data TYPE TABLE OF ty_data WITH HEADER LINE.DO 10 TIMES. ADD 1 TO l_id. lt...
2018-07-05 10:43:56 1119
转载 ALV 布局
ALV中要搞布局格式I_SAVE.1:I_SAVE = SPACE 布局不能被保存2:I_SAVE = 'U' 仅自定义的布局以被保存3:I_SAVE = 'X' 仅全局布局可以被保存4:I_SAVE = 'A' 自定义的布局和全局的布局都可以被保存REUSE_ALV_VARIANT_DEFAULT...
2018-07-04 10:49:43 1378
原创 ABAP 动态Open SQL
* 1.动态字段查询WRITE:/ '1.动态字段查询'.DATA : gs_lin(72)."长度最多为72位DATA : lt_makt TYPE TABLE OF makt WITH HEADER LINE.gs_lin = 'MATNR SPRAS MAKTX'.SELECT (gs_lin) FROM makt INTO CORRESPONDING FIELDS OF TABLE l...
2018-05-10 21:57:18 1026
原创 BAPI 含增强字段(EXTENSIONIN)
下面只是个人的一些浅显的看法,如果有错误或者更好的方案,请指出。1.找到对应的结构或者自己创建一个结构,(如果创建,必须有对应的关键字)2.在结构中添加表增强的字段3.EXTENSIONIN值设置4.调用bapi 以 BAPI_PO_CREATE1 为例:创建PO需要导入 "ZZ001" 字段步骤1: 步骤2: 系统一般都有定义对应的结构(将字段添加到结构中)步骤3:传...
2018-03-29 17:05:34 11375
原创 ABAP FB08 凭证冲销(BAPI_ACC_DOCUMENT_REV_POST)
*&---------------------------------------------------------------------**& Form FRM_WRITE_OFF*&---------------------------------------------------------------------**& text*&------...
2018-03-28 14:16:42 10035
原创 ABAP FB01过账(BAPI_ACC_DOCUMENT_POST)
FORM frm_bapi_data .DATA : l_documentheader TYPE bapiache09, lt_accountgl TYPE TABLE OF bapiacgl09 WITH HEADER LINE, lt_currencyamount TYPE TABLE OF bapiaccr09 WITH HEADER LINE.D...
2018-03-28 14:04:53 2127
原创 ABAP-SUBMIT传值(基本)
*SUBMIT 传值(基本)SELECT-OPTIONS : s_lifnr FOR lfa1-lifnr . "供应商RANGES: r_ebeln FOR ekko-ebeln.r_ebeln-sign = 'I'.r_ebeln-option = 'EQ'.r_ebeln-low = '123456789'.APPEND r_ebeln.CLEAR r_ebeln.r_ebeln...
2018-03-23 10:16:24 2810
转载 ABAP 内表、JSON互相转换
DATA: json_ser TYPE REF TO cl_trex_json_serializer, json_des TYPE REF TO cl_trex_json_deserializer.DATA: jsonstr TYPE string.DATA: BEGIN OF itab OCCURS 0, matnr LIKE makt-matnr,
2018-01-16 13:38:13 889
原创 SAP号码段配置-SNRO/SNUM
T-CODE: SNRO、SNUM1.创建一个号码段对象2.设置编号长度域、警告(注意:必须是SAP系统已定意的域)3.设置缓冲,优点:不直接去数据库里取数,提升效率;缺点:存在跳号4.设置取数范围5.调整当前编号6.调用程序DATA:l_num TYPE i.*锁定 CALL FUNCTION 'NUMBER_RANGE_E
2018-01-12 16:56:17 10500
原创 ALV刷新
* FUNCTION alv 刷新* 1. rs_selfield TYPE slis_selfield rs_selfield-col_stable = 'X'." alv刷新时,数据在原来位置 rs_selfield-row_stable = 'X' . rs_selfield-refresh = 'X' .* 2. 直接刷新 DATA: lr_grid
2018-01-05 10:31:19 767
转载 ABAP_字符串操作_01
REPORT z_overlay_001 NO STANDARD PAGE HEADING MESSAGE-ID mg.WRITE : /,'********************拆分字符串split***************'.*语法:* SPLIT AT INTO ... .*用法:* 将字符串根据字符串拆分成字符串....PERFORM fr
2017-12-26 14:11:24 735
原创 CLASS EVENT
CLASS LCL_HANDLER_01 DEFINITION. PUBLIC SECTION. DATA : GS_KNA1 TYPE KNA1. METHODS GET_KNA1 IMPORTING P_KUNNR LIKE GS_KNA1-KUNNR .* 声明event EVENTS EVENT_KNA1 EXPORTING VALUE(
2017-12-17 21:54:47 268
原创 Message一般设置
REPORT ZMASSAGE_QH_001 MESSAGE-ID ZTEXT_QH001.*MSEEAGE tnnn(message_class)*t表示消息类型,nnn代表消息号,message_class代表消息名 DATA p TYPE c VALUE '我'. MESSAGE i004.MESSAGE i001(00) WITH '谁最牛:' p. M
2017-05-08 13:48:29 640
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人