Oracle EBS VMI/寄售(5)--不能自动产生AP Invoice
在之前Oracle EBS 寄销/VMI(1)-->基础设置评论中，有朋友问我没有设置供应商Pay On会有什么样的后果？其后后果如下情况:不能自动创建AP Invoice。
某供应商要从标准PO转换到BPA，由于财务忽略了对供应商地点层“Purchasing”的“Pay On”设置为“Use”，从而导致该供应商不能自动创建AP Invoice。
注意:在启用自动创建APInvoice时，Pay On有三个项
1. Use:表示寄售/VMI耗用时，自动创建AP Invoice。
2. Receipt:表示采购接收入库时，自动创建AP Invoice
3. Receipt and Use:待测试
通过“Purchase Order Summary”。输入对应的供应商，采购订单类型为“Blanket Purchase Agreement”,勾选“View Releases”，点击查找，显示字段“Pay On Code”,PO Number为211000025333部分记录“Pay On Code”空。
通过并发请求“Pay On Receipt AutoInvoice”的源代码查看,包过程“PO_INVOICES_SV2. create_use_invoices”,游标c_consumption的代码
<span style="font-size:18px;">/* Cursor for fetching consumption advice */
CURSOR c_consumption(p_cutoff_date DATE,p_vendor_id number,p_vendor_site_id number) IS
-- std PO referencing Global Agreement
SELECT poh.po_header_id PO_HEADER_ID,
TO_NUMBER(NULL) PO_RELEASE_ID, -- bug2840859
pol.po_line_id PO_LINE_ID,
poll.line_location_id LINE_LOCATION_ID,
pod.po_distribution_id PO_DISTRIBUTION_ID,
pv.vendor_id VENDOR_ID,
pvs.pay_on_receipt_summary_code PAY_ON_RECEIPT_SUMMARY_CODE,
poh.vendor_site_id VENDOR_SITE_ID,
NVL(pvs.default_pay_site_id, pvs.vendor_site_id) DEFAULT_PAY_SITE_ID,
pol.item_description ITEM_DESCRIPTION,
poll.price_override UNIT_PRICE,
pod.quantity_ordered QUANTITY,
NVL(pod.quantity_billed, 0) QUANTITY_BILLED,
poh.currency_code CURRENCY_CODE,
poh.rate_type CURRENCY_CONVERSION_TYPE,
poh.rate CURRENCY_CONVERSION_RATE,
poh.rate_date CURRENCY_CONVERSION_DATE,
NVL(pvs.payment_currency_code,
NVL(pvs.invoice_currency_code, poh.currency_code)) PAYMENT_CURRENCY_CODE,
poh.creation_date CREATION_DATE,
NVL(NVL(poll.terms_id, poh.terms_id), pvs2.terms_id) PAYMENT_TERMS_ID,
DECODE(poll.taxable_flag, 'Y', poll.tax_code_id, NULL) TAX_CODE_ID,
NVL(pvs.ap_tax_rounding_rule, 'N') TAX_ROUNDING_RULE,
NVL(pvs.auto_tax_calc_flag, 'N') AUTO_TAX_CALC_FLAG,
poh.org_id ORG_ID
FROM PO_VENDORS pv,
PO_VENDOR_SITES pvs,
PO_VENDOR_SITES pvs2,
PO_HEADERS poh,
PO_LINES pol,
PO_LINE_LOCATIONS poll,
PO_DISTRIBUTIONS pod
WHERE pv.vendor_id = poh.vendor_id
AND poh.vendor_site_id = pvs.vendor_site_id
AND NVL(pvs.default_pay_site_id, pvs.vendor_site_id) =
pvs2.vendor_site_id
AND poh.po_header_id = pol.po_header_id
AND pol.po_line_id = poll.po_line_id
AND poll.line_location_id = pod.line_location_id
and pv.vendor_id = p_vendor_id
AND poh.vendor_site_id = p_vendor_site_id
AND poh.pay_on_code IN ('RECEIPT_AND_USE', 'USE')
AND DECODE(poh.consigned_consumption_flag, -- utilize PO_HEADERS_F1 idx
'Y',
DECODE(poh.closed_code, 'FINALLY CLOSED', NULL, 'Y'),
NULL) = 'Y'
AND poh.type_lookup_code = 'STANDARD'
AND poh.creation_date <= p_cutoff_date
AND pvs.pay_on_code IN ('RECEIPT_AND_USE', 'USE')
AND pod.quantity_ordered > NVL(pod.quantity_billed, 0)
AND poll.closed_code <> 'FINALLY CLOSED'
UNION ALL
--blanket release 如下对应一揽子发放的SQL
SELECT poh.po_header_id PO_HEADER_ID,
por.po_release_id PO_RELEASE_ID,
pol.po_line_id PO_LINE_ID,
poll.line_location_id LINE_LOCATION_ID,
pod.po_distribution_id PO_DISTRIBUTION_ID,
pv.vendor_id VENDOR_ID,
pvs.pay_on_receipt_summary_code PAY_ON_RECEIPT_SUMMARY_CODE,
poh.vendor_site_id VENDOR_SITE_ID,
NVL(pvs.default_pay_site_id, pvs.vendor_site_id) DEFAULT_PAY_SITE_ID,
pol.item_description ITEM_DESCRIPTION,
poll.price_override UNIT_PRICE,
pod.quantity_ordered QUANTITY,
NVL(pod.quantity_billed, 0) QUANTITY_BILLED,
poh.currency_code CURRENCY_CODE,
poh.rate_type CURRENCY_CONVERSION_TYPE,
poh.rate CURRENCY_CONVERSION_RATE,
poh.rate_date CURRENCY_CONVERSION_DATE,
NVL(pvs.payment_currency_code,
NVL(pvs.invoice_currency_code, poh.currency_code)) PAYMENT_CURRENCY_CODE,
por.creation_date CREATION_DATE,
NVL(NVL(poll.terms_id, poh.terms_id), pvs2.terms_id) PAYMENT_TERMS_ID,
DECODE(poll.taxable_flag, 'Y', poll.tax_code_id, NULL) TAX_CODE_ID,
NVL(pvs.ap_tax_rounding_rule, 'N') TAX_ROUNDING_RULE,
NVL(pvs.auto_tax_calc_flag, 'N') AUTO_TAX_CALC_FLAG,
por.org_id ORG_ID
FROM PO_VENDORS pv,
PO_VENDOR_SITES pvs,
PO_VENDOR_SITES pvs2,
PO_HEADERS poh,
PO_RELEASES por,
PO_LINES pol,
PO_LINE_LOCATIONS poll,
PO_DISTRIBUTIONS pod
WHERE pv.vendor_id = poh.vendor_id
AND poh.vendor_site_id = pvs.vendor_site_id
AND NVL(pvs.default_pay_site_id, pvs.vendor_site_id) =
pvs2.vendor_site_id
AND poh.po_header_id = por.po_header_id
AND poh.po_header_id = pol.po_header_id
AND pol.po_line_id = poll.po_line_id
AND por.po_release_id = poll.po_release_id
AND poll.line_location_id = pod.line_location_id
and pv.vendor_id = p_vendor_id
AND poh.vendor_site_id = p_vendor_site_id
AND por.pay_on_code IN ('RECEIPT_AND_USE', 'USE')--对应的供应商地点未设置Pay On值，创建冲减通知时，产生的一榄子发放Pay_on_code会为空值
AND DECODE(por.consigned_consumption_flag, -- utilize PO_RELEASES_F1 idx
'Y',
DECODE(por.closed_code, 'FINALLY CLOSED', NULL, 'Y'),
NULL) = 'Y'
AND por.release_type = 'BLANKET'
AND por.creation_date <= p_cutoff_date
AND pvs.pay_on_code IN ('RECEIPT_AND_USE', 'USE')
AND pod.quantity_ordered > NVL(pod.quantity_billed, 0)
AND poll.closed_code <> 'FINALLY CLOSED'
ORDER BY 6, -- VENDOR_ID
9, -- DEFAULT_PAY_SITE_ID
7, -- PAY_ON_RECEIPT_SUMMARY_CODE
15, -- CURRENCY_CODE
18, -- CURRENCY_CONVERSION_DATE -- bug2786193
16, -- CURRENCY_CONVERSION_TYPE -- bug2786193
17, -- CURRENCY_CONVERSION_RATE -- bug2786193
20, -- PAYMENT_TERMS_ID
-- 19, -- CREATION_DATE -- bug2786193
1, -- PO_HEADER_ID
2, -- PO_RELEASE_ID
3, -- PO_LINE_ID
4, -- LINE_LOCATION_ID
5; -- DISTRIBUTION_ID
</span>
修改代码:
--查找出Pay On为空的记录
Select PHA.SEGMENT1,PRA.PAY_ON_CODE
From PO_HEADERS_ALL PHA, PO_RELEASES_ALL PRA
Where PHA.PO_HEADER_ID = PRA.PO_HEADER_ID
And PHA.SEGMENT1 = '211000025333'And PRA.PAY_ON_CODE Is Null
--后台修改Pay On空记录，PAY_ON_CODE ='USE'
Update PO_RELEASES_ALL
Set PAY_ON_CODE = 'USE'
Where PO_HEADER_ID In (Select PHA.PO_HEADER_ID
From PO_HEADERS_ALL PHA, PO_RELEASES_ALL PRA
Where PHA.PO_HEADER_ID = PRA.PO_HEADER_ID
And PHA.SEGMENT1 = '211000025333'
And PRA.PAY_ON_CODE Is Null)
然后，提交请求“Pay On Receipt AutoInvoice”，成功产生AP Invoice。
如何测试你修改的方法是否正确？
1.把刚才产生的AP Invoice取消。重新提交一次请求“Pay On Receipt AutoInvoice”，仍然能功成功产生AP Invoice。
2.对于产生的AP Invoice一一核对AP Invoice的匹配行的匹配数据、金额和相关的PO字段，没有发现有问题的记录。
3.将AP Invoice验证过帐传送至GL总帐，用PO、AP和GL相关报表核对科目余额和发生额
若没有问题表明接直修改PO_RELEASES_ALL. PAY_ON_CODE值为USE没有问题。