DBA Data[Home] [Help]

APPS.OKC_QA_GENERAL_CHECKLISTS dependencies on OKC_DEBUG

Line 35: okc_debug.Set_Indentation(l_proc);

31:
32: BEGIN
33:
34: IF (l_debug = 'Y') THEN
35: okc_debug.Set_Indentation(l_proc);
36: okc_debug.Log('100: Entering ',2);
37: END IF;
38:
39: x_return_status := 'S';

Line 36: okc_debug.Log('100: Entering ',2);

32: BEGIN
33:
34: IF (l_debug = 'Y') THEN
35: okc_debug.Set_Indentation(l_proc);
36: okc_debug.Log('100: Entering ',2);
37: END IF;
38:
39: x_return_status := 'S';
40:

Line 57: okc_debug.Log('200: Leaving ',2);

53: p_app_name => G_APP_NAME,
54: p_msg_name => G_QA_SUCCESS);
55: END IF;
56: IF (l_debug = 'Y') THEN
57: okc_debug.Log('200: Leaving ',2);
58: okc_debug.Reset_Indentation;
59: END IF;
60:
61: EXCEPTION

Line 58: okc_debug.Reset_Indentation;

54: p_msg_name => G_QA_SUCCESS);
55: END IF;
56: IF (l_debug = 'Y') THEN
57: okc_debug.Log('200: Leaving ',2);
58: okc_debug.Reset_Indentation;
59: END IF;
60:
61: EXCEPTION
62: WHEN OTHERS THEN

Line 64: okc_debug.Log('300: Leaving ',2);

60:
61: EXCEPTION
62: WHEN OTHERS THEN
63: IF (l_debug = 'Y') THEN
64: okc_debug.Log('300: Leaving ',2);
65: okc_debug.Reset_Indentation;
66: END IF;
67: if csr_contracts%ISOPEN then
68: close csr_contracts;

Line 65: okc_debug.Reset_Indentation;

61: EXCEPTION
62: WHEN OTHERS THEN
63: IF (l_debug = 'Y') THEN
64: okc_debug.Log('300: Leaving ',2);
65: okc_debug.Reset_Indentation;
66: END IF;
67: if csr_contracts%ISOPEN then
68: close csr_contracts;
69: end if;

Line 180: okc_debug.Set_Indentation(l_proc);

176:
177: BEGIN
178:
179: IF (l_debug = 'Y') THEN
180: okc_debug.Set_Indentation(l_proc);
181: okc_debug.Log('400: Entering ',2);
182: END IF;
183:
184: x_return_status := 'S';

Line 181: okc_debug.Log('400: Entering ',2);

177: BEGIN
178:
179: IF (l_debug = 'Y') THEN
180: okc_debug.Set_Indentation(l_proc);
181: okc_debug.Log('400: Entering ',2);
182: END IF;
183:
184: x_return_status := 'S';
185:

Line 191: okc_debug.Log('410: l_jtot_object1_code : '||l_jtot_object1_code,2);

187: LOOP
188: FETCH csr_contacts INTO l_jtot_object1_code, l_object1_id1, l_object1_id2 ;
189: EXIT WHEN csr_contacts%NOTFOUND;
190: IF (l_debug = 'Y') THEN
191: okc_debug.Log('410: l_jtot_object1_code : '||l_jtot_object1_code,2);
192: okc_debug.Log('420: l_object1_id1 : '||l_object1_id1,2);
193: okc_debug.Log('430: l_object1_id2 : '||l_object1_id2,2);
194: END IF;
195: -- get the email address

Line 192: okc_debug.Log('420: l_object1_id1 : '||l_object1_id1,2);

188: FETCH csr_contacts INTO l_jtot_object1_code, l_object1_id1, l_object1_id2 ;
189: EXIT WHEN csr_contacts%NOTFOUND;
190: IF (l_debug = 'Y') THEN
191: okc_debug.Log('410: l_jtot_object1_code : '||l_jtot_object1_code,2);
192: okc_debug.Log('420: l_object1_id1 : '||l_object1_id1,2);
193: okc_debug.Log('430: l_object1_id2 : '||l_object1_id2,2);
194: END IF;
195: -- get the email address
196: l_email_address := GET_EMAIL_FROM_JTFV( l_jtot_object1_code, l_object1_id1, l_object1_id2);

