DBA Data[Home] [Help]

APPS.OKC_UTIL dependencies on OKC_API

Line 13: g_user_id NUMBER := OKC_API.G_MISS_NUM;

9: -- USERENV('LANG'). The value is cached into this variable so that
10: -- calling functions do not have to hit the database to determine this
11: -- value.
12:
13: g_user_id NUMBER := OKC_API.G_MISS_NUM;
14: g_resp_id NUMBER := OKC_API.G_MISS_NUM;
15: g_reset_access_flag BOOLEAN := FALSE;
16: g_reset_lang_flag BOOLEAN := FALSE;
17: g_reset_resp_flag BOOLEAN := FALSE;

Line 14: g_resp_id NUMBER := OKC_API.G_MISS_NUM;

10: -- calling functions do not have to hit the database to determine this
11: -- value.
12:
13: g_user_id NUMBER := OKC_API.G_MISS_NUM;
14: g_resp_id NUMBER := OKC_API.G_MISS_NUM;
15: g_reset_access_flag BOOLEAN := FALSE;
16: g_reset_lang_flag BOOLEAN := FALSE;
17: g_reset_resp_flag BOOLEAN := FALSE;
18: g_userenv_lang fnd_languages.language_code%TYPE;

Line 19: g_resp_access okc_k_accesses.access_level%TYPE := OKC_API.G_MISS_CHAR;

15: g_reset_access_flag BOOLEAN := FALSE;
16: g_reset_lang_flag BOOLEAN := FALSE;
17: g_reset_resp_flag BOOLEAN := FALSE;
18: g_userenv_lang fnd_languages.language_code%TYPE;
19: g_resp_access okc_k_accesses.access_level%TYPE := OKC_API.G_MISS_CHAR;
20: g_user_resource_id okc_k_accesses.resource_id%TYPE := OKC_API.G_MISS_NUM;
21: g_scs_code okc_k_headers_b.scs_code%TYPE := OKC_API.G_MISS_CHAR;
22: g_groups_processed Boolean := False;
23:

Line 20: g_user_resource_id okc_k_accesses.resource_id%TYPE := OKC_API.G_MISS_NUM;

16: g_reset_lang_flag BOOLEAN := FALSE;
17: g_reset_resp_flag BOOLEAN := FALSE;
18: g_userenv_lang fnd_languages.language_code%TYPE;
19: g_resp_access okc_k_accesses.access_level%TYPE := OKC_API.G_MISS_CHAR;
20: g_user_resource_id okc_k_accesses.resource_id%TYPE := OKC_API.G_MISS_NUM;
21: g_scs_code okc_k_headers_b.scs_code%TYPE := OKC_API.G_MISS_CHAR;
22: g_groups_processed Boolean := False;
23:
24: TYPE sec_group_tbl IS TABLE OF okc_k_accesses.group_id%TYPE;

Line 21: g_scs_code okc_k_headers_b.scs_code%TYPE := OKC_API.G_MISS_CHAR;

17: g_reset_resp_flag BOOLEAN := FALSE;
18: g_userenv_lang fnd_languages.language_code%TYPE;
19: g_resp_access okc_k_accesses.access_level%TYPE := OKC_API.G_MISS_CHAR;
20: g_user_resource_id okc_k_accesses.resource_id%TYPE := OKC_API.G_MISS_NUM;
21: g_scs_code okc_k_headers_b.scs_code%TYPE := OKC_API.G_MISS_CHAR;
22: g_groups_processed Boolean := False;
23:
24: TYPE sec_group_tbl IS TABLE OF okc_k_accesses.group_id%TYPE;
25: g_sec_groups sec_group_tbl;

Line 172: If (g_user_id = OKC_API.G_MISS_NUM) Or

168:
169:
170: Procedure Set_Connection_Context Is
171: Begin
172: If (g_user_id = OKC_API.G_MISS_NUM) Or
173: (g_user_id <> fnd_global.user_id) Then
174: g_user_id := fnd_global.user_id;
175: g_reset_access_flag := True;
176: g_reset_lang_flag := True;

Line 179: If (g_resp_id = OKC_API.G_MISS_NUM) Or

175: g_reset_access_flag := True;
176: g_reset_lang_flag := True;
177: End If;
178:
179: If (g_resp_id = OKC_API.G_MISS_NUM) Or
180: (g_resp_id <> fnd_global.resp_id) Then
181: g_resp_id := fnd_global.resp_id;
182: g_reset_resp_flag := True;
183: End If;

Line 227: cursor av_csr is select table_name,Column_Name ,data_type,data_length,NVL(data_precision,OKC_API.G_MISS_NUM)

223: ----------------------------------------------------------------------------
224: Procedure add_view(
225: p_view_name IN VARCHAR2,
226: x_return_status OUT NOCOPY VARCHAR2) IS
227: cursor av_csr is select table_name,Column_Name ,data_type,data_length,NVL(data_precision,OKC_API.G_MISS_NUM)
228: data_precision,NVL(data_scale,0) data_scale
229: FROM user_tab_columns
230: WHERE table_name = UPPER( p_view_name) and (data_type='VARCHAR2' OR data_type='NUMBER');
231: var1 av_csr%rowtype;

Line 235: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

231: var1 av_csr%rowtype;
232: i number:=1;
233: found Boolean:=FALSE;
234: Begin
235: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
236: i:=G_lenchk_tbl.First;
237: If G_lenchk_tbl.Count>0 Then
238: Loop
239: if (UPPER(p_view_name)=UPPER(G_lenchk_tbl(i).vname)) Then

Line 265: x_return_status:=OKC_API.G_RET_STS_ERROR;

261: G_lenchk_tbl(i).clength:=var1.data_length;
262: end if;
263: END LOOP;
264: If av_csr%ROWCOUNT<1 Then
265: x_return_status:=OKC_API.G_RET_STS_ERROR;
266: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
267: p_msg_name => G_NOTFOUND,
268: p_token1 => G_VIEW_TOKEN,
269: p_token1_value => UPPER(p_view_name));

Line 266: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

262: end if;
263: END LOOP;
264: If av_csr%ROWCOUNT<1 Then
265: x_return_status:=OKC_API.G_RET_STS_ERROR;
266: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
267: p_msg_name => G_NOTFOUND,
268: p_token1 => G_VIEW_TOKEN,
269: p_token1_value => UPPER(p_view_name));
270:

Line 278: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

274: End If;
275:
276: Exception
277: when others then
278: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
279: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
280: p_msg_name => G_UNEXPECTED_ERROR,
281: p_token1 => G_SQLCODE_TOKEN,
282: p_token1_value => sqlcode,

Line 279: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

275:
276: Exception
277: when others then
278: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
279: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
280: p_msg_name => G_UNEXPECTED_ERROR,
281: p_token1 => G_SQLCODE_TOKEN,
282: p_token1_value => sqlcode,
283: p_token2 => G_SQLERRM_TOKEN,

Line 303: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

299: x_return_status OUT NOCOPY VARCHAR2) IS
300: i number:=0;
301: col_len number:=0;
302: Begin
303: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
304: i:=G_lenchk_tbl.First;
305: Loop
306: if ((UPPER(p_view_name)=UPPER(G_lenchk_tbl(i).vname)) and
307: (UPPER(p_col_name)=UPPER(G_lenchk_tbl(i).cname)) ) Then

Line 311: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

307: (UPPER(p_col_name)=UPPER(G_lenchk_tbl(i).cname)) ) Then
308: If (UPPER(G_lenchk_tbl(i).cdtype)='VARCHAR2') Then
309: col_len:=nvl(length(p_col_value),0);
310: if col_len<=TRUNC((G_lenchk_tbl(i).CLength)/3) then
311: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
312: else
313: x_return_status:= OKC_API.G_RET_STS_ERROR;
314: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
315: p_msg_name => G_LEN_CHK,

Line 313: x_return_status:= OKC_API.G_RET_STS_ERROR;

309: col_len:=nvl(length(p_col_value),0);
310: if col_len<=TRUNC((G_lenchk_tbl(i).CLength)/3) then
311: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
312: else
313: x_return_status:= OKC_API.G_RET_STS_ERROR;
314: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
315: p_msg_name => G_LEN_CHK,
316: p_token1 => G_COL_NAME_TOKEN,
317: p_token1_value => p_col_name,

Line 314: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

310: if col_len<=TRUNC((G_lenchk_tbl(i).CLength)/3) then
311: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
312: else
313: x_return_status:= OKC_API.G_RET_STS_ERROR;
314: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
315: p_msg_name => G_LEN_CHK,
316: p_token1 => G_COL_NAME_TOKEN,
317: p_token1_value => p_col_name,
318: p_token2 => 'COL_LEN',

Line 333: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

329: End Loop;
330:
331: EXCEPTION
332: when others then
333: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
334:
335: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
336: p_msg_name => G_UNEXPECTED_ERROR,
337: p_token1 => G_SQLCODE_TOKEN,

Line 335: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

331: EXCEPTION
332: when others then
333: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
334:
335: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
336: p_msg_name => G_UNEXPECTED_ERROR,
337: p_token1 => G_SQLCODE_TOKEN,
338: p_token1_value => sqlcode,
339: p_token2 => G_SQLERRM_TOKEN,

Line 366: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

362: -- get the character specified for decimal right now in the database
363: open c1;
364: fetch c1 into l_val;
365: close c1;
366: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
367: l_value:=NVL(p_col_value,0);
368: IF (G_lenchk_tbl(i).clength=OKC_API.G_MISS_NUM) Then
369: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
370: ELSE

Line 368: IF (G_lenchk_tbl(i).clength=OKC_API.G_MISS_NUM) Then

364: fetch c1 into l_val;
365: close c1;
366: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
367: l_value:=NVL(p_col_value,0);
368: IF (G_lenchk_tbl(i).clength=OKC_API.G_MISS_NUM) Then
369: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
370: ELSE
371: l_pre:=G_lenchk_tbl(i).clength-ABS(G_lenchk_tbl(i).cscale);
372: for j in 1..l_pre loop

Line 369: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

365: close c1;
366: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
367: l_value:=NVL(p_col_value,0);
368: IF (G_lenchk_tbl(i).clength=OKC_API.G_MISS_NUM) Then
369: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
370: ELSE
371: l_pre:=G_lenchk_tbl(i).clength-ABS(G_lenchk_tbl(i).cscale);
372: for j in 1..l_pre loop
373: l_str_pos:=l_str_pos||'9';

Line 390: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

386: end if;
387: l_pos:=to_number(l_str_pos);
388: l_neg:=(-1)*l_pos;
389: if l_value<=l_pos and l_value>=l_neg then
390: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
391: else
392: x_return_status:=OKC_API.G_RET_STS_ERROR;
393: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
394: p_msg_name => G_LEN_CHK,

Line 392: x_return_status:=OKC_API.G_RET_STS_ERROR;

388: l_neg:=(-1)*l_pos;
389: if l_value<=l_pos and l_value>=l_neg then
390: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
391: else
392: x_return_status:=OKC_API.G_RET_STS_ERROR;
393: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
394: p_msg_name => G_LEN_CHK,
395: p_token1 => G_COL_NAME_TOKEN,
396: p_token1_value => p_col_name);

Line 393: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

389: if l_value<=l_pos and l_value>=l_neg then
390: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
391: else
392: x_return_status:=OKC_API.G_RET_STS_ERROR;
393: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
394: p_msg_name => G_LEN_CHK,
395: p_token1 => G_COL_NAME_TOKEN,
396: p_token1_value => p_col_name);
397: end if;

Line 401: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

397: end if;
398: End If;
399: EXCEPTION
400: when others then
401: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
402: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
403: p_msg_name => G_UNEXPECTED_ERROR,
404: p_token1 => G_SQLCODE_TOKEN,
405: p_token1_value => sqlcode,

Line 402: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

398: End If;
399: EXCEPTION
400: when others then
401: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
402: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
403: p_msg_name => G_UNEXPECTED_ERROR,
404: p_token1 => G_SQLCODE_TOKEN,
405: p_token1_value => sqlcode,
406: p_token2 => G_SQLERRM_TOKEN,

Line 426: OKC_API.G_RET_STS_SUCCESS if the p_col_value being passed is

422:
423: /*---------------------------------------------------------------------------+
424: The procedure check_unique checks for uniqueness of the p_col_value passed.
425: It returns
426: OKC_API.G_RET_STS_SUCCESS if the p_col_value being passed is
427: unique that is not already in view p_view_name
428: OKC_API.G_RET_STS_ERROR If the p_col_value being passed is
429: not unique that is already in view p_view_name
430: OKC_API.G_RET_STS_UNEXP_ERROR If there is some unexpected error in processing

Line 428: OKC_API.G_RET_STS_ERROR If the p_col_value being passed is

424: The procedure check_unique checks for uniqueness of the p_col_value passed.
425: It returns
426: OKC_API.G_RET_STS_SUCCESS if the p_col_value being passed is
427: unique that is not already in view p_view_name
428: OKC_API.G_RET_STS_ERROR If the p_col_value being passed is
429: not unique that is already in view p_view_name
430: OKC_API.G_RET_STS_UNEXP_ERROR If there is some unexpected error in processing
431: *-------------------------------------------------------------------------- */
432:

Line 430: OKC_API.G_RET_STS_UNEXP_ERROR If there is some unexpected error in processing

426: OKC_API.G_RET_STS_SUCCESS if the p_col_value being passed is
427: unique that is not already in view p_view_name
428: OKC_API.G_RET_STS_ERROR If the p_col_value being passed is
429: not unique that is already in view p_view_name
430: OKC_API.G_RET_STS_UNEXP_ERROR If there is some unexpected error in processing
431: *-------------------------------------------------------------------------- */
432:
433: ----------------------------------------------------------------------------
434: --checks uniqnuess of varchar2 when primary key is ID

Line 445: l_id Number:=OKC_API.G_MISS_NUM;

441: x_return_status OUT NOCOPY VARCHAR2) IS
442: TYPE UnqTyp IS REF CURSOR;
443: unq_csr UnqTyp;
444: l_query VARCHAR2(1000);
445: l_id Number:=OKC_API.G_MISS_NUM;
446:
447: Begin
448: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
449: IF (p_col_value is NULL) Then

Line 448: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

444: l_query VARCHAR2(1000);
445: l_id Number:=OKC_API.G_MISS_NUM;
446:
447: Begin
448: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
449: IF (p_col_value is NULL) Then
450: RAISE l_Null_Val_Exception;
451: End If;
452:

Line 465: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN

461: USING p_col_value;
462: FETCH unq_csr into l_id;
463: Close unq_csr;
464:
465: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
466: x_return_status:=OKC_API.G_RET_STS_ERROR;
467: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
468: p_msg_name => G_UNQ,
469: p_token1 => G_COL_NAME_TOKEN ,

Line 466: x_return_status:=OKC_API.G_RET_STS_ERROR;

462: FETCH unq_csr into l_id;
463: Close unq_csr;
464:
465: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
466: x_return_status:=OKC_API.G_RET_STS_ERROR;
467: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
468: p_msg_name => G_UNQ,
469: p_token1 => G_COL_NAME_TOKEN ,
470: p_token1_value => p_col_name);

Line 467: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

463: Close unq_csr;
464:
465: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
466: x_return_status:=OKC_API.G_RET_STS_ERROR;
467: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
468: p_msg_name => G_UNQ,
469: p_token1 => G_COL_NAME_TOKEN ,
470: p_token1_value => p_col_name);
471: END IF;

Line 475: x_return_status:=OKC_API.G_RET_STS_ERROR;

471: END IF;
472:
473: EXCEPTION
474: WHEN l_Null_Val_Exception then
475: x_return_status:=OKC_API.G_RET_STS_ERROR;
476: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
477: p_msg_name => G_NVL,
478: p_token1 => G_COL_NAME_TOKEN,
479: p_token1_value => p_col_name);

Line 476: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

472:
473: EXCEPTION
474: WHEN l_Null_Val_Exception then
475: x_return_status:=OKC_API.G_RET_STS_ERROR;
476: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
477: p_msg_name => G_NVL,
478: p_token1 => G_COL_NAME_TOKEN,
479: p_token1_value => p_col_name);
480:

Line 483: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

479: p_token1_value => p_col_name);
480:
481:
482: WHEN others then
483: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
484: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
485: p_msg_name => G_UNEXPECTED_ERROR,
486: p_token1 => G_SQLCODE_TOKEN,
487: p_token1_value => sqlcode,

Line 484: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

480:
481:
482: WHEN others then
483: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
484: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
485: p_msg_name => G_UNEXPECTED_ERROR,
486: p_token1 => G_SQLCODE_TOKEN,
487: p_token1_value => sqlcode,
488: p_token2 => G_SQLERRM_TOKEN,

Line 504: l_id Number:=OKC_API.G_MISS_NUM;

500: x_return_status OUT NOCOPY VARCHAR2) IS
501: TYPE UnqTyp IS REF CURSOR;
502: unq_csr UnqTyp;
503: l_query VARCHAR2(1000);
504: l_id Number:=OKC_API.G_MISS_NUM;
505:
506: Begin
507: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
508: IF (p_col_value is NULL) Then

Line 507: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

503: l_query VARCHAR2(1000);
504: l_id Number:=OKC_API.G_MISS_NUM;
505:
506: Begin
507: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
508: IF (p_col_value is NULL) Then
509: RAISE l_Null_Val_Exception;
510: End If;
511:

Line 526: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN

522: USING p_col_value;
523: FETCH unq_csr into l_id;
524: Close unq_csr;
525:
526: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
527: x_return_status:=OKC_API.G_RET_STS_ERROR;
528: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
529: p_msg_name => G_UNQ,
530: p_token1 => G_COL_NAME_TOKEN ,

Line 527: x_return_status:=OKC_API.G_RET_STS_ERROR;

523: FETCH unq_csr into l_id;
524: Close unq_csr;
525:
526: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
527: x_return_status:=OKC_API.G_RET_STS_ERROR;
528: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
529: p_msg_name => G_UNQ,
530: p_token1 => G_COL_NAME_TOKEN ,
531: p_token1_value => p_col_name);

Line 528: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

524: Close unq_csr;
525:
526: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
527: x_return_status:=OKC_API.G_RET_STS_ERROR;
528: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
529: p_msg_name => G_UNQ,
530: p_token1 => G_COL_NAME_TOKEN ,
531: p_token1_value => p_col_name);
532: END IF;

Line 536: x_return_status:=OKC_API.G_RET_STS_ERROR;

532: END IF;
533:
534: EXCEPTION
535: WHEN l_Null_Val_Exception then
536: x_return_status:=OKC_API.G_RET_STS_ERROR;
537: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
538: p_msg_name => G_NVL,
539: p_token1 => G_COL_NAME_TOKEN,
540: p_token1_value => p_col_name);

Line 537: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

533:
534: EXCEPTION
535: WHEN l_Null_Val_Exception then
536: x_return_status:=OKC_API.G_RET_STS_ERROR;
537: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
538: p_msg_name => G_NVL,
539: p_token1 => G_COL_NAME_TOKEN,
540: p_token1_value => p_col_name);
541:

Line 544: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

540: p_token1_value => p_col_name);
541:
542:
543: WHEN others then
544: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
545: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
546: p_msg_name => G_UNEXPECTED_ERROR,
547: p_token1 => G_SQLCODE_TOKEN,
548: p_token1_value => sqlcode,

Line 545: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

541:
542:
543: WHEN others then
544: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
545: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
546: p_msg_name => G_UNEXPECTED_ERROR,
547: p_token1 => G_SQLCODE_TOKEN,
548: p_token1_value => sqlcode,
549: p_token2 => G_SQLERRM_TOKEN,

Line 565: l_id Number:=OKC_API.G_MISS_NUM;

561: p_id IN NUMBER,
562: x_return_status OUT NOCOPY VARCHAR2) IS
563:
564: l_query VARCHAR2(1000);
565: l_id Number:=OKC_API.G_MISS_NUM;
566: TYPE UnqTyp IS REF CURSOR;
567: unq_csr UnqTyp;
568:
569: Begin

Line 570: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

566: TYPE UnqTyp IS REF CURSOR;
567: unq_csr UnqTyp;
568:
569: Begin
570: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
571: IF (p_col_value is NULL) Then
572: RAISE l_Null_Val_Exception;
573: End If;
574:

Line 584: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN

580: USING p_col_value;
581: FETCH unq_csr into l_id;
582: Close unq_csr;
583:
584: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
585: x_return_status:=OKC_API.G_RET_STS_ERROR;
586: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
587: p_msg_name => G_UNQ,
588: p_token1 => G_COL_NAME_TOKEN ,

Line 585: x_return_status:=OKC_API.G_RET_STS_ERROR;

581: FETCH unq_csr into l_id;
582: Close unq_csr;
583:
584: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
585: x_return_status:=OKC_API.G_RET_STS_ERROR;
586: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
587: p_msg_name => G_UNQ,
588: p_token1 => G_COL_NAME_TOKEN ,
589: p_token1_value => p_col_name);

Line 586: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

582: Close unq_csr;
583:
584: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
585: x_return_status:=OKC_API.G_RET_STS_ERROR;
586: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
587: p_msg_name => G_UNQ,
588: p_token1 => G_COL_NAME_TOKEN ,
589: p_token1_value => p_col_name);
590:

Line 595: x_return_status:=OKC_API.G_RET_STS_ERROR;

591: END IF;
592:
593: EXCEPTION
594: WHEN l_Null_Val_Exception then
595: x_return_status:=OKC_API.G_RET_STS_ERROR;
596: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
597: p_msg_name => G_NVL,
598: p_token1 => G_COL_NAME_TOKEN,
599: p_token1_value => p_col_name);

Line 596: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

592:
593: EXCEPTION
594: WHEN l_Null_Val_Exception then
595: x_return_status:=OKC_API.G_RET_STS_ERROR;
596: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
597: p_msg_name => G_NVL,
598: p_token1 => G_COL_NAME_TOKEN,
599: p_token1_value => p_col_name);
600:

Line 603: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

599: p_token1_value => p_col_name);
600:
601:
602: WHEN others then
603: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
604: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
605: p_msg_name => G_UNEXPECTED_ERROR,
606: p_token1 => G_SQLCODE_TOKEN,
607: p_token1_value => sqlcode,

Line 604: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

600:
601:
602: WHEN others then
603: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
604: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
605: p_msg_name => G_UNEXPECTED_ERROR,
606: p_token1 => G_SQLCODE_TOKEN,
607: p_token1_value => sqlcode,
608: p_token2 => G_SQLERRM_TOKEN,

Line 623: l_id Number:=OKC_API.G_MISS_NUM;

619: x_return_status OUT NOCOPY VARCHAR2) IS
620:
621: l_all_null Boolean:= TRUE;
622: l_query VARCHAR2(3000);
623: l_id Number:=OKC_API.G_MISS_NUM;
624: l_ind Number:=0;
625: l_index Number:=1;
626: l_cols unq_tbl_type;
627: TYPE UnqTyp IS REF CURSOR;

Line 631: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

627: TYPE UnqTyp IS REF CURSOR;
628: unq_csr UnqTyp;
629:
630: Begin
631: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
632:
633: l_query:='select id from ' || p_view_name || ' where ';
634:
635: If p_col_tbl.Count>0 Then

Line 660: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN

656: OPEN unq_csr FOR l_query;
657: FETCH unq_csr into l_id;
658: Close unq_csr;
659:
660: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
661: x_return_status:=OKC_API.G_RET_STS_ERROR;
662: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
663: p_msg_name => G_UNQS,
664: p_token1 => G_COL_NAME_TOKEN1,

Line 661: x_return_status:=OKC_API.G_RET_STS_ERROR;

657: FETCH unq_csr into l_id;
658: Close unq_csr;
659:
660: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
661: x_return_status:=OKC_API.G_RET_STS_ERROR;
662: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
663: p_msg_name => G_UNQS,
664: p_token1 => G_COL_NAME_TOKEN1,
665: p_token1_value => l_cols(1).p_col_name,

Line 662: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

658: Close unq_csr;
659:
660: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_id,0)) THEN
661: x_return_status:=OKC_API.G_RET_STS_ERROR;
662: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
663: p_msg_name => G_UNQS,
664: p_token1 => G_COL_NAME_TOKEN1,
665: p_token1_value => l_cols(1).p_col_name,
666: p_token2 => G_COL_NAME_TOKEN2,

Line 685: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

681: p_token9_value => Value_Exists(l_cols,9),
682: p_token10 => G_COL_NAME_TOKEN0,
683: p_token10_value => Value_Exists(l_cols,10));
684: /*
685: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
686: p_msg_name => G_UNQS,
687: p_token1 => G_COL_NAME_TOKEN,
688: p_token1_value => l_cols(1).p_col_name,
689: p_token2 => Column_Exists(l_cols.count>=2,G_COL_NAME_TOKEN),

Line 716: x_return_status:=OKC_API.G_RET_STS_ERROR;

712: End If;
713:
714: EXCEPTION
715: WHEN l_Null_Val_Exception then
716: x_return_status:=OKC_API.G_RET_STS_ERROR;
717: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
718: p_msg_name => G_ALL_NVL);
719:
720: WHEN OTHERS then

Line 717: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

713:
714: EXCEPTION
715: WHEN l_Null_Val_Exception then
716: x_return_status:=OKC_API.G_RET_STS_ERROR;
717: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
718: p_msg_name => G_ALL_NVL);
719:
720: WHEN OTHERS then
721: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

Line 721: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

717: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
718: p_msg_name => G_ALL_NVL);
719:
720: WHEN OTHERS then
721: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
722: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
723: p_msg_name => G_UNEXPECTED_ERROR,
724: p_token1 => G_SQLCODE_TOKEN,
725: p_token1_value => sqlcode,

Line 722: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

718: p_msg_name => G_ALL_NVL);
719:
720: WHEN OTHERS then
721: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
722: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
723: p_msg_name => G_UNEXPECTED_ERROR,
724: p_token1 => G_SQLCODE_TOKEN,
725: p_token1_value => sqlcode,
726: p_token2 => G_SQLERRM_TOKEN,

Line 756: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

752: Begin
753: IF (p_col_value is NULL) Then
754: RAISE l_Null_Val_Exception;
755: End If;
756: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
757:
758: If p_primary.Count>0 Then
759: l_ind:=p_primary.FIRST;
760: --make a string out of primary key values (l_pk_in_str)

Line 789: x_return_status:=OKC_API.G_RET_STS_ERROR;

785: --primary key values passed thru the record. If its neither case
786: --then the p_col_value exists for some other primary key value.
787: --hence error
788: IF (l_pk_selected_str<>G_SPECIAL_STR AND l_pk_selected_str<>l_pk_in_str) THEN
789: x_return_status:=OKC_API.G_RET_STS_ERROR;
790: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
791: p_msg_name => G_UNQ,
792: p_token1 => G_COL_NAME_TOKEN ,
793: p_token1_value => p_col_name);

Line 790: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

786: --then the p_col_value exists for some other primary key value.
787: --hence error
788: IF (l_pk_selected_str<>G_SPECIAL_STR AND l_pk_selected_str<>l_pk_in_str) THEN
789: x_return_status:=OKC_API.G_RET_STS_ERROR;
790: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
791: p_msg_name => G_UNQ,
792: p_token1 => G_COL_NAME_TOKEN ,
793: p_token1_value => p_col_name);
794:

Line 800: x_return_status:=OKC_API.G_RET_STS_ERROR;

796: END IF;
797:
798: EXCEPTION
799: WHEN l_Null_Val_Exception then
800: x_return_status:=OKC_API.G_RET_STS_ERROR;
801: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
802: p_msg_name => G_NVL,
803: p_token1 => G_COL_NAME_TOKEN,
804: p_token1_value => p_col_name);

Line 801: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

797:
798: EXCEPTION
799: WHEN l_Null_Val_Exception then
800: x_return_status:=OKC_API.G_RET_STS_ERROR;
801: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
802: p_msg_name => G_NVL,
803: p_token1 => G_COL_NAME_TOKEN,
804: p_token1_value => p_col_name);
805:

Line 808: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

804: p_token1_value => p_col_name);
805:
806:
807: WHEN OTHERS then
808: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
809: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
810: p_msg_name => G_UNEXPECTED_ERROR,
811: p_token1 => G_SQLCODE_TOKEN,
812: p_token1_value => sqlcode,

Line 809: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

805:
806:
807: WHEN OTHERS then
808: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
809: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
810: p_msg_name => G_UNEXPECTED_ERROR,
811: p_token1 => G_SQLCODE_TOKEN,
812: p_token1_value => sqlcode,
813: p_token2 => G_SQLERRM_TOKEN,

Line 857: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

853: Begin
854: IF (p_col_value is NULL) Then
855: RAISE l_Null_Val_Exception;
856: End If;
857: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
858:
859: If p_primary.Count>0 Then
860: l_ind:=p_primary.FIRST;
861: --make a string out of primary key values (l_pk_in_str)

Line 890: x_return_status:=OKC_API.G_RET_STS_ERROR;

886: --primary key values passed thru the record. If its neither case
887: --then the p_col_value exists for some other primary key value.
888: --hence error
889: IF (l_pk_selected_str<>G_SPECIAL_STR AND l_pk_selected_str<>l_pk_in_str) THEN
890: x_return_status:=OKC_API.G_RET_STS_ERROR;
891: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
892: p_msg_name => G_UNQ,
893: p_token1 => G_COL_NAME_TOKEN ,
894: p_token1_value => p_col_name);

Line 891: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

887: --then the p_col_value exists for some other primary key value.
888: --hence error
889: IF (l_pk_selected_str<>G_SPECIAL_STR AND l_pk_selected_str<>l_pk_in_str) THEN
890: x_return_status:=OKC_API.G_RET_STS_ERROR;
891: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
892: p_msg_name => G_UNQ,
893: p_token1 => G_COL_NAME_TOKEN ,
894: p_token1_value => p_col_name);
895:

Line 901: x_return_status:=OKC_API.G_RET_STS_ERROR;

897: END IF;
898:
899: EXCEPTION
900: WHEN l_Null_Val_Exception then
901: x_return_status:=OKC_API.G_RET_STS_ERROR;
902: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
903: p_msg_name => G_NVL,
904: p_token1 => G_COL_NAME_TOKEN,
905: p_token1_value => p_col_name);

Line 902: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

898:
899: EXCEPTION
900: WHEN l_Null_Val_Exception then
901: x_return_status:=OKC_API.G_RET_STS_ERROR;
902: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
903: p_msg_name => G_NVL,
904: p_token1 => G_COL_NAME_TOKEN,
905: p_token1_value => p_col_name);
906:

Line 909: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

905: p_token1_value => p_col_name);
906:
907:
908: WHEN OTHERS then
909: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
910: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
911: p_msg_name => G_UNEXPECTED_ERROR,
912: p_token1 => G_SQLCODE_TOKEN,
913: p_token1_value => sqlcode,

Line 910: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

906:
907:
908: WHEN OTHERS then
909: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
910: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
911: p_msg_name => G_UNEXPECTED_ERROR,
912: p_token1 => G_SQLCODE_TOKEN,
913: p_token1_value => sqlcode,
914: p_token2 => G_SQLERRM_TOKEN,

Line 945: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

941: unq_csr UnqTyp;
942: l_all_null Boolean :=TRUE;
943:
944: Begin
945: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
946:
947: If p_primary.Count>0 Then
948: l_ind:=p_primary.FIRST;
949: --make a string out of primary key values (l_pk_in_str)

Line 996: x_return_status:=OKC_API.G_RET_STS_ERROR;

992: --primary key values passed thru the record. If its neither case
993: --then the p_col_value exists for some other primary key value.
994: --hence error
995: IF (l_pk_selected_str<>G_SPECIAL_STR AND l_pk_selected_str<>l_pk_in_str) THEN
996: x_return_status:=OKC_API.G_RET_STS_ERROR;
997: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
998: p_msg_name => G_UNQS,
999: p_token1 => G_COL_NAME_TOKEN1,
1000: p_token1_value => l_cols(1).p_col_name,

Line 997: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

993: --then the p_col_value exists for some other primary key value.
994: --hence error
995: IF (l_pk_selected_str<>G_SPECIAL_STR AND l_pk_selected_str<>l_pk_in_str) THEN
996: x_return_status:=OKC_API.G_RET_STS_ERROR;
997: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
998: p_msg_name => G_UNQS,
999: p_token1 => G_COL_NAME_TOKEN1,
1000: p_token1_value => l_cols(1).p_col_name,
1001: p_token2 => G_COL_NAME_TOKEN2,

Line 1020: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1016: p_token9_value => Value_Exists(l_cols,9),
1017: p_token10 => G_COL_NAME_TOKEN0,
1018: p_token10_value => Value_Exists(l_cols,10));
1019: /*
1020: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1021: p_msg_name => G_UNQS,
1022: p_token1 => G_COL_NAME_TOKEN,
1023: p_token1_value => l_cols(1).p_col_name,
1024: p_token2 => Column_Exists(l_cols.count>=2,G_COL_NAME_TOKEN),

Line 1049: x_return_status:=OKC_API.G_RET_STS_ERROR;

1045: End If;
1046:
1047: EXCEPTION
1048: WHEN l_Null_Val_Exception then
1049: x_return_status:=OKC_API.G_RET_STS_ERROR;
1050: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1051: p_msg_name => G_ALL_NVL);
1052:
1053:

Line 1050: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1046:
1047: EXCEPTION
1048: WHEN l_Null_Val_Exception then
1049: x_return_status:=OKC_API.G_RET_STS_ERROR;
1050: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1051: p_msg_name => G_ALL_NVL);
1052:
1053:
1054: WHEN OTHERS then

Line 1055: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

1051: p_msg_name => G_ALL_NVL);
1052:
1053:
1054: WHEN OTHERS then
1055: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
1056: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1057: p_msg_name => G_UNEXPECTED_ERROR,
1058: p_token1 => G_SQLCODE_TOKEN,
1059: p_token1_value => sqlcode,

Line 1056: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1052:
1053:
1054: WHEN OTHERS then
1055: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
1056: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1057: p_msg_name => G_UNEXPECTED_ERROR,
1058: p_token1 => G_SQLCODE_TOKEN,
1059: p_token1_value => sqlcode,
1060: p_token2 => G_SQLERRM_TOKEN,

Line 1082: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

1078: TYPE UnqTyp IS REF CURSOR;
1079: unq_csr UnqTyp;
1080: --l_format varchar2(20):='YYYY';
1081: Begin
1082: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
1083: l_query:='select ''1'' from ' || p_view_name || ' where ';
1084: If p_col_tbl.Count>0 Then
1085: l_ind:=p_col_tbl.FIRST;
1086:

Line 1119: x_return_status:=OKC_API.G_RET_STS_ERROR;

1115:
1116: FETCH unq_csr into l_count;
1117: Close unq_csr;
1118: IF (l_COUNT='1') THEN
1119: x_return_status:=OKC_API.G_RET_STS_ERROR;
1120: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1121: p_msg_name => G_UNQS,
1122: p_token1 => G_COL_NAME_TOKEN1,
1123: p_token1_value => l_cols(1).p_col_name,

Line 1120: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1116: FETCH unq_csr into l_count;
1117: Close unq_csr;
1118: IF (l_COUNT='1') THEN
1119: x_return_status:=OKC_API.G_RET_STS_ERROR;
1120: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1121: p_msg_name => G_UNQS,
1122: p_token1 => G_COL_NAME_TOKEN1,
1123: p_token1_value => l_cols(1).p_col_name,
1124: p_token2 => G_COL_NAME_TOKEN2,

Line 1143: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1139: p_token9_value => Value_Exists(l_cols,9),
1140: p_token10 => G_COL_NAME_TOKEN0,
1141: p_token10_value => Value_Exists(l_cols,10));
1142: /*
1143: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1144: p_msg_name => G_UNQS,
1145: p_token1 => G_COL_NAME_TOKEN,
1146: p_token1_value => l_cols(1).p_col_name,
1147: p_token2 => Column_Exists(l_cols.count>=2,G_COL_NAME_TOKEN),

Line 1170: x_return_status:=OKC_API.G_RET_STS_ERROR;

1166: END IF;
1167: End If;
1168: exception
1169: WHEN l_Null_Val_Exception then
1170: x_return_status:=OKC_API.G_RET_STS_ERROR;
1171: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1172: p_msg_name => G_ALL_NVL);
1173:
1174: WHEN others then

Line 1171: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1167: End If;
1168: exception
1169: WHEN l_Null_Val_Exception then
1170: x_return_status:=OKC_API.G_RET_STS_ERROR;
1171: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1172: p_msg_name => G_ALL_NVL);
1173:
1174: WHEN others then
1175: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1175: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;

1171: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1172: p_msg_name => G_ALL_NVL);
1173:
1174: WHEN others then
1175: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
1176: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1177: p_msg_name => G_UNEXPECTED_ERROR,
1178: p_token1 => G_SQLCODE_TOKEN,
1179: p_token1_value => sqlcode,

Line 1176: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1172: p_msg_name => G_ALL_NVL);
1173:
1174: WHEN others then
1175: x_return_status:=OKC_API.G_RET_STS_UNEXP_ERROR;
1176: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1177: p_msg_name => G_UNEXPECTED_ERROR,
1178: p_token1 => G_SQLCODE_TOKEN,
1179: p_token1_value => sqlcode,
1180: p_token2 => G_SQLERRM_TOKEN,

Line 1190: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1186: p_package_name IN VARCHAR2,
1187: p_procedure_name IN VARCHAR2,
1188: p_before_after IN VARCHAR2) IS
1189: begin
1190: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1191: end;
1192:
1193: /*procedure call_user_hook(x_return_status OUT NOCOPY VARCHAR2,
1194: p_package_name IN VARCHAR2,

Line 1219: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1215: AND pdf.id = p_pdf_using;
1216:
1217: BEGIN
1218:
1219: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1220: FOR l_c_pdf_using IN c_pdf_using LOOP
1221: FOR l_c_user_hook IN c_user_hook(l_c_pdf_using.pdf_using_id) LOOP
1222: l_statement := 'BEGIN ' || l_c_user_hook.proc_name ||
1223: '(:return_status); END;';

Line 1225: IF ((x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR)

1221: FOR l_c_user_hook IN c_user_hook(l_c_pdf_using.pdf_using_id) LOOP
1222: l_statement := 'BEGIN ' || l_c_user_hook.proc_name ||
1223: '(:return_status); END;';
1224: EXECUTE IMMEDIATE l_statement USING OUT x_return_status;
1225: IF ((x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR)
1226: OR (x_return_status = OKC_API.G_RET_STS_ERROR)) THEN
1227: return;
1228: END IF;
1229: END LOOP;

Line 1226: OR (x_return_status = OKC_API.G_RET_STS_ERROR)) THEN

1222: l_statement := 'BEGIN ' || l_c_user_hook.proc_name ||
1223: '(:return_status); END;';
1224: EXECUTE IMMEDIATE l_statement USING OUT x_return_status;
1225: IF ((x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR)
1226: OR (x_return_status = OKC_API.G_RET_STS_ERROR)) THEN
1227: return;
1228: END IF;
1229: END LOOP;
1230: END LOOP;

Line 1263: result Varchar2(1):= OKC_API.G_RET_STS_ERROR;

1259: ----------------------------------------------------------------------------
1260: FUNCTION Check_Lookup_Code (p_type in VARCHAR2,
1261: p_code IN VARCHAR2) return VARCHAR2 is
1262:
1263: result Varchar2(1):= OKC_API.G_RET_STS_ERROR;
1264:
1265: -- Bug 3674499 Need to truncate for dates
1266: cursor C1 is -- /striping/ only for p_type <> 'OKC_RULE_DEF'
1267: SELECT 'S'

Line 1290: if C2%NOTFOUND then result := OKC_API.G_RET_STS_ERROR; end if;

1286: -- /striping/
1287: if p_type = 'OKC_RULE_DEF' then
1288: open C2;
1289: fetch C2 into result;
1290: if C2%NOTFOUND then result := OKC_API.G_RET_STS_ERROR; end if;
1291: close C2;
1292: else
1293: open C1;
1294: fetch C1 into result;

Line 1295: if C1%NOTFOUND then result := OKC_API.G_RET_STS_ERROR; end if;

1291: close C2;
1292: else
1293: open C1;
1294: fetch C1 into result;
1295: if C1%NOTFOUND then result := OKC_API.G_RET_STS_ERROR; end if;
1296: close C1;
1297: end if;
1298:
1299: If result='S' then

Line 1300: result:=OKC_API.G_RET_STS_SUCCESS;

1296: close C1;
1297: end if;
1298:
1299: If result='S' then
1300: result:=OKC_API.G_RET_STS_SUCCESS;
1301: end if;
1302: return result;
1303: EXCEPTION
1304: WHEN l_Null_Val_Exception then

Line 1305: result := OKC_API.G_RET_STS_UNEXP_ERROR;

1301: end if;
1302: return result;
1303: EXCEPTION
1304: WHEN l_Null_Val_Exception then
1305: result := OKC_API.G_RET_STS_UNEXP_ERROR;
1306: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1307: p_msg_name => G_NVL_CODE);
1308: return result;
1309:

Line 1306: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1302: return result;
1303: EXCEPTION
1304: WHEN l_Null_Val_Exception then
1305: result := OKC_API.G_RET_STS_UNEXP_ERROR;
1306: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1307: p_msg_name => G_NVL_CODE);
1308: return result;
1309:
1310: WHEN OTHERS THEN

Line 1311: result:=OKC_API.G_RET_STS_UNEXP_ERROR;

1307: p_msg_name => G_NVL_CODE);
1308: return result;
1309:
1310: WHEN OTHERS THEN
1311: result:=OKC_API.G_RET_STS_UNEXP_ERROR;
1312: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1313: p_msg_name => G_UNEXPECTED_ERROR,
1314: p_token1 => G_SQLCODE_TOKEN,
1315: p_token1_value => sqlcode,

Line 1312: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1308: return result;
1309:
1310: WHEN OTHERS THEN
1311: result:=OKC_API.G_RET_STS_UNEXP_ERROR;
1312: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1313: p_msg_name => G_UNEXPECTED_ERROR,
1314: p_token1 => G_SQLCODE_TOKEN,
1315: p_token1_value => sqlcode,
1316: p_token2 => G_SQLERRM_TOKEN,

Line 1834: (g_resp_access = OKC_API.G_MISS_CHAR) Then */

1830: -- around, the variables are set to null and not examined during the
1831: -- next round
1832:
1833: /* If (l_scs_code <> g_scs_code) OR
1834: (g_resp_access = OKC_API.G_MISS_CHAR) Then */
1835:
1836: If (l_scs_code <> g_scs_code) OR (g_reset_resp_flag) Then
1837:
1838: Open resp_csr;

Line 1875: If (g_user_resource_id = OKC_API.G_MISS_NUM) Or

1871: -- continue to check if granted any access at the user resource level.
1872: -- If the user resource id is not determined earlier, then retrieve it
1873: -- and cache it as it will not change during the current session
1874:
1875: If (g_user_resource_id = OKC_API.G_MISS_NUM) Or
1876: (g_reset_access_flag) Then
1877:
1878: Open res_csr;
1879:

Line 1985: -- IF OKC_ASSENT_PUB.header_operation_allowed(p_chr_id,'UPDATE') = OKC_API.G_TRUE THEN

1981: IF p_called_from = 'W' and l_orig_sys_source_code <> 'KSSA_HDR' THEN -- Forms contract called in KOL
1982: l_ret_status := l_read_access;
1983: IF p_update_attachment = 'true' THEN
1984: /* The contract created from forms,but can the attachment be updated in contracts online */
1985: -- IF OKC_ASSENT_PUB.header_operation_allowed(p_chr_id,'UPDATE') = OKC_API.G_TRUE THEN
1986: l_ret_status := l_modify_access;
1987: -- END IF; -- if update allowed in okc_assent_pub
1988: END IF; -- if update attachment = true
1989:

Line 1991: -- IF OKC_ASSENT_PUB.header_operation_allowed(p_chr_id,p_operation_allowed) <> OKC_API.G_TRUE THEN

1987: -- END IF; -- if update allowed in okc_assent_pub
1988: END IF; -- if update attachment = true
1989:
1990: ELSIF p_called_from = 'W' and l_orig_sys_source_code = 'KSSA_HDR' THEN -- Created in KOL and accessed in KOL
1991: -- IF OKC_ASSENT_PUB.header_operation_allowed(p_chr_id,p_operation_allowed) <> OKC_API.G_TRUE THEN
1992: -- l_ret_status := l_read_access;
1993: -- END IF; -- if update/delete allowed in okc_assent_pub
1994: NULL;
1995:

Line 2111: OKC_API.SET_MESSAGE(p_app_name =>'OKC',

2107: Else
2108: Open subclass_csr;
2109: Fetch subclass_csr into l_scs_meaning;
2110: Close subclass_csr;
2111: OKC_API.SET_MESSAGE(p_app_name =>'OKC',
2112: p_msg_name =>'OKC_CREATE_NA',
2113: p_token1 =>'CATEGORY',
2114: p_token1_value =>l_scs_meaning);
2115: Return(FALSE);

Line 2232: OKC_API.SET_MESSAGE(

2228: IF (l_debug = 'Y') THEN
2229: okc_debug.log('1020: Leaving Copy_Articles_Varied_Text because of an exception: '||sqlerrm, 2);
2230: okc_debug.Reset_Indentation;
2231: END IF;
2232: OKC_API.SET_MESSAGE(
2233: p_app_name => G_APP_NAME,
2234: p_msg_name => G_UNEXPECTED_ERROR,
2235: p_token1 => G_SQLCODE_TOKEN,
2236: p_token1_value => sqlcode,

Line 2279: OKC_API.SET_MESSAGE(

2275: When NO_DATA_FOUND then
2276: If (l_savv_scr%ISOPEN) Then
2277: close l_savv_scr;
2278: End If;
2279: OKC_API.SET_MESSAGE(
2280: p_app_name => G_APP_NAME,
2281: p_msg_name => G_UNEXPECTED_ERROR,
2282: p_token1 => G_SQLCODE_TOKEN,
2283: p_token1_value => sqlcode,

Line 2291: OKC_API.SET_MESSAGE(

2287: When OTHERS Then
2288: If (l_savv_scr%ISOPEN) Then
2289: close l_savv_scr;
2290: End If;
2291: OKC_API.SET_MESSAGE(
2292: p_app_name => G_APP_NAME,
2293: p_msg_name => G_UNEXPECTED_ERROR,
2294: p_token1 => G_SQLCODE_TOKEN,
2295: p_token1_value => sqlcode,

Line 2407: OKC_API.init_msg_list(p_init_msg_list);

2403: PROCEDURE init_msg_list (
2404: p_init_msg_list IN VARCHAR2
2405: ) IS
2406: BEGIN
2407: OKC_API.init_msg_list(p_init_msg_list);
2408: END init_msg_list;
2409:
2410: --------------------------------------------------------------------------------
2411: -- PROCEDURE set_message

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

2502: END IF;
2503:
2504: EXCEPTION
2505: WHEN OTHERS THEN
2506: OKC_API.set_message(p_app_name => g_app_name,
2507: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2508: p_token1 => 'ACTION',
2509: p_token1_value => 'GET_TRACE_PATH');
2510: RAISE;

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

2523: UTL_FILE.FCLOSE(l_trace_file);
2524:
2525: EXCEPTION
2526: WHEN OTHERS THEN
2527: OKC_API.set_message(p_app_name => g_app_name,
2528: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2529: p_token1 => 'ACTION',
2530: p_token1_value => 'CLOSE_TRACE_FILE');
2531: RAISE;

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

2547: END IF;
2548:
2549: EXCEPTION
2550: WHEN OTHERS THEN
2551: OKC_API.set_message(p_app_name => g_app_name,
2552: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2553: p_token1 => 'ACTION',
2554: p_token1_value => 'RESET_TRACE_CONTEXT');
2555: RAISE;

Line 2627: x_return_status:=OKC_API.g_true;

2623: FND_FILE.put_line(l_output_file.id, ' ');
2624: --Get log and output file names
2625: FND_FILE.get_names(l_trace_file_name, l_output_file_name);
2626: END IF;
2627: x_return_status:=OKC_API.g_true;
2628: EXCEPTION
2629: WHEN OTHERS THEN
2630: OKC_API.set_message(p_app_name => g_app_name,
2631: p_msg_name => 'OKC_K2Q_TRACE_MODE',

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

2626: END IF;
2627: x_return_status:=OKC_API.g_true;
2628: EXCEPTION
2629: WHEN OTHERS THEN
2630: OKC_API.set_message(p_app_name => g_app_name,
2631: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2632: p_token1 => 'ACTION',
2633: p_token1_value => 'OPEN_TRACE_FILE');
2634: -- RAISE; --BUG# 1850274

Line 2635: x_return_status:=OKC_API.g_false;

2631: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2632: p_token1 => 'ACTION',
2633: p_token1_value => 'OPEN_TRACE_FILE');
2634: -- RAISE; --BUG# 1850274
2635: x_return_status:=OKC_API.g_false;
2636: END open_trace_file;
2637: */
2638:
2639: ------------------------------------------------------------------------------

Line 2662: x_return_status:=OKC_API.g_true;

2658: FND_FILE.put_line(l_output_file.id, ' ');
2659: --Get log and output file names
2660: FND_FILE.get_names(l_trace_file_name, l_output_file_name);
2661: END IF;
2662: x_return_status:=OKC_API.g_true;
2663: EXCEPTION
2664: WHEN OTHERS THEN
2665: OKC_API.set_message(p_app_name => g_app_name,
2666: p_msg_name => 'OKC_K2Q_TRACE_MODE',

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

2661: END IF;
2662: x_return_status:=OKC_API.g_true;
2663: EXCEPTION
2664: WHEN OTHERS THEN
2665: OKC_API.set_message(p_app_name => g_app_name,
2666: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2667: p_token1 => 'ACTION',
2668: p_token1_value => 'SET_TRACE_CONTEXT');
2669: --RAISE;

Line 2670: x_return_status:=OKC_API.g_false; --Bug # 1850274

2666: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2667: p_token1 => 'ACTION',
2668: p_token1_value => 'SET_TRACE_CONTEXT');
2669: --RAISE;
2670: x_return_status:=OKC_API.g_false; --Bug # 1850274
2671: END set_trace_context;
2672:
2673: -------------------------------------------------------------------------------
2674: -- Procedure: print_trace

Line 2709: FND_FILE.PUT_LINE(l_trace_file.id, replace(l_mesg,OKC_API.G_MISS_CHAR));

2705:
2706: IF l_log_flag AND l_trace_file.id IS NOT NULL THEN
2707: -- FND_FILE.PUT_LINE(l_trace_file.id, l_mesg);
2708: -- Bug 1993476
2709: FND_FILE.PUT_LINE(l_trace_file.id, replace(l_mesg,OKC_API.G_MISS_CHAR));
2710: END IF;
2711:
2712: END IF;
2713: EXCEPTION

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

2711:
2712: END IF;
2713: EXCEPTION
2714: WHEN OTHERS THEN
2715: OKC_API.set_message(p_app_name => g_app_name,
2716: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2717: p_token1 => 'ACTION',
2718: p_token1_value => 'PRINT_TRACE');
2719: RAISE;

Line 2778: IF lx_return_status = OKC_API.g_true THEN

2774: IF g_request_id NOT IN (0, -1) -- The conc. prog. is running
2775: THEN
2776: -- Sets up the log file for the conc.req
2777: set_trace_context(g_request_id, lx_return_status);
2778: IF lx_return_status = OKC_API.g_true THEN
2779: l_log_flag :=TRUE;
2780: l_output_flag :=TRUE;
2781: ELSE
2782: --We disregard the error and consider the trace mode is not

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

2901: END IF;
2902:
2903: EXCEPTION
2904: WHEN OTHERS THEN
2905: OKC_API.set_message(p_app_name => g_app_name,
2906: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2907: p_token1 => 'ACTION',
2908: p_token1_value => 'INIT_TRACE');
2909: OKC_API.set_message(G_APP_NAME

Line 2909: OKC_API.set_message(G_APP_NAME

2905: OKC_API.set_message(p_app_name => g_app_name,
2906: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2907: p_token1 => 'ACTION',
2908: p_token1_value => 'INIT_TRACE');
2909: OKC_API.set_message(G_APP_NAME
2910: ,G_UNEXPECTED_ERROR
2911: ,G_SQLCODE_TOKEN
2912: ,SQLCODE
2913: ,G_SQLERRM_TOKEN

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

2957: NULL;
2958: END;
2959: EXCEPTION
2960: WHEN OTHERS THEN
2961: OKC_API.set_message(p_app_name => g_app_name,
2962: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2963: p_token1 => 'ACTION',
2964: p_token1_value => 'STOP_TRACE');
2965: OKC_API.set_message(G_APP_NAME

Line 2965: OKC_API.set_message(G_APP_NAME

2961: OKC_API.set_message(p_app_name => g_app_name,
2962: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2963: p_token1 => 'ACTION',
2964: p_token1_value => 'STOP_TRACE');
2965: OKC_API.set_message(G_APP_NAME
2966: ,G_UNEXPECTED_ERROR
2967: ,G_SQLCODE_TOKEN
2968: ,SQLCODE
2969: ,G_SQLERRM_TOKEN

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

2989: END IF;
2990:
2991: EXCEPTION
2992: WHEN OTHERS THEN
2993: OKC_API.set_message(p_app_name => g_app_name,
2994: p_msg_name => 'OKC_K2Q_TRACE_MODE',
2995: p_token1 => 'ACTION',
2996: p_token1_value => 'PRINT_TRACE');
2997: RAISE;

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

3017: print_trace(0, '----------------------------------------------------------');
3018:
3019: EXCEPTION
3020: WHEN OTHERS THEN
3021: OKC_API.set_message(p_app_name => g_app_name,
3022: p_msg_name => 'OKC_K2Q_TRACE_MODE',
3023: p_token1 => 'ACTION',
3024: p_token1_value => 'PRINT_TRACE_HEADER');
3025: RAISE;

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

3045: print_trace(0, '----------------------------------------------------------');
3046:
3047: EXCEPTION
3048: WHEN OTHERS THEN
3049: OKC_API.set_message(p_app_name => g_app_name,
3050: p_msg_name => 'OKC_K2Q_TRACE_MODE',
3051: p_token1 => 'ACTION',
3052: p_token1_value => 'PRINT_TRACE_FOOTER');
3053: RAISE;

Line 3205: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3201: ---------------------------------------------------------------------------
3202: PROCEDURE Set_Search_String(p_srch_str IN VARCHAR2,
3203: x_return_status OUT NOCOPY VARCHAR2) IS
3204: BEGIN
3205: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3206: g_qry_clause := p_srch_str;
3207: EXCEPTION
3208: WHEN OTHERS THEN
3209: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 3209: x_return_status := OKC_API.G_RET_STS_ERROR;

3205: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3206: g_qry_clause := p_srch_str;
3207: EXCEPTION
3208: WHEN OTHERS THEN
3209: x_return_status := OKC_API.G_RET_STS_ERROR;
3210: END;
3211:
3212: PROCEDURE Get_Search_String(
3213: x_srch_str OUT NOCOPY VARCHAR2) IS

Line 3316: x_return_status:=OKC_API.G_RET_STS_SUCCESS;

3312: BEGIN
3313: IF (l_debug = 'Y') THEN
3314: okc_debug.log('11400: Entering Prepare_Contract_Terms ', 2);
3315: END IF;
3316: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
3317: OKC_TERMS_UTIL_GRP.Get_Contract_Document_Type_id(
3318: p_api_version => 1,
3319: x_return_status => x_return_status,
3320: x_msg_data => l_msg_data,