6899: --
6900: -- The following columns will be migrated by the Common migration script.
6901: --
6902: -- gmd_ss_storage_package quantity_uom
6903: -- gmd_stability_studies_b organization_id
6904: -- gmd_stability_studies_b lab_organization_id
6905: -- gmd_ss_material_sources source_organization_id
6906: -- gmd_ss_material_sources sample_quantity_uom
6907: -- gmd_ss_variants sample_quantity_uom
6900: -- The following columns will be migrated by the Common migration script.
6901: --
6902: -- gmd_ss_storage_package quantity_uom
6903: -- gmd_stability_studies_b organization_id
6904: -- gmd_stability_studies_b lab_organization_id
6905: -- gmd_ss_material_sources source_organization_id
6906: -- gmd_ss_material_sources sample_quantity_uom
6907: -- gmd_ss_variants sample_quantity_uom
6908: --=========================================================================== */
6945: NULL_DEFAULT_LAB EXCEPTION;
6946:
6947:
6948: /*=====================================
6949: Cursor for gmd_stability_studies_b.
6950: =====================================*/
6951:
6952: -- Bug# 5109234
6953: -- Removed organization_id IS NULL from the where clause and added orgn_code IS NOT NULL.
6953: -- Removed organization_id IS NULL from the where clause and added orgn_code IS NOT NULL.
6954: CURSOR get_stab IS
6955: SELECT orgn_code, organization_id, item_id, qc_lab_orgn_code,
6956: lab_organization_id, ss_id
6957: FROM gmd_stability_studies_b
6958: WHERE migrated_ind IS NULL
6959: AND orgn_code IS NOT NULL;
6960:
6961: l_store_loct_ctl ic_whse_mst.loct_ctl%TYPE;
6961: l_store_loct_ctl ic_whse_mst.loct_ctl%TYPE;
6962: l_splan_loct_ctl ic_whse_mst.loct_ctl%TYPE;
6963: l_hist_loct_ctl ic_whse_mst.loct_ctl%TYPE;
6964: l_svar_loct_ctl ic_whse_mst.loct_ctl%TYPE;
6965: l_inventory_item_id gmd_stability_studies_b.inventory_item_id%TYPE;
6966: l_subinv mtl_item_locations.subinventory_code%TYPE;
6967: lsub_organization_id mtl_item_locations.organization_id%TYPE;
6968: l_lot_orgn_code gmd_stability_studies_b.orgn_code%TYPE;
6969: l_stab_org_id gmd_stability_studies_b.organization_id%TYPE;
6964: l_svar_loct_ctl ic_whse_mst.loct_ctl%TYPE;
6965: l_inventory_item_id gmd_stability_studies_b.inventory_item_id%TYPE;
6966: l_subinv mtl_item_locations.subinventory_code%TYPE;
6967: lsub_organization_id mtl_item_locations.organization_id%TYPE;
6968: l_lot_orgn_code gmd_stability_studies_b.orgn_code%TYPE;
6969: l_stab_org_id gmd_stability_studies_b.organization_id%TYPE;
6970:
6971:
6972: /*=====================================
6965: l_inventory_item_id gmd_stability_studies_b.inventory_item_id%TYPE;
6966: l_subinv mtl_item_locations.subinventory_code%TYPE;
6967: lsub_organization_id mtl_item_locations.organization_id%TYPE;
6968: l_lot_orgn_code gmd_stability_studies_b.orgn_code%TYPE;
6969: l_stab_org_id gmd_stability_studies_b.organization_id%TYPE;
6970:
6971:
6972: /*=====================================
6973: Cursor for gmd_storage_plan_details.
6996: =====================================*/
6997:
6998: CURSOR get_stab_study_org(p_package_id gmd_ss_storage_package.package_id%TYPE) IS
6999: SELECT distinct gssb.orgn_code, gsv.package_id
7000: FROM gmd_stability_studies_b gssb, gmd_ss_variants gsv
7001: WHERE gssb.ss_id = gsv.ss_id
7002: AND gsv.package_id = p_package_id;
7003:
7004: l_stab_orgn_code gmd_stability_studies_b.orgn_code%TYPE;
7000: FROM gmd_stability_studies_b gssb, gmd_ss_variants gsv
7001: WHERE gssb.ss_id = gsv.ss_id
7002: AND gsv.package_id = p_package_id;
7003:
7004: l_stab_orgn_code gmd_stability_studies_b.orgn_code%TYPE;
7005: l_gsv_package_id gmd_ss_variants.package_id%TYPE;
7006:
7007: /*=====================================
7008: Cursor for gmd_ss_storage_package.
7058: /*===============================================
7059: Cursor to get stability study org and item.
7060: ===============================================*/
7061:
7062: CURSOR get_stab_study (p_ss_id gmd_stability_studies_b.ss_id%TYPE) IS
7063: SELECT orgn_code, item_id
7064: FROM gmd_stability_studies_b
7065: WHERE ss_id = p_ss_id;
7066:
7060: ===============================================*/
7061:
7062: CURSOR get_stab_study (p_ss_id gmd_stability_studies_b.ss_id%TYPE) IS
7063: SELECT orgn_code, item_id
7064: FROM gmd_stability_studies_b
7065: WHERE ss_id = p_ss_id;
7066:
7067: l_ss_orgn_code gmd_stability_studies_b.orgn_code%TYPE;
7068: l_ss_item_id gmd_stability_studies_b.item_id%TYPE;
7063: SELECT orgn_code, item_id
7064: FROM gmd_stability_studies_b
7065: WHERE ss_id = p_ss_id;
7066:
7067: l_ss_orgn_code gmd_stability_studies_b.orgn_code%TYPE;
7068: l_ss_item_id gmd_stability_studies_b.item_id%TYPE;
7069:
7070: l_lot_number mtl_lot_numbers.lot_number%TYPE;
7071: l_parent_lot_number mtl_lot_numbers.parent_lot_number%TYPE;
7064: FROM gmd_stability_studies_b
7065: WHERE ss_id = p_ss_id;
7066:
7067: l_ss_orgn_code gmd_stability_studies_b.orgn_code%TYPE;
7068: l_ss_item_id gmd_stability_studies_b.item_id%TYPE;
7069:
7070: l_lot_number mtl_lot_numbers.lot_number%TYPE;
7071: l_parent_lot_number mtl_lot_numbers.parent_lot_number%TYPE;
7072: l_failure_count NUMBER;
7370: GMA_COMMON_LOGGING.gma_migration_central_log (
7371: p_run_id => p_migration_run_id,
7372: p_log_level => FND_LOG.LEVEL_EVENT,
7373: p_message_token => 'GMA_MIGRATION_TABLE_STARTED',
7374: p_table_name => 'GMD_STABILITY_STUDIES_B',
7375: p_token1 => 'TABLE_NAME',
7376: p_param1 => 'GMD_STABILITY_STUDIES_B',
7377: p_context => 'Quality Stability Studies',
7378: p_app_short_name => 'GMA');
7372: p_log_level => FND_LOG.LEVEL_EVENT,
7373: p_message_token => 'GMA_MIGRATION_TABLE_STARTED',
7374: p_table_name => 'GMD_STABILITY_STUDIES_B',
7375: p_token1 => 'TABLE_NAME',
7376: p_param1 => 'GMD_STABILITY_STUDIES_B',
7377: p_context => 'Quality Stability Studies',
7378: p_app_short_name => 'GMA');
7379:
7380: /*=====================================
7377: p_context => 'Quality Stability Studies',
7378: p_app_short_name => 'GMA');
7379:
7380: /*=====================================
7381: Migrate gmd_stability_studies_b.
7382: =====================================*/
7383:
7384: GMD_QC_MIG12.g_stab_pro_count := 0;
7385: GMD_QC_MIG12.g_stab_upd_count := 0;
7424: ELSE
7425: l_inventory_item_id := NULL;
7426: END IF;
7427:
7428: UPDATE gmd_stability_studies_b
7429: SET inventory_item_id = l_inventory_item_id,
7430: organization_id = l_stab_org_id,
7431: migrated_ind = 1
7432: WHERE ss_id = l_stab_rec.ss_id;
7442: GMA_COMMON_LOGGING.gma_migration_central_log (
7443: p_run_id => p_migration_run_id,
7444: p_log_level => FND_LOG.LEVEL_ERROR,
7445: p_message_token => 'GMD_MIG_NO_ORG',
7446: p_context => 'Quality Stability Studies - gmd_stability_studies_b',
7447: p_token1 => 'ORG',
7448: p_token2 => 'ONAME',
7449: p_token3 => 'ROWK',
7450: p_token4 => 'ROWV',
7460: GMA_COMMON_LOGGING.gma_migration_central_log (
7461: p_run_id => p_migration_run_id,
7462: p_log_level => FND_LOG.LEVEL_ERROR,
7463: p_message_token => 'GMD_MIG_NO_ORG',
7464: p_context => 'Quality Stability Studies - gmd_stability_studies_b',
7465: p_token1 => 'ORG',
7466: p_token2 => 'ONAME',
7467: p_token3 => 'ROWK',
7468: p_token4 => 'ROWV',
7478: GMA_COMMON_LOGGING.gma_migration_central_log (
7479: p_run_id => p_migration_run_id,
7480: p_log_level => FND_LOG.LEVEL_ERROR,
7481: p_message_token => 'GMD_MIG_ODM_ITEM',
7482: p_context => 'Quality Stability Studies - gmd_stability_studies_b',
7483: p_token1 => 'ORG',
7484: p_token2 => 'ITEMID',
7485: p_token3 => 'ROWK',
7486: p_token4 => 'ROWV',
7497: GMA_COMMON_LOGGING.gma_migration_central_log (
7498: p_run_id => p_migration_run_id,
7499: p_log_level => FND_LOG.LEVEL_UNEXPECTED,
7500: p_message_token => 'GMA_MIGRATION_DB_ERROR',
7501: p_context => 'Quality Stability Studies - gmd_stability_studies_b',
7502: p_db_error => SQLERRM,
7503: p_app_short_name => 'GMA');
7504: x_exception_count := x_exception_count + 1;
7505: ROLLBACK;
7510:
7511:
7512:
7513: /*==============================================
7514: Log End of gmd_stability_studies_b.
7515: ==============================================*/
7516:
7517: LOG_SS_COUNTS(p_migration_run_id, GMD_QC_MIG12.g_progress_ind);
7518:
8237:
8238: UPDATE gmd_ss_variants
8239: SET package_id = l_package_id
8240: WHERE package_id = l_store_pack.package_id
8241: AND ss_id IN (select ss_id from gmd_stability_studies_b where orgn_code = l_stab_orgn_code);
8242:
8243: -- AND ss_id = (select ss_id from gmd_stability_studies_b where organization_id = l_ss_org_id);
8244:
8245:
8239: SET package_id = l_package_id
8240: WHERE package_id = l_store_pack.package_id
8241: AND ss_id IN (select ss_id from gmd_stability_studies_b where orgn_code = l_stab_orgn_code);
8242:
8243: -- AND ss_id = (select ss_id from gmd_stability_studies_b where organization_id = l_ss_org_id);
8244:
8245:
8246: FETCH get_stab_study_org INTO l_stab_orgn_code, l_gsv_package_id;
8247: