eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AK_KEY_PVT dependencies on FND_MSG_PUB

Line 111: FND_MSG_PUB.initialize;

107:
108: -- Initialize the message table if requested.
109:
110: if p_init_msg_tbl then
111: FND_MSG_PUB.initialize;
112: end if;
113:
114: savepoint start_create_foreign_key;
115:

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

117: if AK_KEY_PVT.FOREIGN_KEY_EXISTS (
118: p_api_version_number => 1.0,
119: p_return_status => l_return_status,
120: p_foreign_key_name => p_foreign_key_name) then
121: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
122: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_EXISTS');
123: FND_MSG_PUB.Add;
124: end if;
125: --dbms_output.put_line(l_api_name || 'Error - Row already exists');

Line 123: FND_MSG_PUB.Add;

119: p_return_status => l_return_status,
120: p_foreign_key_name => p_foreign_key_name) then
121: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
122: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_EXISTS');
123: FND_MSG_PUB.Add;
124: end if;
125: --dbms_output.put_line(l_api_name || 'Error - Row already exists');
126: raise FND_API.G_EXC_ERROR;
127: end if;

Line 329: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) THEN

325: if NOT AK_KEY_PVT.FOREIGN_KEY_EXISTS (
326: p_api_version_number => 1.0,
327: p_return_status => l_return_status,
328: p_foreign_key_name => p_foreign_key_name) then
329: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) THEN
330: FND_MESSAGE.SET_NAME('AK','AK_INSERT_FK_FAILED');
331: FND_MSG_PUB.Add;
332: end if;
333: --dbms_output.put_line(G_PKG_NAME || 'Error - First insert failed');

Line 331: FND_MSG_PUB.Add;

327: p_return_status => l_return_status,
328: p_foreign_key_name => p_foreign_key_name) then
329: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) THEN
330: FND_MESSAGE.SET_NAME('AK','AK_INSERT_FK_FAILED');
331: FND_MSG_PUB.Add;
332: end if;
333: --dbms_output.put_line(G_PKG_NAME || 'Error - First insert failed');
334: raise FND_API.G_EXC_ERROR;
335: end if;

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

367: from AK_FOREIGN_KEYS_TL T
368: where T.FOREIGN_KEY_NAME = p_foreign_key_name
369: and T.LANGUAGE = L.LANGUAGE_CODE);
370:
371: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
372: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_CREATED');
373: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
374: FND_MSG_PUB.Add;
375: end if;

Line 374: FND_MSG_PUB.Add;

370:
371: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
372: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_CREATED');
373: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
374: FND_MSG_PUB.Add;
375: end if;
376:
377: p_return_status := FND_API.G_RET_STS_SUCCESS;
378:

Line 379: FND_MSG_PUB.Count_And_Get (

375: end if;
376:
377: p_return_status := FND_API.G_RET_STS_SUCCESS;
378:
379: FND_MSG_PUB.Count_And_Get (
380: p_count => p_msg_count,
381: p_data => p_msg_data);
382:
383: EXCEPTION

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

381: p_data => p_msg_data);
382:
383: EXCEPTION
384: WHEN VALUE_ERROR THEN
385: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
386: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_VALUE_ERROR');
387: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
388: FND_MSG_PUB.Add;
389: end if;

Line 388: FND_MSG_PUB.Add;

384: WHEN VALUE_ERROR THEN
385: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
386: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_VALUE_ERROR');
387: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
388: FND_MSG_PUB.Add;
389: end if;
390: p_return_status := FND_API.G_RET_STS_ERROR;
391: rollback to start_create_foreign_key;
392: FND_MSG_PUB.Count_And_Get (

Line 392: FND_MSG_PUB.Count_And_Get (

388: FND_MSG_PUB.Add;
389: end if;
390: p_return_status := FND_API.G_RET_STS_ERROR;
391: rollback to start_create_foreign_key;
392: FND_MSG_PUB.Count_And_Get (
393: p_count => p_msg_count,
394: p_data => p_msg_data);
395: WHEN FND_API.G_EXC_ERROR THEN
396: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

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

392: FND_MSG_PUB.Count_And_Get (
393: p_count => p_msg_count,
394: p_data => p_msg_data);
395: WHEN FND_API.G_EXC_ERROR THEN
396: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
397: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_CREATED');
398: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
399: FND_MSG_PUB.Add;
400: end if;

Line 399: FND_MSG_PUB.Add;

395: WHEN FND_API.G_EXC_ERROR THEN
396: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
397: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_CREATED');
398: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
399: FND_MSG_PUB.Add;
400: end if;
401: p_return_status := FND_API.G_RET_STS_ERROR;
402: rollback to start_create_foreign_key;
403: FND_MSG_PUB.Count_And_Get (

Line 403: FND_MSG_PUB.Count_And_Get (

399: FND_MSG_PUB.Add;
400: end if;
401: p_return_status := FND_API.G_RET_STS_ERROR;
402: rollback to start_create_foreign_key;
403: FND_MSG_PUB.Count_And_Get (
404: p_count => p_msg_count,
405: p_data => p_msg_data);
406: WHEN OTHERS THEN
407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 411: FND_MSG_PUB.Add;

407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: rollback to start_create_foreign_key;
409: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_CREATED');
410: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
411: FND_MSG_PUB.Add;
412: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
413: SUBSTR (SQLERRM, 1, 240) );
414: FND_MSG_PUB.Count_And_Get (
415: p_count => p_msg_count,

Line 412: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

408: rollback to start_create_foreign_key;
409: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_CREATED');
410: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
411: FND_MSG_PUB.Add;
412: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
413: SUBSTR (SQLERRM, 1, 240) );
414: FND_MSG_PUB.Count_And_Get (
415: p_count => p_msg_count,
416: p_data => p_msg_data);

Line 414: FND_MSG_PUB.Count_And_Get (

410: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
411: FND_MSG_PUB.Add;
412: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
413: SUBSTR (SQLERRM, 1, 240) );
414: FND_MSG_PUB.Count_And_Get (
415: p_count => p_msg_count,
416: p_data => p_msg_data);
417: end CREATE_FOREIGN_KEY;
418:

Line 517: FND_MSG_PUB.initialize;

513:
514: -- Initialize the message table if requested.
515:
516: if p_init_msg_tbl then
517: FND_MSG_PUB.initialize;
518: end if;
519:
520: savepoint start_create_key_column;
521:

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

525: p_return_status => l_return_status,
526: p_foreign_key_name => p_foreign_key_name,
527: p_attribute_application_id => p_attribute_application_id,
528: p_attribute_code => p_attribute_code) then
529: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
530: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_EXISTS');
531: FND_MSG_PUB.Add;
532: end if;
533: raise FND_API.G_EXC_ERROR;

Line 531: FND_MSG_PUB.Add;

527: p_attribute_application_id => p_attribute_application_id,
528: p_attribute_code => p_attribute_code) then
529: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
530: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_EXISTS');
531: FND_MSG_PUB.Add;
532: end if;
533: raise FND_API.G_EXC_ERROR;
534: end if;
535:

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

708: l_last_updated_by,
709: l_last_update_login
710: );
711:
712: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
713: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_CREATED');
714: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
715: ' ' || to_char(p_attribute_application_id) ||
716: ' ' || p_attribute_code);

Line 717: FND_MSG_PUB.Add;

713: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_CREATED');
714: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
715: ' ' || to_char(p_attribute_application_id) ||
716: ' ' || p_attribute_code);
717: FND_MSG_PUB.Add;
718: end if;
719:
720: p_return_status := FND_API.G_RET_STS_SUCCESS;
721:

Line 722: FND_MSG_PUB.Count_And_Get (

718: end if;
719:
720: p_return_status := FND_API.G_RET_STS_SUCCESS;
721:
722: FND_MSG_PUB.Count_And_Get (
723: p_count => p_msg_count,
724: p_data => p_msg_data);
725:
726: EXCEPTION

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

724: p_data => p_msg_data);
725:
726: EXCEPTION
727: WHEN VALUE_ERROR THEN
728: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
729: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_VALUE_ERROR');
730: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
731: ' ' || to_char(p_attribute_application_id) ||
732: ' ' || p_attribute_code);

Line 733: FND_MSG_PUB.Add;

729: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_VALUE_ERROR');
730: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
731: ' ' || to_char(p_attribute_application_id) ||
732: ' ' || p_attribute_code);
733: FND_MSG_PUB.Add;
734: end if;
735: p_return_status := FND_API.G_RET_STS_ERROR;
736: rollback to start_create_key_column;
737: FND_MSG_PUB.Count_And_Get (

Line 737: FND_MSG_PUB.Count_And_Get (

733: FND_MSG_PUB.Add;
734: end if;
735: p_return_status := FND_API.G_RET_STS_ERROR;
736: rollback to start_create_key_column;
737: FND_MSG_PUB.Count_And_Get (
738: p_count => p_msg_count,
739: p_data => p_msg_data);
740: WHEN FND_API.G_EXC_ERROR THEN
741: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

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

737: FND_MSG_PUB.Count_And_Get (
738: p_count => p_msg_count,
739: p_data => p_msg_data);
740: WHEN FND_API.G_EXC_ERROR THEN
741: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
742: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_CREATED');
743: FND_MESSAGE.SET_TOKEN('OBJECT','AK_FOREIGN_KEY_COLUMN',TRUE);
744: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
745: ' ' || to_char(p_attribute_application_id) ||

Line 747: FND_MSG_PUB.Add;

743: FND_MESSAGE.SET_TOKEN('OBJECT','AK_FOREIGN_KEY_COLUMN',TRUE);
744: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
745: ' ' || to_char(p_attribute_application_id) ||
746: ' ' || p_attribute_code);
747: FND_MSG_PUB.Add;
748: end if;
749: p_return_status := FND_API.G_RET_STS_ERROR;
750: rollback to start_create_key_column;
751: FND_MSG_PUB.Count_And_Get (

Line 751: FND_MSG_PUB.Count_And_Get (

747: FND_MSG_PUB.Add;
748: end if;
749: p_return_status := FND_API.G_RET_STS_ERROR;
750: rollback to start_create_key_column;
751: FND_MSG_PUB.Count_And_Get (
752: p_count => p_msg_count,
753: p_data => p_msg_data);
754: WHEN OTHERS THEN
755: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 762: FND_MSG_PUB.Add;

758: FND_MESSAGE.SET_TOKEN('OBJECT','AK_FOREIGN_KEY_COLUMN',TRUE);
759: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
760: ' ' || to_char(p_attribute_application_id) ||
761: ' ' || p_attribute_code);
762: FND_MSG_PUB.Add;
763: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
764: SUBSTR (SQLERRM, 1, 240) );
765: FND_MSG_PUB.Add;
766: FND_MSG_PUB.Count_And_Get (

Line 763: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

759: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
760: ' ' || to_char(p_attribute_application_id) ||
761: ' ' || p_attribute_code);
762: FND_MSG_PUB.Add;
763: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
764: SUBSTR (SQLERRM, 1, 240) );
765: FND_MSG_PUB.Add;
766: FND_MSG_PUB.Count_And_Get (
767: p_count => p_msg_count,

Line 765: FND_MSG_PUB.Add;

761: ' ' || p_attribute_code);
762: FND_MSG_PUB.Add;
763: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
764: SUBSTR (SQLERRM, 1, 240) );
765: FND_MSG_PUB.Add;
766: FND_MSG_PUB.Count_And_Get (
767: p_count => p_msg_count,
768: p_data => p_msg_data);
769: end CREATE_FOREIGN_KEY_COLUMN;

Line 766: FND_MSG_PUB.Count_And_Get (

762: FND_MSG_PUB.Add;
763: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
764: SUBSTR (SQLERRM, 1, 240) );
765: FND_MSG_PUB.Add;
766: FND_MSG_PUB.Count_And_Get (
767: p_count => p_msg_count,
768: p_data => p_msg_data);
769: end CREATE_FOREIGN_KEY_COLUMN;
770:

Line 869: FND_MSG_PUB.initialize;

865:
866: -- Initialize the message table if requested.
867:
868: if p_init_msg_tbl then
869: FND_MSG_PUB.initialize;
870: end if;
871:
872: savepoint start_create_unique_key;
873:

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

875: if AK_KEY_PVT.UNIQUE_KEY_EXISTS (
876: p_api_version_number => 1.0,
877: p_return_status => l_return_status,
878: p_unique_key_name => p_unique_key_name) then
879: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
880: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_EXISTS');
881: FND_MSG_PUB.Add;
882: end if;
883: raise FND_API.G_EXC_ERROR;

