ABAP编程需要注意的小问题

来源:互联网 发布:循环冗余检查算法 编辑:程序博客网 时间:2024/05/01 01:52

一、Select语句中使用FOR ALL ENTRIES IN需要注意的问题

在ABAP编程中,使用FOR ALL ENTRIES IN是必不可少的语句,使用这个语句是先取出一些数据放到一个内表中,然后参考这张内表的数据取出其它的数据,这在ABAP开发中非常常用,例如:

DATA: BEGIN OF ig_bseg OCCURS 0,
werks LIKE bseg-werks,
belnr LIKE bseg-belnr,
gjahr LIKE bseg-gjahr,
dmbtr LIKE bseg-dmbtr,
END OF ig_mseg.
IF NOT ig_bkpf[] IS INITIAL.
SELECT werks belnr gjahr dmbtr

INTO CORRESPONDING FIELDS OF TABLE ig_bseg
FROM bseg FOR ALL ENTRIES IN ig_bkpf
WHERE werks = ig_bkpf-werks

AND belnr = ig_bkpf-belnr

AND gjahr = ig_bkpf-gjahr.
ENDIF.

需要注意以下问题

1、首先,必须要判断For all entries in后面的内表是否为空,如果它为空的话,那么在where条件中的与内表中字段进行比较的结果全部为真,也就是全部满足条件,这会导致取出非常多的数据,极大地影响系统的性能。

2、对于上例,按照逻辑分析可以取出某个凭证的所有行项目,但是实际情况会与你预期的不一致,如果某个凭证的多个行项目的dmbtr值是完全一样的,那么在内表ig_bseg中你只会得到一行记录,而不是多行,它自动使用了distinct,或者说删除了重复的行,这是个非常致命的问题,会导致你的程序逻辑错误,而且很难以查找,解决的办法就是要保证内表ig_bseg中取出的数据必须要有主键字段,在本例中,需要再添加buzei字段。

二、自建表和从系统外导入数据需要注意的问题
1、自建表中建立文本类型的字段(自己创建domain)时,需要注意是否允许字段可以保留文本的大小写状态,否则默认会全部转换为大写字母。

2、在某个创建的自建表中,某个字段的数据元素为MATNR(物料编号),类型为CHAR(18),但是导入的数据的长度只有CHAR(12),比数据库字段要短,如果直接导入,不进行任何处理。

2.1 首先导入数据肯定不会出现错误,但是在使用中会出现问题,例如我通过导入进去的物料编号找物料描述,是找不到数据的,因为我们导入物料编号的长度只有12位,而系统标准表中的物料编号前面都是用0补齐18位的,所以我们在导入数据时,有些字段不能直接写入数据库,需要进行一定的处理。

2.2 我们可以调用系统的函数来实现补0这个功能。

CONVERSION_EXIT_ALPHA_INPUT 对话退出ALPHA,外部->内部 这个是补0函数

CONVERSION_EXIT_ALPHA_OUTPUT 对话退出ALPHA,内部->外部 这个是除0函数

函数调用非常简单,如下

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = IG_UPLOAD-HKONT_NIS
IMPORTING
OUTPUT = WA_ZDFLNIS-HKONT_NIS

三、提高程序运行效率的一些小方法

1、 我们在ABAP程序中定义的内表,在我们从数据库中查询数据的时候,查找数据的顺序最好可以和内表定义的顺序一样,这样可以提高效率的允许效率。

2、 我们在查找簇表数据的时候,例如BSEG表,对于一个簇表来说,除了主键项目外,其他项目都被编辑到一个长文本项目中,一起存储在表簇RFBLG中的vardata项目中,这就决定了作为簇表的BSEG无法再建立键值以外的索引(INDEX),而这张表对我们来说,很多报表程序要用到这张表,而如果直接用其他项目的字段查找BSEG表的数据,效率非常的底下,所以我们需要在另外的表中找到BSEG的主键项目,来加快查询BSEG表的速度。

3、 SAP R/3系统中也有几个专门用来读取BSEG表信息的函数,可适当参考使用,它们是: READ_BSEG GET_ALL_BSEG

另外最有效率的方法是改善应用和需求,要使需求合理规范,这才能使效率达到最高化。