DBA Data[Home] [Help]

APPS.AK_OBJECT_PVT dependencies on FND_MSG_PUB

Line 330: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

326: --** check that key columns are not null and not missing **
327: if ((p_database_object_name is null) or
328: (p_database_object_name = FND_API.G_MISS_CHAR)) then
329: l_error := TRUE;
330: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
331: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
332: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
333: FND_MSG_PUB.Add;
334: end if;

Line 333: FND_MSG_PUB.Add;

329: l_error := TRUE;
330: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
331: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
332: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
333: FND_MSG_PUB.Add;
334: end if;
335: end if;
336:
337: if ((p_attribute_application_id is null) or

Line 341: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

337: if ((p_attribute_application_id is null) or
338: (p_attribute_application_id = FND_API.G_MISS_NUM)) then
339: l_error := TRUE;
340: -- dbms_output.put_line('Attribute Application ID cannot be null');
341: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
342: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
343: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
344: FND_MSG_PUB.Add;
345: end if;

Line 344: FND_MSG_PUB.Add;

340: -- dbms_output.put_line('Attribute Application ID cannot be null');
341: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
342: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
343: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
344: FND_MSG_PUB.Add;
345: end if;
346: end if;
347:
348: if ((p_attribute_code is null) or

Line 352: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

348: if ((p_attribute_code is null) or
349: (p_attribute_code = FND_API.G_MISS_CHAR)) then
350: l_error := TRUE;
351: -- dbms_output.put_line('Attribute Code cannot be null');
352: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
353: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
354: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
355: FND_MSG_PUB.Add;
356: end if;

Line 355: FND_MSG_PUB.Add;

351: -- dbms_output.put_line('Attribute Code cannot be null');
352: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
353: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
354: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
355: FND_MSG_PUB.Add;
356: end if;
357: end if;
358:
359: -- - Check that the parent object exists

Line 370: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

366: p_api_version_number => 1.0,
367: p_return_status => l_return_status,
368: p_database_object_name => p_database_object_name)) then
369: l_error := TRUE;
370: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
371: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OBJECT_REFERENCE');
372: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
373: FND_MSG_PUB.Add;
374: end if;

Line 373: FND_MSG_PUB.Add;

369: l_error := TRUE;
370: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
371: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OBJECT_REFERENCE');
372: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
373: FND_MSG_PUB.Add;
374: end if;
375: -- dbms_output.put_line('Parent object does not exist!');
376: end if;
377: end if;

Line 386: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

382: p_return_status => l_return_status,
383: p_attribute_application_id => p_attribute_application_id,
384: p_attribute_code => p_attribute_code) ) then
385: l_error := TRUE;
386: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
387: FND_MESSAGE.SET_NAME('AK','AK_INVALID_ATTR_REFERENCE');
388: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_attribute_application_id) ||
389: ' ' || p_attribute_code);
390: FND_MSG_PUB.Add;

Line 390: FND_MSG_PUB.Add;

386: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
387: FND_MESSAGE.SET_NAME('AK','AK_INVALID_ATTR_REFERENCE');
388: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_attribute_application_id) ||
389: ' ' || p_attribute_code);
390: FND_MSG_PUB.Add;
391: end if;
392: -- dbms_output.put_line('Attribute referenced does not exist!');
393: end if;
394:

Line 403: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

399: (p_data_source_type = FND_API.G_MISS_CHAR and
400: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
401: then
402: l_error := TRUE;
403: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
404: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
405: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATA_SOURCE_TYPE');
406: FND_MSG_PUB.Add;
407: end if;

Line 406: FND_MSG_PUB.Add;

402: l_error := TRUE;
403: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
404: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
405: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATA_SOURCE_TYPE');
406: FND_MSG_PUB.Add;
407: end if;
408: end if;
409:
410: if ((p_required_flag is null) or

Line 415: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

411: (p_required_flag = FND_API.G_MISS_CHAR and
412: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
413: then
414: l_error := TRUE;
415: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
416: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
417: FND_MESSAGE.SET_TOKEN('COLUMN', 'REQUIRED_FLAG');
418: FND_MSG_PUB.Add;
419: end if;

Line 418: FND_MSG_PUB.Add;

414: l_error := TRUE;
415: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
416: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
417: FND_MESSAGE.SET_TOKEN('COLUMN', 'REQUIRED_FLAG');
418: FND_MSG_PUB.Add;
419: end if;
420: end if;
421:
422: if ((p_attribute_label_length is null) or

Line 427: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

423: (p_attribute_label_length = FND_API.G_MISS_NUM and
424: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
425: then
426: l_error := TRUE;
427: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
428: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
429: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_LABEL_LENGTH');
430: FND_MSG_PUB.Add;
431: end if;

Line 430: FND_MSG_PUB.Add;

426: l_error := TRUE;
427: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
428: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
429: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_LABEL_LENGTH');
430: FND_MSG_PUB.Add;
431: end if;
432: end if;
433:
434: if ((p_display_value_length is null) or

Line 439: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

435: (p_display_value_length = FND_API.G_MISS_NUM and
436: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
437: then
438: l_error := TRUE;
439: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
440: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
441: FND_MESSAGE.SET_TOKEN('COLUMN', 'DISPLAY_VALUE_LENGTH');
442: FND_MSG_PUB.Add;
443: end if;

Line 442: FND_MSG_PUB.Add;

438: l_error := TRUE;
439: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
440: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
441: FND_MESSAGE.SET_TOKEN('COLUMN', 'DISPLAY_VALUE_LENGTH');
442: FND_MSG_PUB.Add;
443: end if;
444: end if;
445:
446: if ((p_bold is null) or

Line 450: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

446: if ((p_bold is null) or
447: (p_bold = FND_API.G_MISS_CHAR and
448: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
449: l_error := TRUE;
450: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
451: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
452: FND_MESSAGE.SET_TOKEN('COLUMN', 'BOLD');
453: FND_MSG_PUB.Add;
454: end if;

Line 453: FND_MSG_PUB.Add;

449: l_error := TRUE;
450: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
451: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
452: FND_MESSAGE.SET_TOKEN('COLUMN', 'BOLD');
453: FND_MSG_PUB.Add;
454: end if;
455: end if;
456:
457: if ((p_italic is null) or

Line 461: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

457: if ((p_italic is null) or
458: (p_italic = FND_API.G_MISS_CHAR and
459: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
460: l_error := TRUE;
461: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
462: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
463: FND_MESSAGE.SET_TOKEN('COLUMN', 'ITALIC');
464: FND_MSG_PUB.Add;
465: end if;

Line 464: FND_MSG_PUB.Add;

460: l_error := TRUE;
461: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
462: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
463: FND_MESSAGE.SET_TOKEN('COLUMN', 'ITALIC');
464: FND_MSG_PUB.Add;
465: end if;
466: end if;
467:
468: if ((p_vertical_alignment is null) or

Line 473: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

469: (p_vertical_alignment = FND_API.G_MISS_CHAR and
470: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
471: then
472: l_error := TRUE;
473: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
474: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
475: FND_MESSAGE.SET_TOKEN('COLUMN', 'VERTICAL_ALIGNMENT');
476: FND_MSG_PUB.Add;
477: end if;

Line 476: FND_MSG_PUB.Add;

472: l_error := TRUE;
473: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
474: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
475: FND_MESSAGE.SET_TOKEN('COLUMN', 'VERTICAL_ALIGNMENT');
476: FND_MSG_PUB.Add;
477: end if;
478: end if;
479:
480: if ((p_horizontal_alignment is null) or

Line 485: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

481: (p_horizontal_alignment = FND_API.G_MISS_CHAR and
482: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
483: then
484: l_error := TRUE;
485: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
486: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
487: FND_MESSAGE.SET_TOKEN('COLUMN', 'HORIZONTAL_ALIGNMENT');
488: FND_MSG_PUB.Add;
489: end if;

Line 488: FND_MSG_PUB.Add;

484: l_error := TRUE;
485: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
486: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
487: FND_MESSAGE.SET_TOKEN('COLUMN', 'HORIZONTAL_ALIGNMENT');
488: FND_MSG_PUB.Add;
489: end if;
490: end if;
491:
492: --** Validate columns **

Line 502: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

498: p_return_status => l_return_status,
499: p_lookup_type => 'DATA_SOURCE_TYPE',
500: p_lookup_code => p_data_source_type)) then
501: l_error := TRUE;
502: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
503: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
504: FND_MESSAGE.SET_TOKEN('COLUMN','DATA_SOURCE_TYPE');
505: FND_MSG_PUB.Add;
506: end if;

Line 505: FND_MSG_PUB.Add;

501: l_error := TRUE;
502: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
503: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
504: FND_MESSAGE.SET_TOKEN('COLUMN','DATA_SOURCE_TYPE');
505: FND_MSG_PUB.Add;
506: end if;
507: end if;
508: end if;
509:

Line 519: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

515: p_return_status => l_return_status,
516: p_lookup_type => 'DATA_STORAGE_TYPE',
517: p_lookup_code => p_data_storage_type)) then
518: l_error := TRUE;
519: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
520: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
521: FND_MESSAGE.SET_TOKEN('COLUMN','DATA_STORAGE_TYPE');
522: FND_MSG_PUB.Add;
523: end if;

Line 522: FND_MSG_PUB.Add;

518: l_error := TRUE;
519: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
520: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
521: FND_MESSAGE.SET_TOKEN('COLUMN','DATA_STORAGE_TYPE');
522: FND_MSG_PUB.Add;
523: end if;
524: end if;
525: end if;
526:

Line 535: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

531: -- flag an error only during download
532: if ( AK_ON_OBJECTS_PUB.G_LOAD_MODE = 'DOWNLOAD' or p_pass = 1) then
533: l_error := TRUE;
534: end if;
535: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
536: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
537: FND_MESSAGE.SET_TOKEN('COLUMN','TABLE_NAME');
538: FND_MSG_PUB.Add;
539: end if;

Line 538: FND_MSG_PUB.Add;

534: end if;
535: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
536: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
537: FND_MESSAGE.SET_TOKEN('COLUMN','TABLE_NAME');
538: FND_MSG_PUB.Add;
539: end if;
540: end if;
541: end if;
542:

Line 551: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

547: -- flag an error only during download
548: if ( AK_ON_OBJECTS_PUB.G_LOAD_MODE = 'DOWNLOAD' or p_pass = 1 ) then
549: l_error := TRUE;
550: end if;
551: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
552: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
553: FND_MESSAGE.SET_TOKEN('COLUMN','BASE_TABLE_COLUMN_NAME');
554: FND_MSG_PUB.Add;
555: end if;

Line 554: FND_MSG_PUB.Add;

550: end if;
551: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
552: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
553: FND_MESSAGE.SET_TOKEN('COLUMN','BASE_TABLE_COLUMN_NAME');
554: FND_MSG_PUB.Add;
555: end if;
556: end if;
557: end if;
558:

Line 563: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

559: -- - required_flag
560: if (p_required_flag <> FND_API.G_MISS_CHAR) then
561: if (NOT AK_ON_OBJECTS_PVT.VALID_YES_NO(p_required_flag)) then
562: l_error := TRUE;
563: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
564: FND_MESSAGE.SET_NAME('AK','AK_VALUE_NOT_YES_NO');
565: FND_MESSAGE.SET_TOKEN('COLUMN','REQUIRED_FLAG');
566: FND_MSG_PUB.Add;
567: end if;

Line 566: FND_MSG_PUB.Add;

562: l_error := TRUE;
563: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
564: FND_MESSAGE.SET_NAME('AK','AK_VALUE_NOT_YES_NO');
565: FND_MESSAGE.SET_TOKEN('COLUMN','REQUIRED_FLAG');
566: FND_MSG_PUB.Add;
567: end if;
568: end if;
569: end if;
570:

Line 582: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

578: p_return_status => l_return_status,
579: p_region_application_id => p_lov_region_application_id,
580: p_region_code => p_lov_region_code)) then
581: l_error := TRUE;
582: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
583: FND_MESSAGE.SET_NAME('AK','AK_LOV_REG_DOES_NOT_EXIST');
584: FND_MSG_PUB.Add;
585: end if;
586: end if; /* if REGION_EXISTS */

Line 584: FND_MSG_PUB.Add;

580: p_region_code => p_lov_region_code)) then
581: l_error := TRUE;
582: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
583: FND_MESSAGE.SET_NAME('AK','AK_LOV_REG_DOES_NOT_EXIST');
584: FND_MSG_PUB.Add;
585: end if;
586: end if; /* if REGION_EXISTS */
587: end if;
588:

Line 602: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

598: p_region_code => p_lov_region_code,
599: p_attribute_application_id => p_lov_attribute_application_id,
600: p_attribute_code => p_lov_attribute_code)) then
601: l_error := TRUE;
602: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
603: FND_MESSAGE.SET_NAME('AK','AK_INVALID_LOV_ITEM_REFERENCE');
604: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_lov_attribute_application_id) ||
605: ' ' || p_lov_attribute_code);
606: FND_MSG_PUB.Add;

Line 606: FND_MSG_PUB.Add;

602: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
603: FND_MESSAGE.SET_NAME('AK','AK_INVALID_LOV_ITEM_REFERENCE');
604: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_lov_attribute_application_id) ||
605: ' ' || p_lov_attribute_code);
606: FND_MSG_PUB.Add;
607: end if;
608: end if;
609: end if;
610:

Line 619: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

615: p_api_version_number => 1.0,
616: p_return_status => l_return_status,
617: p_foreign_key_name => p_lov_foreign_key_name)) then
618: l_error := TRUE;
619: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
620: FND_MESSAGE.SET_NAME('AK','AK_INVALID_LOV_FK_REFERENCE');
621: FND_MESSAGE.SET_TOKEN('KEY', p_lov_foreign_key_name);
622: FND_MSG_PUB.Add;
623: end if;

Line 622: FND_MSG_PUB.Add;

618: l_error := TRUE;
619: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
620: FND_MESSAGE.SET_NAME('AK','AK_INVALID_LOV_FK_REFERENCE');
621: FND_MESSAGE.SET_TOKEN('KEY', p_lov_foreign_key_name);
622: FND_MSG_PUB.Add;
623: end if;
624: end if;
625: end if; /* if p_lov_foreign_key_name */
626:

Line 631: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

627: -- - bold
628: if (p_bold <> FND_API.G_MISS_CHAR) then
629: if (NOT AK_ON_OBJECTS_PVT.VALID_YES_NO(p_bold)) then
630: l_error := TRUE;
631: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
632: FND_MESSAGE.SET_NAME('AK','AK_VALUE_NOT_YES_NO');
633: FND_MESSAGE.SET_TOKEN('COLUMN','BOLD');
634: FND_MSG_PUB.Add;
635: end if;

Line 634: FND_MSG_PUB.Add;

630: l_error := TRUE;
631: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
632: FND_MESSAGE.SET_NAME('AK','AK_VALUE_NOT_YES_NO');
633: FND_MESSAGE.SET_TOKEN('COLUMN','BOLD');
634: FND_MSG_PUB.Add;
635: end if;
636: end if;
637: end if;
638:

Line 643: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

639: -- - italic
640: if (p_italic <> FND_API.G_MISS_CHAR) then
641: if (NOT AK_ON_OBJECTS_PVT.VALID_YES_NO(p_italic)) then
642: l_error := TRUE;
643: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
644: FND_MESSAGE.SET_NAME('AK','AK_VALUE_NOT_YES_NO');
645: FND_MESSAGE.SET_TOKEN('COLUMN','ITALIC');
646: FND_MSG_PUB.Add;
647: end if;

Line 646: FND_MSG_PUB.Add;

642: l_error := TRUE;
643: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
644: FND_MESSAGE.SET_NAME('AK','AK_VALUE_NOT_YES_NO');
645: FND_MESSAGE.SET_TOKEN('COLUMN','ITALIC');
646: FND_MSG_PUB.Add;
647: end if;
648: end if;
649: end if;
650:

Line 659: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

655: p_column_name => p_column_name) ) then
656: if ( AK_ON_OBJECTS_PUB.G_LOAD_MODE = 'DOWNLOAD' or p_pass = 1 ) then
657: l_error := TRUE;
658: end if;
659: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
660: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN');
661: FND_MESSAGE.SET_TOKEN('COLUMN',p_column_name);
662: FND_MESSAGE.SET_TOKEN('OBJECT',p_database_object_name);
663: FND_MSG_PUB.Add;

Line 663: FND_MSG_PUB.Add;

659: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
660: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN');
661: FND_MESSAGE.SET_TOKEN('COLUMN',p_column_name);
662: FND_MESSAGE.SET_TOKEN('OBJECT',p_database_object_name);
663: FND_MSG_PUB.Add;
664: end if;
665: -- dbms_output.put_line('Column name not in this database object');
666: end if;
667: end if;

Line 677: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

673: p_return_status => l_return_status,
674: p_lookup_type => 'VERTICAL_ALIGNMENT',
675: p_lookup_code => p_vertical_alignment)) then
676: l_error := TRUE;
677: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
678: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
679: FND_MESSAGE.SET_TOKEN('COLUMN','VERTICAL_ALIGNMENT');
680: FND_MSG_PUB.Add;
681: end if;

Line 680: FND_MSG_PUB.Add;

676: l_error := TRUE;
677: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
678: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
679: FND_MESSAGE.SET_TOKEN('COLUMN','VERTICAL_ALIGNMENT');
680: FND_MSG_PUB.Add;
681: end if;
682: end if;
683: end if;
684:

Line 693: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

689: p_return_status => l_return_status,
690: p_lookup_type => 'HORIZONTAL_ALIGNMENT',
691: p_lookup_code => p_horizontal_alignment)) then
692: l_error := TRUE;
693: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
694: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
695: FND_MESSAGE.SET_TOKEN('COLUMN','HORIZONTAL_ALIGNMENT');
696: FND_MSG_PUB.Add;
697: end if;

Line 696: FND_MSG_PUB.Add;

692: l_error := TRUE;
693: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
694: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
695: FND_MESSAGE.SET_TOKEN('COLUMN','HORIZONTAL_ALIGNMENT');
696: FND_MSG_PUB.Add;
697: end if;
698: end if;
699: end if;
700:

Line 711: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

707: p_return_status := FND_API.G_RET_STS_ERROR;
708: return FALSE;
709: WHEN OTHERS THEN
710: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
712: SUBSTR (SQLERRM, 1, 240) );
713: FND_MSG_PUB.Add;
714: return FALSE;
715:

Line 713: FND_MSG_PUB.Add;

709: WHEN OTHERS THEN
710: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
712: SUBSTR (SQLERRM, 1, 240) );
713: FND_MSG_PUB.Add;
714: return FALSE;
715:
716: end VALIDATE_ATTRIBUTE;
717:

Line 805: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

801: --** VALUE_NUMBER must be non-null.
802: if ((p_database_object_name is null) or
803: (p_database_object_name = FND_API.G_MISS_CHAR)) then
804: l_error := TRUE;
805: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
806: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
807: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
808: FND_MSG_PUB.Add;
809: end if;

Line 808: FND_MSG_PUB.Add;

804: l_error := TRUE;
805: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
806: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
807: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
808: FND_MSG_PUB.Add;
809: end if;
810: end if;
811:
812: if ((p_attribute_application_id is null) or

Line 815: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

811:
812: if ((p_attribute_application_id is null) or
813: (p_attribute_application_id = FND_API.G_MISS_NUM)) then
814: l_error := TRUE;
815: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
816: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
817: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
818: FND_MSG_PUB.Add;
819: end if;

Line 818: FND_MSG_PUB.Add;

814: l_error := TRUE;
815: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
816: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
817: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
818: FND_MSG_PUB.Add;
819: end if;
820: end if;
821:
822: if ((p_attribute_code is null) or

Line 825: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

821:
822: if ((p_attribute_code is null) or
823: (p_attribute_code = FND_API.G_MISS_CHAR)) then
824: l_error := TRUE;
825: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
826: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
827: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
828: FND_MSG_PUB.Add;
829: end if;

Line 828: FND_MSG_PUB.Add;

824: l_error := TRUE;
825: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
826: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
827: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
828: FND_MSG_PUB.Add;
829: end if;
830: end if;
831:
832: l_count := 0;

Line 847: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

843: l_count := l_count + 1;
844: end if;
845: if (l_count <> 1) then
846: l_error := TRUE;
847: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
848: FND_MESSAGE.SET_NAME('AK','AK_ONE_VALUE_ONLY');
849: FND_MSG_PUB.Add;
850: end if;
851: -- dbms_output.put_line('One and only one of value_vachar2, value_number' ||

Line 849: FND_MSG_PUB.Add;

845: if (l_count <> 1) then
846: l_error := TRUE;
847: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
848: FND_MESSAGE.SET_NAME('AK','AK_ONE_VALUE_ONLY');
849: FND_MSG_PUB.Add;
850: end if;
851: -- dbms_output.put_line('One and only one of value_vachar2, value_number' ||
852: -- ' and value_date must be non-null');
853: end if;

Line 863: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

859: fetch l_check_objattr_csr into l_dummy;
860: if (l_check_objattr_csr%notfound) then
861: close l_check_objattr_csr;
862: l_error := TRUE;
863: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
864: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OA_REFERENCE');
865: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
866: ' ' || to_char(p_attribute_application_id) ||
867: ' ' || p_attribute_code);

Line 868: FND_MSG_PUB.Add;

864: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OA_REFERENCE');
865: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
866: ' ' || to_char(p_attribute_application_id) ||
867: ' ' || p_attribute_code);
868: FND_MSG_PUB.Add;
869: end if;
870: -- dbms_output.put_line('Parent object attribute does not exist!');
871: else
872: close l_check_objattr_csr;

Line 880: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

876: close l_check_datatype_csr;
877: if (upper(l_data_type) = 'VARCHAR2') then
878: if (p_value_date is not null) or (p_value_number is not null) then
879: l_error := TRUE;
880: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
881: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
882: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_DATE');
883: FND_MSG_PUB.Add;
884: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');

Line 883: FND_MSG_PUB.Add;

879: l_error := TRUE;
880: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
881: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
882: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_DATE');
883: FND_MSG_PUB.Add;
884: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
885: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_NUMBER');
886: FND_MSG_PUB.Add;
887: end if;

Line 886: FND_MSG_PUB.Add;

882: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_DATE');
883: FND_MSG_PUB.Add;
884: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
885: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_NUMBER');
886: FND_MSG_PUB.Add;
887: end if;
888: -- dbms_output.put_line('value_date and value_number must be null');
889: end if;
890: elsif (upper(l_data_type) = 'NUMBER') then

Line 893: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

889: end if;
890: elsif (upper(l_data_type) = 'NUMBER') then
891: if (p_value_date is not null) or (p_value_varchar2 is not null) then
892: l_error := TRUE;
893: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
894: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
895: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_DATE');
896: FND_MSG_PUB.Add;
897: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');

Line 896: FND_MSG_PUB.Add;

892: l_error := TRUE;
893: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
894: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
895: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_DATE');
896: FND_MSG_PUB.Add;
897: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
898: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_VARCHAR2');
899: FND_MSG_PUB.Add;
900: end if;

Line 899: FND_MSG_PUB.Add;

895: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_DATE');
896: FND_MSG_PUB.Add;
897: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
898: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_VARCHAR2');
899: FND_MSG_PUB.Add;
900: end if;
901: -- dbms_output.put_line('value_date and value_varchar2 must be null');
902: end if;
903: elsif ( (upper(l_data_type) = 'DATE') or

Line 907: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

903: elsif ( (upper(l_data_type) = 'DATE') or
904: (upper(l_data_type) = 'DATETIME') )then
905: if (p_value_number is not null) or (p_value_varchar2 is not null) then
906: l_error := TRUE;
907: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
908: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
909: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_NUMBER');
910: FND_MSG_PUB.Add;
911: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');

Line 910: FND_MSG_PUB.Add;

906: l_error := TRUE;
907: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
908: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
909: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_NUMBER');
910: FND_MSG_PUB.Add;
911: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
912: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_VARCHAR2');
913: FND_MSG_PUB.Add;
914: end if;

Line 913: FND_MSG_PUB.Add;

909: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_NUMBER');
910: FND_MSG_PUB.Add;
911: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
912: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_VARCHAR2');
913: FND_MSG_PUB.Add;
914: end if;
915: -- dbms_output.put_line('value_number and value_varchar2 must be null');
916: end if;
917: end if;

Line 927: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

923: (p_to_region_appl_id = FND_API.G_MISS_NUM and
924: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
925: then
926: l_error := TRUE;
927: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
928: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
929: FND_MESSAGE.SET_TOKEN('COLUMN', 'TO_REGION_APPL_ID');
930: FND_MSG_PUB.Add;
931: end if;

Line 930: FND_MSG_PUB.Add;

926: l_error := TRUE;
927: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
928: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
929: FND_MESSAGE.SET_TOKEN('COLUMN', 'TO_REGION_APPL_ID');
930: FND_MSG_PUB.Add;
931: end if;
932: end if;
933:
934: if ((p_to_region_code is null) or

Line 939: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

935: (p_to_region_code = FND_API.G_MISS_CHAR and
936: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
937: then
938: l_error := TRUE;
939: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
940: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
941: FND_MESSAGE.SET_TOKEN('COLUMN', 'TO_REGION_CODE');
942: FND_MSG_PUB.Add;
943: end if;

Line 942: FND_MSG_PUB.Add;

938: l_error := TRUE;
939: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
940: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
941: FND_MESSAGE.SET_TOKEN('COLUMN', 'TO_REGION_CODE');
942: FND_MSG_PUB.Add;
943: end if;
944: end if;
945:
946: --** Validate columns **

Line 956: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

952: if (NOT valid_to_region (p_to_region_appl_id,
953: p_to_region_code,
954: p_database_object_name) ) then
955: l_error := TRUE;
956: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
957: FND_MESSAGE.SET_NAME('AK','AK_INVALID_TO_REGION');
958: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_to_region_appl_id) ||
959: ' ' || p_to_region_code);
960: FND_MESSAGE.SET_TOKEN('OBJECT', p_database_object_name );

Line 961: FND_MSG_PUB.Add;

957: FND_MESSAGE.SET_NAME('AK','AK_INVALID_TO_REGION');
958: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_to_region_appl_id) ||
959: ' ' || p_to_region_code);
960: FND_MESSAGE.SET_TOKEN('OBJECT', p_database_object_name );
961: FND_MSG_PUB.Add;
962: end if;
963: end if;
964: end if; /* if p_to_region_appl_id */
965:

Line 976: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

972: p_return_status := FND_API.G_RET_STS_ERROR;
973: return FALSE;
974: WHEN OTHERS THEN
975: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
976: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
977: SUBSTR (SQLERRM, 1, 240) );
978: FND_MSG_PUB.Add;
979: return FALSE;
980:

Line 978: FND_MSG_PUB.Add;

974: WHEN OTHERS THEN
975: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
976: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
977: SUBSTR (SQLERRM, 1, 240) );
978: FND_MSG_PUB.Add;
979: return FALSE;
980:
981: end VALIDATE_ATTRIBUTE_NAVIGATION;
982:

Line 1074: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

1070: --** so they are not checked here
1071: if ((p_database_object_name is null) or
1072: (p_database_object_name = FND_API.G_MISS_CHAR)) then
1073: l_error := TRUE;
1074: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1075: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1076: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
1077: FND_MSG_PUB.Add;
1078: end if;

Line 1077: FND_MSG_PUB.Add;

1073: l_error := TRUE;
1074: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1075: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1076: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
1077: FND_MSG_PUB.Add;
1078: end if;
1079: end if;
1080:
1081: if ((p_attribute_application_id is null) or

Line 1084: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

1080:
1081: if ((p_attribute_application_id is null) or
1082: (p_attribute_application_id = FND_API.G_MISS_NUM)) then
1083: l_error := TRUE;
1084: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1085: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1086: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
1087: FND_MSG_PUB.Add;
1088: end if;

Line 1087: FND_MSG_PUB.Add;

1083: l_error := TRUE;
1084: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1085: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1086: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
1087: FND_MSG_PUB.Add;
1088: end if;
1089: end if;
1090:
1091: if ((p_attribute_code is null) or

Line 1094: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

1090:
1091: if ((p_attribute_code is null) or
1092: (p_attribute_code = FND_API.G_MISS_CHAR)) then
1093: l_error := TRUE;
1094: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1095: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1096: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
1097: FND_MSG_PUB.Add;
1098: end if;

Line 1097: FND_MSG_PUB.Add;

1093: l_error := TRUE;
1094: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1095: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1096: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
1097: FND_MSG_PUB.Add;
1098: end if;
1099: end if;
1100:
1101: if ((p_key_value1 is null) or

Line 1104: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

1100:
1101: if ((p_key_value1 is null) or
1102: (p_key_value1 = FND_API.G_MISS_CHAR)) then
1103: l_error := TRUE;
1104: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1105: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1106: FND_MESSAGE.SET_TOKEN('COLUMN', 'KEY_VALUE1');
1107: FND_MSG_PUB.Add;
1108: end if;

Line 1107: FND_MSG_PUB.Add;

1103: l_error := TRUE;
1104: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1105: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1106: FND_MESSAGE.SET_TOKEN('COLUMN', 'KEY_VALUE1');
1107: FND_MSG_PUB.Add;
1108: end if;
1109: end if;
1110:
1111: -- - Check that the parent object attribute exists and that the

Line 1119: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

1115: fetch l_check_objattr_csr into l_dummy;
1116: if (l_check_objattr_csr%notfound) then
1117: close l_check_objattr_csr;
1118: l_error := TRUE;
1119: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1120: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OA_REFERENCE');
1121: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
1122: ' ' || to_char(p_attribute_application_id) ||
1123: ' ' || p_attribute_code);

Line 1124: FND_MSG_PUB.Add;

1120: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OA_REFERENCE');
1121: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
1122: ' ' || to_char(p_attribute_application_id) ||
1123: ' ' || p_attribute_code);
1124: FND_MSG_PUB.Add;
1125: end if;
1126: -- dbms_output.put_line('Parent object attribute does not exist!');
1127: else
1128: close l_check_objattr_csr;

Line 1138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

1134: if (p_value_varchar2 is not null) and
1135: (p_value_varchar2 <> FND_API.G_MISS_CHAR) then
1136: if (upper(l_data_type) <> 'VARCHAR2') then
1137: l_error := TRUE;
1138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1139: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
1140: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_VARCHAR2');
1141: FND_MSG_PUB.Add;
1142: end if;

Line 1141: FND_MSG_PUB.Add;

1137: l_error := TRUE;
1138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1139: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
1140: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_VARCHAR2');
1141: FND_MSG_PUB.Add;
1142: end if;
1143: -- dbms_output.put_line('value_varchar2 must be null for this attribute');
1144: end if;
1145: end if;

Line 1151: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

1147: if (p_value_number is not null) and
1148: (p_value_number <> FND_API.G_MISS_NUM) then
1149: if (upper(l_data_type) <> 'NUMBER') then
1150: l_error := TRUE;
1151: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1152: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
1153: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_NUMBER');
1154: FND_MSG_PUB.Add;
1155: end if;

Line 1154: FND_MSG_PUB.Add;

1150: l_error := TRUE;
1151: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1152: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
1153: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_NUMBER');
1154: FND_MSG_PUB.Add;
1155: end if;
1156: --dbms_output.put_line('value_number must be null for this attribute');
1157: end if;
1158: end if;

Line 1165: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

1161: (p_value_date <> FND_API.G_MISS_DATE) then
1162: if (upper(l_data_type) <> 'DATE') and
1163: (upper(l_data_type) <> 'DATETIME') then
1164: l_error := TRUE;
1165: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1166: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
1167: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_DATE');
1168: FND_MSG_PUB.Add;
1169: end if;

Line 1168: FND_MSG_PUB.Add;

1164: l_error := TRUE;
1165: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1166: FND_MESSAGE.SET_NAME('AK','AK_MUST_BE_NULL');
1167: FND_MESSAGE.SET_TOKEN('COLUMN', 'VALUE_DATE');
1168: FND_MSG_PUB.Add;
1169: end if;
1170: --dbms_output.put_line('value_date must be null for this attribute');
1171: end if;
1172: end if;

Line 1185: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1181: p_return_status := FND_API.G_RET_STS_ERROR;
1182: return FALSE;
1183: WHEN OTHERS THEN
1184: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1185: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1186: SUBSTR (SQLERRM, 1, 240) );
1187: FND_MSG_PUB.Add;
1188: return FALSE;
1189:

Line 1187: FND_MSG_PUB.Add;

1183: WHEN OTHERS THEN
1184: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1185: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1186: SUBSTR (SQLERRM, 1, 240) );
1187: FND_MSG_PUB.Add;
1188: return FALSE;
1189:
1190: end VALIDATE_ATTRIBUTE_VALUE;
1191:

Line 1281: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

1277: --** check that key columns are not null and not missing **
1278: if ((p_database_object_name is null) or
1279: (p_database_object_name = FND_API.G_MISS_CHAR)) then
1280: l_error := TRUE;
1281: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1282: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1283: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
1284: FND_MSG_PUB.Add;
1285: end if;

Line 1284: FND_MSG_PUB.Add;

1280: l_error := TRUE;
1281: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1282: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1283: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
1284: FND_MSG_PUB.Add;
1285: end if;
1286: end if;
1287:
1288: -- - Check that the database object name is the name of a

Line 1302: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

1298: -- flag an error only during download
1299: if ( AK_ON_OBJECTS_PUB.G_LOAD_MODE = 'DOWNLOAD' or p_pass = 1 ) then
1300: l_error := TRUE;
1301: end if;
1302: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1303: FND_MESSAGE.SET_NAME('AK','AK_INVALID_VIEW_REFERENCE');
1304: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
1305: FND_MSG_PUB.Add;
1306: end if;

Line 1305: FND_MSG_PUB.Add;

1301: end if;
1302: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1303: FND_MESSAGE.SET_NAME('AK','AK_INVALID_VIEW_REFERENCE');
1304: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
1305: FND_MSG_PUB.Add;
1306: end if;
1307: end if;
1308: close l_check_object_csr;
1309: end if; -- if p_primary_key_name

Line 1318: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

1314: (p_application_id = FND_API.G_MISS_NUM and
1315: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
1316: then
1317: l_error := TRUE;
1318: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1319: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1320: FND_MESSAGE.SET_TOKEN('COLUMN', 'APPLICATION_ID');
1321: FND_MSG_PUB.Add;
1322: end if;

Line 1321: FND_MSG_PUB.Add;

1317: l_error := TRUE;
1318: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1319: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
1320: FND_MESSAGE.SET_TOKEN('COLUMN', 'APPLICATION_ID');
1321: FND_MSG_PUB.Add;
1322: end if;
1323: end if;
1324:
1325: --** Validate columns **

Line 1334: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

1330: p_api_version_number => 1.0,
1331: p_return_status => l_return_status,
1332: p_application_id => p_application_id)) then
1333: l_error := TRUE;
1334: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1335: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
1336: FND_MESSAGE.SET_TOKEN('COLUMN','APPLICATION_ID');
1337: FND_MSG_PUB.Add;
1338: end if;

Line 1337: FND_MSG_PUB.Add;

1333: l_error := TRUE;
1334: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1335: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
1336: FND_MESSAGE.SET_TOKEN('COLUMN','APPLICATION_ID');
1337: FND_MSG_PUB.Add;
1338: end if;
1339: --dbms_output.put_line('Invalid application ID');
1340: end if;
1341: end if;

Line 1350: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then

1346: if (NOT VALID_PRIMARY_KEY_NAME (
1347: p_database_object_name => p_database_object_name,
1348: p_primary_key_name => p_primary_key_name)) then
1349: l_error := TRUE;
1350: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1351: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
1352: FND_MESSAGE.SET_TOKEN('COLUMN','PRIMARY_KEY_NAME');
1353: FND_MSG_PUB.Add;
1354: end if;

Line 1353: FND_MSG_PUB.Add;

1349: l_error := TRUE;
1350: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1351: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
1352: FND_MESSAGE.SET_TOKEN('COLUMN','PRIMARY_KEY_NAME');
1353: FND_MSG_PUB.Add;
1354: end if;
1355: end if;
1356: end if;
1357:

Line 1368: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1364: p_return_status := FND_API.G_RET_STS_ERROR;
1365: return FALSE;
1366: WHEN OTHERS THEN
1367: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1368: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1369: SUBSTR (SQLERRM, 1, 240) );
1370: FND_MSG_PUB.Add;
1371: return FALSE;
1372:

Line 1370: FND_MSG_PUB.Add;

1366: WHEN OTHERS THEN
1367: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1368: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1369: SUBSTR (SQLERRM, 1, 240) );
1370: FND_MSG_PUB.Add;
1371: return FALSE;
1372:
1373: end VALIDATE_OBJECT;
1374:

Line 1435: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1431: p_database_object_name => p_from_table(l_from_index),
1432: p_object_pk_tbl => p_to_table);
1433: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1434: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1435: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1436: FND_MESSAGE.SET_NAME('AK','AK_INSERT_OBJECT_PK_FAILED');
1437: FND_MSG_PUB.Add;
1438: end if;
1439: -- dbms_output.put_line(l_api_name || 'Error inserting object PK table');

Line 1437: FND_MSG_PUB.Add;

1433: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1434: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1435: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1436: FND_MESSAGE.SET_NAME('AK','AK_INSERT_OBJECT_PK_FAILED');
1437: FND_MSG_PUB.Add;
1438: end if;
1439: -- dbms_output.put_line(l_api_name || 'Error inserting object PK table');
1440: raise FND_API.G_EXC_ERROR;
1441: end if;

Line 1452: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1448: WHEN FND_API.G_EXC_ERROR THEN
1449: p_return_status := FND_API.G_RET_STS_ERROR;
1450: WHEN OTHERS THEN
1451: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1452: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1453: SUBSTR (SQLERRM, 1, 240) );
1454: FND_MSG_PUB.Add;
1455: end APPEND_OBJECT_PK_TABLES;
1456:

Line 1454: FND_MSG_PUB.Add;

1450: WHEN OTHERS THEN
1451: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1452: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1453: SUBSTR (SQLERRM, 1, 240) );
1454: FND_MSG_PUB.Add;
1455: end APPEND_OBJECT_PK_TABLES;
1456:
1457: --=======================================================
1458: -- Function ATTRIBUTE_EXISTS

Line 1523: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1519: p_return_status := FND_API.G_RET_STS_ERROR;
1520: return FALSE;
1521: WHEN OTHERS THEN
1522: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1523: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1524: SUBSTR (SQLERRM, 1, 240) );
1525: FND_MSG_PUB.Add;
1526: return FALSE;
1527: end ATTRIBUTE_EXISTS;

Line 1525: FND_MSG_PUB.Add;

1521: WHEN OTHERS THEN
1522: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1523: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1524: SUBSTR (SQLERRM, 1, 240) );
1525: FND_MSG_PUB.Add;
1526: return FALSE;
1527: end ATTRIBUTE_EXISTS;
1528:
1529: --=======================================================

Line 1651: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1647: p_return_status := FND_API.G_RET_STS_ERROR;
1648: return FALSE;
1649: WHEN OTHERS THEN
1650: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1651: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1652: SUBSTR (SQLERRM, 1, 240) );
1653: FND_MSG_PUB.Add;
1654: return FALSE;
1655: end ATTRIBUTE_NAVIGATION_EXISTS;

Line 1653: FND_MSG_PUB.Add;

1649: WHEN OTHERS THEN
1650: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1651: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1652: SUBSTR (SQLERRM, 1, 240) );
1653: FND_MSG_PUB.Add;
1654: return FALSE;
1655: end ATTRIBUTE_NAVIGATION_EXISTS;
1656:
1657: --=======================================================

Line 1863: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1859: p_return_status := FND_API.G_RET_STS_ERROR;
1860: return FALSE;
1861: WHEN OTHERS THEN
1862: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1863: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1864: SUBSTR (SQLERRM, 1, 240) );
1865: FND_MSG_PUB.Add;
1866: return FALSE;
1867: end ATTRIBUTE_VALUE_EXISTS;

Line 1865: FND_MSG_PUB.Add;

1861: WHEN OTHERS THEN
1862: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1863: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1864: SUBSTR (SQLERRM, 1, 240) );
1865: FND_MSG_PUB.Add;
1866: return FALSE;
1867: end ATTRIBUTE_VALUE_EXISTS;
1868:
1869: -- CREATE comes back in here

Line 1932: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

1928: p_return_status := FND_API.G_RET_STS_ERROR;
1929: return FALSE;
1930: WHEN OTHERS THEN
1931: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1932: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
1933: SUBSTR (SQLERRM, 1, 240) );
1934: return FALSE;
1935: end OBJECT_EXISTS;
1936:

Line 2044: FND_MSG_PUB.initialize;

2040:
2041: -- Initialize the message table if requested.
2042:
2043: if p_init_msg_tbl then
2044: FND_MSG_PUB.initialize;
2045: end if;
2046:
2047: savepoint start_delete_attribute;
2048:

Line 2058: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2054: p_return_status => l_return_status,
2055: p_database_object_name => p_database_object_name,
2056: p_attribute_application_id => p_attribute_application_id,
2057: p_attribute_code => p_attribute_code) then
2058: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2059: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_DOES_NOT_EXIST');
2060: FND_MSG_PUB.Add;
2061: end if;
2062: raise FND_API.G_EXC_ERROR;

Line 2060: FND_MSG_PUB.Add;

2056: p_attribute_application_id => p_attribute_application_id,
2057: p_attribute_code => p_attribute_code) then
2058: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2059: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_DOES_NOT_EXIST');
2060: FND_MSG_PUB.Add;
2061: end if;
2062: raise FND_API.G_EXC_ERROR;
2063: end if;
2064:

Line 2078: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2074: fetch l_get_navigations_csr into l_value_varchar2, l_value_date,
2075: l_value_number;
2076: if l_get_navigations_csr%found then
2077: close l_get_navigations_csr;
2078: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2079: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OA_NAV');
2080: FND_MSG_PUB.Add;
2081: end if;
2082: raise FND_API.G_EXC_ERROR;

Line 2080: FND_MSG_PUB.Add;

2076: if l_get_navigations_csr%found then
2077: close l_get_navigations_csr;
2078: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2079: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OA_NAV');
2080: FND_MSG_PUB.Add;
2081: end if;
2082: raise FND_API.G_EXC_ERROR;
2083: end if;
2084: close l_get_navigations_csr;

Line 2094: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2090: l_key_value1, l_key_value2, l_key_value3, l_key_value4, l_key_value5,
2091: l_key_value6, l_key_value7, l_key_value8, l_key_value9, l_key_value10;
2092: if l_get_attr_values_csr%found then
2093: close l_get_attr_values_csr;
2094: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2095: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DELETE_REFERENCE');
2096: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_OBJECT_ATTRIBUTES',TRUE);
2097: FND_MESSAGE.SET_TOKEN('REF_OBJECT', 'AK_ATTRIBUTE_VALUE',TRUE);
2098: FND_MSG_PUB.Add;

Line 2098: FND_MSG_PUB.Add;

2094: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2095: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DELETE_REFERENCE');
2096: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_OBJECT_ATTRIBUTES',TRUE);
2097: FND_MESSAGE.SET_TOKEN('REF_OBJECT', 'AK_ATTRIBUTE_VALUE',TRUE);
2098: FND_MSG_PUB.Add;
2099: end if;
2100: raise FND_API.G_EXC_ERROR;
2101: end if;
2102: close l_get_attr_values_csr;

Line 2110: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2106: open l_get_region_item_csr;
2107: fetch l_get_region_item_csr into l_region_application_id, l_region_code;
2108: if l_get_region_item_csr%found then
2109: close l_get_region_item_csr;
2110: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2111: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OA_ITEM');
2112: FND_MSG_PUB.Add;
2113: end if;
2114: raise FND_API.G_EXC_ERROR;

Line 2112: FND_MSG_PUB.Add;

2108: if l_get_region_item_csr%found then
2109: close l_get_region_item_csr;
2110: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2111: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OA_ITEM');
2112: FND_MSG_PUB.Add;
2113: end if;
2114: raise FND_API.G_EXC_ERROR;
2115: end if;
2116: close l_get_region_item_csr;

Line 2126: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2122: l_page_application_id, l_page_code,
2123: l_region_application_id, l_region_code;
2124: if l_get_page_region_item_csr%found then
2125: close l_get_page_region_item_csr;
2126: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2127: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OA_PREGIM');
2128: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_OBJECT_ATTRIBUTES',TRUE);
2129: FND_MESSAGE.SET_TOKEN('REF_OBJECT', 'AK_REGION_ITEMS',TRUE);
2130: FND_MSG_PUB.Add;

Line 2130: FND_MSG_PUB.Add;

2126: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2127: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OA_PREGIM');
2128: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_OBJECT_ATTRIBUTES',TRUE);
2129: FND_MESSAGE.SET_TOKEN('REF_OBJECT', 'AK_REGION_ITEMS',TRUE);
2130: FND_MSG_PUB.Add;
2131: end if;
2132: raise FND_API.G_EXC_ERROR;
2133: end if;
2134: close l_get_page_region_item_csr;

Line 2278: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2274: and attribute_application_id = p_attribute_application_id
2275: and attribute_code = p_attribute_code;
2276:
2277: if (sql%notfound) then
2278: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2279: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_DOES_NOT_EXIST');
2280: FND_MSG_PUB.Add;
2281: end if;
2282: raise FND_API.G_EXC_ERROR;

Line 2280: FND_MSG_PUB.Add;

2276:
2277: if (sql%notfound) then
2278: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2279: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_DOES_NOT_EXIST');
2280: FND_MSG_PUB.Add;
2281: end if;
2282: raise FND_API.G_EXC_ERROR;
2283: end if;
2284:

Line 2291: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2287: and attribute_application_id = p_attribute_application_id
2288: and attribute_code = p_attribute_code;
2289:
2290: if (sql%notfound) then
2291: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2292: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_DOES_NOT_EXIST');
2293: FND_MSG_PUB.Add;
2294: end if;
2295: raise FND_API.G_EXC_ERROR;

Line 2293: FND_MSG_PUB.Add;

2289:
2290: if (sql%notfound) then
2291: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2292: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_DOES_NOT_EXIST');
2293: FND_MSG_PUB.Add;
2294: end if;
2295: raise FND_API.G_EXC_ERROR;
2296: end if;
2297:

Line 2301: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then

2297:
2298: --
2299: -- Load success message
2300: --
2301: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
2302: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_DELETED');
2303: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
2304: ' ' || to_char(p_attribute_application_id) ||
2305: ' ' || p_attribute_code);

Line 2306: FND_MSG_PUB.Add;

2302: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_DELETED');
2303: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
2304: ' ' || to_char(p_attribute_application_id) ||
2305: ' ' || p_attribute_code);
2306: FND_MSG_PUB.Add;
2307: end if;
2308:
2309: p_return_status := FND_API.G_RET_STS_SUCCESS;
2310:

Line 2311: FND_MSG_PUB.Count_And_Get (

2307: end if;
2308:
2309: p_return_status := FND_API.G_RET_STS_SUCCESS;
2310:
2311: FND_MSG_PUB.Count_And_Get (
2312: p_count => p_msg_count,
2313: p_data => p_msg_data);
2314:
2315: EXCEPTION

Line 2317: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2313: p_data => p_msg_data);
2314:
2315: EXCEPTION
2316: WHEN FND_API.G_EXC_ERROR THEN
2317: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2318: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_NOT_DELETED');
2319: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
2320: ' ' || to_char(p_attribute_application_id) ||
2321: ' ' || p_attribute_code);

Line 2322: FND_MSG_PUB.Add;

2318: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_NOT_DELETED');
2319: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
2320: ' ' || to_char(p_attribute_application_id) ||
2321: ' ' || p_attribute_code);
2322: FND_MSG_PUB.Add;
2323: end if;
2324: p_return_status := FND_API.G_RET_STS_ERROR;
2325: rollback to start_delete_attribute;
2326: FND_MSG_PUB.Count_And_Get (

Line 2326: FND_MSG_PUB.Count_And_Get (

2322: FND_MSG_PUB.Add;
2323: end if;
2324: p_return_status := FND_API.G_RET_STS_ERROR;
2325: rollback to start_delete_attribute;
2326: FND_MSG_PUB.Count_And_Get (
2327: p_count => p_msg_count,
2328: p_data => p_msg_data);
2329: WHEN OTHERS THEN
2330: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2332: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

2328: p_data => p_msg_data);
2329: WHEN OTHERS THEN
2330: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2331: rollback to start_delete_attribute;
2332: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2333: SUBSTR (SQLERRM, 1, 240) );
2334: FND_MSG_PUB.Count_And_Get (
2335: p_count => p_msg_count,
2336: p_data => p_msg_data);

Line 2334: FND_MSG_PUB.Count_And_Get (

2330: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2331: rollback to start_delete_attribute;
2332: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2333: SUBSTR (SQLERRM, 1, 240) );
2334: FND_MSG_PUB.Count_And_Get (
2335: p_count => p_msg_count,
2336: p_data => p_msg_data);
2337: end DELETE_ATTRIBUTE;
2338:

Line 2401: FND_MSG_PUB.initialize;

2397:
2398: -- Initialize the message table if requested.
2399:
2400: if p_init_msg_tbl then
2401: FND_MSG_PUB.initialize;
2402: end if;
2403:
2404: savepoint start_delete_navigation;
2405:

Line 2418: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2414: p_attribute_code => p_attribute_code,
2415: p_value_varchar2 => p_value_varchar2,
2416: p_value_date => p_value_date,
2417: p_value_number => p_value_number) then
2418: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2419: FND_MESSAGE.SET_NAME('AK','AK_NAV_DOES_NOT_EXIST');
2420: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_NAVIGATION', TRUE);
2421: FND_MSG_PUB.Add;
2422: end if;

Line 2421: FND_MSG_PUB.Add;

2417: p_value_number => p_value_number) then
2418: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2419: FND_MESSAGE.SET_NAME('AK','AK_NAV_DOES_NOT_EXIST');
2420: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_NAVIGATION', TRUE);
2421: FND_MSG_PUB.Add;
2422: end if;
2423: raise FND_API.G_EXC_ERROR;
2424: end if;
2425:

Line 2475: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2471: and value_number = p_value_number;
2472: end if;
2473:
2474: if (sql%notfound) then
2475: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2476: FND_MESSAGE.SET_NAME('AK','AK_NAV_DOES_NOT_EXIST');
2477: FND_MSG_PUB.Add;
2478: end if;
2479: raise FND_API.G_EXC_ERROR;

Line 2477: FND_MSG_PUB.Add;

2473:
2474: if (sql%notfound) then
2475: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2476: FND_MESSAGE.SET_NAME('AK','AK_NAV_DOES_NOT_EXIST');
2477: FND_MSG_PUB.Add;
2478: end if;
2479: raise FND_API.G_EXC_ERROR;
2480: end if;
2481:

Line 2485: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then

2481:
2482: --
2483: -- Load success message
2484: --
2485: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
2486: FND_MESSAGE.SET_NAME('AK','AK_NAV_DELETED');
2487: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
2488: ' ' || to_char(p_attribute_application_id) ||
2489: ' ' || p_attribute_code ||

Line 2493: FND_MSG_PUB.Add;

2489: ' ' || p_attribute_code ||
2490: ' ' || p_value_varchar2 ||
2491: to_char(p_value_date) ||
2492: to_char(p_value_number) );
2493: FND_MSG_PUB.Add;
2494: end if;
2495:
2496: p_return_status := FND_API.G_RET_STS_SUCCESS;
2497:

Line 2498: FND_MSG_PUB.Count_And_Get (

2494: end if;
2495:
2496: p_return_status := FND_API.G_RET_STS_SUCCESS;
2497:
2498: FND_MSG_PUB.Count_And_Get (
2499: p_count => p_msg_count,
2500: p_data => p_msg_data);
2501:
2502: EXCEPTION

Line 2504: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2500: p_data => p_msg_data);
2501:
2502: EXCEPTION
2503: WHEN FND_API.G_EXC_ERROR THEN
2504: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2505: FND_MESSAGE.SET_NAME('AK','AK_NAV_NOT_DELETED');
2506: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_NAVIGATION', TRUE);
2507: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
2508: ' ' || to_char(p_attribute_application_id)||

Line 2513: FND_MSG_PUB.Add;

2509: ' ' || p_attribute_code ||
2510: ' ' || p_value_varchar2 ||
2511: to_char(p_value_date) ||
2512: to_char(p_value_number) );
2513: FND_MSG_PUB.Add;
2514: end if;
2515: p_return_status := FND_API.G_RET_STS_ERROR;
2516: rollback to start_delete_navigation;
2517: FND_MSG_PUB.Count_And_Get (

Line 2517: FND_MSG_PUB.Count_And_Get (

2513: FND_MSG_PUB.Add;
2514: end if;
2515: p_return_status := FND_API.G_RET_STS_ERROR;
2516: rollback to start_delete_navigation;
2517: FND_MSG_PUB.Count_And_Get (
2518: p_count => p_msg_count,
2519: p_data => p_msg_data);
2520: WHEN OTHERS THEN
2521: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2523: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

2519: p_data => p_msg_data);
2520: WHEN OTHERS THEN
2521: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2522: rollback to start_delete_navigation;
2523: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2524: SUBSTR (SQLERRM, 1, 240) );
2525: FND_MSG_PUB.Count_And_Get (
2526: p_count => p_msg_count,
2527: p_data => p_msg_data);

Line 2525: FND_MSG_PUB.Count_And_Get (

2521: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2522: rollback to start_delete_navigation;
2523: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2524: SUBSTR (SQLERRM, 1, 240) );
2525: FND_MSG_PUB.Count_And_Get (
2526: p_count => p_msg_count,
2527: p_data => p_msg_data);
2528:
2529: end DELETE_ATTRIBUTE_NAVIGATION;

Line 2610: FND_MSG_PUB.initialize;

2606:
2607: -- Initialize the message table if requested.
2608:
2609: if p_init_msg_tbl then
2610: FND_MSG_PUB.initialize;
2611: end if;
2612:
2613: savepoint start_delete_value;
2614:

Line 2665: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2661: p_key_value7 => p_key_value7,
2662: p_key_value8 => p_key_value8,
2663: p_key_value9 => p_key_value9,
2664: p_key_value10 => p_key_value10) then
2665: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2666: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DOES_NOT_EXIST');
2667: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
2668: FND_MSG_PUB.Add;
2669: end if;

Line 2668: FND_MSG_PUB.Add;

2664: p_key_value10 => p_key_value10) then
2665: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2666: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DOES_NOT_EXIST');
2667: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
2668: FND_MSG_PUB.Add;
2669: end if;
2670: raise FND_API.G_EXC_ERROR;
2671: end if;
2672:

Line 2786: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2782: dbms_sql.bind_variable(l_sql_csr, 'key_value10', l_key_value10);
2783: end if;
2784:
2785: if (dbms_sql.execute(l_sql_csr) = 0) then
2786: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2787: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DOES_NOT_EXIST');
2788: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
2789: FND_MSG_PUB.Add;
2790: end if;

Line 2789: FND_MSG_PUB.Add;

2785: if (dbms_sql.execute(l_sql_csr) = 0) then
2786: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2787: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DOES_NOT_EXIST');
2788: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
2789: FND_MSG_PUB.Add;
2790: end if;
2791: dbms_sql.close_cursor(l_sql_csr);
2792: raise FND_API.G_EXC_ERROR;
2793: end if;

Line 2799: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then

2795: dbms_sql.close_cursor(l_sql_csr);
2796: --
2797: -- Load success message
2798: --
2799: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
2800: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DELETED');
2801: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
2802: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
2803: ' ' || to_char(p_attribute_application_id) ||

Line 2815: FND_MSG_PUB.Add;

2811: ' ' || l_key_value7 ||
2812: ' ' || l_key_value8 ||
2813: ' ' || l_key_value9 ||
2814: ' ' || l_key_value10);
2815: FND_MSG_PUB.Add;
2816: end if;
2817:
2818: p_return_status := FND_API.G_RET_STS_SUCCESS;
2819:

Line 2820: FND_MSG_PUB.Count_And_Get (

2816: end if;
2817:
2818: p_return_status := FND_API.G_RET_STS_SUCCESS;
2819:
2820: FND_MSG_PUB.Count_And_Get (
2821: p_count => p_msg_count,
2822: p_data => p_msg_data);
2823:
2824: EXCEPTION

Line 2826: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

2822: p_data => p_msg_data);
2823:
2824: EXCEPTION
2825: WHEN FND_API.G_EXC_ERROR THEN
2826: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2827: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_NOT_DELETED');
2828: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
2829: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
2830: ' ' || to_char(p_attribute_application_id) ||

Line 2842: FND_MSG_PUB.Add;

2838: ' ' || l_key_value7 ||
2839: ' ' || l_key_value8 ||
2840: ' ' || l_key_value9 ||
2841: ' ' || l_key_value10);
2842: FND_MSG_PUB.Add;
2843: end if;
2844: p_return_status := FND_API.G_RET_STS_ERROR;
2845: rollback to start_delete_value;
2846: FND_MSG_PUB.Count_And_Get (

Line 2846: FND_MSG_PUB.Count_And_Get (

2842: FND_MSG_PUB.Add;
2843: end if;
2844: p_return_status := FND_API.G_RET_STS_ERROR;
2845: rollback to start_delete_value;
2846: FND_MSG_PUB.Count_And_Get (
2847: p_count => p_msg_count,
2848: p_data => p_msg_data);
2849: WHEN OTHERS THEN
2850: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2852: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

2848: p_data => p_msg_data);
2849: WHEN OTHERS THEN
2850: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2851: rollback to start_delete_value;
2852: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2853: SUBSTR (SQLERRM, 1, 240) );
2854: FND_MSG_PUB.Count_And_Get (
2855: p_count => p_msg_count,
2856: p_data => p_msg_data);

Line 2854: FND_MSG_PUB.Count_And_Get (

2850: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2851: rollback to start_delete_value;
2852: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2853: SUBSTR (SQLERRM, 1, 240) );
2854: FND_MSG_PUB.Count_And_Get (
2855: p_count => p_msg_count,
2856: p_data => p_msg_data);
2857:
2858: end DELETE_ATTRIBUTE_VALUE;

Line 2934: FND_MSG_PUB.initialize;

2930:
2931: -- Initialize the message table if requested.
2932:
2933: if p_init_msg_tbl then
2934: FND_MSG_PUB.initialize;
2935: end if;
2936:
2937: savepoint start_delete_object;
2938:

Line 2946: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2942: if NOT AK_OBJECT_PVT.OBJECT_EXISTS (
2943: p_api_version_number => 1.0,
2944: p_return_status => l_return_status,
2945: p_database_object_name => p_database_object_name) then
2946: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2947: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DOES_NOT_EXIST');
2948: FND_MSG_PUB.Add;
2949: end if;
2950: raise FND_API.G_EXC_ERROR;

Line 2948: FND_MSG_PUB.Add;

2944: p_return_status => l_return_status,
2945: p_database_object_name => p_database_object_name) then
2946: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2947: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DOES_NOT_EXIST');
2948: FND_MSG_PUB.Add;
2949: end if;
2950: raise FND_API.G_EXC_ERROR;
2951: end if;
2952:

Line 2966: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2962: fetch l_get_obj_attributes_csr into
2963: l_attribute_application_id, l_attribute_code;
2964: if l_get_obj_attributes_csr%found then
2965: close l_get_obj_attributes_csr;
2966: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2967: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OBJ_OA');
2968: FND_MSG_PUB.Add;
2969: end if;
2970: raise FND_API.G_EXC_ERROR;

Line 2968: FND_MSG_PUB.Add;

2964: if l_get_obj_attributes_csr%found then
2965: close l_get_obj_attributes_csr;
2966: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2967: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OBJ_OA');
2968: FND_MSG_PUB.Add;
2969: end if;
2970: raise FND_API.G_EXC_ERROR;
2971: end if;
2972: close l_get_obj_attributes_csr;

Line 2980: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2976: open l_get_unique_keys_csr;
2977: fetch l_get_unique_keys_csr into l_unique_key_name;
2978: if l_get_unique_keys_csr%found then
2979: close l_get_unique_keys_csr;
2980: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2981: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OBJ_UK');
2982: FND_MSG_PUB.Add;
2983: end if;
2984: raise FND_API.G_EXC_ERROR;

Line 2982: FND_MSG_PUB.Add;

2978: if l_get_unique_keys_csr%found then
2979: close l_get_unique_keys_csr;
2980: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2981: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OBJ_UK');
2982: FND_MSG_PUB.Add;
2983: end if;
2984: raise FND_API.G_EXC_ERROR;
2985: end if;
2986: close l_get_unique_keys_csr;

Line 2994: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

2990: open l_get_foreign_keys_csr;
2991: fetch l_get_foreign_keys_csr into l_foreign_key_name;
2992: if l_get_foreign_keys_csr%found then
2993: close l_get_foreign_keys_csr;
2994: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2995: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OBJ_FK');
2996: FND_MSG_PUB.Add;
2997: end if;
2998: raise FND_API.G_EXC_ERROR;

Line 2996: FND_MSG_PUB.Add;

2992: if l_get_foreign_keys_csr%found then
2993: close l_get_foreign_keys_csr;
2994: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2995: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OBJ_FK');
2996: FND_MSG_PUB.Add;
2997: end if;
2998: raise FND_API.G_EXC_ERROR;
2999: end if;
3000: close l_get_foreign_keys_csr;

Line 3008: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

3004: open l_get_regions_csr;
3005: fetch l_get_regions_csr into l_region_application_id, l_region_code;
3006: if l_get_regions_csr%found then
3007: close l_get_regions_csr;
3008: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3009: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OBJ_REG');
3010: FND_MSG_PUB.Add;
3011: end if;
3012: raise FND_API.G_EXC_ERROR;

Line 3010: FND_MSG_PUB.Add;

3006: if l_get_regions_csr%found then
3007: close l_get_regions_csr;
3008: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3009: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_OBJ_REG');
3010: FND_MSG_PUB.Add;
3011: end if;
3012: raise FND_API.G_EXC_ERROR;
3013: end if;
3014: close l_get_regions_csr;

Line 3128: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

3124: delete from ak_objects
3125: where database_object_name = p_database_object_name;
3126:
3127: if (sql%notfound) then
3128: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3129: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DOES_NOT_EXIST');
3130: FND_MSG_PUB.Add;
3131: end if;
3132: raise FND_API.G_EXC_ERROR;

Line 3130: FND_MSG_PUB.Add;

3126:
3127: if (sql%notfound) then
3128: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3129: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DOES_NOT_EXIST');
3130: FND_MSG_PUB.Add;
3131: end if;
3132: raise FND_API.G_EXC_ERROR;
3133: end if;
3134:

Line 3138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then

3134:
3135: --
3136: -- Load success message
3137: --
3138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
3139: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DELETED');
3140: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
3141: FND_MSG_PUB.Add;
3142: end if;

Line 3141: FND_MSG_PUB.Add;

3137: --
3138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
3139: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_DELETED');
3140: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
3141: FND_MSG_PUB.Add;
3142: end if;
3143:
3144: p_return_status := FND_API.G_RET_STS_SUCCESS;
3145:

Line 3146: FND_MSG_PUB.Count_And_Get (

3142: end if;
3143:
3144: p_return_status := FND_API.G_RET_STS_SUCCESS;
3145:
3146: FND_MSG_PUB.Count_And_Get (
3147: p_count => p_msg_count,
3148: p_data => p_msg_data);
3149:
3150: EXCEPTION

Line 3152: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

3148: p_data => p_msg_data);
3149:
3150: EXCEPTION
3151: WHEN FND_API.G_EXC_ERROR THEN
3152: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3153: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_NOT_DELETED');
3154: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
3155: FND_MSG_PUB.Add;
3156: end if;

Line 3155: FND_MSG_PUB.Add;

3151: WHEN FND_API.G_EXC_ERROR THEN
3152: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3153: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_NOT_DELETED');
3154: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
3155: FND_MSG_PUB.Add;
3156: end if;
3157: p_return_status := FND_API.G_RET_STS_ERROR;
3158: rollback to start_delete_object;
3159: FND_MSG_PUB.Count_And_Get (

Line 3159: FND_MSG_PUB.Count_And_Get (

3155: FND_MSG_PUB.Add;
3156: end if;
3157: p_return_status := FND_API.G_RET_STS_ERROR;
3158: rollback to start_delete_object;
3159: FND_MSG_PUB.Count_And_Get (
3160: p_count => p_msg_count,
3161: p_data => p_msg_data);
3162: WHEN OTHERS THEN
3163: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3165: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

3161: p_data => p_msg_data);
3162: WHEN OTHERS THEN
3163: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3164: rollback to start_delete_object;
3165: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3166: SUBSTR (SQLERRM, 1, 240) );
3167: FND_MSG_PUB.Count_And_Get (
3168: p_count => p_msg_count,
3169: p_data => p_msg_data);

Line 3167: FND_MSG_PUB.Count_And_Get (

3163: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3164: rollback to start_delete_object;
3165: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3166: SUBSTR (SQLERRM, 1, 240) );
3167: FND_MSG_PUB.Count_And_Get (
3168: p_count => p_msg_count,
3169: p_data => p_msg_data);
3170:
3171: end DELETE_OBJECT;

Line 3233: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

3229: WHEN FND_API.G_EXC_ERROR THEN
3230: p_return_status := FND_API.G_RET_STS_ERROR;
3231: WHEN OTHERS THEN
3232: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3233: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3234: SUBSTR (SQLERRM, 1, 240) );
3235: FND_MSG_PUB.Add;
3236: end INSERT_OBJECT_PK_TABLE;
3237:

Line 3235: FND_MSG_PUB.Add;

3231: WHEN OTHERS THEN
3232: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3233: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3234: SUBSTR (SQLERRM, 1, 240) );
3235: FND_MSG_PUB.Add;
3236: end INSERT_OBJECT_PK_TABLE;
3237:
3238: --=======================================================
3239: -- Procedure CREATE_OBJECT

Line 3348: FND_MSG_PUB.initialize;

3344:
3345: -- Initialize the message table if requested.
3346:
3347: if p_init_msg_tbl then
3348: FND_MSG_PUB.initialize;
3349: end if;
3350:
3351: savepoint start_create_object;
3352:

Line 3358: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

3354: if (AK_OBJECT_PVT.OBJECT_EXISTS (
3355: p_api_version_number => 1.0,
3356: p_return_status => l_return_status,
3357: p_database_object_name => p_database_object_name)) then
3358: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3359: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_EXISTS');
3360: FND_MSG_PUB.Add;
3361: end if;
3362: -- dbms_output.put_line(G_PKG_NAME || 'Error - Row already exists');

Line 3360: FND_MSG_PUB.Add;

3356: p_return_status => l_return_status,
3357: p_database_object_name => p_database_object_name)) then
3358: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3359: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_EXISTS');
3360: FND_MSG_PUB.Add;
3361: end if;
3362: -- dbms_output.put_line(G_PKG_NAME || 'Error - Row already exists');
3363: raise FND_API.G_EXC_ERROR;
3364: end if;

Line 3594: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

3590: if (NOT AK_OBJECT_PVT.OBJECT_EXISTS (
3591: p_api_version_number => 1.0,
3592: p_return_status => l_return_status,
3593: p_database_object_name => p_database_object_name)) then
3594: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3595: FND_MESSAGE.SET_NAME('AK','AK_INSERT_OBJECT_FAILED');
3596: FND_MSG_PUB.Add;
3597: end if;
3598: raise FND_API.G_EXC_ERROR;

Line 3596: FND_MSG_PUB.Add;

3592: p_return_status => l_return_status,
3593: p_database_object_name => p_database_object_name)) then
3594: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3595: FND_MESSAGE.SET_NAME('AK','AK_INSERT_OBJECT_FAILED');
3596: FND_MSG_PUB.Add;
3597: end if;
3598: raise FND_API.G_EXC_ERROR;
3599: end if;
3600:

Line 3631: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN

3627: from AK_OBJECTS_TL T
3628: where T.DATABASE_OBJECT_NAME = p_database_object_name
3629: and T.LANGUAGE = L.LANGUAGE_CODE);
3630:
3631: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3632: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_CREATED');
3633: FND_MESSAGE.SET_TOKEN('KEY',p_database_object_name);
3634: FND_MSG_PUB.Add;
3635: end if;

Line 3634: FND_MSG_PUB.Add;

3630:
3631: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3632: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_CREATED');
3633: FND_MESSAGE.SET_TOKEN('KEY',p_database_object_name);
3634: FND_MSG_PUB.Add;
3635: end if;
3636:
3637: p_return_status := FND_API.G_RET_STS_SUCCESS;
3638:

Line 3639: FND_MSG_PUB.Count_And_Get (

3635: end if;
3636:
3637: p_return_status := FND_API.G_RET_STS_SUCCESS;
3638:
3639: FND_MSG_PUB.Count_And_Get (
3640: p_count => p_msg_count,
3641: p_data => p_msg_data);
3642:
3643: EXCEPTION

Line 3645: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

3641: p_data => p_msg_data);
3642:
3643: EXCEPTION
3644: WHEN VALUE_ERROR THEN
3645: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3646: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_VALUE_ERROR');
3647: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
3648: FND_MSG_PUB.Add;
3649: end if;

Line 3648: FND_MSG_PUB.Add;

3644: WHEN VALUE_ERROR THEN
3645: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3646: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_VALUE_ERROR');
3647: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
3648: FND_MSG_PUB.Add;
3649: end if;
3650: rollback to start_create_object;
3651: p_return_status := FND_API.G_RET_STS_ERROR;
3652: FND_MSG_PUB.Count_And_Get (

Line 3652: FND_MSG_PUB.Count_And_Get (

3648: FND_MSG_PUB.Add;
3649: end if;
3650: rollback to start_create_object;
3651: p_return_status := FND_API.G_RET_STS_ERROR;
3652: FND_MSG_PUB.Count_And_Get (
3653: p_count => p_msg_count,
3654: p_data => p_msg_data);
3655: WHEN FND_API.G_EXC_ERROR THEN
3656: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 3656: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

3652: FND_MSG_PUB.Count_And_Get (
3653: p_count => p_msg_count,
3654: p_data => p_msg_data);
3655: WHEN FND_API.G_EXC_ERROR THEN
3656: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3657: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_NOT_CREATED');
3658: FND_MESSAGE.SET_TOKEN('KEY',p_database_object_name);
3659: FND_MSG_PUB.Add;
3660: end if;

Line 3659: FND_MSG_PUB.Add;

3655: WHEN FND_API.G_EXC_ERROR THEN
3656: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3657: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_NOT_CREATED');
3658: FND_MESSAGE.SET_TOKEN('KEY',p_database_object_name);
3659: FND_MSG_PUB.Add;
3660: end if;
3661: p_return_status := FND_API.G_RET_STS_ERROR;
3662: rollback to start_create_object;
3663: FND_MSG_PUB.Count_And_Get (

Line 3663: FND_MSG_PUB.Count_And_Get (

3659: FND_MSG_PUB.Add;
3660: end if;
3661: p_return_status := FND_API.G_RET_STS_ERROR;
3662: rollback to start_create_object;
3663: FND_MSG_PUB.Count_And_Get (
3664: p_count => p_msg_count,
3665: p_data => p_msg_data);
3666: WHEN OTHERS THEN
3667: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3669: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

3665: p_data => p_msg_data);
3666: WHEN OTHERS THEN
3667: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3668: rollback to start_create_object;
3669: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3670: SUBSTR (SQLERRM, 1, 240) );
3671: FND_MSG_PUB.Count_And_Get (
3672: p_count => p_msg_count,
3673: p_data => p_msg_data);

Line 3671: FND_MSG_PUB.Count_And_Get (

3667: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3668: rollback to start_create_object;
3669: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3670: SUBSTR (SQLERRM, 1, 240) );
3671: FND_MSG_PUB.Count_And_Get (
3672: p_count => p_msg_count,
3673: p_data => p_msg_data);
3674: end CREATE_OBJECT;
3675:

Line 3818: FND_MSG_PUB.initialize;

3814:
3815: -- Initialize the message table if requested.
3816:
3817: if p_init_msg_tbl then
3818: FND_MSG_PUB.initialize;
3819: end if;
3820:
3821: savepoint start_create_attribute;
3822:

Line 3830: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

3826: p_return_status => l_return_status,
3827: p_database_object_name => p_database_object_name,
3828: p_attribute_application_id => p_attribute_application_id,
3829: p_attribute_code => p_attribute_code) ) then
3830: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3831: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_EXISTS');
3832: FND_MSG_PUB.Add;
3833: end if;
3834: -- dbms_output.put_line('OA Key: '||p_database_object_name ||

Line 3832: FND_MSG_PUB.Add;

3828: p_attribute_application_id => p_attribute_application_id,
3829: p_attribute_code => p_attribute_code) ) then
3830: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3831: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_EXISTS');
3832: FND_MSG_PUB.Add;
3833: end if;
3834: -- dbms_output.put_line('OA Key: '||p_database_object_name ||
3835: -- ' ' || to_char(p_attribute_application_id) ||
3836: -- ' ' || p_attribute_code );

Line 4188: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

4184: p_return_status => l_return_status,
4185: p_database_object_name => p_database_object_name,
4186: p_attribute_application_id => p_attribute_application_id,
4187: p_attribute_code => p_attribute_code) ) then
4188: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4189: FND_MESSAGE.SET_NAME('AK','AK_INSERT_OBJECT_ATTR_FAILED');
4190: FND_MSG_PUB.Add;
4191: end if;
4192: -- dbms_output.put_line(G_PKG_NAME || 'Error - First insert failed');

Line 4190: FND_MSG_PUB.Add;

4186: p_attribute_application_id => p_attribute_application_id,
4187: p_attribute_code => p_attribute_code) ) then
4188: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4189: FND_MESSAGE.SET_NAME('AK','AK_INSERT_OBJECT_ATTR_FAILED');
4190: FND_MSG_PUB.Add;
4191: end if;
4192: -- dbms_output.put_line(G_PKG_NAME || 'Error - First insert failed');
4193: raise FND_API.G_EXC_ERROR;
4194: end if;

Line 4235: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN

4231:
4232: -- /** commit the insert **/
4233: -- commit;
4234:
4235: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
4236: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_CREATED');
4237: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4238: ' ' || to_char(p_attribute_application_id) ||
4239: ' ' || p_attribute_code);

Line 4240: FND_MSG_PUB.Add;

4236: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_CREATED');
4237: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4238: ' ' || to_char(p_attribute_application_id) ||
4239: ' ' || p_attribute_code);
4240: FND_MSG_PUB.Add;
4241: end if;
4242:
4243: p_return_status := FND_API.G_RET_STS_SUCCESS;
4244:

Line 4245: FND_MSG_PUB.Count_And_Get (

4241: end if;
4242:
4243: p_return_status := FND_API.G_RET_STS_SUCCESS;
4244:
4245: FND_MSG_PUB.Count_And_Get (
4246: p_count => p_msg_count,
4247: p_data => p_msg_data);
4248:
4249: EXCEPTION

Line 4251: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

4247: p_data => p_msg_data);
4248:
4249: EXCEPTION
4250: WHEN VALUE_ERROR THEN
4251: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4252: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_VALUE_ERROR');
4253: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4254: ' ' || to_char(p_attribute_application_id) ||
4255: ' ' || p_attribute_code );

Line 4256: FND_MSG_PUB.Add;

4252: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_VALUE_ERROR');
4253: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4254: ' ' || to_char(p_attribute_application_id) ||
4255: ' ' || p_attribute_code );
4256: FND_MSG_PUB.Add;
4257: end if;
4258: rollback to start_create_attribute;
4259: p_return_status := FND_API.G_RET_STS_ERROR;
4260: FND_MSG_PUB.Count_And_Get (

Line 4260: FND_MSG_PUB.Count_And_Get (

4256: FND_MSG_PUB.Add;
4257: end if;
4258: rollback to start_create_attribute;
4259: p_return_status := FND_API.G_RET_STS_ERROR;
4260: FND_MSG_PUB.Count_And_Get (
4261: p_count => p_msg_count,
4262: p_data => p_msg_data);
4263: WHEN FND_API.G_EXC_ERROR THEN
4264: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 4264: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

4260: FND_MSG_PUB.Count_And_Get (
4261: p_count => p_msg_count,
4262: p_data => p_msg_data);
4263: WHEN FND_API.G_EXC_ERROR THEN
4264: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4265: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_NOT_CREATED');
4266: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4267: ' ' || to_char(p_attribute_application_id) ||
4268: ' ' || p_attribute_code);

Line 4269: FND_MSG_PUB.Add;

4265: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_ATTR_NOT_CREATED');
4266: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4267: ' ' || to_char(p_attribute_application_id) ||
4268: ' ' || p_attribute_code);
4269: FND_MSG_PUB.Add;
4270: end if;
4271: -- dbms_output.put_line('OA Key: '||p_database_object_name ||
4272: -- ' ' || to_char(p_attribute_application_id) ||
4273: -- ' ' || p_attribute_code );

Line 4276: FND_MSG_PUB.Count_And_Get (

4272: -- ' ' || to_char(p_attribute_application_id) ||
4273: -- ' ' || p_attribute_code );
4274: p_return_status := FND_API.G_RET_STS_ERROR;
4275: rollback to start_create_attribute;
4276: FND_MSG_PUB.Count_And_Get (
4277: p_count => p_msg_count,
4278: p_data => p_msg_data);
4279: WHEN OTHERS THEN
4280: --dbms_output.put_line('OA Key: '||p_database_object_name ||

Line 4285: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

4281: -- ' ' || to_char(p_attribute_application_id) ||
4282: -- ' ' || p_attribute_code );
4283: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4284: rollback to start_create_attribute;
4285: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
4286: SUBSTR (SQLERRM, 1, 240) );
4287: FND_MSG_PUB.Count_And_Get (
4288: p_count => p_msg_count,
4289: p_data => p_msg_data);

Line 4287: FND_MSG_PUB.Count_And_Get (

4283: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4284: rollback to start_create_attribute;
4285: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
4286: SUBSTR (SQLERRM, 1, 240) );
4287: FND_MSG_PUB.Count_And_Get (
4288: p_count => p_msg_count,
4289: p_data => p_msg_data);
4290: end CREATE_ATTRIBUTE;
4291:

Line 4396: FND_MSG_PUB.initialize;

4392:
4393: -- Initialize the message table if requested.
4394:
4395: if p_init_msg_tbl then
4396: FND_MSG_PUB.initialize;
4397: end if;
4398:
4399: savepoint start_create_navigation;
4400:

Line 4413: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

4409: if (p_value_number is not null) then
4410: l_count := l_count + 1;
4411: end if;
4412: if (l_count <> 1) then
4413: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4414: FND_MESSAGE.SET_NAME('AK','AK_ONE_VALUE_ONLY');
4415: FND_MSG_PUB.Add;
4416: end if;
4417: -- dbms_output.put_line('One and only one value field must be non-null');

Line 4415: FND_MSG_PUB.Add;

4411: end if;
4412: if (l_count <> 1) then
4413: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4414: FND_MESSAGE.SET_NAME('AK','AK_ONE_VALUE_ONLY');
4415: FND_MSG_PUB.Add;
4416: end if;
4417: -- dbms_output.put_line('One and only one value field must be non-null');
4418: raise FND_API.G_EXC_ERROR;
4419: end if;

Line 4431: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

4427: p_attribute_code => p_attribute_code,
4428: p_value_varchar2 => p_value_varchar2,
4429: p_value_date => p_value_date,
4430: p_value_number => p_value_number) then
4431: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4432: FND_MESSAGE.SET_NAME('AK','AK_NAV_EXISTS');
4433: FND_MSG_PUB.Add;
4434: end if;
4435: raise FND_API.G_EXC_ERROR;

Line 4433: FND_MSG_PUB.Add;

4429: p_value_date => p_value_date,
4430: p_value_number => p_value_number) then
4431: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4432: FND_MESSAGE.SET_NAME('AK','AK_NAV_EXISTS');
4433: FND_MSG_PUB.Add;
4434: end if;
4435: raise FND_API.G_EXC_ERROR;
4436: end if;
4437:

Line 4634: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN

4630:
4631: -- /** commit the insert **/
4632: -- commit;
4633:
4634: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
4635: FND_MESSAGE.SET_NAME('AK','AK_NAV_CREATED');
4636: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4637: ' ' || to_char(p_attribute_application_id) ||
4638: ' ' || p_attribute_code || ' ' ||

Line 4642: FND_MSG_PUB.Add;

4638: ' ' || p_attribute_code || ' ' ||
4639: p_value_varchar2 ||
4640: to_char(p_value_date) ||
4641: to_char(p_value_number) );
4642: FND_MSG_PUB.Add;
4643: end if;
4644:
4645: p_return_status := FND_API.G_RET_STS_SUCCESS;
4646:

Line 4647: FND_MSG_PUB.Count_And_Get (

4643: end if;
4644:
4645: p_return_status := FND_API.G_RET_STS_SUCCESS;
4646:
4647: FND_MSG_PUB.Count_And_Get (
4648: p_count => p_msg_count,
4649: p_data => p_msg_data);
4650:
4651: EXCEPTION

Line 4653: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

4649: p_data => p_msg_data);
4650:
4651: EXCEPTION
4652: WHEN VALUE_ERROR THEN
4653: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4654: FND_MESSAGE.SET_NAME('AK','AK_NAV_VALUE_ERROR');
4655: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4656: ' ' || to_char(p_attribute_application_id)
4657: || ' ' || p_attribute_code || ' ' ||

Line 4661: FND_MSG_PUB.Add;

4657: || ' ' || p_attribute_code || ' ' ||
4658: p_value_varchar2 ||
4659: to_char(p_value_date) ||
4660: to_char(p_value_number) );
4661: FND_MSG_PUB.Add;
4662: end if;
4663: rollback to start_create_navigation;
4664: p_return_status := FND_API.G_RET_STS_ERROR;
4665: FND_MSG_PUB.Count_And_Get (

Line 4665: FND_MSG_PUB.Count_And_Get (

4661: FND_MSG_PUB.Add;
4662: end if;
4663: rollback to start_create_navigation;
4664: p_return_status := FND_API.G_RET_STS_ERROR;
4665: FND_MSG_PUB.Count_And_Get (
4666: p_count => p_msg_count,
4667: p_data => p_msg_data);
4668: WHEN FND_API.G_EXC_ERROR THEN
4669: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 4669: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

4665: FND_MSG_PUB.Count_And_Get (
4666: p_count => p_msg_count,
4667: p_data => p_msg_data);
4668: WHEN FND_API.G_EXC_ERROR THEN
4669: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4670: FND_MESSAGE.SET_NAME('AK','AK_NAV_NOT_CREATED');
4671: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4672: ' ' || to_char(p_attribute_application_id)
4673: || ' ' || p_attribute_code || ' ' ||

Line 4677: FND_MSG_PUB.Add;

4673: || ' ' || p_attribute_code || ' ' ||
4674: p_value_varchar2 ||
4675: to_char(p_value_date) ||
4676: to_char(p_value_number) );
4677: FND_MSG_PUB.Add;
4678: end if;
4679: p_return_status := FND_API.G_RET_STS_ERROR;
4680: rollback to start_create_navigation;
4681: FND_MSG_PUB.Count_And_Get (

Line 4681: FND_MSG_PUB.Count_And_Get (

4677: FND_MSG_PUB.Add;
4678: end if;
4679: p_return_status := FND_API.G_RET_STS_ERROR;
4680: rollback to start_create_navigation;
4681: FND_MSG_PUB.Count_And_Get (
4682: p_count => p_msg_count,
4683: p_data => p_msg_data);
4684: WHEN OTHERS THEN
4685: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4687: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

4683: p_data => p_msg_data);
4684: WHEN OTHERS THEN
4685: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4686: rollback to start_create_navigation;
4687: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
4688: SUBSTR (SQLERRM, 1, 240) );
4689: FND_MSG_PUB.Count_And_Get (
4690: p_count => p_msg_count,
4691: p_data => p_msg_data);

Line 4689: FND_MSG_PUB.Count_And_Get (

4685: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4686: rollback to start_create_navigation;
4687: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
4688: SUBSTR (SQLERRM, 1, 240) );
4689: FND_MSG_PUB.Count_And_Get (
4690: p_count => p_msg_count,
4691: p_data => p_msg_data);
4692: end CREATE_ATTRIBUTE_NAVIGATION;
4693:

Line 4782: FND_MSG_PUB.initialize;

4778:
4779: -- Initialize the message table if requested.
4780:
4781: if p_init_msg_tbl then
4782: FND_MSG_PUB.initialize;
4783: end if;
4784:
4785: savepoint start_create_value;
4786:

Line 4805: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then

4801: p_key_value8 => p_key_value8,
4802: p_key_value9 => p_key_value9,
4803: p_key_value10 => p_key_value10
4804: ) then
4805: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4806: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_EXISTS');
4807: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
4808: FND_MSG_PUB.Add;
4809: end if;

Line 4808: FND_MSG_PUB.Add;

4804: ) then
4805: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4806: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_EXISTS');
4807: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
4808: FND_MSG_PUB.Add;
4809: end if;
4810: -- dbms_output.put_line(l_api_name || 'Error - Row already exists');
4811: raise FND_API.G_EXC_ERROR;
4812: end if;

Line 4980: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN

4976:
4977: -- /** commit the insert **/
4978: -- commit;
4979:
4980: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
4981: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_CREATED');
4982: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
4983: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
4984: ' ' || to_char(p_attribute_application_id) ||

Line 4996: FND_MSG_PUB.Add;

4992: ' ' || l_key_value7 ||
4993: ' ' || l_key_value8 ||
4994: ' ' || l_key_value9 ||
4995: ' ' || l_key_value10);
4996: FND_MSG_PUB.Add;
4997: end if;
4998:
4999: p_return_status := FND_API.G_RET_STS_SUCCESS;
5000:

Line 5001: FND_MSG_PUB.Count_And_Get (

4997: end if;
4998:
4999: p_return_status := FND_API.G_RET_STS_SUCCESS;
5000:
5001: FND_MSG_PUB.Count_And_Get (
5002: p_count => p_msg_count,
5003: p_data => p_msg_data);
5004:
5005: EXCEPTION

Line 5007: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5003: p_data => p_msg_data);
5004:
5005: EXCEPTION
5006: WHEN VALUE_ERROR THEN
5007: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5008: FND_MESSAGE.SET_NAME('AK','AK_VALUE_ERROR');
5009: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
5010: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
5011: ' ' || to_char(p_attribute_application_id) ||

Line 5023: FND_MSG_PUB.Add;

5019: ' ' || l_key_value7 ||
5020: ' ' || l_key_value8 ||
5021: ' ' || l_key_value9 ||
5022: ' ' || l_key_value10);
5023: FND_MSG_PUB.Add;
5024: end if;
5025: p_return_status := FND_API.G_RET_STS_ERROR;
5026: rollback to start_create_value;
5027: FND_MSG_PUB.Count_And_Get (

Line 5027: FND_MSG_PUB.Count_And_Get (

5023: FND_MSG_PUB.Add;
5024: end if;
5025: p_return_status := FND_API.G_RET_STS_ERROR;
5026: rollback to start_create_value;
5027: FND_MSG_PUB.Count_And_Get (
5028: p_count => p_msg_count,
5029: p_data => p_msg_data);
5030: WHEN FND_API.G_EXC_ERROR THEN
5031: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 5031: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

5027: FND_MSG_PUB.Count_And_Get (
5028: p_count => p_msg_count,
5029: p_data => p_msg_data);
5030: WHEN FND_API.G_EXC_ERROR THEN
5031: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5032: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_NOT_CREATED');
5033: FND_MESSAGE.SET_TOKEN('OBJECT','AK_ATTRIBUTE_VALUE', TRUE);
5034: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name ||
5035: ' ' || to_char(p_attribute_application_id) ||

Line 5047: FND_MSG_PUB.Add;

5043: ' ' || l_key_value7 ||
5044: ' ' || l_key_value8 ||
5045: ' ' || l_key_value9 ||
5046: ' ' || l_key_value10);
5047: FND_MSG_PUB.Add;
5048: end if;
5049: p_return_status := FND_API.G_RET_STS_ERROR;
5050: rollback to start_create_value;
5051: FND_MSG_PUB.Count_And_Get (

Line 5051: FND_MSG_PUB.Count_And_Get (

5047: FND_MSG_PUB.Add;
5048: end if;
5049: p_return_status := FND_API.G_RET_STS_ERROR;
5050: rollback to start_create_value;
5051: FND_MSG_PUB.Count_And_Get (
5052: p_count => p_msg_count,
5053: p_data => p_msg_data);
5054: WHEN OTHERS THEN
5055: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5057: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

5053: p_data => p_msg_data);
5054: WHEN OTHERS THEN
5055: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5056: rollback to start_create_value;
5057: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
5058: SUBSTR (SQLERRM, 1, 240) );
5059: FND_MSG_PUB.Count_And_Get (
5060: p_count => p_msg_count,
5061: p_data => p_msg_data);

Line 5059: FND_MSG_PUB.Count_And_Get (

5055: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5056: rollback to start_create_value;
5057: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
5058: SUBSTR (SQLERRM, 1, 240) );
5059: FND_MSG_PUB.Count_And_Get (
5060: p_count => p_msg_count,
5061: p_data => p_msg_data);
5062: end CREATE_ATTRIBUTE_VALUE;
5063: