DBA Data[Home] [Help]

APPS.CZ_MODEL_MIGRATION_PVT dependencies on FND_LOG

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

99: EXCEPTION
100: WHEN OTHERS THEN
101: x_status := FND_API.G_RET_STS_ERROR;
102: l_errbuf := SQLERRM;
103: cz_utils.log_report(G_PKG_NAME, l_api_name, null, l_errbuf, fnd_log.LEVEL_UNEXPECTED);
104: END;
105: ---------------------------------------------------------------------------------------
106: /*
107: * Migrate Models concurrent procedure.

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

147: END LOOP;
148:
149: IF NOT l_mig_group_found THEN
150: errbuf := cz_utils.get_text('CZ_INVALID_MIGR_GROUP_NUMBER', 'MIGRGRP', p_request_id);
151: log_msg(l_api_name, l_ndebug, errbuf , FND_LOG.LEVEL_PROCEDURE);
152: raise_application_error('-20020', 'INVALID_MIGRATION_GROUP');
153: END IF;
154:
155: retcode := cz_pb_mgr.GLOBAL_EXPORT_RETCODE;

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

303: END create_maps;
304:
305: BEGIN
306: l_ndebug := 1;
307: log_msg(l_api_name, l_ndebug, 'model_id=' || p_model_id, FND_LOG.LEVEL_PROCEDURE);
308:
309: SELECT config_hdr_id, config_rev_nbr, component_id
310: BULK COLLECT INTO l_hdr_tbl, l_rev_tbl, l_mdl_tbl
311: FROM cz_config_hdrs hdr

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

325: SELECT name INTO l_model_name
326: FROM cz_devl_projects
327: WHERE devl_project_id = p_model_id;
328: l_msg := cz_utils.get_text('CZ_UPGCFG_NO_CFG', 'MODELNAME', l_model_name);
329: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
330: x_retcode := CP_RETCODE_SUCCESS;
331: RETURN;
332: ELSE
333: l_msg := 'Number of configs found which need to be upgraded for model '

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

331: RETURN;
332: ELSE
333: l_msg := 'Number of configs found which need to be upgraded for model '
334: || p_model_id|| ': ' || l_hdr_tbl.COUNT;
335: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
336: END IF;
337:
338: l_ndebug := 2;
339: l_cmt_rec_count := 0;

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

370: ELSIF l_model_type = MODEL_TYPE_NAME_ERR THEN
371: -- should never happen, otherwise need an fnd msg
372: l_msg := 'Model ' || l_model_id || ' cannot be used in config upgrade ' ||
373: 'because some nodes have no name';
374: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);
375: END IF;
376: l_model_type_map(l_model_id) := l_model_type;
377: END IF;
378:

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

379: -- print_maps(l_prj_pid_name_map, l_ref_node_map, l_model_type_map);
380: IF l_model_type <> MODEL_TYPE_NAME_ERR THEN
381: l_msg := 'Processing config (' || l_hdr_tbl(i) || ',' || l_rev_tbl(i) ||
382: ') vs. type ' || l_model_type || ' model ' || l_model_id;
383: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
384: END IF;
385:
386: l_miss_item_tbl.DELETE;
387: IF l_model_type = MODEL_TYPE_NORMAL THEN

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

467: l_no_miss_item := FALSE;
468: FOR j IN l_miss_item_tbl.FIRST ..l_miss_item_tbl.LAST LOOP
469: l_msg := cz_utils.get_text('CZ_UPGCFG_ITEM_NO_NODE', 'ID', to_char(l_miss_item_tbl(j)),
470: 'HDR', to_char(l_hdr_tbl(i)), 'REV', to_char(l_rev_tbl(i)));
471: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
472: END LOOP;
473: END IF;
474:
475: IF l_model_type = MODEL_TYPE_NAME_ERR THEN

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

476: l_msg := 'config (' || l_hdr_tbl(i) || ',' || l_rev_tbl(i) || ') not upgraded';
477: ELSE
478: l_msg := 'config (' || l_hdr_tbl(i) || ',' || l_rev_tbl(i) || ') upgraded';
479: END IF;
480: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_STATEMENT);
481: END LOOP;
482:
483: l_ndebug := 10;
484: IF l_cmt_rec_count > 0 THEN

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

495: x_retcode := CP_RETCODE_WARNING;
496: -- x_msg := 'Not all configs with model ' || p_model_id || ' upgraded: ' ||
497: -- 'some configs either not processed at all or just partially upgraded';
498: END IF;
499: -- log_msg(l_api_name, l_ndebug, x_msg, FND_LOG.LEVEL_PROCEDURE);
500: EXCEPTION
501: WHEN OTHERS THEN
502: x_retcode := CP_RETCODE_FAILURE;
503: l_msg := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||

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

501: WHEN OTHERS THEN
502: x_retcode := CP_RETCODE_FAILURE;
503: l_msg := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||
504: substr(SQLERRM,1,900);
505: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_UNEXPECTED);
506: END upgrade_configs_by_model;
507: --------------------------------------------------------------------------------
508:
509: PROCEDURE upgrade_configs_by_item(p_organization_id IN NUMBER

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

522: l_msg_name VARCHAR2(30);
523: BEGIN
524: l_ndebug := 1;
525: l_msg := 'BEGIN: org=' || p_organization_id || ', inv item=' || p_inventory_item_id;
526: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
527: l_model_id := cz_cf_api.config_model_for_item(p_inventory_item_id,
528: p_organization_id, SYSDATE, p_application_id, NULL);
529: IF l_model_id IS NULL THEN
530: x_retcode := CP_RETCODE_FAILURE;

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

529: IF l_model_id IS NULL THEN
530: x_retcode := CP_RETCODE_FAILURE;
531: l_msg := cz_utils.get_text('CZ_UPGCFG_NO_PUB_ITEM', 'ITEM', to_char(p_inventory_item_id),
532: 'ORG', to_char(p_organization_id));
533: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);
534: RETURN;
535: END IF;
536:
537: l_ndebug := 2;

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

556: l_msg_name := 'CZ_UPGCFG_ITEM_FAIL';
557: END IF;
558: l_msg := cz_utils.get_text(l_msg_name, 'ITEM', to_char(p_inventory_item_id),
559: 'ORG', to_char(p_organization_id));
560: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
561: EXCEPTION
562: WHEN OTHERS THEN
563: x_retcode := CP_RETCODE_FAILURE;
564: l_msg := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||

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

562: WHEN OTHERS THEN
563: x_retcode := CP_RETCODE_FAILURE;
564: l_msg := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||
565: substr(SQLERRM,1,900);
566: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_UNEXPECTED);
567: END upgrade_configs_by_item;
568: --------------------------------------------------------------------------------
569:
570: /*

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

616: 'to_item=' || nvl(p_top_inv_item_to, 'null') || ',' ||
617: 'application=' || nvl(to_char(p_application_id), 'null') || ',' ||
618: 'begin_date=' || nvl(p_config_begin_date, 'null') || ',' ||
619: 'end_date=' || nvl(p_config_end_date, 'null');
620: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
621:
622: l_num_success := 0;
623: l_num_warning := 0;
624: l_num_failure := 0;

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

658: END IF;
659: END IF;
660:
661: l_num_invitem := l_item_tbl.COUNT;
662: log_msg(l_api_name, l_ndebug, 'Number of items: ' || l_num_invitem, FND_LOG.LEVEL_ERROR);
663: IF l_num_invitem = 0 THEN
664: retcode := CP_RETCODE_SUCCESS;
665: RETURN;
666: END IF;

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

698: retcode := CP_RETCODE_WARNING;
699: END IF;
700: l_msg := cz_utils.get_text('CZ_UPGCFG_ITEMS', 'NSUCC', to_char(l_num_success),
701: 'NWARN', to_char(l_num_warning), 'NFAIL', to_char(l_num_failure));
702: -- log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_ERROR);
703: errbuf := l_msg;
704: EXCEPTION
705: WHEN OTHERS THEN
706: retcode := CP_RETCODE_FAILURE;

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

744: l_msg := 'BEGIN: product_key=' || p_product_key || ',' ||
745: 'application=' || nvl(to_char(p_application_id), 'null') || ',' ||
746: 'begin_date=' || nvl(p_config_begin_date, 'null') || ',' ||
747: 'end_date=' || nvl(p_config_end_date, 'null');
748: log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
749:
750: l_begin_date := fnd_date.canonical_to_date(p_config_begin_date);
751: l_end_date := fnd_date.canonical_to_date(p_config_end_date);
752:

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

756: l_model_id := cz_cf_api.config_model_for_product(p_product_key,SYSDATE,p_application_id,NULL);
757: IF l_model_id IS NULL THEN
758: errbuf := cz_utils.get_text('CZ_UPGCFG_NO_PUB_PRD', 'PRD', p_product_key);
759: retcode := CP_RETCODE_FAILURE;
760: log_msg(l_api_name, l_ndebug, errbuf, FND_LOG.LEVEL_ERROR);
761: RETURN;
762: ELSE
763: -- 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.
764: DECLARE

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

784: language => NULL
785: );
786: errbuf := cz_utils.get_text ('CZ_UPGCFG_WRONG_PUB4PRODKEY', 'PUBID1', v_publication_id, 'PUBID2', v_publication_id);
787: retcode := CP_RETCODE_FAILURE;
788: log_msg (l_api_name, l_ndebug, errbuf, FND_LOG.LEVEL_ERROR);
789: RETURN;
790: ELSE
791: CLOSE cur_model_migrated;
792: END IF;

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

815: l_msg_name := 'CZ_UPGCFG_PROD_FAIL';
816: END IF;
817: errbuf := cz_utils.get_text(l_msg_name, 'PRD', p_product_key);
818: -- l_msg := 'retcode=' || retcode || ',msg=' || errbuf;
819: -- log_msg(l_api_name, l_ndebug, l_msg, FND_LOG.LEVEL_PROCEDURE);
820: EXCEPTION
821: WHEN OTHERS THEN
822: retcode := CP_RETCODE_FAILURE;
823: errbuf := 'Fatal error in ' || l_api_name || '.' || l_ndebug || ': ' ||