全友家私sap管理平台实施项目技术说明书战略货源单据上载

日期 日期 ：1122methodONACTIONUPLOAD_AND_CHECK****BackendDATAet_logical_systemsTYPEbbptlogical_system.DATAet_messagesTYPEbbpt_balmi.DATAl_destinationTYPECALLFUNCTION'BBP_GET_BACKEND_SYSTEMS'et_logical_systems=et_logical_systemsetmessages =etmessages.FIELD-SYMBOLS<lgs>LIKELINEOFetlogicalsystems.READTABLEet_logical_systemsINDEX1ASSIGNING<lgs>.IFsy-subrc=0.MOVE<lgs>TODATA:lo_message_managerTYPEREFTOif_wd_message_manager,lo_controllerTYPEREFTOif_wd_controller,lv_msgidTYPEstring,lv_p1TYPEsyst-msgv1,lv_p2TYPEsyst-DATAlv_error_stringTYPEDATA:lv_date(10)TYPEc,lv_date_flagTYPEDATAlv_indexTYPE"DefineConstantTYPEcVALUETYPEcVALUE"SubTYPEcVALUE"ProductTYPEcVALUE"LongtextTYPEcVALUETYPEcVALUETYPEcVALUEgcTYPEcVALUE"ErrorforCustomer TYPEcVALUE "For TYPEBBP_PDS_BID_HEADER_IC,ls_bid_e_headerTYPEBBP_PDS_BID_HEADER_D, TYPEBBP_PDS_AUC_HEADER_IC,ls_auc_e_headerTYPEBBPPDSAUC_HEADER_D, TYPETABLEOFBBP_PDS_BID_ITEM_ICU, TYPEBBP_PDS_BID_ITEM_ICU, TYPETABLEOFBBP_PDS_AUCITEM_ICU, TYPEBBP_PDS_AUC_ITEM_ICU,lt_partnerTYPETABLEOFbbp_pds_partner,ls_partnerTYPEbbppdspartner,lt_orgdataTYPETABLEOFbbp_pds_org,ls_orgdataTYPEbbp_pds_org,lt_accountTYPETABLEOFbbp_pds_acc,ls_accountTYPEbbp_pds_acc,et_bid_itemTYPETABLEOFBBP_PDS_BID_ITEM_D,es_bid_itemTYPEBBPPDSBID_ITEM_D,et_auc_itemTYPETABLEOFBBP_PDS_AUC_ITEM_D,es_auc_itemTYPEBBP_PDS_AUC_ITEM_D,et_accountTYPETABLEOFbbp_pds_acc,es_accountTYPEbbp_pds_acc,et_partnerTYPETABLEOFbbp_pds_partner,es_partnerTYPEbbp_pds_partner,et_orgdataTYPETABLEOFbbp_pds_org,es_orgdataTYPEbbp_pds_org,lt_messagesTYPETABLEOFbbp_pdsmessages,ls_messagesTYPEbbp_pds_messages.DATA:lv_guid_headerTYPEbbp_guid, TYPEbbp_guid,lv_guid_orgTYPEbbp_guid,lv_guid_accTYPEbbp_guid. TYPEl_category_guidTYPEcomt_category_guid,l_product_guidTYPEbbp_product.DATA:lv_product_idTYPEcomt_product_id.DATA:l_short_textTYPEcomt_prshtextx.DATA:I_BBPS_OM_COCODETYPEBBPS_OM_COCODE,E_CO_HROBJECTTYPEHROBJECT,I_BBPS_OM_PURCH_ORGXTYPEBBPS_OM_PURCH_ORGX,E_ORG_HROBJECTTYPEHROBJECT,I_BBPS_OM_PURCHGRPXTYPEBBPS_OM_PURCH_GRPX,E_GRO_HROBJECTTYPEHROBJECT.DATA:IT_START_OBJECTSTYPEHRTBOBJECT,WA_START_OBJECTSTYPELINEOFHRTB_OBJECT,ET_USER_TABTYPEHRBCITB_USER.DATA:lv_guid_par16TYPEbbp_guid,lv_guid_par1TYPEbbp_guid,lv_guid_par2TYPEbbp_guid. TYPEsy-uname,l_partner_guidTYPEbu_partner_guid. TYPEbu_partner, TYPEadcp-persnumber, TYPEadcp-addrnumber, TYPEbut000.DATA:l_partner_noTYPEDATAlo_nd_contentTYPEREFTOif_wd_context_node.DATAlo_el_contentTYPEREFTOif_wd_context_element.DATAls_contentTYPEwd_this->element_content.lo_nd_content=wd_context->get_child_node(name=wd_this->wdctx_content).loel_content=londcontent->get_element().IFlo_el_contentISINITIAL.loelcontent->get_static_attributes(static_attributes=ls_contentTYPEStruxs_t_text_data(4096)TYPEDATA:obj_convert_fromcodepageTYPEREFTOcl_abap_conv_in_ce.DATAlv_datasourceTYPExstring.DATAlv_contTYPEDATA:ltcontentTYPEstringFIELD-SYMBOLS<line>LIKELINEOFDATAlo_nd_header_nodeTYPEREFTODATAlt_header_nodeTYPEwd_this->elements_header_node.DATAls_header_nodeTYPEwd_this->element_header_node.DATAlo_nd_item_nodeTYPEREFTOif_wd_context_node.DATAlt_item_nodeTYPEwd_this->elements_item_node.DATAls_item_nodeTYPEwd_this->element_item_node.DATA:lv_start_timeTYPEstring,lv_quot_deadTYPEstring,lv_processtypeTYPEstring,lv_quanTYPEstring,lv_start_priceTYPEstring,lv_ill_cTYPEstring,lv_unitTYPEbbp_unit,lv_product_typeTYPEbbpDATAobject_type_flag(3)TYPECALLFUNCTION'GUID_CREATE'ev_guid_16=IFlscontent-mime<>'text/in'ANDls_content-mime<>'application/octet-lo_controller?=wd_this->wd_get_api(lomessage_manager=lo_controller->get_message_manager().lo_message_manager->report =

= = =lv_p2cancel_navigation='X'message_id=IFls_content-contentISINITIAL.lo_controller?=wd_this->wd_get_api().lomessage_manager=lo_controller->get_message_manager(). ='ZSRM ='E' = =lv_p2cancel_navigation='X'message_id=obj_convert_from_codepage=clabapconvin = ='UTF-recement='?'ignore_cerr=abap_true =lscontent- =ignore_cerr=obj_convertfromcode>read(IMPORTINGdata=lv_cont).IFlv_contISINITIAL.SPLITlv_contATcl_abap_char_utilities=>newlineINTOTABLEREADTABLElt_contentASSIGNING<line>INDEX8.IFsy-subrc=0.CLEAR:SPLIT<line>ATcl_abap_char_utilities=>horizontal_tabINTOlo_controller?=wdthis->wd_get_api(lo_message_manager=lo_controller->get_message_manager().CALLMETHODlo_message_manager->report_error_messagemessage =cancel =enable_message_navigation=.READTABLEltcontentASSIGNING<line>INDEX4.IFsy-subrc=0.SPLIT<line>ATcl_abap_char_utilities=>horizontal_tabINTO.CONCATENATElv_start_time'000000'INTOlv_start_time.MOVElv_start_timeTOls_header_node-start_time.MOVElv_quot_deadTOls_header_node-IFlv_process_typeISNOTINITIALANDls_header_node-be_pur_orgISNOTINITIALANDls_header_node-start_timeISNOTINITIALANDls_header_node-quot_deadISNOTINITIAL.lo_controller?=wd_this->wd_get_api(lomessagemanager=lo_controller->get_message_manager().CALLMETHODlo_message_manager->report_error_messagemessage = =enable_message_navigation=.lo_controller?=wd_this->wd_get_api(lomessagemanager=lo_controller->get_message_manager().CALLMETHODlo_message_manager->report_error_message = =enable_message_navigation=.LOOPATlt_contentASSIGNINGSHIFT<line>RIGHTDELETINGcl_abapcharIFsy-tabix=SPLIT<line>ATcl_abap_char_utilities=>horizontal_tabINTO.CONCATENATElv_start_time'000000'INTOlv_start_time.MOVElv_start_timeTOls_header_node-start_time.MOVElv_quot_deadTOls_header_node-RECEALLOCCURRENCESOFclabap_char_utilities=>newlineINls_header_node-quot_deadWITHspace.RECEALLOCCURRENCESOFINlsheadernode-quotdeadWITHRECEALLOCCURRENCESOFcl_abap_char_utilities=>vertical_tabINls_header_node-quot_deadWITHspace.RECEALLOCCURRENCESOFclINls_header_node-quot_deadWITHspace.RECEALLOCCURRENCESOF'#'INls_header_node-quot_deadWITHCASEWHEN招标ls_header_node-processtype='ZBID'.object_type_flag='RFX'.ls_bid_header-object_type=WHEN询价ls_header_node-processtype='ZRFQ'.object_type_flag='RFX'.ls_bid_header-object_type=WHEN英文拍卖ls_header_node-processtype='AUC1'.object_type_flag='AUC'.lsaucheader-object_type=WHEN仅等级ls_header_node-processtype='AUC2'.object_type_flag='AUC'.lsaucheader-object_type=WHEN密封投标ls_header_node-process_type='AUC3'.object_type_flag='AUC'.lsaucheader-object_type=WHEN公司投标ls_header_node-process_type='AUC4'.object_type_flag='AUC'.lsaucheader-object_type=WHEN拍卖者自动落价拍卖ls_header_node-process_type='AUC5'.objecttypeflag='AUC'.lsaucheader-object_type=WHENlo_controller?=wdthis->wd_get_api(lomessagemanager=lo_controller->get_message_manager().CALLMETHODlo_message_manager->report_error_messagemessage = =enable_message_navigation=.IFls_header_node-be_pur_groupISINITIAL.CASElsheader_node-be_pur_org.WHENls_header_node-be_pur_group=WHENlsheadernode-be_pur_group=WHENOTHERS.APPENDls_header_nodeTOIFobject_type_flag=CLEARls_bid_header-guid=lv_guidls_bid_header-process_type=ls_header_node-process_type.lsbidheader-currency=gc_currency.MOVE-CORRESPONDINGls_headernodeTOELSEIFobject_type_flag=CLEARls_auc_header-guid=lv_guidls_auc_header-process_type=ls_header_node-process_type.lsaucheader-currency=gc_currency.MOVE-CORRESPONDINGls_header_nodeTO"headerpartnerdateCALLFUNCTION'GUID_CREATE'ev_guid_16=lv_guid_par16.pvuser_name=sy-uname =l_partnerpr_partner_guid=l_partner_guid =l_pers_no =ls_partner-partner_guid=lv_guid_par16. =lvguidheader.ls_partner-partner_fct=' =l_partner_guid.ls_partner-mainpartner='X'. ='3'.ls_partner-addr_origin='A'. =l_addr_no. =l_pers_no. =l_partner.APPENDls_partnerTOIFls_header-be_co_codeISNOTINITIALANDl_destinationISNOTIBBPSOMCOCODE-COCODE=lsheader-beIBBPSOMCOCODE-BACKEND=lCALLFUNCTION ISSEARCH_BUK= =IFls_header_node-be_pur_orgISNOTINITIALANDl_destinationISNOTI_BBPS_OM_PURCH_ORGX-LOGSYS=l_destination.I_BBPS_OM_PURCH_ORGX-EKORG=ls_header_node-be_pur_org.CALLFUNCTION'BBP_OM_READ_PURCH_ORG_ID'IS_SEARCH_EKORG=I_BBPS_OM_PURCH_ORGX =E_ORG_HROBJECT.IFls_header_node-be_pur_groupISNOTINITIALANDl_destinationISNOTI_BBPS_OM_PURCH_GRPX-LOGSYS=IBBPSOMPURCHGRPX-EKGRP=lsheadernode-be_pur_group.CALLFUNCTION'BBP_OM_READ_PURCH_GRP_ID'ISSEARCH_EKGRP=I_BBPS_OM_PURCH_GRPX =E_GRO_HROBJECT.CALLFUNCTION'GUID_CREATE'ev_guid_16=ls_orgdata-guid=lv_guid_org.ls_orgdata-p_guid=lv_guid_header.ls_orgdata-proc_org_resp_ot='O'.ls_orgdata-proc_org_respid=E_ORG_HROBJECT-OBJID.ls_orgdata-proc_org_ot='O'.ls_orgdata-proc_org_id=EORGHROBJECT-OBJID.ls_orgdata-proc_group_ot='O'.ls_orgdata-proc_group_id=E_GRO_HROBJECT-OBJID.APPENDls_orgdataTOlt_orgdata.CLEAR:lsIFsy-tabix>=8.CLEAR:SPLIT<line>ATcl_abap_char_utilities=>horizontal_tabINTO.DATA:LEN1TYPELEN2TYPELEN1=STRLEN(ls_item_node-be_ntIFLEN1=CLEARls_item_node-be_LEN2=LEN1-MOVEls_item_node-be_nt(LEN2)TOls_item_node-be_RECEALLOCCURRENCESOFclabap_char_utilities=>newlineINlsitemnode-bentWITHspace.RECEALLOCCURRENCESOFcl_abap_char_utilities=>cr_lfINlsitemnode-bentWITHspace.RECEALLOCCURRENCESOFclabap_char_utilities=>vertical_tabINls_item_node-be_ntWITHspace.RECEALLOCCURRENCESOFclabap_char_utilities=>horizontal_tabINlsitemnode-bentWITHspace.RECEALLOCCURRENCESOFINls_item_node-be_ntWITHMOVElv_quanTOls_item_node-MOVElv_start_priceTOls_item_node-_no=sy-tabix-7.ls_item_node-status_flag='N'.IFls_item_node-ordered_prodISCONCATENATEls_item_node-message'/''物料编号'INTOls_item_node-ls_item_node-status_flag=IFls_item_node-tyISCONCATENATEls_item_node-message'/''数量'INTOls_item_node-lsitem_node-status_flag=IFls_item_node-start_priceISINITIALANDobject_type_flag'AUC'.CONCATENATEls_item_node-message'/''起价'INTOlsitem_node-status_flag=

IFls_item_node-deliv_dateISNOTINITIALANDls_item_node-deliv_dateCONDENSEls_item_node-deliv_dateNO-GAPS.MOVEls_item_node-deliv_dateTOlv_date.CLEARlv_date_flag.CALLFUNCTION'ZBBP_DATE_CHECK'c_date=lv_datep_r_w=IFlv_date_flag=lo_controller?=wdthis->wd_get_api(lo_message_manager=lo_controller->get_message_manager().CLEARlverrorstring.CONCATENATE'‘交货日期lvINTOlv_error_string.CONCATENATEls_item_node-message'/'lv_error_stringls_item_node-status_flag=CONCATENATEls_item_node-message'/''交货日期'INTOls_item_node-lsitem_node-status_flag=CALLFUNCTION'GUID_CREATE'ev_guid_16=lnumberint *GetCategoryIFls_item_node-ordered_prodISNOTCLEAR:lcategoryguid,lproduct_guid,lv_product_id.CALLFUNCTION'NUMERIC_CHECK'stringin=ls_item_node-ordered_prodstring_out= .SELECTSINGLEproduct_guidcategory_guidcategory_idshort_textproduct_typeINTOFROMWHEREproduct_id=lv_product_idANDhierarchy_id='R3MATCLASS'ANDlangu=sy-langu.IFsy-subrc=lshorttext=lsitem_node-description.SELECTSINGLEunitFROMcomm_pr_unitINTOlv_unitWHEREproduct_guid=lproduct_guid.IFobject_type_flag='RFX'. =l_product_guid. =l_short_text.ls_bid_item-ordered_prod=ls_item_node-ordered_prod.lsbid_item-unit =lv_unit.ELSEIFobjecttype_flag= =l_product_guid. =l_short_text.ls_auc_item-orderedprod=ls_itemnode-ordered_prod. =lv_unit.CONCATENATEls_item_node-message'物料号不存在INTOlsitem_node-status_flag=CONCATENATEls_item_node-message'/''未填写物料号INTOls_item_node-lsitem_node-status_flag=DATA:mseh3TYPEmseh3,msehiTYPEIFobject_type_flag= =lv_guid_item. =lv_guid_header. =l_number_int. =l_product_guid. =l_short_text. =l_category_guid. =ls_item_node-category_id. =ls_item_node-ty.ls_bid_item-product_type=lv_product_type.mseh3=lsbid_item-SELECTSINGLEmsehiFROMt006aINTOmsehiWHEREmseh3=mseh3.ls_bid_item-unit=mseh3. =1. =gc_currency. =1. =ls_item_node-deliv_date. =ls_item_node-start_price.APPENDls_bid_itemTOELSEIFobjecttype_flag='AUC'. =lv_guid_item. =lv_guid_header. =l_number_int. =l_product_guid. =l_short_text. =l_category_guid. =ls_item_node-category_id. =ls_item_node-ty.ls_auc_item-product_type=lv_product_type.mseh3=lsauc_item-SELECTSINGLEmsehiFROMt006aINTOmsehiWHEREmseh3=mseh3.ls_auc_item-unit=mseh3. =1. =gc_currency. =1. =ls_item_node-deliv_date. =ls_item_node-start_price.APPENDls_auc_itemTOCALLFUNCTION'GUID_CREATE'ev_guid_16=CALLFUNCTION'GUID_CREATE'ev_guid_16=IFls_itemnode-be_ntISNOTINITIAL.pvuser_name=ls_item_node-be_nt =l_partnerpr_partner_guid=l_partner_guid =l_pers_no =ls_partner-partner_guid=lv_guid_par1. =lvguiditem.ls_partner-partner_fct=' =l_partner_guid.ls_partner-mainpartner='X'. ='1'.ls_partner-addr_origin='A'. =l_addr_no.lspartner-partnerid =l_partner.APPENDls_partnerTOlt_partner.l_user_name=sy-uname.pvuser_name=l_user_name =l_partnerpr_partner_guid=l_partner_guid =l_pers_no =ls_partner-partner_guid=lv_guid_par2. =lvguiditem.ls_partner-partner_fct=' =l_partner_guid.ls_partner-mainpartner='X'. ='3'.ls_partner-addr_origin='A'. =l_addr_no. =l_pers_no. =l_partner.APPENDls_partnerTOlt_partner.IFls_item_node-status_flag='N'.ls_item_node-check='X'.lsitemnode-icon=CONCATENATEls_item_node-message'/''数据正确INTOls_item_node-IFls_item_node-status_flag='E'.ls_item_node-checkread='X'.ls_item_node-icon='@0A@'.SHIFTls_item_node-messageLEFTDELETINGLEADING'/'.APPENDls_item_nodeTOlt_item_node.CLEARDATAlv_message(220) TYPEc.IFobject_type_flag='RFX'.CLEARwdthis->lsMOVE-CORRESPONDINGlsbidheaderTOwd_this->ls_bid_header.CALLFUNCTION'BBP_PD_BID_CREATE'i = =i_testrun=iheader =ls_bid_headereheader =ls_bid_e_header =lt_bid_itemi_partner=lt_partneri_orgdata=lt_orgdata =et_bid_iteme_partner=et_partnere_orgdata=et_orgdatae_messages=lt_messages.LOOPATltmessagesINTOlsmessagesWHEREmsgty='E'ORmsgty='A'.READTABLEet_bid_itemINTOes_bid_itemWITHKEYguid=IFsy-subrc=CLEARlvCALLFUNCTION'BAPI_MESSAGE_GETDETAIL' =ls_messages- =ls_messages- =SY- = =ls_messages- =ls_messages- =ls_messages- =ls_messages-msgv4 = .MOVEesbid_item-number_intTOREADTABLEltitem_nodeINDEXlv_indexINTOls_item_node.IFsy-subrc=0.IFlsitem_node-statusflag=CLEARls_item_node-CONCATENATEls_item_node-message'/'lv_messageINTO

ls_item_node-check=''.ls_item_node-check_read='X'.ls_item_node-status_flag='E'.lsitem_node-icon='@0A@'.MODIFYlt_item_nodeFROMls_item_nodeINDEXELSEIFobject_type_flag='AUC'.CLEARwd_this->ls_auc_header.MOVE-CORRESPONDINGlsaucheaderTOwd_this->ls_auc_header.CALLFUNCTION'BBP_PD_AUC_CREATE'i = =i_testrun=iheader =ls_auc_header =ls_auc_e_header =lt_auc_itemi_partner=lt_partneri_orgdata=lt_orgdata =et_auc_iteme_partner=et_partnere_orgdata=et_orgdatae_messages=lt_messages.LOOPATlt_messagesINTOls_messagesWHEREmsgty='E'ORmsgty='A'.READTABLEet_auc_itemINTOes_auc_itemWITHKEYguid=IFsy-subrc=CLEARlvCALLFUNCTION'BAPI_MESSAGE_GETDETAIL' =ls_messages- =ls_messages- =SY- = =ls_messages- =ls_messages- =ls_messages- =ls_messages-msgv4 = .MOVEes_auc_item-number_intTOREADTABLEltitem_nodeINDEXlv_indexINTOls_item_node.IFsy-subrc=0.IFlsitem_node-statusflag=CLEARls_item_node-CONCATENATEls_item_node-message'/'lv_messageINTO

ls_item_node-check=''.ls_item_node-check_read='X'.ls_item_node-status_flag='E'.lsitem_node-icon='@0A@'.MODIFYlt_item_nodeFROMls_item_nodeINDEXLOOPATlt_item_nodeINTOlsitemSHIFTls_item_node-messageLEFTDELETINGLEADING'/'.MODIFYlt_item_nodeFROMls_item_nodeINDEXsy- lo_ndheader_node=wd_context->get_child_node(name=wd_this->wdctx_header_node).lo_nd_header_node->bind_table(new_items=lt_header_node=abap_truelo_nditem_node=wd_context->get_child_node(name=wd_this->wdctx_item_node).lo_nd_item_node->bind_table(new_items=lt_item_nodeset_initial_elements=abap_true).IFobject_type_flag=MOVE-CORRESPONDINGls_headerTOwd_this-wd_this->lt_bid_item[]=lt_bid_item[].wd_this->lt_partner=lt_partner[].wdthis->lt_orgdata=ltELSEIFobject_type_flag=wdthis->ltorgdata.MOVE-CORRESPONDINGls_headerTOwd_this-wd_this->lt_auc_item[]=lt_auc_item[].wd_this->lt_partner=lt_partner[].wdthis->lt_orgdata=methodONACTIONSAVE***ForDATA:lo_message_managerTYPEREFTOif_wd_message_manager,lo_controllerTYPEREFTOif_wd_controller,lv_msgidTYPEstring,lv_p1TYPEsyst-msgv1,lv_p2TYPEsyst-DATAlo_nd_item_nodeTYPEREFTOif_wd_context_node.DATAlt_item_nodeTYPEwdthis->elements_item_node.DATAls_item_nodeLIKELINEOFlt_item_node.lo_nditem_node=wd_context->get_child_node(name=wd_this->wdctx_item_node).lo_nd_item_node->get_static_attributes_table(IMPORTINGtable=lt_item_node). TYPEBBP_PDS_BID_HEADER_IC,ls_bid_e_headerTYPEBBP_PDS_BID_HEADER_D, TYPEBBP_PDS_AUC_HEADER_IC,ls_auc_e_headerTYPEBBPPDSAUC_HEADER_D, TYPETABLEOFBBP_PDS_BID_ITEM_ICU, TYPEBBP_PDS_BID_ITEM_ICU, TYPETABLEOFBBP_PDS_AUCITEM_ICU, TYPEBBP_PDS_AUC_ITEM_ICU,lt_partnerTYPETABLEOFbbp_pds_partner,ls_partnerTYPEbbppdspartner,lt_orgdataTYPETABLEOFbbp_pds_org,ls_orgdataTYPEbbp_pds_org,lt_accountTYPETABLEOFbbp_pds_acc,ls_accountTYPEbbp_pds_acc,et_bid_itemTYPETABLEOFBBP_PDS_BID_ITEM_D,es_bid_itemTYPEBBPPDSBID_ITEM_D,et_auc_itemTYPETABLEOFBBP_PDS_AUC_ITEM_D,es_auc_itemTYPEBBP_PDS_AUC_ITEM_D,et_accountTYPETABLEOFbbp_pds_acc,es_accountTYPEbbp_pds_acc,et_partnerTYPETABLEOFbbp_pds_partner,es_partnerTYPEbbppdspartner,et_orgdataTYPETABLEOFbbp_pds_org,es_orgdataTYPEbbp_pds_org,lt_messagesTYPETABLEOFbbp_pdsmessages,ls_messagesTYPEbbp_pds_messages.MOVE-CORRESPONDINGwd_this->ls_bid_headerTOls_bid_header.MOVE-CORRESPONDINGwd_this->ls_auc_headerTOls_auc_header.lt_bid_item[]=wd_this->lt_bid_item[]. =wd_this->lt_aucitem[].lt_partner[]=wd_this->lt_partner.lt_orgdata[]=wd_this->lt_orgdata.IFls_bid_header-process_typeISNOTINITIALANDls_auc_header-process_typeISSORTltbid_itemBYLOOPATlt_item_nodeINTOls_item_nodeWHEREcheck=READTABLElt_bid_itemINTOWITHKEYnumber_int _noBINARYIFsy-subrc=DELETElt_bid_itemWHEREguid=ls_bid_item-guid.DELETElt_partnerWHEREp_guid=ls_bid_item-guid.DELETElt_orgdataWHEREp_guid=ls_bid_item-LOOPATlt_bid_itemINTOls_bid_item.lsbiditem-number_int=sy-tabix.MODIFYlt_bid_itemFROMls_bid_itemINDEXsy-CALLFUNCTION'BBP_PD_BID_CREATE'i =i_testrun=iheader =ls_bid_header =ls_bid_e_header =lt_bid_itemi_partner=lt_partneri_orgdata=lt_orgdata =et_bid_iteme_partner=et_partnere_orgdata=et_orgdatae_messages=lt_messages.MOVE-CORRESPONDINGls_bid_e_headerTOls_bid_header.DATA:l_bid_e_changedTYPEc.DATA:ls_bid_update_headerTYPEbbp_pds_bid_header_u.MOVE-CORRESPONDINGls_bid_headerTOls_bidupdate_header.ls_bid_update_header-description=wd_this->ls_bid_header-CALLFUNCTION'BBP_PD_BID_UPDATE' =iheader =ls_bid_update_headere_changed=l_bid_e_changed =lt_bid_itemi_partner=lt_partneri_orgdata=lt_orgdatae_messages=lt_messages.IFsy-subrc=CALLFUNCTION'BBP_PD_BID_SAVE'ivheader =lsbid_header-iv_reset_changes=COMMITWORKANDls_item_node-