[Home] [Help]
48: --
49: -- 1-Added the quote NUMBER having been created in the contract comments;
50: -- In case the quote creation failed, a specific error message is added.
51: -- 2-Relplaced all TABLE_NAME_B reference with the related view TABLE_NAME_V
52: -- to be compliant with the standards
53: -- 3-Implemented quote line creation for contract having support top
54: -- AND sub lines
55: -- 4-Removed the creation of a dummy quote detail line when we have no
56: -- subline for a top contract line
159: -- ===========================================================================
160: --
161: -- global constants
162: --
163: -- standard api constants
164: --
165: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXP_ERROR';
166: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
167: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
1308: --
1309: -- In Parameters: p_k_header_rec contract information that has contract
1310: -- id and contract category
1311: --
1312: -- Out Parameters: x_return_status standard return status
1313:
1314: PROCEDURE validate_k_eligibility( p_k_header_rec IN c_k_header%ROWTYPE
1315: ,p_quote_id IN okx_quote_headers_v.id1%TYPE
1316: ,x_return_status OUT NOCOPY VARCHAR2
1492: -- Procedure: build_k_structures
1493: -- Purpose: Build several records/tables that hold information to be
1494: -- used to pass to ASO APIs
1495: -- In Parameters: p_chr_id contract id
1496: -- Out Parameters: x_return_status standard return status
1497:
1498: PROCEDURE build_k_structures (p_chr_id IN okc_k_headers_b.ID%TYPE
1499: -- ,p_quote_id IN OKX_QUOTE_HEADERS_V.ID1%TYPE
1500: ,p_rel_code IN okc_k_rel_objs.rty_code%TYPE
3346: IF NOT l_cp_found AND px_qte_line_tbl(l_ql).operation_code = g_aso_op_code_update AND
3347: l_line_info_tab(i).config_item_type NOT IN (g_okc_model_item,g_okc_base_item,g_okc_config_item) THEN
3348: --
3349: -- This is the case of a Non service, Non configurable item
3350: -- ie a standard item and no sub lines
3351: --
3352: -- Need to ensure that the original quote line had no quote detail line
3353: -- Need to retrieve the quote detail line of related quote parent line
3354: -- pointed by px_qte_line_tbl(l_ql).quote_line_id using a cursor on
3939: ,x_msg_data OUT NOCOPY VARCHAR2
3940: )
3941: IS
3942:
3943: -- standard api variables
3944: l_api_version CONSTANT NUMBER := 1;
3945: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_Q_FROM_K';
3946: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3947: l_return_status2 VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;