DBA Data[Home] [Help]

APPS.OKC_PRICE_PVT dependencies on OKC_DEBUG

Line 26: okc_debug.Log(p_msg,p_level,p_module);

22:
23: Procedure my_debug(p_msg varchar2,p_level NUMBER DEFAULT 1, p_module IN Varchar2 Default 'OKC') IS
24: BEGIN
25: IF (l_debug = 'Y') THEN
26: okc_debug.Log(p_msg,p_level,p_module);
27: END IF;
28: --dbms_output.put_line(substr(p_msg,1,240));
29: --dbms_output.put_line(p_msg);
30: END my_debug;

Line 38: okc_debug.Set_Indentation('Set_control_rec');

34: ------------------------------------------------------------------------------
35: Procedure Set_control_rec(px_control_rec IN OUT NOCOPY OKC_CONTROL_REC_TYPE) IS
36: BEGIN
37: IF (l_debug = 'Y') THEN
38: okc_debug.Set_Indentation('Set_control_rec');
39: END IF;
40: IF (l_debug = 'Y') THEN
41: my_debug('100 : Entering Set_control_rec', 2);
42: END IF;

Line 104: okc_debug.Reset_Indentation;

100: IF (l_debug = 'Y') THEN
101: my_debug('900 : Exiting Set_control_rec', 2);
102: END IF;
103: IF (l_debug = 'Y') THEN
104: okc_debug.Reset_Indentation;
105: END IF;
106: END Set_control_rec;
107:
108: -------------------------Called from form---------------------------------------------------

Line 195: okc_debug.Set_Indentation('Update_line_PRICE');

191: l_patv_tbl OKC_PRICE_ADJUSTMENT_PUB.patv_tbl_type;
192: lx_patv_tbl OKC_PRICE_ADJUSTMENT_PUB.patv_tbl_type;
193: BEGIN
194: IF (l_debug = 'Y') THEN
195: okc_debug.Set_Indentation('Update_line_PRICE');
196: END IF;
197: IF (l_debug = 'Y') THEN
198: my_debug('1000 : Entering Update_line_PRICE', 2);
199: END IF;

Line 679: okc_debug.Reset_Indentation;

675: IF (l_debug = 'Y') THEN
676: my_debug('1600 : Exiting Update_line_PRICE', 2);
677: END IF;
678: IF (l_debug = 'Y') THEN
679: okc_debug.Reset_Indentation;
680: END IF;
681: EXCEPTION
682: WHEN OKC_API.G_EXCEPTION_ERROR THEN
683: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 694: okc_debug.Reset_Indentation;

690: IF (l_debug = 'Y') THEN
691: my_debug('1700 : Exiting Update_line_PRICE', 4);
692: END IF;
693: IF (l_debug = 'Y') THEN
694: okc_debug.Reset_Indentation;
695: END IF;
696:
697: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
698: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 709: okc_debug.Reset_Indentation;

