Hyden_QH-CSDN博客

原创自制流水码获取-优化

任务编号 * 任务编号 * MODIFICATION LOG*& CREATE ON : 2024-04-10。*& CREATE ON : 2024-04-10。

2024-04-10 14:47:37 472 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 2004

原创表显示/编辑

注意：编辑的字段超过内表定义的长度，内表会自动换行，建议不用DATA:lt_maraTYPETABLEOFmara.SELECT*FROMmaraINTOTABLElt_maraUPTO1ROWS.可编辑：EDITOR-CALLFOR table不可编辑：EDITOR-CALLFOR tableDISPLAY-MODE.EDITOR-CALLFO...

2019-12-02 10:45:33 173

原创 SAP abap 附件清单管理

功能包含：上传、查看、修改、删除此程序可直接运行*&---------------------------------------------------------------------**&ReportZTEST_QH_0081*&-------------------------------------------------------------...

2019-08-05 10:31:13 2597

原创 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 593

原创 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 2196

原创 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 1109

转载 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 1342

* 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 992

原创 BAPI 含增强字段（EXTENSIONIN）

下面只是个人的一些浅显的看法，如果有错误或者更好的方案，请指出。1.找到对应的结构或者自己创建一个结构，（如果创建，必须有对应的关键字）2.在结构中添加表增强的字段3.EXTENSIONIN值设置4.调用bapi 以 BAPI_PO_CREATE1 为例：创建PO需要导入 "ZZ001" 字段步骤1：步骤2：系统一般都有定义对应的结构（将字段添加到结构中）步骤3：传...

2018-03-29 17:05:34 11144

原创 ABAP FB08 凭证冲销（BAPI_ACC_DOCUMENT_REV_POST）

*&---------------------------------------------------------------------**& Form FRM_WRITE_OFF*&---------------------------------------------------------------------**& text*&------...

2018-03-28 14:16:42 9745

原创 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 2100

原创 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 2715

转载 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 876

原创 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 10405

原创 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 735

转载 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 702

原创 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 260

原创 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 613

Ling_0309的博客