(ABAP 코드) GET_PHYSICAL_STOCK
DATA: go_mon_stock TYPE REF TO /scwm/cl_mon_stock.
DATA: GT_MATNR_R TYPE /SCWM/TT_MATNR_R ,
GT_CAT_R TYPE /SCWM/TT_CAT_R ,
GT_OWNER_R TYPE /SCWM/TT_OWNER_R ,
GT_ENTITLED_R TYPE /SCWM/TT_ENTITLED_R ,
GT_CHARG_R TYPE /SCWM/TT_CHARG_R ,
GT_IDPLATE_R TYPE /SCWM/TT_IDPLATE_R ,
GT_SERID_R TYPE /SCWM/TT_SERID_RANGE ,
GT_UII_R TYPE /SCWM/TT_UII_RANGE ,
GT_HUIDENT_R TYPE /SCWM/TT_HUIDENT_R ,
GT_LGTYP_R TYPE /SCWM/TT_LGTYP_R ,
GT_LGBER_R TYPE /SCWM/TT_LGBER_R ,
GT_LGPLA_R TYPE /SCWM/TT_LGPLA_R ,
GT_LPTYP_R TYPE /SCWM/TT_LPTYP_R ,
GT_AISLE_R TYPE /SCWM/TT_AISLE_R ,
GT_STACK_R TYPE /SCWM/TT_STACK_R ,
GT_LEVEL_R TYPE /SCWM/TT_LEVEL_R ,
GT_BINSC_R TYPE /SCWM/TT_BINSC_R ,
GT_DEPTH_R TYPE /SCWM/TT_DEPTH_R ,
GT_PSA_R TYPE /SCWM/TT_PSA_R ,
GT_RSRC_R TYPE /SCWM/TT_RSRC_R ,
GT_TU_NUM_EXT_R TYPE /SCWM/TT_SEL_TU_NUM_EXT ,
GT_TSP_R TYPE /SCWM/TT_SEL_TSP ,
GT_INSPID TYPE /SCWM/TT_INSPID ,
GT_STOCK_MON TYPE /SCWM/TT_STOCK_MON ,
GV_ERROR TYPE XFELD .
go_mon_stock = NEW /scwm/cl_mon_stock( iv_lgnum = '1020' ).
CALL METHOD go_mon_stock->get_physical_stock
EXPORTING
iv_drill_down = ABAP_TRUE
iv_skip_bin = ABAP_FALSE
iv_skip_resource = ABAP_TRUE
iv_skip_tu = ABAP_TRUE
iv_bbd = ABAP_FALSE
iv_kit = ABAP_FALSE
iv_skip_logpos = ABAP_TRUE
it_matnr_r = GT_MATNR_R
it_cat_r = GT_CAT_R
it_owner_r = GT_OWNER_R
it_entitled_r = GT_ENTITLED_R
it_charg_r = GT_CHARG_R
it_idplate_r = GT_IDPLATE_R
it_serid_r = GT_SERID_R
it_uii_r = GT_UII_R
it_huident_r = GT_HUIDENT_R
it_lgtyp_r = GT_LGTYP_R
it_lgber_r = GT_LGBER_R
it_lgpla_r = GT_LGPLA_R
it_lptyp_r = GT_LPTYP_R
it_aisle_r = GT_AISLE_R
it_stack_r = GT_STACK_R
it_level_r = GT_LEVEL_R
it_binsc_r = GT_BINSC_R
it_depth_r = GT_DEPTH_R
it_psa_r = GT_PSA_R
it_rsrc_r = GT_RSRC_R
it_tu_num_ext_r = GT_TU_NUM_EXT_R
it_tsp_r = GT_TSP_R
it_inspid = GT_INSPID
IMPORTING
et_stock_mon = GT_STOCK_MON
ev_error = GV_ERROR.