[Home] [Help]
372: FETCH cur_old_ref_values INTO old_references;
373: IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
374: CLOSE cur_old_ref_values;
375: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
376: igs_ge_msg_stack.add;
377: app_exception.raise_exception;
378: RETURN;
379: END IF;
380: CLOSE cur_old_ref_values;
1394: new_references.isir_id
1395: )
1396: ) THEN
1397: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
1398: igs_ge_msg_stack.add;
1399: app_exception.raise_exception;
1400: END IF;
1401: ELSIF (p_action = 'DELETE') THEN
1402: -- Call all the procedures related to Before Delete.
1407: new_references.isir_id
1408: )
1409: ) THEN
1410: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
1411: igs_ge_msg_stack.add;
1412: app_exception.raise_exception;
1413: END IF;
1414: ELSIF (p_action = 'VALIDATE_DELETE') THEN
1415: check_child_existance;
1891: x_program_update_date := SYSDATE;
1892: END IF;
1893: ELSE
1894: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
1895: igs_ge_msg_stack.add;
1896: app_exception.raise_exception;
1897: END IF;
1898:
1899: before_dml(
3479: OPEN c1;
3480: FETCH c1 INTO tlinfo;
3481: IF (c1%notfound) THEN
3482: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
3483: igs_ge_msg_stack.add;
3484: CLOSE c1;
3485: app_exception.raise_exception;
3486: RETURN;
3487: END IF;
3790: ) THEN
3791: NULL;
3792: ELSE
3793: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
3794: igs_ge_msg_stack.add;
3795: app_exception.raise_exception;
3796: END IF;
3797:
3798: RETURN;
4148: x_last_update_login := -1;
4149: END IF;
4150: ELSE
4151: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
4152: igs_ge_msg_stack.add;
4153: app_exception.raise_exception;
4154: END IF;
4155:
4156: before_dml(