298: IF ((cur_old_ref_values%NOTFOUND)
299: AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))
300: ) THEN
301: CLOSE cur_old_ref_values;
302: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
303: fnd_msg_pub.ADD;
304: RAISE fnd_api.g_exc_error;
305: END IF;
306: CLOSE cur_old_ref_values;
449: NULL;
450: /* ELSIF NOT igs_as_doc_dlvy_typ_pkg.get_pk_For_validation (
451: new_references.delivery_method_type
452: ) THEN
453: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
454: FND_MSG_PUB.ADD;
455: RAISE FND_API.G_EXC_ERROR;*/
456: END IF;
457: IF (((old_references.fgrade_cal_type = new_references.fgrade_cal_type)
462: )
463: ) THEN
464: NULL;
465: ELSIF NOT igs_ca_inst_pkg.get_pk_for_validation (new_references.fgrade_cal_type, new_references.fgrade_seq_num) THEN
466: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
467: fnd_msg_pub.ADD;
468: RAISE fnd_api.g_exc_error;
469: END IF;
470: IF (((old_references.deghold_cal_type = new_references.deghold_cal_type)
475: )
476: ) THEN
477: NULL;
478: ELSIF NOT igs_ca_inst_pkg.get_pk_for_validation (new_references.deghold_cal_type, new_references.deghold_seq_num) THEN
479: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
480: fnd_msg_pub.ADD;
481: RAISE fnd_api.g_exc_error;
482: END IF;
483: IF (((old_references.order_number = new_references.order_number))
484: OR ((new_references.order_number IS NULL))
485: ) THEN
486: NULL;
487: ELSIF NOT igs_as_order_hdr_pkg.get_pk_for_validation (new_references.order_number) THEN
488: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
489: fnd_msg_pub.ADD;
490: RAISE fnd_api.g_exc_error;
491: END IF;
492: END check_parent_existance;
541: OPEN cur_rowid;
542: FETCH cur_rowid INTO lv_rowid;
543: IF (cur_rowid%FOUND) THEN
544: CLOSE cur_rowid;
545: fnd_message.set_name ('IGS', 'IGS_AS_TIINFO_TDELY_FK');
546: fnd_msg_pub.ADD;
547: RAISE fnd_api.g_exc_error;
548: RETURN;
549: END IF;
576: OPEN cur_rowid;
577: FETCH cur_rowid INTO lv_rowid;
578: IF (cur_rowid%FOUND) THEN
579: CLOSE cur_rowid;
580: fnd_message.set_name ('IGS', 'IGS_AS_TIINFO_CA_FK');
581: fnd_msg_pub.ADD;
582: RAISE fnd_api.g_exc_error;
583: RETURN;
584: END IF;
606: OPEN cur_rowid;
607: FETCH cur_rowid INTO lv_rowid;
608: IF (cur_rowid%FOUND) THEN
609: CLOSE cur_rowid;
610: fnd_message.set_name ('IGS', 'IGS_AS_TIINFO_ORDHDR_FK');
611: fnd_msg_pub.ADD;
612: RAISE fnd_api.g_exc_error;
613: RETURN;
614: END IF;
925: );
926: IF (p_action = 'INSERT') THEN
927: -- Call all the procedures related to Before Insert.
928: IF (get_pk_for_validation (new_references.item_number)) THEN
929: fnd_message.set_name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
930: fnd_msg_pub.ADD;
931: RAISE fnd_api.g_exc_error;
932: END IF;
933: check_parent_existance;
936: check_parent_existance;
937: ELSIF (p_action = 'VALIDATE_INSERT') THEN
938: -- Call all the procedures related to Before Insert.
939: IF (get_pk_for_validation (new_references.item_number)) THEN
940: fnd_message.set_name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
941: fnd_msg_pub.ADD;
942: RAISE fnd_api.g_exc_error;
943: END IF;
944: END IF;
1119: ELSE
1120: x_program_update_date := SYSDATE;
1121: END IF;
1122: ELSE
1123: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
1124: fnd_msg_pub.ADD;
1125: RAISE fnd_api.g_exc_error;
1126: END IF;
1127: IF x_item_number IS NULL THEN
1392: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
1393: RETURN;
1394: WHEN OTHERS THEN
1395: x_return_status := fnd_api.g_ret_sts_unexp_error;
1396: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
1397: fnd_message.set_token ('NAME', 'Insert_Row : ' || SQLERRM);
1398: fnd_msg_pub.ADD;
1399: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
1400: RETURN;
1393: RETURN;
1394: WHEN OTHERS THEN
1395: x_return_status := fnd_api.g_ret_sts_unexp_error;
1396: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
1397: fnd_message.set_token ('NAME', 'Insert_Row : ' || SQLERRM);
1398: fnd_msg_pub.ADD;
1399: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
1400: RETURN;
1401: END insert_row;
1651: fnd_msg_pub.initialize;
1652: OPEN c1;
1653: FETCH c1 INTO tlinfo;
1654: IF (c1%NOTFOUND) THEN
1655: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
1656: CLOSE c1;
1657: fnd_msg_pub.ADD;
1658: RAISE fnd_api.g_exc_error;
1659: RETURN;
2193: )
2194: ) THEN
2195: NULL;
2196: ELSE
2197: fnd_message.set_name ('FND', '*' || x_rowid || '*');
2198: fnd_msg_pub.ADD;
2199: RAISE fnd_api.g_exc_error;
2200: END IF;
2201: -- Initialize API return status to success.
2212: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
2213: RETURN;
2214: WHEN OTHERS THEN
2215: x_return_status := fnd_api.g_ret_sts_unexp_error;
2216: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
2217: fnd_message.set_token ('NAME', 'Insert_Row : ' || SQLERRM);
2218: fnd_msg_pub.ADD;
2219: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
2220: RETURN;
2213: RETURN;
2214: WHEN OTHERS THEN
2215: x_return_status := fnd_api.g_ret_sts_unexp_error;
2216: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
2217: fnd_message.set_token ('NAME', 'Insert_Row : ' || SQLERRM);
2218: fnd_msg_pub.ADD;
2219: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
2220: RETURN;
2221: END lock_row;
2373: IF (x_last_update_login IS NULL) THEN
2374: x_last_update_login := -1;
2375: END IF;
2376: ELSE
2377: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
2378: fnd_msg_pub.ADD;
2379: RAISE fnd_api.g_exc_error;
2380: END IF;
2381: before_dml (
2802: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
2803: RETURN;
2804: WHEN OTHERS THEN
2805: x_return_status := fnd_api.g_ret_sts_unexp_error;
2806: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
2807: fnd_message.set_token ('NAME', 'Insert_Row : ' || SQLERRM);
2808: fnd_msg_pub.ADD;
2809: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
2810: RETURN;
2803: RETURN;
2804: WHEN OTHERS THEN
2805: x_return_status := fnd_api.g_ret_sts_unexp_error;
2806: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
2807: fnd_message.set_token ('NAME', 'Insert_Row : ' || SQLERRM);
2808: fnd_msg_pub.ADD;
2809: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
2810: RETURN;
2811: END update_row;
3286: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
3287: RETURN;
3288: WHEN OTHERS THEN
3289: x_return_status := fnd_api.g_ret_sts_unexp_error;
3290: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
3291: fnd_message.set_token ('NAME', 'Insert_Row : ' || SQLERRM);
3292: fnd_msg_pub.ADD;
3293: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
3294: RETURN;
3287: RETURN;
3288: WHEN OTHERS THEN
3289: x_return_status := fnd_api.g_ret_sts_unexp_error;
3290: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
3291: fnd_message.set_token ('NAME', 'Insert_Row : ' || SQLERRM);
3292: fnd_msg_pub.ADD;
3293: fnd_msg_pub.count_and_get (p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
3294: RETURN;
3295: END delete_row;