DBA Data[Home] [Help]

APPS.AHL_UC_UNITCONFIG_PVT dependencies on FND_MSG_PUB

Line 147: FND_MSG_PUB.add;

143: FETCH get_uc_header INTO l_old_uc_header_rec;
144: IF ( get_uc_header%NOTFOUND ) THEN
145: FND_MESSAGE.set_name('AHL', 'AHL_UC_HEADER_ID_INVALID');
146: FND_MESSAGE.set_token('UC_HEADER_ID', p_x_uc_header_rec.uc_header_id);
147: FND_MSG_PUB.add;
148: x_return_status := FND_API.G_RET_STS_ERROR;
149: END IF;
150: IF ( l_old_uc_header_rec.object_version_number <>
151: p_x_uc_header_rec.object_version_number ) THEN

Line 153: FND_MSG_PUB.add;

149: END IF;
150: IF ( l_old_uc_header_rec.object_version_number <>
151: p_x_uc_header_rec.object_version_number ) THEN
152: FND_MESSAGE.set_name('AHL', 'AHL_COM_RECORD_CHANGED');
153: FND_MSG_PUB.add;
154: x_return_status := FND_API.G_RET_STS_ERROR;
155: END IF;
156: CLOSE get_uc_header;
157:

Line 307: FND_MSG_PUB.add;

303: p_uc_header_rec.mc_revision IS NOT NULL) OR
304: (p_uc_header_rec.mc_name IS NOT NULL AND
305: p_uc_header_rec.mc_revision IS NULL) THEN
306: FND_MESSAGE.set_name( 'AHL','AHL_UC_MC_NAME_REV_INVALID' );
307: FND_MSG_PUB.add;
308: x_return_status := FND_API.G_RET_STS_ERROR;
309: END IF;
310: END;
311:

Line 349: FND_MSG_PUB.add;

345: IF (p_mc_name IS NULL OR p_mc_revision IS NULL) AND
346: p_x_mc_header_id IS NULL THEN
347: x_return_status := FND_API.G_RET_STS_ERROR;
348: FND_MESSAGE.set_name('AHL', 'AHL_COM_INVALID_PROCEDURE_CALL');
349: FND_MSG_PUB.add;
350: ELSIF (p_mc_name IS NULL OR p_mc_revision IS NULL) AND
351: p_x_mc_header_id IS NOT NULL THEN
352: OPEN get_rec_from_id(p_x_mc_header_id);
353: FETCH get_rec_from_id INTO l_mc_header_id, l_relationship_id;

Line 358: FND_MSG_PUB.add;

354: IF get_rec_from_id%NOTFOUND THEN
355: x_return_status := FND_API.G_RET_STS_ERROR;
356: FND_MESSAGE.set_name('AHL', 'AHL_UC_MC_HEADER_ID_INVALID');
357: FND_MESSAGE.set_token('MC_HEADER_ID', p_x_mc_header_id);
358: FND_MSG_PUB.add;
359: ELSE
360: p_x_mc_header_id := l_mc_header_id;
361: x_relationship_id := l_relationship_id;
362: END IF;

Line 375: FND_MSG_PUB.add;

371: x_return_status := FND_API.G_RET_STS_ERROR;
372: FND_MESSAGE.set_name('AHL', 'AHL_UC_MC_HEADER_INVALID');
373: FND_MESSAGE.set_token('MC_NAME', p_mc_name);
374: FND_MESSAGE.set_token('MC_REV', p_mc_revision);
375: FND_MSG_PUB.add;
376: ELSIF ( get_rec_from_value%ROWCOUNT = 1 ) THEN
377: p_x_mc_header_id := l_mc_header_id;
378: x_relationship_id := l_relationship_id;
379: ELSE

Line 384: FND_MSG_PUB.add;

380: x_return_status := FND_API.G_RET_STS_ERROR;
381: FND_MESSAGE.set_name('AHL', 'AHL_UC_MC_HEADER_INVALID');
382: FND_MESSAGE.set_token('MC_NAME', p_mc_name);
383: FND_MESSAGE.set_token('MC_REV', p_mc_revision);
384: FND_MSG_PUB.add;
385: END IF;
386: CLOSE get_rec_from_value;
387: END IF;
388: END validate_mc_header;

Line 471: FND_MSG_PUB.add;

467: x_return_status := FND_API.G_RET_STS_SUCCESS;
468: IF p_instance_num IS NULL AND p_x_instance_id IS NULL THEN
469: x_return_status := FND_API.G_RET_STS_ERROR;
470: FND_MESSAGE.set_name('AHL', 'AHL_COM_INVALID_PROCEDURE_CALL');
471: FND_MSG_PUB.add;
472: ELSIF p_instance_num IS NULL AND p_x_instance_id IS NOT NULL THEN
473: OPEN get_rec_from_id(p_x_instance_id, p_relationship_id);
474: FETCH get_rec_from_id INTO l_instance_id;
475: IF get_rec_from_id%NOTFOUND THEN

Line 479: FND_MSG_PUB.add;

475: IF get_rec_from_id%NOTFOUND THEN
476: x_return_status := FND_API.G_RET_STS_ERROR;
477: FND_MESSAGE.set_name('AHL', 'AHL_UC_CSII_INVALID');
478: FND_MESSAGE.set_token('CSII', p_x_instance_id);
479: FND_MSG_PUB.add;
480: END IF;
481: CLOSE get_rec_from_id;
482: ELSIF p_instance_num IS NOT NULL THEN
483: OPEN get_rec_from_value(p_instance_num, p_relationship_id);

Line 492: FND_MSG_PUB.add;

488: IF ( get_rec_from_value%ROWCOUNT = 0 ) THEN
489: x_return_status := FND_API.G_RET_STS_ERROR;
490: FND_MESSAGE.set_name('AHL', 'AHL_UC_CSII_INVALID');
491: FND_MESSAGE.set_token('CSII', p_instance_num);
492: FND_MSG_PUB.add;
493: ELSIF ( get_rec_from_value%ROWCOUNT = 1 ) THEN
494: p_x_instance_id := l_instance_id;
495: ELSE
496: x_return_status := FND_API.G_RET_STS_ERROR;

Line 499: FND_MSG_PUB.add;

495: ELSE
496: x_return_status := FND_API.G_RET_STS_ERROR;
497: FND_MESSAGE.set_name('AHL', 'AHL_UC_CSII_INVALID');
498: FND_MESSAGE.set_token('CSII', p_instance_num);
499: FND_MSG_PUB.add;
500: END IF;
501: CLOSE get_rec_from_value;
502: END IF;
503: END validate_csi_instance;

Line 536: FND_MSG_PUB.add;

532: FETCH check_uc_name1 INTO l_dummy;
533: IF check_uc_name1%FOUND THEN
534: FND_MESSAGE.set_name( 'AHL','AHL_UC_NAME_DUPLICATE' );
535: FND_MESSAGE.set_token( 'NAME', p_uc_header_rec.uc_name );
536: FND_MSG_PUB.add;
537: x_return_status := FND_API.G_RET_STS_ERROR;
538: END IF;
539: CLOSE check_uc_name1;
540: ELSIF p_dml_operation = 'U' THEN

Line 546: FND_MSG_PUB.add;

542: FETCH check_uc_name2 INTO l_dummy;
543: IF check_uc_name2%FOUND THEN
544: FND_MESSAGE.set_name( 'AHL','AHL_UC_NAME_DUPLICATE' );
545: FND_MESSAGE.set_token( 'NAME', p_uc_header_rec.uc_name );
546: FND_MSG_PUB.add;
547: x_return_status := FND_API.G_RET_STS_ERROR;
548: END IF;
549: CLOSE check_uc_name2;
550:

Line 557: FND_MSG_PUB.add;

553: OPEN check_uc_name3(p_uc_header_rec.uc_header_id);
554: FETCH check_uc_name3 INTO l_name;
555: IF check_uc_name3%FOUND AND (l_name.name <> p_uc_header_rec.uc_name) THEN
556: FND_MESSAGE.set_name( 'AHL','AHL_UC_NAME_CHANGE_UNALLOWED' );
557: FND_MSG_PUB.add;
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: END IF;
560: CLOSE check_uc_name3;
561: END IF;

Line 568: FND_MSG_PUB.add;

564: -- (create) or convert_attributes(update), so the check is the same for creation
565: -- and update.
566: IF p_uc_header_rec.uc_name is NULL THEN
567: FND_MESSAGE.set_name('AHL','AHL_UC_NAME_NULL');
568: FND_MSG_PUB.add;
569: x_return_status := FND_API.G_RET_STS_ERROR;
570: END IF;
571: -- The following checks are actually not really necessary.
572: -- Check if the master_config_id contains a null value.

Line 576: FND_MSG_PUB.add;

572: -- Check if the master_config_id contains a null value.
573: IF p_uc_header_rec.mc_header_id IS NULL THEN
574: FND_MESSAGE.set_name('AHL','AHL_MC_HEADER_ID_INVALID');
575: FND_MESSAGE.set_token('MC_HEADER_ID', p_uc_header_rec.mc_header_id);
576: FND_MSG_PUB.add;
577: x_return_status := FND_API.G_RET_STS_ERROR;
578: END IF;
579: -- Check if the csi_item_instance_id contains a null value.
580: IF p_uc_header_rec.instance_id IS NULL THEN

Line 582: FND_MSG_PUB.add;

578: END IF;
579: -- Check if the csi_item_instance_id contains a null value.
580: IF p_uc_header_rec.instance_id IS NULL THEN
581: FND_MESSAGE.set_name('AHL','AHL_UC_INSTANCE_NULL');
582: FND_MSG_PUB.add;
583: x_return_status := FND_API.G_RET_STS_ERROR;
584: END IF;
585: -- Check if the unit_config_status_code contains a null value.
586: IF p_uc_header_rec.unit_config_status_code IS NULL THEN

Line 588: FND_MSG_PUB.add;

584: END IF;
585: -- Check if the unit_config_status_code contains a null value.
586: IF p_uc_header_rec.unit_config_status_code IS NULL THEN
587: FND_MESSAGE.set_name('AHL','AHL_UC_CONFIG_STATUS_NULL');
588: FND_MSG_PUB.add;
589: x_return_status := FND_API.G_RET_STS_ERROR;
590: END IF;
591:
592: END validate_attributes;

Line 652: FND_MSG_PUB.initialize;

648: END IF;
649:
650: -- Initialize message list if p_init_msg_list is set to TRUE.
651: IF FND_API.to_boolean( p_init_msg_list ) THEN
652: FND_MSG_PUB.initialize;
653: END IF;
654:
655: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
656: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 800: FND_MSG_PUB.add;

796: ahl_util_uc_pkg.copy_uc_header_to_history(p_x_uc_header_rec.uc_header_id, l_return_status);
797: --IF history copy failed, then don't raise exception, just add the message to the message stack
798: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
799: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
800: FND_MSG_PUB.add;
801: END IF;
802:
803: --Need to check if the instance picked from CSI with serial_number has a serial_no_tag, and
804: --if not, we have to derive its value according to mfg_serail_number_flag ('Y'->'INVENTORY',

Line 812: FND_MSG_PUB.add;

808: FETCH get_serial_number INTO l_serial_number, l_mfg_serial_number_flag;
809: IF get_serial_number%NOTFOUND THEN
810: FND_MESSAGE.set_name('AHL', 'AHL_UC_CSII_INVALID');
811: FND_MESSAGE.set_token('CSII', p_x_uc_header_rec.instance_id);
812: FND_MSG_PUB.add;
813: RAISE FND_API.G_EXC_ERROR;
814: CLOSE get_serial_number;
815: ELSE
816: CLOSE get_serial_number;

Line 845: FND_MSG_PUB.add;

841: AHL_Util_UC_Pkg.getcsi_attribute_id('AHL_TEMP_SERIAL_NUM', l_attribute_id,l_return_val);
842: IF NOT(l_return_val) THEN
843: FND_MESSAGE.set_name('AHL','AHL_UC_ATTRIB_CODE_MISSING');
844: FND_MESSAGE.set_token('CODE', 'AHL_TEMP_SERIAL_NUM');
845: FND_MSG_PUB.add;
846: ELSE
847: l_csi_extend_attrib_rec.attribute_id := l_attribute_id;
848: l_csi_extend_attrib_rec.attribute_value := l_serial_number_tag;
849: l_csi_extend_attrib_rec.instance_id := p_x_uc_header_rec.instance_id;

Line 875: l_msg_count := FND_MSG_PUB.count_msg;

871: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||': After normal execution','At the end of the procedure');
872: END IF;
873:
874: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
875: l_msg_count := FND_MSG_PUB.count_msg;
876: IF l_msg_count > 0 THEN
877: x_msg_count := l_msg_count;
878: RAISE FND_API.G_EXC_ERROR;
879: END IF;

Line 885: FND_MSG_PUB.count_and_get(

881: IF FND_API.to_boolean( p_commit ) THEN
882: COMMIT;
883: END IF;
884: -- Count and Get messages (optional)
885: FND_MSG_PUB.count_and_get(
886: p_encoded => FND_API.G_FALSE,
887: p_count => x_msg_count,
888: p_data => x_msg_data);
889: EXCEPTION

Line 893: FND_MSG_PUB.count_and_get(

889: EXCEPTION
890: WHEN FND_API.G_EXC_ERROR THEN
891: ROLLBACK TO create_uc_header;
892: x_return_status := FND_API.G_RET_STS_ERROR ;
893: FND_MSG_PUB.count_and_get(
894: p_encoded => FND_API.G_FALSE,
895: p_count => x_msg_count,
896: p_data => x_msg_data);
897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 900: FND_MSG_PUB.count_and_get(

896: p_data => x_msg_data);
897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
898: ROLLBACK TO create_uc_header;
899: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
900: FND_MSG_PUB.count_and_get(
901: p_encoded => FND_API.G_FALSE,
902: p_count => x_msg_count,
903: p_data => x_msg_data);
904: WHEN OTHERS THEN

Line 907: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

903: p_data => x_msg_data);
904: WHEN OTHERS THEN
905: ROLLBACK TO create_uc_header;
906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
907: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
908: THEN
909: FND_MSG_PUB.add_exc_msg(
910: p_pkg_name => G_PKG_NAME,
911: p_procedure_name => l_api_name,

Line 909: FND_MSG_PUB.add_exc_msg(

905: ROLLBACK TO create_uc_header;
906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
907: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
908: THEN
909: FND_MSG_PUB.add_exc_msg(
910: p_pkg_name => G_PKG_NAME,
911: p_procedure_name => l_api_name,
912: p_error_text => SUBSTRB(SQLERRM,1,240));
913: END IF;

Line 914: FND_MSG_PUB.count_and_get(

910: p_pkg_name => G_PKG_NAME,
911: p_procedure_name => l_api_name,
912: p_error_text => SUBSTRB(SQLERRM,1,240));
913: END IF;
914: FND_MSG_PUB.count_and_get(
915: p_encoded => FND_API.G_FALSE,
916: p_count => x_msg_count,
917: p_data => x_msg_data);
918: END create_uc_header;

Line 959: FND_MSG_PUB.initialize;

955: END IF;
956:
957: -- Initialize message list if p_init_msg_list is set to TRUE.
958: IF FND_API.to_boolean( p_init_msg_list ) THEN
959: FND_MSG_PUB.initialize;
960: END IF;
961:
962: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
963: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 985: FND_MSG_PUB.add;

981:
982: -- ACL :: Changes for R12
983: IF (ahl_util_uc_pkg.IS_UNIT_QUARANTINED(p_unit_header_id => p_x_uc_header_rec.uc_header_id , p_instance_id => null) = FND_API.G_TRUE) THEN
984: FND_MESSAGE.set_name( 'AHL','AHL_UC_INVALID_Q_ACTION' );
985: FND_MSG_PUB.add;
986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
987: END IF;
988:
989: -- Validate all attributes (Item level validation)

Line 1042: FND_MSG_PUB.add;

1038: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1039: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||': within API','ovn='||p_x_uc_header_rec.object_version_number);
1040: END IF;
1041: FND_MESSAGE.set_name('AHL', 'AHL_COM_RECORD_CHANGED');
1042: FND_MSG_PUB.add;
1043: x_return_status := FND_API.G_RET_STS_ERROR;
1044: RAISE FND_API.G_EXC_ERROR;
1045: END IF;
1046:

Line 1051: FND_MSG_PUB.add;

1047: ahl_util_uc_pkg.copy_uc_header_to_history(p_x_uc_header_rec.uc_header_id, l_return_status);
1048: --IF history copy failed, then don't raise exception, just add the message to the message stack
1049: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1050: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1051: FND_MSG_PUB.add;
1052: END IF;
1053:
1054: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1055: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 1099: l_msg_count := FND_MSG_PUB.count_msg;

1095: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||': within API', 'Before check message count');
1096: END IF;
1097:
1098: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
1099: l_msg_count := FND_MSG_PUB.count_msg;
1100: IF l_msg_count > 0 THEN
1101: x_msg_count := l_msg_count;
1102: RAISE FND_API.G_EXC_ERROR;
1103: END IF;

Line 1121: FND_MSG_PUB.count_and_get(

1117: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||': within API', 'After commit');
1118: END IF;
1119:
1120: -- Count and Get messages (optional)
1121: FND_MSG_PUB.count_and_get(
1122: p_encoded => FND_API.G_FALSE,
1123: p_count => x_msg_count,
1124: p_data => x_msg_data);
1125:

Line 1130: FND_MSG_PUB.count_and_get(

1126: EXCEPTION
1127: WHEN FND_API.G_EXC_ERROR THEN
1128: ROLLBACK TO update_uc_header;
1129: x_return_status := FND_API.G_RET_STS_ERROR ;
1130: FND_MSG_PUB.count_and_get(
1131: p_encoded => FND_API.G_FALSE,
1132: p_count => x_msg_count,
1133: p_data => x_msg_data);
1134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1137: FND_MSG_PUB.count_and_get(

1133: p_data => x_msg_data);
1134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1135: ROLLBACK TO update_uc_header;
1136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1137: FND_MSG_PUB.count_and_get(
1138: p_encoded => FND_API.G_FALSE,
1139: p_count => x_msg_count,
1140: p_data => x_msg_data);
1141: WHEN OTHERS THEN

Line 1144: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1140: p_data => x_msg_data);
1141: WHEN OTHERS THEN
1142: ROLLBACK TO update_uc_header;
1143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1144: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1145: THEN
1146: FND_MSG_PUB.add_exc_msg(
1147: p_pkg_name => G_PKG_NAME,
1148: p_procedure_name => l_api_name,

Line 1146: FND_MSG_PUB.add_exc_msg(

1142: ROLLBACK TO update_uc_header;
1143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1144: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1145: THEN
1146: FND_MSG_PUB.add_exc_msg(
1147: p_pkg_name => G_PKG_NAME,
1148: p_procedure_name => l_api_name,
1149: p_error_text => SUBSTRB(SQLERRM,1,240));
1150: END IF;

Line 1151: FND_MSG_PUB.count_and_get(

1147: p_pkg_name => G_PKG_NAME,
1148: p_procedure_name => l_api_name,
1149: p_error_text => SUBSTRB(SQLERRM,1,240));
1150: END IF;
1151: FND_MSG_PUB.count_and_get(
1152: p_encoded => FND_API.G_FALSE,
1153: p_count => x_msg_count,
1154: p_data => x_msg_data);
1155: END update_uc_header;

Line 1240: FND_MSG_PUB.initialize;

1236: END IF;
1237:
1238: -- Initialize message list if p_init_msg_list is set to TRUE.
1239: IF FND_API.to_boolean( p_init_msg_list ) THEN
1240: FND_MSG_PUB.initialize;
1241: END IF;
1242:
1243: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1244: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 1253: FND_MSG_PUB.add;

1249: IF (p_uc_header_id IS NULL OR p_uc_header_id = FND_API.G_MISS_NUM OR
1250: p_object_version_number IS NULL OR p_object_version_number = FND_API.G_MISS_NUM OR
1251: p_csi_instance_ovn IS NULL OR p_csi_instance_ovn = FND_API.G_MISS_NUM ) THEN
1252: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_INVALID_PROCEDURE_CALL' );
1253: FND_MSG_PUB.add;
1254: RAISE FND_API.G_EXC_ERROR;
1255: END IF;
1256:
1257: --In case p_uc_header_id is a subunit, then whether it can be expired depends on its ancestor

Line 1266: FND_MSG_PUB.add;

1262: CLOSE get_top_unit;
1263: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
1264: FND_MESSAGE.set_token('NAME', 'uc_header_id');
1265: FND_MESSAGE.set_token('VALUE', p_uc_header_id);
1266: FND_MSG_PUB.add;
1267: RAISE FND_API.G_EXC_ERROR;
1268: ELSIF (l_uc_status IS NULL OR l_uc_status NOT IN ('DRAFT', 'APPROVAL_REJECTED')) THEN
1269: CLOSE get_top_unit;
1270: FND_MESSAGE.set_name( 'AHL', 'AHL_UC_STATUS_NOT_DRAFT' );

Line 1271: FND_MSG_PUB.add;

1267: RAISE FND_API.G_EXC_ERROR;
1268: ELSIF (l_uc_status IS NULL OR l_uc_status NOT IN ('DRAFT', 'APPROVAL_REJECTED')) THEN
1269: CLOSE get_top_unit;
1270: FND_MESSAGE.set_name( 'AHL', 'AHL_UC_STATUS_NOT_DRAFT' );
1271: FND_MSG_PUB.add;
1272: RAISE FND_API.G_EXC_ERROR;
1273: END IF;
1274:
1275: --Get p_uc_header_id its own attribute from ahl_unit_config_headers_v

Line 1283: FND_MSG_PUB.add;

1279: CLOSE get_uc_header;
1280: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
1281: FND_MESSAGE.set_token('NAME', 'uc_header_id');
1282: FND_MESSAGE.set_token('VALUE', p_uc_header_id);
1283: FND_MSG_PUB.add;
1284: RAISE FND_API.G_EXC_ERROR;
1285: ELSE
1286: CLOSE get_uc_header;
1287: END IF;

Line 1302: FND_MSG_PUB.add;

1298: AND object_version_number = p_object_version_number;
1299:
1300: IF SQL%NOTFOUND THEN
1301: FND_MESSAGE.set_name('AHL', 'AHL_COM_RECORD_CHANGED');
1302: FND_MSG_PUB.add;
1303: x_return_status := FND_API.G_RET_STS_ERROR;
1304: RAISE FND_API.G_EXC_ERROR;
1305: END IF;
1306:

Line 1311: FND_MSG_PUB.add;

1307: ahl_util_uc_pkg.copy_uc_header_to_history(p_uc_header_id, l_return_status);
1308: --IF history copy failed, then don't raise exception, just add the message tothe message stack
1309: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1310: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1311: FND_MSG_PUB.add;
1312: END IF;
1313:
1314: --The following lines are used to expire all the instances and subunits installed in this
1315: --draft UC, the relationship between the subunit with its immediate parent is expired but

Line 1338: FND_MSG_PUB.add;

1334: FETCH get_csi_obj_ver_num INTO l_csi_instance_ovn;
1335: IF (get_csi_obj_ver_num%NOTFOUND) THEN
1336: CLOSE get_csi_obj_ver_num;
1337: FND_MESSAGE.set_name('AHL','AHL_COM_RECORD_DELETED');
1338: FND_MSG_PUB.add;
1339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1340: ELSIF (l_csi_instance_ovn <> p_csi_instance_ovn) THEN
1341: CLOSE get_csi_obj_ver_num;
1342: FND_MESSAGE.set_name('AHL','AHL_COM_RECORD_CHANGED');

Line 1343: FND_MSG_PUB.add;

1339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1340: ELSIF (l_csi_instance_ovn <> p_csi_instance_ovn) THEN
1341: CLOSE get_csi_obj_ver_num;
1342: FND_MESSAGE.set_name('AHL','AHL_COM_RECORD_CHANGED');
1343: FND_MSG_PUB.add;
1344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1345: END IF;
1346:
1347: IF l_uc_header_rec.parent_uc_header_id IS NOT NULL THEN

Line 1356: FND_MSG_PUB.add;

1352: IF get_csi_ii_relationship%NOTFOUND THEN
1353: CLOSE get_csi_ii_relationship;
1354: FND_MESSAGE.set_name('AHL','AHL_UC_CSI_REL_REC_INVALID');
1355: FND_MESSAGE.set_token('INSTANCE', l_uc_header_rec.csi_instance_id);
1356: FND_MSG_PUB.add;
1357: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1358: ELSE
1359: CLOSE get_csi_ii_relationship;
1360: END IF;

Line 1419: FND_MSG_PUB.add;

1415: ahl_util_uc_pkg.copy_uc_header_to_history(l_subunits.unit_config_header_id,l_return_status);
1416: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1417: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1418: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1419: FND_MSG_PUB.add;
1420: END IF;
1421: END LOOP;
1422:
1423: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1433: FND_MSG_PUB.count_and_get(

1429: IF FND_API.to_boolean( p_commit ) THEN
1430: COMMIT;
1431: END IF;
1432: -- Count and Get messages (optional)
1433: FND_MSG_PUB.count_and_get(
1434: p_encoded => FND_API.G_FALSE,
1435: p_count => x_msg_count,
1436: p_data => x_msg_data);
1437:

Line 1442: FND_MSG_PUB.count_and_get(

1438: EXCEPTION
1439: WHEN FND_API.G_EXC_ERROR THEN
1440: ROLLBACK TO delete_uc_header;
1441: x_return_status := FND_API.G_RET_STS_ERROR ;
1442: FND_MSG_PUB.count_and_get(
1443: p_encoded => FND_API.G_FALSE,
1444: p_count => x_msg_count,
1445: p_data => x_msg_data);
1446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1449: FND_MSG_PUB.count_and_get(

1445: p_data => x_msg_data);
1446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1447: ROLLBACK TO delete_uc_header;
1448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1449: FND_MSG_PUB.count_and_get(
1450: p_encoded => FND_API.G_FALSE,
1451: p_count => x_msg_count,
1452: p_data => x_msg_data);
1453: WHEN OTHERS THEN

Line 1456: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1452: p_data => x_msg_data);
1453: WHEN OTHERS THEN
1454: ROLLBACK TO delete_uc_header;
1455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1456: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1457: THEN
1458: FND_MSG_PUB.add_exc_msg(
1459: p_pkg_name => G_PKG_NAME,
1460: p_procedure_name => l_api_name,

Line 1458: FND_MSG_PUB.add_exc_msg(

1454: ROLLBACK TO delete_uc_header;
1455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1456: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1457: THEN
1458: FND_MSG_PUB.add_exc_msg(
1459: p_pkg_name => G_PKG_NAME,
1460: p_procedure_name => l_api_name,
1461: p_error_text => SUBSTRB(SQLERRM,1,240));
1462: END IF;

Line 1463: FND_MSG_PUB.count_and_get(

1459: p_pkg_name => G_PKG_NAME,
1460: p_procedure_name => l_api_name,
1461: p_error_text => SUBSTRB(SQLERRM,1,240));
1462: END IF;
1463: FND_MSG_PUB.count_and_get(
1464: p_encoded => FND_API.G_FALSE,
1465: p_count => x_msg_count,
1466: p_data => x_msg_data);
1467: END delete_uc_header;