DBA Data[Home] [Help]

APPS.EGO_VALIDATE_CATALOG_GROUP dependencies on ERROR_HANDLER

Line 25: g_token_tbl Error_Handler.Token_Tbl_Type;

21: -- 10-10-2002 Refai Farook Added Check_Entity procedure
22: -- 19-FEB-2003 Refai Farook Inactive Date validations (Check_Attributes)
23: ****************************************************************************/
24: G_Pkg_Name VARCHAR2(30) := 'EGO_Validate_Catalog_Group';
25: g_token_tbl Error_Handler.Token_Tbl_Type;
26:
27:
28: /*******************************************************************
29: * Procedure : Check_Existence

Line 34: ( x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

30: * Returns : None
31: * Purpose :
32: *********************************************************************/
33: PROCEDURE Check_Existence
34: ( x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
35: , x_return_status OUT NOCOPY VARCHAR2
36: )
37: IS
38: l_token_tbl Error_Handler.Token_Tbl_Type;

Line 38: l_token_tbl Error_Handler.Token_Tbl_Type;

34: ( x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
35: , x_return_status OUT NOCOPY VARCHAR2
36: )
37: IS
38: l_token_tbl Error_Handler.Token_Tbl_Type;
39: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
40: l_return_status VARCHAR2(1);
41: BEGIN
42: EGO_Catalog_Group_Util.Query_Row

Line 39: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

35: , x_return_status OUT NOCOPY VARCHAR2
36: )
37: IS
38: l_token_tbl Error_Handler.Token_Tbl_Type;
39: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
40: l_return_status VARCHAR2(1);
41: BEGIN
42: EGO_Catalog_Group_Util.Query_Row
43: (

Line 47: Error_Handler.Write_Debug('Query Row Returned with : ' || l_return_status);

43: (
44: x_mesg_token_tbl => l_mesg_token_tbl
45: , x_return_status => l_return_status
46: );
47: Error_Handler.Write_Debug('Query Row Returned with : ' || l_return_status);
48:
49: IF l_return_status = EGO_Globals.G_RECORD_FOUND AND
50: EGO_Globals.G_Catalog_Group_Rec.transaction_type = EGO_Globals.G_OPR_CREATE
51: THEN

Line 55: Error_Handler.Add_Error_Token

51: THEN
52: l_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
53: l_token_tbl(1).token_value :=
54: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
55: Error_Handler.Add_Error_Token
56: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
57: , p_application_id => 'EGO'
58: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
59: , p_message_name => 'EGO_CATGRP_ALREADY_EXISTS'

Line 70: Error_Handler.Add_Error_Token

66: THEN
67: l_token_tbl(1).token_name := 'CATALOG_GROUP_NAME';
68: l_token_tbl(1).token_value :=
69: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name;
70: Error_Handler.Add_Error_Token
71: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
72: , p_application_id => 'EGO'
73: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
74: , p_message_name => 'EGO_CATGRP_DOESNOT_EXIST'

Line 80: Error_Handler.Add_Error_Token

76: );
77: l_return_status := FND_API.G_RET_STS_ERROR;
78: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
79: THEN
80: Error_Handler.Add_Error_Token
81: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
82: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
83: , p_message_name => NULL
84: , p_application_id => 'EGO'

Line 122: ( x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

118: * Message Token Table
119: * Purpose : Checks if the user has the necessary privilege
120: *********************************************************************/
121: PROCEDURE Check_Access
122: ( x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
123: , x_return_status OUT NOCOPY VARCHAR2
124: )
125: IS
126: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

Line 127: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

123: , x_return_status OUT NOCOPY VARCHAR2
124: )
125: IS
126: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
127: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
128: l_token_tbl Error_Handler.Token_Tbl_Type;
129:
130: BEGIN
131: /* Code to be added for proper data security checks. */

Line 128: l_token_tbl Error_Handler.Token_Tbl_Type;

124: )
125: IS
126: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
127: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
128: l_token_tbl Error_Handler.Token_Tbl_Type;
129:
130: BEGIN
131: /* Code to be added for proper data security checks. */
132:

Line 136: Error_Handler.Write_Debug('Check Access returning with ' || l_return_status );

132:
133: x_return_status := l_return_status;
134: x_mesg_token_tbl := l_mesg_token_tbl;
135:
136: Error_Handler.Write_Debug('Check Access returning with ' || l_return_status );
137:
138: END Check_Access;
139:
140:

Line 154: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

150: * revised item attrbiute in its entirety.
151: **********************************************************************/
152: PROCEDURE Check_Attributes
153: ( x_return_status OUT NOCOPY VARCHAR2
154: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
155: )
156: IS
157: l_err_text VARCHAR2(2000) := NULL;
158: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

Line 158: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

154: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
155: )
156: IS
157: l_err_text VARCHAR2(2000) := NULL;
158: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
159: l_Token_Tbl Error_Handler.Token_Tbl_Type;
160: l_parent_inactive_date DATE;
161:
162: BEGIN

Line 159: l_Token_Tbl Error_Handler.Token_Tbl_Type;

155: )
156: IS
157: l_err_text VARCHAR2(2000) := NULL;
158: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
159: l_Token_Tbl Error_Handler.Token_Tbl_Type;
160: l_parent_inactive_date DATE;
161:
162: BEGIN
163:

Line 171: Error_Handler.Add_Error_Token

167: EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_id
168: )
169: THEN
170: x_return_status := FND_API.G_RET_STS_ERROR;
171: Error_Handler.Add_Error_Token
172: ( p_message_name => 'EGO_CATALOG_ID_SAMEAS_PARENT'
173: , p_application_id => 'EGO'
174: , x_mesg_token_tbl => l_mesg_token_tbl
175: );

Line 187: Error_Handler.Add_Error_Token

183: SELECT inactive_date INTO l_parent_inactive_date FROM mtl_item_catalog_groups_b
184: WHERE item_catalog_group_id = EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_id;
185: EXCEPTION WHEN OTHERS THEN
186: x_return_status := FND_API.G_RET_STS_ERROR;
187: Error_Handler.Add_Error_Token
188: ( p_message_name => 'EGO_CG_PARENT_NOT_FOUND'
189: , p_application_id => 'EGO'
190: , x_mesg_token_tbl => l_mesg_token_tbl
191: );

Line 210: Error_Handler.Add_Error_Token

206:
207: IF trunc(EGO_Globals.G_Catalog_Group_Rec.inactive_date) < trunc(SYSDATE)
208: THEN
209: x_return_status := FND_API.G_RET_STS_ERROR;
210: Error_Handler.Add_Error_Token
211: ( p_message_name => 'EGO_CG_ENDDATE_LESS_CURRDATE'
212: , p_application_id => 'EGO'
213: , x_mesg_token_tbl => l_mesg_token_tbl
214: );

Line 223: Error_Handler.Add_Error_Token

219: IF nvl(l_parent_inactive_date,EGO_Globals.G_Catalog_Group_Rec.inactive_date) <
220: EGO_Globals.G_Catalog_Group_Rec.inactive_date
221: THEN
222: x_return_status := FND_API.G_RET_STS_ERROR;
223: Error_Handler.Add_Error_Token
224: ( p_message_name => 'EGO_CG_ENDDATE_GREAT_PARENTDT'
225: , p_application_id => 'EGO'
226: , x_mesg_token_tbl => l_mesg_token_tbl
227: );

Line 239: Error_Handler.Add_Error_Token

235:
236: IF l_parent_inactive_date is NOT NULL
237: THEN
238: x_return_status := FND_API.G_RET_STS_ERROR;
239: Error_Handler.Add_Error_Token
240: ( p_message_name => 'EGO_CG_PARENT_HAS_ENDDATE'
241: , p_application_id => 'EGO'
242: , x_mesg_token_tbl => l_mesg_token_tbl
243: );

Line 248: Error_Handler.Write_Debug('Within Catalog Group Check Attributes . . . ');

244: END IF;
245:
246: END IF;
247:
248: Error_Handler.Write_Debug('Within Catalog Group Check Attributes . . . ');
249:
250: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
251:
252: END Check_Attributes;

Line 262: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

258: * Purpose :
259: **********************************************************************/
260: PROCEDURE Check_Required
261: ( x_return_status OUT NOCOPY VARCHAR2
262: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
263: )
264: IS
265: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
266: l_Token_Tbl Error_Handler.Token_Tbl_Type;

Line 265: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

261: ( x_return_status OUT NOCOPY VARCHAR2
262: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
263: )
264: IS
265: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
266: l_Token_Tbl Error_Handler.Token_Tbl_Type;
267: BEGIN
268: x_return_status := FND_API.G_RET_STS_SUCCESS;
269:

Line 266: l_Token_Tbl Error_Handler.Token_Tbl_Type;

262: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
263: )
264: IS
265: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
266: l_Token_Tbl Error_Handler.Token_Tbl_Type;
267: BEGIN
268: x_return_status := FND_API.G_RET_STS_SUCCESS;
269:
270:

Line 284: ( x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

280: * Return Status
281: * Purpose : Checks for duplicate segment values
282: *********************************************************************/
283: PROCEDURE Check_Entity
284: ( x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
285: , x_return_status OUT NOCOPY VARCHAR2
286: )
287: IS
288: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;

Line 289: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

285: , x_return_status OUT NOCOPY VARCHAR2
286: )
287: IS
288: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
289: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
290: l_Token_Tbl Error_Handler.Token_Tbl_Type;
291: l_ccid NUMBER;
292: BEGIN
293:

Line 290: l_Token_Tbl Error_Handler.Token_Tbl_Type;

286: )
287: IS
288: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
289: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
290: l_Token_Tbl Error_Handler.Token_Tbl_Type;
291: l_ccid NUMBER;
292: BEGIN
293:
294: /*

Line 317: Error_Handler.Add_Error_Token

313: l_ccid := NULL;
314:
315: WHEN OTHERS THEN
316: l_ccid := NULL;
317: Error_Handler.Add_Error_Token
318: ( p_message_text => 'Error in Check Entity : Catalog group name is '||EGO_Globals.G_Catalog_Group_Rec.Catalog_group_name||'/'||SQLERRM
319: , x_mesg_token_tbl => l_mesg_token_tbl
320: );
321: l_return_status := FND_API.G_RET_STS_ERROR;

Line 333: Error_Handler.Add_Error_Token

329: ( EGO_Globals.G_Catalog_Group_Rec.Transaction_Type = EGO_Globals.G_OPR_UPDATE AND
330: EGO_Globals.G_Catalog_Group_Rec.Catalog_group_id <> l_ccid )
331: THEN
332: -- dbms_output.put_line('Duplicate error in : '||EGO_Globals.G_Catalog_Group_Rec.Transaction_Type);
333: Error_Handler.Add_Error_Token
334: ( p_message_name => 'EGO_CATALOG_ALREADY_EXISTS'
335: , p_application_id => 'EGO'
336: , x_mesg_token_tbl => l_mesg_token_tbl
337: );

Line 350: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

346:
347:
348: PROCEDURE Check_Entity_Delete
349: ( x_return_status OUT NOCOPY VARCHAR2
350: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
351: )
352: IS
353: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
354: l_dummy VARCHAR2(1);

Line 353: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

349: ( x_return_status OUT NOCOPY VARCHAR2
350: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
351: )
352: IS
353: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
354: l_dummy VARCHAR2(1);
355: BEGIN
356:
357: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 368: Error_Handler.Add_Error_Token

364:
365: SELECT 'x' INTO l_dummy FROM dual WHERE EXISTS (SELECT null FROM mtl_system_items_b
366: WHERE item_catalog_group_id = EGO_Globals.G_Catalog_Group_Rec.Catalog_group_id);
367:
368: Error_Handler.Add_Error_Token
369: ( p_message_name => 'EGO_CATALOG_HAS_ITEMS'
370: , p_application_id => 'EGO'
371: , x_mesg_token_tbl => x_mesg_token_tbl
372: );

Line 383: Error_Handler.Add_Error_Token

379: Null;
380:
381: WHEN OTHERS
382: THEN
383: Error_Handler.Add_Error_Token
384: ( p_message_text => 'Error in Check Entity Delete : Catalog group name is '||EGO_Globals.G_Catalog_Group_Rec.Catalog_group_name||'/'||SQLERRM
385: , x_mesg_token_tbl => x_mesg_token_tbl
386: );
387: x_return_status := FND_API.G_RET_STS_ERROR;

Line 402: Error_Handler.Add_Error_Token

398: WHERE parent_catalog_group_id = EGO_Globals.G_Catalog_Group_Rec.Catalog_group_id);
399:
400: -- dbms_output.put_line('Found parent catalog group during delete');
401:
402: Error_Handler.Add_Error_Token
403: ( p_message_name => 'EGO_CATALOG_IS_PARENT'
404: , p_application_id => 'EGO'
405: , x_mesg_token_tbl => x_mesg_token_tbl
406: );

Line 417: Error_Handler.Add_Error_Token

413: Null;
414:
415: WHEN OTHERS
416: THEN
417: Error_Handler.Add_Error_Token
418: ( p_message_text => 'Error in Check Entity Delete : Catalog group name is '||EGO_Globals.G_Catalog_Group_Rec.Catalog_group_name||'/'||SQLERRM
419: , x_mesg_token_tbl => x_mesg_token_tbl
420: );
421: x_return_status := FND_API.G_RET_STS_ERROR;