Line 193: okc_debug.Log('430: l_object1_id2 : '||l_object1_id2,2);

189: EXIT WHEN csr_contacts%NOTFOUND;
190: IF (l_debug = 'Y') THEN
191: okc_debug.Log('410: l_jtot_object1_code : '||l_jtot_object1_code,2);
192: okc_debug.Log('420: l_object1_id1 : '||l_object1_id1,2);
193: okc_debug.Log('430: l_object1_id2 : '||l_object1_id2,2);
194: END IF;
195: -- get the email address
196: l_email_address := GET_EMAIL_FROM_JTFV( l_jtot_object1_code, l_object1_id1, l_object1_id2);
197: IF (l_debug = 'Y') THEN

Line 198: okc_debug.Log('440: Email Address : '||l_email_address,2);

194: END IF;
195: -- get the email address
196: l_email_address := GET_EMAIL_FROM_JTFV( l_jtot_object1_code, l_object1_id1, l_object1_id2);
197: IF (l_debug = 'Y') THEN
198: okc_debug.Log('440: Email Address : '||l_email_address,2);
199: END IF;
200: IF l_email_address IS NOT NULL THEN
201: -- we got atleast 1 record with email address, so exit loop
202: l_email_found := 'Y';

Line 225: okc_debug.Log('500: Leaving ',2);

221: p_msg_name => G_QA_SUCCESS);
222: END IF; -- l_email_found = 'N'
223:
224: IF (l_debug = 'Y') THEN
225: okc_debug.Log('500: Leaving ',2);
226: okc_debug.Reset_Indentation;
227: END IF;
228:
229: EXCEPTION

Line 226: okc_debug.Reset_Indentation;

222: END IF; -- l_email_found = 'N'
223:
224: IF (l_debug = 'Y') THEN
225: okc_debug.Log('500: Leaving ',2);
226: okc_debug.Reset_Indentation;
227: END IF;
228:
229: EXCEPTION
230: WHEN OTHERS THEN

Line 232: okc_debug.Log('600: Leaving ',2);

228:
229: EXCEPTION
230: WHEN OTHERS THEN
231: IF (l_debug = 'Y') THEN
232: okc_debug.Log('600: Leaving ',2);
233: okc_debug.Reset_Indentation;
234: END IF;
235: if csr_contacts%ISOPEN then
236: close csr_contacts;

Line 233: okc_debug.Reset_Indentation;

229: EXCEPTION
230: WHEN OTHERS THEN
231: IF (l_debug = 'Y') THEN
232: okc_debug.Log('600: Leaving ',2);
233: okc_debug.Reset_Indentation;
234: END IF;
235: if csr_contacts%ISOPEN then
236: close csr_contacts;
237: end if;

Line 309: okc_debug.Set_Indentation(l_proc);

305:
306: BEGIN
307:
308: IF (l_debug = 'Y') THEN
309: okc_debug.Set_Indentation(l_proc);
310: okc_debug.Log('700: Entering ',2);
311: END IF;
312:
313: x_return_status := 'S';

Line 310: okc_debug.Log('700: Entering ',2);

306: BEGIN
307:
308: IF (l_debug = 'Y') THEN
309: okc_debug.Set_Indentation(l_proc);
310: okc_debug.Log('700: Entering ',2);
311: END IF;
312:
313: x_return_status := 'S';
314:

Line 327: okc_debug.Log('710: l_jtot_object1_code : '||l_jtot_object1_code,2);

323: FETCH csr_contacts INTO l_jtot_object1_code, l_object1_id1, l_object1_id2 ;
324: EXIT WHEN csr_contacts%NOTFOUND;
325: l_ctc_not_found := False;
326: IF (l_debug = 'Y') THEN
327: okc_debug.Log('710: l_jtot_object1_code : '||l_jtot_object1_code,2);
328: okc_debug.Log('720: l_object1_id1 : '||l_object1_id1,2);
329: okc_debug.Log('730: l_object1_id2 : '||l_object1_id2,2);
330: END IF;
331: -- get the email address

Line 328: okc_debug.Log('720: l_object1_id1 : '||l_object1_id1,2);

