DECLARE
l_org_id NUMBER;
l_count NUMBER;
l_result VARCHAR2 (30);
l_file_val VARCHAR2 (60);
CURSOR c_rec
IS
SELECT oel.line_id
FROM apps.oe_order_lines_all oel
WHERE oel.line_id IN
('5569696',
'5569705',
'6057802');
BEGIN
oe_debug_pub.debug_on;
oe_debug_pub.initialize;
l_file_val := OE_DEBUG_PUB.Set_Debug_Mode ('FILE');
oe_Debug_pub.setdebuglevel (5);
DBMS_OUTPUT.put_line ('File : ' || l_file_val);
FOR i IN c_rec
LOOP
UPDATE apps.oe_order_lines_all
SET invoice_interface_status_code = NULL
WHERE line_id = i.line_id;
OE_Standard_WF.OEOL_SELECTOR (p_itemtype => 'OEOL',
p_itemkey => TO_CHAR (i.line_id),
p_actid => 12345,
p_funcmode => 'SET_CTX',
p_result => l_result);
wf_engine.handleError ('OEOL',
i.line_id,
'INVOICE_INTERFACE',
'RETRY',
NULL);
DBMS_OUTPUT.put_line (
'File name ' || OE_DEBUG_PUB.G_DIR || '/' || OE_DEBUG_PUB.G_FILE);
COMMIT;
END LOOP;
END;
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.