DBA Data[Home] [Help]

APPS.AHL_RM_PROD_ZONE_AS_PVT dependencies on FND_MSG_PUB

Line 61: FND_MSG_PUB.add;

57: -- Check whether the associate type is 'M' or 'S'
58: IF ( p_associate_flag <> 'M' AND p_associate_flag <> 'S') THEn
59: FND_MESSAGE.set_name('AHL', 'AHL_RM_INVALID_ASSOCIATE_TYPE');
60: FND_MESSAGE.set_token('FIELD', p_associate_flag );
61: FND_MSG_PUB.add;
62: x_return_status := FND_API.G_RET_STS_ERROR;
63: RETURN;
64: END IF;
65:

Line 70: FND_MSG_PUB.add;

66: -- Check if at least one record is passed in p_prod_zone_as_tbl
67: IF ( p_prod_zone_as_tbl.count < 1 ) THEN
68: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_INVALID_PROCEDURE_CALL' );
69: FND_MESSAGE.set_token( 'PROCEDURE', G_PKG_NAME || '.' || G_API_NAME );
70: FND_MSG_PUB.add;
71: x_return_status := FND_API.G_RET_STS_ERROR;
72: RETURN;
73: END IF;
74:

Line 83: FND_MSG_PUB.add;

79: p_prod_zone_as_tbl(i).dml_operation <> 'D' ) THEN
80: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_INVALID_DML' );
81: FND_MESSAGE.set_token( 'FIELD', p_prod_zone_as_tbl(i).dml_operation );
82: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_prod_zone_as_tbl(i) ) );
83: FND_MSG_PUB.add;
84: x_return_status := FND_API.G_RET_STS_ERROR;
85: RETURN;
86: END IF;
87: END LOOP;

Line 164: FND_MSG_PUB.add;

160: ELSE
161: FND_MESSAGE.set_token( 'FIELD', p_x_prod_zone_as_rec.product_type );
162: END IF;
163:
164: FND_MSG_PUB.add;
165: x_return_status := l_return_status;
166: END IF;
167:
168: END IF;

Line 203: FND_MSG_PUB.add;

199: FND_MESSAGE.set_token( 'FIELD', p_x_prod_zone_as_rec.zone );
200: END IF;
201:
202: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_prod_zone_as_rec ) );
203: FND_MSG_PUB.add;
204: x_return_status := l_return_status;
205: END IF;
206:
207: END IF;

Line 242: FND_MSG_PUB.add;

238: FND_MESSAGE.set_token( 'FIELD', p_x_prod_zone_as_rec.sub_zone );
239: END IF;
240:
241: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_prod_zone_as_rec ) );
242: FND_MSG_PUB.add;
243: x_return_status := l_return_status;
244: END IF;
245:
246: END IF;

Line 433: FND_MSG_PUB.add;

429:
430: IF get_old_rec%NOTFOUND THEN
431: FND_MESSAGE.set_name( 'AHL', 'AHL_RM_INVALID_PROD_ZONE_REC' );
432: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_prod_zone_as_rec ) );
433: FND_MSG_PUB.add;
434: CLOSE get_old_rec;
435: RAISE FND_API.G_EXC_ERROR;
436: END IF;
437:

Line 590: FND_MSG_PUB.add;

586:
587: IF ( p_prod_zone_as_rec.product_type_code IS NULL OR
588: p_prod_zone_as_rec.product_type_code = FND_API.G_MISS_CHAR ) THEN
589: FND_MESSAGE.set_name( 'AHL','AHL_RM_PRODUCT_TYPE_NULL' );
590: FND_MSG_PUB.add;
591: x_return_status := FND_API.G_RET_STS_ERROR;
592: RETURN;
593: END IF;
594:

Line 599: FND_MSG_PUB.add;

595: IF ( p_prod_zone_as_rec.zone_code IS NULL OR
596: p_prod_zone_as_rec.zone_code = FND_API.G_MISS_CHAR ) THEN
597: FND_MESSAGE.set_name( 'AHL','AHL_RM_ZONE_NULL' );
598: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_prod_zone_as_rec ) );
599: FND_MSG_PUB.add;
600: x_return_status := FND_API.G_RET_STS_ERROR;
601: RETURN;
602: END IF;
603:

Line 608: FND_MSG_PUB.add;

604: IF ( p_associate_flag = 'S' AND ( p_prod_zone_as_rec.sub_zone_code IS NULL OR
605: p_prod_zone_as_rec.sub_zone_code = FND_API.G_MISS_CHAR )) THEN
606: FND_MESSAGE.set_name( 'AHL','AHL_RM_SUB_ZONE_NULL' );
607: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_prod_zone_as_rec ) );
608: FND_MSG_PUB.add;
609: x_return_status := FND_API.G_RET_STS_ERROR;
610: RETURN;
611: END IF;
612:

Line 619: FND_MSG_PUB.add;

615: IF ( p_prod_zone_as_rec.object_version_number IS NULL OR
616: p_prod_zone_as_rec.object_version_number = FND_API.G_MISS_NUM ) THEN
617: FND_MESSAGE.set_name( 'AHL','AHL_RM_PTZ_OBJ_VERSION_NULL' );
618: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_prod_zone_as_rec ) );
619: FND_MSG_PUB.add;
620: x_return_status := FND_API.G_RET_STS_ERROR;
621: RETURN;
622: END IF;
623:

Line 629: FND_MSG_PUB.add;

625: IF ( p_prod_zone_as_rec.prodtype_zone_id IS NULL OR
626: p_prod_zone_as_rec.prodtype_zone_id = FND_API.G_MISS_NUM ) THEN
627: FND_MESSAGE.set_name( 'AHL','AHL_RM_PRODTYPE_ZONE_ID_NULL' );
628: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_prod_zone_as_rec ) );
629: FND_MSG_PUB.add;
630: x_return_status := FND_API.G_RET_STS_ERROR;
631: RETURN;
632: END IF;
633:

Line 664: FND_MSG_PUB.add;

660: FETCH get_zone_assoc INTO l_zone_assoc;
661: IF get_zone_assoc%NOTFOUND THEN
662: FND_MESSAGE.set_name( 'AHL','AHL_RM_NO_PRODTYPE_ZONE_AS' );
663: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_prod_zone_as_rec ) );
664: FND_MSG_PUB.add;
665: x_return_status := FND_API.G_RET_STS_ERROR;
666: END IF;
667: CLOSE get_zone_assoc;
668: END IF;

Line 715: FND_MSG_PUB.add;

711: IF ( get_dup_rec%ROWCOUNT > 0 ) THEN
712: CLOSE get_dup_rec;
713: FND_MESSAGE.set_name( 'AHL', 'AHL_RM_PRODTYPE_ZONE_DUP' );
714: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( l_prod_zone_as_rec ) );
715: FND_MSG_PUB.add;
716: x_return_status := FND_API.G_RET_STS_ERROR;
717: RETURN;
718: END IF;
719:

Line 786: FND_MSG_PUB.initialize;

782: END IF;
783:
784: -- Initialize message list if p_init_msg_list is set to TRUE.
785: IF FND_API.to_boolean( p_init_msg_list ) THEN
786: FND_MSG_PUB.initialize;
787: END IF;
788:
789: IF G_DEBUG = 'Y' THEN
790: AHL_DEBUG_PUB.enable_debug;

Line 931: l_msg_count := FND_MSG_PUB.count_msg;

927: AHL_DEBUG_PUB.debug( G_PKG_NAME || '.' || G_API_NAME || ' : after validate_record' );
928: END IF;
929:
930: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
931: l_msg_count := FND_MSG_PUB.count_msg;
932: IF l_msg_count > 0 THEN
933: x_msg_count := l_msg_count;
934: RAISE FND_API.G_EXC_ERROR;
935: END IF;

Line 1008: FND_MSG_PUB.add;

1004: WHEN OTHERS THEN
1005: IF ( SQLCODE = -1 ) THEN
1006: FND_MESSAGE.set_name( 'AHL', 'AHL_RM_PRODTYPE_ZONE_DUP' );
1007: FND_MESSAGE.set_token( 'RECORD', get_record_identifier(p_x_prod_zone_as_tbl(i) ) );
1008: FND_MSG_PUB.add;
1009: END IF;
1010: END;
1011:
1012: ELSIF ( p_x_prod_zone_as_tbl(i).dml_operation = 'U' ) THEN

Line 1047: FND_MSG_PUB.add;

1043: -- If the record does not exist, then, abort API.
1044: IF ( SQL%ROWCOUNT = 0 ) THEN
1045: FND_MESSAGE.set_name('AHL','AHL_RM_RECORD_CHANGED');
1046: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_prod_zone_as_tbl(i) ) );
1047: FND_MSG_PUB.add;
1048: END IF;
1049:
1050: -- Set OUT values
1051: p_x_prod_zone_as_tbl(i).object_version_number := p_x_prod_zone_as_tbl(i).object_version_number + 1;

Line 1058: FND_MSG_PUB.add;

1054: WHEN OTHERS THEN
1055: IF ( SQLCODE = -1 ) THEN
1056: FND_MESSAGE.set_name( 'AHL', 'AHL_RM_PRODTYPE_ZONE_DUP' );
1057: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_prod_zone_as_tbl(i) ) );
1058: FND_MSG_PUB.add;
1059: END IF;
1060: END;
1061:
1062: ELSIF ( p_x_prod_zone_as_tbl(i).dml_operation = 'D' ) THEN

Line 1069: FND_MSG_PUB.add;

1065: FETCH get_prod_zone_rec INTO l_get_prod_zone_rec;
1066: IF get_prod_zone_rec%NOTFOUND THEN
1067: FND_MESSAGE.set_name('AHL','AHL_RM_INVALID_PROD_ZONE_REC');
1068: FND_MESSAGE.set_token( 'RECORD', TO_CHAR( i ) );
1069: FND_MSG_PUB.add;
1070: CLOSE get_prod_zone_rec;
1071: RAISE FND_API.G_EXC_ERROR;
1072: END IF;
1073: CLOSE get_prod_zone_rec;

Line 1084: FND_MSG_PUB.add;

1080: -- If the record does not exist, then, abort API.
1081: IF ( SQL%ROWCOUNT = 0 ) THEN
1082: FND_MESSAGE.set_name('AHL','AHL_RM_RECORD_CHANGED');
1083: FND_MESSAGE.set_token( 'RECORD', TO_CHAR( i ) );
1084: FND_MSG_PUB.add;
1085: ELSE
1086: IF l_get_prod_zone_rec.sub_zone_code IS NULL THEN
1087: DELETE FROM AHL_PRODTYPE_ZONES
1088: WHERE product_type_code = l_get_prod_zone_rec.product_type_code

Line 1116: l_msg_count := FND_MSG_PUB.count_msg;

1112: AHL_DEBUG_PUB.debug( G_PKG_NAME || '.' || G_API_NAME || ' : after DML operation' );
1113: END IF;
1114:
1115: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
1116: l_msg_count := FND_MSG_PUB.count_msg;
1117: IF l_msg_count > 0 THEN
1118: x_msg_count := l_msg_count;
1119: RAISE FND_API.G_EXC_ERROR;
1120: END IF;

Line 1146: FND_MSG_PUB.count_and_get

1142: COMMIT WORK;
1143: END IF;
1144:
1145: -- Count and Get messages (optional)
1146: FND_MSG_PUB.count_and_get
1147: (
1148: p_encoded => FND_API.G_FALSE,
1149: p_count => x_msg_count,
1150: p_data => x_msg_data

Line 1161: FND_MSG_PUB.count_and_get

1157: EXCEPTION
1158: WHEN FND_API.G_EXC_ERROR THEN
1159: ROLLBACK TO process_prod_zone_as_pvt;
1160: x_return_status := FND_API.G_RET_STS_ERROR ;
1161: FND_MSG_PUB.count_and_get
1162: (
1163: p_encoded => FND_API.G_FALSE,
1164: p_count => x_msg_count,
1165: p_data => x_msg_data

Line 1176: FND_MSG_PUB.count_and_get

1172:
1173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1174: ROLLBACK TO process_prod_zone_as_pvt;
1175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1176: FND_MSG_PUB.count_and_get
1177: (
1178: p_encoded => FND_API.G_FALSE,
1179: p_count => x_msg_count,
1180: p_data => x_msg_data

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

1187:
1188: WHEN OTHERS THEN
1189: ROLLBACK TO process_prod_zone_as_pvt;
1190: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1191: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1192: THEN
1193: FND_MSG_PUB.add_exc_msg
1194: (
1195: p_pkg_name => G_PKG_NAME,

Line 1193: FND_MSG_PUB.add_exc_msg

1189: ROLLBACK TO process_prod_zone_as_pvt;
1190: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1191: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1192: THEN
1193: FND_MSG_PUB.add_exc_msg
1194: (
1195: p_pkg_name => G_PKG_NAME,
1196: p_procedure_name => G_API_NAME,
1197: p_error_text => SUBSTRB(SQLERRM,1,240)

Line 1200: FND_MSG_PUB.count_and_get

1196: p_procedure_name => G_API_NAME,
1197: p_error_text => SUBSTRB(SQLERRM,1,240)
1198: );
1199: END IF;
1200: FND_MSG_PUB.count_and_get
1201: (
1202: p_encoded => FND_API.G_FALSE,
1203: p_count => x_msg_count,
1204: p_data => x_msg_data