14: --
15: l_proc varchar2(72) := g_package||'return_api_dml_status';
16: --
17: Begin
18: hr_utility.set_location('Entering:'||l_proc, 5);
19: --
20: Return (nvl(g_api_dml, false));
21: --
22: hr_utility.set_location(' Leaving:'||l_proc, 10);
18: hr_utility.set_location('Entering:'||l_proc, 5);
19: --
20: Return (nvl(g_api_dml, false));
21: --
22: hr_utility.set_location(' Leaving:'||l_proc, 10);
23: End return_api_dml_status;
24: --
25: -- ----------------------------------------------------------------------------
26: -- |---------------------------< constraint_error >---------------------------|
30: --
31: l_proc varchar2(72) := g_package||'constraint_error';
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'OTA_PRICE_LISTS_FK1') Then
37: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
38: hr_utility.set_message_token('PROCEDURE', l_proc);
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'OTA_PRICE_LISTS_FK1') Then
37: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
38: hr_utility.set_message_token('PROCEDURE', l_proc);
39: hr_utility.set_message_token('STEP','5');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_PK') Then
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'OTA_PRICE_LISTS_FK1') Then
37: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
38: hr_utility.set_message_token('PROCEDURE', l_proc);
39: hr_utility.set_message_token('STEP','5');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_PK') Then
42: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
35: --
36: If (p_constraint_name = 'OTA_PRICE_LISTS_FK1') Then
37: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
38: hr_utility.set_message_token('PROCEDURE', l_proc);
39: hr_utility.set_message_token('STEP','5');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_PK') Then
42: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
36: If (p_constraint_name = 'OTA_PRICE_LISTS_FK1') Then
37: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
38: hr_utility.set_message_token('PROCEDURE', l_proc);
39: hr_utility.set_message_token('STEP','5');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_PK') Then
42: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('STEP','10');
38: hr_utility.set_message_token('PROCEDURE', l_proc);
39: hr_utility.set_message_token('STEP','5');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_PK') Then
42: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('STEP','10');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_UK2') Then
39: hr_utility.set_message_token('STEP','5');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_PK') Then
42: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('STEP','10');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_UK2') Then
47: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_PK') Then
42: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('STEP','10');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_UK2') Then
47: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
48: hr_utility.set_message_token('PROCEDURE', l_proc);
41: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_PK') Then
42: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('STEP','10');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_UK2') Then
47: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
48: hr_utility.set_message_token('PROCEDURE', l_proc);
49: hr_utility.set_message_token('STEP','15');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('STEP','10');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_UK2') Then
47: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
48: hr_utility.set_message_token('PROCEDURE', l_proc);
49: hr_utility.set_message_token('STEP','15');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'OTA_TPL_CHECK_DATES_ORDER') Then
44: hr_utility.set_message_token('STEP','10');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_UK2') Then
47: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
48: hr_utility.set_message_token('PROCEDURE', l_proc);
49: hr_utility.set_message_token('STEP','15');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'OTA_TPL_CHECK_DATES_ORDER') Then
52: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_UK2') Then
47: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
48: hr_utility.set_message_token('PROCEDURE', l_proc);
49: hr_utility.set_message_token('STEP','15');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'OTA_TPL_CHECK_DATES_ORDER') Then
52: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
53: hr_utility.set_message_token('PROCEDURE', l_proc);
46: ElsIf (p_constraint_name = 'OTA_PRICE_LISTS_UK2') Then
47: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
48: hr_utility.set_message_token('PROCEDURE', l_proc);
49: hr_utility.set_message_token('STEP','15');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'OTA_TPL_CHECK_DATES_ORDER') Then
52: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
53: hr_utility.set_message_token('PROCEDURE', l_proc);
54: hr_utility.set_message_token('STEP','20');
48: hr_utility.set_message_token('PROCEDURE', l_proc);
49: hr_utility.set_message_token('STEP','15');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'OTA_TPL_CHECK_DATES_ORDER') Then
52: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
53: hr_utility.set_message_token('PROCEDURE', l_proc);
54: hr_utility.set_message_token('STEP','20');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'OTA_TPL_DEFAULT_FLAG_CHK') Then
49: hr_utility.set_message_token('STEP','15');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'OTA_TPL_CHECK_DATES_ORDER') Then
52: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
53: hr_utility.set_message_token('PROCEDURE', l_proc);
54: hr_utility.set_message_token('STEP','20');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'OTA_TPL_DEFAULT_FLAG_CHK') Then
57: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'OTA_TPL_CHECK_DATES_ORDER') Then
52: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
53: hr_utility.set_message_token('PROCEDURE', l_proc);
54: hr_utility.set_message_token('STEP','20');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'OTA_TPL_DEFAULT_FLAG_CHK') Then
57: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
58: hr_utility.set_message_token('PROCEDURE', l_proc);
51: ElsIf (p_constraint_name = 'OTA_TPL_CHECK_DATES_ORDER') Then
52: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
53: hr_utility.set_message_token('PROCEDURE', l_proc);
54: hr_utility.set_message_token('STEP','20');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'OTA_TPL_DEFAULT_FLAG_CHK') Then
57: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
58: hr_utility.set_message_token('PROCEDURE', l_proc);
59: hr_utility.set_message_token('STEP','25');
53: hr_utility.set_message_token('PROCEDURE', l_proc);
54: hr_utility.set_message_token('STEP','20');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'OTA_TPL_DEFAULT_FLAG_CHK') Then
57: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
58: hr_utility.set_message_token('PROCEDURE', l_proc);
59: hr_utility.set_message_token('STEP','25');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'OTA_TPL_PRICE_LIST_TYPE_CHK') Then
54: hr_utility.set_message_token('STEP','20');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'OTA_TPL_DEFAULT_FLAG_CHK') Then
57: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
58: hr_utility.set_message_token('PROCEDURE', l_proc);
59: hr_utility.set_message_token('STEP','25');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'OTA_TPL_PRICE_LIST_TYPE_CHK') Then
62: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'OTA_TPL_DEFAULT_FLAG_CHK') Then
57: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
58: hr_utility.set_message_token('PROCEDURE', l_proc);
59: hr_utility.set_message_token('STEP','25');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'OTA_TPL_PRICE_LIST_TYPE_CHK') Then
62: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
63: hr_utility.set_message_token('PROCEDURE', l_proc);
56: ElsIf (p_constraint_name = 'OTA_TPL_DEFAULT_FLAG_CHK') Then
57: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
58: hr_utility.set_message_token('PROCEDURE', l_proc);
59: hr_utility.set_message_token('STEP','25');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'OTA_TPL_PRICE_LIST_TYPE_CHK') Then
62: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
63: hr_utility.set_message_token('PROCEDURE', l_proc);
64: hr_utility.set_message_token('STEP','30');
58: hr_utility.set_message_token('PROCEDURE', l_proc);
59: hr_utility.set_message_token('STEP','25');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'OTA_TPL_PRICE_LIST_TYPE_CHK') Then
62: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
63: hr_utility.set_message_token('PROCEDURE', l_proc);
64: hr_utility.set_message_token('STEP','30');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NOTNULL') Then
59: hr_utility.set_message_token('STEP','25');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'OTA_TPL_PRICE_LIST_TYPE_CHK') Then
62: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
63: hr_utility.set_message_token('PROCEDURE', l_proc);
64: hr_utility.set_message_token('STEP','30');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NOTNULL') Then
67: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'OTA_TPL_PRICE_LIST_TYPE_CHK') Then
62: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
63: hr_utility.set_message_token('PROCEDURE', l_proc);
64: hr_utility.set_message_token('STEP','30');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NOTNULL') Then
67: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
68: hr_utility.set_message_token('PROCEDURE', l_proc);
61: ElsIf (p_constraint_name = 'OTA_TPL_PRICE_LIST_TYPE_CHK') Then
62: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
63: hr_utility.set_message_token('PROCEDURE', l_proc);
64: hr_utility.set_message_token('STEP','30');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NOTNULL') Then
67: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
68: hr_utility.set_message_token('PROCEDURE', l_proc);
69: hr_utility.set_message_token('STEP','35');
63: hr_utility.set_message_token('PROCEDURE', l_proc);
64: hr_utility.set_message_token('STEP','30');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NOTNULL') Then
67: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
68: hr_utility.set_message_token('PROCEDURE', l_proc);
69: hr_utility.set_message_token('STEP','35');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NULL') Then
64: hr_utility.set_message_token('STEP','30');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NOTNULL') Then
67: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
68: hr_utility.set_message_token('PROCEDURE', l_proc);
69: hr_utility.set_message_token('STEP','35');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NULL') Then
72: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NOTNULL') Then
67: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
68: hr_utility.set_message_token('PROCEDURE', l_proc);
69: hr_utility.set_message_token('STEP','35');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NULL') Then
72: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
73: hr_utility.set_message_token('PROCEDURE', l_proc);
66: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NOTNULL') Then
67: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
68: hr_utility.set_message_token('PROCEDURE', l_proc);
69: hr_utility.set_message_token('STEP','35');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NULL') Then
72: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
73: hr_utility.set_message_token('PROCEDURE', l_proc);
74: hr_utility.set_message_token('STEP','40');
68: hr_utility.set_message_token('PROCEDURE', l_proc);
69: hr_utility.set_message_token('STEP','35');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NULL') Then
72: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
73: hr_utility.set_message_token('PROCEDURE', l_proc);
74: hr_utility.set_message_token('STEP','40');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NOTNULL') Then
69: hr_utility.set_message_token('STEP','35');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NULL') Then
72: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
73: hr_utility.set_message_token('PROCEDURE', l_proc);
74: hr_utility.set_message_token('STEP','40');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NOTNULL') Then
77: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NULL') Then
72: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
73: hr_utility.set_message_token('PROCEDURE', l_proc);
74: hr_utility.set_message_token('STEP','40');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NOTNULL') Then
77: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
78: hr_utility.set_message_token('PROCEDURE', l_proc);
71: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_PRICE_NULL') Then
72: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
73: hr_utility.set_message_token('PROCEDURE', l_proc);
74: hr_utility.set_message_token('STEP','40');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NOTNULL') Then
77: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
78: hr_utility.set_message_token('PROCEDURE', l_proc);
79: hr_utility.set_message_token('STEP','45');
73: hr_utility.set_message_token('PROCEDURE', l_proc);
74: hr_utility.set_message_token('STEP','40');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NOTNULL') Then
77: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
78: hr_utility.set_message_token('PROCEDURE', l_proc);
79: hr_utility.set_message_token('STEP','45');
80: hr_utility.raise_error;
81: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NULL') Then
74: hr_utility.set_message_token('STEP','40');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NOTNULL') Then
77: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
78: hr_utility.set_message_token('PROCEDURE', l_proc);
79: hr_utility.set_message_token('STEP','45');
80: hr_utility.raise_error;
81: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NULL') Then
82: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NOTNULL') Then
77: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
78: hr_utility.set_message_token('PROCEDURE', l_proc);
79: hr_utility.set_message_token('STEP','45');
80: hr_utility.raise_error;
81: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NULL') Then
82: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
76: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NOTNULL') Then
77: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
78: hr_utility.set_message_token('PROCEDURE', l_proc);
79: hr_utility.set_message_token('STEP','45');
80: hr_utility.raise_error;
81: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NULL') Then
82: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('STEP','50');
78: hr_utility.set_message_token('PROCEDURE', l_proc);
79: hr_utility.set_message_token('STEP','45');
80: hr_utility.raise_error;
81: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NULL') Then
82: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('STEP','50');
85: hr_utility.raise_error;
86: ElsIf (p_constraint_name = 'UNIQUE_NAME_WITHIN_BGROUP') Then
79: hr_utility.set_message_token('STEP','45');
80: hr_utility.raise_error;
81: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NULL') Then
82: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('STEP','50');
85: hr_utility.raise_error;
86: ElsIf (p_constraint_name = 'UNIQUE_NAME_WITHIN_BGROUP') Then
87: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
80: hr_utility.raise_error;
81: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NULL') Then
82: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('STEP','50');
85: hr_utility.raise_error;
86: ElsIf (p_constraint_name = 'UNIQUE_NAME_WITHIN_BGROUP') Then
87: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
88: hr_utility.set_message_token('PROCEDURE', l_proc);
81: ElsIf (p_constraint_name = 'OTA_TPL_UNIT_TYPE_NULL') Then
82: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('STEP','50');
85: hr_utility.raise_error;
86: ElsIf (p_constraint_name = 'UNIQUE_NAME_WITHIN_BGROUP') Then
87: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
88: hr_utility.set_message_token('PROCEDURE', l_proc);
89: hr_utility.set_message_token('STEP','55');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('STEP','50');
85: hr_utility.raise_error;
86: ElsIf (p_constraint_name = 'UNIQUE_NAME_WITHIN_BGROUP') Then
87: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
88: hr_utility.set_message_token('PROCEDURE', l_proc);
89: hr_utility.set_message_token('STEP','55');
90: hr_utility.raise_error;
91: Else
84: hr_utility.set_message_token('STEP','50');
85: hr_utility.raise_error;
86: ElsIf (p_constraint_name = 'UNIQUE_NAME_WITHIN_BGROUP') Then
87: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
88: hr_utility.set_message_token('PROCEDURE', l_proc);
89: hr_utility.set_message_token('STEP','55');
90: hr_utility.raise_error;
91: Else
92: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
85: hr_utility.raise_error;
86: ElsIf (p_constraint_name = 'UNIQUE_NAME_WITHIN_BGROUP') Then
87: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
88: hr_utility.set_message_token('PROCEDURE', l_proc);
89: hr_utility.set_message_token('STEP','55');
90: hr_utility.raise_error;
91: Else
92: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
93: hr_utility.set_message_token('PROCEDURE', l_proc);
86: ElsIf (p_constraint_name = 'UNIQUE_NAME_WITHIN_BGROUP') Then
87: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
88: hr_utility.set_message_token('PROCEDURE', l_proc);
89: hr_utility.set_message_token('STEP','55');
90: hr_utility.raise_error;
91: Else
92: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
93: hr_utility.set_message_token('PROCEDURE', l_proc);
94: hr_utility.set_message_token('STEP','60');
88: hr_utility.set_message_token('PROCEDURE', l_proc);
89: hr_utility.set_message_token('STEP','55');
90: hr_utility.raise_error;
91: Else
92: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
93: hr_utility.set_message_token('PROCEDURE', l_proc);
94: hr_utility.set_message_token('STEP','60');
95: hr_utility.raise_error;
96: End If;
89: hr_utility.set_message_token('STEP','55');
90: hr_utility.raise_error;
91: Else
92: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
93: hr_utility.set_message_token('PROCEDURE', l_proc);
94: hr_utility.set_message_token('STEP','60');
95: hr_utility.raise_error;
96: End If;
97: --
90: hr_utility.raise_error;
91: Else
92: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
93: hr_utility.set_message_token('PROCEDURE', l_proc);
94: hr_utility.set_message_token('STEP','60');
95: hr_utility.raise_error;
96: End If;
97: --
98: hr_utility.set_location(' Leaving:'||l_proc, 10);
91: Else
92: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
93: hr_utility.set_message_token('PROCEDURE', l_proc);
94: hr_utility.set_message_token('STEP','60');
95: hr_utility.raise_error;
96: End If;
97: --
98: hr_utility.set_location(' Leaving:'||l_proc, 10);
99: End constraint_error;
94: hr_utility.set_message_token('STEP','60');
95: hr_utility.raise_error;
96: End If;
97: --
98: hr_utility.set_location(' Leaving:'||l_proc, 10);
99: End constraint_error;
100: --
101: -- ----------------------------------------------------------------------------
102: -- |-----------------------------< api_updating >-----------------------------|
152: l_proc varchar2(72) := g_package||'api_updating';
153: l_fct_ret boolean;
154: --
155: Begin
156: hr_utility.set_location('Entering:'||l_proc, 5);
157: --
158: If (
159: p_price_list_id is null and
160: p_object_version_number is null
168: If (
169: p_price_list_id = g_old_rec.price_list_id and
170: p_object_version_number = g_old_rec.object_version_number
171: ) Then
172: hr_utility.set_location(l_proc, 10);
173: --
174: -- The g_old_rec is current therefore we must
175: -- set the returning function to true
176: --
185: Close C_Sel1;
186: --
187: -- The primary key is invalid therefore we must error
188: --
189: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
190: hr_utility.raise_error;
191: End If;
192: Close C_Sel1;
193: If (p_object_version_number <> g_old_rec.object_version_number) Then
186: --
187: -- The primary key is invalid therefore we must error
188: --
189: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
190: hr_utility.raise_error;
191: End If;
192: Close C_Sel1;
193: If (p_object_version_number <> g_old_rec.object_version_number) Then
194: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
190: hr_utility.raise_error;
191: End If;
192: Close C_Sel1;
193: If (p_object_version_number <> g_old_rec.object_version_number) Then
194: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
195: hr_utility.raise_error;
196: End If;
197: hr_utility.set_location(l_proc, 15);
198: l_fct_ret := true;
191: End If;
192: Close C_Sel1;
193: If (p_object_version_number <> g_old_rec.object_version_number) Then
194: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
195: hr_utility.raise_error;
196: End If;
197: hr_utility.set_location(l_proc, 15);
198: l_fct_ret := true;
199: End If;
193: If (p_object_version_number <> g_old_rec.object_version_number) Then
194: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
195: hr_utility.raise_error;
196: End If;
197: hr_utility.set_location(l_proc, 15);
198: l_fct_ret := true;
199: End If;
200: End If;
201: hr_utility.set_location(' Leaving:'||l_proc, 20);
197: hr_utility.set_location(l_proc, 15);
198: l_fct_ret := true;
199: End If;
200: End If;
201: hr_utility.set_location(' Leaving:'||l_proc, 20);
202: Return (l_fct_ret);
203: --
204: End api_updating;
205: --
255: --
256: l_proc varchar2(72) := g_package||'lck';
257: --
258: Begin
259: hr_utility.set_location('Entering:'||l_proc, 5);
260: --
261: -- Add any mandatory argument checking here:
262: -- Example:
263: -- hr_api.mandatory_arg_error
271: Close C_Sel1;
272: --
273: -- The primary key is invalid therefore we must error
274: --
275: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
276: hr_utility.raise_error;
277: End If;
278: Close C_Sel1;
279: If (p_object_version_number <> g_old_rec.object_version_number) Then
272: --
273: -- The primary key is invalid therefore we must error
274: --
275: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
276: hr_utility.raise_error;
277: End If;
278: Close C_Sel1;
279: If (p_object_version_number <> g_old_rec.object_version_number) Then
280: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
276: hr_utility.raise_error;
277: End If;
278: Close C_Sel1;
279: If (p_object_version_number <> g_old_rec.object_version_number) Then
280: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
281: hr_utility.raise_error;
282: End If;
283: --
284: hr_utility.set_location(' Leaving:'||l_proc, 10);
277: End If;
278: Close C_Sel1;
279: If (p_object_version_number <> g_old_rec.object_version_number) Then
280: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
281: hr_utility.raise_error;
282: End If;
283: --
284: hr_utility.set_location(' Leaving:'||l_proc, 10);
285: --
280: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
281: hr_utility.raise_error;
282: End If;
283: --
284: hr_utility.set_location(' Leaving:'||l_proc, 10);
285: --
286: -- We need to trap the ORA LOCK exception
287: --
288: Exception
290: --
291: -- The object is locked therefore we need to supply a meaningful
292: -- error message.
293: --
294: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
295: hr_utility.set_message_token('TABLE_NAME', 'ota_price_lists');
296: hr_utility.raise_error;
297: End lck;
298: --
291: -- The object is locked therefore we need to supply a meaningful
292: -- error message.
293: --
294: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
295: hr_utility.set_message_token('TABLE_NAME', 'ota_price_lists');
296: hr_utility.raise_error;
297: End lck;
298: --
299: -- ----------------------------------------------------------------------------
292: -- error message.
293: --
294: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
295: hr_utility.set_message_token('TABLE_NAME', 'ota_price_lists');
296: hr_utility.raise_error;
297: End lck;
298: --
299: -- ----------------------------------------------------------------------------
300: -- |-----------------------------< convert_args >-----------------------------|
342: l_proc varchar2(72) := g_package||'convert_args';
343: --
344: Begin
345: --
346: hr_utility.set_location('Entering:'||l_proc, 5);
347: --
348: -- Convert arguments into local l_rec structure.
349: --
350: l_rec.price_list_id := p_price_list_id;
383: l_rec.tpl_information20 := p_tpl_information20;
384: --
385: -- Return the plsql record structure.
386: --
387: hr_utility.set_location(' Leaving:'||l_proc, 10);
388: Return(l_rec);
389: --
390: End convert_args;
391: --