DBA Data[Home] [Help]

APPS.CZ_MODEL_MIGRATION_PVT dependencies on FND_LOG

Line 79: cz_utils.log_report(G_PKG_NAME, l_api_name, null, l_errbuf, fnd_log.LEVEL_UNEXPECTED);

75: EXCEPTION
76: WHEN OTHERS THEN
77: x_status := FND_API.G_RET_STS_ERROR;
78: l_errbuf := SQLERRM;
79: cz_utils.log_report(G_PKG_NAME, l_api_name, null, l_errbuf, fnd_log.LEVEL_UNEXPECTED);
80: END;
81: ---------------------------------------------------------------------------------------
82: /*
83: * Migrate Models concurrent procedure.

Line 127: log_msg(l_api_name, l_ndebug, errbuf , FND_LOG.LEVEL_PROCEDURE);

123: END LOOP;
124:
125: IF NOT l_mig_group_found THEN
126: errbuf := cz_utils.get_text('CZ_INVALID_MIGR_GROUP_NUMBER', 'MIGRGRP', p_request_id);
127: log_msg(l_api_name, l_ndebug, errbuf , FND_LOG.LEVEL_PROCEDURE);
128: raise_application_error('-20020', 'INVALID_MIGRATION_GROUP');
129: END IF;
130:
131: retcode := cz_pb_mgr.GLOBAL_EXPORT_RETCODE;

Line 283: log_msg(l_api_name, l_ndebug, 'model_id=' || p_model_id, FND_LOG.LEVEL_PROCEDURE);

279: END create_maps;
280:
281: BEGIN
282: l_ndebug := 1;
283: log_msg(l_api_name, l_ndebug, 'model_id=' || p_model_id, FND_LOG.LEVEL_PROCEDURE);
284:
285: SELECT config_hdr_id, config_rev_nbr, component_id
286: BULK COLLECT INTO l_hdr_tbl, l_rev_tbl, l_mdl_tbl
287: FROM cz_config_hdrs hdr

Line 305: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);

301: SELECT name INTO l_model_name
302: FROM cz_devl_projects
303: WHERE devl_project_id = p_model_id;
304: l_msg := cz_utils.get_text('CZ_UPGCFG_NO_CFG', 'MODELNAME', l_model_name);
305: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
306: x_retcode := CP_RETCODE_SUCCESS;
307: RETURN;
308: ELSE
309: l_msg := 'Number of configs found which need to be upgraded for model '

Line 311: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);

307: RETURN;
308: ELSE
309: l_msg := 'Number of configs found which need to be upgraded for model '
310: || p_model_id|| ': ' || l_hdr_tbl.COUNT;
311: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
312: END IF;
313:
314: l_ndebug := 2;
315: l_cmt_rec_count := 0;

Line 350: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);

346: ELSIF l_model_type = MODEL_TYPE_NAME_ERR THEN
347: -- should never happen, otherwise need an fnd msg
348: l_msg := 'Model ' || l_model_id || ' cannot be used in config upgrade ' ||
349: 'because some nodes have no name';
350: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);
351: END IF;
352: l_model_type_map(l_model_id) := l_model_type;
353: END IF;
354:

Line 359: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);

355: -- print_maps(l_prj_pid_name_map, l_ref_node_map, l_model_type_map);
356: IF l_model_type <> MODEL_TYPE_NAME_ERR THEN
357: l_msg := 'Processing config (' || l_hdr_tbl(i) || ',' || l_rev_tbl(i) ||
358: ') vs. type ' || l_model_type || ' model ' || l_model_id;
359: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
360: END IF;
361:
362: l_miss_item_tbl.DELETE;
363: IF l_model_type = MODEL_TYPE_NORMAL THEN

Line 447: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);

443: l_no_miss_item := FALSE;
444: FOR j IN l_miss_item_tbl.FIRST ..l_miss_item_tbl.LAST LOOP
445: l_msg := cz_utils.get_text('CZ_UPGCFG_ITEM_NO_NODE', 'ID', to_char(l_miss_item_tbl(j)),
446: 'HDR', to_char(l_hdr_tbl(i)), 'REV', to_char(l_rev_tbl(i)));
447: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
448: END LOOP;
449: END IF;
450:
451: IF l_model_type = MODEL_TYPE_NAME_ERR THEN

Line 456: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);

452: l_msg := 'config (' || l_hdr_tbl(i) || ',' || l_rev_tbl(i) || ') not upgraded';
453: ELSE
454: l_msg := 'config (' || l_hdr_tbl(i) || ',' || l_rev_tbl(i) || ') upgraded';
455: END IF;
456: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
457: END LOOP;
458:
459: l_ndebug := 10;
460: IF l_cmt_rec_count > 0 THEN

Line 475: -- log_msg(l_api_name, l_ndebug, x_msg, FND_LOG.LEVEL_PROCEDURE);

471: x_retcode := CP_RETCODE_WARNING;
472: -- x_msg := 'Not all configs with model ' || p_model_id || ' upgraded: ' ||
473: -- 'some configs either not processed at all or just partially upgraded';
474: END IF;
475: -- log_msg(l_api_name, l_ndebug, x_msg, FND_LOG.LEVEL_PROCEDURE);
476: EXCEPTION
477: WHEN OTHERS THEN
478: x_retcode := CP_RETCODE_FAILURE;
479: l_msg := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||

Line 481: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_UNEXPECTED);

477: WHEN OTHERS THEN
478: x_retcode := CP_RETCODE_FAILURE;
479: l_msg := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||
480: substr(SQLERRM,1,900);
481: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_UNEXPECTED);
482: END upgrade_configs_by_model;
483: --------------------------------------------------------------------------------
484:
485: PROCEDURE upgrade_configs_by_item(p_organization_id IN NUMBER

Line 502: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);

498: l_msg_name VARCHAR2(30);
499: BEGIN
500: l_ndebug := 1;
501: l_msg := 'BEGIN: org=' || p_organization_id || ', inv item=' || p_inventory_item_id;
502: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
503: l_model_id := cz_cf_api.config_model_for_item(p_inventory_item_id,
504: p_organization_id, SYSDATE, p_application_id, NULL);
505: IF l_model_id IS NULL THEN
506: x_retcode := CP_RETCODE_FAILURE;

Line 509: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);

505: IF l_model_id IS NULL THEN
506: x_retcode := CP_RETCODE_FAILURE;
507: l_msg := cz_utils.get_text('CZ_UPGCFG_NO_PUB_ITEM', 'ITEM', to_char(p_inventory_item_id),
508: 'ORG', to_char(p_organization_id));
509: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);
510: RETURN;
511: END IF;
512:
513: l_ndebug := 2;

Line 536: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);

532: l_msg_name := 'CZ_UPGCFG_ITEM_FAIL';
533: END IF;
534: l_msg := cz_utils.get_text(l_msg_name, 'ITEM', to_char(p_inventory_item_id),
535: 'ORG', to_char(p_organization_id));
536: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
537: EXCEPTION
538: WHEN OTHERS THEN
539: x_retcode := CP_RETCODE_FAILURE;
540: l_msg := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||

Line 542: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_UNEXPECTED);

538: WHEN OTHERS THEN
539: x_retcode := CP_RETCODE_FAILURE;
540: l_msg := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||
541: substr(SQLERRM,1,900);
542: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_UNEXPECTED);
543: END upgrade_configs_by_item;
544: --------------------------------------------------------------------------------
545:
546: /*

Line 596: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);

592: 'to_item=' || nvl(p_top_inv_item_to, 'null') || ',' ||
593: 'application=' || nvl(to_char(p_application_id), 'null') || ',' ||
594: 'begin_date=' || nvl(p_config_begin_date, 'null') || ',' ||
595: 'end_date=' || nvl(p_config_end_date, 'null');
596: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
597:
598: l_num_success := 0;
599: l_num_warning := 0;
600: l_num_failure := 0;

Line 638: log_msg(l_api_name, l_ndebug, 'Number of items: ' || l_num_invitem, FND_LOG.LEVEL_ERROR);

634: END IF;
635: END IF;
636:
637: l_num_invitem := l_item_tbl.COUNT;
638: log_msg(l_api_name, l_ndebug, 'Number of items: ' || l_num_invitem, FND_LOG.LEVEL_ERROR);
639: IF l_num_invitem = 0 THEN
640: retcode := CP_RETCODE_SUCCESS;
641: RETURN;
642: END IF;

Line 678: -- log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);

674: retcode := CP_RETCODE_WARNING;
675: END IF;
676: l_msg := cz_utils.get_text('CZ_UPGCFG_ITEMS', 'NSUCC', to_char(l_num_success),
677: 'NWARN', to_char(l_num_warning), 'NFAIL', to_char(l_num_failure));
678: -- log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);
679: errbuf := l_msg;
680: EXCEPTION
681: WHEN OTHERS THEN
682: retcode := CP_RETCODE_FAILURE;

Line 724: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);

720: l_msg := 'BEGIN: product_key=' || p_product_key || ',' ||
721: 'application=' || nvl(to_char(p_application_id), 'null') || ',' ||
722: 'begin_date=' || nvl(p_config_begin_date, 'null') || ',' ||
723: 'end_date=' || nvl(p_config_end_date, 'null');
724: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
725:
726: l_begin_date := fnd_date.canonical_to_date(p_config_begin_date);
727: l_end_date := fnd_date.canonical_to_date(p_config_end_date);
728:

Line 736: log_msg(l_api_name, l_ndebug, errbuf, FND_LOG.LEVEL_ERROR);

732: l_model_id := cz_cf_api.config_model_for_product(p_product_key,SYSDATE,p_application_id,NULL);
733: IF l_model_id IS NULL THEN
734: errbuf := cz_utils.get_text('CZ_UPGCFG_NO_PUB_PRD', 'PRD', p_product_key);
735: retcode := CP_RETCODE_FAILURE;
736: log_msg(l_api_name, l_ndebug, errbuf, FND_LOG.LEVEL_ERROR);
737: RETURN;
738: ELSE
739: -- Bug 5496507; 14-Sep-2006; kdande; See if the model derived from publication is migrated and error out if it is, else proceed with upgrade.
740: DECLARE

Line 764: log_msg (l_api_name, l_ndebug, errbuf, FND_LOG.LEVEL_ERROR);

760: language => NULL
761: );
762: errbuf := cz_utils.get_text ('CZ_UPGCFG_WRONG_PUB4PRODKEY', 'PUBID1', v_publication_id, 'PUBID2', v_publication_id);
763: retcode := CP_RETCODE_FAILURE;
764: log_msg (l_api_name, l_ndebug, errbuf, FND_LOG.LEVEL_ERROR);
765: RETURN;
766: ELSE
767: CLOSE cur_model_migrated;
768: END IF;

Line 795: -- log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);

791: l_msg_name := 'CZ_UPGCFG_PROD_FAIL';
792: END IF;
793: errbuf := cz_utils.get_text(l_msg_name, 'PRD', p_product_key);
794: -- l_msg := 'retcode=' || retcode || ',msg=' || errbuf;
795: -- log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
796: EXCEPTION
797: WHEN OTHERS THEN
798: retcode := CP_RETCODE_FAILURE;
799: errbuf := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||