DBA Data[Home] [Help]

APPS.ZX_TCM_GET_EXEMPT_PKG dependencies on FND_LOG

Line 5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

1: PACKAGE BODY ZX_TCM_GET_EXEMPT_PKG AS
2: /* $Header: zxcgetexemptb.pls 120.31 2010/05/24 11:38:25 tsen ship $ */
3:
4: G_CURRENT_RUNTIME_LEVEL NUMBER;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

2: /* $Header: zxcgetexemptb.pls 120.31 2010/05/24 11:38:25 tsen ship $ */
3:
4: G_CURRENT_RUNTIME_LEVEL NUMBER;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

3:
4: G_CURRENT_RUNTIME_LEVEL NUMBER;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GET_EXEMPT_PKG';

Line 8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

4: G_CURRENT_RUNTIME_LEVEL NUMBER;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GET_EXEMPT_PKG';
12: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

Line 9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GET_EXEMPT_PKG';
12: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
13: procedure period_date_range( p_tax_date in date,

Line 10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GET_EXEMPT_PKG';
12: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
13: procedure period_date_range( p_tax_date in date,
14: p_ledger_id IN NUMBER,

Line 12: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GET_EXEMPT_PKG';
12: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
13: procedure period_date_range( p_tax_date in date,
14: p_ledger_id IN NUMBER,
15: start_date out NOCOPY date,
16: end_date out NOCOPY date ) is

Line 34: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions.period_date_range', l_log_msg);

30: open sel_date( p_tax_date );
31: fetch sel_date into start_date, end_date;
32: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
33: l_log_msg := 'start_date '||to_char(start_date);
34: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions.period_date_range', l_log_msg);
35: END IF;
36:
37:
38: if sel_date%notfound

Line 42: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions.period_date_range', l_log_msg);

38: if sel_date%notfound
39: then
40: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
41: l_log_msg := 'No Data found';
42: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions.period_date_range', l_log_msg);
43: END IF;
44:
45: close sel_date;
46:

Line 248: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

244: BEGIN
245:
246: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
247: l_log_msg := 'Get Exemptions';
248: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
249: END IF;
250: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
251: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions',
252: 'p_ptp_id '|| to_char(p_ptp_id) || ' '||

Line 251: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions',

247: l_log_msg := 'Get Exemptions';
248: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
249: END IF;
250: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
251: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions',
252: 'p_ptp_id '|| to_char(p_ptp_id) || ' '||
253: 'p_cust_account_id '|| to_char(p_cust_account_id) || ' '||
254: 'p_site_use_id '|| to_char(p_site_use_id) || ' '||
255: 'p_inventory_item_id '|| to_char(p_inventory_item_id)|| ' '||

Line 299: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,

295: and lookup_code = x_exemption_rec.exempt_reason_code;
296: EXCEPTION
297: WHEN NO_DATA_FOUND THEN
298: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
299: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,
300: 'There is no exempt reason lookup type for this exempt reason.');
301: END IF;
302: RAISE FND_API.G_EXC_ERROR;
303: IF EXEMPTIONS1%ISOPEN THEN

Line 308: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,

304: CLOSE EXEMPTIONS1;
305: END IF;
306: WHEN OTHERS THEN
307: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
308: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,
309: 'Failed when trying to get the meaning for Reason Code due to '||SQLERRM);
310: END IF;
311: RAISE FND_API.G_EXC_ERROR;
312: IF EXEMPTIONS1%ISOPEN THEN

Line 319: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

315: END;
316: END IF;
317: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
318: l_log_msg := 'Tax Exemptions Id '||to_char(x_exemption_rec.exemption_id) || ' Percent Exempt '||to_char(x_exemption_rec.percent_exempt);
319: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
320: END IF;
321: EXIT;
322:
323: END IF;

Line 360: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,

356: and lookup_code = x_exemption_rec.exempt_reason_code;
357: EXCEPTION
358: WHEN NO_DATA_FOUND THEN
359: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
360: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,
361: 'There is no exempt reason lookup type for this exempt reason.');
362: END IF;
363: RAISE FND_API.G_EXC_ERROR;
364: IF EXEMPTIONS2%ISOPEN THEN

Line 369: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,

365: CLOSE EXEMPTIONS2;
366: END IF;
367: WHEN OTHERS THEN
368: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
369: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,
370: 'Failed when trying to get the meaning for Reason Code due to '||SQLERRM);
371: END IF;
372: RAISE FND_API.G_EXC_ERROR;
373: IF EXEMPTIONS2%ISOPEN THEN

Line 380: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

376: END;
377: END IF;
378: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
379: l_log_msg := 'Tax Exemptions Id '||to_char(x_exemption_rec.exemption_id) || ' Percent Exempt '||to_char(x_exemption_rec.percent_exempt);
380: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
381: END IF;
382: EXIT;
383:
384: END IF;

Line 420: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,

416: and lookup_code = x_exemption_rec.exempt_reason_code;
417: EXCEPTION
418: WHEN NO_DATA_FOUND THEN
419: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
420: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,
421: 'There is no exempt reason lookup type for this exempt reason.');
422: END IF;
423: RAISE FND_API.G_EXC_ERROR;
424: WHEN OTHERS THEN

Line 426: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,

422: END IF;
423: RAISE FND_API.G_EXC_ERROR;
424: WHEN OTHERS THEN
425: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
426: FND_LOG.string(G_LEVEL_UNEXPECTED,G_MODULE_NAME,
427: 'Failed when trying to get the meaning for Reason Code due to '||SQLERRM);
428: END IF;
429: RAISE FND_API.G_EXC_ERROR;
430: IF EXEMPTIONS3%ISOPEN THEN

Line 440: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

436: END;
437: END IF;
438: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
439: l_log_msg := 'Tax Exemptions Id '||to_char(x_exemption_rec.exemption_id) || ' Percent Exempt '||to_char(x_exemption_rec.percent_exempt);
440: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
441: END IF;
442: EXIT;
443:
444: END IF;

Line 477: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

473:
474:
475: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
476: l_log_msg := 'Get Exemptions Source Tax';
477: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
478: END IF;
479:
480: IF l_tax_exmpt_cr_method_code = 'USE_EXEMPTIONS' THEN
481: IF l_tax_exmpt_source_tax IS NOT NULL THEN

Line 606: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

602: end if;
603:
604: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
605: l_log_msg := 'Tax Exemptions Id '||to_char(x_exemption_rec.exemption_id) || ' Percent Exempt '||to_char(x_exemption_rec.percent_exempt);
606: FND_LOG.string(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
607: END IF;
608: END IF;
609: END IF;
610: END IF;

Line 645: -----l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

641: l_tax_jurisdiction_id NUMBER;
642: TYPE number_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
643: l_tax_jurisdiction_id_tbl NUMBER_TBL_TYPE;
644: l_precedence_level_tbl NUMBER_TBL_TYPE;
645: -----l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
646: BEGIN
647: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
648: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
649: l_log_msg := 'Get Tax Exemptions ' ||

Line 647: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

643: l_tax_jurisdiction_id_tbl NUMBER_TBL_TYPE;
644: l_precedence_level_tbl NUMBER_TBL_TYPE;
645: -----l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
646: BEGIN
647: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
648: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
649: l_log_msg := 'Get Tax Exemptions ' ||
650: 'p_bill_to_cust_site_use_id= '|| p_bill_to_cust_site_use_id ||
651: 'p_bill_to_cust_acct_id= '|| p_bill_to_cust_acct_id ||

Line 670: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

666: 'p_tax_jurisdiction_id= '|| p_tax_jurisdiction_id ||
667: 'p_multiple_jurisdictions_flag= '||p_multiple_jurisdictions_flag ||
668: 'p_event_class_rec.ledger_id= '||p_event_class_rec.ledger_id
669: ;
670: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
671: END IF;
672:
673: x_return_status := FND_API.G_RET_STS_SUCCESS;
674: IF p_exempt_control_flag = 'E' and p_reason_code is null THEN

Line 711: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

707: x_exemption_rec);
708: IF x_exemption_rec.exemption_id IS NULL THEN
709: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
710: l_log_msg := 'Calling get_exemptions with p_bill_to_party_ptp_id';
711: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
712: END IF;
713: -- call ptp_based_exemptions with p_bill_to_party_ptp_id,
714: get_exemptions( p_bill_to_party_ptp_id,
715: p_bill_to_cust_acct_id,

Line 754: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

750: IF x_exemption_rec.exemption_id IS NULL THEN
751: -- call ptp_based_exemptions with p_sold_to_party_ptp_id,
752: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
753: l_log_msg := 'Calling get_exemptions with p_sold_to_party_ptp_id';
754: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
755: END IF;
756: get_exemptions( p_sold_to_party_ptp_id,
757: p_bill_to_cust_acct_id,
758: p_bill_to_cust_site_use_id,

Line 887: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);

883: l_start_date,
884: l_end_date);
885: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
886: l_log_msg := 'l_start_date '||to_char(l_start_date);
887: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', l_log_msg);
888: END IF;
889:
890:
891: n := l_tax_jurisdiction_id_tbl.last;

Line 912: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', 'Unapproved exemption exists');

908: and nvl(tax_jurisdiction_id,-999) = nvl(l_tax_jurisdiction_id,-999)
909: and exemption_status_code = 'UNAPPROVED';
910:
911: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
912: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions', 'Unapproved exemption exists');
913: END IF;
914:
915: exception
916: when no_data_found THEN

Line 925: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions',

921:
922: IF l_exists = 'N' THEN
923: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
924: l_log_msg := 'Create Unapproved Exemption';
925: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions',
926: l_log_msg);
927: END IF;
928:
929: SELECT zx_exemptions_s.nextval

Line 939: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions',

935: x_exemption_rec.exempt_reason_code := p_reason_code;
936: x_exemption_rec.exempt_certificate_number := p_exempt_certificate_number;
937:
938: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
939: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || 'Get_tax_exemptions',
940: 'Exemption Id '|| to_char(x_exemption_rec.exemption_id) || ' '||
941: 'Tax Regime Code '|| p_TAX_REGIME_CODE || ' '||
942: 'Tax '|| p_TAX || ' '||
943: 'Tax Status Code ' ||p_TAX_STATUS_CODE || ' ' ||