Line 881: FND_MSG_PUB.Add;

877: p_return_status => l_return_status,
878: p_unique_key_name => p_unique_key_name) then
879: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
880: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_EXISTS');
881: FND_MSG_PUB.Add;
882: end if;
883: raise FND_API.G_EXC_ERROR;
884: end if;
885:

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

1055: l_last_updated_by,
1056: l_last_update_login
1057: );
1058:
1059: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1060: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_CREATED');
1061: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1062: FND_MSG_PUB.Add;
1063: end if;

Line 1062: FND_MSG_PUB.Add;

1058:
1059: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1060: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_CREATED');
1061: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1062: FND_MSG_PUB.Add;
1063: end if;
1064:
1065: p_return_status := FND_API.G_RET_STS_SUCCESS;
1066:

Line 1067: FND_MSG_PUB.Count_And_Get (

1063: end if;
1064:
1065: p_return_status := FND_API.G_RET_STS_SUCCESS;
1066:
1067: FND_MSG_PUB.Count_And_Get (
1068: p_count => p_msg_count,
1069: p_data => p_msg_data);
1070:
1071: EXCEPTION

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

1069: p_data => p_msg_data);
1070:
1071: EXCEPTION
1072: WHEN VALUE_ERROR THEN
1073: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1074: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_VALUE_ERROR');
1075: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1076: FND_MSG_PUB.Add;
1077: end if;

Line 1076: FND_MSG_PUB.Add;

1072: WHEN VALUE_ERROR THEN
1073: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1074: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_VALUE_ERROR');
1075: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1076: FND_MSG_PUB.Add;
1077: end if;
1078: p_return_status := FND_API.G_RET_STS_ERROR;
1079: rollback to start_create_unique_key;
1080: FND_MSG_PUB.Count_And_Get (

Line 1080: FND_MSG_PUB.Count_And_Get (

1076: FND_MSG_PUB.Add;
1077: end if;
1078: p_return_status := FND_API.G_RET_STS_ERROR;
1079: rollback to start_create_unique_key;
1080: FND_MSG_PUB.Count_And_Get (
1081: p_count => p_msg_count,
1082: p_data => p_msg_data);
1083: WHEN FND_API.G_EXC_ERROR THEN
1084: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

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

1080: FND_MSG_PUB.Count_And_Get (
1081: p_count => p_msg_count,
1082: p_data => p_msg_data);
1083: WHEN FND_API.G_EXC_ERROR THEN
1084: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1085: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_CREATED');
1086: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1087: FND_MSG_PUB.Add;
1088: end if;

Line 1087: FND_MSG_PUB.Add;

1083: WHEN FND_API.G_EXC_ERROR THEN
1084: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1085: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_CREATED');
1086: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1087: FND_MSG_PUB.Add;
1088: end if;
1089: p_return_status := FND_API.G_RET_STS_ERROR;
1090: rollback to start_create_unique_key;
1091: FND_MSG_PUB.Count_And_Get (

Line 1091: FND_MSG_PUB.Count_And_Get (

1087: FND_MSG_PUB.Add;
1088: end if;
1089: p_return_status := FND_API.G_RET_STS_ERROR;
1090: rollback to start_create_unique_key;
1091: FND_MSG_PUB.Count_And_Get (
1092: p_count => p_msg_count,
1093: p_data => p_msg_data);
1094: WHEN OTHERS THEN
1095: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1097: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1093: p_data => p_msg_data);
1094: WHEN OTHERS THEN
1095: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1096: rollback to start_create_unique_key;
1097: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1098: SUBSTR (SQLERRM, 1, 240) );
1099: FND_MSG_PUB.Add;
1100: FND_MSG_PUB.Count_And_Get (
1101: p_count => p_msg_count,

Line 1099: FND_MSG_PUB.Add;

1095: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1096: rollback to start_create_unique_key;
1097: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1098: SUBSTR (SQLERRM, 1, 240) );
1099: FND_MSG_PUB.Add;
1100: FND_MSG_PUB.Count_And_Get (
1101: p_count => p_msg_count,
1102: p_data => p_msg_data);
1103: end CREATE_UNIQUE_KEY;

Line 1100: FND_MSG_PUB.Count_And_Get (

1096: rollback to start_create_unique_key;
1097: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1098: SUBSTR (SQLERRM, 1, 240) );
1099: FND_MSG_PUB.Add;
1100: FND_MSG_PUB.Count_And_Get (
1101: p_count => p_msg_count,
1102: p_data => p_msg_data);
1103: end CREATE_UNIQUE_KEY;
1104:

Line 1203: FND_MSG_PUB.initialize;

1199:
1200: -- Initialize the message table if requested.
1201:
1202: if p_init_msg_tbl then
1203: FND_MSG_PUB.initialize;
1204: end if;
1205:
1206: savepoint start_create_key_column;
1207:

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

1211: p_return_status => l_return_status,
1212: p_unique_key_name => p_unique_key_name,
1213: p_attribute_application_id => p_attribute_application_id,
1214: p_attribute_code => p_attribute_code) then
1215: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1216: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_EXISTS');
1217: FND_MSG_PUB.Add;
1218: end if;
1219: raise FND_API.G_EXC_ERROR;

Line 1217: FND_MSG_PUB.Add;

1213: p_attribute_application_id => p_attribute_application_id,
1214: p_attribute_code => p_attribute_code) then
1215: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1216: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_EXISTS');
1217: FND_MSG_PUB.Add;
1218: end if;
1219: raise FND_API.G_EXC_ERROR;
1220: end if;
1221:

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

1395: l_last_updated_by,
1396: l_last_update_login
1397: );
1398:
1399: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1400: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_CREATED');
1401: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
1402: to_char(p_attribute_application_id) || ' "' ||
1403: p_attribute_code || '"');

Line 1404: FND_MSG_PUB.Add;

1400: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_CREATED');
1401: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
1402: to_char(p_attribute_application_id) || ' "' ||
1403: p_attribute_code || '"');
1404: FND_MSG_PUB.Add;
1405: end if;
1406:
1407: p_return_status := FND_API.G_RET_STS_SUCCESS;
1408:

Line 1409: FND_MSG_PUB.Count_And_Get (

1405: end if;
1406:
1407: p_return_status := FND_API.G_RET_STS_SUCCESS;
1408:
1409: FND_MSG_PUB.Count_And_Get (
1410: p_count => p_msg_count,
1411: p_data => p_msg_data);
1412:
1413: EXCEPTION

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

1411: p_data => p_msg_data);
1412:
1413: EXCEPTION
1414: WHEN VALUE_ERROR THEN
1415: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1416: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_VALUE_ERROR');
1417: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
1418: to_char(p_attribute_application_id) || ' "' ||
1419: p_attribute_code || '"');

Line 1420: FND_MSG_PUB.Add;

1416: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_VALUE_ERROR');
1417: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
1418: to_char(p_attribute_application_id) || ' "' ||
1419: p_attribute_code || '"');
1420: FND_MSG_PUB.Add;
1421: end if;
1422: p_return_status := FND_API.G_RET_STS_ERROR;
1423: rollback to start_create_key_column;
1424: FND_MSG_PUB.Count_And_Get (

Line 1424: FND_MSG_PUB.Count_And_Get (

1420: FND_MSG_PUB.Add;
1421: end if;
1422: p_return_status := FND_API.G_RET_STS_ERROR;
1423: rollback to start_create_key_column;
1424: FND_MSG_PUB.Count_And_Get (
1425: p_count => p_msg_count,
1426: p_data => p_msg_data);
1427: WHEN FND_API.G_EXC_ERROR THEN
1428: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

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

1424: FND_MSG_PUB.Count_And_Get (
1425: p_count => p_msg_count,
1426: p_data => p_msg_data);
1427: WHEN FND_API.G_EXC_ERROR THEN
1428: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1429: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_CREATED');
1430: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
1431: to_char(p_attribute_application_id) || ' "' ||
1432: p_attribute_code || '"');

Line 1433: FND_MSG_PUB.Add;

1429: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_CREATED');
1430: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
1431: to_char(p_attribute_application_id) || ' "' ||
1432: p_attribute_code || '"');
1433: FND_MSG_PUB.Add;
1434: end if;
1435: p_return_status := FND_API.G_RET_STS_ERROR;
1436: rollback to start_create_key_column;
1437: FND_MSG_PUB.Count_And_Get (

Line 1437: FND_MSG_PUB.Count_And_Get (

1433: FND_MSG_PUB.Add;
1434: end if;
1435: p_return_status := FND_API.G_RET_STS_ERROR;
1436: rollback to start_create_key_column;
1437: FND_MSG_PUB.Count_And_Get (
1438: p_count => p_msg_count,
1439: p_data => p_msg_data);
1440: WHEN OTHERS THEN
1441: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1443: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1439: p_data => p_msg_data);
1440: WHEN OTHERS THEN
1441: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1442: rollback to start_create_key_column;
1443: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1444: SUBSTR (SQLERRM, 1, 240) );
1445: FND_MSG_PUB.Add;
1446: FND_MSG_PUB.Count_And_Get (
1447: p_count => p_msg_count,

Line 1445: FND_MSG_PUB.Add;

1441: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1442: rollback to start_create_key_column;
1443: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1444: SUBSTR (SQLERRM, 1, 240) );
1445: FND_MSG_PUB.Add;
1446: FND_MSG_PUB.Count_And_Get (
1447: p_count => p_msg_count,
1448: p_data => p_msg_data);
1449: end CREATE_UNIQUE_KEY_COLUMN;

Line 1446: FND_MSG_PUB.Count_And_Get (

1442: rollback to start_create_key_column;
1443: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1444: SUBSTR (SQLERRM, 1, 240) );
1445: FND_MSG_PUB.Add;
1446: FND_MSG_PUB.Count_And_Get (
1447: p_count => p_msg_count,
1448: p_data => p_msg_data);
1449: end CREATE_UNIQUE_KEY_COLUMN;
1450:

Line 1524: FND_MSG_PUB.initialize;

1520:
1521: -- Initialize the message table if requested.
1522:
1523: if p_init_msg_tbl then
1524: FND_MSG_PUB.initialize;
1525: end if;
1526:
1527: savepoint start_delete_foreign_key;
1528:

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

1532: if NOT AK_KEY_PVT.FOREIGN_KEY_EXISTS (
1533: p_api_version_number => 1.0,
1534: p_return_status => l_return_status,
1535: p_foreign_key_name => p_foreign_key_name) then
1536: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1537: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1538: FND_MSG_PUB.Add;
1539: end if;
1540: raise FND_API.G_EXC_ERROR;

Line 1538: FND_MSG_PUB.Add;

1534: p_return_status => l_return_status,
1535: p_foreign_key_name => p_foreign_key_name) then
1536: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1537: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1538: FND_MSG_PUB.Add;
1539: end if;
1540: raise FND_API.G_EXC_ERROR;
1541: end if;
1542:

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

1551: open l_get_columns_csr;
1552: fetch l_get_columns_csr into l_attribute_appl_id, l_attribute_code;
1553: if l_get_columns_csr%found then
1554: close l_get_columns_csr;
1555: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1556: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_FK_FKC');
1557: FND_MSG_PUB.Add;
1558: end if;
1559: raise FND_API.G_EXC_ERROR;

Line 1557: FND_MSG_PUB.Add;

1553: if l_get_columns_csr%found then
1554: close l_get_columns_csr;
1555: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1556: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_FK_FKC');
1557: FND_MSG_PUB.Add;
1558: end if;
1559: raise FND_API.G_EXC_ERROR;
1560: end if;
1561: close l_get_columns_csr;

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

1569: l_to_page_appl_id, l_to_page_code,
1570: l_to_region_appl_id, l_to_region_code;
1571: if l_get_relations_csr%found then
1572: close l_get_relations_csr;
1573: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1574: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_FK_REL');
1575: FND_MSG_PUB.Add;
1576: end if;
1577: raise FND_API.G_EXC_ERROR;

Line 1575: FND_MSG_PUB.Add;

1571: if l_get_relations_csr%found then
1572: close l_get_relations_csr;
1573: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1574: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_FK_REL');
1575: FND_MSG_PUB.Add;
1576: end if;
1577: raise FND_API.G_EXC_ERROR;
1578: end if;
1579: close l_get_relations_csr;

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

1653: delete from ak_foreign_keys
1654: where foreign_key_name = p_foreign_key_name;
1655:
1656: if (sql%notfound) then
1657: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1658: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1659: FND_MSG_PUB.Add;
1660: end if;
1661: raise FND_API.G_EXC_ERROR;

