57: BEGIN
58: fnd_message.set_name('IGS','IGS_FI_CRD_INT_ALL_PARAMETER');
59: fnd_message.set_token('PARM_TYPE', p_c_param_name);
60: fnd_message.set_token('PARM_CODE', p_c_param_value);
61: fnd_file.put_line(fnd_file.LOG, fnd_message.get );
62: END log_parameter;
63:
64:
65: PROCEDURE create_base_record
189: log_parameter (
190: p_c_param_name => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'STATUS' ),
191: p_c_param_value => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'SUCCESS' )
192: );
193: fnd_file.put_line ( fnd_file.LOG, ' ' || fnd_message.get_string('IGF', 'IGF_SP_SUCCESS') );
194: fnd_file.put_line ( fnd_file.LOG, ' ');
195: ELSE
196: log_parameter (
197: p_c_param_name => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'STATUS' ),
190: p_c_param_name => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'STATUS' ),
191: p_c_param_value => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'SUCCESS' )
192: );
193: fnd_file.put_line ( fnd_file.LOG, ' ' || fnd_message.get_string('IGF', 'IGF_SP_SUCCESS') );
194: fnd_file.put_line ( fnd_file.LOG, ' ');
195: ELSE
196: log_parameter (
197: p_c_param_name => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'STATUS' ),
198: p_c_param_value => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'ERROR' )
196: log_parameter (
197: p_c_param_name => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'STATUS' ),
198: p_c_param_value => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'ERROR' )
199: );
200: fnd_file.put_line ( fnd_file.LOG, ' ' || p_c_message );
201: fnd_file.put_line ( fnd_file.LOG, ' ');
202: END IF;
203: END log_status;
204:
197: p_c_param_name => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'STATUS' ),
198: p_c_param_value => igs_fi_gen_gl.get_lkp_meaning ( 'IGS_FI_LOCKBOX', 'ERROR' )
199: );
200: fnd_file.put_line ( fnd_file.LOG, ' ' || p_c_message );
201: fnd_file.put_line ( fnd_file.LOG, ' ');
202: END IF;
203: END log_status;
204:
205: BEGIN
217: errbuf := FND_MESSAGE.GET_STRING('IGS','IGS_FI_PRS_OR_PRSIDGRP');
218: /*
219: write to the log file
220: */
221: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
222: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
223: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
224: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
225: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
218: /*
219: write to the log file
220: */
221: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
222: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
223: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
224: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
225: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
226: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
220: */
221: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
222: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
223: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
224: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
225: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
226: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
227: RETURN;
228: END IF;
221: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
222: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
223: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
224: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
225: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
226: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
227: RETURN;
228: END IF;
229: /*
222: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
223: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
224: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
225: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
226: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
227: RETURN;
228: END IF;
229: /*
230: checking when both of p_person_id and p_person_group_id are passed
234: errbuf := FND_MESSAGE.GET_STRING('IGS','IGS_FI_PRS_OR_PRSIDGRP');
235: /*
236: write to the log file
237: */
238: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
239: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
240: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
241: FND_FILE.put_line(FND_FILE.LOG,FND_MESSAGE.GET);
242: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
235: /*
236: write to the log file
237: */
238: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
239: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
240: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
241: FND_FILE.put_line(FND_FILE.LOG,FND_MESSAGE.GET);
242: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
243: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
237: */
238: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
239: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
240: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
241: FND_FILE.put_line(FND_FILE.LOG,FND_MESSAGE.GET);
242: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
243: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
244: RETURN;
245: END IF;
238: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
239: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
240: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
241: FND_FILE.put_line(FND_FILE.LOG,FND_MESSAGE.GET);
242: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
243: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
244: RETURN;
245: END IF;
246: /*
239: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
240: FND_MESSAGE.SET_NAME('IGS','IGS_FI_PRS_OR_PRSIDGRP');
241: FND_FILE.put_line(FND_FILE.LOG,FND_MESSAGE.GET);
242: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
243: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
244: RETURN;
245: END IF;
246: /*
247: validation of parameters done
267: fnd_message.set_name('IGF',l_v_message_name);
268: ELSE
269: fnd_message.set_name('IGS',l_v_message_name);
270: END IF;
271: fnd_file.put_line(fnd_file.log,' ');
272: fnd_file.put_line(fnd_file.log,fnd_message.get);
273: fnd_file.put_line(fnd_file.log,' ');
274: RETURN;
275: END IF;
268: ELSE
269: fnd_message.set_name('IGS',l_v_message_name);
270: END IF;
271: fnd_file.put_line(fnd_file.log,' ');
272: fnd_file.put_line(fnd_file.log,fnd_message.get);
273: fnd_file.put_line(fnd_file.log,' ');
274: RETURN;
275: END IF;
276:
269: fnd_message.set_name('IGS',l_v_message_name);
270: END IF;
271: fnd_file.put_line(fnd_file.log,' ');
272: fnd_file.put_line(fnd_file.log,fnd_message.get);
273: fnd_file.put_line(fnd_file.log,' ');
274: RETURN;
275: END IF;
276:
277: /*
335: END LOOP;
336: END IF;
337: IF l_count = 0 THEN
338: FND_MESSAGE.SET_NAME('IGF','IGF_SP_NO_PERSON');
339: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
340: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
341: END IF;
342: EXCEPTION
343: WHEN OTHERS THEN
336: END IF;
337: IF l_count = 0 THEN
338: FND_MESSAGE.SET_NAME('IGF','IGF_SP_NO_PERSON');
339: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
340: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
341: END IF;
342: EXCEPTION
343: WHEN OTHERS THEN
344: RETCODE := 2 ;
439: FETCH ssn_cur INTO rec_ssn_cur;
440: IF ssn_cur%NOTFOUND THEN
441: fnd_message.set_name('IGF','IGF_AP_SSN_REQD');
442: p_message := 'IGF_AP_SSN_REQD';
443: fnd_file.put_line(fnd_file.log,fnd_message.get);
444: RETURN FALSE;
445: ELSE
446: CLOSE ssn_cur;
447: END IF;