eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_QA_DATA_INTEGRITY dependencies on OKC_DEBUG

Line 112: okc_debug.Set_Indentation(l_proc);

108: --
109: BEGIN
110:
111: IF (l_debug = 'Y') THEN
112: okc_debug.Set_Indentation(l_proc);
113: okc_debug.Log('10: Entering ',2);
114: END IF;
115:
116: x_return_status := 'S';

Line 113: okc_debug.Log('10: Entering ',2);

109: BEGIN
110:
111: IF (l_debug = 'Y') THEN
112: okc_debug.Set_Indentation(l_proc);
113: okc_debug.Log('10: Entering ',2);
114: END IF;
115:
116: x_return_status := 'S';
117: FOR r1 IN c1 LOOP

Line 141: okc_debug.Log('1000: Leaving ',2);

137: p_msg_name => G_QA_SUCCESS);
138: END IF;
139:
140: IF (l_debug = 'Y') THEN
141: okc_debug.Log('1000: Leaving ',2);
142: okc_debug.Reset_Indentation;
143: END IF;
144: exception
145: WHEN OTHERS THEN

Line 142: okc_debug.Reset_Indentation;

138: END IF;
139:
140: IF (l_debug = 'Y') THEN
141: okc_debug.Log('1000: Leaving ',2);
142: okc_debug.Reset_Indentation;
143: END IF;
144: exception
145: WHEN OTHERS THEN
146: IF (l_debug = 'Y') THEN

Line 147: okc_debug.Log('2000: Leaving ',2);

143: END IF;
144: exception
145: WHEN OTHERS THEN
146: IF (l_debug = 'Y') THEN
147: okc_debug.Log('2000: Leaving ',2);
148: okc_debug.Reset_Indentation;
149: END IF;
150: if c1%ISOPEN then
151: close c1;

Line 148: okc_debug.Reset_Indentation;

144: exception
145: WHEN OTHERS THEN
146: IF (l_debug = 'Y') THEN
147: okc_debug.Log('2000: Leaving ',2);
148: okc_debug.Reset_Indentation;
149: END IF;
150: if c1%ISOPEN then
151: close c1;
152: end if;

Line 278: okc_debug.Set_Indentation(l_proc);

274: --
275: BEGIN
276:
277: IF (l_debug = 'Y') THEN
278: okc_debug.Set_Indentation(l_proc);
279: okc_debug.Log('10: Entering ',2);
280: END IF;
281:
282: -- initialize return status

Line 279: okc_debug.Log('10: Entering ',2);

275: BEGIN
276:
277: IF (l_debug = 'Y') THEN
278: okc_debug.Set_Indentation(l_proc);
279: okc_debug.Log('10: Entering ',2);
280: END IF;
281:
282: -- initialize return status
283: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 510: okc_debug.Log('1000: Leaving ',2);

506: p_msg_name => G_QA_SUCCESS);
507: END IF;
508:
509: IF (l_debug = 'Y') THEN
510: okc_debug.Log('1000: Leaving ',2);
511: okc_debug.Reset_Indentation;
512: END IF;
513: EXCEPTION
514: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 511: okc_debug.Reset_Indentation;

507: END IF;
508:
509: IF (l_debug = 'Y') THEN
510: okc_debug.Log('1000: Leaving ',2);
511: okc_debug.Reset_Indentation;
512: END IF;
513: EXCEPTION
514: WHEN G_EXCEPTION_HALT_VALIDATION THEN
515: IF (l_debug = 'Y') THEN

Line 516: okc_debug.Log('2000: Leaving ',2);

512: END IF;
513: EXCEPTION
514: WHEN G_EXCEPTION_HALT_VALIDATION THEN
515: IF (l_debug = 'Y') THEN
516: okc_debug.Log('2000: Leaving ',2);
517: okc_debug.Reset_Indentation;
518: END IF;
519: -- no processing necessary; validation can continue with next column
520: NULL;

Line 517: okc_debug.Reset_Indentation;

