DBA Data[Home] [Help]

APPS.AP_RETRO_PRICING_UTIL_PKG dependencies on AP_IMPORT_INVOICES_PKG

Line 66: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

62: RETURN(TRUE);
63:
64: EXCEPTION
65: WHEN OTHERS THEN
66: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
67: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
68: debug_info);
69: END IF;
70:

Line 67: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

63:
64: EXCEPTION
65: WHEN OTHERS THEN
66: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
67: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
68: debug_info);
69: END IF;
70:
71: IF (SQLCODE < 0) then

Line 72: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

68: debug_info);
69: END IF;
70:
71: IF (SQLCODE < 0) then
72: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
73: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
74: SQLERRM);
75: END IF;
76: END IF;

Line 73: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

69: END IF;
70:
71: IF (SQLCODE < 0) then
72: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
73: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
74: SQLERRM);
75: END IF;
76: END IF;
77:

Line 150: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

146: RETURN(TRUE);
147:
148: EXCEPTION
149: WHEN OTHERS THEN
150: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
151: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
152: debug_info);
153: END IF;
154:

Line 151: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

147:
148: EXCEPTION
149: WHEN OTHERS THEN
150: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
151: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
152: debug_info);
153: END IF;
154:
155: IF (SQLCODE < 0) then

Line 156: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

152: debug_info);
153: END IF;
154:
155: IF (SQLCODE < 0) then
156: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
157: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
158: SQLERRM);
159: END IF;
160: END IF;

Line 157: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

153: END IF;
154:
155: IF (SQLCODE < 0) then
156: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
157: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
158: SQLERRM);
159: END IF;
160: END IF;
161:

Line 226: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

222: RETURN(TRUE);
223:
224: EXCEPTION
225: WHEN OTHERS THEN
226: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
227: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
228: debug_info);
229: END IF;
230:

Line 227: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

223:
224: EXCEPTION
225: WHEN OTHERS THEN
226: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
227: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
228: debug_info);
229: END IF;
230:
231: IF (SQLCODE < 0) then

Line 232: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

228: debug_info);
229: END IF;
230:
231: IF (SQLCODE < 0) then
232: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
233: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
234: SQLERRM);
235: END IF;
236: END IF;

Line 233: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

229: END IF;
230:
231: IF (SQLCODE < 0) then
232: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
233: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
234: SQLERRM);
235: END IF;
236: END IF;
237:

Line 313: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

309: --
310: RETURN(TRUE);
311: EXCEPTION
312: WHEN OTHERS THEN
313: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
314: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
315: debug_info);
316: END IF;
317:

Line 314: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

310: RETURN(TRUE);
311: EXCEPTION
312: WHEN OTHERS THEN
313: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
314: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
315: debug_info);
316: END IF;
317:
318: IF (SQLCODE < 0) then

Line 319: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

315: debug_info);
316: END IF;
317:
318: IF (SQLCODE < 0) then
319: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
320: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
321: SQLERRM);
322: END IF;
323: END IF;

Line 320: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

316: END IF;
317:
318: IF (SQLCODE < 0) then
319: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
320: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
321: SQLERRM);
322: END IF;
323: END IF;
324: --

Line 423: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

419:
420: RETURN(TRUE);
421: EXCEPTION
422: WHEN OTHERS THEN
423: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
424: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
425: debug_info);
426: END IF;
427:

Line 424: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

420: RETURN(TRUE);
421: EXCEPTION
422: WHEN OTHERS THEN
423: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
424: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
425: debug_info);
426: END IF;
427:
428: IF (SQLCODE < 0) then

Line 429: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

425: debug_info);
426: END IF;
427:
428: IF (SQLCODE < 0) then
429: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
430: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
431: SQLERRM);
432: END IF;
433: END IF;

Line 430: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

426: END IF;
427:
428: IF (SQLCODE < 0) then
429: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
430: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
431: SQLERRM);
432: END IF;
433: END IF;
434: --

Line 714: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

710:
711: RETURN(TRUE);
712: EXCEPTION
713: WHEN OTHERS THEN
714: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
715: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
716: debug_info);
717: END IF;
718:

Line 715: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

711: RETURN(TRUE);
712: EXCEPTION
713: WHEN OTHERS THEN
714: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
715: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
716: debug_info);
717: END IF;
718:
719: IF (SQLCODE < 0) then

Line 720: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

716: debug_info);
717: END IF;
718:
719: IF (SQLCODE < 0) then
720: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
721: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
722: SQLERRM);
723: END IF;
724: END IF;

Line 721: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

717: END IF;
718:
719: IF (SQLCODE < 0) then
720: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
721: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
722: SQLERRM);
723: END IF;
724: END IF;
725:

Line 979: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

975: RETURN(TRUE);
976: --
977: EXCEPTION
978: WHEN OTHERS THEN
979: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
980: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
981: debug_info);
982: END IF;
983: --

Line 980: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

976: --
977: EXCEPTION
978: WHEN OTHERS THEN
979: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
980: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
981: debug_info);
982: END IF;
983: --
984: IF (SQLCODE < 0) then

Line 985: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

981: debug_info);
982: END IF;
983: --
984: IF (SQLCODE < 0) then
985: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
986: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
987: SQLERRM);
988: END IF;
989: END IF;

Line 986: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

982: END IF;
983: --
984: IF (SQLCODE < 0) then
985: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
986: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
987: SQLERRM);
988: END IF;
989: END IF;
990: --

Line 1048: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

1044:
1045: RETURN(TRUE);
1046: EXCEPTION
1047: WHEN OTHERS THEN
1048: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1049: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1050: debug_info);
1051: END IF;
1052:

Line 1049: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

1045: RETURN(TRUE);
1046: EXCEPTION
1047: WHEN OTHERS THEN
1048: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1049: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1050: debug_info);
1051: END IF;
1052:
1053: IF (SQLCODE < 0) then

Line 1054: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

1050: debug_info);
1051: END IF;
1052:
1053: IF (SQLCODE < 0) then
1054: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1055: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1056: SQLERRM);
1057: END IF;
1058: END IF;

Line 1055: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

1051: END IF;
1052:
1053: IF (SQLCODE < 0) then
1054: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1055: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1056: SQLERRM);
1057: END IF;
1058: END IF;
1059: --

Line 1289: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN

1285: -- AND L.adj_type = 'PPA'; bug#9573078
1286:
1287: IF l_invoice_amount <> 0 THEN
1288: debug_info := 'Get_Invoice_Amount step2: Call ap_round_currency';
1289: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
1290: AP_IMPORT_UTILITIES_PKG.Print(
1291: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
1292: END IF;
1293:

Line 1291: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

1287: IF l_invoice_amount <> 0 THEN
1288: debug_info := 'Get_Invoice_Amount step2: Call ap_round_currency';
1289: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
1290: AP_IMPORT_UTILITIES_PKG.Print(
1291: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
1292: END IF;
1293:
1294: l_invoice_amount := ap_utilities_pkg.ap_round_currency(
1295: l_invoice_amount,

Line 1300: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN

1296: p_invoice_currency_code);
1297: END IF;
1298:
1299: debug_info := 'l_invoice_amount is '||l_invoice_amount;
1300: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
1301: AP_IMPORT_UTILITIES_PKG.Print(
1302: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
1303: END IF;
1304:

Line 1302: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

1298:
1299: debug_info := 'l_invoice_amount is '||l_invoice_amount;
1300: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
1301: AP_IMPORT_UTILITIES_PKG.Print(
1302: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
1303: END IF;
1304:
1305: RETURN (l_invoice_amount);
1306:

Line 1675: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

1671: RETURN(TRUE);
1672: --
1673: EXCEPTION
1674: WHEN OTHERS THEN
1675: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1676: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1677: debug_info);
1678: END IF;
1679:

Line 1676: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

1672: --
1673: EXCEPTION
1674: WHEN OTHERS THEN
1675: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1676: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1677: debug_info);
1678: END IF;
1679:
1680: IF (SQLCODE < 0) then

Line 1681: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

1677: debug_info);
1678: END IF;
1679:
1680: IF (SQLCODE < 0) then
1681: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1682: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1683: SQLERRM);
1684: END IF;
1685: END IF;

Line 1682: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

1678: END IF;
1679:
1680: IF (SQLCODE < 0) then
1681: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1682: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1683: SQLERRM);
1684: END IF;
1685: END IF;
1686:

Line 1910: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

1906: RETURN(TRUE);
1907: --
1908: EXCEPTION
1909: WHEN OTHERS THEN
1910: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1911: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1912: debug_info);
1913: END IF;
1914: --

Line 1911: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

1907: --
1908: EXCEPTION
1909: WHEN OTHERS THEN
1910: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1911: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1912: debug_info);
1913: END IF;
1914: --
1915: IF (SQLCODE < 0) then

Line 1916: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

1912: debug_info);
1913: END IF;
1914: --
1915: IF (SQLCODE < 0) then
1916: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1917: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1918: SQLERRM);
1919: END IF;
1920: END IF;

Line 1917: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

1913: END IF;
1914: --
1915: IF (SQLCODE < 0) then
1916: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
1917: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
1918: SQLERRM);
1919: END IF;
1920: END IF;
1921: --

Line 2123: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

2119: current_calling_sequence := 'AP_RETRO_PRICING_PKG.Create_ppa_Invoice'
2120: ||P_Calling_Sequence;
2121: ---------------------------------------------
2122: debug_info := 'Create_Ppa_Invoice Step :1 Open cursor ppa_header';
2123: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2124: AP_IMPORT_UTILITIES_PKG.Print(
2125: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2126: END IF;
2127: ---------------------------------------------

Line 2125: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

2121: ---------------------------------------------
2122: debug_info := 'Create_Ppa_Invoice Step :1 Open cursor ppa_header';
2123: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2124: AP_IMPORT_UTILITIES_PKG.Print(
2125: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2126: END IF;
2127: ---------------------------------------------
2128: OPEN ppa_header;
2129: FETCH ppa_header INTO l_ppa_invoice_rec;

Line 2138: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

2134: CLOSE ppa_header;
2135:
2136: -------------------------------------------
2137: debug_info := 'Create_Ppa_Invoice Step :2 Get meaning';
2138: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2139: AP_IMPORT_UTILITIES_PKG.Print(
2140: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2141: END IF;
2142: -------------------------------------------

Line 2140: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

2136: -------------------------------------------
2137: debug_info := 'Create_Ppa_Invoice Step :2 Get meaning';
2138: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2139: AP_IMPORT_UTILITIES_PKG.Print(
2140: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2141: END IF;
2142: -------------------------------------------
2143: SELECT displayed_field
2144: INTO l_description

Line 2154: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

2150: l_ppa_invoice_rec.invoice_num;
2151:
2152: ----------------------------------------------------------------
2153: debug_info := 'Create_Ppa_Invoice Step :3 Get existing ppa count for the base matched line';
2154: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2155: AP_IMPORT_UTILITIES_PKG.Print(
2156: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2157: END IF;
2158: -----------------------------------------------------------------

Line 2156: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

2152: ----------------------------------------------------------------
2153: debug_info := 'Create_Ppa_Invoice Step :3 Get existing ppa count for the base matched line';
2154: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2155: AP_IMPORT_UTILITIES_PKG.Print(
2156: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2157: END IF;
2158: -----------------------------------------------------------------
2159: SELECT count(*)
2160: INTO l_existing_ppa_count

Line 2189: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

2185: || '-' || substrb(l_ppa_invoice_rec.invoice_num,0,27)
2186: || '-' ||(l_existing_ppa_count + l_temp_ppa_count+1); --bug#9855094
2187:
2188: debug_info := 'l_ppa_invoice_rec.invoice_num is '||l_ppa_invoice_rec.invoice_num;
2189: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2190: AP_IMPORT_UTILITIES_PKG.Print(
2191: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2192: END IF;
2193: -- Removed step 4 and step 5 for bug8514744

Line 2191: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

2187:
2188: debug_info := 'l_ppa_invoice_rec.invoice_num is '||l_ppa_invoice_rec.invoice_num;
2189: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2190: AP_IMPORT_UTILITIES_PKG.Print(
2191: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2192: END IF;
2193: -- Removed step 4 and step 5 for bug8514744
2194: -- Same logic moved to apretrob.pls
2195: ------------------------------------------------

Line 2197: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

2193: -- Removed step 4 and step 5 for bug8514744
2194: -- Same logic moved to apretrob.pls
2195: ------------------------------------------------
2196: debug_info := 'Create_Ppa_Invoice Step :6 Insert into ap_ppa_invoices_gt';
2197: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2198: AP_IMPORT_UTILITIES_PKG.Print(
2199: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2200: END IF;
2201: ------------------------------------------------

Line 2199: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

2195: ------------------------------------------------
2196: debug_info := 'Create_Ppa_Invoice Step :6 Insert into ap_ppa_invoices_gt';
2197: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2198: AP_IMPORT_UTILITIES_PKG.Print(
2199: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2200: END IF;
2201: ------------------------------------------------
2202: INSERT INTO ap_ppa_invoices_gt(
2203: accts_pay_code_combination_id,

Line 2403: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

2399: RETURN(TRUE);
2400: --
2401: EXCEPTION
2402: WHEN OTHERS THEN
2403: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2404: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
2405: debug_info);
2406: END IF;
2407:

Line 2404: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

2400: --
2401: EXCEPTION
2402: WHEN OTHERS THEN
2403: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2404: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
2405: debug_info);
2406: END IF;
2407:
2408: IF (SQLCODE < 0) then

Line 2409: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

2405: debug_info);
2406: END IF;
2407:
2408: IF (SQLCODE < 0) then
2409: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2410: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
2411: SQLERRM);
2412: END IF;
2413: END IF;

Line 2410: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

2406: END IF;
2407:
2408: IF (SQLCODE < 0) then
2409: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
2410: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
2411: SQLERRM);
2412: END IF;
2413: END IF;
2414: --