DBA Data[Home] [Help]

APPS.CZ_UPGRADE dependencies on CZ_UPGRADE

Line 1: PACKAGE BODY CZ_UPGRADE AS

1: PACKAGE BODY CZ_UPGRADE AS
2: /* $Header: czupgrdb.pls 120.2 2008/06/05 20:42:40 misheehy ship $ */
3:
4: currentmodelid NUMBER;
5:

Line 989: INTO cz_upgrade.v_schema_version

985:
986: v_schema_version cz_db_settings.value%TYPE;
987: BEGIN
988: SELECT value
989: INTO cz_upgrade.v_schema_version
990: FROM cz_db_settings
991: WHERE cz_db_settings.setting_id = MAJOR_SCHEMA_VERSION;
992: RETURN cz_upgrade.v_schema_version;
993: EXCEPTION

Line 992: RETURN cz_upgrade.v_schema_version;

988: SELECT value
989: INTO cz_upgrade.v_schema_version
990: FROM cz_db_settings
991: WHERE cz_db_settings.setting_id = MAJOR_SCHEMA_VERSION;
992: RETURN cz_upgrade.v_schema_version;
993: EXCEPTION
994: WHEN OTHERS THEN
995: cz_upgrade.v_schema_version := 0;
996: RETURN cz_upgrade.v_schema_version;

Line 995: cz_upgrade.v_schema_version := 0;

991: WHERE cz_db_settings.setting_id = MAJOR_SCHEMA_VERSION;
992: RETURN cz_upgrade.v_schema_version;
993: EXCEPTION
994: WHEN OTHERS THEN
995: cz_upgrade.v_schema_version := 0;
996: RETURN cz_upgrade.v_schema_version;
997: END get_major_version;
998: ------------------------
999: ---------procedure that logs errors to cz_db_logs.

Line 996: RETURN cz_upgrade.v_schema_version;

992: RETURN cz_upgrade.v_schema_version;
993: EXCEPTION
994: WHEN OTHERS THEN
995: cz_upgrade.v_schema_version := 0;
996: RETURN cz_upgrade.v_schema_version;
997: END get_major_version;
998: ------------------------
999: ---------procedure that logs errors to cz_db_logs.
1000: PROCEDURE report_upgrade_logic_errors(p_from_schema VARCHAR2,

Line 1114: PROCEDURE get_lce_headers(p_model_flag IN VARCHAR2, x_lce_header_tbl IN OUT NOCOPY cz_upgrade.t_ref, x_err_message IN OUT NOCOPY VARCHAR2)

1110: ---------procedure that gets valid LCE headers for source and published models
1111: ---------p_model_flag is 'S' for a source model and 'P' for a published model
1112: ---------x_lce_header_tbl is the table of valid lce headers.
1113:
1114: PROCEDURE get_lce_headers(p_model_flag IN VARCHAR2, x_lce_header_tbl IN OUT NOCOPY cz_upgrade.t_ref, x_err_message IN OUT NOCOPY VARCHAR2)
1115: IS
1116:
1117: v_published_root_models_tbl cz_upgrade.t_ref;
1118: v_all_published_models_tbl cz_upgrade.t_ref;

Line 1117: v_published_root_models_tbl cz_upgrade.t_ref;

1113:
1114: PROCEDURE get_lce_headers(p_model_flag IN VARCHAR2, x_lce_header_tbl IN OUT NOCOPY cz_upgrade.t_ref, x_err_message IN OUT NOCOPY VARCHAR2)
1115: IS
1116:
1117: v_published_root_models_tbl cz_upgrade.t_ref;
1118: v_all_published_models_tbl cz_upgrade.t_ref;
1119: v_child_models_tbl cz_upgrade.t_ref;
1120: v_lce_hdrs_tbl cz_upgrade.t_ref;
1121: v_published_model_count NUMBER := 0;

Line 1118: v_all_published_models_tbl cz_upgrade.t_ref;

1114: PROCEDURE get_lce_headers(p_model_flag IN VARCHAR2, x_lce_header_tbl IN OUT NOCOPY cz_upgrade.t_ref, x_err_message IN OUT NOCOPY VARCHAR2)
1115: IS
1116:
1117: v_published_root_models_tbl cz_upgrade.t_ref;
1118: v_all_published_models_tbl cz_upgrade.t_ref;
1119: v_child_models_tbl cz_upgrade.t_ref;
1120: v_lce_hdrs_tbl cz_upgrade.t_ref;
1121: v_published_model_count NUMBER := 0;
1122:

Line 1119: v_child_models_tbl cz_upgrade.t_ref;

1115: IS
1116:
1117: v_published_root_models_tbl cz_upgrade.t_ref;
1118: v_all_published_models_tbl cz_upgrade.t_ref;
1119: v_child_models_tbl cz_upgrade.t_ref;
1120: v_lce_hdrs_tbl cz_upgrade.t_ref;
1121: v_published_model_count NUMBER := 0;
1122:
1123: BEGIN

Line 1120: v_lce_hdrs_tbl cz_upgrade.t_ref;

1116:
1117: v_published_root_models_tbl cz_upgrade.t_ref;
1118: v_all_published_models_tbl cz_upgrade.t_ref;
1119: v_child_models_tbl cz_upgrade.t_ref;
1120: v_lce_hdrs_tbl cz_upgrade.t_ref;
1121: v_published_model_count NUMBER := 0;
1122:
1123: BEGIN
1124: IF (p_model_flag = 'S') THEN

Line 1375: cz_upgrade.v_lce_hdr := p_lce_header_id ;

1371:
1372: COMMIT;
1373: EXCEPTION
1374: WHEN OTHERS THEN
1375: cz_upgrade.v_lce_hdr := p_lce_header_id ;
1376: x_populate_error_flag := '1';
1377: report_upgrade_logic_errors(cz_upgrade.v_schema_version,'18',cz_upgrade.v_lce_hdr,x_populate_error_msg,'LOGIC_UPGRADE' );
1378: END cz_populate_lce_load_specs;
1379: -------------------------------------------

Line 1377: report_upgrade_logic_errors(cz_upgrade.v_schema_version,'18',cz_upgrade.v_lce_hdr,x_populate_error_msg,'LOGIC_UPGRADE' );

1373: EXCEPTION
1374: WHEN OTHERS THEN
1375: cz_upgrade.v_lce_hdr := p_lce_header_id ;
1376: x_populate_error_flag := '1';
1377: report_upgrade_logic_errors(cz_upgrade.v_schema_version,'18',cz_upgrade.v_lce_hdr,x_populate_error_msg,'LOGIC_UPGRADE' );
1378: END cz_populate_lce_load_specs;
1379: -------------------------------------------
1380: ----------procedure that upgrades the existing logic files to 18 schema
1381:

Line 1385: v_source_lce_headers_tbl cz_upgrade.t_ref;

1381:
1382: PROCEDURE upgrade_logic_files_to_18
1383: IS
1384:
1385: v_source_lce_headers_tbl cz_upgrade.t_ref;
1386: v_published_lce_headers_tbl cz_upgrade.t_ref;
1387: x_populate_flag VARCHAR2(1);
1388: x_populate_error VARCHAR2(2000);
1389: v_major_version cz_db_settings.value%TYPE;

Line 1386: v_published_lce_headers_tbl cz_upgrade.t_ref;

1382: PROCEDURE upgrade_logic_files_to_18
1383: IS
1384:
1385: v_source_lce_headers_tbl cz_upgrade.t_ref;
1386: v_published_lce_headers_tbl cz_upgrade.t_ref;
1387: x_populate_flag VARCHAR2(1);
1388: x_populate_error VARCHAR2(2000);
1389: v_major_version cz_db_settings.value%TYPE;
1390:

Line 1429: report_upgrade_logic_errors(v_major_version,'18',cz_upgrade.v_lce_hdr,x_populate_error,'LOGIC_UPGRADE');

1425: END LOOP;
1426: END IF;
1427: ELSE
1428: x_populate_error := 'Logic upgrade is not required when upgrading from an 18 to 18 schema or a higher version' ;
1429: report_upgrade_logic_errors(v_major_version,'18',cz_upgrade.v_lce_hdr,x_populate_error,'LOGIC_UPGRADE');
1430: END IF;
1431: EXCEPTION
1432: WHEN OTHERS THEN
1433: report_upgrade_logic_errors(v_major_version,'18',cz_upgrade.v_lce_hdr,x_populate_error,'LOGIC_UPGRADE');

Line 1433: report_upgrade_logic_errors(v_major_version,'18',cz_upgrade.v_lce_hdr,x_populate_error,'LOGIC_UPGRADE');

1429: report_upgrade_logic_errors(v_major_version,'18',cz_upgrade.v_lce_hdr,x_populate_error,'LOGIC_UPGRADE');
1430: END IF;
1431: EXCEPTION
1432: WHEN OTHERS THEN
1433: report_upgrade_logic_errors(v_major_version,'18',cz_upgrade.v_lce_hdr,x_populate_error,'LOGIC_UPGRADE');
1434: END upgrade_logic_files_to_18;
1435: --------------------------------------------
1436: --------------procedure that verifies upgraded logic
1437: PROCEDURE verify_logic (x_logic_status IN OUT NOCOPY VARCHAR2)

Line 1440: v_source_lce_headers_tbl cz_upgrade.t_ref;

1436: --------------procedure that verifies upgraded logic
1437: PROCEDURE verify_logic (x_logic_status IN OUT NOCOPY VARCHAR2)
1438: IS
1439:
1440: v_source_lce_headers_tbl cz_upgrade.t_ref;
1441: v_published_lce_headers_tbl cz_upgrade.t_ref;
1442: v_all_lce_headers cz_upgrade.t_ref;
1443: v_attachment_expl_id_tbl cz_upgrade.t_ref;
1444: v_net_type_tbl cz_upgrade.t_ref;

Line 1441: v_published_lce_headers_tbl cz_upgrade.t_ref;

1437: PROCEDURE verify_logic (x_logic_status IN OUT NOCOPY VARCHAR2)
1438: IS
1439:
1440: v_source_lce_headers_tbl cz_upgrade.t_ref;
1441: v_published_lce_headers_tbl cz_upgrade.t_ref;
1442: v_all_lce_headers cz_upgrade.t_ref;
1443: v_attachment_expl_id_tbl cz_upgrade.t_ref;
1444: v_net_type_tbl cz_upgrade.t_ref;
1445: v_required_expl_tbl cz_upgrade.t_ref;

Line 1442: v_all_lce_headers cz_upgrade.t_ref;

1438: IS
1439:
1440: v_source_lce_headers_tbl cz_upgrade.t_ref;
1441: v_published_lce_headers_tbl cz_upgrade.t_ref;
1442: v_all_lce_headers cz_upgrade.t_ref;
1443: v_attachment_expl_id_tbl cz_upgrade.t_ref;
1444: v_net_type_tbl cz_upgrade.t_ref;
1445: v_required_expl_tbl cz_upgrade.t_ref;
1446: x_error_msg VARCHAR2(2000);

Line 1443: v_attachment_expl_id_tbl cz_upgrade.t_ref;

1439:
1440: v_source_lce_headers_tbl cz_upgrade.t_ref;
1441: v_published_lce_headers_tbl cz_upgrade.t_ref;
1442: v_all_lce_headers cz_upgrade.t_ref;
1443: v_attachment_expl_id_tbl cz_upgrade.t_ref;
1444: v_net_type_tbl cz_upgrade.t_ref;
1445: v_required_expl_tbl cz_upgrade.t_ref;
1446: x_error_msg VARCHAR2(2000);
1447: allHeadersCount NUMBER := 0;

Line 1444: v_net_type_tbl cz_upgrade.t_ref;

1440: v_source_lce_headers_tbl cz_upgrade.t_ref;
1441: v_published_lce_headers_tbl cz_upgrade.t_ref;
1442: v_all_lce_headers cz_upgrade.t_ref;
1443: v_attachment_expl_id_tbl cz_upgrade.t_ref;
1444: v_net_type_tbl cz_upgrade.t_ref;
1445: v_required_expl_tbl cz_upgrade.t_ref;
1446: x_error_msg VARCHAR2(2000);
1447: allHeadersCount NUMBER := 0;
1448: SOURCELCEHEADER NUMBER := 0;

Line 1445: v_required_expl_tbl cz_upgrade.t_ref;

1441: v_published_lce_headers_tbl cz_upgrade.t_ref;
1442: v_all_lce_headers cz_upgrade.t_ref;
1443: v_attachment_expl_id_tbl cz_upgrade.t_ref;
1444: v_net_type_tbl cz_upgrade.t_ref;
1445: v_required_expl_tbl cz_upgrade.t_ref;
1446: x_error_msg VARCHAR2(2000);
1447: allHeadersCount NUMBER := 0;
1448: SOURCELCEHEADER NUMBER := 0;
1449: publishedLceHeader NUMBER := 0;

Line 3271: END CZ_UPGRADE;

3267: values (sysdate,l_message,'PBVISIONMODELS');
3268: commit;
3269: END;
3270: --------------------------------------------------------------------------------------
3271: END CZ_UPGRADE;