513: EXCEPTION
514: WHEN G_EXCEPTION_HALT_VALIDATION THEN
515: IF (l_debug = 'Y') THEN
516: okc_debug.Log('2000: Leaving ',2);
517: okc_debug.Reset_Indentation;
518: END IF;
519: -- no processing necessary; validation can continue with next column
520: NULL;
521: WHEN OTHERS THEN

Line 523: okc_debug.Log('3000: Leaving ',2);

519: -- no processing necessary; validation can continue with next column
520: NULL;
521: WHEN OTHERS THEN
522: IF (l_debug = 'Y') THEN
523: okc_debug.Log('3000: Leaving ',2);
524: okc_debug.Reset_Indentation;
525: END IF;
526: -- store SQL error message on message stack
527: OKC_API.SET_MESSAGE(

Line 524: okc_debug.Reset_Indentation;

520: NULL;
521: WHEN OTHERS THEN
522: IF (l_debug = 'Y') THEN
523: okc_debug.Log('3000: Leaving ',2);
524: okc_debug.Reset_Indentation;
525: END IF;
526: -- store SQL error message on message stack
527: OKC_API.SET_MESSAGE(
528: p_app_name => G_APP_NAME,

Line 645: okc_debug.Set_Indentation(l_proc);

641: --
642: BEGIN
643:
644: IF (l_debug = 'Y') THEN
645: okc_debug.Set_Indentation(l_proc);
646: okc_debug.Log('10: Entering ',2);
647: END IF;
648:
649: -- initialize return status

Line 646: okc_debug.Log('10: Entering ',2);

642: BEGIN
643:
644: IF (l_debug = 'Y') THEN
645: okc_debug.Set_Indentation(l_proc);
646: okc_debug.Log('10: Entering ',2);
647: END IF;
648:
649: -- initialize return status
650: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 663: okc_debug.Log('20: Pricing Rule Group '||p_rgd_code,2);

659: -- If the Rule Group is 'PRICING' and if the Advanced Pricing Profile is enabled then we will
660: -- ignore all Rules under 'PRICING' rule group and issue a warning to the user
661: IF NVL(p_rgd_code,'XYZ') = 'PRICING' THEN
662: IF (l_debug = 'Y') THEN
663: okc_debug.Log('20: Pricing Rule Group '||p_rgd_code,2);
664: END IF;
665: -- check the Advanced Pricing Profile value
666: l_adv_pricing_profile := nvl(fnd_profile.value('OKC_ADVANCED_PRICING'), 'N');
667: IF (l_debug = 'Y') THEN

Line 668: okc_debug.Log('30: Advance Pricing Profile : '||l_adv_pricing_profile,2);

664: END IF;
665: -- check the Advanced Pricing Profile value
666: l_adv_pricing_profile := nvl(fnd_profile.value('OKC_ADVANCED_PRICING'), 'N');
667: IF (l_debug = 'Y') THEN
668: okc_debug.Log('30: Advance Pricing Profile : '||l_adv_pricing_profile,2);
669: END IF;
670: IF l_adv_pricing_profile = 'Y' THEN
671: -- ignore this Rule and make it optional
672: IF (l_debug = 'Y') THEN

Line 673: okc_debug.Log('40: Setting l_optional_yn to Y ',2);

669: END IF;
670: IF l_adv_pricing_profile = 'Y' THEN
671: -- ignore this Rule and make it optional
672: IF (l_debug = 'Y') THEN
673: okc_debug.Log('40: Setting l_optional_yn to Y ',2);
674: END IF;
675: l_optional_yn := 'Y' ;
676: -- warn the user , done at Rule Group Level
677: IF (l_debug = 'Y') THEN

Line 678: okc_debug.Log('50: Issuing Warning To User ',2);

674: END IF;
675: l_optional_yn := 'Y' ;
676: -- warn the user , done at Rule Group Level
677: IF (l_debug = 'Y') THEN
678: okc_debug.Log('50: Issuing Warning To User ',2);
679: END IF;
680: l_adv_pricing_warn := 'Y';
681: END IF; -- AP is 'Y'
682: END IF; -- Rule Group is PRICING

Line 795: okc_debug.Log('100: Pricing Rule Group '||p_rgd_code,2);

791: -- If the Rule Segments have Required values , we set it to Not Required
792:
793: IF NVL(p_rgd_code,'XYZ') = 'PRICING' THEN
794: IF (l_debug = 'Y') THEN
795: okc_debug.Log('100: Pricing Rule Group '||p_rgd_code,2);
796: END IF;
797: -- check the Advanced Pricing Profile value
798: l_adv_pricing_profile := nvl(fnd_profile.value('OKC_ADVANCED_PRICING'), 'N');
799: IF (l_debug = 'Y') THEN

Line 800: okc_debug.Log('110: Advance Pricing Profile : '||l_adv_pricing_profile,2);

796: END IF;
797: -- check the Advanced Pricing Profile value
798: l_adv_pricing_profile := nvl(fnd_profile.value('OKC_ADVANCED_PRICING'), 'N');
799: IF (l_debug = 'Y') THEN
800: okc_debug.Log('110: Advance Pricing Profile : '||l_adv_pricing_profile,2);
801: END IF;
802: IF l_adv_pricing_profile = 'Y' THEN
803: -- ignore this Rule and make it optional
804: IF (l_debug = 'Y') THEN

Line 805: okc_debug.Log('120: Setting l_required_flag to N ',2);

801: END IF;
802: IF l_adv_pricing_profile = 'Y' THEN
803: -- ignore this Rule and make it optional
804: IF (l_debug = 'Y') THEN
805: okc_debug.Log('120: Setting l_required_flag to N ',2);
806: END IF;
807: l_required_flag := 'N' ;
808: END IF; -- AP is 'Y'
809: END IF; -- Rule Group is PRICING

Line 944: okc_debug.Log('1000: Leaving ',2);

940: END IF;
941:
942:
943: IF (l_debug = 'Y') THEN
944: okc_debug.Log('1000: Leaving ',2);
945: okc_debug.Reset_Indentation;
946: END IF;
947: EXCEPTION
948: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 945: okc_debug.Reset_Indentation;

941:
942:
943: IF (l_debug = 'Y') THEN
944: okc_debug.Log('1000: Leaving ',2);
945: okc_debug.Reset_Indentation;
946: END IF;
947: EXCEPTION
948: WHEN G_EXCEPTION_HALT_VALIDATION THEN
949: IF (l_debug = 'Y') THEN

Line 950: okc_debug.Log('2000: Leaving ',2);

946: END IF;
947: EXCEPTION
948: WHEN G_EXCEPTION_HALT_VALIDATION THEN
949: IF (l_debug = 'Y') THEN
950: okc_debug.Log('2000: Leaving ',2);
951: okc_debug.Reset_Indentation;
952: END IF;
953: -- no processing necessary; validation can continue with next column
954: NULL;

Line 951: okc_debug.Reset_Indentation;

947: EXCEPTION
948: WHEN G_EXCEPTION_HALT_VALIDATION THEN
949: IF (l_debug = 'Y') THEN
950: okc_debug.Log('2000: Leaving ',2);
951: okc_debug.Reset_Indentation;
952: END IF;
953: -- no processing necessary; validation can continue with next column
954: NULL;
955: WHEN OTHERS THEN

Line 957: okc_debug.Log('3000: Leaving ',2);

953: -- no processing necessary; validation can continue with next column
954: NULL;
955: WHEN OTHERS THEN
956: IF (l_debug = 'Y') THEN
957: okc_debug.Log('3000: Leaving ',2);
958: okc_debug.Reset_Indentation;
959: END IF;
960: -- store SQL error message on message stack
961: OKC_API.SET_MESSAGE(

Line 958: okc_debug.Reset_Indentation;

954: NULL;
955: WHEN OTHERS THEN
956: IF (l_debug = 'Y') THEN
957: okc_debug.Log('3000: Leaving ',2);
958: okc_debug.Reset_Indentation;
959: END IF;
960: -- store SQL error message on message stack
961: OKC_API.SET_MESSAGE(
962: p_app_name => G_APP_NAME,

Line 1123: okc_debug.Set_Indentation(l_proc);

1119: --
1120: BEGIN
1121:
1122: IF (l_debug = 'Y') THEN
1123: okc_debug.Set_Indentation(l_proc);
1124: okc_debug.Log('10: Entering ',2);
1125: END IF;
1126:
1127: -- initialize return status

Line 1124: okc_debug.Log('10: Entering ',2);

1120: BEGIN
1121:
1122: IF (l_debug = 'Y') THEN
1123: okc_debug.Set_Indentation(l_proc);
1124: okc_debug.Log('10: Entering ',2);
1125: END IF;
1126:
1127: -- initialize return status
1128: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 1166: okc_debug.Log('200: Pricing Rule Group '||l_rgp_rec.rgd_code,2);

1162: -- set the l_rule_count to min_cardinality
1163:
1164: IF NVL(l_rgp_rec.rgd_code,'XYZ') = 'PRICING' THEN
1165: IF (l_debug = 'Y') THEN
1166: okc_debug.Log('200: Pricing Rule Group '||l_rgp_rec.rgd_code,2);
1167: END IF;
1168: -- check the Advanced Pricing Profile value
1169: l_adv_pricing_profile := nvl(fnd_profile.value('OKC_ADVANCED_PRICING'), 'N');
1170: IF (l_debug = 'Y') THEN

Line 1171: okc_debug.Log('210: Advance Pricing Profile : '||l_adv_pricing_profile,2);

1167: END IF;
1168: -- check the Advanced Pricing Profile value
1169: l_adv_pricing_profile := nvl(fnd_profile.value('OKC_ADVANCED_PRICING'), 'N');
1170: IF (l_debug = 'Y') THEN
1171: okc_debug.Log('210: Advance Pricing Profile : '||l_adv_pricing_profile,2);
1172: END IF;
1173: IF l_adv_pricing_profile = 'Y' THEN
1174: -- ignore this Rule and make it optional
1175: IF (l_debug = 'Y') THEN

Line 1176: okc_debug.Log('220: Setting l_rule_count to min_cardinality ',2);

1172: END IF;
1173: IF l_adv_pricing_profile = 'Y' THEN
1174: -- ignore this Rule and make it optional
1175: IF (l_debug = 'Y') THEN
1176: okc_debug.Log('220: Setting l_rule_count to min_cardinality ',2);
1177: END IF;
1178: l_rule_count := nvl(l_rgp_rec.min_cardinality, 0);
1179: -- issue Warning to the user
1180: l_adv_pricing_warn := 'Y';

Line 1310: okc_debug.Log('1000: Leaving ',2);

1306: END IF; -- x_return_status is SUCCESS
1307:
1308:
1309: IF (l_debug = 'Y') THEN
1310: okc_debug.Log('1000: Leaving ',2);
1311: okc_debug.Reset_Indentation;
1312: END IF;
1313: EXCEPTION
1314: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 1311: okc_debug.Reset_Indentation;

1307:
1308:
1309: IF (l_debug = 'Y') THEN
1310: okc_debug.Log('1000: Leaving ',2);
1311: okc_debug.Reset_Indentation;
1312: END IF;
1313: EXCEPTION
1314: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1315: IF (l_debug = 'Y') THEN

Line 1316: okc_debug.Log('2000: Leaving ',2);

1312: END IF;
1313: EXCEPTION
1314: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1315: IF (l_debug = 'Y') THEN
1316: okc_debug.Log('2000: Leaving ',2);
1317: okc_debug.Reset_Indentation;
1318: END IF;
1319: -- no processing necessary; validation can continue with next column
1320: NULL;

Line 1317: okc_debug.Reset_Indentation;

1313: EXCEPTION
1314: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1315: IF (l_debug = 'Y') THEN
1316: okc_debug.Log('2000: Leaving ',2);
1317: okc_debug.Reset_Indentation;
1318: END IF;
1319: -- no processing necessary; validation can continue with next column
1320: NULL;
1321: WHEN OTHERS THEN

Line 1323: okc_debug.Log('3000: Leaving ',2);

1319: -- no processing necessary; validation can continue with next column
1320: NULL;
1321: WHEN OTHERS THEN
1322: IF (l_debug = 'Y') THEN
1323: okc_debug.Log('3000: Leaving ',2);
1324: okc_debug.Reset_Indentation;
1325: END IF;
1326: -- store SQL error message on message stack
1327: OKC_API.SET_MESSAGE(

Line 1324: okc_debug.Reset_Indentation;

1320: NULL;
1321: WHEN OTHERS THEN
1322: IF (l_debug = 'Y') THEN
1323: okc_debug.Log('3000: Leaving ',2);
1324: okc_debug.Reset_Indentation;
1325: END IF;
1326: -- store SQL error message on message stack
1327: OKC_API.SET_MESSAGE(
1328: p_app_name => G_APP_NAME,

Line 1433: okc_debug.Set_Indentation(l_proc);

1429: --
1430: BEGIN
1431:
1432: IF (l_debug = 'Y') THEN
1433: okc_debug.Set_Indentation(l_proc);
1434: okc_debug.Log('10: Entering ',2);
1435: END IF;
1436: If l_rrd_rec.chr_id Is Not Null Then
1437: g_msg_name := 'OKC_QA_K_RGP_ROLE_MISSING';

Line 1434: okc_debug.Log('10: Entering ',2);

1430: BEGIN
1431:
1432: IF (l_debug = 'Y') THEN
1433: okc_debug.Set_Indentation(l_proc);
1434: okc_debug.Log('10: Entering ',2);
1435: END IF;
1436: If l_rrd_rec.chr_id Is Not Null Then
1437: g_msg_name := 'OKC_QA_K_RGP_ROLE_MISSING';
1438: g_token := Null;

Line 1453: okc_debug.Log('1000: Leaving ',2);

1449: p_token2_value => l_rrd_rec.rgd_meaning,
1450: p_token3 => g_token);
1451:
1452: IF (l_debug = 'Y') THEN
1453: okc_debug.Log('1000: Leaving ',2);
1454: okc_debug.Reset_Indentation;
1455: END IF;
1456: END;
1457:

Line 1454: okc_debug.Reset_Indentation;

1450: p_token3 => g_token);
1451:
1452: IF (l_debug = 'Y') THEN
1453: okc_debug.Log('1000: Leaving ',2);
1454: okc_debug.Reset_Indentation;
1455: END IF;
1456: END;
1457:
1458: BEGIN

Line 1461: okc_debug.Set_Indentation(l_proc);

1457:
1458: BEGIN
1459:
1460: IF (l_debug = 'Y') THEN
1461: okc_debug.Set_Indentation(l_proc);
1462: okc_debug.Log('10: Entering ',2);
1463: END IF;
1464:
1465: -- initialize return status

Line 1462: okc_debug.Log('10: Entering ',2);

1458: BEGIN
1459:
1460: IF (l_debug = 'Y') THEN
1461: okc_debug.Set_Indentation(l_proc);
1462: okc_debug.Log('10: Entering ',2);
1463: END IF;
1464:
1465: -- initialize return status
1466: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 1552: okc_debug.Log('20:Rowcount is 0 , rgd_code is : '||l_rrd_rec.rgd_code,2);

1548: -- Bug 1965956
1549: -- skekkar
1550: -- check if the Rule Group is Pricing
1551: IF (l_debug = 'Y') THEN
1552: okc_debug.Log('20:Rowcount is 0 , rgd_code is : '||l_rrd_rec.rgd_code,2);
1553: END IF;
1554: IF NVL(l_rrd_rec.rgd_code,'XYZ') = 'PRICING' THEN
1555: -- check the Advanced Pricing Profile value
1556: l_adv_pricing_profile := nvl(fnd_profile.value('OKC_ADVANCED_PRICING'), 'N');

Line 1558: okc_debug.Log('40: Advance Pricing Profile : '||l_adv_pricing_profile,2);

1554: IF NVL(l_rrd_rec.rgd_code,'XYZ') = 'PRICING' THEN
1555: -- check the Advanced Pricing Profile value
1556: l_adv_pricing_profile := nvl(fnd_profile.value('OKC_ADVANCED_PRICING'), 'N');
1557: IF (l_debug = 'Y') THEN
1558: okc_debug.Log('40: Advance Pricing Profile : '||l_adv_pricing_profile,2);
1559: END IF;
1560:
1561: IF l_adv_pricing_profile = 'N' THEN
1562: -- Rule Group Party Role is missing.

Line 1565: okc_debug.Log('100: Rule Group Party Role is missing ',2);

1561: IF l_adv_pricing_profile = 'N' THEN
1562: -- Rule Group Party Role is missing.
1563: -- notify caller of an error
1564: IF (l_debug = 'Y') THEN
1565: okc_debug.Log('100: Rule Group Party Role is missing ',2);
1566: END IF;
1567: Set_Rule_Party_Message;
1568: x_return_status := OKC_API.G_RET_STS_ERROR;
1569: END IF; -- l_adv_pricing_profile is N

Line 1574: okc_debug.Log('50: rule group is NOT Pricing , error ',2);

1570:
1571: ELSE
1572: -- rule group is NOT Pricing, error
1573: IF (l_debug = 'Y') THEN
1574: okc_debug.Log('50: rule group is NOT Pricing , error ',2);
1575: END IF;
1576: -- Rule Group Party Role is missing.
1577: -- notify caller of an error
1578: IF (l_debug = 'Y') THEN

Line 1579: okc_debug.Log('200: Rule Group Party Role is missing ',2);

1575: END IF;
1576: -- Rule Group Party Role is missing.
1577: -- notify caller of an error
1578: IF (l_debug = 'Y') THEN
1579: okc_debug.Log('200: Rule Group Party Role is missing ',2);
1580: END IF;
1581: Set_Rule_Party_Message;
1582: x_return_status := OKC_API.G_RET_STS_ERROR;
1583: END IF; -- rule group is Pricing

Line 1599: okc_debug.Log('1000: Leaving ',2);

1595: END IF;
1596:
1597:
1598: IF (l_debug = 'Y') THEN
1599: okc_debug.Log('1000: Leaving ',2);
1600: okc_debug.Reset_Indentation;
1601: END IF;
1602: EXCEPTION
1603: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 1600: okc_debug.Reset_Indentation;

1596:
1597:
1598: IF (l_debug = 'Y') THEN
1599: okc_debug.Log('1000: Leaving ',2);
1600: okc_debug.Reset_Indentation;
1601: END IF;
1602: EXCEPTION
1603: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1604: IF (l_debug = 'Y') THEN

Line 1605: okc_debug.Log('2000: Leaving ',2);

1601: END IF;
1602: EXCEPTION
1603: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1604: IF (l_debug = 'Y') THEN
1605: okc_debug.Log('2000: Leaving ',2);
1606: okc_debug.Reset_Indentation;
1607: END IF;
1608: -- no processing necessary; validation can continue with next column
1609: NULL;

Line 1606: okc_debug.Reset_Indentation;

1602: EXCEPTION
1603: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1604: IF (l_debug = 'Y') THEN
1605: okc_debug.Log('2000: Leaving ',2);
1606: okc_debug.Reset_Indentation;
1607: END IF;
1608: -- no processing necessary; validation can continue with next column
1609: NULL;
1610: WHEN OTHERS THEN

Line 1612: okc_debug.Log('3000: Leaving ',2);

1608: -- no processing necessary; validation can continue with next column
1609: NULL;
1610: WHEN OTHERS THEN
1611: IF (l_debug = 'Y') THEN
1612: okc_debug.Log('3000: Leaving ',2);
1613: okc_debug.Reset_Indentation;
1614: END IF;
1615: -- store SQL error message on message stack
1616: OKC_API.SET_MESSAGE(

Line 1613: okc_debug.Reset_Indentation;

1609: NULL;
1610: WHEN OTHERS THEN
1611: IF (l_debug = 'Y') THEN
1612: okc_debug.Log('3000: Leaving ',2);
1613: okc_debug.Reset_Indentation;
1614: END IF;
1615: -- store SQL error message on message stack
1616: OKC_API.SET_MESSAGE(
1617: p_app_name => G_APP_NAME,

Line 1724: okc_debug.Set_Indentation(l_proc);

1720: --
1721: BEGIN
1722:
1723: IF (l_debug = 'Y') THEN
1724: okc_debug.Set_Indentation(l_proc);
1725: okc_debug.Log('10: Entering ',2);
1726: END IF;
1727:
1728: -- initialize return status

Line 1725: okc_debug.Log('10: Entering ',2);

1721: BEGIN
1722:
1723: IF (l_debug = 'Y') THEN
1724: okc_debug.Set_Indentation(l_proc);
1725: okc_debug.Log('10: Entering ',2);
1726: END IF;
1727:
1728: -- initialize return status
1729: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 1991: okc_debug.Log('1000: Leaving ',2);

1987: p_msg_name => G_QA_SUCCESS);
1988: END IF;
1989:
1990: IF (l_debug = 'Y') THEN
1991: okc_debug.Log('1000: Leaving ',2);
1992: okc_debug.Reset_Indentation;
1993: END IF;
1994: EXCEPTION
1995: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 1992: okc_debug.Reset_Indentation;

1988: END IF;
1989:
1990: IF (l_debug = 'Y') THEN
1991: okc_debug.Log('1000: Leaving ',2);
1992: okc_debug.Reset_Indentation;
1993: END IF;
1994: EXCEPTION
1995: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1996: IF (l_debug = 'Y') THEN

Line 1997: okc_debug.Log('2000: Leaving ',2);

1993: END IF;
1994: EXCEPTION
1995: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1996: IF (l_debug = 'Y') THEN
1997: okc_debug.Log('2000: Leaving ',2);
1998: okc_debug.Reset_Indentation;
1999: END IF;
2000: -- no processing necessary; validation can continue with next column
2001: NULL;

Line 1998: okc_debug.Reset_Indentation;

1994: EXCEPTION
1995: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1996: IF (l_debug = 'Y') THEN
1997: okc_debug.Log('2000: Leaving ',2);
1998: okc_debug.Reset_Indentation;
1999: END IF;
2000: -- no processing necessary; validation can continue with next column
2001: NULL;
2002: WHEN OTHERS THEN

Line 2004: okc_debug.Log('3000: Leaving ',2);

2000: -- no processing necessary; validation can continue with next column
2001: NULL;
2002: WHEN OTHERS THEN
2003: IF (l_debug = 'Y') THEN
2004: okc_debug.Log('3000: Leaving ',2);
2005: okc_debug.Reset_Indentation;
2006: END IF;
2007: -- store SQL error message on message stack
2008: OKC_API.SET_MESSAGE(

Line 2005: okc_debug.Reset_Indentation;

2001: NULL;
2002: WHEN OTHERS THEN
2003: IF (l_debug = 'Y') THEN
2004: okc_debug.Log('3000: Leaving ',2);
2005: okc_debug.Reset_Indentation;
2006: END IF;
2007: -- store SQL error message on message stack
2008: OKC_API.SET_MESSAGE(
2009: p_app_name => G_APP_NAME,