DBA Data[Home] [Help]

APPS.OKC_CGC_PVT dependencies on OKC_API

Line 153: IF (l_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN

149: p_cgcv_rec IN cgcv_rec_type
150: ) RETURN cgcv_rec_type IS
151: l_cgcv_rec cgcv_rec_type := p_cgcv_rec;
152: BEGIN
153: IF (l_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
154: l_cgcv_rec.object_version_number := NULL;
155: END IF;
156: IF (l_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM) THEN
157: l_cgcv_rec.cgp_parent_id := NULL;

Line 156: IF (l_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM) THEN

152: BEGIN
153: IF (l_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
154: l_cgcv_rec.object_version_number := NULL;
155: END IF;
156: IF (l_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM) THEN
157: l_cgcv_rec.cgp_parent_id := NULL;
158: END IF;
159: IF (l_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM) THEN
160: l_cgcv_rec.included_chr_id := NULL;

Line 159: IF (l_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM) THEN

155: END IF;
156: IF (l_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM) THEN
157: l_cgcv_rec.cgp_parent_id := NULL;
158: END IF;
159: IF (l_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM) THEN
160: l_cgcv_rec.included_chr_id := NULL;
161: END IF;
162: IF (l_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM) THEN
163: l_cgcv_rec.included_cgp_id := NULL;

Line 162: IF (l_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM) THEN

158: END IF;
159: IF (l_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM) THEN
160: l_cgcv_rec.included_chr_id := NULL;
161: END IF;
162: IF (l_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM) THEN
163: l_cgcv_rec.included_cgp_id := NULL;
164: END IF;
165: IF (l_cgcv_rec.scs_code = OKC_API.G_MISS_CHAR) THEN
166: l_cgcv_rec.scs_code := NULL;

Line 165: IF (l_cgcv_rec.scs_code = OKC_API.G_MISS_CHAR) THEN

161: END IF;
162: IF (l_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM) THEN
163: l_cgcv_rec.included_cgp_id := NULL;
164: END IF;
165: IF (l_cgcv_rec.scs_code = OKC_API.G_MISS_CHAR) THEN
166: l_cgcv_rec.scs_code := NULL;
167: END IF;
168: IF (l_cgcv_rec.created_by = OKC_API.G_MISS_NUM) THEN
169: l_cgcv_rec.created_by := NULL;

Line 168: IF (l_cgcv_rec.created_by = OKC_API.G_MISS_NUM) THEN

164: END IF;
165: IF (l_cgcv_rec.scs_code = OKC_API.G_MISS_CHAR) THEN
166: l_cgcv_rec.scs_code := NULL;
167: END IF;
168: IF (l_cgcv_rec.created_by = OKC_API.G_MISS_NUM) THEN
169: l_cgcv_rec.created_by := NULL;
170: END IF;
171: IF (l_cgcv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
172: l_cgcv_rec.creation_date := NULL;

Line 171: IF (l_cgcv_rec.creation_date = OKC_API.G_MISS_DATE) THEN

167: END IF;
168: IF (l_cgcv_rec.created_by = OKC_API.G_MISS_NUM) THEN
169: l_cgcv_rec.created_by := NULL;
170: END IF;
171: IF (l_cgcv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
172: l_cgcv_rec.creation_date := NULL;
173: END IF;
174: IF (l_cgcv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
175: l_cgcv_rec.last_updated_by := NULL;

Line 174: IF (l_cgcv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN

170: END IF;
171: IF (l_cgcv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
172: l_cgcv_rec.creation_date := NULL;
173: END IF;
174: IF (l_cgcv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
175: l_cgcv_rec.last_updated_by := NULL;
176: END IF;
177: IF (l_cgcv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
178: l_cgcv_rec.last_update_date := NULL;

Line 177: IF (l_cgcv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN

173: END IF;
174: IF (l_cgcv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
175: l_cgcv_rec.last_updated_by := NULL;
176: END IF;
177: IF (l_cgcv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
178: l_cgcv_rec.last_update_date := NULL;
179: END IF;
180: IF (l_cgcv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
181: l_cgcv_rec.last_update_login := NULL;

Line 180: IF (l_cgcv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN

176: END IF;
177: IF (l_cgcv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
178: l_cgcv_rec.last_update_date := NULL;
179: END IF;
180: IF (l_cgcv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
181: l_cgcv_rec.last_update_login := NULL;
182: END IF;
183: RETURN(l_cgcv_rec);
184: END null_out_defaults;

Line 189: x_return_status := OKC_API.G_RET_STS_SUCCESS;

185: ---------------------------------------------------
186: PROCEDURE Validate_Id(x_return_status OUT NOCOPY VARCHAR2,
187: p_cgcv_rec IN cgcv_rec_type) IS
188: BEGIN
189: x_return_status := OKC_API.G_RET_STS_SUCCESS;
190: IF p_cgcv_rec.id = OKC_API.G_MISS_NUM OR
191: p_cgcv_rec.id IS NULL
192: THEN
193: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

Line 190: IF p_cgcv_rec.id = OKC_API.G_MISS_NUM OR

186: PROCEDURE Validate_Id(x_return_status OUT NOCOPY VARCHAR2,
187: p_cgcv_rec IN cgcv_rec_type) IS
188: BEGIN
189: x_return_status := OKC_API.G_RET_STS_SUCCESS;
190: IF p_cgcv_rec.id = OKC_API.G_MISS_NUM OR
191: p_cgcv_rec.id IS NULL
192: THEN
193: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
194: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 193: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

189: x_return_status := OKC_API.G_RET_STS_SUCCESS;
190: IF p_cgcv_rec.id = OKC_API.G_MISS_NUM OR
191: p_cgcv_rec.id IS NULL
192: THEN
193: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
194: x_return_status := OKC_API.G_RET_STS_ERROR;
195: raise G_EXCEPTION_HALT_VALIDATION;
196: END IF;
197: EXCEPTION

Line 194: x_return_status := OKC_API.G_RET_STS_ERROR;

190: IF p_cgcv_rec.id = OKC_API.G_MISS_NUM OR
191: p_cgcv_rec.id IS NULL
192: THEN
193: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
194: x_return_status := OKC_API.G_RET_STS_ERROR;
195: raise G_EXCEPTION_HALT_VALIDATION;
196: END IF;
197: EXCEPTION
198: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 201: OKC_API.set_message(p_app_name => g_app_name,

197: EXCEPTION
198: WHEN G_EXCEPTION_HALT_VALIDATION THEN
199: NULL;
200: WHEN OTHERS THEN
201: OKC_API.set_message(p_app_name => g_app_name,
202: p_msg_name => g_unexpected_error,
203: p_token1 => g_sqlcode_token,
204: p_token1_value => sqlcode,
205: p_token2 => g_sqlerrm_token,

Line 207: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

203: p_token1 => g_sqlcode_token,
204: p_token1_value => sqlcode,
205: p_token2 => g_sqlerrm_token,
206: p_token2_value => sqlerrm);
207: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
208: END Validate_Id;
209: ---------------------------------------------------------------------------
210: PROCEDURE Validate_Obj_Version_Num(x_return_status OUT NOCOPY VARCHAR2,
211: p_cgcv_rec IN cgcv_rec_type) IS

Line 212: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

208: END Validate_Id;
209: ---------------------------------------------------------------------------
210: PROCEDURE Validate_Obj_Version_Num(x_return_status OUT NOCOPY VARCHAR2,
211: p_cgcv_rec IN cgcv_rec_type) IS
212: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
213: BEGIN
214: x_return_status := OKC_API.G_RET_STS_SUCCESS;
215: IF p_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM OR
216: p_cgcv_rec.object_version_number IS NULL

Line 214: x_return_status := OKC_API.G_RET_STS_SUCCESS;

210: PROCEDURE Validate_Obj_Version_Num(x_return_status OUT NOCOPY VARCHAR2,
211: p_cgcv_rec IN cgcv_rec_type) IS
212: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
213: BEGIN
214: x_return_status := OKC_API.G_RET_STS_SUCCESS;
215: IF p_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM OR
216: p_cgcv_rec.object_version_number IS NULL
217: THEN
218: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

Line 215: IF p_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM OR

211: p_cgcv_rec IN cgcv_rec_type) IS
212: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
213: BEGIN
214: x_return_status := OKC_API.G_RET_STS_SUCCESS;
215: IF p_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM OR
216: p_cgcv_rec.object_version_number IS NULL
217: THEN
218: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
219: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 218: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

214: x_return_status := OKC_API.G_RET_STS_SUCCESS;
215: IF p_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM OR
216: p_cgcv_rec.object_version_number IS NULL
217: THEN
218: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
219: x_return_status := OKC_API.G_RET_STS_ERROR;
220: raise G_EXCEPTION_HALT_VALIDATION;
221: END IF;
222: EXCEPTION

Line 219: x_return_status := OKC_API.G_RET_STS_ERROR;

215: IF p_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM OR
216: p_cgcv_rec.object_version_number IS NULL
217: THEN
218: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
219: x_return_status := OKC_API.G_RET_STS_ERROR;
220: raise G_EXCEPTION_HALT_VALIDATION;
221: END IF;
222: EXCEPTION
223: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 226: OKC_API.set_message(p_app_name => g_app_name,

222: EXCEPTION
223: WHEN G_EXCEPTION_HALT_VALIDATION THEN
224: NULL;
225: WHEN OTHERS THEN
226: OKC_API.set_message(p_app_name => g_app_name,
227: p_msg_name => g_unexpected_error,
228: p_token1 => g_sqlcode_token,
229: p_token1_value => sqlcode,
230: p_token2 => g_sqlerrm_token,

Line 232: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

228: p_token1 => g_sqlcode_token,
229: p_token1_value => sqlcode,
230: p_token2 => g_sqlerrm_token,
231: p_token2_value => sqlerrm);
232: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
233: END Validate_Obj_Version_Num;
234: ---------------------------------------------------------------------------
235: PROCEDURE Validate_Cgp_Parent_Id(x_return_status OUT NOCOPY VARCHAR2,
236: p_cgcv_rec IN cgcv_rec_type) IS

Line 238: x_return_status := OKC_API.G_RET_STS_SUCCESS;

234: ---------------------------------------------------------------------------
235: PROCEDURE Validate_Cgp_Parent_Id(x_return_status OUT NOCOPY VARCHAR2,
236: p_cgcv_rec IN cgcv_rec_type) IS
237: BEGIN
238: x_return_status := OKC_API.G_RET_STS_SUCCESS;
239: IF p_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM OR
240: p_cgcv_rec.cgp_parent_id IS NULL
241: THEN
242: ---OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'cgp_parent_id');

Line 239: IF p_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM OR

235: PROCEDURE Validate_Cgp_Parent_Id(x_return_status OUT NOCOPY VARCHAR2,
236: p_cgcv_rec IN cgcv_rec_type) IS
237: BEGIN
238: x_return_status := OKC_API.G_RET_STS_SUCCESS;
239: IF p_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM OR
240: p_cgcv_rec.cgp_parent_id IS NULL
241: THEN
242: ---OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'cgp_parent_id');
243: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');

Line 242: ---OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'cgp_parent_id');

238: x_return_status := OKC_API.G_RET_STS_SUCCESS;
239: IF p_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM OR
240: p_cgcv_rec.cgp_parent_id IS NULL
241: THEN
242: ---OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'cgp_parent_id');
243: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');
244: x_return_status := OKC_API.G_RET_STS_ERROR;
245: raise G_EXCEPTION_HALT_VALIDATION;
246: END IF;

Line 243: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');

239: IF p_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM OR
240: p_cgcv_rec.cgp_parent_id IS NULL
241: THEN
242: ---OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'cgp_parent_id');
243: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');
244: x_return_status := OKC_API.G_RET_STS_ERROR;
245: raise G_EXCEPTION_HALT_VALIDATION;
246: END IF;
247: EXCEPTION

Line 244: x_return_status := OKC_API.G_RET_STS_ERROR;

240: p_cgcv_rec.cgp_parent_id IS NULL
241: THEN
242: ---OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'cgp_parent_id');
243: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');
244: x_return_status := OKC_API.G_RET_STS_ERROR;
245: raise G_EXCEPTION_HALT_VALIDATION;
246: END IF;
247: EXCEPTION
248: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 251: OKC_API.set_message(p_app_name => g_app_name,

247: EXCEPTION
248: WHEN G_EXCEPTION_HALT_VALIDATION THEN
249: NULL;
250: WHEN OTHERS THEN
251: OKC_API.set_message(p_app_name => g_app_name,
252: p_msg_name => g_unexpected_error,
253: p_token1 => g_sqlcode_token,
254: p_token1_value => sqlcode,
255: p_token2 => g_sqlerrm_token,

Line 257: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

253: p_token1 => g_sqlcode_token,
254: p_token1_value => sqlcode,
255: p_token2 => g_sqlerrm_token,
256: p_token2_value => sqlerrm);
257: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
258: END Validate_Cgp_Parent_Id;
259: ---------------------------------------------------------------------------
260: ---------------------------------------------------------------------------
261: -- PROCEDURE Validate_Attributes

Line 269: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

265: ----------------------------------------------------
266: FUNCTION Validate_Attributes (
267: p_cgcv_rec IN cgcv_rec_type
268: ) RETURN VARCHAR2 IS
269: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
270: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
271: BEGIN
272: Validate_Obj_Version_Num(l_return_status, p_cgcv_rec);
273: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

Line 270: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

266: FUNCTION Validate_Attributes (
267: p_cgcv_rec IN cgcv_rec_type
268: ) RETURN VARCHAR2 IS
269: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
270: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
271: BEGIN
272: Validate_Obj_Version_Num(l_return_status, p_cgcv_rec);
273: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
274: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 273: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

269: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
270: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
271: BEGIN
272: Validate_Obj_Version_Num(l_return_status, p_cgcv_rec);
273: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
274: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
275: x_return_status := l_return_status;
276: raise G_EXCEPTION_HALT_VALIDATION;
277: ELSE

Line 274: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

270: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
271: BEGIN
272: Validate_Obj_Version_Num(l_return_status, p_cgcv_rec);
273: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
274: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
275: x_return_status := l_return_status;
276: raise G_EXCEPTION_HALT_VALIDATION;
277: ELSE
278: x_return_status := l_return_status;

Line 282: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

278: x_return_status := l_return_status;
279: END IF;
280: END IF;
281: Validate_Cgp_Parent_Id(l_return_status, p_cgcv_rec);
282: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
283: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
284: x_return_status := l_return_status;
285: raise G_EXCEPTION_HALT_VALIDATION;
286: ELSE

Line 283: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

279: END IF;
280: END IF;
281: Validate_Cgp_Parent_Id(l_return_status, p_cgcv_rec);
282: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
283: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
284: x_return_status := l_return_status;
285: raise G_EXCEPTION_HALT_VALIDATION;
286: ELSE
287: x_return_status := l_return_status;

Line 295: OKC_API.set_message(p_app_name => g_app_name,

291: EXCEPTION
292: WHEN G_EXCEPTION_HALT_VALIDATION THEN
293: RETURN(x_return_status);
294: WHEN OTHERS THEN
295: OKC_API.set_message(p_app_name => g_app_name,
296: p_msg_name => g_unexpected_error,
297: p_token1 => g_sqlcode_token,
298: p_token1_value => sqlcode,
299: p_token2 => g_sqlerrm_token,

Line 301: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

297: p_token1 => g_sqlcode_token,
298: p_token1_value => sqlcode,
299: p_token2 => g_sqlerrm_token,
300: p_token2_value => sqlerrm);
301: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
302: RETURN(x_return_status);
303: END Validate_Attributes;
304:
305: ---------------------------------------------------------------------------

Line 314: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

310: ------------------------------------------------
311: FUNCTION Validate_Record (
312: p_cgcv_rec IN cgcv_rec_type
313: ) RETURN VARCHAR2 IS
314: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
315: ------------------------------------
316: -- FUNCTION validate_foreign_keys --
317: ------------------------------------
318: FUNCTION validate_foreign_keys (

Line 332: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

328: FROM Okc_K_Headers_V
329: WHERE okc_k_headers_v.id = p_id;
330: l_okc_cgpv_dummy VARCHAR2(1);
331: l_okc_chrv_dummy VARCHAR2(1);
332: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
333: l_row_notfound BOOLEAN := TRUE;
334: BEGIN
335: IF (p_cgcv_rec.CGP_PARENT_ID IS NOT NULL)
336: THEN

Line 342: ----OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'CGP_PARENT_ID');

338: FETCH okc_cgpv_pk_csr INTO l_okc_cgpv_dummy;
339: l_row_notfound := okc_cgpv_pk_csr%NOTFOUND;
340: CLOSE okc_cgpv_pk_csr;
341: IF (l_row_notfound) THEN
342: ----OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'CGP_PARENT_ID');
343: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');
344: RAISE item_not_found_error;
345: END IF;
346: END IF;

Line 343: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');

339: l_row_notfound := okc_cgpv_pk_csr%NOTFOUND;
340: CLOSE okc_cgpv_pk_csr;
341: IF (l_row_notfound) THEN
342: ----OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'CGP_PARENT_ID');
343: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');
344: RAISE item_not_found_error;
345: END IF;
346: END IF;
347: IF (p_cgcv_rec.INCLUDED_CGP_ID IS NOT NULL)

Line 354: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');--Bug#2836703

350: FETCH okc_cgpv_pk_csr INTO l_okc_cgpv_dummy;
351: l_row_notfound := okc_cgpv_pk_csr%NOTFOUND;
352: CLOSE okc_cgpv_pk_csr;
353: IF (l_row_notfound) THEN
354: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');--Bug#2836703
355: ----OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CGP_ID');
356: RAISE item_not_found_error;
357: END IF;
358: END IF;

Line 355: ----OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CGP_ID');

351: l_row_notfound := okc_cgpv_pk_csr%NOTFOUND;
352: CLOSE okc_cgpv_pk_csr;
353: IF (l_row_notfound) THEN
354: OKC_API.SET_MESSAGE('OKC', 'OKC_INVALID_CGP_PARENT_ID');--Bug#2836703
355: ----OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CGP_ID');
356: RAISE item_not_found_error;
357: END IF;
358: END IF;
359: IF (p_cgcv_rec.INCLUDED_CHR_ID IS NOT NULL)

Line 366: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CHR_ID');

362: FETCH okc_chrv_pk_csr INTO l_okc_chrv_dummy;
363: l_row_notfound := okc_chrv_pk_csr%NOTFOUND;
364: CLOSE okc_chrv_pk_csr;
365: IF (l_row_notfound) THEN
366: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CHR_ID');
367: RAISE item_not_found_error;
368: END IF;
369: END IF;
370: RETURN (l_return_status);

Line 373: l_return_status := OKC_API.G_RET_STS_ERROR;

369: END IF;
370: RETURN (l_return_status);
371: EXCEPTION
372: WHEN item_not_found_error THEN
373: l_return_status := OKC_API.G_RET_STS_ERROR;
374: RETURN (l_return_status);
375: END validate_foreign_keys;
376: ----------------------------------------------------
377: FUNCTION validate_unique_keys (

Line 403: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

399: OR (p_id IS NOT NULL
400: AND id <> p_id));
401: l_okc_cgp_dummy VARCHAR2(1);
402: l_okc_chr_dummy VARCHAR2(1);
403: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
404: l_row_found BOOLEAN := FALSE;
405: BEGIN
406: IF (p_cgcv_rec.INCLUDED_CHR_ID IS NOT NULL) THEN
407: OPEN okc_chr_csr(p_cgcv_rec.ID,

Line 414: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CHR_ID');

410: FETCH okc_chr_csr INTO l_okc_chr_dummy;
411: l_row_found := okc_chr_csr%FOUND;
412: CLOSE okc_chr_csr;
413: IF (l_row_found) THEN
414: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CHR_ID');
415: RAISE unique_key_error;
416: END IF;
417: END IF;
418: IF (p_cgcv_rec.INCLUDED_CGP_ID IS NOT NULL) THEN

Line 426: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CGP_ID');

422: FETCH okc_cgp_csr INTO l_okc_cgp_dummy;
423: l_row_found := okc_cgp_csr%FOUND;
424: CLOSE okc_cgp_csr;
425: IF (l_row_found) THEN
426: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'INCLUDED_CGP_ID');
427: RAISE unique_key_error;
428: END IF;
429: END IF;
430: RETURN (l_return_status);

Line 433: l_return_status := OKC_API.G_RET_STS_ERROR;

429: END IF;
430: RETURN (l_return_status);
431: EXCEPTION
432: WHEN unique_key_error THEN
433: l_return_status := OKC_API.G_RET_STS_ERROR;
434: RETURN (l_return_status);
435: END validate_unique_keys;
436: BEGIN
437: IF (p_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM OR

Line 437: IF (p_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM OR

433: l_return_status := OKC_API.G_RET_STS_ERROR;
434: RETURN (l_return_status);
435: END validate_unique_keys;
436: BEGIN
437: IF (p_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM OR
438: p_cgcv_rec.included_chr_id IS NULL) AND
439: (p_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM OR
440: p_cgcv_rec.included_cgp_id IS NULL) THEN
441: OKC_API.set_message(G_APP_NAME, 'OKC_ARC_MANDATORY', 'G_COL_NAME1', 'INCLUDED_CGP_ID',

Line 439: (p_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM OR

435: END validate_unique_keys;
436: BEGIN
437: IF (p_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM OR
438: p_cgcv_rec.included_chr_id IS NULL) AND
439: (p_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM OR
440: p_cgcv_rec.included_cgp_id IS NULL) THEN
441: OKC_API.set_message(G_APP_NAME, 'OKC_ARC_MANDATORY', 'G_COL_NAME1', 'INCLUDED_CGP_ID',
442: 'G_COL_NAME2', 'INCLUDED_CHR_ID');
443: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 441: OKC_API.set_message(G_APP_NAME, 'OKC_ARC_MANDATORY', 'G_COL_NAME1', 'INCLUDED_CGP_ID',

437: IF (p_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM OR
438: p_cgcv_rec.included_chr_id IS NULL) AND
439: (p_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM OR
440: p_cgcv_rec.included_cgp_id IS NULL) THEN
441: OKC_API.set_message(G_APP_NAME, 'OKC_ARC_MANDATORY', 'G_COL_NAME1', 'INCLUDED_CGP_ID',
442: 'G_COL_NAME2', 'INCLUDED_CHR_ID');
443: l_return_status := OKC_API.G_RET_STS_ERROR;
444: raise G_EXCEPTION_HALT_VALIDATION;
445: END IF;

Line 443: l_return_status := OKC_API.G_RET_STS_ERROR;

439: (p_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM OR
440: p_cgcv_rec.included_cgp_id IS NULL) THEN
441: OKC_API.set_message(G_APP_NAME, 'OKC_ARC_MANDATORY', 'G_COL_NAME1', 'INCLUDED_CGP_ID',
442: 'G_COL_NAME2', 'INCLUDED_CHR_ID');
443: l_return_status := OKC_API.G_RET_STS_ERROR;
444: raise G_EXCEPTION_HALT_VALIDATION;
445: END IF;
446: IF (p_cgcv_rec.included_chr_id IS NOT NULL) AND
447: (p_cgcv_rec.included_cgp_id IS NOT NULL) THEN

Line 448: OKC_API.set_message(G_APP_NAME, 'OKC_ARC_VIOLATED', 'G_COL_NAME1', 'INCLUDED_CGP_ID',

444: raise G_EXCEPTION_HALT_VALIDATION;
445: END IF;
446: IF (p_cgcv_rec.included_chr_id IS NOT NULL) AND
447: (p_cgcv_rec.included_cgp_id IS NOT NULL) THEN
448: OKC_API.set_message(G_APP_NAME, 'OKC_ARC_VIOLATED', 'G_COL_NAME1', 'INCLUDED_CGP_ID',
449: 'G_COL_NAME2', 'INCLUDED_CHR_ID');
450: l_return_status := OKC_API.G_RET_STS_ERROR;
451: raise G_EXCEPTION_HALT_VALIDATION;
452: END IF;

Line 450: l_return_status := OKC_API.G_RET_STS_ERROR;

446: IF (p_cgcv_rec.included_chr_id IS NOT NULL) AND
447: (p_cgcv_rec.included_cgp_id IS NOT NULL) THEN
448: OKC_API.set_message(G_APP_NAME, 'OKC_ARC_VIOLATED', 'G_COL_NAME1', 'INCLUDED_CGP_ID',
449: 'G_COL_NAME2', 'INCLUDED_CHR_ID');
450: l_return_status := OKC_API.G_RET_STS_ERROR;
451: raise G_EXCEPTION_HALT_VALIDATION;
452: END IF;
453: l_return_status := validate_foreign_keys (p_cgcv_rec);
454: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

Line 454: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

450: l_return_status := OKC_API.G_RET_STS_ERROR;
451: raise G_EXCEPTION_HALT_VALIDATION;
452: END IF;
453: l_return_status := validate_foreign_keys (p_cgcv_rec);
454: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
455: raise G_EXCEPTION_HALT_VALIDATION;
456: END IF;
457: l_return_status := validate_unique_keys (p_cgcv_rec);
458: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

Line 458: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

454: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
455: raise G_EXCEPTION_HALT_VALIDATION;
456: END IF;
457: l_return_status := validate_unique_keys (p_cgcv_rec);
458: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
459: raise G_EXCEPTION_HALT_VALIDATION;
460: END IF;
461: RETURN (l_return_status);
462: EXCEPTION

Line 466: OKC_API.set_message(p_app_name => g_app_name,

462: EXCEPTION
463: WHEN G_EXCEPTION_HALT_VALIDATION THEN
464: RETURN(l_return_status);
465: WHEN OTHERS THEN
466: OKC_API.set_message(p_app_name => g_app_name,
467: p_msg_name => g_unexpected_error,
468: p_token1 => g_sqlcode_token,
469: p_token1_value => sqlcode,
470: p_token2 => g_sqlerrm_token,

Line 472: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

468: p_token1 => g_sqlcode_token,
469: p_token1_value => sqlcode,
470: p_token2 => g_sqlerrm_token,
471: p_token2_value => sqlerrm);
472: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
473: RETURN(l_return_status);
474: END Validate_Record;
475:
476: ---------------------------------------------------------------------------

Line 486: x_return_status := OKC_API.G_RET_STS_SUCCESS;

482: select scs_code
483: from okc_k_headers_b
484: where id = p_id;
485: BEGIN
486: x_return_status := OKC_API.G_RET_STS_SUCCESS;
487: If p_cgcv_rec.included_chr_id Is Not Null Then
488: If p_cgcv_rec.scs_code Is Null Then
489: Open c1(p_cgcv_rec.included_chr_id);
490: Fetch c1 Into p_cgcv_rec.scs_code;

Line 496: OKC_API.set_message(p_app_name => g_app_name,

492: End If;
493: End If;
494: EXCEPTION
495: WHEN OTHERS THEN
496: OKC_API.set_message(p_app_name => g_app_name,
497: p_msg_name => g_unexpected_error,
498: p_token1 => g_sqlcode_token,
499: p_token1_value => sqlcode,
500: p_token2 => g_sqlerrm_token,

Line 502: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

498: p_token1 => g_sqlcode_token,
499: p_token1_value => sqlcode,
500: p_token2 => g_sqlerrm_token,
501: p_token2_value => sqlerrm);
502: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
503: END Populate_Subclass;
504:
505: ---------------------------------------------------------------------------
506: -- PROCEDURE Migrate

Line 559: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

555: p_cgcv_rec IN cgcv_rec_type) IS
556:
557: l_api_version CONSTANT NUMBER := 1;
558: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
559: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
560: l_cgcv_rec cgcv_rec_type := p_cgcv_rec;
561: l_cgc_rec cgc_rec_type;
562: BEGIN
563: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 563: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

559: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
560: l_cgcv_rec cgcv_rec_type := p_cgcv_rec;
561: l_cgc_rec cgc_rec_type;
562: BEGIN
563: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
564: G_PKG_NAME,
565: p_init_msg_list,
566: l_api_version,
567: p_api_version,

Line 570: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

566: l_api_version,
567: p_api_version,
568: '_PVT',
569: x_return_status);
570: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
572: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
573: RAISE OKC_API.G_EXCEPTION_ERROR;
574: END IF;

Line 571: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

567: p_api_version,
568: '_PVT',
569: x_return_status);
570: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
572: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
573: RAISE OKC_API.G_EXCEPTION_ERROR;
574: END IF;
575: --- Validate all non-missing attributes (Item Level Validation)

Line 572: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

568: '_PVT',
569: x_return_status);
570: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
572: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
573: RAISE OKC_API.G_EXCEPTION_ERROR;
574: END IF;
575: --- Validate all non-missing attributes (Item Level Validation)
576: l_return_status := Validate_Attributes(l_cgcv_rec);

Line 573: RAISE OKC_API.G_EXCEPTION_ERROR;

569: x_return_status);
570: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
572: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
573: RAISE OKC_API.G_EXCEPTION_ERROR;
574: END IF;
575: --- Validate all non-missing attributes (Item Level Validation)
576: l_return_status := Validate_Attributes(l_cgcv_rec);
577: --- If any errors happen abort API

Line 578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

574: END IF;
575: --- Validate all non-missing attributes (Item Level Validation)
576: l_return_status := Validate_Attributes(l_cgcv_rec);
577: --- If any errors happen abort API
578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
581: RAISE OKC_API.G_EXCEPTION_ERROR;
582: END IF;

Line 579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

575: --- Validate all non-missing attributes (Item Level Validation)
576: l_return_status := Validate_Attributes(l_cgcv_rec);
577: --- If any errors happen abort API
578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
581: RAISE OKC_API.G_EXCEPTION_ERROR;
582: END IF;
583: l_return_status := Validate_Record(l_cgcv_rec);

Line 580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

576: l_return_status := Validate_Attributes(l_cgcv_rec);
577: --- If any errors happen abort API
578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
581: RAISE OKC_API.G_EXCEPTION_ERROR;
582: END IF;
583: l_return_status := Validate_Record(l_cgcv_rec);
584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 581: RAISE OKC_API.G_EXCEPTION_ERROR;

577: --- If any errors happen abort API
578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
581: RAISE OKC_API.G_EXCEPTION_ERROR;
582: END IF;
583: l_return_status := Validate_Record(l_cgcv_rec);
584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
581: RAISE OKC_API.G_EXCEPTION_ERROR;
582: END IF;
583: l_return_status := Validate_Record(l_cgcv_rec);
584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
587: RAISE OKC_API.G_EXCEPTION_ERROR;
588: END IF;

Line 585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

581: RAISE OKC_API.G_EXCEPTION_ERROR;
582: END IF;
583: l_return_status := Validate_Record(l_cgcv_rec);
584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
587: RAISE OKC_API.G_EXCEPTION_ERROR;
588: END IF;
589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

582: END IF;
583: l_return_status := Validate_Record(l_cgcv_rec);
584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
587: RAISE OKC_API.G_EXCEPTION_ERROR;
588: END IF;
589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
590: EXCEPTION

Line 587: RAISE OKC_API.G_EXCEPTION_ERROR;

583: l_return_status := Validate_Record(l_cgcv_rec);
584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
587: RAISE OKC_API.G_EXCEPTION_ERROR;
588: END IF;
589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
590: EXCEPTION
591: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
587: RAISE OKC_API.G_EXCEPTION_ERROR;
588: END IF;
589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
590: EXCEPTION
591: WHEN OKC_API.G_EXCEPTION_ERROR THEN
592: x_return_status := OKC_API.HANDLE_EXCEPTIONS
593: (

Line 591: WHEN OKC_API.G_EXCEPTION_ERROR THEN

587: RAISE OKC_API.G_EXCEPTION_ERROR;
588: END IF;
589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
590: EXCEPTION
591: WHEN OKC_API.G_EXCEPTION_ERROR THEN
592: x_return_status := OKC_API.HANDLE_EXCEPTIONS
593: (
594: l_api_name,
595: G_PKG_NAME,

Line 592: x_return_status := OKC_API.HANDLE_EXCEPTIONS

588: END IF;
589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
590: EXCEPTION
591: WHEN OKC_API.G_EXCEPTION_ERROR THEN
592: x_return_status := OKC_API.HANDLE_EXCEPTIONS
593: (
594: l_api_name,
595: G_PKG_NAME,
596: 'OKC_API.G_RET_STS_ERROR',

Line 596: 'OKC_API.G_RET_STS_ERROR',

592: x_return_status := OKC_API.HANDLE_EXCEPTIONS
593: (
594: l_api_name,
595: G_PKG_NAME,
596: 'OKC_API.G_RET_STS_ERROR',
597: x_msg_count,
598: x_msg_data,
599: '_PVT'
600: );

Line 601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

597: x_msg_count,
598: x_msg_data,
599: '_PVT'
600: );
601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
602: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
603: (
604: l_api_name,
605: G_PKG_NAME,

Line 602: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

598: x_msg_data,
599: '_PVT'
600: );
601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
602: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
603: (
604: l_api_name,
605: G_PKG_NAME,
606: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 606: 'OKC_API.G_RET_STS_UNEXP_ERROR',

602: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
603: (
604: l_api_name,
605: G_PKG_NAME,
606: 'OKC_API.G_RET_STS_UNEXP_ERROR',
607: x_msg_count,
608: x_msg_data,
609: '_PVT'
610: );

Line 612: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

608: x_msg_data,
609: '_PVT'
610: );
611: WHEN OTHERS THEN
612: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
613: (
614: l_api_name,
615: G_PKG_NAME,
616: 'OTHERS',

Line 635: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

631: p_cgcv_tbl IN cgcv_tbl_type) IS
632:
633: l_api_version CONSTANT NUMBER := 1;
634: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
635: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
636: i NUMBER := 0;
637: BEGIN
638: OKC_API.init_msg_list(p_init_msg_list);
639: -- Make sure PL/SQL table has records in it before passing

Line 638: OKC_API.init_msg_list(p_init_msg_list);

634: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
635: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
636: i NUMBER := 0;
637: BEGIN
638: OKC_API.init_msg_list(p_init_msg_list);
639: -- Make sure PL/SQL table has records in it before passing
640: IF (p_cgcv_tbl.COUNT > 0) THEN
641: i := p_cgcv_tbl.FIRST;
642: LOOP

Line 655: WHEN OKC_API.G_EXCEPTION_ERROR THEN

651: i := p_cgcv_tbl.NEXT(i);
652: END LOOP;
653: END IF;
654: EXCEPTION
655: WHEN OKC_API.G_EXCEPTION_ERROR THEN
656: x_return_status := OKC_API.HANDLE_EXCEPTIONS
657: (
658: l_api_name,
659: G_PKG_NAME,

Line 656: x_return_status := OKC_API.HANDLE_EXCEPTIONS

652: END LOOP;
653: END IF;
654: EXCEPTION
655: WHEN OKC_API.G_EXCEPTION_ERROR THEN
656: x_return_status := OKC_API.HANDLE_EXCEPTIONS
657: (
658: l_api_name,
659: G_PKG_NAME,
660: 'OKC_API.G_RET_STS_ERROR',

Line 660: 'OKC_API.G_RET_STS_ERROR',

656: x_return_status := OKC_API.HANDLE_EXCEPTIONS
657: (
658: l_api_name,
659: G_PKG_NAME,
660: 'OKC_API.G_RET_STS_ERROR',
661: x_msg_count,
662: x_msg_data,
663: '_PVT'
664: );

Line 665: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

661: x_msg_count,
662: x_msg_data,
663: '_PVT'
664: );
665: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
666: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
667: (
668: l_api_name,
669: G_PKG_NAME,

Line 666: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

662: x_msg_data,
663: '_PVT'
664: );
665: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
666: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
667: (
668: l_api_name,
669: G_PKG_NAME,
670: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 670: 'OKC_API.G_RET_STS_UNEXP_ERROR',

666: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
667: (
668: l_api_name,
669: G_PKG_NAME,
670: 'OKC_API.G_RET_STS_UNEXP_ERROR',
671: x_msg_count,
672: x_msg_data,
673: '_PVT'
674: );

Line 676: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

672: x_msg_data,
673: '_PVT'
674: );
675: WHEN OTHERS THEN
676: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
677: (
678: l_api_name,
679: G_PKG_NAME,
680: 'OTHERS',

Line 703: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

699: x_cgc_rec OUT NOCOPY cgc_rec_type) IS
700:
701: l_api_version CONSTANT NUMBER := 1;
702: l_api_name CONSTANT VARCHAR2(30) := 'GRPINGS_insert_row';
703: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
704: l_cgc_rec cgc_rec_type := p_cgc_rec;
705: l_def_cgc_rec cgc_rec_type;
706: ---------------------------------------------
707: -- Set_Attributes for:OKC_K_GRPINGS --

Line 713: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

709: FUNCTION Set_Attributes (
710: p_cgc_rec IN cgc_rec_type,
711: x_cgc_rec OUT NOCOPY cgc_rec_type
712: ) RETURN VARCHAR2 IS
713: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
714: BEGIN
715: x_cgc_rec := p_cgc_rec;
716: RETURN(l_return_status);
717: END Set_Attributes;

Line 719: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

715: x_cgc_rec := p_cgc_rec;
716: RETURN(l_return_status);
717: END Set_Attributes;
718: BEGIN
719: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
720: p_init_msg_list,
721: '_PVT',
722: x_return_status);
723: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 723: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

719: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
720: p_init_msg_list,
721: '_PVT',
722: x_return_status);
723: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
724: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
725: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_ERROR;
727: END IF;

Line 724: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

720: p_init_msg_list,
721: '_PVT',
722: x_return_status);
723: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
724: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
725: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_ERROR;
727: END IF;
728: --- Setting item attributes

Line 725: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

721: '_PVT',
722: x_return_status);
723: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
724: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
725: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_ERROR;
727: END IF;
728: --- Setting item attributes
729: l_return_status := Set_Attributes(

Line 726: RAISE OKC_API.G_EXCEPTION_ERROR;

722: x_return_status);
723: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
724: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
725: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
726: RAISE OKC_API.G_EXCEPTION_ERROR;
727: END IF;
728: --- Setting item attributes
729: l_return_status := Set_Attributes(
730: p_cgc_rec, -- IN

Line 733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

729: l_return_status := Set_Attributes(
730: p_cgc_rec, -- IN
731: l_cgc_rec); -- OUT
732: --- If any errors happen abort API
733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
736: RAISE OKC_API.G_EXCEPTION_ERROR;
737: END IF;

Line 734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

730: p_cgc_rec, -- IN
731: l_cgc_rec); -- OUT
732: --- If any errors happen abort API
733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
736: RAISE OKC_API.G_EXCEPTION_ERROR;
737: END IF;
738: INSERT INTO OKC_K_GRPINGS(

Line 735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

731: l_cgc_rec); -- OUT
732: --- If any errors happen abort API
733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
736: RAISE OKC_API.G_EXCEPTION_ERROR;
737: END IF;
738: INSERT INTO OKC_K_GRPINGS(
739: id,

Line 736: RAISE OKC_API.G_EXCEPTION_ERROR;

732: --- If any errors happen abort API
733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
736: RAISE OKC_API.G_EXCEPTION_ERROR;
737: END IF;
738: INSERT INTO OKC_K_GRPINGS(
739: id,
740: cgp_parent_id,

Line 764: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

760: l_cgc_rec.last_update_date,
761: l_cgc_rec.last_update_login);
762: -- Set OUT values
763: x_cgc_rec := l_cgc_rec;
764: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
765: EXCEPTION
766: WHEN OKC_API.G_EXCEPTION_ERROR THEN
767: x_return_status := OKC_API.HANDLE_EXCEPTIONS
768: (

Line 766: WHEN OKC_API.G_EXCEPTION_ERROR THEN

762: -- Set OUT values
763: x_cgc_rec := l_cgc_rec;
764: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
765: EXCEPTION
766: WHEN OKC_API.G_EXCEPTION_ERROR THEN
767: x_return_status := OKC_API.HANDLE_EXCEPTIONS
768: (
769: l_api_name,
770: G_PKG_NAME,

Line 767: x_return_status := OKC_API.HANDLE_EXCEPTIONS

763: x_cgc_rec := l_cgc_rec;
764: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
765: EXCEPTION
766: WHEN OKC_API.G_EXCEPTION_ERROR THEN
767: x_return_status := OKC_API.HANDLE_EXCEPTIONS
768: (
769: l_api_name,
770: G_PKG_NAME,
771: 'OKC_API.G_RET_STS_ERROR',

Line 771: 'OKC_API.G_RET_STS_ERROR',

767: x_return_status := OKC_API.HANDLE_EXCEPTIONS
768: (
769: l_api_name,
770: G_PKG_NAME,
771: 'OKC_API.G_RET_STS_ERROR',
772: x_msg_count,
773: x_msg_data,
774: '_PVT'
775: );

Line 776: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

772: x_msg_count,
773: x_msg_data,
774: '_PVT'
775: );
776: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
777: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
778: (
779: l_api_name,
780: G_PKG_NAME,

Line 777: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

773: x_msg_data,
774: '_PVT'
775: );
776: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
777: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
778: (
779: l_api_name,
780: G_PKG_NAME,
781: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 781: 'OKC_API.G_RET_STS_UNEXP_ERROR',

777: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
778: (
779: l_api_name,
780: G_PKG_NAME,
781: 'OKC_API.G_RET_STS_UNEXP_ERROR',
782: x_msg_count,
783: x_msg_data,
784: '_PVT'
785: );

Line 787: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

783: x_msg_data,
784: '_PVT'
785: );
786: WHEN OTHERS THEN
787: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
788: (
789: l_api_name,
790: G_PKG_NAME,
791: 'OTHERS',

Line 811: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

807: x_cgcv_rec OUT NOCOPY cgcv_rec_type) IS
808:
809: l_api_version CONSTANT NUMBER := 1;
810: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
811: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
812: l_cgcv_rec cgcv_rec_type;
813: l_def_cgcv_rec cgcv_rec_type;
814: l_cgc_rec cgc_rec_type;
815: lx_cgc_rec cgc_rec_type;

Line 838: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

834: FUNCTION Set_Attributes (
835: p_cgcv_rec IN cgcv_rec_type,
836: x_cgcv_rec OUT NOCOPY cgcv_rec_type
837: ) RETURN VARCHAR2 IS
838: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
839: BEGIN
840: x_cgcv_rec := p_cgcv_rec;
841: x_cgcv_rec.OBJECT_VERSION_NUMBER := 1;
842: RETURN(l_return_status);

Line 845: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

841: x_cgcv_rec.OBJECT_VERSION_NUMBER := 1;
842: RETURN(l_return_status);
843: END Set_Attributes;
844: BEGIN
845: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
846: G_PKG_NAME,
847: p_init_msg_list,
848: l_api_version,
849: p_api_version,

Line 852: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

848: l_api_version,
849: p_api_version,
850: '_PVT',
851: x_return_status);
852: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
854: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
855: RAISE OKC_API.G_EXCEPTION_ERROR;
856: END IF;

Line 853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

849: p_api_version,
850: '_PVT',
851: x_return_status);
852: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
854: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
855: RAISE OKC_API.G_EXCEPTION_ERROR;
856: END IF;
857: l_cgcv_rec := null_out_defaults(p_cgcv_rec);

Line 854: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

850: '_PVT',
851: x_return_status);
852: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
854: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
855: RAISE OKC_API.G_EXCEPTION_ERROR;
856: END IF;
857: l_cgcv_rec := null_out_defaults(p_cgcv_rec);
858: -- Set primary key value

Line 855: RAISE OKC_API.G_EXCEPTION_ERROR;

851: x_return_status);
852: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
854: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
855: RAISE OKC_API.G_EXCEPTION_ERROR;
856: END IF;
857: l_cgcv_rec := null_out_defaults(p_cgcv_rec);
858: -- Set primary key value
859: l_cgcv_rec.ID := get_seq_id;

Line 865: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

861: l_return_status := Set_Attributes(
862: l_cgcv_rec, -- IN
863: l_def_cgcv_rec); -- OUT
864: --- If any errors happen abort API
865: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
866: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
867: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
868: RAISE OKC_API.G_EXCEPTION_ERROR;
869: END IF;

Line 866: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

862: l_cgcv_rec, -- IN
863: l_def_cgcv_rec); -- OUT
864: --- If any errors happen abort API
865: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
866: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
867: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
868: RAISE OKC_API.G_EXCEPTION_ERROR;
869: END IF;
870: l_def_cgcv_rec := fill_who_columns(l_def_cgcv_rec);

Line 867: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

863: l_def_cgcv_rec); -- OUT
864: --- If any errors happen abort API
865: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
866: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
867: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
868: RAISE OKC_API.G_EXCEPTION_ERROR;
869: END IF;
870: l_def_cgcv_rec := fill_who_columns(l_def_cgcv_rec);
871: --- Validate all non-missing attributes (Item Level Validation)

Line 868: RAISE OKC_API.G_EXCEPTION_ERROR;

864: --- If any errors happen abort API
865: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
866: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
867: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
868: RAISE OKC_API.G_EXCEPTION_ERROR;
869: END IF;
870: l_def_cgcv_rec := fill_who_columns(l_def_cgcv_rec);
871: --- Validate all non-missing attributes (Item Level Validation)
872: l_return_status := Validate_Attributes(l_def_cgcv_rec);

Line 874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

870: l_def_cgcv_rec := fill_who_columns(l_def_cgcv_rec);
871: --- Validate all non-missing attributes (Item Level Validation)
872: l_return_status := Validate_Attributes(l_def_cgcv_rec);
873: --- If any errors happen abort API
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;

Line 875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

871: --- Validate all non-missing attributes (Item Level Validation)
872: l_return_status := Validate_Attributes(l_def_cgcv_rec);
873: --- If any errors happen abort API
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_def_cgcv_rec);

Line 876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

872: l_return_status := Validate_Attributes(l_def_cgcv_rec);
873: --- If any errors happen abort API
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_def_cgcv_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 877: RAISE OKC_API.G_EXCEPTION_ERROR;

873: --- If any errors happen abort API
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_def_cgcv_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_def_cgcv_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;

Line 881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: l_return_status := Validate_Record(l_def_cgcv_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: -- Populate the denormalized scs_code here

Line 882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

878: END IF;
879: l_return_status := Validate_Record(l_def_cgcv_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: -- Populate the denormalized scs_code here
886: Populate_Subclass(l_def_cgcv_rec, l_return_status);

Line 883: RAISE OKC_API.G_EXCEPTION_ERROR;

879: l_return_status := Validate_Record(l_def_cgcv_rec);
880: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
881: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
882: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: -- Populate the denormalized scs_code here
886: Populate_Subclass(l_def_cgcv_rec, l_return_status);
887: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 887: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

883: RAISE OKC_API.G_EXCEPTION_ERROR;
884: END IF;
885: -- Populate the denormalized scs_code here
886: Populate_Subclass(l_def_cgcv_rec, l_return_status);
887: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
888: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
889: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
890: RAISE OKC_API.G_EXCEPTION_ERROR;
891: END IF;

Line 888: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

884: END IF;
885: -- Populate the denormalized scs_code here
886: Populate_Subclass(l_def_cgcv_rec, l_return_status);
887: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
888: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
889: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
890: RAISE OKC_API.G_EXCEPTION_ERROR;
891: END IF;
892: --------------------------------------

Line 889: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

885: -- Populate the denormalized scs_code here
886: Populate_Subclass(l_def_cgcv_rec, l_return_status);
887: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
888: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
889: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
890: RAISE OKC_API.G_EXCEPTION_ERROR;
891: END IF;
892: --------------------------------------
893: -- Move VIEW record to "Child" records

Line 890: RAISE OKC_API.G_EXCEPTION_ERROR;

886: Populate_Subclass(l_def_cgcv_rec, l_return_status);
887: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
888: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
889: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
890: RAISE OKC_API.G_EXCEPTION_ERROR;
891: END IF;
892: --------------------------------------
893: -- Move VIEW record to "Child" records
894: --------------------------------------

Line 907: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

903: x_msg_data,
904: l_cgc_rec,
905: lx_cgc_rec
906: );
907: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
908: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
909: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
910: RAISE OKC_API.G_EXCEPTION_ERROR;
911: END IF;

Line 908: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

904: l_cgc_rec,
905: lx_cgc_rec
906: );
907: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
908: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
909: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
910: RAISE OKC_API.G_EXCEPTION_ERROR;
911: END IF;
912: migrate(lx_cgc_rec, l_def_cgcv_rec);

Line 909: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

905: lx_cgc_rec
906: );
907: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
908: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
909: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
910: RAISE OKC_API.G_EXCEPTION_ERROR;
911: END IF;
912: migrate(lx_cgc_rec, l_def_cgcv_rec);
913: -- Set OUT values

Line 910: RAISE OKC_API.G_EXCEPTION_ERROR;

906: );
907: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
908: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
909: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
910: RAISE OKC_API.G_EXCEPTION_ERROR;
911: END IF;
912: migrate(lx_cgc_rec, l_def_cgcv_rec);
913: -- Set OUT values
914: x_cgcv_rec := l_def_cgcv_rec;

Line 915: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

911: END IF;
912: migrate(lx_cgc_rec, l_def_cgcv_rec);
913: -- Set OUT values
914: x_cgcv_rec := l_def_cgcv_rec;
915: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
916: EXCEPTION
917: WHEN OKC_API.G_EXCEPTION_ERROR THEN
918: x_return_status := OKC_API.HANDLE_EXCEPTIONS
919: (

Line 917: WHEN OKC_API.G_EXCEPTION_ERROR THEN

913: -- Set OUT values
914: x_cgcv_rec := l_def_cgcv_rec;
915: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
916: EXCEPTION
917: WHEN OKC_API.G_EXCEPTION_ERROR THEN
918: x_return_status := OKC_API.HANDLE_EXCEPTIONS
919: (
920: l_api_name,
921: G_PKG_NAME,

Line 918: x_return_status := OKC_API.HANDLE_EXCEPTIONS

914: x_cgcv_rec := l_def_cgcv_rec;
915: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
916: EXCEPTION
917: WHEN OKC_API.G_EXCEPTION_ERROR THEN
918: x_return_status := OKC_API.HANDLE_EXCEPTIONS
919: (
920: l_api_name,
921: G_PKG_NAME,
922: 'OKC_API.G_RET_STS_ERROR',

Line 922: 'OKC_API.G_RET_STS_ERROR',

918: x_return_status := OKC_API.HANDLE_EXCEPTIONS
919: (
920: l_api_name,
921: G_PKG_NAME,
922: 'OKC_API.G_RET_STS_ERROR',
923: x_msg_count,
924: x_msg_data,
925: '_PVT'
926: );

Line 927: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

923: x_msg_count,
924: x_msg_data,
925: '_PVT'
926: );
927: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
928: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
929: (
930: l_api_name,
931: G_PKG_NAME,

Line 928: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

924: x_msg_data,
925: '_PVT'
926: );
927: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
928: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
929: (
930: l_api_name,
931: G_PKG_NAME,
932: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 932: 'OKC_API.G_RET_STS_UNEXP_ERROR',

928: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
929: (
930: l_api_name,
931: G_PKG_NAME,
932: 'OKC_API.G_RET_STS_UNEXP_ERROR',
933: x_msg_count,
934: x_msg_data,
935: '_PVT'
936: );

Line 938: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

934: x_msg_data,
935: '_PVT'
936: );
937: WHEN OTHERS THEN
938: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
939: (
940: l_api_name,
941: G_PKG_NAME,
942: 'OTHERS',

Line 962: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

958: x_cgcv_tbl OUT NOCOPY cgcv_tbl_type) IS
959:
960: l_api_version CONSTANT NUMBER := 1;
961: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
962: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
963: i NUMBER := 0;
964: BEGIN
965: OKC_API.init_msg_list(p_init_msg_list);
966: -- Make sure PL/SQL table has records in it before passing

Line 965: OKC_API.init_msg_list(p_init_msg_list);

961: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
962: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
963: i NUMBER := 0;
964: BEGIN
965: OKC_API.init_msg_list(p_init_msg_list);
966: -- Make sure PL/SQL table has records in it before passing
967: IF (p_cgcv_tbl.COUNT > 0) THEN
968: i := p_cgcv_tbl.FIRST;
969: LOOP

Line 983: WHEN OKC_API.G_EXCEPTION_ERROR THEN

979: i := p_cgcv_tbl.NEXT(i);
980: END LOOP;
981: END IF;
982: EXCEPTION
983: WHEN OKC_API.G_EXCEPTION_ERROR THEN
984: x_return_status := OKC_API.HANDLE_EXCEPTIONS
985: (
986: l_api_name,
987: G_PKG_NAME,

Line 984: x_return_status := OKC_API.HANDLE_EXCEPTIONS

980: END LOOP;
981: END IF;
982: EXCEPTION
983: WHEN OKC_API.G_EXCEPTION_ERROR THEN
984: x_return_status := OKC_API.HANDLE_EXCEPTIONS
985: (
986: l_api_name,
987: G_PKG_NAME,
988: 'OKC_API.G_RET_STS_ERROR',

Line 988: 'OKC_API.G_RET_STS_ERROR',

984: x_return_status := OKC_API.HANDLE_EXCEPTIONS
985: (
986: l_api_name,
987: G_PKG_NAME,
988: 'OKC_API.G_RET_STS_ERROR',
989: x_msg_count,
990: x_msg_data,
991: '_PVT'
992: );

Line 993: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

989: x_msg_count,
990: x_msg_data,
991: '_PVT'
992: );
993: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
994: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
995: (
996: l_api_name,
997: G_PKG_NAME,

Line 994: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

990: x_msg_data,
991: '_PVT'
992: );
993: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
994: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
995: (
996: l_api_name,
997: G_PKG_NAME,
998: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 998: 'OKC_API.G_RET_STS_UNEXP_ERROR',

994: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
995: (
996: l_api_name,
997: G_PKG_NAME,
998: 'OKC_API.G_RET_STS_UNEXP_ERROR',
999: x_msg_count,
1000: x_msg_data,
1001: '_PVT'
1002: );

Line 1004: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1000: x_msg_data,
1001: '_PVT'
1002: );
1003: WHEN OTHERS THEN
1004: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1005: (
1006: l_api_name,
1007: G_PKG_NAME,
1008: 'OTHERS',

Line 1043: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1039: FROM OKC_K_GRPINGS
1040: WHERE ID = p_cgc_rec.id;
1041: l_api_version CONSTANT NUMBER := 1;
1042: l_api_name CONSTANT VARCHAR2(30) := 'GRPINGS_lock_row';
1043: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1044: l_object_version_number OKC_K_GRPINGS.OBJECT_VERSION_NUMBER%TYPE;
1045: lc_object_version_number OKC_K_GRPINGS.OBJECT_VERSION_NUMBER%TYPE;
1046: l_row_notfound BOOLEAN := FALSE;
1047: lc_row_notfound BOOLEAN := FALSE;

Line 1049: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1045: lc_object_version_number OKC_K_GRPINGS.OBJECT_VERSION_NUMBER%TYPE;
1046: l_row_notfound BOOLEAN := FALSE;
1047: lc_row_notfound BOOLEAN := FALSE;
1048: BEGIN
1049: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1050: p_init_msg_list,
1051: '_PVT',
1052: x_return_status);
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1049: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1050: p_init_msg_list,
1051: '_PVT',
1052: x_return_status);
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1056: RAISE OKC_API.G_EXCEPTION_ERROR;
1057: END IF;

Line 1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1050: p_init_msg_list,
1051: '_PVT',
1052: x_return_status);
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1056: RAISE OKC_API.G_EXCEPTION_ERROR;
1057: END IF;
1058: BEGIN

Line 1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1051: '_PVT',
1052: x_return_status);
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1056: RAISE OKC_API.G_EXCEPTION_ERROR;
1057: END IF;
1058: BEGIN
1059: OPEN lock_csr(p_cgc_rec);

Line 1056: RAISE OKC_API.G_EXCEPTION_ERROR;

1052: x_return_status);
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1056: RAISE OKC_API.G_EXCEPTION_ERROR;
1057: END IF;
1058: BEGIN
1059: OPEN lock_csr(p_cgc_rec);
1060: FETCH lock_csr INTO l_object_version_number;

Line 1068: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

1064: WHEN E_Resource_Busy THEN
1065: IF (lock_csr%ISOPEN) THEN
1066: CLOSE lock_csr;
1067: END IF;
1068: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1069: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1070: END;
1071:
1072: IF ( l_row_notfound ) THEN

Line 1079: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

1075: lc_row_notfound := lchk_csr%NOTFOUND;
1076: CLOSE lchk_csr;
1077: END IF;
1078: IF (lc_row_notfound) THEN
1079: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1080: RAISE OKC_API.G_EXCEPTION_ERROR;
1081: ELSIF lc_object_version_number > p_cgc_rec.object_version_number THEN
1082: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1083: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1080: RAISE OKC_API.G_EXCEPTION_ERROR;

1076: CLOSE lchk_csr;
1077: END IF;
1078: IF (lc_row_notfound) THEN
1079: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1080: RAISE OKC_API.G_EXCEPTION_ERROR;
1081: ELSIF lc_object_version_number > p_cgc_rec.object_version_number THEN
1082: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1083: RAISE OKC_API.G_EXCEPTION_ERROR;
1084: ELSIF lc_object_version_number <> p_cgc_rec.object_version_number THEN

Line 1082: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1078: IF (lc_row_notfound) THEN
1079: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1080: RAISE OKC_API.G_EXCEPTION_ERROR;
1081: ELSIF lc_object_version_number > p_cgc_rec.object_version_number THEN
1082: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1083: RAISE OKC_API.G_EXCEPTION_ERROR;
1084: ELSIF lc_object_version_number <> p_cgc_rec.object_version_number THEN
1085: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1086: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1083: RAISE OKC_API.G_EXCEPTION_ERROR;

1079: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1080: RAISE OKC_API.G_EXCEPTION_ERROR;
1081: ELSIF lc_object_version_number > p_cgc_rec.object_version_number THEN
1082: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1083: RAISE OKC_API.G_EXCEPTION_ERROR;
1084: ELSIF lc_object_version_number <> p_cgc_rec.object_version_number THEN
1085: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1086: RAISE OKC_API.G_EXCEPTION_ERROR;
1087: ELSIF lc_object_version_number = -1 THEN

Line 1085: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1081: ELSIF lc_object_version_number > p_cgc_rec.object_version_number THEN
1082: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1083: RAISE OKC_API.G_EXCEPTION_ERROR;
1084: ELSIF lc_object_version_number <> p_cgc_rec.object_version_number THEN
1085: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1086: RAISE OKC_API.G_EXCEPTION_ERROR;
1087: ELSIF lc_object_version_number = -1 THEN
1088: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1089: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1086: RAISE OKC_API.G_EXCEPTION_ERROR;

1082: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1083: RAISE OKC_API.G_EXCEPTION_ERROR;
1084: ELSIF lc_object_version_number <> p_cgc_rec.object_version_number THEN
1085: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1086: RAISE OKC_API.G_EXCEPTION_ERROR;
1087: ELSIF lc_object_version_number = -1 THEN
1088: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1089: RAISE OKC_API.G_EXCEPTION_ERROR;
1090: END IF;

Line 1088: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);

1084: ELSIF lc_object_version_number <> p_cgc_rec.object_version_number THEN
1085: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1086: RAISE OKC_API.G_EXCEPTION_ERROR;
1087: ELSIF lc_object_version_number = -1 THEN
1088: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1089: RAISE OKC_API.G_EXCEPTION_ERROR;
1090: END IF;
1091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1092: EXCEPTION

Line 1089: RAISE OKC_API.G_EXCEPTION_ERROR;

1085: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1086: RAISE OKC_API.G_EXCEPTION_ERROR;
1087: ELSIF lc_object_version_number = -1 THEN
1088: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1089: RAISE OKC_API.G_EXCEPTION_ERROR;
1090: END IF;
1091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1092: EXCEPTION
1093: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1087: ELSIF lc_object_version_number = -1 THEN
1088: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1089: RAISE OKC_API.G_EXCEPTION_ERROR;
1090: END IF;
1091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1092: EXCEPTION
1093: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1095: (

Line 1093: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1089: RAISE OKC_API.G_EXCEPTION_ERROR;
1090: END IF;
1091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1092: EXCEPTION
1093: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1095: (
1096: l_api_name,
1097: G_PKG_NAME,

Line 1094: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1090: END IF;
1091: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1092: EXCEPTION
1093: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1095: (
1096: l_api_name,
1097: G_PKG_NAME,
1098: 'OKC_API.G_RET_STS_ERROR',

Line 1098: 'OKC_API.G_RET_STS_ERROR',

1094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1095: (
1096: l_api_name,
1097: G_PKG_NAME,
1098: 'OKC_API.G_RET_STS_ERROR',
1099: x_msg_count,
1100: x_msg_data,
1101: '_PVT'
1102: );

Line 1103: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1099: x_msg_count,
1100: x_msg_data,
1101: '_PVT'
1102: );
1103: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1104: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1105: (
1106: l_api_name,
1107: G_PKG_NAME,

Line 1104: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1100: x_msg_data,
1101: '_PVT'
1102: );
1103: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1104: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1105: (
1106: l_api_name,
1107: G_PKG_NAME,
1108: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1108: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1104: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1105: (
1106: l_api_name,
1107: G_PKG_NAME,
1108: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1109: x_msg_count,
1110: x_msg_data,
1111: '_PVT'
1112: );

Line 1114: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1110: x_msg_data,
1111: '_PVT'
1112: );
1113: WHEN OTHERS THEN
1114: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1115: (
1116: l_api_name,
1117: G_PKG_NAME,
1118: 'OTHERS',

Line 1137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1133: p_cgcv_rec IN cgcv_rec_type) IS
1134:
1135: l_api_version CONSTANT NUMBER := 1;
1136: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1138: l_cgc_rec cgc_rec_type;
1139: BEGIN
1140: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1141: G_PKG_NAME,

Line 1140: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1136: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1138: l_cgc_rec cgc_rec_type;
1139: BEGIN
1140: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1141: G_PKG_NAME,
1142: p_init_msg_list,
1143: l_api_version,
1144: p_api_version,

Line 1147: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1143: l_api_version,
1144: p_api_version,
1145: '_PVT',
1146: x_return_status);
1147: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1149: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1150: RAISE OKC_API.G_EXCEPTION_ERROR;
1151: END IF;

Line 1148: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1144: p_api_version,
1145: '_PVT',
1146: x_return_status);
1147: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1149: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1150: RAISE OKC_API.G_EXCEPTION_ERROR;
1151: END IF;
1152: --------------------------------------

Line 1149: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1145: '_PVT',
1146: x_return_status);
1147: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1149: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1150: RAISE OKC_API.G_EXCEPTION_ERROR;
1151: END IF;
1152: --------------------------------------
1153: -- Move VIEW record to "Child" records

Line 1150: RAISE OKC_API.G_EXCEPTION_ERROR;

1146: x_return_status);
1147: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1148: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1149: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1150: RAISE OKC_API.G_EXCEPTION_ERROR;
1151: END IF;
1152: --------------------------------------
1153: -- Move VIEW record to "Child" records
1154: --------------------------------------

Line 1166: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1162: x_msg_count,
1163: x_msg_data,
1164: l_cgc_rec
1165: );
1166: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1168: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1169: RAISE OKC_API.G_EXCEPTION_ERROR;
1170: END IF;

Line 1167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1163: x_msg_data,
1164: l_cgc_rec
1165: );
1166: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1168: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1169: RAISE OKC_API.G_EXCEPTION_ERROR;
1170: END IF;
1171: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1168: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1164: l_cgc_rec
1165: );
1166: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1168: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1169: RAISE OKC_API.G_EXCEPTION_ERROR;
1170: END IF;
1171: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1172: EXCEPTION

Line 1169: RAISE OKC_API.G_EXCEPTION_ERROR;

1165: );
1166: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1168: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1169: RAISE OKC_API.G_EXCEPTION_ERROR;
1170: END IF;
1171: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1172: EXCEPTION
1173: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1171: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1168: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1169: RAISE OKC_API.G_EXCEPTION_ERROR;
1170: END IF;
1171: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1172: EXCEPTION
1173: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1174: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1175: (

Line 1173: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1169: RAISE OKC_API.G_EXCEPTION_ERROR;
1170: END IF;
1171: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1172: EXCEPTION
1173: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1174: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1175: (
1176: l_api_name,
1177: G_PKG_NAME,

Line 1174: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1170: END IF;
1171: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1172: EXCEPTION
1173: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1174: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1175: (
1176: l_api_name,
1177: G_PKG_NAME,
1178: 'OKC_API.G_RET_STS_ERROR',

Line 1178: 'OKC_API.G_RET_STS_ERROR',

1174: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1175: (
1176: l_api_name,
1177: G_PKG_NAME,
1178: 'OKC_API.G_RET_STS_ERROR',
1179: x_msg_count,
1180: x_msg_data,
1181: '_PVT'
1182: );

Line 1183: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1179: x_msg_count,
1180: x_msg_data,
1181: '_PVT'
1182: );
1183: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1184: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1185: (
1186: l_api_name,
1187: G_PKG_NAME,

Line 1184: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1180: x_msg_data,
1181: '_PVT'
1182: );
1183: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1184: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1185: (
1186: l_api_name,
1187: G_PKG_NAME,
1188: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1188: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1184: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1185: (
1186: l_api_name,
1187: G_PKG_NAME,
1188: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1189: x_msg_count,
1190: x_msg_data,
1191: '_PVT'
1192: );

Line 1194: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1190: x_msg_data,
1191: '_PVT'
1192: );
1193: WHEN OTHERS THEN
1194: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1195: (
1196: l_api_name,
1197: G_PKG_NAME,
1198: 'OTHERS',

Line 1217: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1213: p_cgcv_tbl IN cgcv_tbl_type) IS
1214:
1215: l_api_version CONSTANT NUMBER := 1;
1216: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1217: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1218: i NUMBER := 0;
1219: BEGIN
1220: OKC_API.init_msg_list(p_init_msg_list);
1221: -- Make sure PL/SQL table has records in it before passing

Line 1220: OKC_API.init_msg_list(p_init_msg_list);

1216: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1217: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1218: i NUMBER := 0;
1219: BEGIN
1220: OKC_API.init_msg_list(p_init_msg_list);
1221: -- Make sure PL/SQL table has records in it before passing
1222: IF (p_cgcv_tbl.COUNT > 0) THEN
1223: i := p_cgcv_tbl.FIRST;
1224: LOOP

Line 1237: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1233: i := p_cgcv_tbl.NEXT(i);
1234: END LOOP;
1235: END IF;
1236: EXCEPTION
1237: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1239: (
1240: l_api_name,
1241: G_PKG_NAME,

Line 1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1234: END LOOP;
1235: END IF;
1236: EXCEPTION
1237: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1239: (
1240: l_api_name,
1241: G_PKG_NAME,
1242: 'OKC_API.G_RET_STS_ERROR',

Line 1242: 'OKC_API.G_RET_STS_ERROR',

1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1239: (
1240: l_api_name,
1241: G_PKG_NAME,
1242: 'OKC_API.G_RET_STS_ERROR',
1243: x_msg_count,
1244: x_msg_data,
1245: '_PVT'
1246: );

Line 1247: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1243: x_msg_count,
1244: x_msg_data,
1245: '_PVT'
1246: );
1247: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1248: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1249: (
1250: l_api_name,
1251: G_PKG_NAME,

Line 1248: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1244: x_msg_data,
1245: '_PVT'
1246: );
1247: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1248: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1249: (
1250: l_api_name,
1251: G_PKG_NAME,
1252: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1252: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1248: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1249: (
1250: l_api_name,
1251: G_PKG_NAME,
1252: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1253: x_msg_count,
1254: x_msg_data,
1255: '_PVT'
1256: );

Line 1258: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1254: x_msg_data,
1255: '_PVT'
1256: );
1257: WHEN OTHERS THEN
1258: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1259: (
1260: l_api_name,
1261: G_PKG_NAME,
1262: 'OTHERS',

Line 1285: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1281: x_cgc_rec OUT NOCOPY cgc_rec_type) IS
1282:
1283: l_api_version CONSTANT NUMBER := 1;
1284: l_api_name CONSTANT VARCHAR2(30) := 'GRPINGS_update_row';
1285: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1286: l_cgc_rec cgc_rec_type := p_cgc_rec;
1287: l_def_cgc_rec cgc_rec_type;
1288: l_row_notfound BOOLEAN := TRUE;
1289: ----------------------------------

Line 1298: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1294: x_cgc_rec OUT NOCOPY cgc_rec_type
1295: ) RETURN VARCHAR2 IS
1296: l_cgc_rec cgc_rec_type;
1297: l_row_notfound BOOLEAN := TRUE;
1298: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1299: BEGIN
1300: x_cgc_rec := p_cgc_rec;
1301: -- Get current database values
1302: l_cgc_rec := get_rec(p_cgc_rec, l_row_notfound);

Line 1304: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1300: x_cgc_rec := p_cgc_rec;
1301: -- Get current database values
1302: l_cgc_rec := get_rec(p_cgc_rec, l_row_notfound);
1303: IF (l_row_notfound) THEN
1304: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1305: END IF;
1306: IF (x_cgc_rec.id = OKC_API.G_MISS_NUM)
1307: THEN
1308: x_cgc_rec.id := l_cgc_rec.id;

Line 1306: IF (x_cgc_rec.id = OKC_API.G_MISS_NUM)

1302: l_cgc_rec := get_rec(p_cgc_rec, l_row_notfound);
1303: IF (l_row_notfound) THEN
1304: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1305: END IF;
1306: IF (x_cgc_rec.id = OKC_API.G_MISS_NUM)
1307: THEN
1308: x_cgc_rec.id := l_cgc_rec.id;
1309: END IF;
1310: IF (x_cgc_rec.cgp_parent_id = OKC_API.G_MISS_NUM)

Line 1310: IF (x_cgc_rec.cgp_parent_id = OKC_API.G_MISS_NUM)

1306: IF (x_cgc_rec.id = OKC_API.G_MISS_NUM)
1307: THEN
1308: x_cgc_rec.id := l_cgc_rec.id;
1309: END IF;
1310: IF (x_cgc_rec.cgp_parent_id = OKC_API.G_MISS_NUM)
1311: THEN
1312: x_cgc_rec.cgp_parent_id := l_cgc_rec.cgp_parent_id;
1313: END IF;
1314: IF (x_cgc_rec.included_cgp_id = OKC_API.G_MISS_NUM)

Line 1314: IF (x_cgc_rec.included_cgp_id = OKC_API.G_MISS_NUM)

1310: IF (x_cgc_rec.cgp_parent_id = OKC_API.G_MISS_NUM)
1311: THEN
1312: x_cgc_rec.cgp_parent_id := l_cgc_rec.cgp_parent_id;
1313: END IF;
1314: IF (x_cgc_rec.included_cgp_id = OKC_API.G_MISS_NUM)
1315: THEN
1316: x_cgc_rec.included_cgp_id := l_cgc_rec.included_cgp_id;
1317: END IF;
1318: IF (x_cgc_rec.included_chr_id = OKC_API.G_MISS_NUM)

Line 1318: IF (x_cgc_rec.included_chr_id = OKC_API.G_MISS_NUM)

1314: IF (x_cgc_rec.included_cgp_id = OKC_API.G_MISS_NUM)
1315: THEN
1316: x_cgc_rec.included_cgp_id := l_cgc_rec.included_cgp_id;
1317: END IF;
1318: IF (x_cgc_rec.included_chr_id = OKC_API.G_MISS_NUM)
1319: THEN
1320: x_cgc_rec.included_chr_id := l_cgc_rec.included_chr_id;
1321: END IF;
1322: IF (x_cgc_rec.scs_code = OKC_API.G_MISS_CHAR)

Line 1322: IF (x_cgc_rec.scs_code = OKC_API.G_MISS_CHAR)

1318: IF (x_cgc_rec.included_chr_id = OKC_API.G_MISS_NUM)
1319: THEN
1320: x_cgc_rec.included_chr_id := l_cgc_rec.included_chr_id;
1321: END IF;
1322: IF (x_cgc_rec.scs_code = OKC_API.G_MISS_CHAR)
1323: THEN
1324: x_cgc_rec.scs_code := l_cgc_rec.scs_code;
1325: END IF;
1326: IF (x_cgc_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1326: IF (x_cgc_rec.object_version_number = OKC_API.G_MISS_NUM)

1322: IF (x_cgc_rec.scs_code = OKC_API.G_MISS_CHAR)
1323: THEN
1324: x_cgc_rec.scs_code := l_cgc_rec.scs_code;
1325: END IF;
1326: IF (x_cgc_rec.object_version_number = OKC_API.G_MISS_NUM)
1327: THEN
1328: x_cgc_rec.object_version_number := l_cgc_rec.object_version_number;
1329: END IF;
1330: IF (x_cgc_rec.created_by = OKC_API.G_MISS_NUM)

Line 1330: IF (x_cgc_rec.created_by = OKC_API.G_MISS_NUM)

1326: IF (x_cgc_rec.object_version_number = OKC_API.G_MISS_NUM)
1327: THEN
1328: x_cgc_rec.object_version_number := l_cgc_rec.object_version_number;
1329: END IF;
1330: IF (x_cgc_rec.created_by = OKC_API.G_MISS_NUM)
1331: THEN
1332: x_cgc_rec.created_by := l_cgc_rec.created_by;
1333: END IF;
1334: IF (x_cgc_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1334: IF (x_cgc_rec.creation_date = OKC_API.G_MISS_DATE)

1330: IF (x_cgc_rec.created_by = OKC_API.G_MISS_NUM)
1331: THEN
1332: x_cgc_rec.created_by := l_cgc_rec.created_by;
1333: END IF;
1334: IF (x_cgc_rec.creation_date = OKC_API.G_MISS_DATE)
1335: THEN
1336: x_cgc_rec.creation_date := l_cgc_rec.creation_date;
1337: END IF;
1338: IF (x_cgc_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1338: IF (x_cgc_rec.last_updated_by = OKC_API.G_MISS_NUM)

1334: IF (x_cgc_rec.creation_date = OKC_API.G_MISS_DATE)
1335: THEN
1336: x_cgc_rec.creation_date := l_cgc_rec.creation_date;
1337: END IF;
1338: IF (x_cgc_rec.last_updated_by = OKC_API.G_MISS_NUM)
1339: THEN
1340: x_cgc_rec.last_updated_by := l_cgc_rec.last_updated_by;
1341: END IF;
1342: IF (x_cgc_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1342: IF (x_cgc_rec.last_update_date = OKC_API.G_MISS_DATE)

1338: IF (x_cgc_rec.last_updated_by = OKC_API.G_MISS_NUM)
1339: THEN
1340: x_cgc_rec.last_updated_by := l_cgc_rec.last_updated_by;
1341: END IF;
1342: IF (x_cgc_rec.last_update_date = OKC_API.G_MISS_DATE)
1343: THEN
1344: x_cgc_rec.last_update_date := l_cgc_rec.last_update_date;
1345: END IF;
1346: IF (x_cgc_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1346: IF (x_cgc_rec.last_update_login = OKC_API.G_MISS_NUM)

1342: IF (x_cgc_rec.last_update_date = OKC_API.G_MISS_DATE)
1343: THEN
1344: x_cgc_rec.last_update_date := l_cgc_rec.last_update_date;
1345: END IF;
1346: IF (x_cgc_rec.last_update_login = OKC_API.G_MISS_NUM)
1347: THEN
1348: x_cgc_rec.last_update_login := l_cgc_rec.last_update_login;
1349: END IF;
1350: RETURN(l_return_status);

Line 1359: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1355: FUNCTION Set_Attributes (
1356: p_cgc_rec IN cgc_rec_type,
1357: x_cgc_rec OUT NOCOPY cgc_rec_type
1358: ) RETURN VARCHAR2 IS
1359: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1360: BEGIN
1361: x_cgc_rec := p_cgc_rec;
1362: RETURN(l_return_status);
1363: END Set_Attributes;

Line 1365: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1361: x_cgc_rec := p_cgc_rec;
1362: RETURN(l_return_status);
1363: END Set_Attributes;
1364: BEGIN
1365: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1366: p_init_msg_list,
1367: '_PVT',
1368: x_return_status);
1369: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1369: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1365: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1366: p_init_msg_list,
1367: '_PVT',
1368: x_return_status);
1369: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1370: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1371: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1372: RAISE OKC_API.G_EXCEPTION_ERROR;
1373: END IF;

Line 1370: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1366: p_init_msg_list,
1367: '_PVT',
1368: x_return_status);
1369: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1370: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1371: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1372: RAISE OKC_API.G_EXCEPTION_ERROR;
1373: END IF;
1374: --- Setting item attributes

Line 1371: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1367: '_PVT',
1368: x_return_status);
1369: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1370: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1371: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1372: RAISE OKC_API.G_EXCEPTION_ERROR;
1373: END IF;
1374: --- Setting item attributes
1375: l_return_status := Set_Attributes(

Line 1372: RAISE OKC_API.G_EXCEPTION_ERROR;

1368: x_return_status);
1369: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1370: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1371: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1372: RAISE OKC_API.G_EXCEPTION_ERROR;
1373: END IF;
1374: --- Setting item attributes
1375: l_return_status := Set_Attributes(
1376: p_cgc_rec, -- IN

Line 1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1375: l_return_status := Set_Attributes(
1376: p_cgc_rec, -- IN
1377: l_cgc_rec); -- OUT
1378: --- If any errors happen abort API
1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;

Line 1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1376: p_cgc_rec, -- IN
1377: l_cgc_rec); -- OUT
1378: --- If any errors happen abort API
1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;
1384: l_return_status := populate_new_record(l_cgc_rec, l_def_cgc_rec);

Line 1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1377: l_cgc_rec); -- OUT
1378: --- If any errors happen abort API
1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;
1384: l_return_status := populate_new_record(l_cgc_rec, l_def_cgc_rec);
1385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1382: RAISE OKC_API.G_EXCEPTION_ERROR;

1378: --- If any errors happen abort API
1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;
1384: l_return_status := populate_new_record(l_cgc_rec, l_def_cgc_rec);
1385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;
1384: l_return_status := populate_new_record(l_cgc_rec, l_def_cgc_rec);
1385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: RAISE OKC_API.G_EXCEPTION_ERROR;
1389: END IF;

Line 1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;
1384: l_return_status := populate_new_record(l_cgc_rec, l_def_cgc_rec);
1385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: RAISE OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390: UPDATE OKC_K_GRPINGS

Line 1387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1383: END IF;
1384: l_return_status := populate_new_record(l_cgc_rec, l_def_cgc_rec);
1385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: RAISE OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390: UPDATE OKC_K_GRPINGS
1391: SET CGP_PARENT_ID = l_def_cgc_rec.cgp_parent_id,

Line 1388: RAISE OKC_API.G_EXCEPTION_ERROR;

1384: l_return_status := populate_new_record(l_cgc_rec, l_def_cgc_rec);
1385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: RAISE OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390: UPDATE OKC_K_GRPINGS
1391: SET CGP_PARENT_ID = l_def_cgc_rec.cgp_parent_id,
1392: INCLUDED_CGP_ID = l_def_cgc_rec.included_cgp_id,

Line 1404: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1400: LAST_UPDATE_LOGIN = l_def_cgc_rec.last_update_login
1401: WHERE ID = l_def_cgc_rec.id;
1402:
1403: x_cgc_rec := l_def_cgc_rec;
1404: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1405: EXCEPTION
1406: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1408: (

Line 1406: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1402:
1403: x_cgc_rec := l_def_cgc_rec;
1404: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1405: EXCEPTION
1406: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1408: (
1409: l_api_name,
1410: G_PKG_NAME,

Line 1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1403: x_cgc_rec := l_def_cgc_rec;
1404: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1405: EXCEPTION
1406: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1408: (
1409: l_api_name,
1410: G_PKG_NAME,
1411: 'OKC_API.G_RET_STS_ERROR',

Line 1411: 'OKC_API.G_RET_STS_ERROR',

1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1408: (
1409: l_api_name,
1410: G_PKG_NAME,
1411: 'OKC_API.G_RET_STS_ERROR',
1412: x_msg_count,
1413: x_msg_data,
1414: '_PVT'
1415: );

Line 1416: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1412: x_msg_count,
1413: x_msg_data,
1414: '_PVT'
1415: );
1416: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1417: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1418: (
1419: l_api_name,
1420: G_PKG_NAME,

Line 1417: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1413: x_msg_data,
1414: '_PVT'
1415: );
1416: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1417: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1418: (
1419: l_api_name,
1420: G_PKG_NAME,
1421: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1421: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1417: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1418: (
1419: l_api_name,
1420: G_PKG_NAME,
1421: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1422: x_msg_count,
1423: x_msg_data,
1424: '_PVT'
1425: );

Line 1427: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1423: x_msg_data,
1424: '_PVT'
1425: );
1426: WHEN OTHERS THEN
1427: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1428: (
1429: l_api_name,
1430: G_PKG_NAME,
1431: 'OTHERS',

Line 1451: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1447: x_cgcv_rec OUT NOCOPY cgcv_rec_type) IS
1448:
1449: l_api_version CONSTANT NUMBER := 1;
1450: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1451: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1452: l_cgcv_rec cgcv_rec_type := p_cgcv_rec;
1453: l_def_cgcv_rec cgcv_rec_type;
1454: l_cgc_rec cgc_rec_type;
1455: lx_cgc_rec cgc_rec_type;

Line 1478: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1474: x_cgcv_rec OUT NOCOPY cgcv_rec_type
1475: ) RETURN VARCHAR2 IS
1476: l_cgcv_rec cgcv_rec_type;
1477: l_row_notfound BOOLEAN := TRUE;
1478: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1479: BEGIN
1480: x_cgcv_rec := p_cgcv_rec;
1481: -- Get current database values
1482: l_cgcv_rec := get_rec(p_cgcv_rec, l_row_notfound);

Line 1484: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1480: x_cgcv_rec := p_cgcv_rec;
1481: -- Get current database values
1482: l_cgcv_rec := get_rec(p_cgcv_rec, l_row_notfound);
1483: IF (l_row_notfound) THEN
1484: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1485: END IF;
1486: IF (x_cgcv_rec.id = OKC_API.G_MISS_NUM)
1487: THEN
1488: x_cgcv_rec.id := l_cgcv_rec.id;

Line 1486: IF (x_cgcv_rec.id = OKC_API.G_MISS_NUM)

1482: l_cgcv_rec := get_rec(p_cgcv_rec, l_row_notfound);
1483: IF (l_row_notfound) THEN
1484: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1485: END IF;
1486: IF (x_cgcv_rec.id = OKC_API.G_MISS_NUM)
1487: THEN
1488: x_cgcv_rec.id := l_cgcv_rec.id;
1489: END IF;
1490: IF (x_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1490: IF (x_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM)

1486: IF (x_cgcv_rec.id = OKC_API.G_MISS_NUM)
1487: THEN
1488: x_cgcv_rec.id := l_cgcv_rec.id;
1489: END IF;
1490: IF (x_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM)
1491: THEN
1492: x_cgcv_rec.object_version_number := l_cgcv_rec.object_version_number;
1493: END IF;
1494: IF (x_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM)

Line 1494: IF (x_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM)

1490: IF (x_cgcv_rec.object_version_number = OKC_API.G_MISS_NUM)
1491: THEN
1492: x_cgcv_rec.object_version_number := l_cgcv_rec.object_version_number;
1493: END IF;
1494: IF (x_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM)
1495: THEN
1496: x_cgcv_rec.cgp_parent_id := l_cgcv_rec.cgp_parent_id;
1497: END IF;
1498: IF (x_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM)

Line 1498: IF (x_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM)

1494: IF (x_cgcv_rec.cgp_parent_id = OKC_API.G_MISS_NUM)
1495: THEN
1496: x_cgcv_rec.cgp_parent_id := l_cgcv_rec.cgp_parent_id;
1497: END IF;
1498: IF (x_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM)
1499: THEN
1500: x_cgcv_rec.included_chr_id := l_cgcv_rec.included_chr_id;
1501: END IF;
1502: IF (x_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM)

Line 1502: IF (x_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM)

1498: IF (x_cgcv_rec.included_chr_id = OKC_API.G_MISS_NUM)
1499: THEN
1500: x_cgcv_rec.included_chr_id := l_cgcv_rec.included_chr_id;
1501: END IF;
1502: IF (x_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM)
1503: THEN
1504: x_cgcv_rec.included_cgp_id := l_cgcv_rec.included_cgp_id;
1505: END IF;
1506: IF (x_cgcv_rec.scs_code = OKC_API.G_MISS_CHAR)

Line 1506: IF (x_cgcv_rec.scs_code = OKC_API.G_MISS_CHAR)

1502: IF (x_cgcv_rec.included_cgp_id = OKC_API.G_MISS_NUM)
1503: THEN
1504: x_cgcv_rec.included_cgp_id := l_cgcv_rec.included_cgp_id;
1505: END IF;
1506: IF (x_cgcv_rec.scs_code = OKC_API.G_MISS_CHAR)
1507: THEN
1508: x_cgcv_rec.scs_code := l_cgcv_rec.scs_code;
1509: END IF;
1510: IF (x_cgcv_rec.created_by = OKC_API.G_MISS_NUM)

Line 1510: IF (x_cgcv_rec.created_by = OKC_API.G_MISS_NUM)

1506: IF (x_cgcv_rec.scs_code = OKC_API.G_MISS_CHAR)
1507: THEN
1508: x_cgcv_rec.scs_code := l_cgcv_rec.scs_code;
1509: END IF;
1510: IF (x_cgcv_rec.created_by = OKC_API.G_MISS_NUM)
1511: THEN
1512: x_cgcv_rec.created_by := l_cgcv_rec.created_by;
1513: END IF;
1514: IF (x_cgcv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1514: IF (x_cgcv_rec.creation_date = OKC_API.G_MISS_DATE)

1510: IF (x_cgcv_rec.created_by = OKC_API.G_MISS_NUM)
1511: THEN
1512: x_cgcv_rec.created_by := l_cgcv_rec.created_by;
1513: END IF;
1514: IF (x_cgcv_rec.creation_date = OKC_API.G_MISS_DATE)
1515: THEN
1516: x_cgcv_rec.creation_date := l_cgcv_rec.creation_date;
1517: END IF;
1518: IF (x_cgcv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1518: IF (x_cgcv_rec.last_updated_by = OKC_API.G_MISS_NUM)

1514: IF (x_cgcv_rec.creation_date = OKC_API.G_MISS_DATE)
1515: THEN
1516: x_cgcv_rec.creation_date := l_cgcv_rec.creation_date;
1517: END IF;
1518: IF (x_cgcv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1519: THEN
1520: x_cgcv_rec.last_updated_by := l_cgcv_rec.last_updated_by;
1521: END IF;
1522: IF (x_cgcv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1522: IF (x_cgcv_rec.last_update_date = OKC_API.G_MISS_DATE)

1518: IF (x_cgcv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1519: THEN
1520: x_cgcv_rec.last_updated_by := l_cgcv_rec.last_updated_by;
1521: END IF;
1522: IF (x_cgcv_rec.last_update_date = OKC_API.G_MISS_DATE)
1523: THEN
1524: x_cgcv_rec.last_update_date := l_cgcv_rec.last_update_date;
1525: END IF;
1526: IF (x_cgcv_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1526: IF (x_cgcv_rec.last_update_login = OKC_API.G_MISS_NUM)

1522: IF (x_cgcv_rec.last_update_date = OKC_API.G_MISS_DATE)
1523: THEN
1524: x_cgcv_rec.last_update_date := l_cgcv_rec.last_update_date;
1525: END IF;
1526: IF (x_cgcv_rec.last_update_login = OKC_API.G_MISS_NUM)
1527: THEN
1528: x_cgcv_rec.last_update_login := l_cgcv_rec.last_update_login;
1529: END IF;
1530: RETURN(l_return_status);

Line 1539: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1535: FUNCTION Set_Attributes (
1536: p_cgcv_rec IN cgcv_rec_type,
1537: x_cgcv_rec OUT NOCOPY cgcv_rec_type
1538: ) RETURN VARCHAR2 IS
1539: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1540: BEGIN
1541: x_cgcv_rec := p_cgcv_rec;
1542: x_cgcv_rec.OBJECT_VERSION_NUMBER := NVL(x_cgcv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1543: RETURN(l_return_status);

Line 1546: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1542: x_cgcv_rec.OBJECT_VERSION_NUMBER := NVL(x_cgcv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
1543: RETURN(l_return_status);
1544: END Set_Attributes;
1545: BEGIN
1546: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1547: G_PKG_NAME,
1548: p_init_msg_list,
1549: l_api_version,
1550: p_api_version,

Line 1553: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1549: l_api_version,
1550: p_api_version,
1551: '_PVT',
1552: x_return_status);
1553: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1554: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1555: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1556: RAISE OKC_API.G_EXCEPTION_ERROR;
1557: END IF;

Line 1554: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1550: p_api_version,
1551: '_PVT',
1552: x_return_status);
1553: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1554: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1555: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1556: RAISE OKC_API.G_EXCEPTION_ERROR;
1557: END IF;
1558: --- Setting item attributes

Line 1555: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1551: '_PVT',
1552: x_return_status);
1553: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1554: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1555: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1556: RAISE OKC_API.G_EXCEPTION_ERROR;
1557: END IF;
1558: --- Setting item attributes
1559: l_return_status := Set_Attributes(

Line 1556: RAISE OKC_API.G_EXCEPTION_ERROR;

1552: x_return_status);
1553: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1554: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1555: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1556: RAISE OKC_API.G_EXCEPTION_ERROR;
1557: END IF;
1558: --- Setting item attributes
1559: l_return_status := Set_Attributes(
1560: p_cgcv_rec, -- IN

Line 1563: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1559: l_return_status := Set_Attributes(
1560: p_cgcv_rec, -- IN
1561: l_cgcv_rec); -- OUT
1562: --- If any errors happen abort API
1563: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1564: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1565: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1566: RAISE OKC_API.G_EXCEPTION_ERROR;
1567: END IF;

Line 1564: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1560: p_cgcv_rec, -- IN
1561: l_cgcv_rec); -- OUT
1562: --- If any errors happen abort API
1563: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1564: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1565: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1566: RAISE OKC_API.G_EXCEPTION_ERROR;
1567: END IF;
1568: l_return_status := populate_new_record(l_cgcv_rec, l_def_cgcv_rec);

Line 1565: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1561: l_cgcv_rec); -- OUT
1562: --- If any errors happen abort API
1563: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1564: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1565: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1566: RAISE OKC_API.G_EXCEPTION_ERROR;
1567: END IF;
1568: l_return_status := populate_new_record(l_cgcv_rec, l_def_cgcv_rec);
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1566: RAISE OKC_API.G_EXCEPTION_ERROR;

1562: --- If any errors happen abort API
1563: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1564: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1565: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1566: RAISE OKC_API.G_EXCEPTION_ERROR;
1567: END IF;
1568: l_return_status := populate_new_record(l_cgcv_rec, l_def_cgcv_rec);
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1565: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1566: RAISE OKC_API.G_EXCEPTION_ERROR;
1567: END IF;
1568: l_return_status := populate_new_record(l_cgcv_rec, l_def_cgcv_rec);
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1572: RAISE OKC_API.G_EXCEPTION_ERROR;
1573: END IF;

Line 1570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1566: RAISE OKC_API.G_EXCEPTION_ERROR;
1567: END IF;
1568: l_return_status := populate_new_record(l_cgcv_rec, l_def_cgcv_rec);
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1572: RAISE OKC_API.G_EXCEPTION_ERROR;
1573: END IF;
1574: l_def_cgcv_rec := fill_who_columns(l_def_cgcv_rec);

Line 1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1567: END IF;
1568: l_return_status := populate_new_record(l_cgcv_rec, l_def_cgcv_rec);
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1572: RAISE OKC_API.G_EXCEPTION_ERROR;
1573: END IF;
1574: l_def_cgcv_rec := fill_who_columns(l_def_cgcv_rec);
1575: --- Validate all non-missing attributes (Item Level Validation)

Line 1572: RAISE OKC_API.G_EXCEPTION_ERROR;

1568: l_return_status := populate_new_record(l_cgcv_rec, l_def_cgcv_rec);
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1572: RAISE OKC_API.G_EXCEPTION_ERROR;
1573: END IF;
1574: l_def_cgcv_rec := fill_who_columns(l_def_cgcv_rec);
1575: --- Validate all non-missing attributes (Item Level Validation)
1576: l_return_status := Validate_Attributes(l_def_cgcv_rec);

Line 1578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1574: l_def_cgcv_rec := fill_who_columns(l_def_cgcv_rec);
1575: --- Validate all non-missing attributes (Item Level Validation)
1576: l_return_status := Validate_Attributes(l_def_cgcv_rec);
1577: --- If any errors happen abort API
1578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1581: RAISE OKC_API.G_EXCEPTION_ERROR;
1582: END IF;

Line 1579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1575: --- Validate all non-missing attributes (Item Level Validation)
1576: l_return_status := Validate_Attributes(l_def_cgcv_rec);
1577: --- If any errors happen abort API
1578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1581: RAISE OKC_API.G_EXCEPTION_ERROR;
1582: END IF;
1583: l_return_status := Validate_Record(l_def_cgcv_rec);

Line 1580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1576: l_return_status := Validate_Attributes(l_def_cgcv_rec);
1577: --- If any errors happen abort API
1578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1581: RAISE OKC_API.G_EXCEPTION_ERROR;
1582: END IF;
1583: l_return_status := Validate_Record(l_def_cgcv_rec);
1584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1581: RAISE OKC_API.G_EXCEPTION_ERROR;

1577: --- If any errors happen abort API
1578: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1579: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1581: RAISE OKC_API.G_EXCEPTION_ERROR;
1582: END IF;
1583: l_return_status := Validate_Record(l_def_cgcv_rec);
1584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1580: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1581: RAISE OKC_API.G_EXCEPTION_ERROR;
1582: END IF;
1583: l_return_status := Validate_Record(l_def_cgcv_rec);
1584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;

Line 1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1581: RAISE OKC_API.G_EXCEPTION_ERROR;
1582: END IF;
1583: l_return_status := Validate_Record(l_def_cgcv_rec);
1584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;
1589: -- Populate the denormalized scs_code here

Line 1586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1582: END IF;
1583: l_return_status := Validate_Record(l_def_cgcv_rec);
1584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;
1589: -- Populate the denormalized scs_code here
1590: Populate_Subclass(l_def_cgcv_rec, l_return_status);

Line 1587: RAISE OKC_API.G_EXCEPTION_ERROR;

1583: l_return_status := Validate_Record(l_def_cgcv_rec);
1584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1586: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;
1589: -- Populate the denormalized scs_code here
1590: Populate_Subclass(l_def_cgcv_rec, l_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;
1589: -- Populate the denormalized scs_code here
1590: Populate_Subclass(l_def_cgcv_rec, l_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1594: RAISE OKC_API.G_EXCEPTION_ERROR;
1595: END IF;

Line 1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1588: END IF;
1589: -- Populate the denormalized scs_code here
1590: Populate_Subclass(l_def_cgcv_rec, l_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1594: RAISE OKC_API.G_EXCEPTION_ERROR;
1595: END IF;
1596:

Line 1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1589: -- Populate the denormalized scs_code here
1590: Populate_Subclass(l_def_cgcv_rec, l_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1594: RAISE OKC_API.G_EXCEPTION_ERROR;
1595: END IF;
1596:
1597: --------------------------------------

Line 1594: RAISE OKC_API.G_EXCEPTION_ERROR;

1590: Populate_Subclass(l_def_cgcv_rec, l_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1594: RAISE OKC_API.G_EXCEPTION_ERROR;
1595: END IF;
1596:
1597: --------------------------------------
1598: -- Move VIEW record to "Child" records

Line 1612: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1608: x_msg_data,
1609: l_cgc_rec,
1610: lx_cgc_rec
1611: );
1612: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1614: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1615: RAISE OKC_API.G_EXCEPTION_ERROR;
1616: END IF;

Line 1613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1609: l_cgc_rec,
1610: lx_cgc_rec
1611: );
1612: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1614: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1615: RAISE OKC_API.G_EXCEPTION_ERROR;
1616: END IF;
1617: migrate(lx_cgc_rec, l_def_cgcv_rec);

Line 1614: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1610: lx_cgc_rec
1611: );
1612: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1614: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1615: RAISE OKC_API.G_EXCEPTION_ERROR;
1616: END IF;
1617: migrate(lx_cgc_rec, l_def_cgcv_rec);
1618: x_cgcv_rec := l_def_cgcv_rec;

Line 1615: RAISE OKC_API.G_EXCEPTION_ERROR;

1611: );
1612: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1614: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1615: RAISE OKC_API.G_EXCEPTION_ERROR;
1616: END IF;
1617: migrate(lx_cgc_rec, l_def_cgcv_rec);
1618: x_cgcv_rec := l_def_cgcv_rec;
1619: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1619: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1615: RAISE OKC_API.G_EXCEPTION_ERROR;
1616: END IF;
1617: migrate(lx_cgc_rec, l_def_cgcv_rec);
1618: x_cgcv_rec := l_def_cgcv_rec;
1619: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1620: EXCEPTION
1621: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1622: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1623: (

Line 1621: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1617: migrate(lx_cgc_rec, l_def_cgcv_rec);
1618: x_cgcv_rec := l_def_cgcv_rec;
1619: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1620: EXCEPTION
1621: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1622: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1623: (
1624: l_api_name,
1625: G_PKG_NAME,

Line 1622: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1618: x_cgcv_rec := l_def_cgcv_rec;
1619: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1620: EXCEPTION
1621: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1622: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1623: (
1624: l_api_name,
1625: G_PKG_NAME,
1626: 'OKC_API.G_RET_STS_ERROR',

Line 1626: 'OKC_API.G_RET_STS_ERROR',

1622: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1623: (
1624: l_api_name,
1625: G_PKG_NAME,
1626: 'OKC_API.G_RET_STS_ERROR',
1627: x_msg_count,
1628: x_msg_data,
1629: '_PVT'
1630: );

Line 1631: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1627: x_msg_count,
1628: x_msg_data,
1629: '_PVT'
1630: );
1631: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1632: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1633: (
1634: l_api_name,
1635: G_PKG_NAME,

Line 1632: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1628: x_msg_data,
1629: '_PVT'
1630: );
1631: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1632: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1633: (
1634: l_api_name,
1635: G_PKG_NAME,
1636: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1636: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1632: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1633: (
1634: l_api_name,
1635: G_PKG_NAME,
1636: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1637: x_msg_count,
1638: x_msg_data,
1639: '_PVT'
1640: );

Line 1642: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1638: x_msg_data,
1639: '_PVT'
1640: );
1641: WHEN OTHERS THEN
1642: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1643: (
1644: l_api_name,
1645: G_PKG_NAME,
1646: 'OTHERS',

Line 1666: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1662: x_cgcv_tbl OUT NOCOPY cgcv_tbl_type) IS
1663:
1664: l_api_version CONSTANT NUMBER := 1;
1665: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1666: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1667: i NUMBER := 0;
1668: BEGIN
1669: OKC_API.init_msg_list(p_init_msg_list);
1670: -- Make sure PL/SQL table has records in it before passing

Line 1669: OKC_API.init_msg_list(p_init_msg_list);

1665: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1666: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1667: i NUMBER := 0;
1668: BEGIN
1669: OKC_API.init_msg_list(p_init_msg_list);
1670: -- Make sure PL/SQL table has records in it before passing
1671: IF (p_cgcv_tbl.COUNT > 0) THEN
1672: i := p_cgcv_tbl.FIRST;
1673: LOOP

Line 1687: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1683: i := p_cgcv_tbl.NEXT(i);
1684: END LOOP;
1685: END IF;
1686: EXCEPTION
1687: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1688: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1689: (
1690: l_api_name,
1691: G_PKG_NAME,

Line 1688: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1684: END LOOP;
1685: END IF;
1686: EXCEPTION
1687: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1688: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1689: (
1690: l_api_name,
1691: G_PKG_NAME,
1692: 'OKC_API.G_RET_STS_ERROR',

Line 1692: 'OKC_API.G_RET_STS_ERROR',

1688: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1689: (
1690: l_api_name,
1691: G_PKG_NAME,
1692: 'OKC_API.G_RET_STS_ERROR',
1693: x_msg_count,
1694: x_msg_data,
1695: '_PVT'
1696: );

Line 1697: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1693: x_msg_count,
1694: x_msg_data,
1695: '_PVT'
1696: );
1697: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1698: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1699: (
1700: l_api_name,
1701: G_PKG_NAME,

Line 1698: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1694: x_msg_data,
1695: '_PVT'
1696: );
1697: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1698: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1699: (
1700: l_api_name,
1701: G_PKG_NAME,
1702: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1702: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1698: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1699: (
1700: l_api_name,
1701: G_PKG_NAME,
1702: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1703: x_msg_count,
1704: x_msg_data,
1705: '_PVT'
1706: );

Line 1708: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1704: x_msg_data,
1705: '_PVT'
1706: );
1707: WHEN OTHERS THEN
1708: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1709: (
1710: l_api_name,
1711: G_PKG_NAME,
1712: 'OTHERS',

Line 1734: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1730: p_cgc_rec IN cgc_rec_type) IS
1731:
1732: l_api_version CONSTANT NUMBER := 1;
1733: l_api_name CONSTANT VARCHAR2(30) := 'GRPINGS_delete_row';
1734: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1735: l_cgc_rec cgc_rec_type:= p_cgc_rec;
1736: l_row_notfound BOOLEAN := TRUE;
1737: BEGIN
1738: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 1738: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1734: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1735: l_cgc_rec cgc_rec_type:= p_cgc_rec;
1736: l_row_notfound BOOLEAN := TRUE;
1737: BEGIN
1738: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1739: p_init_msg_list,
1740: '_PVT',
1741: x_return_status);
1742: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1742: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1738: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1739: p_init_msg_list,
1740: '_PVT',
1741: x_return_status);
1742: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1743: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1744: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_ERROR;
1746: END IF;

Line 1743: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1739: p_init_msg_list,
1740: '_PVT',
1741: x_return_status);
1742: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1743: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1744: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_ERROR;
1746: END IF;
1747: DELETE FROM OKC_K_GRPINGS

Line 1744: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1740: '_PVT',
1741: x_return_status);
1742: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1743: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1744: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_ERROR;
1746: END IF;
1747: DELETE FROM OKC_K_GRPINGS
1748: WHERE ID = l_cgc_rec.id;

Line 1745: RAISE OKC_API.G_EXCEPTION_ERROR;

1741: x_return_status);
1742: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1743: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1744: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_ERROR;
1746: END IF;
1747: DELETE FROM OKC_K_GRPINGS
1748: WHERE ID = l_cgc_rec.id;
1749:

Line 1750: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1746: END IF;
1747: DELETE FROM OKC_K_GRPINGS
1748: WHERE ID = l_cgc_rec.id;
1749:
1750: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1751: EXCEPTION
1752: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1753: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1754: (

Line 1752: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1748: WHERE ID = l_cgc_rec.id;
1749:
1750: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1751: EXCEPTION
1752: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1753: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1754: (
1755: l_api_name,
1756: G_PKG_NAME,

Line 1753: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1749:
1750: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1751: EXCEPTION
1752: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1753: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1754: (
1755: l_api_name,
1756: G_PKG_NAME,
1757: 'OKC_API.G_RET_STS_ERROR',

Line 1757: 'OKC_API.G_RET_STS_ERROR',

1753: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1754: (
1755: l_api_name,
1756: G_PKG_NAME,
1757: 'OKC_API.G_RET_STS_ERROR',
1758: x_msg_count,
1759: x_msg_data,
1760: '_PVT'
1761: );

Line 1762: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1758: x_msg_count,
1759: x_msg_data,
1760: '_PVT'
1761: );
1762: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1763: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1764: (
1765: l_api_name,
1766: G_PKG_NAME,

Line 1763: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1759: x_msg_data,
1760: '_PVT'
1761: );
1762: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1763: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1764: (
1765: l_api_name,
1766: G_PKG_NAME,
1767: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1767: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1763: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1764: (
1765: l_api_name,
1766: G_PKG_NAME,
1767: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1768: x_msg_count,
1769: x_msg_data,
1770: '_PVT'
1771: );

Line 1773: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1769: x_msg_data,
1770: '_PVT'
1771: );
1772: WHEN OTHERS THEN
1773: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1774: (
1775: l_api_name,
1776: G_PKG_NAME,
1777: 'OTHERS',

Line 1796: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1792: p_cgcv_rec IN cgcv_rec_type) IS
1793:
1794: l_api_version CONSTANT NUMBER := 1;
1795: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
1796: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1797: l_cgcv_rec cgcv_rec_type := p_cgcv_rec;
1798: l_cgc_rec cgc_rec_type;
1799: BEGIN
1800: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 1800: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1796: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1797: l_cgcv_rec cgcv_rec_type := p_cgcv_rec;
1798: l_cgc_rec cgc_rec_type;
1799: BEGIN
1800: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1801: G_PKG_NAME,
1802: p_init_msg_list,
1803: l_api_version,
1804: p_api_version,

Line 1807: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1803: l_api_version,
1804: p_api_version,
1805: '_PVT',
1806: x_return_status);
1807: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1808: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1809: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1810: RAISE OKC_API.G_EXCEPTION_ERROR;
1811: END IF;

Line 1808: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1804: p_api_version,
1805: '_PVT',
1806: x_return_status);
1807: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1808: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1809: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1810: RAISE OKC_API.G_EXCEPTION_ERROR;
1811: END IF;
1812: --------------------------------------

Line 1809: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1805: '_PVT',
1806: x_return_status);
1807: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1808: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1809: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1810: RAISE OKC_API.G_EXCEPTION_ERROR;
1811: END IF;
1812: --------------------------------------
1813: -- Move VIEW record to "Child" records

Line 1810: RAISE OKC_API.G_EXCEPTION_ERROR;

1806: x_return_status);
1807: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1808: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1809: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1810: RAISE OKC_API.G_EXCEPTION_ERROR;
1811: END IF;
1812: --------------------------------------
1813: -- Move VIEW record to "Child" records
1814: --------------------------------------

Line 1826: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1822: x_msg_count,
1823: x_msg_data,
1824: l_cgc_rec
1825: );
1826: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1827: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1828: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_ERROR;
1830: END IF;

Line 1827: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1823: x_msg_data,
1824: l_cgc_rec
1825: );
1826: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1827: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1828: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_ERROR;
1830: END IF;
1831: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1828: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1824: l_cgc_rec
1825: );
1826: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1827: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1828: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_ERROR;
1830: END IF;
1831: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1832: EXCEPTION

Line 1829: RAISE OKC_API.G_EXCEPTION_ERROR;

1825: );
1826: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1827: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1828: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_ERROR;
1830: END IF;
1831: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1832: EXCEPTION
1833: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1831: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1827: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1828: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_ERROR;
1830: END IF;
1831: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1832: EXCEPTION
1833: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1834: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1835: (

Line 1833: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1829: RAISE OKC_API.G_EXCEPTION_ERROR;
1830: END IF;
1831: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1832: EXCEPTION
1833: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1834: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1835: (
1836: l_api_name,
1837: G_PKG_NAME,

Line 1834: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1830: END IF;
1831: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1832: EXCEPTION
1833: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1834: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1835: (
1836: l_api_name,
1837: G_PKG_NAME,
1838: 'OKC_API.G_RET_STS_ERROR',

Line 1838: 'OKC_API.G_RET_STS_ERROR',

1834: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1835: (
1836: l_api_name,
1837: G_PKG_NAME,
1838: 'OKC_API.G_RET_STS_ERROR',
1839: x_msg_count,
1840: x_msg_data,
1841: '_PVT'
1842: );

Line 1843: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1839: x_msg_count,
1840: x_msg_data,
1841: '_PVT'
1842: );
1843: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1844: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1845: (
1846: l_api_name,
1847: G_PKG_NAME,

Line 1844: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1840: x_msg_data,
1841: '_PVT'
1842: );
1843: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1844: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1845: (
1846: l_api_name,
1847: G_PKG_NAME,
1848: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1848: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1844: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1845: (
1846: l_api_name,
1847: G_PKG_NAME,
1848: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1849: x_msg_count,
1850: x_msg_data,
1851: '_PVT'
1852: );

Line 1854: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1850: x_msg_data,
1851: '_PVT'
1852: );
1853: WHEN OTHERS THEN
1854: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1855: (
1856: l_api_name,
1857: G_PKG_NAME,
1858: 'OTHERS',

Line 1877: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1873: p_cgcv_tbl IN cgcv_tbl_type) IS
1874:
1875: l_api_version CONSTANT NUMBER := 1;
1876: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
1877: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1878: i NUMBER := 0;
1879: BEGIN
1880: OKC_API.init_msg_list(p_init_msg_list);
1881: -- Make sure PL/SQL table has records in it before passing

Line 1880: OKC_API.init_msg_list(p_init_msg_list);

1876: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
1877: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1878: i NUMBER := 0;
1879: BEGIN
1880: OKC_API.init_msg_list(p_init_msg_list);
1881: -- Make sure PL/SQL table has records in it before passing
1882: IF (p_cgcv_tbl.COUNT > 0) THEN
1883: i := p_cgcv_tbl.FIRST;
1884: LOOP

Line 1897: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1893: i := p_cgcv_tbl.NEXT(i);
1894: END LOOP;
1895: END IF;
1896: EXCEPTION
1897: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1898: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1899: (
1900: l_api_name,
1901: G_PKG_NAME,

Line 1898: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1894: END LOOP;
1895: END IF;
1896: EXCEPTION
1897: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1898: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1899: (
1900: l_api_name,
1901: G_PKG_NAME,
1902: 'OKC_API.G_RET_STS_ERROR',

Line 1902: 'OKC_API.G_RET_STS_ERROR',

1898: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1899: (
1900: l_api_name,
1901: G_PKG_NAME,
1902: 'OKC_API.G_RET_STS_ERROR',
1903: x_msg_count,
1904: x_msg_data,
1905: '_PVT'
1906: );

Line 1907: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1903: x_msg_count,
1904: x_msg_data,
1905: '_PVT'
1906: );
1907: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1908: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1909: (
1910: l_api_name,
1911: G_PKG_NAME,

Line 1908: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1904: x_msg_data,
1905: '_PVT'
1906: );
1907: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1908: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1909: (
1910: l_api_name,
1911: G_PKG_NAME,
1912: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1912: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1908: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1909: (
1910: l_api_name,
1911: G_PKG_NAME,
1912: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1913: x_msg_count,
1914: x_msg_data,
1915: '_PVT'
1916: );

Line 1918: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1914: x_msg_data,
1915: '_PVT'
1916: );
1917: WHEN OTHERS THEN
1918: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1919: (
1920: l_api_name,
1921: G_PKG_NAME,
1922: 'OTHERS',

Line 1947: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1943: j NUMBER := 0;
1944:
1945: BEGIN
1946: -- Initializing Return status
1947: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1948: -- pkoganti 08/26/2000
1949: -- replace for loop with while loop to handle
1950: -- gaps in pl/sql table indexes.
1951: -- Example:

Line 2010: OKC_API.SET_MESSAGE(

2006: EXCEPTION
2007: WHEN OTHERS THEN
2008: -- RAISE;
2009: -- store SQL error message on message stack
2010: OKC_API.SET_MESSAGE(
2011: p_app_name => G_APP_NAME,
2012: p_msg_name => G_UNEXPECTED_ERROR,
2013: p_token1 => G_SQLCODE_TOKEN,
2014: p_token1_value => SQLCODE,

Line 2018: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2014: p_token1_value => SQLCODE,
2015: p_token2 => G_SQLERRM_TOKEN,
2016: p_token2_value => SQLERRM);
2017: -- notify caller of an error as UNEXPETED error
2018: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2019:
2020: END;
2021:
2022: PROCEDURE Set_Search_String(p_srch_str IN VARCHAR2,

Line 2025: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2021:
2022: PROCEDURE Set_Search_String(p_srch_str IN VARCHAR2,
2023: x_return_status OUT NOCOPY VARCHAR2) IS
2024: BEGIN
2025: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2026: g_qry_clause := p_srch_str;
2027: EXCEPTION
2028: WHEN OTHERS THEN
2029: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 2029: x_return_status := OKC_API.G_RET_STS_ERROR;

2025: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2026: g_qry_clause := p_srch_str;
2027: EXCEPTION
2028: WHEN OTHERS THEN
2029: x_return_status := OKC_API.G_RET_STS_ERROR;
2030: END;
2031:
2032: PROCEDURE Get_Queried_Contracts(p_cgp_parent_id IN NUMBER,
2033: x_qry_k_tbl OUT NOCOPY qry_k_tbl,

Line 2042: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2038: l_id Number;
2039: l_contract_number Varchar2(255);
2040: k_csr QueryKCursor;
2041: BEGIN
2042: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2043: -- dbms_output.put_line('g_qry_clause : ' || g_qry_clause);
2044: IF g_qry_clause IS NOT NULL THEN
2045: l_qry := 'select chrv.id, chrv.contract_number || ' ||
2046: 'decode(chrv.contract_number_modifier, null, null,' ||

Line 2067: OKC_API.set_message(p_app_name => g_app_name,

2063: CLOSE k_csr;
2064: x_qry_k_tbl := l_qry_k_tbl;
2065: EXCEPTION
2066: WHEN OTHERS THEN
2067: OKC_API.set_message(p_app_name => g_app_name,
2068: p_msg_name => g_unexpected_error,
2069: p_token1 => g_sqlcode_token,
2070: p_token1_value => sqlcode,
2071: p_token2 => g_sqlerrm_token,

Line 2073: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2069: p_token1 => g_sqlcode_token,
2070: p_token1_value => sqlcode,
2071: p_token2 => g_sqlerrm_token,
2072: p_token2_value => sqlerrm);
2073: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2074: END Get_Queried_Contracts;
2075:
2076: END OKC_CGC_PVT;