SAP WM 层面仓位调整
call function 'L_TO_CREATE_SINGLE'
exporting
i_lgnum =I_LGNUM "仓库号
i_bwlvs ='999' "固定值999
* I_BETYP = ' '
* I_BENUM = ' '
i_matnr =I_MATNR "物料号
i_werks =I_WERKS "工厂
i_lgort =I_LGORT"仓储地点
i_charg =''
i_bestq =''
i_sobkz =''
i_sonum = ''
i_letyp =''
i_anfme =I_ANFME"数量
i_altme ='PC'"单位
* I_WDATU = SY-DATLO
* I_VFDAT = INIT_DATUM
* I_ZEUGN = ' '
* I_LZNUM = ' '
i_squit = 'X'"固定值Ｘ
i_nidru =''
i_drukz = ''
i_ldest =''
* I_WEMPF = ' '
* I_ABLAD = ' '
i_vltyp =I_VLTYP"源仓储类型
* I_VLBER = ' '
i_vlpla =I_VLPLA "源仓位
* I_VPPOS = ' '
* I_VLENR = ' '
i_vlqnr ='0000649539'"源数量
i_nltyp =I_NLTYP"目标仓储类型
i_nlber =''"可以保持为空 目标存储区
* i_nlpla = lagp-lgpla
i_nlpla =I_NLPLA"目标仓位
* I_NPPOS = ' '
i_nppos =''
i_nlenr =''
* I_NLQNR = ' '
* I_RLTYP = ' '
* I_RLBER = ' '
* I_RLPLA = ' '
* I_RLQNR = ' '
* I_UPDATE_TASK = ' '
i_commit_work = 'X'
I_BNAME = SY-uname "SAP用户名
I_KOMPL = 'X'
importing
e_tanum = BINADJUSTTAB-I_TANUM"返回凭证编号
* E_LTAP = ZLTAP "返回当前更改数据的记录，
exceptions
error_message = 99.
页:
[1]