2020-08-23 17:41发布
加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)
大家好,
我必须为生产订单分配序列号(设备)。 可以通过CO02手动完成此操作,但是必须在ABAP中执行此操作。
我尝试了功能模块SERNR_ADD_TO_PP,但无法为其分配序列号。 实际上什么也没发生。 没有错误消息或任何其他提示。
有人知道如何使用此功能模块或如何在生产订单中添加序列号吗?
预先感谢
霍尔格
嗨,
请检查FM SERIAL_POST_UPDATE_PP可能有帮助。
关于此,
渡轮联队
数据 :GS_AFVGD_SS喜欢的AFVGD。
数据:类似于GS_AFVGD AFVGD,
GS_CAUFVD_PO像CAUFVD,
GS_AFPOD_PO喜欢的AFPOD,
GS_CAUFVD_CO喜欢CAUFVD。
数据:L_NUM_SERNO像SY-TABIX。
常量:L_PPORD像CAUFVD-AUTYP值" 10"。
数据:GT_SERNOS像E1RMSNO一样出现在标题行中的0。
GS_AFPOD_PO-SERNP ='ZLS'。
GS_CAUFVD_CO-MATNR ='00000000000AB24C24'。
L_NUM_SERNO ='1'。
GS_AFPOD_PO-POSNR ='0001'。
gs_caufvd_co-auart ='ZP01'。
GS_AFPOD_PO-DWERK ='NTC'。
GS_CAUFVD_CO-AUFNR ='000001006421'。
gt_sernos-sernr ='25000211'。
附加gt_sernos。
通话功能'SERNR_ADD_TO_PP'
导出
配置文件= GS_AFPOD_PO-SERNP
材料= GS_CAUFVD_CO-MATNR
QUANTITY = L_NUM_SERNO
PPAUFNR = GS_CAUFVD_CO-AUFNR
PPPOSNR = GS_AFPOD_PO-POSNR
PPAUTYP = L_PPORD
PPAUFART = GS_CAUFVD_CO-AUART
PMRSORD =空间
PPWERK = GS_AFPOD_PO-DWERK
M_CHARGE =
KMATNR =
CUOBJ =
J_VORGANG ='PMP1'
导入
ANZSN = L_NUM_SERNO
ZEILEN_ID =
SERIAL_COMMIT =
表格
SERNOS = GT_SERNOS
例外情况
KONFIGURATIONS_ERROR = 1
SERIALNUMBER_ERRORS = 2
SERIALNUMBER_WARNINGS = 3
NO_PROFILE_OPERATION = 4
其他= 5。
通话功能'SERIAL_LISTE_POST_PP'
MEMORY_ID_STATUS =''。
TAB_CUOBJ = P_TAB_CUOBJ。
如果sy-subrc = 0。
提交工作并等待。
endif。
如Ferry所说,使用FM'SERIAL_POST_UPDATE_PP'
定义结构RSERXX并更新
调用功能'SERIAL_POST_UPDATE_PP'在更新任务中
XSER05 = US_XSERXX。
最诚挚的问候,
Pradeep。
功能'SERIAL_LISTE_POST_PP'为我工作
最多设置5个标签!
嗨,
请检查FM SERIAL_POST_UPDATE_PP可能有帮助。
关于此,
渡轮联队
数据 :GS_AFVGD_SS喜欢的AFVGD。
数据:类似于GS_AFVGD AFVGD,
GS_CAUFVD_PO像CAUFVD,
GS_AFPOD_PO喜欢的AFPOD,
GS_CAUFVD_CO喜欢CAUFVD。
数据:L_NUM_SERNO像SY-TABIX。
常量:L_PPORD像CAUFVD-AUTYP值" 10"。
数据:GT_SERNOS像E1RMSNO一样出现在标题行中的0。
GS_AFPOD_PO-SERNP ='ZLS'。
GS_CAUFVD_CO-MATNR ='00000000000AB24C24'。
L_NUM_SERNO ='1'。
GS_AFPOD_PO-POSNR ='0001'。
gs_caufvd_co-auart ='ZP01'。
GS_AFPOD_PO-DWERK ='NTC'。
GS_CAUFVD_CO-AUFNR ='000001006421'。
gt_sernos-sernr ='25000211'。
附加gt_sernos。
通话功能'SERNR_ADD_TO_PP'
导出
配置文件= GS_AFPOD_PO-SERNP
材料= GS_CAUFVD_CO-MATNR
QUANTITY = L_NUM_SERNO
PPAUFNR = GS_CAUFVD_CO-AUFNR
PPPOSNR = GS_AFPOD_PO-POSNR
PPAUTYP = L_PPORD
PPAUFART = GS_CAUFVD_CO-AUART
PMRSORD =空间
PPWERK = GS_AFPOD_PO-DWERK
M_CHARGE =
KMATNR =
CUOBJ =
J_VORGANG ='PMP1'
导入
ANZSN = L_NUM_SERNO
ZEILEN_ID =
SERIAL_COMMIT =
表格
SERNOS = GT_SERNOS
例外情况
KONFIGURATIONS_ERROR = 1
SERIALNUMBER_ERRORS = 2
SERIALNUMBER_WARNINGS = 3
NO_PROFILE_OPERATION = 4
其他= 5。
通话功能'SERIAL_LISTE_POST_PP'
导出
MEMORY_ID_STATUS =''。
表格
TAB_CUOBJ = P_TAB_CUOBJ。
如果sy-subrc = 0。
提交工作并等待。
endif。
如Ferry所说,使用FM'SERIAL_POST_UPDATE_PP'
定义结构RSERXX并更新
调用功能'SERIAL_POST_UPDATE_PP'在更新任务中
表格
XSER05 = US_XSERXX。
最诚挚的问候,
Pradeep。
功能'SERIAL_LISTE_POST_PP'为我工作
一周热门 更多>