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 = 'ASN_ON_ENRT_FLAG_FLG1') 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 = 'ASN_ON_ENRT_FLAG_FLG1') 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 = 'BEN_ENRT_RT_FK1') Then
34: -- hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'ASN_ON_ENRT_FLAG_FLG1') 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 = 'BEN_ENRT_RT_FK1') Then
42: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
35: --
36: If (p_constraint_name = 'ASN_ON_ENRT_FLAG_FLG1') 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 = 'BEN_ENRT_RT_FK1') 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 = 'ASN_ON_ENRT_FLAG_FLG1') 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 = 'BEN_ENRT_RT_FK1') 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 = 'BEN_ENRT_RT_FK1') 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 = 'BEN_ENRT_RT_FK3') Then
39: hr_utility.set_message_token('STEP','5');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'BEN_ENRT_RT_FK1') 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 = 'BEN_ENRT_RT_FK3') Then
47: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
40: hr_utility.raise_error;
41: ElsIf (p_constraint_name = 'BEN_ENRT_RT_FK1') 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 = 'BEN_ENRT_RT_FK3') 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 = 'BEN_ENRT_RT_FK1') 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 = 'BEN_ENRT_RT_FK3') 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 = 'BEN_ENRT_RT_FK3') 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 = 'BEN_ENRT_RT_PK') Then
44: hr_utility.set_message_token('STEP','10');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'BEN_ENRT_RT_FK3') 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 = 'BEN_ENRT_RT_PK') Then
52: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
45: hr_utility.raise_error;
46: ElsIf (p_constraint_name = 'BEN_ENRT_RT_FK3') 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 = 'BEN_ENRT_RT_PK') 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 = 'BEN_ENRT_RT_FK3') 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 = 'BEN_ENRT_RT_PK') 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 = 'BEN_ENRT_RT_PK') 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 = 'DFLT_FLAG_FLGA') Then
49: hr_utility.set_message_token('STEP','15');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'BEN_ENRT_RT_PK') 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 = 'DFLT_FLAG_FLGA') Then
57: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'BEN_ENRT_RT_PK') 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 = 'DFLT_FLAG_FLGA') 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 = 'BEN_ENRT_RT_PK') 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 = 'DFLT_FLAG_FLGA') 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 = 'DFLT_FLAG_FLGA') 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 = 'DFLT_PNDG_CTFN_FLAG_FLG1') Then
54: hr_utility.set_message_token('STEP','20');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'DFLT_FLAG_FLGA') 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 = 'DFLT_PNDG_CTFN_FLAG_FLG1') Then
62: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
55: hr_utility.raise_error;
56: ElsIf (p_constraint_name = 'DFLT_FLAG_FLGA') 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 = 'DFLT_PNDG_CTFN_FLAG_FLG1') 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 = 'DFLT_FLAG_FLGA') 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 = 'DFLT_PNDG_CTFN_FLAG_FLG1') 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 = 'DFLT_PNDG_CTFN_FLAG_FLG1') 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 = 'DSPLY_ON_ENRT_FLAG_FLGA') Then
59: hr_utility.set_message_token('STEP','25');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'DFLT_PNDG_CTFN_FLAG_FLG1') 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 = 'DSPLY_ON_ENRT_FLAG_FLGA') Then
67: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
60: hr_utility.raise_error;
61: ElsIf (p_constraint_name = 'DFLT_PNDG_CTFN_FLAG_FLG1') 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 = 'DSPLY_ON_ENRT_FLAG_FLGA') 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 = 'DFLT_PNDG_CTFN_FLAG_FLG1') 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 = 'DSPLY_ON_ENRT_FLAG_FLGA') 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 = 'DSPLY_ON_ENRT_FLAG_FLGA') 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 = 'ENTR_VAL_AT_ENRT_FLAG_FLG1') Then
64: hr_utility.set_message_token('STEP','30');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'DSPLY_ON_ENRT_FLAG_FLGA') 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 = 'ENTR_VAL_AT_ENRT_FLAG_FLG1') Then
72: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
65: hr_utility.raise_error;
66: ElsIf (p_constraint_name = 'DSPLY_ON_ENRT_FLAG_FLGA') 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 = 'ENTR_VAL_AT_ENRT_FLAG_FLG1') 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 = 'DSPLY_ON_ENRT_FLAG_FLGA') 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 = 'ENTR_VAL_AT_ENRT_FLAG_FLG1') 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 = 'ENTR_VAL_AT_ENRT_FLAG_FLG1') 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 = 'USE_TO_AL_NFC_FLAG_FLG1') Then
69: hr_utility.set_message_token('STEP','35');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'ENTR_VAL_AT_ENRT_FLAG_FLG1') 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 = 'USE_TO_AL_NFC_FLAG_FLG1') Then
77: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
70: hr_utility.raise_error;
71: ElsIf (p_constraint_name = 'ENTR_VAL_AT_ENRT_FLAG_FLG1') 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 = 'USE_TO_AL_NFC_FLAG_FLG1') 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 = 'ENTR_VAL_AT_ENRT_FLAG_FLG1') 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 = 'USE_TO_AL_NFC_FLAG_FLG1') 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 = 'USE_TO_AL_NFC_FLAG_FLG1') 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: Else
74: hr_utility.set_message_token('STEP','40');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'USE_TO_AL_NFC_FLAG_FLG1') 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: Else
82: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
75: hr_utility.raise_error;
76: ElsIf (p_constraint_name = 'USE_TO_AL_NFC_FLAG_FLG1') 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: Else
82: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
76: ElsIf (p_constraint_name = 'USE_TO_AL_NFC_FLAG_FLG1') 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: Else
82: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
78: hr_utility.set_message_token('PROCEDURE', l_proc);
79: hr_utility.set_message_token('STEP','45');
80: hr_utility.raise_error;
81: Else
82: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
85: hr_utility.raise_error;
86: End If;
79: hr_utility.set_message_token('STEP','45');
80: hr_utility.raise_error;
81: Else
82: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
85: hr_utility.raise_error;
86: End If;
87: --
80: hr_utility.raise_error;
81: Else
82: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
85: hr_utility.raise_error;
86: End If;
87: --
88: -- hr_utility.set_location(' Leaving:'||l_proc, 10);
81: Else
82: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
83: hr_utility.set_message_token('PROCEDURE', l_proc);
84: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
85: hr_utility.raise_error;
86: End If;
87: --
88: -- hr_utility.set_location(' Leaving:'||l_proc, 10);
89: End constraint_error;
84: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
85: hr_utility.raise_error;
86: End If;
87: --
88: -- hr_utility.set_location(' Leaving:'||l_proc, 10);
89: End constraint_error;
90: --
91: -- ----------------------------------------------------------------------------
92: -- |-----------------------------< api_updating >-----------------------------|
204: l_proc varchar2(72) := g_package||'api_updating';
205: l_fct_ret boolean;
206: --
207: Begin
208: hr_utility.set_location('Entering:'||l_proc, 5);
209: --
210: If (
211: p_enrt_rt_id is null and
212: p_object_version_number is null
220: If (
221: p_enrt_rt_id = g_old_rec.enrt_rt_id and
222: p_object_version_number = g_old_rec.object_version_number
223: ) Then
224: hr_utility.set_location(l_proc, 10);
225: --
226: -- The g_old_rec is current therefore we must
227: -- set the returning function to true
228: --
237: Close C_Sel1;
238: --
239: -- The primary key is invalid therefore we must error
240: --
241: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
242: hr_utility.raise_error;
243: End If;
244: Close C_Sel1;
245: If (p_object_version_number <> g_old_rec.object_version_number) Then
238: --
239: -- The primary key is invalid therefore we must error
240: --
241: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
242: hr_utility.raise_error;
243: End If;
244: Close C_Sel1;
245: If (p_object_version_number <> g_old_rec.object_version_number) Then
246: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
242: hr_utility.raise_error;
243: End If;
244: Close C_Sel1;
245: If (p_object_version_number <> g_old_rec.object_version_number) Then
246: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
247: hr_utility.raise_error;
248: End If;
249: hr_utility.set_location(l_proc, 15);
250: l_fct_ret := true;
243: End If;
244: Close C_Sel1;
245: If (p_object_version_number <> g_old_rec.object_version_number) Then
246: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
247: hr_utility.raise_error;
248: End If;
249: hr_utility.set_location(l_proc, 15);
250: l_fct_ret := true;
251: End If;
245: If (p_object_version_number <> g_old_rec.object_version_number) Then
246: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
247: hr_utility.raise_error;
248: End If;
249: hr_utility.set_location(l_proc, 15);
250: l_fct_ret := true;
251: End If;
252: End If;
253: hr_utility.set_location(' Leaving:'||l_proc, 20);
249: hr_utility.set_location(l_proc, 15);
250: l_fct_ret := true;
251: End If;
252: End If;
253: hr_utility.set_location(' Leaving:'||l_proc, 20);
254: Return (l_fct_ret);
255: --
256: End api_updating;
257: --
370: --
371: l_proc varchar2(72) := g_package||'lck';
372: --
373: Begin
374: hr_utility.set_location('Entering:'||l_proc, 5);
375: --
376: -- Add any mandatory argument checking here:
377: -- Example:
378: -- hr_api.mandatory_arg_error
386: Close C_Sel1;
387: --
388: -- The primary key is invalid therefore we must error
389: --
390: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
391: hr_utility.raise_error;
392: End If;
393: Close C_Sel1;
394: If (p_object_version_number <> g_old_rec.object_version_number) Then
387: --
388: -- The primary key is invalid therefore we must error
389: --
390: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
391: hr_utility.raise_error;
392: End If;
393: Close C_Sel1;
394: If (p_object_version_number <> g_old_rec.object_version_number) Then
395: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
391: hr_utility.raise_error;
392: End If;
393: Close C_Sel1;
394: If (p_object_version_number <> g_old_rec.object_version_number) Then
395: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
396: hr_utility.raise_error;
397: End If;
398: --
399: hr_utility.set_location(' Leaving:'||l_proc, 10);
392: End If;
393: Close C_Sel1;
394: If (p_object_version_number <> g_old_rec.object_version_number) Then
395: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
396: hr_utility.raise_error;
397: End If;
398: --
399: hr_utility.set_location(' Leaving:'||l_proc, 10);
400: --
395: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
396: hr_utility.raise_error;
397: End If;
398: --
399: hr_utility.set_location(' Leaving:'||l_proc, 10);
400: --
401: -- We need to trap the ORA LOCK exception
402: --
403: Exception
405: --
406: -- The object is locked therefore we need to supply a meaningful
407: -- error message.
408: --
409: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
410: hr_utility.set_message_token('TABLE_NAME', 'ben_enrt_rt');
411: hr_utility.raise_error;
412: End lck;
413: --
406: -- The object is locked therefore we need to supply a meaningful
407: -- error message.
408: --
409: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
410: hr_utility.set_message_token('TABLE_NAME', 'ben_enrt_rt');
411: hr_utility.raise_error;
412: End lck;
413: --
414: -- ----------------------------------------------------------------------------
407: -- error message.
408: --
409: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
410: hr_utility.set_message_token('TABLE_NAME', 'ben_enrt_rt');
411: hr_utility.raise_error;
412: End lck;
413: --
414: -- ----------------------------------------------------------------------------
415: -- |-----------------------------< convert_args >-----------------------------|
519: l_proc varchar2(72) := g_package||'convert_args';
520: --
521: Begin
522: --
523: hr_utility.set_location('Entering:'||l_proc, 5);
524: --
525: -- Convert arguments into local l_rec structure.
526: --
527: l_rec.enrt_rt_id := p_enrt_rt_id;
622: l_rec.object_version_number := p_object_version_number;
623: --
624: -- Return the plsql record structure.
625: --
626: hr_utility.set_location(' Leaving:'||l_proc, 10);
627: Return(l_rec);
628: --
629: End convert_args;
630: --