1188: BEGIN
1189: debug_info := 'Get max_ppa_line_num';
1190: SELECT COUNT(*)
1191: INTO l_max_inv_line_num
1192: FROM ap_ppa_invoice_lines_gt
1193: WHERE invoice_id = P_invoice_id;
1194:
1195: RETURN (l_max_inv_line_num);
1196:
1266: debug_info VARCHAR2(1000);
1267: BEGIN
1268: SELECT NVL(SUM(amount), 0)
1269: INTO l_invoice_amount
1270: FROM ap_ppa_invoice_lines_gt L
1271: WHERE L.invoice_id = P_invoice_id
1272: AND L.adj_type = 'PPA';
1273:
1274: IF l_invoice_amount <> 0 THEN
1359:
1360: debug_info VARCHAR2(1000);
1361: BEGIN
1362:
1363: debug_info := 'Insert into ap_ppa_invoice_lines_gt';
1364:
1365: INSERT INTO ap_ppa_invoice_lines_gt (
1366: invoice_id,
1367: line_number,
1361: BEGIN
1362:
1363: debug_info := 'Insert into ap_ppa_invoice_lines_gt';
1364:
1365: INSERT INTO ap_ppa_invoice_lines_gt (
1366: invoice_id,
1367: line_number,
1368: line_type_lookup_code,
1369: requester_id,
2490: BEGIN
2491: debug_info := 'Get invoice_num for the corrected invoice';
2492: SELECT line_number
2493: INTO l_line_number
2494: FROM ap_ppa_invoice_lines_gt
2495: WHERE invoice_id = p_invoice_id
2496: AND corrected_line_number = p_line_number
2497: AND match_type = 'ADJUSTMENT_CORRECTION';
2498: