获得库存:
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'.