705: IF (l_debug = 'Y') THEN
706: my_debug('1800 : Exiting Update_line_PRICE', 4);
707: END IF;
708: IF (l_debug = 'Y') THEN
709: okc_debug.Reset_Indentation;
710: END IF;
711:
712: WHEN OTHERS THEN
713: OKC_API.set_message(p_app_name => g_app_name,

Line 724: okc_debug.Reset_Indentation;

720: IF (l_debug = 'Y') THEN
721: my_debug('1900 : Exiting Update_line_PRICE', 4);
722: END IF;
723: IF (l_debug = 'Y') THEN
724: okc_debug.Reset_Indentation;
725: END IF;
726:
727: END Update_line_price;
728:

Line 990: okc_debug.Set_Indentation('Update_CONTRACT_price');

986: l_req_line_detail_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
987: l_req_related_line_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
988: BEGIN
989: IF (l_debug = 'Y') THEN
990: okc_debug.Set_Indentation('Update_CONTRACT_price');
991: END IF;
992: IF (l_debug = 'Y') THEN
993: my_debug('2000 : Entering Update_CONTRACT_price', 2);
994: END IF;

Line 1399: okc_debug.Reset_Indentation;

1395: IF (l_debug = 'Y') THEN
1396: my_debug('2600 : Exiting Update_Contract_price', 2);
1397: END IF;
1398: IF (l_debug = 'Y') THEN
1399: okc_debug.Reset_Indentation;
1400: END IF;
1401:
1402:
1403: EXCEPTION

Line 1410: okc_debug.Reset_Indentation;

1406: IF (l_debug = 'Y') THEN
1407: my_debug('2690 : Exiting Update_Contract_price', 4);
1408: END IF;
1409: IF (l_debug = 'Y') THEN
1410: okc_debug.Reset_Indentation;
1411: END IF;
1412:
1413: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1414: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1425: okc_debug.Reset_Indentation;

1421: IF (l_debug = 'Y') THEN
1422: my_debug('2700 : Exiting Update_Contract_price', 4);
1423: END IF;
1424: IF (l_debug = 'Y') THEN
1425: okc_debug.Reset_Indentation;
1426: END IF;
1427:
1428: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1429: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1440: okc_debug.Reset_Indentation;

1436: IF (l_debug = 'Y') THEN
1437: my_debug('2800 : Exiting Update_Contract_price', 4);
1438: END IF;
1439: IF (l_debug = 'Y') THEN
1440: okc_debug.Reset_Indentation;
1441: END IF;
1442:
1443: WHEN OTHERS THEN
1444: OKC_API.set_message(p_app_name => g_app_name,

Line 1455: okc_debug.Reset_Indentation;

1451: IF (l_debug = 'Y') THEN
1452: my_debug('2900 : Exiting Update_Contract_price', 4);
1453: END IF;
1454: IF (l_debug = 'Y') THEN
1455: okc_debug.Reset_Indentation;
1456: END IF;
1457:
1458: END Update_Contract_price;
1459:

Line 1476: okc_debug.Set_Indentation('Get_LSE_SOURCE_VALUE');

1472: RETURN VARCHAR2 IS
1473: i NUMBER:=0;
1474: Begin
1475: IF (l_debug = 'Y') THEN
1476: okc_debug.Set_Indentation('Get_LSE_SOURCE_VALUE');
1477: END IF;
1478: IF (l_debug = 'Y') THEN
1479: my_debug('3000 : Entering Get_LSE_SOURCE_VALUE', 2);
1480: END IF;

Line 1490: okc_debug.Reset_Indentation;

1486: IF (l_debug = 'Y') THEN
1487: my_debug('3300 : Exiting Get_LSE_SOURCE_VALUE', 2);
1488: END IF;
1489: IF (l_debug = 'Y') THEN
1490: okc_debug.Reset_Indentation;
1491: END IF;
1492:
1493: return p_lse_tbl(i).source_value;
1494:

Line 1504: okc_debug.Reset_Indentation;

1500: IF (l_debug = 'Y') THEN
1501: my_debug('3400 : Exiting Get_LSE_SOURCE_VALUE', 2);
1502: END IF;
1503: IF (l_debug = 'Y') THEN
1504: okc_debug.Reset_Indentation;
1505: END IF;
1506:
1507: return null;
1508:

Line 1518: okc_debug.Reset_Indentation;

1514: my_debug('3470 :msg:'||sqlerrm,1);
1515: my_debug('3500 : Exiting Get_LSE_SOURCE_VALUE', 4);
1516: END IF;
1517: IF (l_debug = 'Y') THEN
1518: okc_debug.Reset_Indentation;
1519: END IF;
1520:
1521: RETURN NULL;
1522: END Get_LSE_SOURCE_VALUE;

Line 1542: okc_debug.Set_Indentation('GET_RUL_SOURCE_VALUE');

1538: RETURN VARCHAR2 IS
1539: i NUMBER:=0;
1540: Begin
1541: IF (l_debug = 'Y') THEN
1542: okc_debug.Set_Indentation('GET_RUL_SOURCE_VALUE');
1543: END IF;
1544: IF (l_debug = 'Y') THEN
1545: my_debug('3600 : Entering GET_RUL_SOURCE_VALUE', 2);
1546: my_debug('3610 :looking for code'||p_registered_code, 1);

Line 1570: okc_debug.Reset_Indentation;

1566: IF (l_debug = 'Y') THEN
1567: my_debug('3700 : Exiting GET_RUL_SOURCE_VALUE', 2);
1568: END IF;
1569: IF (l_debug = 'Y') THEN
1570: okc_debug.Reset_Indentation;
1571: END IF;
1572:
1573: return p_rul_tbl(i).source_value;
1574: End If;

Line 1587: okc_debug.Reset_Indentation;

1583: IF (l_debug = 'Y') THEN
1584: my_debug('3800 : Exiting GET_RUL_SOURCE_VALUE', 2);
1585: END IF;
1586: IF (l_debug = 'Y') THEN
1587: okc_debug.Reset_Indentation;
1588: END IF;
1589:
1590: return null;
1591:

Line 1601: okc_debug.Reset_Indentation;

1597: my_debug('3870 :msg:'||sqlerrm,1);
1598: my_debug('3900 : Exiting GET_RUL_SOURCE_VALUE', 4);
1599: END IF;
1600: IF (l_debug = 'Y') THEN
1601: okc_debug.Reset_Indentation;
1602: END IF;
1603:
1604: RETURN NULL;
1605: END Get_RUL_SOURCE_VALUE;

Line 1625: okc_debug.Set_Indentation('Get_PRLE_SOURCE_VALUE');

1621: RETURN VARCHAR2 IS
1622: i NUMBER:=0;
1623: Begin
1624: IF (l_debug = 'Y') THEN
1625: okc_debug.Set_Indentation('Get_PRLE_SOURCE_VALUE');
1626: END IF;
1627: IF (l_debug = 'Y') THEN
1628: my_debug('4000 : Entering Get_PRLE_SOURCE_VALUE', 2);
1629: END IF;

Line 1639: okc_debug.Reset_Indentation;

1635: IF (l_debug = 'Y') THEN
1636: my_debug('4100 : Exiting Get_PRLE_SOURCE_VALUE', 2);
1637: END IF;
1638: IF (l_debug = 'Y') THEN
1639: okc_debug.Reset_Indentation;
1640: END IF;
1641:
1642: return p_prle_tbl(i).source_value;
1643: End If;

Line 1652: okc_debug.Reset_Indentation;

1648: IF (l_debug = 'Y') THEN
1649: my_debug('4200 : Exiting Get_PRLE_SOURCE_VALUE', 2);
1650: END IF;
1651: IF (l_debug = 'Y') THEN
1652: okc_debug.Reset_Indentation;
1653: END IF;
1654:
1655: return null;
1656:

Line 1666: okc_debug.Reset_Indentation;

1662: my_debug('4270 :msg:'||sqlerrm,1);
1663: my_debug('4300 : Exiting Get_PRLE_SOURCE_VALUE', 4);
1664: END IF;
1665: IF (l_debug = 'Y') THEN
1666: okc_debug.Reset_Indentation;
1667: END IF;
1668:
1669: RETURN NULL;
1670: END Get_PRLE_SOURCE_VALUE;

Line 1687: okc_debug.Set_Indentation('Add_TO_GLOBAL_LSE_TBL');

1683: i number :=0;
1684: l_already_there Exception;
1685: Begin
1686: IF (l_debug = 'Y') THEN
1687: okc_debug.Set_Indentation('Add_TO_GLOBAL_LSE_TBL');
1688: END IF;
1689: IF (l_debug = 'Y') THEN
1690: my_debug('4400 : Entering Add_TO_GLOBAL_LSE_TBL', 2);
1691: END IF;

Line 1713: okc_debug.Reset_Indentation;

1709: IF (l_debug = 'Y') THEN
1710: my_debug('4500 : Exiting Add_TO_GLOBAL_LSE_TBL', 2);
1711: END IF;
1712: IF (l_debug = 'Y') THEN
1713: okc_debug.Reset_Indentation;
1714: END IF;
1715:
1716: return l_return_status;
1717: EXCEPTION

Line 1728: okc_debug.Reset_Indentation;

1724: IF (l_debug = 'Y') THEN
1725: my_debug('4600 : Exiting Add_TO_GLOBAL_LSE_TBL', 4);
1726: END IF;
1727: IF (l_debug = 'Y') THEN
1728: okc_debug.Reset_Indentation;
1729: END IF;
1730:
1731: return l_return_status;
1732: when others then

Line 1750: okc_debug.Reset_Indentation;

1746: IF (l_debug = 'Y') THEN
1747: my_debug('4700 : Exiting Add_TO_GLOBAL_LSE_TBL', 2);
1748: END IF;
1749: IF (l_debug = 'Y') THEN
1750: okc_debug.Reset_Indentation;
1751: END IF;
1752:
1753: return l_return_status;
1754: End Add_TO_GLOBAL_LSE_TBL;

Line 1773: okc_debug.Set_Indentation('Add_TO_GLOBAL_TBL');

1769: i number :=0;
1770: l_already_there Exception;
1771: Begin
1772: IF (l_debug = 'Y') THEN
1773: okc_debug.Set_Indentation('Add_TO_GLOBAL_TBL');
1774: END IF;
1775: IF (l_debug = 'Y') THEN
1776: my_debug('4800 : Entering Add_TO_GLOBAL_TBL', 2);
1777: END IF;

Line 1801: okc_debug.Reset_Indentation;

1797: IF (l_debug = 'Y') THEN
1798: my_debug('4900 : Exiting Add_TO_GLOBAL_TBL', 2);
1799: END IF;
1800: IF (l_debug = 'Y') THEN
1801: okc_debug.Reset_Indentation;
1802: END IF;
1803:
1804: return l_return_status;
1805: EXCEPTION

Line 1817: okc_debug.Reset_Indentation;

1813: IF (l_debug = 'Y') THEN
1814: my_debug('5000 : Exiting Add_TO_GLOBAL_TBL', 4);
1815: END IF;
1816: IF (l_debug = 'Y') THEN
1817: okc_debug.Reset_Indentation;
1818: END IF;
1819:
1820: return l_return_status;
1821: when others then

Line 1839: okc_debug.Reset_Indentation;

1835: IF (l_debug = 'Y') THEN
1836: my_debug('5100 : Exiting Add_TO_GLOBAL_TBL', 4);
1837: END IF;
1838: IF (l_debug = 'Y') THEN
1839: okc_debug.Reset_Indentation;
1840: END IF;
1841:
1842: return l_return_status;
1843: End Add_TO_GLOBAL_TBL;

Line 1923: okc_debug.Set_Indentation('Attach_Rules');

1919: l_rul_rec global_rprle_rec_type;
1920: l_rul_data l_rul_csr%rowtype;
1921: BEGIN
1922: IF (l_debug = 'Y') THEN
1923: okc_debug.Set_Indentation('Attach_Rules');
1924: END IF;
1925: IF (l_debug = 'Y') THEN
1926: my_debug('5200 : Entering Attach_Rules', 2);
1927: END IF;

Line 1992: okc_debug.Reset_Indentation;

1988: IF (l_debug = 'Y') THEN
1989: my_debug('5700 : Exiting Attach_Rules', 2);
1990: END IF;
1991: IF (l_debug = 'Y') THEN
1992: okc_debug.Reset_Indentation;
1993: END IF;
1994:
1995: return l_return_status;
1996:

Line 2008: okc_debug.Reset_Indentation;

2004: IF (l_debug = 'Y') THEN
2005: my_debug('5800 : Exiting Attach_Rules', 4);
2006: END IF;
2007: IF (l_debug = 'Y') THEN
2008: okc_debug.Reset_Indentation;
2009: END IF;
2010:
2011: return l_return_status;
2012: when others then

Line 2029: okc_debug.Reset_Indentation;

2025: IF (l_debug = 'Y') THEN
2026: my_debug('5900 : Exiting Attach_Rules', 4);
2027: END IF;
2028: IF (l_debug = 'Y') THEN
2029: okc_debug.Reset_Indentation;
2030: END IF;
2031:
2032: return l_return_status;
2033: END Attach_rules;

Line 2058: okc_debug.Set_Indentation('Attach_party_roles');

2054: l_return_status varchar2(1):=OKC_API.G_RET_STS_SUCCESS;
2055: l_prle_rec global_rprle_rec_type;
2056: BEGIN
2057: IF (l_debug = 'Y') THEN
2058: okc_debug.Set_Indentation('Attach_party_roles');
2059: END IF;
2060: IF (l_debug = 'Y') THEN
2061: my_debug('6000 : Entering Attach_party_roles', 2);
2062: END IF;

Line 2105: okc_debug.Reset_Indentation;

2101: IF (l_debug = 'Y') THEN
2102: my_debug('6700 : Exiting Attach_party_roles',2);
2103: END IF;
2104: IF (l_debug = 'Y') THEN
2105: okc_debug.Reset_Indentation;
2106: END IF;
2107:
2108: return l_return_status;
2109: -- --dbms_output.put_line('attach_party_roles');

Line 2121: okc_debug.Reset_Indentation;

2117: IF (l_debug = 'Y') THEN
2118: my_debug('6800 : Exiting Attach_party_roles', 4);
2119: END IF;
2120: IF (l_debug = 'Y') THEN
2121: okc_debug.Reset_Indentation;
2122: END IF;
2123:
2124: return l_return_status;
2125: when others then

Line 2142: okc_debug.Reset_Indentation;

2138: IF (l_debug = 'Y') THEN
2139: my_debug('6900 : Exiting Attach_party_roles', 4);
2140: END IF;
2141: IF (l_debug = 'Y') THEN
2142: okc_debug.Reset_Indentation;
2143: END IF;
2144:
2145: return l_return_status;
2146: END Attach_party_roles;

Line 2168: okc_debug.Set_Indentation('IS_ALREADY_THERE');

2164: i pls_integer;
2165: l_return_flag varchar2(1):='N';
2166: BEGIN
2167: IF (l_debug = 'Y') THEN
2168: okc_debug.Set_Indentation('IS_ALREADY_THERE');
2169: END IF;
2170: IF (l_debug = 'Y') THEN
2171: my_debug('7000 : Entering IS_ALREADY_THERE', 2);
2172: END IF;

Line 2185: okc_debug.Reset_Indentation;

2181: IF (l_debug = 'Y') THEN
2182: my_debug('7050 : Exiting IS_ALREADY_THERE', 2);
2183: END IF;
2184: IF (l_debug = 'Y') THEN
2185: okc_debug.Reset_Indentation;
2186: END IF;
2187:
2188: return 'Y';
2189: END IF;

Line 2204: okc_debug.Reset_Indentation;

2200: IF (l_debug = 'Y') THEN
2201: my_debug('7100 : Exiting IS_ALREADY_THERE', 2);
2202: END IF;
2203: IF (l_debug = 'Y') THEN
2204: okc_debug.Reset_Indentation;
2205: END IF;
2206:
2207: return 'Y';
2208: END IF;

Line 2217: okc_debug.Reset_Indentation;

2213: IF (l_debug = 'Y') THEN
2214: my_debug('7200 : Exiting IS_ALREADY_THERE', 2);
2215: END IF;
2216: IF (l_debug = 'Y') THEN
2217: okc_debug.Reset_Indentation;
2218: END IF;
2219:
2220: return l_return_flag;
2221: END IS_ALREADY_THERE;

Line 2244: okc_debug.Set_Indentation('copy_attribs_to_Req');

2240: l_attr_index pls_integer := nvl(px_Req_line_attr_tbl.last,0);
2241: l_qual_index pls_integer := nvl(px_Req_qual_tbl.last,0);
2242: begin
2243: IF (l_debug = 'Y') THEN
2244: okc_debug.Set_Indentation('copy_attribs_to_Req');
2245: END IF;
2246: IF (l_debug = 'Y') THEN
2247: my_debug('7300 : Entering copy_attribs_to_Req', 2);
2248: my_debug('7302 : p_line_index'||p_line_index, 1);

Line 2315: okc_debug.Reset_Indentation;

2311: IF (l_debug = 'Y') THEN
2312: my_debug('7500 : Exiting copy_attribs_to_Req', 2);
2313: END IF;
2314: IF (l_debug = 'Y') THEN
2315: okc_debug.Reset_Indentation;
2316: END IF;
2317:
2318: end copy_attribs_to_Req;
2319:

Line 2345: okc_debug.Set_Indentation('copy_attribs');

2341: l_qual_index pls_integer := nvl(px_Req_qual_tbl.last,0);
2342: new_line_index number;
2343: begin
2344: IF (l_debug = 'Y') THEN
2345: okc_debug.Set_Indentation('copy_attribs');
2346: END IF;
2347: IF (l_debug = 'Y') THEN
2348: my_debug('7600 : Entering copy_attribs', 2);
2349: END IF;

Line 2509: okc_debug.Reset_Indentation;

2505: IF (l_debug = 'Y') THEN
2506: my_debug('7900 : Exiting copy_attribs', 2);
2507: END IF;
2508: IF (l_debug = 'Y') THEN
2509: okc_debug.Reset_Indentation;
2510: END IF;
2511:
2512: end copy_ATTRIBS;
2513:

Line 2652: --okc_debug.Set_Indentation('Load_Tbl');

2648: p_prc_attr Varchar2,
2649: p_prc_attr_value Varchar2) Is
2650: i NUMBER;
2651: Begin
2652: --okc_debug.Set_Indentation('Load_Tbl');
2653: --my_debug('8000 : Entering Load_Tbl', 2);
2654: If p_prc_attr_value Is Not Null
2655: and (UPPER(substr(p_prc_attr,1,1))= 'P' )
2656: Then

Line 2676: -- okc_debug.Reset_Indentation;

2672: px_Req_qual_tbl(i).qualifier_attr_Value_From :=p_prc_attr_value;
2673:
2674: End If;
2675: -- my_debug('8200 : Exiting Load_Tbl', 2);
2676: -- okc_debug.Reset_Indentation;
2677:
2678: End;
2679: BEGIN
2680: IF (l_debug = 'Y') THEN

Line 2681: okc_debug.Set_Indentation('Load_User_Defined_Pattrs');

2677:
2678: End;
2679: BEGIN
2680: IF (l_debug = 'Y') THEN
2681: okc_debug.Set_Indentation('Load_User_Defined_Pattrs');
2682: END IF;
2683: IF (l_debug = 'Y') THEN
2684: my_debug('8300 : Entering Load_User_Defined_Pattrs', 2);
2685: END IF;

Line 2914: okc_debug.Reset_Indentation;

2910: IF (l_debug = 'Y') THEN
2911: my_debug('8700 : Exiting Load_User_Defined_Pattrs', 2);
2912: END IF;
2913: IF (l_debug = 'Y') THEN
2914: okc_debug.Reset_Indentation;
2915: END IF;
2916:
2917:
2918: EXCEPTION

Line 2936: okc_debug.Reset_Indentation;

2932: IF (l_debug = 'Y') THEN
2933: my_debug('8800 : Exiting Load_User_Defined_Pattrs', 4);
2934: END IF;
2935: IF (l_debug = 'Y') THEN
2936: okc_debug.Reset_Indentation;
2937: END IF;
2938:
2939: END Load_User_Defined_Pattrs;
2940:

Line 2969: okc_debug.Set_Indentation('BUILD_CHR_CONTEXT');

2965: l_count pls_integer := 0;
2966: i pls_integer;
2967: Begin
2968: IF (l_debug = 'Y') THEN
2969: okc_debug.Set_Indentation('BUILD_CHR_CONTEXT');
2970: END IF;
2971: IF (l_debug = 'Y') THEN
2972: my_debug('9000 : Entering BUILD_CHR_CONTEXT', 2);
2973: END IF;

Line 3160: okc_debug.Reset_Indentation;

3156: IF (l_debug = 'Y') THEN
3157: my_debug('9600 : Exiting BUILD_CHR_CONTEXT', 2);
3158: END IF;
3159: IF (l_debug = 'Y') THEN
3160: okc_debug.Reset_Indentation;
3161: END IF;
3162:
3163: EXCEPTION
3164:

Line 3177: okc_debug.Reset_Indentation;

3173: IF (l_debug = 'Y') THEN
3174: my_debug('9700 : Exiting BUILD_CHR_CONTEXT', 4);
3175: END IF;
3176: IF (l_debug = 'Y') THEN
3177: okc_debug.Reset_Indentation;
3178: END IF;
3179:
3180: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3181: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 3192: okc_debug.Reset_Indentation;

3188: IF (l_debug = 'Y') THEN
3189: my_debug('9800 : Exiting BUILD_CHR_CONTEXT', 4);
3190: END IF;
3191: IF (l_debug = 'Y') THEN
3192: okc_debug.Reset_Indentation;
3193: END IF;
3194:
3195: WHEN OTHERS THEN
3196: OKC_API.set_message(p_app_name => g_app_name,

Line 3207: okc_debug.Reset_Indentation;

3203: IF (l_debug = 'Y') THEN
3204: my_debug('9900 : Exiting BUILD_CHR_CONTEXT', 4);
3205: END IF;
3206: IF (l_debug = 'Y') THEN
3207: okc_debug.Reset_Indentation;
3208: END IF;
3209:
3210: END BUILD_CHR_CONTEXT;
3211:

Line 3269: okc_debug.Set_Indentation('get_line_ids');

3265: i pls_integer :=0;
3266: l_item_row1 l_item_csr1%rowtype;
3267: BEGIN
3268: IF (l_debug = 'Y') THEN
3269: okc_debug.Set_Indentation('get_line_ids');
3270: END IF;
3271: IF (l_debug = 'Y') THEN
3272: my_debug('10000 : Entering get_line_ids', 2);
3273: END IF;

Line 3421: okc_debug.Reset_Indentation;

3417: IF (l_debug = 'Y') THEN
3418: my_debug('10700 : Exiting get_line_ids', 2);
3419: END IF;
3420: IF (l_debug = 'Y') THEN
3421: okc_debug.Reset_Indentation;
3422: END IF;
3423:
3424:
3425: EXCEPTION

Line 3436: okc_debug.Reset_Indentation;

3432: IF (l_debug = 'Y') THEN
3433: my_debug('10800 : Exiting get_line_ids', 4);
3434: END IF;
3435: IF (l_debug = 'Y') THEN
3436: okc_debug.Reset_Indentation;
3437: END IF;
3438:
3439: when others then
3440: OKC_API.set_message(p_app_name => g_app_name,

Line 3454: okc_debug.Reset_Indentation;

3450: IF (l_debug = 'Y') THEN
3451: my_debug('10900 : Exiting get_line_ids', 4);
3452: END IF;
3453: IF (l_debug = 'Y') THEN
3454: okc_debug.Reset_Indentation;
3455: END IF;
3456:
3457: END get_line_ids;
3458:

Line 3507: okc_debug.Set_Indentation('BUILD_CLE_CONTEXT');

3503: and status='A'
3504: and organization_id=g_authoring_org_id;
3505: Begin
3506: IF (l_debug = 'Y') THEN
3507: okc_debug.Set_Indentation('BUILD_CLE_CONTEXT');
3508: END IF;
3509: IF (l_debug = 'Y') THEN
3510: my_debug('11000 : Entering BUILD_CLE_CONTEXT', 2);
3511: END IF;

Line 3976: okc_debug.Reset_Indentation;

3972: IF (l_debug = 'Y') THEN
3973: my_debug('11600 : Exiting BUILD_CLE_CONTEXT', 2);
3974: END IF;
3975: IF (l_debug = 'Y') THEN
3976: okc_debug.Reset_Indentation;
3977: END IF;
3978: EXCEPTION
3979: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3980: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 3991: okc_debug.Reset_Indentation;

3987: IF (l_debug = 'Y') THEN
3988: my_debug('11700 : Exiting BUILD_CLE_CONTEXT', 4);
3989: END IF;
3990: IF (l_debug = 'Y') THEN
3991: okc_debug.Reset_Indentation;
3992: END IF;
3993:
3994: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3995: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 4006: okc_debug.Reset_Indentation;

4002: IF (l_debug = 'Y') THEN
4003: my_debug('11800 : Exiting BUILD_CLE_CONTEXT', 4);
4004: END IF;
4005: IF (l_debug = 'Y') THEN
4006: okc_debug.Reset_Indentation;
4007: END IF;
4008:
4009: WHEN OTHERS THEN
4010: OKC_API.set_message(p_app_name => g_app_name,

Line 4021: okc_debug.Reset_Indentation;

4017: IF (l_debug = 'Y') THEN
4018: my_debug('11900 : Exiting BUILD_CLE_CONTEXT', 4);
4019: END IF;
4020: IF (l_debug = 'Y') THEN
4021: okc_debug.Reset_Indentation;
4022: END IF;
4023:
4024: END BUILD_CLE_CONTEXT;
4025:

Line 4056: okc_debug.Set_Indentation('Create_request_line');

4052: l_line_tbl line_tbl_type := p_line_tbl;
4053: l_num_loops number :=2;
4054: BEGIN
4055: IF (l_debug = 'Y') THEN
4056: okc_debug.Set_Indentation('Create_request_line');
4057: END IF;
4058: IF (l_debug = 'Y') THEN
4059: my_debug('12000 : Entering Create_request_line', 2);
4060: END IF;

Line 4232: okc_debug.Reset_Indentation;

4228: IF (l_debug = 'Y') THEN
4229: my_debug('12800 : Exiting Create_request_line', 2);
4230: END IF;
4231: IF (l_debug = 'Y') THEN
4232: okc_debug.Reset_Indentation;
4233: END IF;
4234:
4235: EXCEPTION
4236: when others then

Line 4248: okc_debug.Reset_Indentation;

4244: IF (l_debug = 'Y') THEN
4245: my_debug('12900 : Exiting Create_request_line', 4);
4246: END IF;
4247: IF (l_debug = 'Y') THEN
4248: okc_debug.Reset_Indentation;
4249: END IF;
4250:
4251: END CREATE_REQUEST_LINE;
4252:

Line 4288: okc_debug.Set_Indentation('Create_request_line_service');

4284: i pls_integer :=0;
4285: p_list_id VARCHAR2(30);
4286: BEGIN
4287: IF (l_debug = 'Y') THEN
4288: okc_debug.Set_Indentation('Create_request_line_service');
4289: END IF;
4290: IF (l_debug = 'Y') THEN
4291: my_debug('12000 : Entering Create_request_line_service', 2);
4292: END IF;

Line 4439: okc_debug.Reset_Indentation;

4435: IF (l_debug = 'Y') THEN
4436: my_debug('12800 : Exiting Create_request_line_service', 2);
4437: END IF;
4438: IF (l_debug = 'Y') THEN
4439: okc_debug.Reset_Indentation;
4440: END IF;
4441:
4442: EXCEPTION
4443: when others then

Line 4455: okc_debug.Reset_Indentation;

4451: IF (l_debug = 'Y') THEN
4452: my_debug('12900 : Exiting Create_request_line', 4);
4453: END IF;
4454: IF (l_debug = 'Y') THEN
4455: okc_debug.Reset_Indentation;
4456: END IF;
4457:
4458: END CREATE_REQUEST_LINE_service;
4459:

Line 4543: okc_debug.Set_Indentation('clean_adj_assocs');

4539:
4540: l_id_tbl num_tbl_type;
4541: BEGIN
4542: IF (l_debug = 'Y') THEN
4543: okc_debug.Set_Indentation('clean_adj_assocs');
4544: END IF;
4545: IF (l_debug = 'Y') THEN
4546: my_debug('13300 : Entering clean_adj_assocs', 2);
4547: END IF;

Line 4578: okc_debug.Reset_Indentation;

4574: IF (l_debug = 'Y') THEN
4575: my_debug('13400 : Exiting clean_adj_assocs', 2);
4576: END IF;
4577: IF (l_debug = 'Y') THEN
4578: okc_debug.Reset_Indentation;
4579: END IF;
4580:
4581: return (l_return_status);
4582: EXCEPTION

Line 4595: okc_debug.Reset_Indentation;

4591: IF (l_debug = 'Y') THEN
4592: my_debug('13500 : Exiting clean_adj_assocs', 4);
4593: END IF;
4594: IF (l_debug = 'Y') THEN
4595: okc_debug.Reset_Indentation;
4596: END IF;
4597:
4598: return (l_return_status);
4599:

Line 4610: okc_debug.Set_Indentation('clean_adj_attrib');

4606:
4607: l_id_tbl num_tbl_type;
4608: BEGIN
4609: IF (l_debug = 'Y') THEN
4610: okc_debug.Set_Indentation('clean_adj_attrib');
4611: END IF;
4612: IF (l_debug = 'Y') THEN
4613: my_debug('13600 : Entering clean_adj_attrib', 2);
4614: END IF;

Line 4645: okc_debug.Reset_Indentation;

4641: IF (l_debug = 'Y') THEN
4642: my_debug('13700 : Exiting clean_adj_attrib', 2);
4643: END IF;
4644: IF (l_debug = 'Y') THEN
4645: okc_debug.Reset_Indentation;
4646: END IF;
4647:
4648: return (l_return_status);
4649: EXCEPTION

Line 4662: okc_debug.Reset_Indentation;

4658: IF (l_debug = 'Y') THEN
4659: my_debug('13800 : Exiting clean_adj_attrib', 4);
4660: END IF;
4661: IF (l_debug = 'Y') THEN
4662: okc_debug.Reset_Indentation;
4663: END IF;
4664:
4665: return (l_return_status);
4666:

Line 4677: okc_debug.Set_Indentation('create_adj_attrib');

4673: j pls_integer :=0;
4674: l_is_there boolean :=false;
4675: BEGIN
4676: IF (l_debug = 'Y') THEN
4677: okc_debug.Set_Indentation('create_adj_attrib');
4678: END IF;
4679: IF (l_debug = 'Y') THEN
4680: my_debug('14000 : Entering create_adj_attrib', 2);
4681: END IF;

Line 4809: okc_debug.Reset_Indentation;

4805: IF (l_debug = 'Y') THEN
4806: my_debug('14500 : Exiting create_adj_attrib', 2);
4807: END IF;
4808: IF (l_debug = 'Y') THEN
4809: okc_debug.Reset_Indentation;
4810: END IF;
4811:
4812: return l_return_status;
4813: EXCEPTION

Line 4826: okc_debug.Reset_Indentation;

4822: IF (l_debug = 'Y') THEN
4823: my_debug('14600 : Exiting create_adj_attrib', 4);
4824: END IF;
4825: IF (l_debug = 'Y') THEN
4826: okc_debug.Reset_Indentation;
4827: END IF;
4828:
4829: return (l_return_status);
4830:

Line 4845: okc_debug.Set_Indentation('LOAD_ADJ_LINES');

4841: px_patv_rec IN OUT NOCOPY OKC_PRICE_ADJUSTMENT_PUB.patv_rec_type
4842: ) IS
4843: Begin
4844: IF (l_debug = 'Y') THEN
4845: okc_debug.Set_Indentation('LOAD_ADJ_LINES');
4846: END IF;
4847: IF (l_debug = 'Y') THEN
4848: my_debug('13000 : Entering LOAD_ADJ_LINES', 2);
4849: END IF;

Line 4891: okc_debug.Reset_Indentation;

4887: IF (l_debug = 'Y') THEN
4888: my_debug('13200 : Exiting LOAD_ADJ_LINES', 2);
4889: END IF;
4890: IF (l_debug = 'Y') THEN
4891: okc_debug.Reset_Indentation;
4892: END IF;
4893:
4894: END LOAD_ADJ_LINES;
4895: --Added for pricing of service lines

Line 4965: okc_debug.Set_Indentation('PROCESS_ADJUSTMENT_DETAILS');

4961:
4962:
4963: BEGIN
4964: IF (l_debug = 'Y') THEN
4965: okc_debug.Set_Indentation('PROCESS_ADJUSTMENT_DETAILS');
4966: END IF;
4967: IF (l_debug = 'Y') THEN
4968: my_debug('14700 : Entering PROCESS_ADJUSTMENT_DETAILS', 2);
4969: my_debug('14702 : chr_id'||p_chr_id, 1);

Line 5429: okc_debug.Reset_Indentation;

5425: END IF;
5426:
5427:
5428: IF (l_debug = 'Y') THEN
5429: okc_debug.Reset_Indentation;
5430: END IF;
5431:
5432: EXCEPTION
5433: when l_exception_stop then

Line 5439: okc_debug.Reset_Indentation;

5435: IF (l_debug = 'Y') THEN
5436: my_debug('14850 : Exiting PROCESS_ADJUSTMENT_DETAILS', 4);
5437: END IF;
5438: IF (l_debug = 'Y') THEN
5439: okc_debug.Reset_Indentation;
5440: END IF;
5441:
5442: When others then
5443: --dbms_output.put_line('came here'||sqlcode||substr(sqlerrm,1,235));

Line 5455: okc_debug.Reset_Indentation;

5451: IF (l_debug = 'Y') THEN
5452: my_debug('14900 : Exiting PROCESS_ADJUSTMENT_DETAILS', 4);
5453: END IF;
5454: IF (l_debug = 'Y') THEN
5455: okc_debug.Reset_Indentation;
5456: END IF;
5457:
5458:
5459: END PROCESS_ADJUSTMENT_DETAILS;

Line 5540: okc_debug.Set_Indentation('PROCESS_ADJUSTMENTS');

5536:
5537:
5538: BEGIN
5539: IF (l_debug = 'Y') THEN
5540: okc_debug.Set_Indentation('PROCESS_ADJUSTMENTS');
5541: END IF;
5542: IF (l_debug = 'Y') THEN
5543: my_debug('15000 : Entering PROCESS_ADJUSTMENTS', 2);
5544: END IF;

Line 6037: okc_debug.Reset_Indentation;

6033: IF (l_debug = 'Y') THEN
6034: my_debug('15700 : Exiting PROCESS_ADJUSTMENTS', 2);
6035: END IF;
6036: IF (l_debug = 'Y') THEN
6037: okc_debug.Reset_Indentation;
6038: END IF;
6039:
6040: EXCEPTION
6041: When l_exception_stop then

Line 6047: okc_debug.Reset_Indentation;

6043: IF (l_debug = 'Y') THEN
6044: my_debug('15800 : Exiting PROCESS_ADJUSTMENTS', 4);
6045: END IF;
6046: IF (l_debug = 'Y') THEN
6047: okc_debug.Reset_Indentation;
6048: END IF;
6049:
6050: When others then
6051: --dbms_output.put_line('came here'||sqlcode||substr(sqlerrm,1,235));

Line 6063: okc_debug.Reset_Indentation;

6059: IF (l_debug = 'Y') THEN
6060: my_debug('15900 : Exiting PROCESS_ADJUSTMENTS', 4);
6061: END IF;
6062: IF (l_debug = 'Y') THEN
6063: okc_debug.Reset_Indentation;
6064: END IF;
6065:
6066: END PROCESS_ADJUSTMENTS;
6067:

Line 6191: okc_debug.Set_Indentation('load_applied_adjs');

6187: l pls_integer := 0;
6188:
6189: Begin
6190: IF (l_debug = 'Y') THEN
6191: okc_debug.Set_Indentation('load_applied_adjs');
6192: END IF;
6193: IF (l_debug = 'Y') THEN
6194: my_debug('16000 : Entering load_applied_adjs', 2);
6195: END IF;

Line 6340: okc_debug.Reset_Indentation;

6336: IF (l_debug = 'Y') THEN
6337: my_debug('16300 : Exiting load_applied_adjs', 2);
6338: END IF;
6339: IF (l_debug = 'Y') THEN
6340: okc_debug.Reset_Indentation;
6341: END IF;
6342:
6343: return l_return_status;
6344: exception

Line 6362: okc_debug.Reset_Indentation;

6358: IF (l_debug = 'Y') THEN
6359: my_debug('16400 : Exiting load_applied_adjs', 4);
6360: END IF;
6361: IF (l_debug = 'Y') THEN
6362: okc_debug.Reset_Indentation;
6363: END IF;
6364:
6365: return (l_return_status);
6366: --????what about assocs(pbh)

Line 6373: okc_debug.Set_Indentation('CALCULATE_PRICE');

6369:
6370: Begin
6371: --?????? validations- pricing config lines. p_chr_id is null
6372: IF (l_debug = 'Y') THEN
6373: okc_debug.Set_Indentation('CALCULATE_PRICE');
6374: END IF;
6375: IF (l_debug = 'Y') THEN
6376: my_debug('16500 : Entering CALCULATE_PRICE', 2);
6377: END IF;

Line 7274: okc_debug.Reset_Indentation;

7270: IF (l_debug = 'Y') THEN
7271: my_debug('17096 : Exiting CALCULATE_PRICE', 2);
7272: END IF;
7273: IF (l_debug = 'Y') THEN
7274: okc_debug.Reset_Indentation;
7275: END IF;
7276:
7277:
7278: EXCEPTION

Line 7286: okc_debug.Reset_Indentation;

7282: IF (l_debug = 'Y') THEN
7283: my_debug('17690 : Exiting CALCULATE_PRICE', 4);
7284: END IF;
7285: IF (l_debug = 'Y') THEN
7286: okc_debug.Reset_Indentation;
7287: END IF;
7288:
7289: WHEN OKC_API.G_EXCEPTION_ERROR THEN
7290: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 7301: okc_debug.Reset_Indentation;

7297: IF (l_debug = 'Y') THEN
7298: my_debug('17700 : Exiting CALCULATE_PRICE', 4);
7299: END IF;
7300: IF (l_debug = 'Y') THEN
7301: okc_debug.Reset_Indentation;
7302: END IF;
7303:
7304: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
7305: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 7316: okc_debug.Reset_Indentation;

7312: IF (l_debug = 'Y') THEN
7313: my_debug('17800 : Exiting CALCULATE_PRICE', 4);
7314: END IF;
7315: IF (l_debug = 'Y') THEN
7316: okc_debug.Reset_Indentation;
7317: END IF;
7318:
7319: WHEN OTHERS THEN
7320: OKC_API.set_message(p_app_name => g_app_name,

Line 7335: okc_debug.Reset_Indentation;

7331: IF (l_debug = 'Y') THEN
7332: my_debug('17900 : Exiting CALCULATE_PRICE', 4);
7333: END IF;
7334: IF (l_debug = 'Y') THEN
7335: okc_debug.Reset_Indentation;
7336: END IF;
7337:
7338: END CALCULATE_price;
7339:

Line 7379: okc_debug.Set_Indentation('GET_MANUAL_ADJUSTMENTS');

7375: l_req_related_line_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
7376: BEGIN
7377: --dbms_output.put_line('start new get manual adjs');
7378: IF (l_debug = 'Y') THEN
7379: okc_debug.Set_Indentation('GET_MANUAL_ADJUSTMENTS');
7380: END IF;
7381: IF (l_debug = 'Y') THEN
7382: my_debug('18000 : Entering GET_MANUAL_ADJUSTMENTS', 2);
7383: END IF;

Line 7527: okc_debug.Reset_Indentation;

7523: IF (l_debug = 'Y') THEN
7524: my_debug('18600 : Exiting GET_MANUAL_ADJUSTMENTS', 2);
7525: END IF;
7526: IF (l_debug = 'Y') THEN
7527: okc_debug.Reset_Indentation;
7528: END IF;
7529:
7530: END IF; ----end dbmsoutput area
7531: EXCEPTION

Line 7544: okc_debug.Reset_Indentation;

7540: IF (l_debug = 'Y') THEN
7541: my_debug('18700 : Exiting GET_MANUAL_ADJUSTMENTS', 4);
7542: END IF;
7543: IF (l_debug = 'Y') THEN
7544: okc_debug.Reset_Indentation;
7545: END IF;
7546:
7547: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
7548: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 7559: okc_debug.Reset_Indentation;

7555: IF (l_debug = 'Y') THEN
7556: my_debug('18800 : Exiting GET_MANUAL_ADJUSTMENTS', 4);
7557: END IF;
7558: IF (l_debug = 'Y') THEN
7559: okc_debug.Reset_Indentation;
7560: END IF;
7561:
7562: WHEN OTHERS THEN
7563: OKC_API.set_message(p_app_name => g_app_name,

Line 7574: okc_debug.Reset_Indentation;

7570: IF (l_debug = 'Y') THEN
7571: my_debug('18900 : Exiting GET_MANUAL_ADJUSTMENTS', 4);
7572: END IF;
7573: IF (l_debug = 'Y') THEN
7574: okc_debug.Reset_Indentation;
7575: END IF;
7576:
7577: END get_manual_adjustments;
7578: