SPAN {font-family：" Courier New"; 字体大小：10pt； 颜色：#000000; 背景：#FFFFFF; } .L0S31 {font-style：italic; 颜色：#808080; } .L0S32 {color：#3399FF; } .L0S33 {color：#4DA619; } .L0S52 {color：#0000FF; } .L0S55 {color：#800080; } .L0S70 {color：#808080; }

使用lv_cond LIKE d_bool形式yfi01。

*声明本地内部表和工作区
数据：lt_bseg bseg的标准表，
lt_bkpf bkpf的标准表，
lwa_bseg TYPE bseg，
lwa_bkpf TYPE bkpf。

*声明局部变量
DATA：lv_amount TYPE bseg-dmbtr。

SELECT * FROM bkpf
放入表lt_bkpf
在哪里bukrs = bkpf-bukrs
AND gjahr = bkpf-gjahr
AND blart = bkpf-blart
AND cpudt = bkpf-cpudt
AND tcode ='FBCJ'。
如果sy- subrc =0。
选择*从bseg
到表lt_bseg
中，对于lt_bkpf
中的所有条目，bukrs = bkpf-bukrs
AND belnr = lt_bkpf-belnr
AND gjahr = bkpf -gjahr
AND kunnr = bseg-kunnr。
ENDIF。

清除：lv_amount。
将lt_bseg放入Lwa_bseg中。
lv_amount = lv_amount + lwa_bseg-dmbtr。
ENDLOOP。
lv_amount = lv_amount + bseg-dmbtr。

IF lv_amount> = 200000。
lv_cond ='F'。
ENDIF。