针对当前生效BOM ,展多阶BOM
*---------------------------------------------------------------------*
* FORM BOM_EXPAND *
*---------------------------------------------------------------------*
* ........ *
*---------------------------------------------------------------------*
* --> P_TAB *
* --> P_MATNR *
* --> P_WERKS *
*---------------------------------------------------------------------*
FORM BOM_EXPAND TABLES P_TAB
USING P_MATNR P_WERKS.
DATA: T_STLAN LIKE MAST-STLAN.
T_STLAN = '1'.
SELECT SINGLE DATUV
INTO G_DATUV
FROM STKO INNER JOIN MAST
ON STKO~WRKAN = MAST~WERKS
AND STKO~STLNR = MAST~STLNR
AND STKO~STL