16: --
17: l_proc varchar2(72) := g_package||'constraint_error';
18: --
19: Begin
20: hr_utility.set_location('Entering:'||l_proc, 5);
21: --
22: If (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTES_PK') Then
23: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
19: Begin
20: hr_utility.set_location('Entering:'||l_proc, 5);
21: --
22: If (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTES_PK') Then
23: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK1') Then
20: hr_utility.set_location('Entering:'||l_proc, 5);
21: --
22: If (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTES_PK') Then
23: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK1') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
21: --
22: If (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTES_PK') Then
23: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK1') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
22: If (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTES_PK') Then
23: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK1') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK1') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK2') Then
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK1') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK2') Then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK1') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK2') Then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
27: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK1') Then
28: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK2') Then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK2') Then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK4') Then
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK2') Then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK4') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK2') Then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK4') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
32: ElsIf (p_constraint_name = 'PQH_TXN_CATEGORY_ATTRIBUTE_FK2') Then
33: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK4') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK4') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK5') Then
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK4') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK5') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK4') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK5') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
37: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK4') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK5') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK5') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: Else
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK5') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: Else
48: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK5') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: Else
48: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
42: ElsIf (p_constraint_name = 'PQH_TXN_CAT_ATTRIBUTES_FK5') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: Else
48: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: Else
48: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
51: hr_utility.raise_error;
52: End If;
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: Else
48: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
51: hr_utility.raise_error;
52: End If;
53: --
46: hr_utility.raise_error;
47: Else
48: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
51: hr_utility.raise_error;
52: End If;
53: --
54: hr_utility.set_location(' Leaving:'||l_proc, 10);
47: Else
48: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
51: hr_utility.raise_error;
52: End If;
53: --
54: hr_utility.set_location(' Leaving:'||l_proc, 10);
55: End constraint_error;
50: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
51: hr_utility.raise_error;
52: End If;
53: --
54: hr_utility.set_location(' Leaving:'||l_proc, 10);
55: End constraint_error;
56: --
57: -- ----------------------------------------------------------------------------
58: -- |-----------------------------< api_updating >-----------------------------|
87: l_proc varchar2(72) := g_package||'api_updating';
88: l_fct_ret boolean;
89: --
90: Begin
91: hr_utility.set_location('Entering:'||l_proc, 5);
92: --
93: If (
94: p_txn_category_attribute_id is null and
95: p_object_version_number is null
103: If (
104: p_txn_category_attribute_id = g_old_rec.txn_category_attribute_id and
105: p_object_version_number = g_old_rec.object_version_number
106: ) Then
107: hr_utility.set_location(l_proc, 10);
108: --
109: -- The g_old_rec is current therefore we must
110: -- set the returning function to true
111: --
120: Close C_Sel1;
121: --
122: -- The primary key is invalid therefore we must error
123: --
124: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
125: hr_utility.raise_error;
126: End If;
127: Close C_Sel1;
128: If (p_object_version_number <> g_old_rec.object_version_number) Then
121: --
122: -- The primary key is invalid therefore we must error
123: --
124: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
125: hr_utility.raise_error;
126: End If;
127: Close C_Sel1;
128: If (p_object_version_number <> g_old_rec.object_version_number) Then
129: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
125: hr_utility.raise_error;
126: End If;
127: Close C_Sel1;
128: If (p_object_version_number <> g_old_rec.object_version_number) Then
129: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
130: hr_utility.raise_error;
131: End If;
132: hr_utility.set_location(l_proc, 15);
133: l_fct_ret := true;
126: End If;
127: Close C_Sel1;
128: If (p_object_version_number <> g_old_rec.object_version_number) Then
129: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
130: hr_utility.raise_error;
131: End If;
132: hr_utility.set_location(l_proc, 15);
133: l_fct_ret := true;
134: End If;
128: If (p_object_version_number <> g_old_rec.object_version_number) Then
129: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
130: hr_utility.raise_error;
131: End If;
132: hr_utility.set_location(l_proc, 15);
133: l_fct_ret := true;
134: End If;
135: End If;
136: hr_utility.set_location(' Leaving:'||l_proc, 20);
132: hr_utility.set_location(l_proc, 15);
133: l_fct_ret := true;
134: End If;
135: End If;
136: hr_utility.set_location(' Leaving:'||l_proc, 20);
137: Return (l_fct_ret);
138: --
139: End api_updating;
140: --
169: --
170: l_proc varchar2(72) := g_package||'lck';
171: --
172: Begin
173: hr_utility.set_location('Entering:'||l_proc, 5);
174: --
175: -- Add any mandatory argument checking here:
176: -- Example:
177: -- hr_api.mandatory_arg_error
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: --
198: hr_utility.set_location(' Leaving:'||l_proc, 10);
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: --
198: hr_utility.set_location(' Leaving:'||l_proc, 10);
199: --
194: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
195: hr_utility.raise_error;
196: End If;
197: --
198: hr_utility.set_location(' Leaving:'||l_proc, 10);
199: --
200: -- We need to trap the ORA LOCK exception
201: --
202: Exception
204: --
205: -- The object is locked therefore we need to supply a meaningful
206: -- error message.
207: --
208: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
209: hr_utility.set_message_token('TABLE_NAME', 'pqh_txn_category_attributes');
210: hr_utility.raise_error;
211: End lck;
212: --
205: -- The object is locked therefore we need to supply a meaningful
206: -- error message.
207: --
208: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
209: hr_utility.set_message_token('TABLE_NAME', 'pqh_txn_category_attributes');
210: hr_utility.raise_error;
211: End lck;
212: --
213: -- ----------------------------------------------------------------------------
206: -- error message.
207: --
208: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
209: hr_utility.set_message_token('TABLE_NAME', 'pqh_txn_category_attributes');
210: hr_utility.raise_error;
211: End lck;
212: --
213: -- ----------------------------------------------------------------------------
214: -- |-----------------------------< convert_args >-----------------------------|
235: l_proc varchar2(72) := g_package||'convert_args';
236: --
237: Begin
238: --
239: hr_utility.set_location('Entering:'||l_proc, 5);
240: --
241: -- Convert arguments into local l_rec structure.
242: --
243: l_rec.txn_category_attribute_id := p_txn_category_attribute_id;
255: l_rec.value_style_cd := p_value_style_cd;
256: --
257: -- Return the plsql record structure.
258: --
259: hr_utility.set_location(' Leaving:'||l_proc, 10);
260: Return(l_rec);
261: --
262: End convert_args;
263: --