/* 供应商地点失效 creation: created by jenrry 20161108 1.00 */ DECLARE lv_return_status ) := NULL; ln_msg_count NUMBER; lv_errmsg ); lt_vendor_site_rec ap_vendor_pub_pkg.r_vendor_site_rec_type; p_vendor_rec ap_vendor_pub_pkg.r_vendor_rec_type; l_party_site_…

--创建供应商地址上的电话号码 created by jenrry 20170419 DECLARE l_return_status VARCHAR2(1); l_msg_count NUMBER; l_msg_data VARCHAR2(1000); l_vendor_contact_rec hz_contact_point_v2pub.contact_point_rec_type; l_vendor_edi_rec hz_contact_point_v2pub.edi_rec_type; l…

SELECT --nvl(substr(po.vendor_name,1,instr(po.vendor_name,',',1)-1),po.vendor_name) vendor_name, po.vendor_name vendor_name, po.vendor_name_alt, --别名 po.segment1, --供应商编号 decode(po.employee_id, NULL, 'STANDARD', 'EMPLOYEE') vendor_type, --创建供应商若关联员工…

SELECT pvs.vendor_site_id, pvs.party_site_id, hps.party_site_name, hps.object_version_number, hps.party_site_number, pvs.location_id, hl.object_version_number, hps.STATUS FROM ap_supplier_sites_all pvs, hz_party_sites hps, hz_locations hl WHERE pvs.v…

--取消核销 created by jenrry 20170425 DECLARE l_result BOOLEAN; l_msg_count NUMBER; l_result_n varchar2(2); l_error_message VARCHAR2(2000); l_num_c NUMBER; l_num_nc NUMBER; BEGIN -- Call the procedure fnd_global.APPS_INITIALIZE(1111, 50737, 20005); mo_gl…

1>找出相应的发票; SELECT DISTINCT ai.invoice_id, ai.invoice_num invoice_num, pv.segment1 vendor_num, pv.vendor_name vendor_name, 'The fully Paid invoice should be closed!' status FROM ap.ap_invoices_all ai, po.po_vendors pv, ap.ap_payment_schedules_all aps…

--更新客户地点 declare x_return_status ); x_msg_count NUMBER; x_msg_data ); x_profile_id NUMBER; l_location_id NUMBER; l_object_version_number NUMBER; l_party_rec hz_party_site_v2pub.party_site_rec_type; cursor cur_DT is SELECT loc.location_id, loc.object_…

--1.Invoice创建时生成数据如下表 --Invoice主表 SELECT * FROM AP_INVOICES_ALL A WHERE A.INVOICE_NUM = '20111213001'; --Invoice分配表 SELECT * FROM AP_INVOICE_DISTRIBUTIONS_ALL B WHERE B.INVOICE_ID = 697444; --Invoice付款计划表 SELECT * FROM AP_PAYMENT_SCHEDULES_ALL C WHER…

-- purpose: 应付标准发票核销预付款发票中的一行 -- 12.2.6 环境 -- author:jenrry create_date: 2017-06-08 declare l_error_message VARCHAR2(2000); p_prepay_line_num number; l_prepay_dist_info ap_prepay_pkg.prepay_dist_tab_type; l_result_boolean BOOLEAN; begin BEGIN FND_GLO…

-- purpose: 应付发票放弃发票行 -- 12.2.6 环境 -- author:jenrry create_date: 2017-06-07 declare l_dummy_msg VARCHAR2(2000); l_msg_data VARCHAR2(2000); l_line_rec ap_invoice_lines%ROWTYPE; l_result_boolean BOOLEAN; begin BEGIN FND_GLOBAL.APPS_INITIALIZE(USER_ID =…