1 PACKAGE OKC_REP_VAL_CODE_HOOK AUTHID CURRENT_USER AS
2 /* $Header: OKCRVALCHKS.pls 120.0.12020000.1 2013/03/21 12:29:15 kkolukul noship $ */
3
4 --------------------------------------------------------------------------
5 --Constants
6 --------------------------------------------------------------------------
7
8 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
9 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
10 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
11 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
12
13
14 ---------------------------------------------------------------------------
15 -- Procedures and Functions
16 ---------------------------------------------------------------------------
17
18 -- Start of comments
19 --API name : custom_cont_validate
20 --Type : Private.
21 --Function : This API performs custom QA checks on a Repository Contract in addition to the existing validations.
22 --Pre-reqs : None.
23 --Parameters :
24 --IN : p_api_version IN NUMBER Required
25 -- : p_init_msg_list IN VARCHAR2 Optional
26 -- : Default = FND_API.G_FALSE
27 -- : p_contract_id IN NUMBER Required
28 -- : Contract ID of the contract to be QA checked
29 -- : p_contract_type IN NUMBER Required
30 -- : Type of the contract to be QA checked
31 --INOUT : p_qa_result_tbl IN OUT
32 -- : The table of records that contains validation errors and warnings
33 --
34 -- ERRORS SHOULD BE POPULATED IN THE RESULT TABLE(PX_QA_RESULT_TBL) AS FOLLOWS
35 --
36 -- L_INDEX := PX_QA_RESULT_TBL.COUNT + 1;
37 -- PX_QA_RESULT_TBL(L_INDEX).ERROR_RECORD_TYPE := <WHERE THE ERROR IS COMING FROM>
38 -- PX_QA_RESULT_TBL(L_INDEX).TITLE := <TITLE OF THE ERROR>
39 -- PX_QA_RESULT_TBL(L_INDEX).QA_CODE := <CODE FOR THE ERROR>
40 -- PX_QA_RESULT_TBL(L_INDEX).MESSAGE_NAME := <ERROR MESSAGE NAME>
41 -- PX_QA_RESULT_TBL(L_INDEX).SUGGESTION := <ERROR SUGGESTION>
42 -- PX_QA_RESULT_TBL(L_INDEX).ERROR_SEVERITY := <ERROR SEVERITY>
43 -- PX_QA_RESULT_TBL(L_INDEX).PROBLEM_SHORT_DESC := <ERROR SHORT DESCRIPTION>
44 -- PX_QA_RESULT_TBL(L_INDEX).PROBLEM_DETAILS := <ERROR MESSAGE TEXT>
45 --
46 -- X_RETURN_STATUS WILL BE 'S' IF THE PROCEDURE HAS EXECUTED WITHOUT ANY EXCEPTIONS(HANDLED OR UNHANDLED).
47 --
48 --OUT : x_return_status OUT VARCHAR2(1)
49 -- : x_msg_count OUT NUMBER
50 -- : x_msg_data OUT VARCHAR2(2000)
51 -- Note :
52 -- End of comments
53
54 PROCEDURE custom_cont_validate (
55 p_api_version IN NUMBER,
56 p_init_msg_list IN VARCHAR2,
57 p_contract_type IN VARCHAR2,
58 p_contract_id IN NUMBER,
59 px_qa_result_tbl IN OUT NOCOPY OKC_TERMS_QA_PVT.qa_result_tbl_type,
60 x_msg_data OUT NOCOPY VARCHAR2,
61 x_msg_count OUT NOCOPY NUMBER,
62 x_return_status OUT NOCOPY VARCHAR2);
63
64
65 END OKC_REP_VAL_CODE_HOOK;