Line 1659: FND_MSG_PUB.Add;

1655:
1656: if (sql%notfound) then
1657: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1658: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1659: FND_MSG_PUB.Add;
1660: end if;
1661: raise FND_API.G_EXC_ERROR;
1662: end if;
1663:

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

1664: delete from ak_foreign_keys_tl
1665: where foreign_key_name = p_foreign_key_name;
1666:
1667: if (sql%notfound) then
1668: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1669: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1670: FND_MSG_PUB.Add;
1671: end if;
1672: raise FND_API.G_EXC_ERROR;

Line 1670: FND_MSG_PUB.Add;

1666:
1667: if (sql%notfound) then
1668: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1669: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1670: FND_MSG_PUB.Add;
1671: end if;
1672: raise FND_API.G_EXC_ERROR;
1673: end if;
1674:

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

1674:
1675: --
1676: -- Load success message
1677: --
1678: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
1679: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DELETED');
1680: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
1681: FND_MSG_PUB.Add;
1682: end if;

Line 1681: FND_MSG_PUB.Add;

1677: --
1678: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
1679: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DELETED');
1680: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
1681: FND_MSG_PUB.Add;
1682: end if;
1683:
1684: p_return_status := FND_API.G_RET_STS_SUCCESS;
1685:

Line 1686: FND_MSG_PUB.Count_And_Get (

1682: end if;
1683:
1684: p_return_status := FND_API.G_RET_STS_SUCCESS;
1685:
1686: FND_MSG_PUB.Count_And_Get (
1687: p_count => p_msg_count,
1688: p_data => p_msg_data);
1689:
1690: EXCEPTION

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

1688: p_data => p_msg_data);
1689:
1690: EXCEPTION
1691: WHEN FND_API.G_EXC_ERROR THEN
1692: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1693: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_DELETED');
1694: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
1695: FND_MSG_PUB.Add;
1696: end if;

Line 1695: FND_MSG_PUB.Add;

1691: WHEN FND_API.G_EXC_ERROR THEN
1692: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1693: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_DELETED');
1694: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
1695: FND_MSG_PUB.Add;
1696: end if;
1697: p_return_status := FND_API.G_RET_STS_ERROR;
1698: rollback to start_delete_foreign_key;
1699: FND_MSG_PUB.Count_And_Get (

Line 1699: FND_MSG_PUB.Count_And_Get (

1695: FND_MSG_PUB.Add;
1696: end if;
1697: p_return_status := FND_API.G_RET_STS_ERROR;
1698: rollback to start_delete_foreign_key;
1699: FND_MSG_PUB.Count_And_Get (
1700: p_count => p_msg_count,
1701: p_data => p_msg_data);
1702: WHEN OTHERS THEN
1703: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1705: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1701: p_data => p_msg_data);
1702: WHEN OTHERS THEN
1703: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704: rollback to start_delete_foreign_key;
1705: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1706: SUBSTR (SQLERRM, 1, 240) );
1707: FND_MSG_PUB.Add;
1708: FND_MSG_PUB.Count_And_Get (
1709: p_count => p_msg_count,

Line 1707: FND_MSG_PUB.Add;

1703: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704: rollback to start_delete_foreign_key;
1705: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1706: SUBSTR (SQLERRM, 1, 240) );
1707: FND_MSG_PUB.Add;
1708: FND_MSG_PUB.Count_And_Get (
1709: p_count => p_msg_count,
1710: p_data => p_msg_data);
1711: end DELETE_FOREIGN_KEY;

Line 1708: FND_MSG_PUB.Count_And_Get (

1704: rollback to start_delete_foreign_key;
1705: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1706: SUBSTR (SQLERRM, 1, 240) );
1707: FND_MSG_PUB.Add;
1708: FND_MSG_PUB.Count_And_Get (
1709: p_count => p_msg_count,
1710: p_data => p_msg_data);
1711: end DELETE_FOREIGN_KEY;
1712:

Line 1766: FND_MSG_PUB.initialize;

1762:
1763: -- Initialize the message table if requested.
1764:
1765: if p_init_msg_tbl then
1766: FND_MSG_PUB.initialize;
1767: end if;
1768:
1769: savepoint start_delete_key_column;
1770:

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

1776: p_return_status => l_return_status,
1777: p_foreign_key_name => p_foreign_key_name,
1778: p_attribute_application_id => p_attribute_application_id,
1779: p_attribute_code => p_attribute_code) then
1780: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1781: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
1782: FND_MSG_PUB.Add;
1783: end if;
1784: raise FND_API.G_EXC_ERROR;

Line 1782: FND_MSG_PUB.Add;

1778: p_attribute_application_id => p_attribute_application_id,
1779: p_attribute_code => p_attribute_code) then
1780: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1781: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
1782: FND_MSG_PUB.Add;
1783: end if;
1784: raise FND_API.G_EXC_ERROR;
1785: end if;
1786:

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

1811: and attribute_application_id = p_attribute_application_id
1812: and attribute_code = p_attribute_code;
1813:
1814: if (sql%notfound) then
1815: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1816: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
1817: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_FOREIGN_KEY_COLUMN',TRUE);
1818: FND_MSG_PUB.Add;
1819: end if;

Line 1818: FND_MSG_PUB.Add;

1814: if (sql%notfound) then
1815: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1816: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
1817: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_FOREIGN_KEY_COLUMN',TRUE);
1818: FND_MSG_PUB.Add;
1819: end if;
1820: raise FND_API.G_EXC_ERROR;
1821: end if;
1822:

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

1822:
1823: --
1824: -- Load success message
1825: --
1826: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
1827: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DELETED');
1828: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
1829: ' ' || to_char(p_attribute_application_id) ||
1830: ' ' || p_attribute_code);

Line 1831: FND_MSG_PUB.Add;

1827: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DELETED');
1828: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
1829: ' ' || to_char(p_attribute_application_id) ||
1830: ' ' || p_attribute_code);
1831: FND_MSG_PUB.Add;
1832: end if;
1833:
1834: p_return_status := FND_API.G_RET_STS_SUCCESS;
1835:

Line 1836: FND_MSG_PUB.Count_And_Get (

1832: end if;
1833:
1834: p_return_status := FND_API.G_RET_STS_SUCCESS;
1835:
1836: FND_MSG_PUB.Count_And_Get (
1837: p_count => p_msg_count,
1838: p_data => p_msg_data);
1839:
1840: EXCEPTION

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

1838: p_data => p_msg_data);
1839:
1840: EXCEPTION
1841: WHEN FND_API.G_EXC_ERROR THEN
1842: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1843: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_DELETED');
1844: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
1845: ' ' || to_char(p_attribute_application_id) ||
1846: ' ' || p_attribute_code);

Line 1847: FND_MSG_PUB.Add;

1843: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_DELETED');
1844: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
1845: ' ' || to_char(p_attribute_application_id) ||
1846: ' ' || p_attribute_code);
1847: FND_MSG_PUB.Add;
1848: end if;
1849: p_return_status := FND_API.G_RET_STS_ERROR;
1850: rollback to start_delete_key_column;
1851: FND_MSG_PUB.Count_And_Get (

Line 1851: FND_MSG_PUB.Count_And_Get (

1847: FND_MSG_PUB.Add;
1848: end if;
1849: p_return_status := FND_API.G_RET_STS_ERROR;
1850: rollback to start_delete_key_column;
1851: FND_MSG_PUB.Count_And_Get (
1852: p_count => p_msg_count,
1853: p_data => p_msg_data);
1854: WHEN OTHERS THEN
1855: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1857: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

1853: p_data => p_msg_data);
1854: WHEN OTHERS THEN
1855: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1856: rollback to start_delete_key_column;
1857: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1858: SUBSTR (SQLERRM, 1, 240) );
1859: FND_MSG_PUB.Add;
1860: FND_MSG_PUB.Count_And_Get (
1861: p_count => p_msg_count,

Line 1859: FND_MSG_PUB.Add;

1855: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1856: rollback to start_delete_key_column;
1857: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1858: SUBSTR (SQLERRM, 1, 240) );
1859: FND_MSG_PUB.Add;
1860: FND_MSG_PUB.Count_And_Get (
1861: p_count => p_msg_count,
1862: p_data => p_msg_data);
1863: end DELETE_FOREIGN_KEY_COLUMN;

Line 1860: FND_MSG_PUB.Count_And_Get (

1856: rollback to start_delete_key_column;
1857: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1858: SUBSTR (SQLERRM, 1, 240) );
1859: FND_MSG_PUB.Add;
1860: FND_MSG_PUB.Count_And_Get (
1861: p_count => p_msg_count,
1862: p_data => p_msg_data);
1863: end DELETE_FOREIGN_KEY_COLUMN;
1864:

Line 1928: FND_MSG_PUB.initialize;

1924:
1925: -- Initialize the message table if requested.
1926:
1927: if p_init_msg_tbl then
1928: FND_MSG_PUB.initialize;
1929: end if;
1930:
1931: savepoint start_delete_unique_key;
1932:

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

1936: if NOT AK_KEY_PVT.UNIQUE_KEY_EXISTS (
1937: p_api_version_number => 1.0,
1938: p_return_status => l_return_status,
1939: p_unique_key_name => p_unique_key_name) then
1940: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1941: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DOES_NOT_EXIST');
1942: FND_MSG_PUB.Add;
1943: end if;
1944: raise FND_API.G_EXC_ERROR;

Line 1942: FND_MSG_PUB.Add;

1938: p_return_status => l_return_status,
1939: p_unique_key_name => p_unique_key_name) then
1940: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1941: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DOES_NOT_EXIST');
1942: FND_MSG_PUB.Add;
1943: end if;
1944: raise FND_API.G_EXC_ERROR;
1945: end if;
1946:

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

1955: open l_get_columns_csr;
1956: fetch l_get_columns_csr into l_attribute_appl_id, l_attribute_code;
1957: if l_get_columns_csr%found then
1958: close l_get_columns_csr;
1959: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1960: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UK_UKC');
1961: FND_MSG_PUB.Add;
1962: end if;
1963: raise FND_API.G_EXC_ERROR;

Line 1961: FND_MSG_PUB.Add;

1957: if l_get_columns_csr%found then
1958: close l_get_columns_csr;
1959: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1960: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UK_UKC');
1961: FND_MSG_PUB.Add;
1962: end if;
1963: raise FND_API.G_EXC_ERROR;
1964: end if;
1965: close l_get_columns_csr;

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

1969: open l_get_fk_csr;
1970: fetch l_get_fk_csr into l_foreign_key_name;
1971: if l_get_fk_csr%found then
1972: close l_get_fk_csr;
1973: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1974: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UK_FK');
1975: FND_MSG_PUB.Add;
1976: end if;
1977: raise FND_API.G_EXC_ERROR;

Line 1975: FND_MSG_PUB.Add;

1971: if l_get_fk_csr%found then
1972: close l_get_fk_csr;
1973: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1974: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UK_FK');
1975: FND_MSG_PUB.Add;
1976: end if;
1977: raise FND_API.G_EXC_ERROR;
1978: end if;
1979: close l_get_fk_csr;

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

2039: delete from ak_unique_keys
2040: where unique_key_name = p_unique_key_name;
2041:
2042: if (sql%notfound) then
2043: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2044: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DOES_NOT_EXIST');
2045: FND_MSG_PUB.Add;
2046: end if;
2047: raise FND_API.G_EXC_ERROR;

Line 2045: FND_MSG_PUB.Add;

2041:
2042: if (sql%notfound) then
2043: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2044: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DOES_NOT_EXIST');
2045: FND_MSG_PUB.Add;
2046: end if;
2047: raise FND_API.G_EXC_ERROR;
2048: end if;
2049:

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

2049:
2050: --
2051: -- Load success message
2052: --
2053: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
2054: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DELETED');
2055: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
2056: FND_MSG_PUB.Add;
2057: end if;

Line 2056: FND_MSG_PUB.Add;

2052: --
2053: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
2054: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DELETED');
2055: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
2056: FND_MSG_PUB.Add;
2057: end if;
2058:
2059: p_return_status := FND_API.G_RET_STS_SUCCESS;
2060:

Line 2061: FND_MSG_PUB.Count_And_Get (

2057: end if;
2058:
2059: p_return_status := FND_API.G_RET_STS_SUCCESS;
2060:
2061: FND_MSG_PUB.Count_And_Get (
2062: p_count => p_msg_count,
2063: p_data => p_msg_data);
2064:
2065: EXCEPTION

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

2063: p_data => p_msg_data);
2064:
2065: EXCEPTION
2066: WHEN FND_API.G_EXC_ERROR THEN
2067: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2068: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_DELETED');
2069: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
2070: FND_MSG_PUB.Add;
2071: end if;

Line 2070: FND_MSG_PUB.Add;

2066: WHEN FND_API.G_EXC_ERROR THEN
2067: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2068: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_DELETED');
2069: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
2070: FND_MSG_PUB.Add;
2071: end if;
2072: p_return_status := FND_API.G_RET_STS_ERROR;
2073: rollback to start_delete_unique_key;
2074: FND_MSG_PUB.Count_And_Get (

Line 2074: FND_MSG_PUB.Count_And_Get (

2070: FND_MSG_PUB.Add;
2071: end if;
2072: p_return_status := FND_API.G_RET_STS_ERROR;
2073: rollback to start_delete_unique_key;
2074: FND_MSG_PUB.Count_And_Get (
2075: p_count => p_msg_count,
2076: p_data => p_msg_data);
2077: WHEN OTHERS THEN
2078: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2080: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

2076: p_data => p_msg_data);
2077: WHEN OTHERS THEN
2078: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2079: rollback to start_delete_unique_key;
2080: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2081: SUBSTR (SQLERRM, 1, 240) );
2082: FND_MSG_PUB.Add;
2083: FND_MSG_PUB.Count_And_Get (
2084: p_count => p_msg_count,

Line 2082: FND_MSG_PUB.Add;

2078: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2079: rollback to start_delete_unique_key;
2080: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2081: SUBSTR (SQLERRM, 1, 240) );
2082: FND_MSG_PUB.Add;
2083: FND_MSG_PUB.Count_And_Get (
2084: p_count => p_msg_count,
2085: p_data => p_msg_data);
2086: end DELETE_UNIQUE_KEY;

Line 2083: FND_MSG_PUB.Count_And_Get (

2079: rollback to start_delete_unique_key;
2080: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2081: SUBSTR (SQLERRM, 1, 240) );
2082: FND_MSG_PUB.Add;
2083: FND_MSG_PUB.Count_And_Get (
2084: p_count => p_msg_count,
2085: p_data => p_msg_data);
2086: end DELETE_UNIQUE_KEY;
2087:

Line 2159: FND_MSG_PUB.initialize;

2155:
2156: -- Initialize the message table if requested.
2157:
2158: if p_init_msg_tbl then
2159: FND_MSG_PUB.initialize;
2160: end if;
2161:
2162: savepoint start_delete_key_column;
2163:

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

2169: p_return_status => l_return_status,
2170: p_unique_key_name => p_unique_key_name,
2171: p_attribute_application_id => p_attribute_application_id,
2172: p_attribute_code => p_attribute_code) then
2173: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2174: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DOES_NOT_EXIST');
2175: FND_MSG_PUB.Add;
2176: end if;
2177: raise FND_API.G_EXC_ERROR;

Line 2175: FND_MSG_PUB.Add;

2171: p_attribute_application_id => p_attribute_application_id,
2172: p_attribute_code => p_attribute_code) then
2173: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2174: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DOES_NOT_EXIST');
2175: FND_MSG_PUB.Add;
2176: end if;
2177: raise FND_API.G_EXC_ERROR;
2178: end if;
2179:

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

2192: fetch l_get_fkc_csr into l_foreign_key_name, l_attribute_appl_id,
2193: l_attribute_code;
2194: if l_get_fkc_csr%found then
2195: close l_get_fkc_csr;
2196: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2197: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UKC_FKC');
2198: FND_MSG_PUB.Add;
2199: end if;
2200: raise FND_API.G_EXC_ERROR;

Line 2198: FND_MSG_PUB.Add;

2194: if l_get_fkc_csr%found then
2195: close l_get_fkc_csr;
2196: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2197: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UKC_FKC');
2198: FND_MSG_PUB.Add;
2199: end if;
2200: raise FND_API.G_EXC_ERROR;
2201: end if;
2202: close l_get_fkc_csr;

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

2240: and attribute_application_id = p_attribute_application_id
2241: and attribute_code = p_attribute_code;
2242:
2243: if (sql%notfound) then
2244: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2245: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DOES_NOT_EXIST');
2246: FND_MSG_PUB.Add;
2247: end if;
2248: raise FND_API.G_EXC_ERROR;

Line 2246: FND_MSG_PUB.Add;

2242:
2243: if (sql%notfound) then
2244: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2245: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DOES_NOT_EXIST');
2246: FND_MSG_PUB.Add;
2247: end if;
2248: raise FND_API.G_EXC_ERROR;
2249: end if;
2250:

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

2250:
2251: --
2252: -- Load success message
2253: --
2254: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
2255: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DELETED');
2256: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name ||
2257: ' ' || to_char(p_attribute_application_id) ||
2258: ' ' || p_attribute_code);

Line 2259: FND_MSG_PUB.Add;

2255: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DELETED');
2256: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name ||
2257: ' ' || to_char(p_attribute_application_id) ||
2258: ' ' || p_attribute_code);
2259: FND_MSG_PUB.Add;
2260: end if;
2261:
2262: p_return_status := FND_API.G_RET_STS_SUCCESS;
2263:

Line 2264: FND_MSG_PUB.Count_And_Get (

2260: end if;
2261:
2262: p_return_status := FND_API.G_RET_STS_SUCCESS;
2263:
2264: FND_MSG_PUB.Count_And_Get (
2265: p_count => p_msg_count,
2266: p_data => p_msg_data);
2267:
2268: EXCEPTION

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

2266: p_data => p_msg_data);
2267:
2268: EXCEPTION
2269: WHEN FND_API.G_EXC_ERROR THEN
2270: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2271: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_DELETED');
2272: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name ||
2273: ' ' || to_char(p_attribute_application_id) ||
2274: ' ' || p_attribute_code);

Line 2275: FND_MSG_PUB.Add;

2271: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_DELETED');
2272: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name ||
2273: ' ' || to_char(p_attribute_application_id) ||
2274: ' ' || p_attribute_code);
2275: FND_MSG_PUB.Add;
2276: end if;
2277: p_return_status := FND_API.G_RET_STS_ERROR;
2278: rollback to start_delete_key_column;
2279: FND_MSG_PUB.Count_And_Get (

Line 2279: FND_MSG_PUB.Count_And_Get (

2275: FND_MSG_PUB.Add;
2276: end if;
2277: p_return_status := FND_API.G_RET_STS_ERROR;
2278: rollback to start_delete_key_column;
2279: FND_MSG_PUB.Count_And_Get (
2280: p_count => p_msg_count,
2281: p_data => p_msg_data);
2282: WHEN OTHERS THEN
2283: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2285: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

2281: p_data => p_msg_data);
2282: WHEN OTHERS THEN
2283: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2284: rollback to start_delete_key_column;
2285: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2286: SUBSTR (SQLERRM, 1, 240) );
2287: FND_MSG_PUB.Add;
2288: FND_MSG_PUB.Count_And_Get (
2289: p_count => p_msg_count,

Line 2287: FND_MSG_PUB.Add;

2283: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2284: rollback to start_delete_key_column;
2285: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2286: SUBSTR (SQLERRM, 1, 240) );
2287: FND_MSG_PUB.Add;
2288: FND_MSG_PUB.Count_And_Get (
2289: p_count => p_msg_count,
2290: p_data => p_msg_data);
2291: end DELETE_UNIQUE_KEY_COLUMN;

Line 2288: FND_MSG_PUB.Count_And_Get (

2284: rollback to start_delete_key_column;
2285: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2286: SUBSTR (SQLERRM, 1, 240) );
2287: FND_MSG_PUB.Add;
2288: FND_MSG_PUB.Count_And_Get (
2289: p_count => p_msg_count,
2290: p_data => p_msg_data);
2291: end DELETE_UNIQUE_KEY_COLUMN;
2292:

Line 2354: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

2350: p_return_status := FND_API.G_RET_STS_ERROR;
2351: return FALSE;
2352: WHEN OTHERS THEN
2353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2354: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2355: SUBSTR (SQLERRM, 1, 240) );
2356: FND_MSG_PUB.Add;
2357: return FALSE;
2358:

Line 2356: FND_MSG_PUB.Add;

2352: WHEN OTHERS THEN
2353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2354: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2355: SUBSTR (SQLERRM, 1, 240) );
2356: FND_MSG_PUB.Add;
2357: return FALSE;
2358:
2359: end FOREIGN_KEY_EXISTS;
2360:

Line 2420: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

2416: p_return_status := FND_API.G_RET_STS_ERROR;
2417: return FALSE;
2418: WHEN OTHERS THEN
2419: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2420: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2421: SUBSTR (SQLERRM, 1, 240) );
2422: FND_MSG_PUB.Add;
2423: return FALSE;
2424:

Line 2422: FND_MSG_PUB.Add;

2418: WHEN OTHERS THEN
2419: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2420: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2421: SUBSTR (SQLERRM, 1, 240) );
2422: FND_MSG_PUB.Add;
2423: return FALSE;
2424:
2425: end FOREIGN_KEY_COLUMN_EXISTS;
2426:

Line 2481: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

2477: p_return_status := FND_API.G_RET_STS_ERROR;
2478: return FALSE;
2479: WHEN OTHERS THEN
2480: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2481: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2482: SUBSTR (SQLERRM, 1, 240) );
2483: FND_MSG_PUB.Add;
2484: return FALSE;
2485:

Line 2483: FND_MSG_PUB.Add;

2479: WHEN OTHERS THEN
2480: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2481: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2482: SUBSTR (SQLERRM, 1, 240) );
2483: FND_MSG_PUB.Add;
2484: return FALSE;
2485:
2486: end UNIQUE_KEY_EXISTS;
2487:

Line 2546: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

2542: p_return_status := FND_API.G_RET_STS_ERROR;
2543: return FALSE;
2544: WHEN OTHERS THEN
2545: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2546: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2547: SUBSTR (SQLERRM, 1, 240) );
2548: FND_MSG_PUB.Add;
2549: return FALSE;
2550:

Line 2548: FND_MSG_PUB.Add;

2544: WHEN OTHERS THEN
2545: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2546: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2547: SUBSTR (SQLERRM, 1, 240) );
2548: FND_MSG_PUB.Add;
2549: return FALSE;
2550:
2551: end UNIQUE_KEY_COLUMN_EXISTS;
2552:

Line 2652: FND_MSG_PUB.initialize;

2648:
2649: -- Initialize the message table if requested.
2650:
2651: if p_init_msg_tbl then
2652: FND_MSG_PUB.initialize;
2653: end if;
2654:
2655: savepoint start_update_foreign_key;
2656:

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

2660: --** retrieve ak_foreign_keys row if it exists **
2661: open l_get_row_csr;
2662: fetch l_get_row_csr into l_foreign_key_rec;
2663: if (l_get_row_csr%notfound) then
2664: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2665: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
2666: FND_MSG_PUB.Add;
2667: end if;
2668: --dbms_output.put_line('Error - Row does not exist');

Line 2666: FND_MSG_PUB.Add;

2662: fetch l_get_row_csr into l_foreign_key_rec;
2663: if (l_get_row_csr%notfound) then
2664: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2665: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
2666: FND_MSG_PUB.Add;
2667: end if;
2668: --dbms_output.put_line('Error - Row does not exist');
2669: close l_get_row_csr;
2670: raise FND_API.G_EXC_ERROR;

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

2674: --** retrieve ak_foreign_keys_tl row if it exists **
2675: open l_get_tl_row_csr(l_lang);
2676: fetch l_get_tl_row_csr into l_foreign_key_tl_rec;
2677: if (l_get_tl_row_csr%notfound) then
2678: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2679: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
2680: FND_MSG_PUB.Add;
2681: end if;
2682: --dbms_output.put_line('Error - TL Row does not exist');

Line 2680: FND_MSG_PUB.Add;

2676: fetch l_get_tl_row_csr into l_foreign_key_tl_rec;
2677: if (l_get_tl_row_csr%notfound) then
2678: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2679: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
2680: FND_MSG_PUB.Add;
2681: end if;
2682: --dbms_output.put_line('Error - TL Row does not exist');
2683: close l_get_tl_row_csr;
2684: raise FND_API.G_EXC_ERROR;

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

2856: LAST_UPDATED_BY = l_last_updated_by,
2857: LAST_UPDATE_LOGIN = l_last_update_login
2858: where foreign_key_name = p_foreign_key_name;
2859: if (sql%notfound) then
2860: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2861: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATE_FAILED');
2862: FND_MSG_PUB.Add;
2863: end if;
2864: -- dbms_output.put_line('Row does not exist during update');

Line 2862: FND_MSG_PUB.Add;

2858: where foreign_key_name = p_foreign_key_name;
2859: if (sql%notfound) then
2860: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2861: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATE_FAILED');
2862: FND_MSG_PUB.Add;
2863: end if;
2864: -- dbms_output.put_line('Row does not exist during update');
2865: raise FND_API.G_EXC_ERROR;
2866: end if;

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

2876: SOURCE_LANG = l_lang
2877: where foreign_key_name = p_foreign_key_name
2878: and l_lang in (LANGUAGE, SOURCE_LANG);
2879: if (sql%notfound) then
2880: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2881: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATE_FAILED');
2882: FND_MSG_PUB.Add;
2883: end if;
2884: --dbms_output.put_line('TL Row does not exist during update');

Line 2882: FND_MSG_PUB.Add;

2878: and l_lang in (LANGUAGE, SOURCE_LANG);
2879: if (sql%notfound) then
2880: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2881: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATE_FAILED');
2882: FND_MSG_PUB.Add;
2883: end if;
2884: --dbms_output.put_line('TL Row does not exist during update');
2885: raise FND_API.G_EXC_ERROR;
2886: end if;

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

2884: --dbms_output.put_line('TL Row does not exist during update');
2885: raise FND_API.G_EXC_ERROR;
2886: end if;
2887:
2888: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
2889: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATED');
2890: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2891: FND_MSG_PUB.Add;
2892: end if;

Line 2891: FND_MSG_PUB.Add;

2887:
2888: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
2889: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATED');
2890: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2891: FND_MSG_PUB.Add;
2892: end if;
2893:
2894: end if;
2895: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2897: FND_MSG_PUB.Count_And_Get (

2893:
2894: end if;
2895: p_return_status := FND_API.G_RET_STS_SUCCESS;
2896:
2897: FND_MSG_PUB.Count_And_Get (
2898: p_count => p_msg_count,
2899: p_data => p_msg_data);
2900:
2901: EXCEPTION

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

2899: p_data => p_msg_data);
2900:
2901: EXCEPTION
2902: WHEN VALUE_ERROR THEN
2903: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2904: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_VALUE_ERROR');
2905: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2906: FND_MSG_PUB.Add;
2907: end if;

Line 2906: FND_MSG_PUB.Add;

2902: WHEN VALUE_ERROR THEN
2903: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2904: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_VALUE_ERROR');
2905: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2906: FND_MSG_PUB.Add;
2907: end if;
2908: rollback to start_update_foreign_key;
2909: p_return_status := FND_API.G_RET_STS_ERROR;
2910: FND_MSG_PUB.Count_And_Get (

Line 2910: FND_MSG_PUB.Count_And_Get (

2906: FND_MSG_PUB.Add;
2907: end if;
2908: rollback to start_update_foreign_key;
2909: p_return_status := FND_API.G_RET_STS_ERROR;
2910: FND_MSG_PUB.Count_And_Get (
2911: p_count => p_msg_count,
2912: p_data => p_msg_data);
2913: WHEN FND_API.G_EXC_ERROR THEN
2914: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

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

2910: FND_MSG_PUB.Count_And_Get (
2911: p_count => p_msg_count,
2912: p_data => p_msg_data);
2913: WHEN FND_API.G_EXC_ERROR THEN
2914: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2915: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_UPDATED');
2916: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2917: FND_MSG_PUB.Add;
2918: end if;

Line 2917: FND_MSG_PUB.Add;

2913: WHEN FND_API.G_EXC_ERROR THEN
2914: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2915: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_UPDATED');
2916: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2917: FND_MSG_PUB.Add;
2918: end if;
2919: p_return_status := FND_API.G_RET_STS_ERROR;
2920: rollback to start_update_foreign_key;
2921: FND_MSG_PUB.Count_And_Get (

Line 2921: FND_MSG_PUB.Count_And_Get (

2917: FND_MSG_PUB.Add;
2918: end if;
2919: p_return_status := FND_API.G_RET_STS_ERROR;
2920: rollback to start_update_foreign_key;
2921: FND_MSG_PUB.Count_And_Get (
2922: p_count => p_msg_count,
2923: p_data => p_msg_data);
2924: WHEN OTHERS THEN
2925: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2927: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

2923: p_data => p_msg_data);
2924: WHEN OTHERS THEN
2925: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2926: rollback to start_update_foreign_key;
2927: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2928: SUBSTR (SQLERRM, 1, 240) );
2929: FND_MSG_PUB.Add;
2930: FND_MSG_PUB.Count_And_Get (
2931: p_count => p_msg_count,

Line 2929: FND_MSG_PUB.Add;

2925: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2926: rollback to start_update_foreign_key;
2927: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2928: SUBSTR (SQLERRM, 1, 240) );
2929: FND_MSG_PUB.Add;
2930: FND_MSG_PUB.Count_And_Get (
2931: p_count => p_msg_count,
2932: p_data => p_msg_data);
2933: end UPDATE_FOREIGN_KEY;

Line 2930: FND_MSG_PUB.Count_And_Get (

2926: rollback to start_update_foreign_key;
2927: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2928: SUBSTR (SQLERRM, 1, 240) );
2929: FND_MSG_PUB.Add;
2930: FND_MSG_PUB.Count_And_Get (
2931: p_count => p_msg_count,
2932: p_data => p_msg_data);
2933: end UPDATE_FOREIGN_KEY;
2934:

Line 3023: FND_MSG_PUB.initialize;

3019:
3020: -- Initialize the message table if requested.
3021:
3022: if p_init_msg_tbl then
3023: FND_MSG_PUB.initialize;
3024: end if;
3025:
3026: savepoint start_update_key_column;
3027:

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

3028: --** retrieve ak_foreign_key_columns row if it exists **
3029: open l_get_row_csr;
3030: fetch l_get_row_csr into l_key_column_rec;
3031: if (l_get_row_csr%notfound) then
3032: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3033: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
3034: FND_MSG_PUB.Add;
3035: end if;
3036: close l_get_row_csr;

Line 3034: FND_MSG_PUB.Add;

3030: fetch l_get_row_csr into l_key_column_rec;
3031: if (l_get_row_csr%notfound) then
3032: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3033: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
3034: FND_MSG_PUB.Add;
3035: end if;
3036: close l_get_row_csr;
3037: raise FND_API.G_EXC_ERROR;
3038: end if;

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

3180: where foreign_key_name = p_foreign_key_name
3181: and attribute_application_id = p_attribute_application_id
3182: and attribute_code = p_attribute_code;
3183: if (sql%notfound) then
3184: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3185: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_UPDATE_FAILED');
3186: FND_MSG_PUB.Add;
3187: end if;
3188: --dbms_output.put_line('Row does not exist during update');

Line 3186: FND_MSG_PUB.Add;

3182: and attribute_code = p_attribute_code;
3183: if (sql%notfound) then
3184: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3185: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_UPDATE_FAILED');
3186: FND_MSG_PUB.Add;
3187: end if;
3188: --dbms_output.put_line('Row does not exist during update');
3189: raise FND_API.G_EXC_ERROR;
3190: end if;

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

3188: --dbms_output.put_line('Row does not exist during update');
3189: raise FND_API.G_EXC_ERROR;
3190: end if;
3191:
3192: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3193: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_UPDATED');
3194: FND_MESSAGE.SET_TOKEN('OBJECT','AK_FOREIGN_KEY_COLUMN',TRUE);
3195: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
3196: ' ' || to_char(p_attribute_application_id) ||

Line 3198: FND_MSG_PUB.Add;

3194: FND_MESSAGE.SET_TOKEN('OBJECT','AK_FOREIGN_KEY_COLUMN',TRUE);
3195: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
3196: ' ' || to_char(p_attribute_application_id) ||
3197: ' ' || p_attribute_code);
3198: FND_MSG_PUB.Add;
3199: end if;
3200:
3201: end if;
3202: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3204: FND_MSG_PUB.Count_And_Get (

3200:
3201: end if;
3202: p_return_status := FND_API.G_RET_STS_SUCCESS;
3203:
3204: FND_MSG_PUB.Count_And_Get (
3205: p_count => p_msg_count,
3206: p_data => p_msg_data);
3207:
3208: EXCEPTION

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

3206: p_data => p_msg_data);
3207:
3208: EXCEPTION
3209: WHEN VALUE_ERROR THEN
3210: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3211: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_VALUE_ERROR');
3212: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
3213: ' ' || to_char(p_attribute_application_id) ||
3214: ' ' || p_attribute_code);

Line 3215: FND_MSG_PUB.Add;

3211: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_VALUE_ERROR');
3212: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
3213: ' ' || to_char(p_attribute_application_id) ||
3214: ' ' || p_attribute_code);
3215: FND_MSG_PUB.Add;
3216: end if;
3217: rollback to start_update_key_column;
3218: p_return_status := FND_API.G_RET_STS_ERROR;
3219: FND_MSG_PUB.Count_And_Get (

Line 3219: FND_MSG_PUB.Count_And_Get (

3215: FND_MSG_PUB.Add;
3216: end if;
3217: rollback to start_update_key_column;
3218: p_return_status := FND_API.G_RET_STS_ERROR;
3219: FND_MSG_PUB.Count_And_Get (
3220: p_count => p_msg_count,
3221: p_data => p_msg_data);
3222: WHEN FND_API.G_EXC_ERROR THEN
3223: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

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

3219: FND_MSG_PUB.Count_And_Get (
3220: p_count => p_msg_count,
3221: p_data => p_msg_data);
3222: WHEN FND_API.G_EXC_ERROR THEN
3223: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3224: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_UPDATED');
3225: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
3226: ' ' || to_char(p_attribute_application_id) ||
3227: ' ' || p_attribute_code);

Line 3228: FND_MSG_PUB.Add;

3224: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_UPDATED');
3225: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
3226: ' ' || to_char(p_attribute_application_id) ||
3227: ' ' || p_attribute_code);
3228: FND_MSG_PUB.Add;
3229: end if;
3230: p_return_status := FND_API.G_RET_STS_ERROR;
3231: rollback to start_update_key_column;
3232: FND_MSG_PUB.Count_And_Get (

Line 3232: FND_MSG_PUB.Count_And_Get (

3228: FND_MSG_PUB.Add;
3229: end if;
3230: p_return_status := FND_API.G_RET_STS_ERROR;
3231: rollback to start_update_key_column;
3232: FND_MSG_PUB.Count_And_Get (
3233: p_count => p_msg_count,
3234: p_data => p_msg_data);
3235: WHEN OTHERS THEN
3236: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3238: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

3234: p_data => p_msg_data);
3235: WHEN OTHERS THEN
3236: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3237: rollback to start_update_key_column;
3238: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3239: SUBSTR (SQLERRM, 1, 240) );
3240: FND_MSG_PUB.Add;
3241: FND_MSG_PUB.Count_And_Get (
3242: p_count => p_msg_count,

Line 3240: FND_MSG_PUB.Add;

3236: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3237: rollback to start_update_key_column;
3238: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3239: SUBSTR (SQLERRM, 1, 240) );
3240: FND_MSG_PUB.Add;
3241: FND_MSG_PUB.Count_And_Get (
3242: p_count => p_msg_count,
3243: p_data => p_msg_data);
3244: end UPDATE_FOREIGN_KEY_COLUMN;

Line 3241: FND_MSG_PUB.Count_And_Get (

3237: rollback to start_update_key_column;
3238: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3239: SUBSTR (SQLERRM, 1, 240) );
3240: FND_MSG_PUB.Add;
3241: FND_MSG_PUB.Count_And_Get (
3242: p_count => p_msg_count,
3243: p_data => p_msg_data);
3244: end UPDATE_FOREIGN_KEY_COLUMN;
3245:

Line 3331: FND_MSG_PUB.initialize;

3327:
3328: -- Initialize the message table if requested.
3329:
3330: if p_init_msg_tbl then
3331: FND_MSG_PUB.initialize;
3332: end if;
3333:
3334: savepoint start_update_unique_key;
3335:

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

3336: --** retrieve ak_unique_keys row if it exists **
3337: open l_get_row_csr;
3338: fetch l_get_row_csr into l_unique_key_rec;
3339: if (l_get_row_csr%notfound) then
3340: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3341: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DOES_NOT_EXIST');
3342: FND_MSG_PUB.Add;
3343: end if;
3344: -- dbms_output.put_line('Error - Row does not exist');

Line 3342: FND_MSG_PUB.Add;

3338: fetch l_get_row_csr into l_unique_key_rec;
3339: if (l_get_row_csr%notfound) then
3340: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3341: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DOES_NOT_EXIST');
3342: FND_MSG_PUB.Add;
3343: end if;
3344: -- dbms_output.put_line('Error - Row does not exist');
3345: close l_get_row_csr;
3346: raise FND_API.G_EXC_ERROR;

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

3488: LAST_UPDATED_BY = l_last_updated_by,
3489: LAST_UPDATE_LOGIN = l_last_update_login
3490: where unique_key_name = p_unique_key_name;
3491: if (sql%notfound) then
3492: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3493: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_UPDATE_FAILED');
3494: FND_MSG_PUB.Add;
3495: end if;
3496: --dbms_output.put_line('Row does not exist during update');

Line 3494: FND_MSG_PUB.Add;

3490: where unique_key_name = p_unique_key_name;
3491: if (sql%notfound) then
3492: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3493: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_UPDATE_FAILED');
3494: FND_MSG_PUB.Add;
3495: end if;
3496: --dbms_output.put_line('Row does not exist during update');
3497: raise FND_API.G_EXC_ERROR;
3498: end if;

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

3496: --dbms_output.put_line('Row does not exist during update');
3497: raise FND_API.G_EXC_ERROR;
3498: end if;
3499:
3500: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3501: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_UPDATED');
3502: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3503: FND_MSG_PUB.Add;
3504: end if;

Line 3503: FND_MSG_PUB.Add;

3499:
3500: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3501: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_UPDATED');
3502: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3503: FND_MSG_PUB.Add;
3504: end if;
3505:
3506: end if;
3507: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3509: FND_MSG_PUB.Count_And_Get (

3505:
3506: end if;
3507: p_return_status := FND_API.G_RET_STS_SUCCESS;
3508:
3509: FND_MSG_PUB.Count_And_Get (
3510: p_count => p_msg_count,
3511: p_data => p_msg_data);
3512:
3513: EXCEPTION

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

3511: p_data => p_msg_data);
3512:
3513: EXCEPTION
3514: WHEN VALUE_ERROR THEN
3515: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3516: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_VALUE_ERROR');
3517: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3518: FND_MSG_PUB.Add;
3519: end if;

Line 3518: FND_MSG_PUB.Add;

3514: WHEN VALUE_ERROR THEN
3515: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3516: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_VALUE_ERROR');
3517: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3518: FND_MSG_PUB.Add;
3519: end if;
3520: rollback to start_update_unique_key;
3521: p_return_status := FND_API.G_RET_STS_ERROR;
3522: FND_MSG_PUB.Count_And_Get (

Line 3522: FND_MSG_PUB.Count_And_Get (

3518: FND_MSG_PUB.Add;
3519: end if;
3520: rollback to start_update_unique_key;
3521: p_return_status := FND_API.G_RET_STS_ERROR;
3522: FND_MSG_PUB.Count_And_Get (
3523: p_count => p_msg_count,
3524: p_data => p_msg_data);
3525: WHEN FND_API.G_EXC_ERROR THEN
3526: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

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

3522: FND_MSG_PUB.Count_And_Get (
3523: p_count => p_msg_count,
3524: p_data => p_msg_data);
3525: WHEN FND_API.G_EXC_ERROR THEN
3526: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3527: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_UPDATED');
3528: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3529: FND_MSG_PUB.Add;
3530: end if;

Line 3529: FND_MSG_PUB.Add;

3525: WHEN FND_API.G_EXC_ERROR THEN
3526: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3527: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_UPDATED');
3528: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3529: FND_MSG_PUB.Add;
3530: end if;
3531: p_return_status := FND_API.G_RET_STS_ERROR;
3532: rollback to start_update_unique_key;
3533: FND_MSG_PUB.Count_And_Get (

Line 3533: FND_MSG_PUB.Count_And_Get (

3529: FND_MSG_PUB.Add;
3530: end if;
3531: p_return_status := FND_API.G_RET_STS_ERROR;
3532: rollback to start_update_unique_key;
3533: FND_MSG_PUB.Count_And_Get (
3534: p_count => p_msg_count,
3535: p_data => p_msg_data);
3536: WHEN OTHERS THEN
3537: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3539: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

3535: p_data => p_msg_data);
3536: WHEN OTHERS THEN
3537: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3538: rollback to start_update_unique_key;
3539: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3540: SUBSTR (SQLERRM, 1, 240) );
3541: FND_MSG_PUB.Add;
3542: FND_MSG_PUB.Count_And_Get (
3543: p_count => p_msg_count,

Line 3541: FND_MSG_PUB.Add;

3537: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3538: rollback to start_update_unique_key;
3539: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3540: SUBSTR (SQLERRM, 1, 240) );
3541: FND_MSG_PUB.Add;
3542: FND_MSG_PUB.Count_And_Get (
3543: p_count => p_msg_count,
3544: p_data => p_msg_data);
3545: end UPDATE_UNIQUE_KEY;

Line 3542: FND_MSG_PUB.Count_And_Get (

3538: rollback to start_update_unique_key;
3539: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3540: SUBSTR (SQLERRM, 1, 240) );
3541: FND_MSG_PUB.Add;
3542: FND_MSG_PUB.Count_And_Get (
3543: p_count => p_msg_count,
3544: p_data => p_msg_data);
3545: end UPDATE_UNIQUE_KEY;
3546:

Line 3635: FND_MSG_PUB.initialize;

3631:
3632: -- Initialize the message table if requested.
3633:
3634: if p_init_msg_tbl then
3635: FND_MSG_PUB.initialize;
3636: end if;
3637:
3638: savepoint start_update_key_column;
3639:

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

3640: --** retrieve ak_unique_key_columns row if it exists **
3641: open l_get_row_csr;
3642: fetch l_get_row_csr into l_key_column_rec;
3643: if (l_get_row_csr%notfound) then
3644: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3645: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DOES_NOT_EXIST');
3646: FND_MSG_PUB.Add;
3647: end if;
3648: --dbms_output.put_line('Error - Row does not exist');

Line 3646: FND_MSG_PUB.Add;

3642: fetch l_get_row_csr into l_key_column_rec;
3643: if (l_get_row_csr%notfound) then
3644: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3645: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DOES_NOT_EXIST');
3646: FND_MSG_PUB.Add;
3647: end if;
3648: --dbms_output.put_line('Error - Row does not exist');
3649: close l_get_row_csr;
3650: raise FND_API.G_EXC_ERROR;

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

3791: where unique_key_name = p_unique_key_name
3792: and attribute_application_id = p_attribute_application_id
3793: and attribute_code = p_attribute_code;
3794: if (sql%notfound) then
3795: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3796: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_UPDATE_FAILED');
3797: FND_MSG_PUB.Add;
3798: end if;
3799: --dbms_output.put_line('Row does not exist during update');

Line 3797: FND_MSG_PUB.Add;

3793: and attribute_code = p_attribute_code;
3794: if (sql%notfound) then
3795: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3796: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_UPDATE_FAILED');
3797: FND_MSG_PUB.Add;
3798: end if;
3799: --dbms_output.put_line('Row does not exist during update');
3800: raise FND_API.G_EXC_ERROR;
3801: end if;

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

3799: --dbms_output.put_line('Row does not exist during update');
3800: raise FND_API.G_EXC_ERROR;
3801: end if;
3802:
3803: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3804: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_UPDATED');
3805: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
3806: ' ' || to_char(p_attribute_application_id) ||
3807: ' ' || p_attribute_code);

Line 3808: FND_MSG_PUB.Add;

3804: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_UPDATED');
3805: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
3806: ' ' || to_char(p_attribute_application_id) ||
3807: ' ' || p_attribute_code);
3808: FND_MSG_PUB.Add;
3809: end if;
3810:
3811: end if;
3812: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3814: FND_MSG_PUB.Count_And_Get (

3810:
3811: end if;
3812: p_return_status := FND_API.G_RET_STS_SUCCESS;
3813:
3814: FND_MSG_PUB.Count_And_Get (
3815: p_count => p_msg_count,
3816: p_data => p_msg_data);
3817:
3818: EXCEPTION

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

3816: p_data => p_msg_data);
3817:
3818: EXCEPTION
3819: WHEN VALUE_ERROR THEN
3820: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3821: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_VALUE_ERROR');
3822: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
3823: ' ' || to_char(p_attribute_application_id) ||
3824: ' ' || p_attribute_code);

Line 3825: FND_MSG_PUB.Add;

3821: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_VALUE_ERROR');
3822: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
3823: ' ' || to_char(p_attribute_application_id) ||
3824: ' ' || p_attribute_code);
3825: FND_MSG_PUB.Add;
3826: end if;
3827: rollback to start_update_key_column;
3828: p_return_status := FND_API.G_RET_STS_ERROR;
3829: FND_MSG_PUB.Count_And_Get (

Line 3829: FND_MSG_PUB.Count_And_Get (

3825: FND_MSG_PUB.Add;
3826: end if;
3827: rollback to start_update_key_column;
3828: p_return_status := FND_API.G_RET_STS_ERROR;
3829: FND_MSG_PUB.Count_And_Get (
3830: p_count => p_msg_count,
3831: p_data => p_msg_data);
3832: WHEN FND_API.G_EXC_ERROR THEN
3833: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

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

3829: FND_MSG_PUB.Count_And_Get (
3830: p_count => p_msg_count,
3831: p_data => p_msg_data);
3832: WHEN FND_API.G_EXC_ERROR THEN
3833: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3834: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_UPDATED');
3835: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
3836: ' ' || to_char(p_attribute_application_id) ||
3837: ' ' || p_attribute_code);

Line 3838: FND_MSG_PUB.Add;

3834: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_UPDATED');
3835: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
3836: ' ' || to_char(p_attribute_application_id) ||
3837: ' ' || p_attribute_code);
3838: FND_MSG_PUB.Add;
3839: end if;
3840: p_return_status := FND_API.G_RET_STS_ERROR;
3841: rollback to start_update_key_column;
3842: FND_MSG_PUB.Count_And_Get (

Line 3842: FND_MSG_PUB.Count_And_Get (

3838: FND_MSG_PUB.Add;
3839: end if;
3840: p_return_status := FND_API.G_RET_STS_ERROR;
3841: rollback to start_update_key_column;
3842: FND_MSG_PUB.Count_And_Get (
3843: p_count => p_msg_count,
3844: p_data => p_msg_data);
3845: WHEN OTHERS THEN
3846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

3844: p_data => p_msg_data);
3845: WHEN OTHERS THEN
3846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3847: rollback to start_update_key_column;
3848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3849: SUBSTR (SQLERRM, 1, 240) );
3850: FND_MSG_PUB.Add;
3851: FND_MSG_PUB.Count_And_Get (
3852: p_count => p_msg_count,

Line 3850: FND_MSG_PUB.Add;

3846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3847: rollback to start_update_key_column;
3848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3849: SUBSTR (SQLERRM, 1, 240) );
3850: FND_MSG_PUB.Add;
3851: FND_MSG_PUB.Count_And_Get (
3852: p_count => p_msg_count,
3853: p_data => p_msg_data);
3854: end UPDATE_UNIQUE_KEY_COLUMN;

Line 3851: FND_MSG_PUB.Count_And_Get (

3847: rollback to start_update_key_column;
3848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3849: SUBSTR (SQLERRM, 1, 240) );
3850: FND_MSG_PUB.Add;
3851: FND_MSG_PUB.Count_And_Get (
3852: p_count => p_msg_count,
3853: p_data => p_msg_data);
3854: end UPDATE_UNIQUE_KEY_COLUMN;
3855:

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

3922: --** check that key columns are not null and not missing **
3923: if ((p_foreign_key_name is null) or
3924: (p_foreign_key_name = FND_API.G_MISS_CHAR)) then
3925: l_error := TRUE;
3926: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3927: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3928: FND_MESSAGE.SET_TOKEN('COLUMN', 'FOREIGN_KEY_NAME');
3929: FND_MSG_PUB.Add;
3930: end if;

Line 3929: FND_MSG_PUB.Add;

3925: l_error := TRUE;
3926: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3927: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3928: FND_MESSAGE.SET_TOKEN('COLUMN', 'FOREIGN_KEY_NAME');
3929: FND_MSG_PUB.Add;
3930: end if;
3931: end if;
3932:
3933: -- - Check that the parent object exists

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

3941: p_api_version_number => 1.0,
3942: p_return_status => l_return_status,
3943: p_database_object_name => p_database_object_name) ) then
3944: l_error := TRUE;
3945: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3946: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OBJECT_REFERENCE');
3947: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
3948: FND_MSG_PUB.Add;
3949: end if;

Line 3948: FND_MSG_PUB.Add;

3944: l_error := TRUE;
3945: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3946: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OBJECT_REFERENCE');
3947: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
3948: FND_MSG_PUB.Add;
3949: end if;
3950: end if;
3951: end if;
3952: end if;

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

3957: (p_database_object_name = FND_API.G_MISS_CHAR and
3958: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
3959: then
3960: l_error := TRUE;
3961: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3962: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3963: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
3964: FND_MSG_PUB.Add;
3965: end if;

Line 3964: FND_MSG_PUB.Add;

3960: l_error := TRUE;
3961: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3962: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3963: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
3964: FND_MSG_PUB.Add;
3965: end if;
3966: end if;
3967:
3968: if ((p_unique_key_name is null) or

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

3968: if ((p_unique_key_name is null) or
3969: (p_unique_key_name = FND_API.G_MISS_CHAR and
3970: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
3971: l_error := TRUE;
3972: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3973: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3974: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_NAME');
3975: FND_MSG_PUB.Add;
3976: end if;

Line 3975: FND_MSG_PUB.Add;

3971: l_error := TRUE;
3972: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3973: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3974: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_NAME');
3975: FND_MSG_PUB.Add;
3976: end if;
3977: end if;
3978:
3979: if ((p_application_id is null) or

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

3979: if ((p_application_id is null) or
3980: (p_application_id = FND_API.G_MISS_NUM and
3981: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
3982: l_error := TRUE;
3983: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3984: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3985: FND_MESSAGE.SET_TOKEN('COLUMN', 'APPLICATION_ID');
3986: FND_MSG_PUB.Add;
3987: end if;

Line 3986: FND_MSG_PUB.Add;

3982: l_error := TRUE;
3983: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3984: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3985: FND_MESSAGE.SET_TOKEN('COLUMN', 'APPLICATION_ID');
3986: FND_MSG_PUB.Add;
3987: end if;
3988: end if;
3989:
3990: --** Validate columns **

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

3994: p_api_version_number => 1.0,
3995: p_return_status => l_return_status,
3996: p_application_id => p_application_id) ) then
3997: l_error := TRUE;
3998: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3999: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
4000: FND_MESSAGE.SET_TOKEN('COLUMN','APPLICATION_ID');
4001: FND_MSG_PUB.Add;
4002: end if;

Line 4001: FND_MSG_PUB.Add;

3997: l_error := TRUE;
3998: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3999: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
4000: FND_MESSAGE.SET_TOKEN('COLUMN','APPLICATION_ID');
4001: FND_MSG_PUB.Add;
4002: end if;
4003: end if;
4004: end if;
4005:

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

4009: p_api_version_number => 1.0,
4010: p_return_status => l_return_status,
4011: p_unique_key_name => p_unique_key_name) ) then
4012: l_error := TRUE;
4013: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4014: FND_MESSAGE.SET_NAME('AK','AK_INVALID_UK_REFERENCE');
4015: FND_MESSAGE.SET_TOKEN('KEY', p_unique_key_name);
4016: FND_MSG_PUB.Add;
4017: end if;

Line 4016: FND_MSG_PUB.Add;

4012: l_error := TRUE;
4013: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4014: FND_MESSAGE.SET_NAME('AK','AK_INVALID_UK_REFERENCE');
4015: FND_MESSAGE.SET_TOKEN('KEY', p_unique_key_name);
4016: FND_MSG_PUB.Add;
4017: end if;
4018: --dbms_output.put_line('Invalid unique key name');
4019: end if;
4020: end if;

Line 4032: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

4028: p_return_status := FND_API.G_RET_STS_ERROR;
4029: return FALSE;
4030: WHEN OTHERS THEN
4031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4032: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4033: SUBSTR (SQLERRM, 1, 240) );
4034: FND_MSG_PUB.Add;
4035: return FALSE;
4036:

Line 4034: FND_MSG_PUB.Add;

4030: WHEN OTHERS THEN
4031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4032: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4033: SUBSTR (SQLERRM, 1, 240) );
4034: FND_MSG_PUB.Add;
4035: return FALSE;
4036:
4037: end VALIDATE_FOREIGN_KEY;
4038:

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

4114: --** check that key columns are not null and not missing **
4115: if ((p_foreign_key_name is null) or
4116: (p_foreign_key_name = FND_API.G_MISS_CHAR)) then
4117: l_error := TRUE;
4118: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4119: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4120: FND_MESSAGE.SET_TOKEN('COLUMN', 'FOREIGN_KEY_NAME');
4121: FND_MSG_PUB.Add;
4122: end if;

Line 4121: FND_MSG_PUB.Add;

4117: l_error := TRUE;
4118: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4119: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4120: FND_MESSAGE.SET_TOKEN('COLUMN', 'FOREIGN_KEY_NAME');
4121: FND_MSG_PUB.Add;
4122: end if;
4123: end if;
4124:
4125: if ((p_attribute_application_id is null) or

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

4124:
4125: if ((p_attribute_application_id is null) or
4126: (p_attribute_application_id = FND_API.G_MISS_NUM)) then
4127: l_error := TRUE;
4128: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4129: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4130: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
4131: FND_MSG_PUB.Add;
4132: end if;

Line 4131: FND_MSG_PUB.Add;

4127: l_error := TRUE;
4128: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4129: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4130: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
4131: FND_MSG_PUB.Add;
4132: end if;
4133: end if;
4134:
4135: if ((p_attribute_code is null) or

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

4134:
4135: if ((p_attribute_code is null) or
4136: (p_attribute_code = FND_API.G_MISS_CHAR)) then
4137: l_error := TRUE;
4138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4139: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4140: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
4141: FND_MSG_PUB.Add;
4142: end if;

Line 4141: FND_MSG_PUB.Add;

4137: l_error := TRUE;
4138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4139: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4140: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
4141: FND_MSG_PUB.Add;
4142: end if;
4143: end if;
4144:
4145: -- - Check that the parent foreign key exists, and retrieve

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

4148: fetch l_check_fk_csr into l_database_object_name;
4149: if (l_check_fk_csr%notfound) then
4150: close l_check_fk_csr;
4151: l_error := TRUE;
4152: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4153: FND_MESSAGE.SET_NAME('AK','AK_INVALID_FK_REFERENCE');
4154: FND_MESSAGE.SET_TOKEN('KEY', p_foreign_key_name);
4155: FND_MSG_PUB.Add;
4156: end if;

Line 4155: FND_MSG_PUB.Add;

4151: l_error := TRUE;
4152: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4153: FND_MESSAGE.SET_NAME('AK','AK_INVALID_FK_REFERENCE');
4154: FND_MESSAGE.SET_TOKEN('KEY', p_foreign_key_name);
4155: FND_MSG_PUB.Add;
4156: end if;
4157: --dbms_output.put_line('Parent foreign key does not exist!');
4158: else
4159: close l_check_fk_csr;

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

4164: p_database_object_name => l_database_object_name,
4165: p_attribute_application_id => p_attribute_application_id,
4166: p_attribute_code => p_attribute_code) ) then
4167: l_error := TRUE;
4168: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4169: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OA_REFERENCE');
4170: FND_MESSAGE.SET_TOKEN('KEY', l_database_object_name ||
4171: ' ' || to_char(p_attribute_application_id) ||
4172: ' ' || p_attribute_code);

Line 4173: FND_MSG_PUB.Add;

4169: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OA_REFERENCE');
4170: FND_MESSAGE.SET_TOKEN('KEY', l_database_object_name ||
4171: ' ' || to_char(p_attribute_application_id) ||
4172: ' ' || p_attribute_code);
4173: FND_MSG_PUB.Add;
4174: end if;
4175: end if;
4176: end if;
4177:

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

4181: (p_foreign_key_sequence = FND_API.G_MISS_NUM and
4182: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
4183: then
4184: l_error := TRUE;
4185: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4186: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4187: FND_MESSAGE.SET_TOKEN('COLUMN', 'FOREIGN_KEY_SEQUENCE');
4188: FND_MSG_PUB.Add;
4189: end if;

Line 4188: FND_MSG_PUB.Add;

4184: l_error := TRUE;
4185: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4186: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4187: FND_MESSAGE.SET_TOKEN('COLUMN', 'FOREIGN_KEY_SEQUENCE');
4188: FND_MSG_PUB.Add;
4189: end if;
4190: end if;
4191:
4192: --** check that the foreign_key_sequence should be referencing *

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

4197: fetch l_check_seq_csr into l_dummy;
4198: if (l_check_seq_csr%notfound) then
4199: close l_check_seq_csr;
4200: l_error := TRUE;
4201: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4202: FND_MESSAGE.SET_NAME('AK','AK_INVALID_FOREIGN_KEY_SEQ');
4203: FND_MESSAGE.SET_TOKEN('SEQUENCE', to_char(p_foreign_key_sequence));
4204: FND_MSG_PUB.Add;
4205: end if;

Line 4204: FND_MSG_PUB.Add;

4200: l_error := TRUE;
4201: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4202: FND_MESSAGE.SET_NAME('AK','AK_INVALID_FOREIGN_KEY_SEQ');
4203: FND_MESSAGE.SET_TOKEN('SEQUENCE', to_char(p_foreign_key_sequence));
4204: FND_MSG_PUB.Add;
4205: end if;
4206: else
4207: close l_check_seq_csr;
4208: end if;

Line 4221: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

4217: p_return_status := FND_API.G_RET_STS_ERROR;
4218: return FALSE;
4219: WHEN OTHERS THEN
4220: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4221: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4222: SUBSTR (SQLERRM, 1, 240) );
4223: FND_MSG_PUB.Add;
4224: return FALSE;
4225:

Line 4223: FND_MSG_PUB.Add;

4219: WHEN OTHERS THEN
4220: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4221: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4222: SUBSTR (SQLERRM, 1, 240) );
4223: FND_MSG_PUB.Add;
4224: return FALSE;
4225:
4226: end VALIDATE_FOREIGN_KEY_COLUMN;
4227:

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

4290: --** check that key columns are not null and not missing **
4291: if ((p_unique_key_name is null) or
4292: (p_unique_key_name = FND_API.G_MISS_CHAR)) then
4293: l_error := TRUE;
4294: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4295: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4296: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_NAME');
4297: FND_MSG_PUB.Add;
4298: end if;

Line 4297: FND_MSG_PUB.Add;

4293: l_error := TRUE;
4294: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4295: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4296: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_NAME');
4297: FND_MSG_PUB.Add;
4298: end if;
4299: end if;
4300:
4301: -- - Check that the parent object exists

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

4308: p_api_version_number => 1.0,
4309: p_return_status => l_return_status,
4310: p_database_object_name => p_database_object_name) ) then
4311: l_error := TRUE;
4312: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4313: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OBJECT_REFERENCE');
4314: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
4315: FND_MSG_PUB.Add;
4316: end if;

Line 4315: FND_MSG_PUB.Add;

4311: l_error := TRUE;
4312: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4313: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OBJECT_REFERENCE');
4314: FND_MESSAGE.SET_TOKEN('KEY', p_database_object_name);
4315: FND_MSG_PUB.Add;
4316: end if;
4317: end if;
4318: end if;
4319: end if;

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