324: EXIT WHEN csr_contacts%NOTFOUND;
325: l_ctc_not_found := False;
326: IF (l_debug = 'Y') THEN
327: okc_debug.Log('710: l_jtot_object1_code : '||l_jtot_object1_code,2);
328: okc_debug.Log('720: l_object1_id1 : '||l_object1_id1,2);
329: okc_debug.Log('730: l_object1_id2 : '||l_object1_id2,2);
330: END IF;
331: -- get the email address
332: l_email_address := GET_EMAIL_FROM_JTFV(l_jtot_object1_code,

Line 329: okc_debug.Log('730: l_object1_id2 : '||l_object1_id2,2);

325: l_ctc_not_found := False;
326: IF (l_debug = 'Y') THEN
327: okc_debug.Log('710: l_jtot_object1_code : '||l_jtot_object1_code,2);
328: okc_debug.Log('720: l_object1_id1 : '||l_object1_id1,2);
329: okc_debug.Log('730: l_object1_id2 : '||l_object1_id2,2);
330: END IF;
331: -- get the email address
332: l_email_address := GET_EMAIL_FROM_JTFV(l_jtot_object1_code,
333: l_object1_id1,

Line 336: okc_debug.Log('740: Email Address : '||l_email_address,2);

332: l_email_address := GET_EMAIL_FROM_JTFV(l_jtot_object1_code,
333: l_object1_id1,
334: l_object1_id2);
335: IF (l_debug = 'Y') THEN
336: okc_debug.Log('740: Email Address : '||l_email_address,2);
337: END IF;
338: IF l_email_address IS NOT NULL THEN
339: -- we got atleast 1 record with email address, so exit loop
340: l_email_found := 'Y';

Line 393: okc_debug.Log('800: Leaving ',2);

389: p_token1 => 'ROLE',
390: p_token1_value => okc_util.decode_lookup('OKC_ROLE',p_rle_code));
391:
392: IF (l_debug = 'Y') THEN
393: okc_debug.Log('800: Leaving ',2);
394: okc_debug.Reset_Indentation;
395: END IF;
396:
397: EXCEPTION

Line 394: okc_debug.Reset_Indentation;

390: p_token1_value => okc_util.decode_lookup('OKC_ROLE',p_rle_code));
391:
392: IF (l_debug = 'Y') THEN
393: okc_debug.Log('800: Leaving ',2);
394: okc_debug.Reset_Indentation;
395: END IF;
396:
397: EXCEPTION
398: WHEN G_EXCEPTION_HALT_VALIDATION Then

Line 400: okc_debug.Log('850: Leaving ',2);

396:
397: EXCEPTION
398: WHEN G_EXCEPTION_HALT_VALIDATION Then
399: IF (l_debug = 'Y') THEN
400: okc_debug.Log('850: Leaving ',2);
401: okc_debug.Reset_Indentation;
402: END IF;
403: WHEN OTHERS THEN
404: IF (l_debug = 'Y') THEN

Line 401: okc_debug.Reset_Indentation;

397: EXCEPTION
398: WHEN G_EXCEPTION_HALT_VALIDATION Then
399: IF (l_debug = 'Y') THEN
400: okc_debug.Log('850: Leaving ',2);
401: okc_debug.Reset_Indentation;
402: END IF;
403: WHEN OTHERS THEN
404: IF (l_debug = 'Y') THEN
405: okc_debug.Log('900: Leaving ',2);

Line 405: okc_debug.Log('900: Leaving ',2);

401: okc_debug.Reset_Indentation;
402: END IF;
403: WHEN OTHERS THEN
404: IF (l_debug = 'Y') THEN
405: okc_debug.Log('900: Leaving ',2);
406: okc_debug.Reset_Indentation;
407: END IF;
408: if csr_rle%ISOPEN then
409: close csr_rle;

Line 406: okc_debug.Reset_Indentation;

402: END IF;
403: WHEN OTHERS THEN
404: IF (l_debug = 'Y') THEN
405: okc_debug.Log('900: Leaving ',2);
406: okc_debug.Reset_Indentation;
407: END IF;
408: if csr_rle%ISOPEN then
409: close csr_rle;
410: end if;