[Home] [Help]
PACKAGE: APPS.OKC_REP_CLOSEOUT_PVT
Source
1 PACKAGE okc_rep_closeout_pvt AUTHID CURRENT_USER AS
2 /* $Header: OKCPREPCS.pls 120.0.12020000.4 2013/02/22 12:26:07 kkolukul noship $ */
3
4 ---------------------------------------------------------------------------
5 -- Global VARIABLES
6 ---------------------------------------------------------------------------
7 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_REP_CLOSEOUT_PVT';
8 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
9 G_MODULE CONSTANT VARCHAR2(250) := 'okc.plsql.'||G_PKG_NAME||'.';
10
11 ------------------------------------------------------------------------------
12
13
14 ------------------------------------------------------------------------------
15 -- GLOBAL CONSTANTS
16 ------------------------------------------------------------------------------
17 G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
18 G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
19 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
20 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
21 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
22 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
23 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
24 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
25 G_REP_QA_TYPE CONSTANT VARCHAR2(30) := 'REPOSITORY';
26 G_QA_LOOKUP CONSTANT VARCHAR2(30) := 'OKC_TERM_QA_LIST';
27
28 G_QA_STS_SUCCESS CONSTANT varchar2(1) := OKC_TERMS_QA_GRP.G_QA_STS_SUCCESS;
29 G_QA_STS_ERROR CONSTANT varchar2(1) := OKC_TERMS_QA_GRP.G_QA_STS_ERROR;
30 G_QA_STS_WARNING CONSTANT varchar2(1) := OKC_TERMS_QA_GRP.G_QA_STS_WARNING;
31
32 G_STATUS_SIGNED CONSTANT VARCHAR2(30) := 'SIGNED';
33 G_NORMAL_QA CONSTANT VARCHAR2(30) := 'NORMAL';
34
35 G_INVALID_CONTRACT_ID_MSG CONSTANT VARCHAR2(200) := 'OKC_REP_INVALID_CONTRACT_ID';
36 G_CONTRACT_ID_TOKEN CONSTANT VARCHAR2(200) := 'CONTRACT_ID';
37 G_INVALID_BUS_DOC_ID_MSG CONSTANT VARCHAR2(200) := 'OKC_REP_INVALID_BUS_DOC_ID';
38
39 G_PO_PHYSICAL_COMPLETE_EVENT CONSTANT VARCHAR2(30) := 'PO_PHYSICAL_COMPLETE';
40 G_TASK_STATUS_INIT CONSTANT VARCHAR2(30) := 'INITIATED';
41 G_TASK_STATUS_COMP CONSTANT VARCHAR2(30) := 'COMPLETED';
42
43 PROCEDURE copy_deliverables(p_api_version IN NUMBER,
44 p_init_msg_list IN VARCHAR2,
45 p_commit IN VARCHAR2,
46 p_source_contract_type IN VARCHAR2 ,
47 p_source_contract_id IN NUMBER,
48 p_target_contract_type IN VARCHAR2,
49 p_target_contract_id IN NUMBER,
50 x_msg_data OUT NOCOPY VARCHAR2,
51 x_msg_count OUT NOCOPY NUMBER,
52 x_return_status OUT NOCOPY VARCHAR2);
53
54 PROCEDURE revise_checklist(p_api_version IN NUMBER,
55 p_init_msg_list IN VARCHAR2,
56 p_commit IN VARCHAR2,
57 p_contract_type IN VARCHAR2 ,
58 p_contract_id IN NUMBER,
59 p_contract_version_num IN NUMBER,
60 x_new_version_num OUT NOCOPY NUMBER,
61 x_msg_data OUT NOCOPY VARCHAR2,
62 x_msg_count OUT NOCOPY NUMBER,
63 x_return_status OUT NOCOPY VARCHAR2);
64
65 PROCEDURE freeze_checklist(p_api_version IN NUMBER,
66 p_init_msg_list IN VARCHAR2,
67 p_commit IN VARCHAR2,
68 p_contract_type IN VARCHAR2 ,
69 p_contract_id IN NUMBER,
70 p_contract_version_num IN NUMBER,
71 x_msg_data OUT NOCOPY VARCHAR2,
72 x_msg_count OUT NOCOPY NUMBER,
73 x_return_status OUT NOCOPY VARCHAR2);
74
75 PROCEDURE validate_closeout_tasks(p_api_version IN NUMBER,
76 p_init_msg_list IN VARCHAR2,
77 p_commit IN VARCHAR2,
78 p_contract_type IN VARCHAR2 ,
79 p_contract_id IN NUMBER,
80 p_contract_version_num IN NUMBER,
81 x_msg_data OUT NOCOPY VARCHAR2,
82 x_msg_count OUT NOCOPY NUMBER,
83 x_return_status OUT NOCOPY VARCHAR2,
84 x_qa_return_status OUT NOCOPY VARCHAR2,
85 x_sequence_id OUT NOCOPY NUMBER);
86
87 PROCEDURE Activate_tasks_closeout(p_api_version IN NUMBER,
88 p_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
89 p_physical_completion_date IN DATE ,
90 p_init_msg_list IN VARCHAR2,
91 p_commit IN VARCHAR2,
92 x_task_status OUT NOCOPY VARCHAR2,
93 x_msg_data OUT NOCOPY VARCHAR2,
94 x_msg_count OUT NOCOPY NUMBER,
95 x_return_status OUT NOCOPY VARCHAR2
96 );
97
98 /*
99 Creates a contract with the data given in the parameters.
100 The relation of parent document which is obtained in p_document_rec is stored in the okc_rep_contract_usages table
101 */
102
103 Procedure create_contract(p_api_version IN NUMBER,
104 p_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
105 p_contract_rec IN OUT NOCOPY OKC_IMP_RECORD_TYPES.contract_rec_type,
106 p_contract_parties_tbl IN OUT NOCOPY OKC_IMP_RECORD_TYPES.contract_parties_tbl_type,
107 p_party_contacts_tbl IN OUT NOCOPY OKC_IMP_RECORD_TYPES.party_contacts_tbl_type ,
108 p_risks_tbl IN OUT NOCOPY OKC_IMP_RECORD_TYPES.contract_risks_tbl_type ,
109 p_commit IN VARCHAR2 := fnd_api.g_false,
110 x_msg_data OUT NOCOPY VARCHAR2,
111 x_msg_count OUT NOCOPY NUMBER,
112 x_return_status OUT NOCOPY VARCHAR2
113 );
114
115 /*
116 Deletes the Contract for the given document type.
117 */
118
119 Procedure delete_contract(p_api_version IN NUMBER,
120 p_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
121 p_contract_type IN VARCHAR2 DEFAULT NULL,
122 p_contract_id IN NUMBER DEFAULT NULL,
123 p_commit IN VARCHAR2 := fnd_api.g_false,
124 x_msg_data OUT NOCOPY VARCHAR2,
125 x_msg_count OUT NOCOPY NUMBER,
126 x_return_status OUT NOCOPY VARCHAR2
127 );
128
129 /*
130 Creates a new version of the contract contract in draft status.
131 Updates to the contract should be done from UI.
132
133 The relation of parent document which is obtained in p_document_rec is stored in the okc_rep_contract_usages table
134 */
135
136 Procedure create_new_contract_version(p_api_version IN NUMBER,
137 p_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
138 p_contract_type IN VARCHAR2 DEFAULT NULL,
139 p_contract_id IN NUMBER DEFAULT NULL,
140 p_commit IN VARCHAR2 := fnd_api.g_false,
141 x_msg_data OUT NOCOPY VARCHAR2,
142 x_msg_count OUT NOCOPY NUMBER,
143 x_return_status OUT NOCOPY VARCHAR2
144 );
145
146 PROCEDURE check_contract_exists(p_api_version IN NUMBER,
147 p_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
148 x_contract_type IN OUT NOCOPY VARCHAR2 ,
149 x_contract_id IN OUT NOCOPY NUMBER ,
150 x_contract_version_num IN OUT NOCOPY NUMBER,
151 x_msg_data OUT NOCOPY VARCHAR2,
152 x_msg_count OUT NOCOPY NUMBER,
153 x_return_status OUT NOCOPY VARCHAR2
154 );
155
156 PROCEDURE validate_closeout_tasks(p_api_version IN NUMBER,
157 p_init_msg_list IN VARCHAR2,
158 p_commit IN VARCHAR2,
159 p_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
160 x_msg_data OUT NOCOPY VARCHAR2,
161 x_msg_count OUT NOCOPY NUMBER,
162 x_return_status OUT NOCOPY VARCHAR2,
163 x_qa_return_status OUT NOCOPY VARCHAR2,
164 x_qa_result_tbl OUT NOCOPY OKC_TERMS_QA_PVT.qa_result_tbl_type);
165
166
167 FUNCTION deliverable_completed_event(p_subscription_guid in raw,
168 p_event in out nocopy WF_EVENT_T) RETURN VARCHAR2;
169
170 PROCEDURE copy_set_tasks_to_each_po(p_api_version IN NUMBER,
171 p_init_msg_list IN VARCHAR2,
172 p_commit IN VARCHAR2,
173 p_src_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
174 p_tgt_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
175 p_contract_rec IN OUT NOCOPY OKC_IMP_RECORD_TYPES.contract_rec_type,
176 p_contract_parties_tbl IN OUT NOCOPY OKC_IMP_RECORD_TYPES.contract_parties_tbl_type,
177 p_party_contacts_tbl IN OUT NOCOPY OKC_IMP_RECORD_TYPES.party_contacts_tbl_type,
178 p_risks_tbl IN OUT NOCOPY OKC_IMP_RECORD_TYPES.contract_risks_tbl_type,
179 x_msg_data OUT NOCOPY VARCHAR2,
180 x_msg_count OUT NOCOPY NUMBER,
181 x_return_status OUT NOCOPY VARCHAR2);
182
183 PROCEDURE check_tasks_exists(p_api_version IN NUMBER,
184 p_init_msg_list IN VARCHAR2,
185 p_document_rec IN OKC_IMP_RECORD_TYPES.document_rec_type,
186 x_del_count OUT NOCOPY NUMBER,
187 x_msg_data OUT NOCOPY VARCHAR2,
188 x_msg_count OUT NOCOPY NUMBER,
189 x_return_status OUT NOCOPY VARCHAR2);
190
191 END okc_rep_closeout_pvt;