4323: if ((p_database_object_name is null) or
4324: (p_database_object_name = FND_API.G_MISS_CHAR and
4325: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
4326: l_error := TRUE;
4327: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4328: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4329: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
4330: FND_MSG_PUB.Add;
4331: end if;

Line 4330: FND_MSG_PUB.Add;

4326: l_error := TRUE;
4327: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4328: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4329: FND_MESSAGE.SET_TOKEN('COLUMN', 'DATABASE_OBJECT_NAME');
4330: FND_MSG_PUB.Add;
4331: end if;
4332: end if;
4333:
4334: if ((p_application_id is null) or

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

4334: if ((p_application_id is null) or
4335: (p_application_id = FND_API.G_MISS_NUM and
4336: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
4337: l_error := TRUE;
4338: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4339: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4340: FND_MESSAGE.SET_TOKEN('COLUMN', 'APPLICATION_ID');
4341: FND_MSG_PUB.Add;
4342: end if;

Line 4341: FND_MSG_PUB.Add;

4337: l_error := TRUE;
4338: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4339: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4340: FND_MESSAGE.SET_TOKEN('COLUMN', 'APPLICATION_ID');
4341: FND_MSG_PUB.Add;
4342: end if;
4343: end if;
4344:
4345:

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

4350: p_api_version_number => 1.0,
4351: p_return_status => l_return_status,
4352: p_application_id => p_application_id) ) then
4353: l_error := TRUE;
4354: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4355: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
4356: FND_MESSAGE.SET_TOKEN('COLUMN','APPLICATION_ID');
4357: FND_MSG_PUB.Add;
4358: end if;

Line 4357: FND_MSG_PUB.Add;

4353: l_error := TRUE;
4354: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4355: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
4356: FND_MESSAGE.SET_TOKEN('COLUMN','APPLICATION_ID');
4357: FND_MSG_PUB.Add;
4358: end if;
4359: --dbms_output.put_line('Invalid application ID');
4360: end if;
4361: end if;

Line 4373: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

4369: p_return_status := FND_API.G_RET_STS_ERROR;
4370: return FALSE;
4371: WHEN OTHERS THEN
4372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4373: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4374: SUBSTR (SQLERRM, 1, 240) );
4375: FND_MSG_PUB.Add;
4376: return FALSE;
4377:

Line 4375: FND_MSG_PUB.Add;

4371: WHEN OTHERS THEN
4372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4373: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4374: SUBSTR (SQLERRM, 1, 240) );
4375: FND_MSG_PUB.Add;
4376: return FALSE;
4377:
4378: end VALIDATE_UNIQUE_KEY;
4379:

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

4456: --** check that key columns are not null and not missing **
4457: if ((p_unique_key_name is null) or
4458: (p_unique_key_name = FND_API.G_MISS_CHAR)) then
4459: l_error := TRUE;
4460: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4461: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4462: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_NAME');
4463: FND_MSG_PUB.Add;
4464: end if;

Line 4463: FND_MSG_PUB.Add;

4459: l_error := TRUE;
4460: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4461: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4462: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_NAME');
4463: FND_MSG_PUB.Add;
4464: end if;
4465: end if;
4466:
4467: if ((p_attribute_application_id is null) or

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

4466:
4467: if ((p_attribute_application_id is null) or
4468: (p_attribute_application_id = FND_API.G_MISS_NUM)) then
4469: l_error := TRUE;
4470: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4471: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4472: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
4473: FND_MSG_PUB.Add;
4474: end if;

Line 4473: FND_MSG_PUB.Add;

4469: l_error := TRUE;
4470: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4471: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4472: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
4473: FND_MSG_PUB.Add;
4474: end if;
4475: end if;
4476:
4477: if ((p_attribute_code is null) or

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

4476:
4477: if ((p_attribute_code is null) or
4478: (p_attribute_code = FND_API.G_MISS_CHAR)) then
4479: l_error := TRUE;
4480: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4481: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4482: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
4483: FND_MSG_PUB.Add;
4484: end if;

Line 4483: FND_MSG_PUB.Add;

4479: l_error := TRUE;
4480: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4481: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4482: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
4483: FND_MSG_PUB.Add;
4484: end if;
4485: end if;
4486:
4487: -- - Check that the parent unique key exists, and retrieve

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

4490: fetch l_check_pk_csr into l_database_object_name;
4491: if (l_check_pk_csr%notfound) then
4492: close l_check_pk_csr;
4493: l_error := TRUE;
4494: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4495: FND_MESSAGE.SET_NAME('AK','AK_INVALID_UK_REFERENCE');
4496: FND_MESSAGE.SET_TOKEN('KEY', p_unique_key_name);
4497: FND_MSG_PUB.Add;
4498: end if;

Line 4497: FND_MSG_PUB.Add;

4493: l_error := TRUE;
4494: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4495: FND_MESSAGE.SET_NAME('AK','AK_INVALID_UK_REFERENCE');
4496: FND_MESSAGE.SET_TOKEN('KEY', p_unique_key_name);
4497: FND_MSG_PUB.Add;
4498: end if;
4499: else
4500: close l_check_pk_csr;
4501: -- - verify that the column attribute is a valid object attribute

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

4505: p_database_object_name => l_database_object_name,
4506: p_attribute_application_id => p_attribute_application_id,
4507: p_attribute_code => p_attribute_code) ) then
4508: l_error := TRUE;
4509: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4510: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OA_REFERENCE');
4511: FND_MESSAGE.SET_TOKEN('KEY', l_database_object_name ||
4512: ' ' || to_char(p_attribute_application_id) ||
4513: ' ' || p_attribute_code);

Line 4514: FND_MSG_PUB.Add;

4510: FND_MESSAGE.SET_NAME('AK','AK_INVALID_OA_REFERENCE');
4511: FND_MESSAGE.SET_TOKEN('KEY', l_database_object_name ||
4512: ' ' || to_char(p_attribute_application_id) ||
4513: ' ' || p_attribute_code);
4514: FND_MSG_PUB.Add;
4515: end if;
4516: end if;
4517: end if;
4518:

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

4522: (p_unique_key_sequence = FND_API.G_MISS_NUM and
4523: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
4524: then
4525: l_error := TRUE;
4526: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4527: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4528: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_SEQUENCE');
4529: FND_MSG_PUB.Add;
4530: end if;

Line 4529: FND_MSG_PUB.Add;

4525: l_error := TRUE;
4526: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4527: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4528: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_SEQUENCE');
4529: FND_MSG_PUB.Add;
4530: end if;
4531: end if;
4532:
4533: --** check that the unique_key_sequence should be unique within *

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

4536: fetch l_check_seq_csr into l_dummy;
4537: if (l_check_seq_csr%found) then
4538: close l_check_seq_csr;
4539: l_error := TRUE;
4540: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4541: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_UNIQUE_SEQ');
4542: FND_MESSAGE.SET_TOKEN('SEQUENCE', to_char(p_unique_key_sequence) );
4543: FND_MESSAGE.SET_TOKEN('KEY', p_unique_key_name);
4544: FND_MSG_PUB.Add;

Line 4544: FND_MSG_PUB.Add;

4540: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4541: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_UNIQUE_SEQ');
4542: FND_MESSAGE.SET_TOKEN('SEQUENCE', to_char(p_unique_key_sequence) );
4543: FND_MESSAGE.SET_TOKEN('KEY', p_unique_key_name);
4544: FND_MSG_PUB.Add;
4545: end if;
4546: else
4547: close l_check_seq_csr;
4548: end if;

Line 4560: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

4556: p_return_status := FND_API.G_RET_STS_ERROR;
4557: return FALSE;
4558: WHEN OTHERS THEN
4559: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4560: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4561: SUBSTR (SQLERRM, 1, 240) );
4562: FND_MSG_PUB.Add;
4563: return FALSE;
4564:

Line 4562: FND_MSG_PUB.Add;

4558: WHEN OTHERS THEN
4559: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4560: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4561: SUBSTR (SQLERRM, 1, 240) );
4562: FND_MSG_PUB.Add;
4563: return FALSE;
4564:
4565: end VALIDATE_UNIQUE_KEY_COLUMN;
4566:

Line 4658: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

4654: WHEN FND_API.G_EXC_ERROR THEN
4655: p_return_status := FND_API.G_RET_STS_ERROR;
4656: WHEN OTHERS THEN
4657: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4658: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4659: SUBSTR (SQLERRM, 1, 240) );
4660: FND_MSG_PUB.Add;
4661:
4662: END CHECK_FOREIGN_KEY_SEQUENCE;

Line 4660: FND_MSG_PUB.Add;

4656: WHEN OTHERS THEN
4657: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4658: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4659: SUBSTR (SQLERRM, 1, 240) );
4660: FND_MSG_PUB.Add;
4661:
4662: END CHECK_FOREIGN_KEY_SEQUENCE;
4663:
4664:

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

4730: p_return_status := FND_API.G_RET_STS_SUCCESS;
4731:
4732: EXCEPTION
4733: WHEN FND_API.G_EXC_ERROR THEN
4734: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4735: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_DELETED');
4736: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
4737: ' ' || to_char(l_attribute_appl_id) ||
4738: ' ' || l_attribute_code);

Line 4739: FND_MSG_PUB.Add;

4735: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_DELETED');
4736: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
4737: ' ' || to_char(l_attribute_appl_id) ||
4738: ' ' || l_attribute_code);
4739: FND_MSG_PUB.Add;
4740: end if;
4741: p_return_status := FND_API.G_RET_STS_ERROR;
4742: rollback to start_delete_rel_foreign_col;
4743: FND_MSG_PUB.Count_And_Get (

Line 4743: FND_MSG_PUB.Count_And_Get (

4739: FND_MSG_PUB.Add;
4740: end if;
4741: p_return_status := FND_API.G_RET_STS_ERROR;
4742: rollback to start_delete_rel_foreign_col;
4743: FND_MSG_PUB.Count_And_Get (
4744: p_count => p_msg_count,
4745: p_data => p_msg_data);
4746: WHEN OTHERS THEN
4747: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4750: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

4746: WHEN OTHERS THEN
4747: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4748: -- dbms_output.put_line('Unexpected error:'||substr(SQLERRM,1,240));
4749: rollback to start_delete_rel_foreign_col;
4750: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4751: SUBSTR (SQLERRM, 1, 240) );
4752: FND_MSG_PUB.Add;
4753: FND_MSG_PUB.Count_And_Get (
4754: p_count => p_msg_count,

Line 4752: FND_MSG_PUB.Add;

4748: -- dbms_output.put_line('Unexpected error:'||substr(SQLERRM,1,240));
4749: rollback to start_delete_rel_foreign_col;
4750: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4751: SUBSTR (SQLERRM, 1, 240) );
4752: FND_MSG_PUB.Add;
4753: FND_MSG_PUB.Count_And_Get (
4754: p_count => p_msg_count,
4755: p_data => p_msg_data);
4756: end DELETE_RELATED_FOREIGN_KEY_COL;

Line 4753: FND_MSG_PUB.Count_And_Get (

4749: rollback to start_delete_rel_foreign_col;
4750: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4751: SUBSTR (SQLERRM, 1, 240) );
4752: FND_MSG_PUB.Add;
4753: FND_MSG_PUB.Count_And_Get (
4754: p_count => p_msg_count,
4755: p_data => p_msg_data);
4756: end DELETE_RELATED_FOREIGN_KEY_COL;
4757:

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

4828: p_return_status := FND_API.G_RET_STS_SUCCESS;
4829:
4830: EXCEPTION
4831: WHEN FND_API.G_EXC_ERROR THEN
4832: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4833: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_DELETED');
4834: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_UNIQUE_KEY_COLUMN',TRUE);
4835: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name ||
4836: ' ' || to_char(l_attribute_appl_id) ||

Line 4838: FND_MSG_PUB.Add;

4834: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_UNIQUE_KEY_COLUMN',TRUE);
4835: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name ||
4836: ' ' || to_char(l_attribute_appl_id) ||
4837: ' ' || l_attribute_code);
4838: FND_MSG_PUB.Add;
4839: end if;
4840: p_return_status := FND_API.G_RET_STS_ERROR;
4841: rollback to start_delete_rel_unique_col;
4842: FND_MSG_PUB.Count_And_Get (

Line 4842: FND_MSG_PUB.Count_And_Get (

4838: FND_MSG_PUB.Add;
4839: end if;
4840: p_return_status := FND_API.G_RET_STS_ERROR;
4841: rollback to start_delete_rel_unique_col;
4842: FND_MSG_PUB.Count_And_Get (
4843: p_count => p_msg_count,
4844: p_data => p_msg_data);
4845: WHEN OTHERS THEN
4846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,

4844: p_data => p_msg_data);
4845: WHEN OTHERS THEN
4846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4847: rollback to start_delete_rel_unique_col;
4848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4849: SUBSTR (SQLERRM, 1, 240) );
4850: FND_MSG_PUB.Add;
4851: FND_MSG_PUB.Count_And_Get (
4852: p_count => p_msg_count,

Line 4850: FND_MSG_PUB.Add;

4846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4847: rollback to start_delete_rel_unique_col;
4848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4849: SUBSTR (SQLERRM, 1, 240) );
4850: FND_MSG_PUB.Add;
4851: FND_MSG_PUB.Count_And_Get (
4852: p_count => p_msg_count,
4853: p_data => p_msg_data);
4854: end DELETE_RELATED_UNIQUE_KEY_COL;

Line 4851: FND_MSG_PUB.Count_And_Get (

4847: rollback to start_delete_rel_unique_col;
4848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4849: SUBSTR (SQLERRM, 1, 240) );
4850: FND_MSG_PUB.Add;
4851: FND_MSG_PUB.Count_And_Get (
4852: p_count => p_msg_count,
4853: p_data => p_msg_data);
4854: end DELETE_RELATED_UNIQUE_KEY_COL;
4855: