71: OPEN cur_old_ref_values;
72: FETCH cur_old_ref_values INTO old_references;
73: IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
74: CLOSE cur_old_ref_values;
75: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
76: igs_ge_msg_stack.add;
77: app_exception.raise_exception;
78: RETURN;
79: END IF;
146: new_references.payment_plan_name,
147: new_references.plan_start_date
148: )
149: ) THEN
150: fnd_message.set_name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
151: igs_ge_msg_stack.add;
152: app_exception.raise_exception;
153: END IF;
154:
183: IF (c_personid%FOUND) THEN
184: CLOSE c_personid;
185: ELSE
186: CLOSE c_personid;
187: fnd_message.set_name ('FND','FORM_RECORD_DELETED');
188: igs_ge_msg_stack.add;
189: app_exception.raise_exception;
190: END IF;
191: END IF;
195: NULL;
196: ELSIF NOT igs_fi_pp_templates_pkg.get_pk_for_validation (
197: new_references.payment_plan_name
198: ) THEN
199: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
200: igs_ge_msg_stack.add;
201: app_exception.raise_exception;
202: END IF;
203:
209: ELSIF NOT igs_ca_inst_PKG.get_pk_for_validation (
210: new_references.fee_cal_type,
211: new_references.fee_ci_sequence_number
212: ) THEN
213: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
214: igs_ge_msg_stack.add;
215: app_exception.raise_exception;
216: END IF;
217:
220: NULL;
221: ELSIF NOT igs_fi_fee_type_PKG.get_pk_for_validation (
222: new_references.processing_fee_type
223: ) THEN
224: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
225: igs_ge_msg_stack.add;
226: app_exception.raise_exception;
227: END IF;
228:
292: l_chg_rec.p_invoice_amount := p_n_amount;
293: l_chg_rec.p_invoice_creation_date := TRUNC(SYSDATE);
294:
295: -- Get Invoice Description from Message
296: fnd_message.set_name( 'IGS', 'IGS_FI_PP_PROCESSING_FEE' );
297: fnd_message.set_token( 'PLAN_NAME', p_v_plan_name );
298: fnd_message.set_token( 'START_DATE', p_d_start_date );
299: l_chg_rec.p_invoice_desc := fnd_message.get;
300:
293: l_chg_rec.p_invoice_creation_date := TRUNC(SYSDATE);
294:
295: -- Get Invoice Description from Message
296: fnd_message.set_name( 'IGS', 'IGS_FI_PP_PROCESSING_FEE' );
297: fnd_message.set_token( 'PLAN_NAME', p_v_plan_name );
298: fnd_message.set_token( 'START_DATE', p_d_start_date );
299: l_chg_rec.p_invoice_desc := fnd_message.get;
300:
301: l_chg_rec.p_transaction_type := 'PAY_PLAN';
294:
295: -- Get Invoice Description from Message
296: fnd_message.set_name( 'IGS', 'IGS_FI_PP_PROCESSING_FEE' );
297: fnd_message.set_token( 'PLAN_NAME', p_v_plan_name );
298: fnd_message.set_token( 'START_DATE', p_d_start_date );
299: l_chg_rec.p_invoice_desc := fnd_message.get;
300:
301: l_chg_rec.p_transaction_type := 'PAY_PLAN';
302:
295: -- Get Invoice Description from Message
296: fnd_message.set_name( 'IGS', 'IGS_FI_PP_PROCESSING_FEE' );
297: fnd_message.set_token( 'PLAN_NAME', p_v_plan_name );
298: fnd_message.set_token( 'START_DATE', p_d_start_date );
299: l_chg_rec.p_invoice_desc := fnd_message.get;
300:
301: l_chg_rec.p_transaction_type := 'PAY_PLAN';
302:
303: --Capture the default currency that is set up in System Options Form.
305: p_v_curr_desc => l_v_curr_desc,
306: p_v_message_name => l_v_message_name
307: );
308: IF l_v_message_name IS NOT NULL THEN
309: fnd_message.set_name('IGS',l_v_message_name);
310: igs_ge_msg_stack.ADD;
311: app_exception.raise_exception;
312: END IF;
313:
364: x_waiver_amount => l_n_waiver_amount);
365:
366: IF l_v_status <> 'S' THEN
367: IF l_msg_count = 1 THEN
368: fnd_message.set_encoded(l_msg_data);
369: l_msg := fnd_message.get;
370: fnd_message.set_name('IGS', 'IGS_FI_ERR_TXT');
371: fnd_message.set_token('TEXT', l_msg);
372: igs_ge_msg_stack.add;
365:
366: IF l_v_status <> 'S' THEN
367: IF l_msg_count = 1 THEN
368: fnd_message.set_encoded(l_msg_data);
369: l_msg := fnd_message.get;
370: fnd_message.set_name('IGS', 'IGS_FI_ERR_TXT');
371: fnd_message.set_token('TEXT', l_msg);
372: igs_ge_msg_stack.add;
373: app_exception.raise_exception;
366: IF l_v_status <> 'S' THEN
367: IF l_msg_count = 1 THEN
368: fnd_message.set_encoded(l_msg_data);
369: l_msg := fnd_message.get;
370: fnd_message.set_name('IGS', 'IGS_FI_ERR_TXT');
371: fnd_message.set_token('TEXT', l_msg);
372: igs_ge_msg_stack.add;
373: app_exception.raise_exception;
374: ELSE
367: IF l_msg_count = 1 THEN
368: fnd_message.set_encoded(l_msg_data);
369: l_msg := fnd_message.get;
370: fnd_message.set_name('IGS', 'IGS_FI_ERR_TXT');
371: fnd_message.set_token('TEXT', l_msg);
372: igs_ge_msg_stack.add;
373: app_exception.raise_exception;
374: ELSE
375: l_msg := '';
375: l_msg := '';
376: FOR l_count IN 1 .. l_msg_count LOOP
377: l_msg := l_msg||fnd_msg_pub.get(p_msg_index => l_count, p_encoded => 'T') || ' ';
378: END LOOP;
379: fnd_message.set_name('IGS', 'IGS_FI_ERR_TXT');
380: fnd_message.set_token('TEXT', l_msg);
381: app_exception.raise_exception;
382: END IF;
383: END IF;
376: FOR l_count IN 1 .. l_msg_count LOOP
377: l_msg := l_msg||fnd_msg_pub.get(p_msg_index => l_count, p_encoded => 'T') || ' ';
378: END LOOP;
379: fnd_message.set_name('IGS', 'IGS_FI_ERR_TXT');
380: fnd_message.set_token('TEXT', l_msg);
381: app_exception.raise_exception;
382: END IF;
383: END IF;
384:
485: OPEN cur_rowid;
486: FETCH cur_rowid INTO lv_rowid;
487: IF (cur_rowid%FOUND) THEN
488: CLOSE cur_rowid;
489: fnd_message.set_name ('IGS', 'IGS_FI_PPSA_CI_FK');
490: igs_ge_msg_stack.add;
491: app_exception.raise_exception;
492: RETURN;
493: END IF;
515: IF old_references.plan_status_code = 'PLANNED'
516: AND new_references.plan_status_code = 'ACTIVE' THEN
517: IF new_references.processing_fee_amt IS NOT NULL THEN
518: IF new_references.fee_cal_type IS NULL THEN
519: fnd_message.set_name('IGS',
520: 'IGS_FI_PP_NO_FEE_PERIOD');
521: fnd_message.set_token( 'PLAN_NAME', new_references.payment_plan_name);
522: igs_ge_msg_stack.add;
523: app_exception.raise_exception;
517: IF new_references.processing_fee_amt IS NOT NULL THEN
518: IF new_references.fee_cal_type IS NULL THEN
519: fnd_message.set_name('IGS',
520: 'IGS_FI_PP_NO_FEE_PERIOD');
521: fnd_message.set_token( 'PLAN_NAME', new_references.payment_plan_name);
522: igs_ge_msg_stack.add;
523: app_exception.raise_exception;
524: END IF;
525:
639: IF ( get_pk_for_validation(
640: new_references.student_plan_id
641: )
642: ) THEN
643: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
644: igs_ge_msg_stack.add;
645: app_exception.raise_exception;
646: END IF;
647: check_uniqueness;
659: IF ( get_pk_for_validation (
660: new_references.student_plan_id
661: )
662: ) THEN
663: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
664: igs_ge_msg_stack.add;
665: app_exception.raise_exception;
666: END IF;
667: check_uniqueness;
756: ELSE
757: x_program_update_date := SYSDATE;
758: END IF;
759: ELSE
760: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
761: fnd_message.set_token ('ROUTINE', 'IGS_FI_PP_STD_ATTRS_PKG.INSERT_ROW');
762: igs_ge_msg_stack.add;
763: app_exception.raise_exception;
764: END IF;
757: x_program_update_date := SYSDATE;
758: END IF;
759: ELSE
760: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
761: fnd_message.set_token ('ROUTINE', 'IGS_FI_PP_STD_ATTRS_PKG.INSERT_ROW');
762: igs_ge_msg_stack.add;
763: app_exception.raise_exception;
764: END IF;
765:
988:
989: OPEN c1;
990: FETCH c1 INTO tlinfo;
991: IF (c1%notfound) THEN
992: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
993: igs_ge_msg_stack.add;
994: CLOSE c1;
995: app_exception.raise_exception;
996: RETURN;
1032: AND ((tlinfo.attribute20 = x_attribute20) OR ((tlinfo.attribute20 IS NULL) AND (X_attribute20 IS NULL)))
1033: ) THEN
1034: NULL;
1035: ELSE
1036: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1037: igs_ge_msg_stack.add;
1038: app_exception.raise_exception;
1039: END IF;
1040:
1112: IF (x_last_update_login IS NULL) THEN
1113: x_last_update_login := -1;
1114: END IF;
1115: ELSE
1116: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
1117: fnd_message.set_token ('ROUTINE', 'IGS_FI_PP_STD_ATTRS_PKG.UPDATE_ROW');
1118: igs_ge_msg_stack.add;
1119: app_exception.raise_exception;
1120: END IF;
1113: x_last_update_login := -1;
1114: END IF;
1115: ELSE
1116: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
1117: fnd_message.set_token ('ROUTINE', 'IGS_FI_PP_STD_ATTRS_PKG.UPDATE_ROW');
1118: igs_ge_msg_stack.add;
1119: app_exception.raise_exception;
1120: END IF;
1121: