DBA Data[Home] [Help]

APPS.PO_CREATE_REQUISITION_SV dependencies on PO_LOG

Line 15: D_PACKAGE_BASE CONSTANT VARCHAR2(100) := PO_LOG.get_package_base(G_PKG_NAME);

11: G_PKG_NAME CONSTANT VARCHAR2(30) := 'PO_CREATE_REQUISITION_SV';
12: G_FILE_NAME CONSTANT VARCHAR2(30) := 'POXCARQB.pls';
13:
14: -- Logging global constants
15: D_PACKAGE_BASE CONSTANT VARCHAR2(100) := PO_LOG.get_package_base(G_PKG_NAME);
16:
17: -- This procedure is to get the Unit Price for Internal Requisition
18: -- If the Currency Code is same for both Source and Destination Organization
19: -- get the Unit Cost for the Source Organization, otherwise

Line 96: d_module_base CONSTANT VARCHAR2(100) := PO_LOG.get_subprogram_base(D_PACKAGE_BASE, l_module_name);

92: UNIT_PRICE_LT_0 EXCEPTION;
93: INVALID_UNIT_PRICE EXCEPTION;
94:
95: l_module_name CONSTANT VARCHAR2(100) := 'get_unit_price_prc';
96: d_module_base CONSTANT VARCHAR2(100) := PO_LOG.get_subprogram_base(D_PACKAGE_BASE, l_module_name);
97: d_progress NUMBER;
98:
99: BEGIN
100:

Line 101: IF (PO_LOG.d_proc) THEN

97: d_progress NUMBER;
98:
99: BEGIN
100:
101: IF (PO_LOG.d_proc) THEN
102: PO_LOG.proc_begin(d_module_base);
103: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);
105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);

Line 102: PO_LOG.proc_begin(d_module_base);

98:
99: BEGIN
100:
101: IF (PO_LOG.d_proc) THEN
102: PO_LOG.proc_begin(d_module_base);
103: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);
105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);

Line 103: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);

99: BEGIN
100:
101: IF (PO_LOG.d_proc) THEN
102: PO_LOG.proc_begin(d_module_base);
103: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);
105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);
107: PO_LOG.proc_begin(d_module_base, 'x_chart_of_account_id', x_chart_of_account_id);

Line 104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);

100:
101: IF (PO_LOG.d_proc) THEN
102: PO_LOG.proc_begin(d_module_base);
103: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);
105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);
107: PO_LOG.proc_begin(d_module_base, 'x_chart_of_account_id', x_chart_of_account_id);
108: PO_LOG.proc_begin(d_module_base, 'x_currency_code', x_currency_code);

Line 105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);

101: IF (PO_LOG.d_proc) THEN
102: PO_LOG.proc_begin(d_module_base);
103: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);
105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);
107: PO_LOG.proc_begin(d_module_base, 'x_chart_of_account_id', x_chart_of_account_id);
108: PO_LOG.proc_begin(d_module_base, 'x_currency_code', x_currency_code);
109: PO_LOG.proc_begin(d_module_base, 'x_unit_price', x_unit_price);

Line 106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);

102: PO_LOG.proc_begin(d_module_base);
103: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);
105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);
107: PO_LOG.proc_begin(d_module_base, 'x_chart_of_account_id', x_chart_of_account_id);
108: PO_LOG.proc_begin(d_module_base, 'x_currency_code', x_currency_code);
109: PO_LOG.proc_begin(d_module_base, 'x_unit_price', x_unit_price);
110: END IF;

Line 107: PO_LOG.proc_begin(d_module_base, 'x_chart_of_account_id', x_chart_of_account_id);

103: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);
105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);
107: PO_LOG.proc_begin(d_module_base, 'x_chart_of_account_id', x_chart_of_account_id);
108: PO_LOG.proc_begin(d_module_base, 'x_currency_code', x_currency_code);
109: PO_LOG.proc_begin(d_module_base, 'x_unit_price', x_unit_price);
110: END IF;
111:

Line 108: PO_LOG.proc_begin(d_module_base, 'x_currency_code', x_currency_code);

104: PO_LOG.proc_begin(d_module_base, 'p_source_organization_id', p_source_organization_id);
105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);
107: PO_LOG.proc_begin(d_module_base, 'x_chart_of_account_id', x_chart_of_account_id);
108: PO_LOG.proc_begin(d_module_base, 'x_currency_code', x_currency_code);
109: PO_LOG.proc_begin(d_module_base, 'x_unit_price', x_unit_price);
110: END IF;
111:
112: -- Get the SOB Currency Code of the Source Organization ID

Line 109: PO_LOG.proc_begin(d_module_base, 'x_unit_price', x_unit_price);

105: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
106: PO_LOG.proc_begin(d_module_base, 'p_set_of_books_id', p_set_of_books_id);
107: PO_LOG.proc_begin(d_module_base, 'x_chart_of_account_id', x_chart_of_account_id);
108: PO_LOG.proc_begin(d_module_base, 'x_currency_code', x_currency_code);
109: PO_LOG.proc_begin(d_module_base, 'x_unit_price', x_unit_price);
110: END IF;
111:
112: -- Get the SOB Currency Code of the Source Organization ID
113: OPEN currency_code_cur(p_source_organization_id);

Line 176: IF (PO_LOG.d_proc) THEN

172: x_currency_code := d_currency_code;
173: x_unit_price := l_unit_price;
174: x_chart_of_account_id := d_chart_of_accounts_id; /* bug 5637277 replaced s_chart_of_accounts_id with d_chart_of_accounts_id */
175:
176: IF (PO_LOG.d_proc) THEN
177: PO_LOG.proc_end(d_module_base);
178: PO_LOG.proc_end(d_module_base, 'x_currency_code',x_currency_code);
179: PO_LOG.proc_end(d_module_base, 'x_unit_price',x_unit_price);
180: PO_LOG.proc_end(d_module_base, 'x_chart_of_account_id',x_chart_of_account_id);

Line 177: PO_LOG.proc_end(d_module_base);

173: x_unit_price := l_unit_price;
174: x_chart_of_account_id := d_chart_of_accounts_id; /* bug 5637277 replaced s_chart_of_accounts_id with d_chart_of_accounts_id */
175:
176: IF (PO_LOG.d_proc) THEN
177: PO_LOG.proc_end(d_module_base);
178: PO_LOG.proc_end(d_module_base, 'x_currency_code',x_currency_code);
179: PO_LOG.proc_end(d_module_base, 'x_unit_price',x_unit_price);
180: PO_LOG.proc_end(d_module_base, 'x_chart_of_account_id',x_chart_of_account_id);
181: END IF;

Line 178: PO_LOG.proc_end(d_module_base, 'x_currency_code',x_currency_code);

174: x_chart_of_account_id := d_chart_of_accounts_id; /* bug 5637277 replaced s_chart_of_accounts_id with d_chart_of_accounts_id */
175:
176: IF (PO_LOG.d_proc) THEN
177: PO_LOG.proc_end(d_module_base);
178: PO_LOG.proc_end(d_module_base, 'x_currency_code',x_currency_code);
179: PO_LOG.proc_end(d_module_base, 'x_unit_price',x_unit_price);
180: PO_LOG.proc_end(d_module_base, 'x_chart_of_account_id',x_chart_of_account_id);
181: END IF;
182:

Line 179: PO_LOG.proc_end(d_module_base, 'x_unit_price',x_unit_price);

175:
176: IF (PO_LOG.d_proc) THEN
177: PO_LOG.proc_end(d_module_base);
178: PO_LOG.proc_end(d_module_base, 'x_currency_code',x_currency_code);
179: PO_LOG.proc_end(d_module_base, 'x_unit_price',x_unit_price);
180: PO_LOG.proc_end(d_module_base, 'x_chart_of_account_id',x_chart_of_account_id);
181: END IF;
182:
183: EXCEPTION

Line 180: PO_LOG.proc_end(d_module_base, 'x_chart_of_account_id',x_chart_of_account_id);

176: IF (PO_LOG.d_proc) THEN
177: PO_LOG.proc_end(d_module_base);
178: PO_LOG.proc_end(d_module_base, 'x_currency_code',x_currency_code);
179: PO_LOG.proc_end(d_module_base, 'x_unit_price',x_unit_price);
180: PO_LOG.proc_end(d_module_base, 'x_chart_of_account_id',x_chart_of_account_id);
181: END IF;
182:
183: EXCEPTION
184:

Line 283: d_module_base CONSTANT VARCHAR2(100) := PO_LOG.get_subprogram_base(D_PACKAGE_BASE, l_module_name);

279: l_item_type VARCHAR2(10);
280: l_subinventory_type VARCHAR2(10) := 'X';
281:
282: l_module_name CONSTANT VARCHAR2(100) := 'get_charge_account_fun';
283: d_module_base CONSTANT VARCHAR2(100) := PO_LOG.get_subprogram_base(D_PACKAGE_BASE, l_module_name);
284: d_progress NUMBER;
285:
286: BEGIN
287:

Line 290: IF (PO_LOG.d_proc) THEN

286: BEGIN
287:
288: d_progress := 10;
289:
290: IF (PO_LOG.d_proc) THEN
291: PO_LOG.proc_begin(d_module_base);
292: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
293: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
294: PO_LOG.proc_begin(d_module_base, 'p_destination_subinventory', p_destination_subinventory);

Line 291: PO_LOG.proc_begin(d_module_base);

287:
288: d_progress := 10;
289:
290: IF (PO_LOG.d_proc) THEN
291: PO_LOG.proc_begin(d_module_base);
292: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
293: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
294: PO_LOG.proc_begin(d_module_base, 'p_destination_subinventory', p_destination_subinventory);
295: END IF;

Line 292: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);

288: d_progress := 10;
289:
290: IF (PO_LOG.d_proc) THEN
291: PO_LOG.proc_begin(d_module_base);
292: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
293: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
294: PO_LOG.proc_begin(d_module_base, 'p_destination_subinventory', p_destination_subinventory);
295: END IF;
296:

Line 293: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);

289:
290: IF (PO_LOG.d_proc) THEN
291: PO_LOG.proc_begin(d_module_base);
292: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
293: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
294: PO_LOG.proc_begin(d_module_base, 'p_destination_subinventory', p_destination_subinventory);
295: END IF;
296:
297: d_progress := 20;

Line 294: PO_LOG.proc_begin(d_module_base, 'p_destination_subinventory', p_destination_subinventory);

290: IF (PO_LOG.d_proc) THEN
291: PO_LOG.proc_begin(d_module_base);
292: PO_LOG.proc_begin(d_module_base, 'p_destination_organization_id', p_destination_organization_id);
293: PO_LOG.proc_begin(d_module_base, 'p_item_id', p_item_id);
294: PO_LOG.proc_begin(d_module_base, 'p_destination_subinventory', p_destination_subinventory);
295: END IF;
296:
297: d_progress := 20;
298:

Line 301: IF PO_LOG.d_stmt THEN

297: d_progress := 20;
298:
299: l_item_type := check_inv_item_type_fun (p_destination_organization_id, p_item_id);
300:
301: IF PO_LOG.d_stmt THEN
302: PO_LOG.stmt(d_module_base,d_progress,'l_item_type='||l_item_type);
303: END IF;
304:
305: d_progress := 30;

Line 302: PO_LOG.stmt(d_module_base,d_progress,'l_item_type='||l_item_type);

298:
299: l_item_type := check_inv_item_type_fun (p_destination_organization_id, p_item_id);
300:
301: IF PO_LOG.d_stmt THEN
302: PO_LOG.stmt(d_module_base,d_progress,'l_item_type='||l_item_type);
303: END IF;
304:
305: d_progress := 30;
306: IF l_item_type = 'EXPENSE' then

Line 325: IF PO_LOG.d_stmt THEN

321: d_progress := 60;
322: END;
323: END IF;
324:
325: IF PO_LOG.d_stmt THEN
326: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
327: END IF;
328:
329: -- If Expense Account not available for the Subinventory and Org,

Line 326: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);

322: END;
323: END IF;
324:
325: IF PO_LOG.d_stmt THEN
326: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
327: END IF;
328:
329: -- If Expense Account not available for the Subinventory and Org,
330: -- get expense account from Item Master for the Item and the Org

Line 346: IF PO_LOG.d_stmt THEN

342: d_progress := 80;
343: END;
344: END IF;
345:
346: IF PO_LOG.d_stmt THEN
347: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
348: END IF;
349:
350: -- If Expense Account not available in Item Master, get account

Line 347: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);

343: END;
344: END IF;
345:
346: IF PO_LOG.d_stmt THEN
347: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
348: END IF;
349:
350: -- If Expense Account not available in Item Master, get account
351: -- from MTL_PARAMETERS for the Destination Organization

Line 366: IF PO_LOG.d_stmt THEN

362: d_progress := 100;
363: END;
364: END IF;
365:
366: IF PO_LOG.d_stmt THEN
367: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
368: END IF;
369:
370: ELSE -- item type is ASSET

Line 367: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);

363: END;
364: END IF;
365:
366: IF PO_LOG.d_stmt THEN
367: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
368: END IF;
369:
370: ELSE -- item type is ASSET
371:

Line 380: IF PO_LOG.d_stmt THEN

376: l_subinventory_type := check_sub_inv_type_fun(p_destination_subinventory,
377: p_destination_organization_id);
378: END IF;
379:
380: IF PO_LOG.d_stmt THEN
381: PO_LOG.stmt(d_module_base,d_progress,'l_subinventory_type' , l_subinventory_type);
382: END IF;
383:
384: d_progress := 130;

Line 381: PO_LOG.stmt(d_module_base,d_progress,'l_subinventory_type' , l_subinventory_type);

377: p_destination_organization_id);
378: END IF;
379:
380: IF PO_LOG.d_stmt THEN
381: PO_LOG.stmt(d_module_base,d_progress,'l_subinventory_type' , l_subinventory_type);
382: END IF;
383:
384: d_progress := 130;
385: -- Get the default account from the Organization if Subinventory Type is NOT

Line 400: IF PO_LOG.d_stmt THEN

396: NULL;
397: d_progress := 150;
398: END;
399:
400: IF PO_LOG.d_stmt THEN
401: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
402: END IF;
403:
404: ELSIF l_subinventory_type = 'EXPENSE' THEN

Line 401: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);

397: d_progress := 150;
398: END;
399:
400: IF PO_LOG.d_stmt THEN
401: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
402: END IF;
403:
404: ELSIF l_subinventory_type = 'EXPENSE' THEN
405: -- Get Expense Account for the Subinventory

Line 419: IF PO_LOG.d_stmt THEN

415: NULL;
416: d_progress := 170;
417: END;
418:
419: IF PO_LOG.d_stmt THEN
420: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
421: END IF;
422:
423: -- If charge account is NULL for the Subinventory, get the default account

Line 420: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);

416: d_progress := 170;
417: END;
418:
419: IF PO_LOG.d_stmt THEN
420: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
421: END IF;
422:
423: -- If charge account is NULL for the Subinventory, get the default account
424: -- for the Organization from MTL_PARAMETERS

Line 439: IF PO_LOG.d_stmt THEN

435: d_progress := 190;
436: END;
437: END IF;
438:
439: IF PO_LOG.d_stmt THEN
440: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
441: END IF;
442:
443: ELSE -- destination sub inventory type is ASSET

Line 440: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);

436: END;
437: END IF;
438:
439: IF PO_LOG.d_stmt THEN
440: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
441: END IF;
442:
443: ELSE -- destination sub inventory type is ASSET
444: -- Get the Charge_Account for the Subinventory

Line 458: IF PO_LOG.d_stmt THEN

454: NULL;
455: d_progress := 210;
456: END;
457:
458: IF PO_LOG.d_stmt THEN
459: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
460: END IF;
461:
462: -- If Charge_account is not availabe for the Subinventory,

Line 459: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);

455: d_progress := 210;
456: END;
457:
458: IF PO_LOG.d_stmt THEN
459: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
460: END IF;
461:
462: -- If Charge_account is not availabe for the Subinventory,
463: -- get it for the Destination Organization from MTL_PARAMETERS

Line 478: IF PO_LOG.d_stmt THEN

474: d_progress := 230;
475: END;
476: END IF;
477:
478: IF PO_LOG.d_stmt THEN
479: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
480: END IF;
481: END IF; /* Sub Inventory Type */
482: END IF; /* Item Type Check */

Line 479: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);

475: END;
476: END IF;
477:
478: IF PO_LOG.d_stmt THEN
479: PO_LOG.stmt(d_module_base,d_progress,'l_charge_account',l_charge_account);
480: END IF;
481: END IF; /* Sub Inventory Type */
482: END IF; /* Item Type Check */
483:

Line 484: IF (PO_LOG.d_proc) THEN

480: END IF;
481: END IF; /* Sub Inventory Type */
482: END IF; /* Item Type Check */
483:
484: IF (PO_LOG.d_proc) THEN
485: PO_LOG.proc_end(d_module_base);
486: PO_LOG.proc_end(d_module_base, 'l_charge_account',l_charge_account);
487: END IF;
488:

Line 485: PO_LOG.proc_end(d_module_base);

481: END IF; /* Sub Inventory Type */
482: END IF; /* Item Type Check */
483:
484: IF (PO_LOG.d_proc) THEN
485: PO_LOG.proc_end(d_module_base);
486: PO_LOG.proc_end(d_module_base, 'l_charge_account',l_charge_account);
487: END IF;
488:
489: RETURN (l_charge_account);

Line 486: PO_LOG.proc_end(d_module_base, 'l_charge_account',l_charge_account);

482: END IF; /* Item Type Check */
483:
484: IF (PO_LOG.d_proc) THEN
485: PO_LOG.proc_end(d_module_base);
486: PO_LOG.proc_end(d_module_base, 'l_charge_account',l_charge_account);
487: END IF;
488:
489: RETURN (l_charge_account);
490: EXCEPTION

Line 492: IF (PO_LOG.d_exc) THEN

488:
489: RETURN (l_charge_account);
490: EXCEPTION
491: WHEN OTHERS THEN
492: IF (PO_LOG.d_exc) THEN
493: PO_LOG.exc(d_module_base, d_progress, 'Unhandled exception in '||l_module_name||': '||SQLERRM);
494: END IF;
495: NULL;
496: END get_charge_account_fun;

Line 493: PO_LOG.exc(d_module_base, d_progress, 'Unhandled exception in '||l_module_name||': '||SQLERRM);

489: RETURN (l_charge_account);
490: EXCEPTION
491: WHEN OTHERS THEN
492: IF (PO_LOG.d_exc) THEN
493: PO_LOG.exc(d_module_base, d_progress, 'Unhandled exception in '||l_module_name||': '||SQLERRM);
494: END IF;
495: NULL;
496: END get_charge_account_fun;
497:

Line 511: d_module_base CONSTANT VARCHAR2(100) := PO_LOG.get_subprogram_base(D_PACKAGE_BASE, l_module_name);

507: RETURN BOOLEAN IS
508:
509:
510: l_module_name CONSTANT VARCHAR2(100) := 'valid_account_id_fun';
511: d_module_base CONSTANT VARCHAR2(100) := PO_LOG.get_subprogram_base(D_PACKAGE_BASE, l_module_name);
512: d_progress NUMBER;
513:
514: CURSOR validate_ccid_cur IS
515: SELECT 'X'

Line 532: IF (PO_LOG.d_proc) THEN

528: BEGIN
529:
530: d_progress := 10;
531:
532: IF (PO_LOG.d_proc) THEN
533: PO_LOG.proc_begin(d_module_base);
534: PO_LOG.proc_begin(d_module_base, 'p_ccid', p_ccid);
535: PO_LOG.proc_begin(d_module_base, 'p_gl_date', p_gl_date);
536: PO_LOG.proc_begin(d_module_base, 'p_chart_of_accounts_id', p_chart_of_accounts_id);

Line 533: PO_LOG.proc_begin(d_module_base);

529:
530: d_progress := 10;
531:
532: IF (PO_LOG.d_proc) THEN
533: PO_LOG.proc_begin(d_module_base);
534: PO_LOG.proc_begin(d_module_base, 'p_ccid', p_ccid);
535: PO_LOG.proc_begin(d_module_base, 'p_gl_date', p_gl_date);
536: PO_LOG.proc_begin(d_module_base, 'p_chart_of_accounts_id', p_chart_of_accounts_id);
537: END IF;

Line 534: PO_LOG.proc_begin(d_module_base, 'p_ccid', p_ccid);

530: d_progress := 10;
531:
532: IF (PO_LOG.d_proc) THEN
533: PO_LOG.proc_begin(d_module_base);
534: PO_LOG.proc_begin(d_module_base, 'p_ccid', p_ccid);
535: PO_LOG.proc_begin(d_module_base, 'p_gl_date', p_gl_date);
536: PO_LOG.proc_begin(d_module_base, 'p_chart_of_accounts_id', p_chart_of_accounts_id);
537: END IF;
538:

Line 535: PO_LOG.proc_begin(d_module_base, 'p_gl_date', p_gl_date);

531:
532: IF (PO_LOG.d_proc) THEN
533: PO_LOG.proc_begin(d_module_base);
534: PO_LOG.proc_begin(d_module_base, 'p_ccid', p_ccid);
535: PO_LOG.proc_begin(d_module_base, 'p_gl_date', p_gl_date);
536: PO_LOG.proc_begin(d_module_base, 'p_chart_of_accounts_id', p_chart_of_accounts_id);
537: END IF;
538:
539: d_progress := 20;

Line 536: PO_LOG.proc_begin(d_module_base, 'p_chart_of_accounts_id', p_chart_of_accounts_id);

532: IF (PO_LOG.d_proc) THEN
533: PO_LOG.proc_begin(d_module_base);
534: PO_LOG.proc_begin(d_module_base, 'p_ccid', p_ccid);
535: PO_LOG.proc_begin(d_module_base, 'p_gl_date', p_gl_date);
536: PO_LOG.proc_begin(d_module_base, 'p_chart_of_accounts_id', p_chart_of_accounts_id);
537: END IF;
538:
539: d_progress := 20;
540: OPEN validate_ccid_cur;

Line 549: IF (PO_LOG.d_proc) THEN

545: IF validate_ccid_cur%FOUND THEN
546: CLOSE validate_ccid_cur;
547:
548: d_progress := 50;
549: IF (PO_LOG.d_proc) THEN
550: PO_LOG.proc_end(d_module_base);
551: PO_LOG.proc_end(d_module_base, 'return TRUE',0);
552: END IF;
553:

Line 550: PO_LOG.proc_end(d_module_base);

546: CLOSE validate_ccid_cur;
547:
548: d_progress := 50;
549: IF (PO_LOG.d_proc) THEN
550: PO_LOG.proc_end(d_module_base);
551: PO_LOG.proc_end(d_module_base, 'return TRUE',0);
552: END IF;
553:
554:

Line 551: PO_LOG.proc_end(d_module_base, 'return TRUE',0);

547:
548: d_progress := 50;
549: IF (PO_LOG.d_proc) THEN
550: PO_LOG.proc_end(d_module_base);
551: PO_LOG.proc_end(d_module_base, 'return TRUE',0);
552: END IF;
553:
554:
555: RETURN TRUE;

Line 560: IF (PO_LOG.d_proc) THEN

556: ELSE
557: CLOSE validate_ccid_cur;
558:
559: d_progress := 60;
560: IF (PO_LOG.d_proc) THEN
561: PO_LOG.proc_end(d_module_base);
562: PO_LOG.proc_end(d_module_base, 'return FALSE',1);
563: END IF;
564:

Line 561: PO_LOG.proc_end(d_module_base);

557: CLOSE validate_ccid_cur;
558:
559: d_progress := 60;
560: IF (PO_LOG.d_proc) THEN
561: PO_LOG.proc_end(d_module_base);
562: PO_LOG.proc_end(d_module_base, 'return FALSE',1);
563: END IF;
564:
565: RETURN FALSE;

Line 562: PO_LOG.proc_end(d_module_base, 'return FALSE',1);

558:
559: d_progress := 60;
560: IF (PO_LOG.d_proc) THEN
561: PO_LOG.proc_end(d_module_base);
562: PO_LOG.proc_end(d_module_base, 'return FALSE',1);
563: END IF;
564:
565: RETURN FALSE;
566: END IF;

Line 571: IF (PO_LOG.d_exc) THEN

567:
568: EXCEPTION
569:
570: WHEN OTHERS THEN
571: IF (PO_LOG.d_exc) THEN
572: PO_LOG.exc(d_module_base, d_progress, 'Unhandled exception in '||l_module_name||': '||SQLERRM);
573: END IF;
574:
575: return (FALSE);

Line 572: PO_LOG.exc(d_module_base, d_progress, 'Unhandled exception in '||l_module_name||': '||SQLERRM);

568: EXCEPTION
569:
570: WHEN OTHERS THEN
571: IF (PO_LOG.d_exc) THEN
572: PO_LOG.exc(d_module_base, d_progress, 'Unhandled exception in '||l_module_name||': '||SQLERRM);
573: END IF;
574:
575: return (FALSE);
576: