15: --
16: l_proc varchar2(72) := g_package||'constraint_error';
17: --
18: Begin
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
22: hr_utility.set_message_token('PROCEDURE', l_proc);
23: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
17: --
18: Begin
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
22: hr_utility.set_message_token('PROCEDURE', l_proc);
23: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
24: hr_utility.raise_error;
25: --
18: Begin
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
22: hr_utility.set_message_token('PROCEDURE', l_proc);
23: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
24: hr_utility.raise_error;
25: --
26: hr_utility.set_location(' Leaving:'||l_proc, 10);
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
22: hr_utility.set_message_token('PROCEDURE', l_proc);
23: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
24: hr_utility.raise_error;
25: --
26: hr_utility.set_location(' Leaving:'||l_proc, 10);
27: End constraint_error;
20: --
21: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
22: hr_utility.set_message_token('PROCEDURE', l_proc);
23: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
24: hr_utility.raise_error;
25: --
26: hr_utility.set_location(' Leaving:'||l_proc, 10);
27: End constraint_error;
28: --
22: hr_utility.set_message_token('PROCEDURE', l_proc);
23: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
24: hr_utility.raise_error;
25: --
26: hr_utility.set_location(' Leaving:'||l_proc, 10);
27: End constraint_error;
28: --
29: -- ----------------------------------------------------------------------------
30: -- |-----------------------------< api_updating >-----------------------------|
51: l_proc varchar2(72) := g_package||'api_updating';
52: l_fct_ret boolean;
53: --
54: Begin
55: hr_utility.set_location('Entering:'||l_proc, 5);
56: --
57: If (
58: p_shared_type_id is null or
59: p_language is null
67: If (
68: p_shared_type_id = g_old_rec.shared_type_id and
69: p_language = g_old_rec.language
70: ) Then
71: hr_utility.set_location(l_proc, 10);
72: --
73: -- The g_old_rec is current therefore we must
74: -- set the returning function to true
75: --
84: Close C_Sel1;
85: --
86: -- The primary key is invalid therefore we must error
87: --
88: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
89: hr_utility.raise_error;
90: End If;
91: Close C_Sel1;
92: --
85: --
86: -- The primary key is invalid therefore we must error
87: --
88: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
89: hr_utility.raise_error;
90: End If;
91: Close C_Sel1;
92: --
93: hr_utility.set_location(l_proc, 15);
89: hr_utility.raise_error;
90: End If;
91: Close C_Sel1;
92: --
93: hr_utility.set_location(l_proc, 15);
94: l_fct_ret := true;
95: End If;
96: End If;
97: hr_utility.set_location(' Leaving:'||l_proc, 20);
93: hr_utility.set_location(l_proc, 15);
94: l_fct_ret := true;
95: End If;
96: End If;
97: hr_utility.set_location(' Leaving:'||l_proc, 20);
98: Return (l_fct_ret);
99: --
100: End api_updating;
101: --
122: --
123: l_proc varchar2(72) := g_package||'lck';
124: --
125: Begin
126: hr_utility.set_location('Entering:'||l_proc, 5);
127: --
128: -- Add any mandatory argument checking here:
129: -- Example:
130: -- hr_api.mandatory_arg_error
138: Close C_Sel1;
139: --
140: -- The primary key is invalid therefore we must error
141: --
142: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
143: hr_utility.raise_error;
144: End If;
145: Close C_Sel1;
146: --
139: --
140: -- The primary key is invalid therefore we must error
141: --
142: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
143: hr_utility.raise_error;
144: End If;
145: Close C_Sel1;
146: --
147: --
144: End If;
145: Close C_Sel1;
146: --
147: --
148: hr_utility.set_location(' Leaving:'||l_proc, 10);
149: --
150: -- We need to trap the ORA LOCK exception
151: --
152: Exception
154: --
155: -- The object is locked therefore we need to supply a meaningful
156: -- error message.
157: --
158: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
159: hr_utility.set_message_token('TABLE_NAME', 'per_shared_types_tl');
160: hr_utility.raise_error;
161: End lck;
162: --
155: -- The object is locked therefore we need to supply a meaningful
156: -- error message.
157: --
158: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
159: hr_utility.set_message_token('TABLE_NAME', 'per_shared_types_tl');
160: hr_utility.raise_error;
161: End lck;
162: --
163: procedure ADD_LANGUAGE
156: -- error message.
157: --
158: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
159: hr_utility.set_message_token('TABLE_NAME', 'per_shared_types_tl');
160: hr_utility.raise_error;
161: End lck;
162: --
163: procedure ADD_LANGUAGE
164: is
236: l_proc varchar2(72) := g_package||'convert_args';
237: --
238: Begin
239: --
240: hr_utility.set_location('Entering:'||l_proc, 5);
241: --
242: -- Convert arguments into local l_rec structure.
243: --
244: l_rec.shared_type_id := p_shared_type_id;
247: l_rec.shared_type_name := p_shared_type_name;
248: --
249: -- Return the plsql record structure.
250: --
251: hr_utility.set_location(' Leaving:'||l_proc, 10);
252: Return(l_rec);
253: --
254: End convert_args;
255: --