[Home] [Help]
84: x_return_status := FND_API.G_FALSE;
85: END Validate_Batch_Status;
86:
87: /* Unlocks AP Payment Schedule lines for the given batch if the batch status is
88: 'SELECTED' or 'SUSPENDED' or 'ERROR' and deletes Netting AP Invoices in FUN_NET_AP_INVS given a Batch Id */
89:
90: PROCEDURE delete_ap_invs (
91: p_batch_id IN fun_net_batches.batch_id%TYPE,
92: x_return_status OUT NOCOPY VARCHAR2)
90: PROCEDURE delete_ap_invs (
91: p_batch_id IN fun_net_batches.batch_id%TYPE,
92: x_return_status OUT NOCOPY VARCHAR2)
93: IS
94: TYPE l_inv_tab_type IS TABLE OF fun_net_ap_invs.invoice_id%TYPE;
95: l_inv_tab l_inv_tab_type;
96:
97: BEGIN
98: x_return_status := FND_API.G_TRUE;
111: END IF;
112:
113: SELECT invoice_id
114: BULK COLLECT INTO l_inv_tab
115: FROM fun_net_ap_invs
116: WHERE batch_id = p_batch_id;
117:
118: IF l_inv_tab.EXISTS(1) THEN
119:
118: IF l_inv_tab.EXISTS(1) THEN
119:
120: FOR i IN l_inv_tab.FIRST..l_inv_tab.LAST
121: LOOP
122: FUN_NET_AP_INVS_PKG.Delete_Row(
123: x_batch_id => p_batch_id,
124: x_invoice_id => l_inv_tab(i));
125: END LOOP;
126:
404: x_return_status OUT NOCOPY VARCHAR2)
405: IS
406: CURSOR ap_reverse_cur(p_batch_id IN NUMBER) IS
407: SELECT DISTINCT check_id AS check_id
408: FROM fun_net_ap_invs_all
409: WHERE batch_id = p_batch_id
410: AND check_id is not null;
411:
412: CURSOR c_get_batch_details IS -- Bug # 8904763
627: x_return_status OUT NOCOPY VARCHAR2)
628: IS
629: BEGIN
630: BEGIN
631: UPDATE FUN_NET_AP_INVS
632: SET netted_amt = 0
633: WHERE batch_id = p_batch_id;
634: EXCEPTION
635: WHEN OTHERS THEN