1、获得库存:
SELECT SUM( verme ) INTO hd_itab-labst FROM lqua "正常库存 WHERE matnr = hd_itab-matnr AND werks = pr_werks AND ( lgtyp NOT LIKE '91%' ) AND ( bestq EQ '' ) AND sobkz NE 'E'.
SELECT SUM( verme ) INTO hd_itab-labsts FROM lqua "冻结库存
WHERE matnr = hd_itab-matnr AND werks = pr_werks AND ( lgtyp NOT LIKE '91%' ) AND ( bestq EQ 'S' ) AND sobkz NE 'E'.
SELECT SUM( verme ) INTO hd_itab-labstq FROM lqua "质检库存
WHERE matnr = hd_itab-matnr AND werks = pr_werks AND ( lgtyp NOT LIKE '91%' )
AND ( bestq EQ 'Q' ) AND sobkz NE 'E'.
SELECT SUM( lblab ) INTO hd_itab-labsto FROM mslb "供应商库存
WHERE matnr = hd_itab-matnr AND werks = pr_werks AND lifnr = hd_itab-lifnr
AND sobkz = 'O'.
2、去除左右的空格:
SHIFT string LEFT DELETING LEADING SPACE.
SHIFT string RIGHT DELETING LEADING SPACE.
3、取最大日期的一条记录
sort 内表 by field1 field2 DESCENDING. "按field2从大到小排序
delete ADJACENT DUPLICATES FROM 内表 COMPARING field2. 删除与field2相同的重复记录。