[Home] [Help]
4401:
4402:
4403: -- First compare coverage
4404: Cursor Cur_get_cov_info(p_contract_line_id NUMBER) IS
4405: SELECT coverage_id, standard_cov_yn
4406: FROM OKS_K_LINES_B
4407: WHERE cle_id = p_contract_line_id;
4408: -- get the coverage info
4409:
4706:
4707: Open Cur_get_cov_info(p_target_contract_line_id) ;
4708: Fetch Cur_get_cov_info INTO l_tgt_cov_id,l_tgt_std_cov_yn;
4709: Close Cur_get_cov_info;
4710: -- If one standard coverage and the other one customized coverage, raise mismatch
4711: IF l_src_std_cov_yn <> l_tgt_std_cov_yn
4712: Then
4713: Raise G_MISMATCH;
4714: END IF ;
4711: IF l_src_std_cov_yn <> l_tgt_std_cov_yn
4712: Then
4713: Raise G_MISMATCH;
4714: END IF ;
4715: -- If both are standard coverage and are not same, raise mismatch
4716: IF l_src_std_cov_yn = 'Y'
4717: and l_src_cov_id <> l_tgt_cov_id
4718: then
4719: Raise G_MISMATCH;
10075:
10076: End Update_dnz_chr_id;
10077:
10078: /* This procedure is used for creation of PM and notes.
10079: Parameters : p_standard_cov_id : Id of the source coverage or source contract line
10080: p_contract_line_id : Id of the target contract line
10081: Create_K_coverage_ext can be called during the creation of service line from authoring or from renewal
10082: consolidation flow.
10083: */
10090: x_msg_data OUT NOCOPY VARCHAR2) IS
10091:
10092: --Cursor definition
10093: /* Modified by Jvorugan .Added p_source_object_code as input parameter.
10094: This differentiates whether notes is associated with a standard coverage
10095: or a service line */
10096:
10097: CURSOR CUR_GET_NOTES(p_source_object_id IN NUMBER,p_source_object_code IN VARCHAR2)
10098: IS
10140: -- Modified by Jvorugan for Bug:4610475. Added pm_sch_exists_yn,pm_conf_req_yn
10141: CURSOR CUR_CHECK_PM_PROG IS
10142: SELECT pm_program_id,pm_sch_exists_yn,pm_conf_req_yn
10143: FROM OKS_K_LINES_B
10144: WHERE CLE_ID = p_src_line_id; --p_standard_cov_id; -- modified by Jvorugan Bug:4535339 ID = p_standard_cov_id;
10145:
10146: -- Added by Jvorugan
10147: CURSOR CUR_GET_LSE_ID IS
10148: SELECT lse_id
10146: -- Added by Jvorugan
10147: CURSOR CUR_GET_LSE_ID IS
10148: SELECT lse_id
10149: FROM OKC_K_LINES_B
10150: WHERE ID = p_src_line_id; --p_standard_cov_id;
10151:
10152: GET_LSE_ID_REC CUR_GET_LSE_ID%ROWTYPE;
10153:
10154: l_start_date DATE;
10184: open CUR_GET_LSE_ID;
10185: fetch CUR_GET_LSE_ID into GET_LSE_ID_REC;
10186: close CUR_GET_LSE_ID;
10187:
10188: l_source_line_id := p_src_line_id; --p_standard_cov_id;
10189: IF GET_LSE_ID_REC.lse_id in (1,14,19) THEN
10190: l_source_object_code := 'OKS_COV_NOTE';
10191: ELSE
10192: l_source_object_code := 'OKS_COVTMPL_NOTE';
10282: p_init_msg_list => l_init_msg_list,
10283: x_return_status => l_return_status,
10284: x_msg_count => l_msg_count,
10285: x_msg_data => l_msg_data,
10286: p_template_cle_id => p_src_line_id, --p_standard_cov_id,
10287: p_cle_id => p_tgt_line_id, --p_contract_line_id,
10288: p_cov_start_date => l_start_date,
10289: p_cov_end_date => l_end_date);
10290: --errorout_ad('after'||l_return_status);
10370:
10371: END Create_K_coverage_ext;
10372:
10373:
10374: /* This procedure is used for Copying the standard coverage template.
10375: Parameters:
10376: P_old_coverage_id -- ID of the source coverage
10377: P_new_coverage_name -- Name of the Target coverage
10378: x_new_coverage_id -- New Id of the copied coverage */
10375: Parameters:
10376: P_old_coverage_id -- ID of the source coverage
10377: P_new_coverage_name -- Name of the Target coverage
10378: x_new_coverage_id -- New Id of the copied coverage */
10379: PROCEDURE COPY_STANDARD_COVERAGE(
10380: p_api_version IN NUMBER,
10381: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
10382: x_return_status OUT NOCOPY VARCHAR2,
10383: x_msg_count OUT NOCOPY NUMBER,
10450: l_new_br_id OKC_K_LINES_B.ID%TYPE;
10451: l_cov_flag NUMBER;
10452: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
10453:
10454: -- This function is called by copy_standard_coverage for insertion into okc_k_lines_b table
10455: FUNCTION CREATE_OKC_LINE(p_new_line_id NUMBER,
10456: p_old_line_id NUMBER,
10457: p_flag NUMBER,
10458: p_cle_id NUMBER DEFAULT NULL) return VARCHAR2 IS
10720:
10721: END CREATE_OKC_LINE;
10722:
10723:
10724: -- This function is called by copy_standard_coverage for insertion into okc_k_items table
10725: FUNCTION CREATE_OKC_ITEM(p_new_item_id NUMBER,
10726: p_old_item_id NUMBER,
10727: p_cle_id NUMBER) return VARCHAR2 IS
10728:
10800: return x_return_status;
10801:
10802: END CREATE_OKC_ITEM;
10803:
10804: -- This function is called by copy_standard_coverage for insertion into okc_k_party_roles_b table
10805: FUNCTION CREATE_OKC_PARTY(p_new_party_id NUMBER,
10806: p_old_party_id NUMBER,
10807: p_cle_id NUMBER) return VARCHAR2 IS
10808:
10945: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
10946: return x_return_status;
10947: END CREATE_OKC_PARTY;
10948:
10949: -- This function is called by copy_standard_coverage for insertion into okc_contacts table
10950: FUNCTION CREATE_OKC_CONTACT(p_new_cpl_id NUMBER,
10951: p_old_cpl_id NUMBER) return VARCHAR2 IS
10952:
10953:
11052:
11053:
11054: BEGIN
11055:
11056: SAVEPOINT copy_standard_coverage;
11057: l_old_coverage_id := P_old_coverage_id;
11058:
11059: IF (G_DEBUG_ENABLED = 'Y') THEN
11060: okc_debug.Set_Indentation('Copy_Standard_Coverage');
11056: SAVEPOINT copy_standard_coverage;
11057: l_old_coverage_id := P_old_coverage_id;
11058:
11059: IF (G_DEBUG_ENABLED = 'Y') THEN
11060: okc_debug.Set_Indentation('Copy_Standard_Coverage');
11061: okc_debug.log('BEGIN COPY_STANDARD_COVERAGE'||l_return_status, 2);
11062: END IF;
11063:
11064: -- Create Coverage line
11057: l_old_coverage_id := P_old_coverage_id;
11058:
11059: IF (G_DEBUG_ENABLED = 'Y') THEN
11060: okc_debug.Set_Indentation('Copy_Standard_Coverage');
11061: okc_debug.log('BEGIN COPY_STANDARD_COVERAGE'||l_return_status, 2);
11062: END IF;
11063:
11064: -- Create Coverage line
11065: l_new_coverage_id :=okc_p_util.raw_to_number(sys_guid());
11216:
11217: EXCEPTION
11218: WHEN G_EXCEPTION_HALT_VALIDATION THEN
11219: x_return_status := l_return_status ;
11220: ROLLBACK to copy_standard_coverage;
11221: WHEN OTHERS THEN
11222: OKC_API.set_message(G_APP_NAME,
11223: G_UNEXPECTED_ERROR,
11224: G_SQLCODE_TOKEN,
11225: SQLCODE,
11226: G_SQLERRM_TOKEN,
11227: SQLERRM);
11228: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
11229: ROLLBACK to copy_standard_coverage;
11230:
11231: END COPY_STANDARD_COVERAGE;
11232: END OKS_COVERAGES_PVT;
11233:
11227: SQLERRM);
11228: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
11229: ROLLBACK to copy_standard_coverage;
11230:
11231: END COPY_STANDARD_COVERAGE;
11232: END OKS_COVERAGES_PVT;
11233: