- 博客(11)
- 收藏
- 关注
原创 SAP ABAP 越南盾金额 取数缩小 100倍
通过币种代码 调用 货币转换因子函数 获取转换因子。将缩小100 的金额 乘以 lv_factor。之后给对应金额乘以转换因子即可。
2024-08-12 10:52:55
224
原创 ABAP EXCEL 批导模板
ls_intern TYPE kcde_intern_struc, "用来将EXCEL上传值循环到储存ALV展示数据的内表。t_lt_intern TYPE TABLE OF kcde_intern_struc, "储存EXCEL上传值的内表。* LS_FILE_TABLE LIKE LINE OF LT_TAB, " 用来读取文件名的结构。
2024-07-18 15:15:10
467
原创 ABAP FOR ALL ENTRIES IN 部分条目取不到
因为是根据 INTO TABLE 的表(上图中的 lt_mseg)去重 所以我们可以加入取数主表(上图mseg)的主键作为INTO TABLE 表(上图中的 lt_mseg)的字段 这里我们加入的 mblnr mjahr zeile 这三个 字段 这样 就不会被去重导致条目缺失了。FOR ALL ENTRIES IN 内表做条件取数到指定内表中后。主键字段我们可能用不到 但是防止去重一定要加上去一起取出。如果根据条件取出的条目中存在字段完全相同的条目就会被去重。
2024-07-17 16:02:02
120
原创 ABAP 选择屏幕隐藏
模板代码:TABLES mara.SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE t1.PARAMETERS: r_rb1 RADIOBUTTON GROUP gr1 USER-COMMAND sel DEFAULT 'X', r_rb2 RADIOBUTTON GROUP gr1.SELECTION-SCREEN END OF BLOCK b1.SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME
2024-07-05 15:37:48
531
1
原创 ABAP 字符串转日期 函数
因为 VALUE 是CHAR128 的 所以 我们直接赋值给日期类型值会截取 只能赋值到月 日以为位数不够会被截取。这时我们就要用到日期的转换函数 CONVERT_DATE_TO_INTERNAL。把跟修改行相同物料描述的开始日期 或 结束日期都变为修改的日期。data_changed 中 VALUE 就是变化的值。这里我们通过 data_changed 实现、需求 修改开始日期 或者结束日期。
2024-07-02 11:18:51
573
原创 ABAP 添加选择屏幕 上 的按钮
我这里是调用了 SM30的表维护 通过这个表里面的值来为ALV显示字段中的下拉框赋值。FC01 是 key 1 的按钮代码 FC02 是 key 2 的按钮代码 等。这样下拉框想要加入新值 前台操作人员就可以通过维护表来增加新值 不用找到开发维护。key 1 就是第一个 按钮 key 2 就是第二个 以此类推。在 AT SELECTION-SCREEN. 事件下判断点击按钮代码。我们可以根据不同的需求 去写对应的功能。首先要在TOP定义界面引用表。. 事件下为按钮添加图标 及描述。
2024-06-29 11:13:35
432
原创 创建生产订单 BAPI
orderdata-sales_order_item = -posnr. " 销售订单行号。orderdata-sales_order = -zvbel. " 销售订单号。orderdata-basic_start_date = -psttr. " 开始日期。orderdata-basic_end_date = -pedtr. " 结束日期。-msg = '创建成功'(t35).
2024-06-29 10:48:24
277
原创 SAP 获取生产订单状态 函数使用
lv_pgmng = lv_pgmng + ls_afpo-pgmng. " 排除删除后 已下单数量。IF lv_line CS '删除' OR lv_line CS '标记'.-msg = '下单总数量超过指令单需求数量'(t34).kdpos, " 销售订单行项目。SELECT aufnr, " 生产订单号。kdauf, " 销售订单号。pgmng " 订单数量。* 检查下单数量 是否超过指令单需求数量。* 加上准备下单数量。
2024-06-29 10:43:59
223
原创 ABAP 选择屏幕动态下拉框
value-text = 'CROCS一次射出'(t46).value-text = 'CROCS一次射出'(t46).value-text = 'IP车间'(t71).value-text = '转印车间'(t72).value-text = 'IP车间'(t43).value-text = 'RB车间'(t44).value-text = 'MD车间'(t45).value-text = '天下工厂'(t73).value-text = '南山工厂'(t75).
2024-06-27 10:42:06
900
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人