深入浅出oracle之常用接口开发参考

OracleERPE-BusinessOracle应用技术 Creation November1,Last November14, ReferenceNumber> DRAFT1A<Approver <Approver Copy ControlChange5Change29-Oct-DraftNoPrevious Copy1LibraryProject2Project34NoteToIfyoureceiveanelectroniccopyofthis andprintitout,pleasewriteyournameontheequivalentofthecoverpage,for controlpurposes.Ifyoureceiveahardcopyofthis,pleasewriteyournameonthefrontcover,forcontrolpurposes. 总体说 业务需 s应付【OpenInterface 快速参 开发参 已知问 APrs供应商【OpenInterface、UnopenAPI 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 CEBankStatement银行【OpenInterface 快速参 开发参 已知问 快速参 开发参 已知问 FAMassAddtions成批添加【OpenInterface 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 INVMaterialTransactions物料事务处理【OpenInterface 快速参 开发参 已知问 INVMoveOrders挑库单【OpenAPI 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 MRPMasterDemand/ProductionSchedules【OpenInterface 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 OMShip销售发运【OpenAPI 快速参 开发参 已知问 PORequisitions请购单【OpenInterface 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 快速参 开发参 已知问 WIPWorkOrders工单【OpenInterface 快速参 开发参 已知问 WIPMoveTransactions工序移动【OpenInterface 快速参 开发参 已知问 WIPResourceTransactions资源事务【OpenInterface 快速参 开发参 已知问 快速参 开发参 已知问 OpenandClosedIssuesforthis Open Closed 总体说本文档目

业务需现场用能的码机手持式A、RD设业数据比如料事数据（ER个OracleERP系统？这些纷繁复杂的海量工作不可能全部通过手工Key到系统中，必须处理这些业务需求的方式就是“接口”：通过一组程序把数据批量写入OracleERP相关表中，达到和在界面输入同样的效果：数据一致性，数据有效性，数据集（比接口模式.OpenInterface模然而作为OpenInterface，它其实是一整套程序：接口表、验证和处理并发程序、接口通常情况下，错误需要用户在EBS接口模式.OpenAPI模从功能角度看，和OpenInterface一样；差异体现在程序开发上。通过PL/SQL直接调用开放的APIProcedure，把数据导入目标Product表。OpenAPI基本是由一套PL/SQLPackage组成的，没有用户界面，从Package类型看，API类说私有API，是Oracle开发团队自己使用的程序包，每次升级可能变化，我们不能使公有API，Oracle提供给我们使用的程序包，我们可以调用；但只要没有以文档形公开发布过，Oracle仍有可能改变，并且风险由我们自己承公开发布的API，Oracle提供给我们使用的Public程序包，并以文档形式公开发布，们可以调用，每次升级变化的可能性极方类必默认✔4、5、6是必须要开发的；说明同OpenInterface。根据实际情况灵活选用。在可能的情况下，建议采用OpenAPI模式。问题解决方看接口处理看接口错误查再看激活相关模块的DebugProfile后，出错信息就更明确更丰富了。有些Profile是选APs应付【OpenInterface快速参开发参

内功能导N:并发请N:AP/Requests/PayablesOpenInterface接口接口Debug详细例文115apug.pdfOraclePayablesUserTable说ap_ap_ap_ap_Table ErrorSELECTSELECTFROMap_interface_rejectionsair,WHEREair.parent_id= s_interface并发程序PayablesOpenInterfaceN:AP/Requests/PayablesOpenInterface参说来Batch批Hold放空即Hold放空即GL放空即参说TraceDebugSummarizeCommitBatchUserLogin关键字段（参数）+最简单例字说经营单位来自ap_号日供应商金币组ID，可直接用字说经营单位来自ap_财务日行金账户 l_iface_lines_rec NUMBER:=-- := := := := :=-l_iface_lines_rec.last_update_date:= := := :=l_iface_lines_rec.last_update_login:=---SELECT s_interface_s.NEXTVALINTO _idFROM := _type_lookup_code:= := := := := := := := := := GATEWAY';--LookuptypeSOURCE := :=INSERTINTO s_interfaceVALUES--SELECT _lines_interface_s.NEXTVALINTO _line_idFROM := := := := := := bination_id:=INSERTINTO _lines_interfaceVALUESdbms_output.put_line('group_id'|| 已知问ProfileAP:UseBatchControls，定义是否使用批控APrs供应商【OpenInterface、UnopenAPI快速参开发参

内功能导N:AP/并发请N:AP/Requests/rOpenInterfaceap_rs_int/ap_接口接口Debug详细例文115apug.pdfOraclePayablesUserTable说ap_ap_TablerOpenInterfaceN:AP/Requests/rOpenInterface参说ImportBatch默认PrintExceptionsDebugTrace是否启用关键字段（参数）+最简单例字说UnopenAPI最简单例子（新增供应商、地址、联系人）（11.5.9环境测试通过） NUMBER:= x_vendor_contact_id fnd_global.apps_initialize(user_id=>4760,resp_id=>52050,resp_appl_id=> => r => => => => p_minority_group_lookup_code=> => => => =>IFnvl(x_status,'F')<>'S' dbms_output.put_line('Status'|| dbms_output.put_line('Message'|| END :=x_exception_msg:=--Profile"DefaultCountry"mustbe => => => =>'Address =>'Address =>'Address =>'Address => => => => => =>IFnvl(x_status,'F')<>'S' dbms_output.put_line('Status'|| dbms_output.put_line('Message'|| END :=x_exception_msg:= => => => => => => => => => x_vendor_contact_id=> => =>IFnvl(x_status,'F')<>'S' dbms_output.put_line('Status'|| dbms_output.put_line('Message'|| END已知问ARCustomers客户【OpenInterface快速参开发参

客户表（Party、Customer、PartySite、SiteUse、Location、Contact、内功能导N:并发请N:AR/Requests/Customer接口接口DebugAR:EnableDebugMessageOutput\AR:EnableSQL详细例文115arug.pdfOracleReceivablesUser说说TableTableRelation根据orig…ref字段关联的，也是根据这些字段找正式表的。并发程序CustomerInterfaceN:参说N。Indicatesifareciprocalcustomerrelationshipmustbecreated.Ycausesthecreationofareciprocalcustomerrelationship.Ncreationofareciprocal关键字段（参数）+最简单例字说如果预制文件HZ_GENERATE_PARTY_NUMBER为Y，那么如果AR参数generate_customer_number为Y，那么放空，否若导Site，预制文件经营单位如果为空，说明不导SiteUse。常用的有：若导SiteUse，AR参数auto_site_numbering为Y，那么放空若导SiteUse，如果是主SiteUse，就给若导Shipto，该字段用来指示所使用的Bill字说必如果使用系统标准Profile，则给这个字段赋值；也可直接经营单位字说参OpenInerface最简单例子（仅新增客户）（11.5.9环境测试通过） l_iface_prof_rec NUMBER:=-- := := := := :=-l_iface_prof_rec.last_update_date:= := := :=l_iface_prof_rec.last_update_login:=---SELECTdecode(nvl(fnd_profile.VALUE('HZ_GENERATE_PARTY_NUMBER'),'Y'),'Y',NULL, INTO FROMSELECTdecode(generate_customer_number,'Y',NULL, INTO FROMWHEREorg_id= := := :=l_iface_rec.orig_system_customer_ref:= :='Customer := := := :=INSERTINTOra_customers_interface_allVALUES-- := := :=l_iface_prof_rec.customer_profile_class_name:= := :=INSERTINTOra_customer_profiles_int_allVALUESOpenInerface最简单例子（仅新增Address和SiteUse）（11.5.9环境测试通过） l_iface_prof_rec NUMBER:=-- :=lifacerec.lastupdated := := := :=-l_iface_prof_rec.last_update_date:= := := :=l_iface_prof_rec.last_update_login:=---SELECTdecode(nvl(fnd_profile.VALUE('HZ_GENERATE_PARTY_NUMBER'),'Y'),'Y',NULL, INTO FROMSELECTdecode(generatecustomernumber,'Y',NULL, INTO FROMarsystemWHEREorg_id= := := :='PART0001';:=:=:=:= := :=--Address&SiteSELECTdecode(nvl(fnd_profile.VALUE('HZ_GENERATE_PARTY_SITE_NUMBER'), INTO FROMSELECTdecode(auto_site_numbering,'Y',NULL, INTO FROMWHEREorg_id= := :=l_iface_rec.orig_system_address_ref:=l_iface_rec.bill_to_orig_address_ref:= := :=--CannotupdatesiteIFIFl_iface_rec.insert_update_flag='U'THENl_iface_rec.site_use_code:=NULL;ENDINSERTINTOra_customers_interface_allVALUES-- := := :=l_iface_prof_rec.customer_profile_class_name:= := :=INSERTINTOra_customer_profiles_int_allVALUESOpenInerface最简单例子（同时新增客户和Site）（11.5.9环境测试通过） lifaceprofrecracustomer NUMBER:=-- := := := := :=-l_iface_prof_rec.last_update_date:= := := :=l_iface_prof_rec.last_update_login:=---SELECTdecode(nvl(fndprofile.VALUE('HZ_GENERATE_PARTY_NUMBER'),'Y'),'Y',NULL, INTO FROMSELECTdecode(generate_customer_number,'Y',NULL, INTO FROMWHEREorg_id= := := :='PART0002';l_iface_rec.orig_system_customer_ref:= :='PART0002';l_iface_rec.orig_system_customer_ref:=lifacerec.customertype:=:=lifacerec.customertype:=:= :=--Address&SiteSELECTdecode(nvl(fnd_profile.VALUE('HZ_GENERATE_PARTY_SITE_NUMBER'),'Y'),'Y',NULL, INTO FROMSELECTdecode(auto_site_numbering,'Y',NULL, INTO FROMWHEREorg_id= := :=l_iface_rec.orig_system_address_ref:=l_iface_rec.bill_to_orig_address_ref:=liface := :=--CannotupdatesiteIFl_iface_rec.insert_update_flag=IFl_iface_rec.insert_update_flag='U'THENl_iface_rec.site_use_code:=NULL;l_iface_rec.primary_site_use_flag:=INSERTINTOra_customers_interface_allVALUES-- := :=l_iface_prof_rec.customer_profile_class_name:= := :=--Customel_iface_prof_rec.orig_system_address_ref:=INSERTINTOra_customer_profiles_int_allVALUES--SiteUsel_iface_prof_rec.orig_system_address_ref:=INSERTINTOra_customer_profiles_int_allVALUESOpenInerface最简单例子（新增另一OUSite）（11.5.9环境测试通过） l_iface_prof_rec NUMBER:=-- :=lifacerec.lastupdated := :=lifacerec.created := :=-l_iface_prof_rec.last_update_date:= := := :=l_iface_prof_rec.last_update_login:=---SELECTdecode(nvl(fnd_profile.VALUE('HZ_GENERATE_PARTY_NUMBER'),'Y'),'Y',NULL, INTO FROMSELECTdecode(generate_customer_number,'Y',NULL, INTO FROMarsystemWHEREorg_id= := := :='PART0002'; :='Customer:=:=:=:= :=--Address&SiteSELECTdecode(nvl(fnd_profile.VALUE('HZ_GENERATE_PARTY_SITE_NUMBER'),'Y'),'Y',NULL, INTO FROMSELECTdecode(auto_site_numbering,'Y',NULL, INTO FROMWHEREorg_id= := :=l_iface_rec.orig_system_address_ref:=l_iface_rec.bill_to_orig_address_ref:= := :=--CannotupdatesiteIFIFl_iface_rec.insert_update_flag='U'THENl_iface_rec.site_use_code:=NULL;ENDINSERTINTOra_customers_interface_allVALUES-- := :=l_iface_prof_rec.customer_profile_class_name:= := :=--SiteUsel_iface_prof_rec.orig_system_address_ref:=INSERTINTOra_customer_profiles_int_allVALUES l_iface_prof_recl_iface_phone_rec NUMBER:=-- := := := := :=- := := := :=l_iface_prof_rec.last_update_login:=-l_iface_phone_rec.last_update_date:=lifacephonerec.lastupdated := :=lifacephonerec.created :=l_iface_phone_rec.last_update_login:=---SELECTdecode(nvl(fnd_profile.VALUE('HZ_GENERATE_PARTY_NUMBER'),'Y'),'Y',NULL, INTO FROMSELECTdecode(generate_customer_number,'Y',NULL, INTO FROMWHEREorg_id= := :=lifacerec.origsystempartyref :=lifacerec.origsystempartyref :='PART0004';:=:=:=:= := :=--Address&SiteSELECTdecode(nvl(fnd_profile.VALUE('HZ_GENERATE_PARTY_SITE_NUMBER'),'Y'),'Y',NULL, INTO FROMSELECTdecode(auto_site_numbering,'Y',NULL, INTO FROMWHEREorg_id= := :=lifacerec.origsystemaddressref:=l_iface_rec.bill_to_orig_address_ref:=liface := :=--CannotupdatesiteIFIFl_iface_rec.insert_update_flag='U'THENl_iface_rec.site_use_code:=NULL;ENDINSERTINTOra_customers_interface_allVALUES--lifaceprofrec.insertupdate := :=lifaceprofrec.customerprofileclassname:= := :=--Customel_iface_prof_rec.orig_system_address_ref:=INSERTINTOra_customer_profiles_int_allVALUES--SiteUsel_iface_prof_rec.orig_system_address_ref:=INSERTINTOra_customer_profiles_int_allVALUES-- :=lifacephonerec.origsystemcustomerref:=lifacerec.origsystemcustomer := := ephone_ref:= := :=' :='GEN';-- :=INSERTINTOra_contact_phones_int_allVALUES已知问shipto的bill_to_orig_address_ref可用billto的orig_system_address_ref，这样可以自FUNCTIONFUNCTION IN INVARCHAR2,p_site_use_codeINRETURNVARCHAR2 l_count ref_null_exception IFpcustrefISNULLORpaddr_refISNULL RAISE END SELECT INTO FROM WHEREorig_system_reference= IFl_count=0 RETURN END IFp_site_use_codeISNULL RETURN END SELECT INTO FROMra_customerscs,ra_addressesad,ra_site_uses WHEREcs.customer_id= ANDad.address_id=ANDANDcs.orig_system_reference=ANDad.orig_system_reference= ANDsu.site_use_code= IFl_count=0 RETURN END RETURNFUNCTIONget_cust_prof_iface_flag(p_cust_refIN p_addr_refINVARCHAR2)RETURNVARCHAR2 l_count ref_null_exception IFp_cust_refISNULL RAISE END SELECT INTOl FROM WHEREorig_system_reference= IFl_count=0 RETURN END IFp_addr_refISNULL SELECT INTO FROMhz_cust_accountscs,hz_customer_profiles WHEREcs.orig_system_reference= ANDcp.site_use_idIS ANDcs.cust_account_id= SELECT INTO FROMra_customerscs,ar_customer_profilescp,ra_addressesWHEREWHEREcs.customer_id=ANDcp.customer_id=ANDANDcs.orig_system_reference=ANDad.orig_system_reference= ANDcp.site_use_idISNOT END IFlcount=0 RETURN END RETURNFUNCTION IN p_contact_refIN RETURNVARCHAR2 l_count ref_null_exception SELECT INTO FROMhzcustaccountroles WHEREcont.orig_system_reference= IFl_count>0 RETURN END SELECT INTO FROMhz_contact_points WHEREphone.orig_system_reference= IFl_count>0 RETURN END RETURN11.5.9需要打Patch3606744和3558213，否则Statement和Dunning类型的SiteUse导不ARTransactions应收【OpenInterface、OpenAPI快速参开发参

TransactionFlexfield定义；这些字段的值组合不能和正式表重复。account_classRECandlatest_rec_flagY'的ra_cust_trx_line_gl_dist_all是没有如果没有销售员，可以提供一条salesrep_id=-3的NoSales记录给接口。这个要看ARSystemOptionMiscellaneous上的设置是否要求销售员。如果对PaymentSchedule信息“不满意”，可以Update或者Insert表内功能导N:并发请N:AR/Requests/AutoMasterAR_接口N:AR/Control/Auto/Interface接口N:AR/Control/Auto/InterfaceDebugAR:EnableDebugMessage详细例文115arug.pdfOracleReceivablesUser115arapi.pdfOracleReceivablesAPIUserTable说TableRelation接口表之间的关系和其他接口不同，不是通过ID关联，而是通过描述性弹性域LineTransactionFlexfield定义；这些字段的值组合不能和正式表重复并发程序并发程序MasterN:AR/Requests/AutoMaster参说NumberofBatchSourceBatchSource隐藏参DefaultBaseDueDateonTrxYOrd关键字段（参数）+最简单例字说必OpenInerface最简单例子（更新数量和需求日期）（VIS环境测试通过）已知问BOMBills物料【OpenInterface、OpenAPI快速参开发参

内功能导N:并发请BillandRoutingN:接口接口DebugMRP:Debug详细例文115mfgapi.pdf：OracleManufacturingAPIsandOpenInterfaces Table说头表视图；可单独使用Table nvl(bom_bill_of_mtls_interface.alternate_bom_designator,chr(0))= SELECT FROMinv.mtl_interface_errorst,bom.bom_bill_of_mtls_interfaceWHEREi.transaction_id=SELECT FROMinv.mtl_interface_errorst, ps_interfaceWHEREi.transaction_id=并发程序BillandRoutingN:参说AllImportImportBillsofDeleteProcessed作Interface关键字段（参数）+最简单例字说库存CurrentInv字说库存CurrentInv组件序字说字说组件序字说通用参YN不输出调试信调式信 ，一般是 l_iface_lines_rec NUMBER:=204;--CurrentInv NUMBER:=0;--UserID,Sysadminl_iface_rec.last_update_date:= := := :=l_iface_rec.last_update_login:=-l_iface_lines_rec.last_update_date:= := := :=l_iface_lines_rec.last_update_login:=- := := := :=l_iface_rec.alternate_bom_designator:=INSERTINTObom.bom_bill_of_mtls_interfaceVALUES := := := :=l_iface_lines_rec.alternate_bom_designator:= := := := :=INSERTINTO ps_interfaceVALUESOpenAPI例子（VIS环境测试通过 x_bom_ref_designator_tbl ponent_tbl x_return_status x_message_listl_indexNUMBER:= NUMBER:=0;--UserID,Sysadminl_cur_mfg_org_codeVARCHAR2(240):=--Initializefirst,orcreate_bywillbe- => => resp_appl_id=>-- := := := :=l_bom_header_rec.bom_implementation_date:= ponent_tbl(l_index).transaction_type:= ponent_tbl(l_index).organization_code:= ponent_tbl(l_index).assembly_item_name:= ponent_tbl(l_index).alternate_bom_code:= ponent_tbl(l_index).item_sequence_number:= ponent_tbl(l_index).component_item_name:= ty_per_assembly:= ponent_tbl(l_index).start_effective_date:= => => => => => => x_bom_ref_designator_tbl=> ponent_tbl => => => =>--IFx_return_status<>fnd_api.g_ret_sts_success error_handler.get_message_list(x_message_list=> FORiIN1..x_message_list.COUNT dbms_output.put_line('BO :'|| dbms_output.put_line('OrganizationID:'|| dbms_output.put_line('Entity :' dbms_output.put_line('Message :' substr(x_message_list(i).message_text,1, dbms_output.put_line('Entity :'|| dbms_output.put_line('Message :'|| dbms_output.put_line('Table :'|| dbms_output.put_line('Row :'|| END IF(x_return_status=fnd_api.g_ret_sts_unexp_error) RAISE ELSIF(x_return_status=fnd_api.g_ret_sts_error) RAISE END ENDOpenAPI例子（11.5.9GITI测试环境测试通过）x_bom_ref_designator_tbl ponent_tbl xreturnstatus x_message_listl_indexNUMBER:=--Initialize?orcreateBywillbe- => => resp_appl_id=> --backupallprimarybomtoanFORhdr_recIN(SELECT mst.segment1 FROMapps.bom_bill_of_materials WHEREanization_id=ANDWHEREanization_id=ANDanization_id= ANDanization_code= ANDboms.alternate_bom_designatorIS ANDNOT (SELECT FROMapps.bom_bill_of_materials WHEREanization_id= ANDboms2.assembly_item_id ANDboms2.alternate_bom_designator='06BK')) -- := l_bom_header_anization_code:= l_bom_header_rec.assembly_item_name:= l_bom_header_rec.alternate_bom_code:= l_index:= FORline_recIN(SELECT mst.segment1component bics.effectivity FROM ponents WHEREhdr_anization_id= ponent_item_id= --AND(nvl(bics.disable_date,SYSDATE)>=SYSDATE - bics.effectivity_date<=SYSDATE - bics.effectivity_date> ANDbics.bill_sequence_id= ORDERBYbics.item_num,bics.effectivity_date) ponent_tbl(l_index).transaction_type:= ponent_tbl(l_index).organization_code:=ponent_tbl(l_index).assembly_item_nameponent_tbl(l_index).assembly_item_name:=l_bom_header_rec.assembly_item_name;lbomcomponenttbl(lindex).alternatebomcode:=lbomheaderrec.alternate_bom_code; ponent_tbl(l_index).item_sequence_number:= ponent_tbl(l_index).component_item_name ty_per_assembly ponent_tbl(l_index).start_effective_date:= ponent_tbl(l_index).disable_date:= l_index:=l_index+ ENDxbomheaderrecxbomcomponenttbl=>=>=>=>=>xbomheader=>=>xbomcomponentx_bom_ref_designator_tbl=>x_bom_ref_designator_tbl,ponent_tbl=> =>=>=> -- IFx_return_status<>fnd_api.g_ret_sts_success errorhandler.getmessagelist(xmessage_list=> FORiIN1..x_message_list.COUNT dbmsoutput.putline('BO :'|| dbms_output.put_line('OrganizationID:'|| dbms_output.put_line('Entity :' dbms_output.put_line('Message :' substr(x_message_list(i).message_text,1, dbms_output.put_line('Entity :'|| dbms_output.put_line('Message :'|| dbms_output.put_line('Table :'|| dbmsoutput.putline('Row :'|| END IF(x_return_status=fnd_api.g_ret_sts_unexp_error) RAISE ELSIF(x_return_status=fnd_api.g_ret_sts_error) RAISE END ENDEND已知问BOMRoutings工艺路线【OpenInterface、OpenAPI快速参开发参

内功能导N:并发请BillandRoutingN:接口接口DebugMRP:Debug详细例文115mfgapi.pdf：OracleManufacturingAPIsandOpenInterfaces Table说头表；可单独使用，如Tablebom_op_routings_anization_id=bom_op_sequences_anization_idbom_op_routings_interface.assembly_item_number=nvl(bom_op_routings_interface.alternate_routing_designator,chr(0))=bom_op_sequences_anization_id=bom_op_resources_anization_idbom_op_sequences_interface.assembly_item_number=nvl(bom_op_sequences_interface.alternate_routing_designator,chr(0))=bom_op_sequences_interface.operation_seq_num=SELECT FROMinv.mtl_interface_errorst,bom.bom_op_routings_interfaceWHEREi.transaction_id=SELECT FROMinv.mtl_interface_errorst, ps_interfaceWHEREi.transaction_id=SELECTt.error_message,t.entity_identifier,t.bo_identifier,FROMinv.mtl_interface_errorst,bom.bom_op_sequences_interfaceWHEREi.transaction_id=SELECT FROMinv.mtl_interface_errorst,bom.bom_op_resources_interfaceWHEREi.transaction_id=并发程序BillandRoutingN:参说AllImportImportBillsofDeleteProcessedInterface 关键字段（参数）+最简单例字说库存CurrentInv字说库存CurrentInv字说工序序部门代字说库存CurrentInv工序序资源代资源数WIPPOPO字说通用参YN不输出调试信调式信 ，一般是 NUMBER:=207;--CurrentInv NUMBER:=0;--UserID,Sysadminl_iface_rec.last_update_date:= := := :=l_iface_rec.last_update_login:=-l_iface_seq_rec.last_update_date:= := := :=l_iface_seq_rec.last_update_login:=-l_iface_res_rec.last_update_date:= := := :=l_iface_res_rec.last_update_login:=- := := := :=l_iface_rec.alternate_routing_designator:=INSERTINTObom.bom_op_routings_interfaceVALUES := := := :=l_iface_seq_rec.alternate_routing_designator:= := := :=INSERTINTObom.bom_op_sequences_interfaceVALUES := := := :=l_iface_res_rec.alternate_routing_designator:= := := :='LBR- := :=INSERTINTObom.bom_op_resources_interfaceVALUESl_iface_res_rec;OpenInerface最简单例子（单独修改资源）（11.5.9GITI环境测试通过）l_iface_res_recl_iface_res_recbom.bom_op_resources_interface%ROWTYPE;l_cur_mfg_org_idNUMBER:=443;--CurrentInvOrganization NUMBER:=0;--UserID,Sysadminherel_iface_res_rec.last_update_datel_iface_res_rec.last_update_date:=lifaceresrec.lastupdatedby :=luserid; :=SYSDATE; :=l_user_id;l_iface_res_rec.last_update_login:=-1; := := := :=l_iface_res_rec.alternate_routing_designator:=:=:= := := :=to_date('12-JUL-2006 'DD-MON-YYYYINSERTINTObom.bom_op_resources_interfaceVALUESl_iface_res_rec;OpenInerface最简单例子（单独新增资源）（11.5.9GITI环境测试通过）l_iface_res_recbom.bom_op_resources_interface%ROWTYPE;l_cur_mfg_org_idNUMBER:=443;--CurrentInvOrganization NUMBER:=0;--UserID,Sysadminherel_iface_res_rec.last_update_date:=SYSDATE; :=l_user_id; :=SYSDATE; :=l_user_id;l_iface_res_rec.last_update_login:=-1; := := :=l_cur_mfg_org_id; :='100E037L';l_iface_res_rec.alternate_routing_designator:=NULL; :=10; := := :=1.9; :=to_date('14-JUN-200617:59:55','DD-MON-YYYYINSERTINTObom.bom_op_resources_interfaceVALUESOpenInerface最简单例子（标准工序的同时修改资源）（VIS环境测试liface bom.bomoproutings lifaceresrec bom.bomopresourcesinterface%ROWTYPE; NUMBER:=207;--CurrentInvl_cur_mfg_org_codeVARCHAR2(240):= NUMBER:=0;--UserID,Sysadmin VARCHAR2(240):=l_iface_rec.last_update_date:=l_iface_rec.last_update_date:=SYSDATE; :=l_user_id; :=SYSDATE; :=l_user_id;l_iface_rec.last_update_login:=-1;lifaceseqrec.lastupdatedate:=SYSDATE; :=l_user_id;lifaceseqrec.creationdate :=SYSDATE; :=l_user_id;l_iface_seq_rec.last_update_login:=-1;l_iface_res_rec.last_update_date:=SYSDATE; :=l_user_id; :=SYSDATE; :=l_user_id;l_iface_res_rec.last_update_login:=-1; := := := :=l_iface_rec.alternate_routing_designator:=INSERTINTObom.bom_op_routings_interfaceVALUES := := := :=l_iface_seq_rec.alternate_routing_designator:= :=:=:= :=INSERTINTObom.bom_op_sequences_interfaceVALUESUpdateresourcederivedfromstandard := := := :=l_iface_res_rec.alternate_routing_designator:= := :=:='LBR-:=; :=INSERTINTObom.bom_op_resources_interfaceVALUES--Addnew := :=l_iface_res_rec.usage_rate_or_amount:=INSERTINTObom.bom_op_resources_interfaceVALUESl_iface_res_rec; l_op_resource_tbl x_rtg_revision_tbl x_op_resource_tblx_sub_resource_tbl x_return_status x_message_listl_indexNUMBER:= NUMBER:=0;--UserID,Sysadminl_cur_mfg_org_codeVARCHAR2(240):=--Initializefirst,orcreate_bywillbe- => => resp_appl_id=>-- := := :=l_rtg_header_rec.alternate_routing_code:= :=l_operation_tbl(l_index).transaction_type:=l_operation_tbl(l_index).organization_code:=l_operation_tbl(l_index).assembly_item_name:=l_operation_tbl(l_index).alternate_routing_code:=l_operation_tbl(l_index).operation_sequence_number:=l_operation_tbl(l_index).department_code:=l_operation_tbl(l_index).start_effective_date:=l_op_resource_tbl(l_index).transaction_type:=l_op_resource_tbl(l_index).organization_code:=l_op_resource_tbl(l_index).assembly_item_name:=l_op_resource_tbl(l_index).alternate_routing_code:=l_op_resource_tbl(l_index).operation_sequence_number:= l_op_resource_tbl(l_index).resource_sequence_number:=l_op_resource_tbl(l_index).resource_code:='LBR-l_op_resource_tbl(l_index).usage_rate_or_amount:= l_op_resource_tbl(l_index).op_start_effective_date:= => p_api_version_number=> => => => => => => => => => => => => => =>--IFx_return_status<>fnd_api.g_ret_sts_success error_handler.get_message_list(x_message_list=> FORiIN1..x_message_list.COUNT dbms_output.put_line('BO :'|| dbms_output.put_line('OrganizationID:'|| dbms_output.put_line('Entity :'|| dbms_output.put_line('Message :' substr(x_message_list(i).message_text,1, dbms_output.put_line('Entity :'|| dbms_output.put_line('Message :'|| dbms_output.put_line('Table :'|| dbms_output.put_line('RowIdentifier:'|| END IF(x_return_status=fnd_api.g_ret_sts_unexp_error) RAISE ELSIF(x_return_status=fnd_api.g_ret_sts_error) RAISE END END已知问CEBankStatement银行【OpenInterface快速参内功能导