5:
6: ---------------------------------------------------------------------------
7: -- GLOBAL MESSAGE CONSTANTS
8: ---------------------------------------------------------------------------
9: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
10: G_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_UNABLE_TO_RESERVE_REC;
11: G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
12: G_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_CHANGED;
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
6: ---------------------------------------------------------------------------
7: -- GLOBAL MESSAGE CONSTANTS
8: ---------------------------------------------------------------------------
9: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
10: G_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_UNABLE_TO_RESERVE_REC;
11: G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
12: G_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_CHANGED;
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
7: -- GLOBAL MESSAGE CONSTANTS
8: ---------------------------------------------------------------------------
9: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
10: G_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_UNABLE_TO_RESERVE_REC;
11: G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
12: G_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_CHANGED;
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
15: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
8: ---------------------------------------------------------------------------
9: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
10: G_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_UNABLE_TO_RESERVE_REC;
11: G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
12: G_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_CHANGED;
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
15: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
16: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
9: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
10: G_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_UNABLE_TO_RESERVE_REC;
11: G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
12: G_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_CHANGED;
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
15: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
16: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
17: G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
10: G_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_UNABLE_TO_RESERVE_REC;
11: G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
12: G_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_CHANGED;
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
15: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
16: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
17: G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
18: G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
11: G_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_DELETED;
12: G_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_CHANGED;
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
15: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
16: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
17: G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
18: G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
19: ---------------------------------------------------------------------------
12: G_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_CHANGED;
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
15: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
16: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
17: G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
18: G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
19: ---------------------------------------------------------------------------
20: -- VALIDATION LEVELS
13: G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
15: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
16: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
17: G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
18: G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
19: ---------------------------------------------------------------------------
20: -- VALIDATION LEVELS
21: ---------------------------------------------------------------------------
14: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
15: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
16: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
17: G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
18: G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
19: ---------------------------------------------------------------------------
20: -- VALIDATION LEVELS
21: ---------------------------------------------------------------------------
22: G_REQUIRED_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_REQUIRED_VALUE_VALID_LEVEL;
18: G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
19: ---------------------------------------------------------------------------
20: -- VALIDATION LEVELS
21: ---------------------------------------------------------------------------
22: G_REQUIRED_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_REQUIRED_VALUE_VALID_LEVEL;
23: G_VALID_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_VALID_VALUE_VALID_LEVEL;
24: G_LOOKUP_CODE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_LOOKUP_CODE_VALID_LEVEL;
25: G_FOREIGN_KEY_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_FOREIGN_KEY_VALID_LEVEL;
26: G_RECORD_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_RECORD_VALID_LEVEL;
19: ---------------------------------------------------------------------------
20: -- VALIDATION LEVELS
21: ---------------------------------------------------------------------------
22: G_REQUIRED_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_REQUIRED_VALUE_VALID_LEVEL;
23: G_VALID_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_VALID_VALUE_VALID_LEVEL;
24: G_LOOKUP_CODE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_LOOKUP_CODE_VALID_LEVEL;
25: G_FOREIGN_KEY_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_FOREIGN_KEY_VALID_LEVEL;
26: G_RECORD_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_RECORD_VALID_LEVEL;
27: ---------------------------------------------------------------------------
20: -- VALIDATION LEVELS
21: ---------------------------------------------------------------------------
22: G_REQUIRED_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_REQUIRED_VALUE_VALID_LEVEL;
23: G_VALID_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_VALID_VALUE_VALID_LEVEL;
24: G_LOOKUP_CODE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_LOOKUP_CODE_VALID_LEVEL;
25: G_FOREIGN_KEY_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_FOREIGN_KEY_VALID_LEVEL;
26: G_RECORD_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_RECORD_VALID_LEVEL;
27: ---------------------------------------------------------------------------
28: -- GLOBAL VARIABLES
21: ---------------------------------------------------------------------------
22: G_REQUIRED_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_REQUIRED_VALUE_VALID_LEVEL;
23: G_VALID_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_VALID_VALUE_VALID_LEVEL;
24: G_LOOKUP_CODE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_LOOKUP_CODE_VALID_LEVEL;
25: G_FOREIGN_KEY_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_FOREIGN_KEY_VALID_LEVEL;
26: G_RECORD_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_RECORD_VALID_LEVEL;
27: ---------------------------------------------------------------------------
28: -- GLOBAL VARIABLES
29: ---------------------------------------------------------------------------
22: G_REQUIRED_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_REQUIRED_VALUE_VALID_LEVEL;
23: G_VALID_VALUE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_VALID_VALUE_VALID_LEVEL;
24: G_LOOKUP_CODE_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_LOOKUP_CODE_VALID_LEVEL;
25: G_FOREIGN_KEY_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_FOREIGN_KEY_VALID_LEVEL;
26: G_RECORD_VALID_LEVEL CONSTANT NUMBER := OKC_API.G_RECORD_VALID_LEVEL;
27: ---------------------------------------------------------------------------
28: -- GLOBAL VARIABLES
29: ---------------------------------------------------------------------------
30: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_ARTICLE_ADOPTIONS_PVT';
27: ---------------------------------------------------------------------------
28: -- GLOBAL VARIABLES
29: ---------------------------------------------------------------------------
30: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_ARTICLE_ADOPTIONS_PVT';
31: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
32:
33: ------------------------------------------------------------------------------
34: -- GLOBAL CONSTANTS
35: ------------------------------------------------------------------------------
84: IF (l_debug = 'Y') THEN
85: Okc_Debug.Log('300: Leaving get_seq_id because of EXCEPTION: '||sqlerrm, 2);
86: END IF;
87:
88: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
89: p_msg_name => G_UNEXPECTED_ERROR,
90: p_token1 => G_SQLCODE_TOKEN,
91: p_token1_value => sqlcode,
92: p_token2 => G_SQLERRM_TOKEN,
200: IF (l_debug = 'Y') THEN
201: Okc_Debug.Log('600: Leaving get_rec because of EXCEPTION: '||sqlerrm, 2);
202: END IF;
203:
204: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
205: p_msg_name => G_UNEXPECTED_ERROR,
206: p_token1 => G_SQLCODE_TOKEN,
207: p_token1_value => sqlcode,
208: p_token2 => G_SQLERRM_TOKEN,
270: x_last_update_login => l_last_update_login,
271: x_last_update_date => l_last_update_date
272: );
273: ELSE
274: OKC_API.SET_MESSAGE(G_APP_NAME,'OKC_ART_ADP_NOT_FOUND');
275: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
276: END IF;
277: --- If any errors happen abort API
278: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
316: WHEN OTHERS THEN
317: IF (l_debug = 'Y') THEN
318: Okc_Debug.Log('1100: Leaving Set_Attributes because of EXCEPTION: '||sqlerrm, 2);
319: END IF;
320: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
321: p_msg_name => G_UNEXPECTED_ERROR,
322: p_token1 => G_SQLCODE_TOKEN,
323: p_token1_value => sqlcode,
324: p_token2 => G_SQLERRM_TOKEN,
377: IF ( p_global_article_version_id IS NULL) THEN
378: IF (l_debug = 'Y') THEN
379: Okc_Debug.Log('1500: - attribute GLOBAL_ARTICLE_VERSION_ID is invalid', 2);
380: END IF;
381: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'GLOBAL_ARTICLE_VERSION_ID');
382: l_return_status := G_RET_STS_ERROR;
383: END IF;
384:
385: IF (l_debug = 'Y') THEN
388: IF ( p_adoption_type IS NULL) THEN
389: IF (l_debug = 'Y') THEN
390: Okc_Debug.Log('1500: - attribute ADOPTION_TYPE is invalid', 2);
391: END IF;
392: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ADOPTION_TYPE');
393: l_return_status := G_RET_STS_ERROR;
394: END IF;
395:
396: IF (l_debug = 'Y') THEN
399: IF ( p_local_org_id IS NULL) THEN
400: IF (l_debug = 'Y') THEN
401: Okc_Debug.Log('1500: - attribute LOCAL_ORG_ID is invalid', 2);
402: END IF;
403: Okc_Api.Set_Message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LOCAL_ORG_ID');
404: l_return_status := G_RET_STS_ERROR;
405: END IF;
406:
407: END IF;
424: END IF;
425: IF p_adoption_type IS NOT NULL THEN
426: l_tmp_return_status := Okc_Util.Check_Lookup_Code('OKC_ARTICLE_ADOPTION_TYPE',p_adoption_type);
427: IF (l_tmp_return_status <> G_RET_STS_SUCCESS) THEN
428: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'ADOPTION_TYPE');
429: l_return_status := G_RET_STS_ERROR;
430: END IF;
431: END IF;
432:
435: END IF;
436: IF p_adoption_status IS NOT NULL THEN
437: l_tmp_return_status := Okc_Util.Check_Lookup_Code('OKC_ARTICLE_STATUS',p_adoption_status);
438: IF (l_tmp_return_status <> G_RET_STS_SUCCESS) THEN
439: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'ADOPTION_STATUS');
440: l_return_status := G_RET_STS_ERROR;
441: END IF;
442: END IF;
443:
462: IF (l_dummy_var = '?') THEN
463: IF (l_debug = 'Y') THEN
464: Okc_Debug.Log('2300: - attribute GLOBAL_ARTICLE_VERSION_ID is invalid', 2);
465: END IF;
466: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'GLOBAL_ARTICLE_VERSION_ID');
467: l_return_status := G_RET_STS_ERROR;
468: END IF;
469: END IF;
470:
479: IF (l_dummy_var = '?') THEN
480: IF (l_debug = 'Y') THEN
481: Okc_Debug.Log('2300: - attribute LOCAL_ORG_ID is invalid', 2);
482: END IF;
483: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'LOCAL_ORG_ID');
484: l_return_status := G_RET_STS_ERROR;
485: END IF;
486: END IF;
487:
496: IF (l_dummy_var = '?') THEN
497: IF (l_debug = 'Y') THEN
498: Okc_Debug.Log('2300: - attribute LOCAL_ARTICLE_VERSION_ID is invalid', 2);
499: END IF;
500: Okc_Api.Set_Message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'LOCAL_ARTICLE_VERSION_ID');
501: l_return_status := G_RET_STS_ERROR;
502: END IF;
503: END IF;
504:
513:
514: EXCEPTION
515: WHEN OTHERS THEN
516: Okc_Debug.Log('2500: Leaving Validate_Attributes because of EXCEPTION: '||sqlerrm, 2);
517: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
518: p_msg_name => G_UNEXPECTED_ERROR,
519: p_token1 => G_SQLCODE_TOKEN,
520: p_token1_value => sqlcode,
521: p_token2 => G_SQLERRM_TOKEN,
599: IF (l_debug = 'Y') THEN
600: Okc_Debug.Log('3000: Leaving Validate_Record because of EXCEPTION: '||sqlerrm, 2);
601: END IF;
602:
603: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
604: p_msg_name => G_UNEXPECTED_ERROR,
605: p_token1 => G_SQLCODE_TOKEN,
606: p_token1_value => sqlcode,
607: p_token2 => G_SQLERRM_TOKEN,
694: WHEN OTHERS THEN
695: IF (l_debug = 'Y') THEN
696: Okc_Debug.Log('3500: Leaving Validate_Row because of EXCEPTION: '||sqlerrm, 2);
697: END IF;
698: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
699: p_msg_name => G_UNEXPECTED_ERROR,
700: p_token1 => G_SQLCODE_TOKEN,
701: p_token1_value => sqlcode,
702: p_token2 => G_SQLERRM_TOKEN,
769: IF (l_debug = 'Y') THEN
770: Okc_Debug.Log('3800: Leaving Insert_Row:OTHERS Exception', 2);
771: END IF;
772:
773: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
774: p_msg_name => G_UNEXPECTED_ERROR,
775: p_token1 => G_SQLCODE_TOKEN,
776: p_token1_value => sqlcode,
777: p_token2 => G_SQLERRM_TOKEN,
900: WHEN OTHERS THEN
901: IF (l_debug = 'Y') THEN
902: Okc_Debug.Log('4800: Leaving Insert_Row because of EXCEPTION: '||sqlerrm, 2);
903: END IF;
904: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
905: p_msg_name => G_UNEXPECTED_ERROR,
906: p_token1 => G_SQLCODE_TOKEN,
907: p_token1_value => sqlcode,
908: p_token2 => G_SQLERRM_TOKEN,
983:
984: IF (lock_csr%ISOPEN) THEN
985: CLOSE lock_csr;
986: END IF;
987: Okc_Api.Set_Message(G_FND_APP,G_UNABLE_TO_RESERVE_REC);
988: RETURN( G_RET_STS_ERROR );
989: END;
990: IF ( l_row_notfound ) THEN
991: l_return_status := G_RET_STS_ERROR;
994: FETCH lchk_csr INTO l_object_version_number;
995: l_row_notfound := lchk_csr%NOTFOUND;
996: CLOSE lchk_csr;
997: IF (l_row_notfound) THEN
998: Okc_Api.Set_Message(G_FND_APP,G_RECORD_DELETED);
999: ELSIF l_object_version_number > p_object_version_number THEN
1000: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1001: ELSIF l_object_version_number = -1 THEN
1002: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
996: CLOSE lchk_csr;
997: IF (l_row_notfound) THEN
998: Okc_Api.Set_Message(G_FND_APP,G_RECORD_DELETED);
999: ELSIF l_object_version_number > p_object_version_number THEN
1000: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1001: ELSIF l_object_version_number = -1 THEN
1002: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1003: ELSE -- it can be the only above condition. It can happen after restore version
1004: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
998: Okc_Api.Set_Message(G_FND_APP,G_RECORD_DELETED);
999: ELSIF l_object_version_number > p_object_version_number THEN
1000: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1001: ELSIF l_object_version_number = -1 THEN
1002: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1003: ELSE -- it can be the only above condition. It can happen after restore version
1004: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1005: END IF;
1006: ELSE
1000: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1001: ELSIF l_object_version_number = -1 THEN
1002: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1003: ELSE -- it can be the only above condition. It can happen after restore version
1004: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1005: END IF;
1006: ELSE
1007: l_return_status := G_RET_STS_SUCCESS;
1008: END IF;
1022:
1023: IF (lock_wo_lv_csr%ISOPEN) THEN
1024: CLOSE lock_wo_lv_csr;
1025: END IF;
1026: Okc_Api.Set_Message(G_FND_APP,G_UNABLE_TO_RESERVE_REC);
1027: RETURN( G_RET_STS_ERROR );
1028: END;
1029: IF ( l_row_notfound ) THEN
1030: l_return_status := G_RET_STS_ERROR;
1033: FETCH lchk_wo_lv_csr INTO l_object_version_number;
1034: l_row_notfound := lchk_wo_lv_csr%NOTFOUND;
1035: CLOSE lchk_wo_lv_csr;
1036: IF (l_row_notfound) THEN
1037: Okc_Api.Set_Message(G_FND_APP,G_RECORD_DELETED);
1038: ELSIF l_object_version_number > p_object_version_number THEN
1039: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1040: ELSIF l_object_version_number = -1 THEN
1041: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1035: CLOSE lchk_wo_lv_csr;
1036: IF (l_row_notfound) THEN
1037: Okc_Api.Set_Message(G_FND_APP,G_RECORD_DELETED);
1038: ELSIF l_object_version_number > p_object_version_number THEN
1039: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1040: ELSIF l_object_version_number = -1 THEN
1041: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1042: ELSE -- it can be the only above condition. It can happen after restore version
1043: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1037: Okc_Api.Set_Message(G_FND_APP,G_RECORD_DELETED);
1038: ELSIF l_object_version_number > p_object_version_number THEN
1039: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1040: ELSIF l_object_version_number = -1 THEN
1041: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1042: ELSE -- it can be the only above condition. It can happen after restore version
1043: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1044: END IF;
1045: ELSE
1039: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1040: ELSIF l_object_version_number = -1 THEN
1041: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1042: ELSE -- it can be the only above condition. It can happen after restore version
1043: Okc_Api.Set_Message(G_FND_APP,G_RECORD_CHANGED);
1044: END IF;
1045: ELSE
1046: l_return_status := G_RET_STS_SUCCESS;
1047: END IF;
1073: IF (l_debug = 'Y') THEN
1074: Okc_Debug.Log('5200: Leaving Lock_Row because of EXCEPTION: '||sqlerrm, 2);
1075: END IF;
1076:
1077: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1078: p_msg_name => G_UNEXPECTED_ERROR,
1079: p_token1 => G_SQLCODE_TOKEN,
1080: p_token1_value => sqlcode,
1081: p_token2 => G_SQLERRM_TOKEN,
1139: WHEN OTHERS THEN
1140: IF (l_debug = 'Y') THEN
1141: Okc_Debug.Log('6300: Leaving Lock_Row because of EXCEPTION: '||sqlerrm, 2);
1142: END IF;
1143: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1144: p_msg_name => G_UNEXPECTED_ERROR,
1145: p_token1 => G_SQLCODE_TOKEN,
1146: p_token1_value => sqlcode,
1147: p_token2 => G_SQLERRM_TOKEN,
1214: IF (l_debug = 'Y') THEN
1215: Okc_Debug.Log('6600: Leaving Update_Row because of EXCEPTION: '||sqlerrm, 2);
1216: END IF;
1217:
1218: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1219: p_msg_name => G_UNEXPECTED_ERROR,
1220: p_token1 => G_SQLCODE_TOKEN,
1221: p_token1_value => sqlcode,
1222: p_token2 => G_SQLERRM_TOKEN,
1379: WHEN OTHERS THEN
1380: IF (l_debug = 'Y') THEN
1381: Okc_Debug.Log('8100: Leaving Update_Row because of EXCEPTION: '||sqlerrm, 2);
1382: END IF;
1383: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1384: p_msg_name => G_UNEXPECTED_ERROR,
1385: p_token1 => G_SQLCODE_TOKEN,
1386: p_token1_value => sqlcode,
1387: p_token2 => G_SQLERRM_TOKEN,
1423: IF (l_debug = 'Y') THEN
1424: Okc_Debug.Log('8400: Leaving Delete_Row because of EXCEPTION: '||sqlerrm, 2);
1425: END IF;
1426:
1427: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1428: p_msg_name => G_UNEXPECTED_ERROR,
1429: p_token1 => G_SQLCODE_TOKEN,
1430: p_token1_value => sqlcode,
1431: p_token2 => G_SQLERRM_TOKEN,
1497: WHEN OTHERS THEN
1498: IF (l_debug = 'Y') THEN
1499: Okc_Debug.Log('9600: Leaving Delete_Row because of EXCEPTION: '||sqlerrm, 2);
1500: END IF;
1501: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1502: p_msg_name => G_UNEXPECTED_ERROR,
1503: p_token1 => G_SQLCODE_TOKEN,
1504: p_token1_value => sqlcode,
1505: p_token2 => G_SQLERRM_TOKEN,