15: G_STMT_LEVEL CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: ------------------------------------------------------------------------------
17: -- GLOBAL CONSTANTS
18: ------------------------------------------------------------------------------
19: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
20: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR ;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
16: ------------------------------------------------------------------------------
17: -- GLOBAL CONSTANTS
18: ------------------------------------------------------------------------------
19: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
20: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR ;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
24: G_UNEXPECTED_ERROR CONSTANT varchar2(200) := 'OKC_UNEXPECTED_ERROR';
17: -- GLOBAL CONSTANTS
18: ------------------------------------------------------------------------------
19: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
20: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR ;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
24: G_UNEXPECTED_ERROR CONSTANT varchar2(200) := 'OKC_UNEXPECTED_ERROR';
25: G_SQLERRM_TOKEN CONSTANT varchar2(200) := 'ERROR_MESSAGE';
18: ------------------------------------------------------------------------------
19: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
20: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR ;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
24: G_UNEXPECTED_ERROR CONSTANT varchar2(200) := 'OKC_UNEXPECTED_ERROR';
25: G_SQLERRM_TOKEN CONSTANT varchar2(200) := 'ERROR_MESSAGE';
26: G_SQLCODE_TOKEN CONSTANT varchar2(200) := 'ERROR_CODE';
19: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
20: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR ;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
24: G_UNEXPECTED_ERROR CONSTANT varchar2(200) := 'OKC_UNEXPECTED_ERROR';
25: G_SQLERRM_TOKEN CONSTANT varchar2(200) := 'ERROR_MESSAGE';
26: G_SQLCODE_TOKEN CONSTANT varchar2(200) := 'ERROR_CODE';
27:
41: l_debug Boolean;
42: l_module VARCHAR2(250) := G_MODULE_NAME||l_api_name;
43:
44: BEGIN
45: x_return_status := FND_API.G_RET_STS_SUCCESS;
46:
47: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
48: l_debug := true;
49: END IF;
55: END IF;
56:
57: OKC_XPRT_QUOTE_INT_PVT.get_clause_variable_values(
58: p_api_version => l_api_version,
59: p_init_msg_list => FND_API.G_FALSE,
60: p_doc_id => p_doc_id,
61: p_sys_var_value_tbl => p_sys_var_value_tbl,
62: x_return_status => x_return_status,
63: x_msg_data => x_msg_data,
63: x_msg_data => x_msg_data,
64: x_msg_count => x_msg_count);
65:
66: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
68: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
69: RAISE FND_API.G_EXC_ERROR ;
70: END IF;
71:
65:
66: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
68: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
69: RAISE FND_API.G_EXC_ERROR ;
70: END IF;
71:
72: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
73: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,' ');
77:
78: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
79:
80: EXCEPTION
81: WHEN FND_API.G_EXC_ERROR THEN
82:
83: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
84: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'50: Leaving get_article_variable_values: OKC_API.G_EXCEPTION_ERROR Exception');
85: END IF;
86:
87: x_return_status := G_RET_STS_ERROR ;
88: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
89:
90: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
91: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
92: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'60: Leaving get_article_variable_values: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
93: END IF;
94:
133: l_debug Boolean;
134: l_module VARCHAR2(250) := G_MODULE_NAME||l_api_name;
135:
136: BEGIN
137: x_return_status := FND_API.G_RET_STS_SUCCESS;
138:
139: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
140: l_debug := true;
141: END IF;
150: l_sys_var_value_tbl(1).variable_code :='OKC$S_ITEM';
151:
152: OKC_XPRT_QUOTE_INT_PVT.get_clause_variable_values(
153: p_api_version => l_api_version,
154: p_init_msg_list => FND_API.G_FALSE,
155: p_doc_id => p_doc_id,
156: p_variables_tbl => l_sys_var_value_tbl,
157: x_line_var_value_tbl => x_variables_tbl,
158: x_return_status => x_return_status,
164: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'95:Return status from OKC_XPRT_QUOTE_INT_PVT.Get_clause_Variable_Values - 2 = '||x_return_status);
165: END IF;
166:
167: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
168: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
169: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
170: RAISE FND_API.G_EXC_ERROR ;
171: END IF;
172:
166:
167: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
168: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
169: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
170: RAISE FND_API.G_EXC_ERROR ;
171: END IF;
172:
173:
174: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
210:
211: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
212:
213: EXCEPTION
214: WHEN FND_API.G_EXC_ERROR THEN
215:
216: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
217: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'160: Leaving get_item_dtl_for_expert: OKC_API.G_EXCEPTION_ERROR Exception');
218: END IF;
219:
220: x_return_status := G_RET_STS_ERROR ;
221: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
222:
223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
224: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
225: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'170: Leaving get_item_dtl_for_expert: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
226: END IF;
227:
264: l_module VARCHAR2(250) := G_MODULE_NAME||l_api_name;
265:
266: BEGIN
267:
268: x_return_status := FND_API.G_RET_STS_SUCCESS;
269:
270: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
271: l_debug := true;
272: END IF;
272: END IF;
273:
274: l_update_allowed := ASO_CONTRACT_TERMS_PUB.ok_to_commit(
275: p_api_version => l_api_version,
276: p_init_msg_list => FND_API.G_FALSE,
277: p_doc_id => p_doc_id,
278: p_doc_type => p_doc_type,
279: p_validation_string => p_validation_string,
280: x_return_status => x_return_status,
281: x_msg_data => x_msg_data,
282: x_msg_count => x_msg_count);
283:
284: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
286: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
287: RAISE FND_API.G_EXC_ERROR ;
288: END IF;
289:
283:
284: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
286: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
287: RAISE FND_API.G_EXC_ERROR ;
288: END IF;
289:
290: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
291:
291:
292: return l_update_allowed;
293:
294: EXCEPTION
295: WHEN FND_API.G_EXC_ERROR THEN
296: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
297: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'190: Leaving ok_to_commit: OKC_API.G_EXCEPTION_ERROR Exception');
298: END IF;
299:
298: END IF;
299:
300: x_return_status := G_RET_STS_ERROR ;
301: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
302: return FND_API.G_FALSE;
303:
304: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
305: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
306: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'200: Leaving ok_to_commit: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
300: x_return_status := G_RET_STS_ERROR ;
301: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
302: return FND_API.G_FALSE;
303:
304: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
305: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
306: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'200: Leaving ok_to_commit: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
307: END IF;
308:
307: END IF;
308:
309: x_return_status := G_RET_STS_UNEXP_ERROR ;
310: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
311: return FND_API.G_FALSE;
312:
313: WHEN OTHERS THEN
314: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
315: fnd_log.string(FND_LOG.LEVEL_STATEMENT,l_module,'210: Leaving ok_to_commit because of EXCEPTION: '||sqlerrm);
320: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
321: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
322: END IF;
323: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
324: return FND_API.G_FALSE;
325:
326: END ok_to_commit;
327:
328: END OKC_ASO_INT_GRP;