[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;
10085:
10086: End Update_dnz_chr_id;
10087:
10088: /* This procedure is used for creation of PM and notes.
10089: Parameters : p_standard_cov_id : Id of the source coverage or source contract line
10090: p_contract_line_id : Id of the target contract line
10091: Create_K_coverage_ext can be called during the creation of service line from authoring or from renewal
10092: consolidation flow.
10093: */
10100: x_msg_data OUT NOCOPY VARCHAR2) IS
10101:
10102: --Cursor definition
10103: /* Modified by Jvorugan .Added p_source_object_code as input parameter.
10104: This differentiates whether notes is associated with a standard coverage
10105: or a service line */
10106:
10107: CURSOR CUR_GET_NOTES(p_source_object_id IN NUMBER,p_source_object_code IN VARCHAR2)
10108: IS
10150: -- Modified by Jvorugan for Bug:4610475. Added pm_sch_exists_yn,pm_conf_req_yn
10151: CURSOR CUR_CHECK_PM_PROG IS
10152: SELECT pm_program_id,pm_sch_exists_yn,pm_conf_req_yn
10153: FROM OKS_K_LINES_B
10154: WHERE CLE_ID = p_src_line_id; --p_standard_cov_id; -- modified by Jvorugan Bug:4535339 ID = p_standard_cov_id;
10155:
10156: -- Added by Jvorugan
10157: CURSOR CUR_GET_LSE_ID IS
10158: SELECT lse_id
10156: -- Added by Jvorugan
10157: CURSOR CUR_GET_LSE_ID IS
10158: SELECT lse_id
10159: FROM OKC_K_LINES_B
10160: WHERE ID = p_src_line_id; --p_standard_cov_id;
10161:
10162: GET_LSE_ID_REC CUR_GET_LSE_ID%ROWTYPE;
10163:
10164: l_start_date DATE;
10194: open CUR_GET_LSE_ID;
10195: fetch CUR_GET_LSE_ID into GET_LSE_ID_REC;
10196: close CUR_GET_LSE_ID;
10197:
10198: l_source_line_id := p_src_line_id; --p_standard_cov_id;
10199: IF GET_LSE_ID_REC.lse_id in (1,14,19) THEN
10200: l_source_object_code := 'OKS_COV_NOTE';
10201: ELSE
10202: l_source_object_code := 'OKS_COVTMPL_NOTE';
10292: p_init_msg_list => l_init_msg_list,
10293: x_return_status => l_return_status,
10294: x_msg_count => l_msg_count,
10295: x_msg_data => l_msg_data,
10296: p_template_cle_id => p_src_line_id, --p_standard_cov_id,
10297: p_cle_id => p_tgt_line_id, --p_contract_line_id,
10298: p_cov_start_date => l_start_date,
10299: p_cov_end_date => l_end_date);
10300: --errorout_ad('after'||l_return_status);
10380:
10381: END Create_K_coverage_ext;
10382:
10383:
10384: /* This procedure is used for Copying the standard coverage template.
10385: Parameters:
10386: P_old_coverage_id -- ID of the source coverage
10387: P_new_coverage_name -- Name of the Target coverage
10388: x_new_coverage_id -- New Id of the copied coverage */
10385: Parameters:
10386: P_old_coverage_id -- ID of the source coverage
10387: P_new_coverage_name -- Name of the Target coverage
10388: x_new_coverage_id -- New Id of the copied coverage */
10389: PROCEDURE COPY_STANDARD_COVERAGE(
10390: p_api_version IN NUMBER,
10391: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
10392: x_return_status OUT NOCOPY VARCHAR2,
10393: x_msg_count OUT NOCOPY NUMBER,
10460: l_new_br_id OKC_K_LINES_B.ID%TYPE;
10461: l_cov_flag NUMBER;
10462: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
10463:
10464: -- This function is called by copy_standard_coverage for insertion into okc_k_lines_b table
10465: FUNCTION CREATE_OKC_LINE(p_new_line_id NUMBER,
10466: p_old_line_id NUMBER,
10467: p_flag NUMBER,
10468: p_cle_id NUMBER DEFAULT NULL) return VARCHAR2 IS
10730:
10731: END CREATE_OKC_LINE;
10732:
10733:
10734: -- This function is called by copy_standard_coverage for insertion into okc_k_items table
10735: FUNCTION CREATE_OKC_ITEM(p_new_item_id NUMBER,
10736: p_old_item_id NUMBER,
10737: p_cle_id NUMBER) return VARCHAR2 IS
10738:
10810: return x_return_status;
10811:
10812: END CREATE_OKC_ITEM;
10813:
10814: -- This function is called by copy_standard_coverage for insertion into okc_k_party_roles_b table
10815: FUNCTION CREATE_OKC_PARTY(p_new_party_id NUMBER,
10816: p_old_party_id NUMBER,
10817: p_cle_id NUMBER) return VARCHAR2 IS
10818:
10955: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
10956: return x_return_status;
10957: END CREATE_OKC_PARTY;
10958:
10959: -- This function is called by copy_standard_coverage for insertion into okc_contacts table
10960: FUNCTION CREATE_OKC_CONTACT(p_new_cpl_id NUMBER,
10961: p_old_cpl_id NUMBER) return VARCHAR2 IS
10962:
10963:
11066:
11067:
11068: BEGIN
11069:
11070: SAVEPOINT copy_standard_coverage;
11071: l_old_coverage_id := P_old_coverage_id;
11072:
11073: IF (G_DEBUG_ENABLED = 'Y') THEN
11074: okc_debug.Set_Indentation('Copy_Standard_Coverage');
11070: SAVEPOINT copy_standard_coverage;
11071: l_old_coverage_id := P_old_coverage_id;
11072:
11073: IF (G_DEBUG_ENABLED = 'Y') THEN
11074: okc_debug.Set_Indentation('Copy_Standard_Coverage');
11075: okc_debug.log('BEGIN COPY_STANDARD_COVERAGE'||l_return_status, 2);
11076: END IF;
11077:
11078: -- Create Coverage line
11071: l_old_coverage_id := P_old_coverage_id;
11072:
11073: IF (G_DEBUG_ENABLED = 'Y') THEN
11074: okc_debug.Set_Indentation('Copy_Standard_Coverage');
11075: okc_debug.log('BEGIN COPY_STANDARD_COVERAGE'||l_return_status, 2);
11076: END IF;
11077:
11078: -- Create Coverage line
11079: l_new_coverage_id :=okc_p_util.raw_to_number(sys_guid());
11230:
11231: EXCEPTION
11232: WHEN G_EXCEPTION_HALT_VALIDATION THEN
11233: x_return_status := l_return_status ;
11234: ROLLBACK to copy_standard_coverage;
11235: WHEN OTHERS THEN
11236: OKC_API.set_message(G_APP_NAME,
11237: G_UNEXPECTED_ERROR,
11238: G_SQLCODE_TOKEN,
11239: SQLCODE,
11240: G_SQLERRM_TOKEN,
11241: SQLERRM);
11242: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
11243: ROLLBACK to copy_standard_coverage;
11244:
11245: END COPY_STANDARD_COVERAGE;
11246: END OKS_COVERAGES_PVT;
11247:
11241: SQLERRM);
11242: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
11243: ROLLBACK to copy_standard_coverage;
11244:
11245: END COPY_STANDARD_COVERAGE;
11246: END OKS_COVERAGES_PVT;
11247: