[Home] [Help]
147: select ct.object1_id1 id
148: from okc_contacts ct,
149: okc_contact_sources csrc,
150: okc_k_party_roles_b pty,
151: okc_k_headers_b chr
152: where ct.cpl_id = pty.id
153: and ct.cro_code = csrc.cro_code
154: and ct.jtot_object1_code = csrc.jtot_object_code
155: and ct.dnz_chr_id = chr.id
899:
900: CURSOR c (p_contract_number VARCHAR2)
901: IS
902: SELECT 'X'
903: FROM okc_k_headers_b k
904: WHERE k.contract_number = p_contract_number
905: ;
906:
907: CURSOR c2 (p_contract_number VARCHAR2, p_id NUMBER)
906:
907: CURSOR c2 (p_contract_number VARCHAR2, p_id NUMBER)
908: IS
909: SELECT 'X'
910: FROM okc_k_headers_b k
911: WHERE k.contract_number = p_contract_number
912: AND k.id <> p_id -- except itself
913: ;
914:
2021: -- mvasudev, 11/04/2003
2022: /*
2023: -- Replacing this by writing two cursors with top line first
2024: -- and sub lines next
2025: CURSOR c_agr_lns(p_khr_id okc_k_headers_b.id%TYPE) IS
2026: SELECT cle.id
2027: FROM apps.okc_k_lines_b cle
2028: WHERE cle.dnz_chr_id = p_khr_id
2029: ;
2470: ,p_init_msg_list IN VARCHAR2
2471: ,x_return_status OUT NOCOPY VARCHAR2
2472: ,x_msg_count OUT NOCOPY NUMBER
2473: ,x_msg_data OUT NOCOPY VARCHAR2
2474: ,p_khr_id IN OKC_K_HEADERS_B.ID%TYPE)
2475: IS
2476: l_api_name CONSTANT VARCHAR2(30) := 'activate_sec_agreement_pvt';
2477: l_api_version CONSTANT NUMBER := 1.0;
2478: i NUMBER;
2480: l_pol_id OKL_POOLS.ID%TYPE;
2481: l_currency_code OKL_POOLS.CURRENCY_CODE%TYPE;
2482: l_org_id OKL_POOLS.ORG_ID%TYPE;
2483: l_legal_entity_id OKL_POOLS.LEGAL_ENTITY_ID%TYPE;
2484: l_chr_id OKC_K_HEADERS_B.ID%TYPE;
2485:
2486: l_pox_id OKL_POOL_CONTENTS.POX_ID%TYPE;
2487: l_poc_id OKL_POOL_CONTENTS.ID%TYPE;
2488: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3097: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
3098: ,x_return_status OUT NOCOPY VARCHAR2
3099: ,x_msg_count OUT NOCOPY NUMBER
3100: ,x_msg_data OUT NOCOPY VARCHAR2
3101: ,p_sec_agreement_status IN okc_k_headers_b.sts_code%TYPE
3102: ,p_sec_agreement_id IN okc_k_headers_b.id%TYPE)
3103: IS
3104: l_api_name CONSTANT VARCHAR2(30) := 'update_sec_agreement_sts';
3105: l_api_version CONSTANT NUMBER := 1.0;
3098: ,x_return_status OUT NOCOPY VARCHAR2
3099: ,x_msg_count OUT NOCOPY NUMBER
3100: ,x_msg_data OUT NOCOPY VARCHAR2
3101: ,p_sec_agreement_status IN okc_k_headers_b.sts_code%TYPE
3102: ,p_sec_agreement_id IN okc_k_headers_b.id%TYPE)
3103: IS
3104: l_api_name CONSTANT VARCHAR2(30) := 'update_sec_agreement_sts';
3105: l_api_version CONSTANT NUMBER := 1.0;
3106: i NUMBER;
3104: l_api_name CONSTANT VARCHAR2(30) := 'update_sec_agreement_sts';
3105: l_api_version CONSTANT NUMBER := 1.0;
3106: i NUMBER;
3107: l_kle_id OKC_K_LINES_B.ID%TYPE;
3108: l_chr_id OKC_K_HEADERS_B.ID%TYPE;
3109:
3110: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3111:
3112: lp_secagreement_rec secagreement_rec_type;
3407: ,p_init_msg_list IN VARCHAR2
3408: ,x_return_status OUT NOCOPY VARCHAR2
3409: ,x_msg_count OUT NOCOPY NUMBER
3410: ,x_msg_data OUT NOCOPY VARCHAR2
3411: ,p_khr_id IN OKC_K_HEADERS_B.ID%TYPE)
3412: IS
3413:
3414: l_api_name CONSTANT VARCHAR2(30) := 'activate_add_request';
3415: l_api_version CONSTANT NUMBER := 1.0;
3418: l_pol_id OKL_POOLS.ID%TYPE;
3419: l_currency_code OKL_POOLS.CURRENCY_CODE%TYPE;
3420: l_org_id OKL_POOLS.ORG_ID%TYPE;
3421: l_legal_entity_id OKL_POOLS.LEGAL_ENTITY_ID%TYPE;
3422: l_chr_id OKC_K_HEADERS_B.ID%TYPE;
3423:
3424: l_pox_id OKL_POOL_CONTENTS.POX_ID%TYPE;
3425: l_poc_id OKL_POOL_CONTENTS.ID%TYPE;
3426: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4233: p_init_msg_list IN VARCHAR2,
4234: x_return_status OUT NOCOPY VARCHAR2,
4235: x_msg_count OUT NOCOPY NUMBER,
4236: x_msg_data OUT NOCOPY VARCHAR2,
4237: p_chr_id IN OKC_K_HEADERS_B.ID%TYPE)
4238: IS
4239: --Declaring local variables
4240: l_api_name CONSTANT VARCHAR2(30) := 'cancel_add_request';
4241: l_api_version CONSTANT NUMBER := 1.0;