82: END IF;
83: CLOSE cur_c1;
84: EXCEPTION
85: WHEN OTHERS THEN
86: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
87: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_get_letter_type');
88: IGS_GE_MSG_STACK.ADD;
89: App_Exception.Raise_Exception;
90: END corp_get_letter_type;
83: CLOSE cur_c1;
84: EXCEPTION
85: WHEN OTHERS THEN
86: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
87: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_get_letter_type');
88: IGS_GE_MSG_STACK.ADD;
89: App_Exception.Raise_Exception;
90: END corp_get_letter_type;
91:
239: FETCH c_att_id INTO l_attach_fid;
240:
241:
242: IF c_att_id%NOTFOUND OR l_attach_fid IS NULL THEN
243: FND_MESSAGE.SET_NAME('IGF','IGF_AW_NO_LIST');
244: FND_MESSAGE.SET_TOKEN('LIST', l_list_id);
245: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
246: p_exception := 'Y';
247: CLOSE c_att_id;
240:
241:
242: IF c_att_id%NOTFOUND OR l_attach_fid IS NULL THEN
243: FND_MESSAGE.SET_NAME('IGF','IGF_AW_NO_LIST');
244: FND_MESSAGE.SET_TOKEN('LIST', l_list_id);
245: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
246: p_exception := 'Y';
247: CLOSE c_att_id;
248: RETURN;
241:
242: IF c_att_id%NOTFOUND OR l_attach_fid IS NULL THEN
243: FND_MESSAGE.SET_NAME('IGF','IGF_AW_NO_LIST');
244: FND_MESSAGE.SET_TOKEN('LIST', l_list_id);
245: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
246: p_exception := 'Y';
247: CLOSE c_att_id;
248: RETURN;
249: END IF;
263: --**
264:
265: IF l_query_text IS NULL THEN
266: p_exception := 'Y';
267: fnd_message.set_name('IGF','IGF_AW_NO_LIST');
268: fnd_message.set_token('LIST',p_list_id);
269: fnd_file.put_line(fnd_file.log,fnd_message.get());
270: fnd_file.put_line(FND_FILE.LOG,' ');
271: RETURN;
264:
265: IF l_query_text IS NULL THEN
266: p_exception := 'Y';
267: fnd_message.set_name('IGF','IGF_AW_NO_LIST');
268: fnd_message.set_token('LIST',p_list_id);
269: fnd_file.put_line(fnd_file.log,fnd_message.get());
270: fnd_file.put_line(FND_FILE.LOG,' ');
271: RETURN;
272: ELSE
265: IF l_query_text IS NULL THEN
266: p_exception := 'Y';
267: fnd_message.set_name('IGF','IGF_AW_NO_LIST');
268: fnd_message.set_token('LIST',p_list_id);
269: fnd_file.put_line(fnd_file.log,fnd_message.get());
270: fnd_file.put_line(FND_FILE.LOG,' ');
271: RETURN;
272: ELSE
273: l_query_str := 'SELECT distinct person_id FROM '|| '(' || l_query_text || ')';
320: -- check whether the group is dynamic or not.
321: -- if file_name is NOT NULL means, the group is dynamic.
322: l_str := igs_pe_dynamic_persid_group.get_dynamic_sql(p_parameter_1 ,lv_status, l_group_type);
323: IF lv_status <> 'S' THEN
324: FND_MESSAGE.SET_NAME('IGF','IGF_AW_NO_QUERY');
325: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
326: p_exception := 'Y';
327: RETURN;
328: END IF;
321: -- if file_name is NOT NULL means, the group is dynamic.
322: l_str := igs_pe_dynamic_persid_group.get_dynamic_sql(p_parameter_1 ,lv_status, l_group_type);
323: IF lv_status <> 'S' THEN
324: FND_MESSAGE.SET_NAME('IGF','IGF_AW_NO_QUERY');
325: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
326: p_exception := 'Y';
327: RETURN;
328: END IF;
329:
427: END IF;
428: --**
429: EXCEPTION
430: WHEN OTHERS THEN
431: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
432: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_build_sql_stmt'||'-'||SQLERRM);
433: IGS_GE_MSG_STACK.ADD;
434: APP_EXCEPTION.RAISE_EXCEPTION;
435: END corp_build_sql_stmt;
428: --**
429: EXCEPTION
430: WHEN OTHERS THEN
431: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
432: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_build_sql_stmt'||'-'||SQLERRM);
433: IGS_GE_MSG_STACK.ADD;
434: APP_EXCEPTION.RAISE_EXCEPTION;
435: END corp_build_sql_stmt;
436:
466: END IF;
467: CLOSE cur_c1;
468: EXCEPTION
469: WHEN OTHERS THEN
470: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
471: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_check_document_attributes');
472: IGS_GE_MSG_STACK.ADD;
473: App_Exception.Raise_Exception;
474: END corp_check_document_attributes;
467: CLOSE cur_c1;
468: EXCEPTION
469: WHEN OTHERS THEN
470: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
471: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_check_document_attributes');
472: IGS_GE_MSG_STACK.ADD;
473: App_Exception.Raise_Exception;
474: END corp_check_document_attributes;
475:
696: IF (TRUNC(SYSDATE) - TRUNC(l_requested_date)) < NVL(p_elapsed_days,0) THEN
697: p_send_letter := 'FALSE';
698: OPEN cur_get_per_num(p_person_id);
699: FETCH cur_get_per_num into l_cur_get_per_num;
700: fnd_message.set_name('IGS','IGS_CO_ELAPSED_DAYS');
701: fnd_message.set_token('PERSON',l_cur_get_per_num.person_number);
702: fnd_file.put_line(fnd_file.log,fnd_message.get());
703: fnd_file.put_line(FND_FILE.LOG,' ');
704: CLOSE cur_get_per_num;
697: p_send_letter := 'FALSE';
698: OPEN cur_get_per_num(p_person_id);
699: FETCH cur_get_per_num into l_cur_get_per_num;
700: fnd_message.set_name('IGS','IGS_CO_ELAPSED_DAYS');
701: fnd_message.set_token('PERSON',l_cur_get_per_num.person_number);
702: fnd_file.put_line(fnd_file.log,fnd_message.get());
703: fnd_file.put_line(FND_FILE.LOG,' ');
704: CLOSE cur_get_per_num;
705: ELSIF NVL(p_no_of_repeats,10000) <= l_count THEN
698: OPEN cur_get_per_num(p_person_id);
699: FETCH cur_get_per_num into l_cur_get_per_num;
700: fnd_message.set_name('IGS','IGS_CO_ELAPSED_DAYS');
701: fnd_message.set_token('PERSON',l_cur_get_per_num.person_number);
702: fnd_file.put_line(fnd_file.log,fnd_message.get());
703: fnd_file.put_line(FND_FILE.LOG,' ');
704: CLOSE cur_get_per_num;
705: ELSIF NVL(p_no_of_repeats,10000) <= l_count THEN
706: p_send_letter := 'FALSE';
705: ELSIF NVL(p_no_of_repeats,10000) <= l_count THEN
706: p_send_letter := 'FALSE';
707: OPEN cur_get_per_num(p_person_id);
708: FETCH cur_get_per_num into l_cur_get_per_num;
709: fnd_message.set_name('IGS','IGS_CO_NO_REPEATS');
710: fnd_message.set_token('PERSON',l_cur_get_per_num.person_number);
711: fnd_file.put_line(fnd_file.log,fnd_message.get());
712: fnd_file.put_line(FND_FILE.LOG,' ');
713: CLOSE cur_get_per_num;
706: p_send_letter := 'FALSE';
707: OPEN cur_get_per_num(p_person_id);
708: FETCH cur_get_per_num into l_cur_get_per_num;
709: fnd_message.set_name('IGS','IGS_CO_NO_REPEATS');
710: fnd_message.set_token('PERSON',l_cur_get_per_num.person_number);
711: fnd_file.put_line(fnd_file.log,fnd_message.get());
712: fnd_file.put_line(FND_FILE.LOG,' ');
713: CLOSE cur_get_per_num;
714: ELSE
707: OPEN cur_get_per_num(p_person_id);
708: FETCH cur_get_per_num into l_cur_get_per_num;
709: fnd_message.set_name('IGS','IGS_CO_NO_REPEATS');
710: fnd_message.set_token('PERSON',l_cur_get_per_num.person_number);
711: fnd_file.put_line(fnd_file.log,fnd_message.get());
712: fnd_file.put_line(FND_FILE.LOG,' ');
713: CLOSE cur_get_per_num;
714: ELSE
715: p_send_letter := 'TRUE';
715: p_send_letter := 'TRUE';
716: END IF;
717: EXCEPTION
718: WHEN OTHERS THEN
719: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
720: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_check_interaction_history');
721: IGS_GE_MSG_STACK.ADD;
722: App_Exception.Raise_Exception;
723: END corp_check_interaction_history;
716: END IF;
717: EXCEPTION
718: WHEN OTHERS THEN
719: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
720: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_check_interaction_history');
721: IGS_GE_MSG_STACK.ADD;
722: App_Exception.Raise_Exception;
723: END corp_check_interaction_history;
724:
1512: l_debug_str := 'inside exception section when inserting record in IGS_CO_PREV_REQS and exception is ' || sqlerrm;
1513: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1514: END IF;
1515: --**
1516: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
1517: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_submit_fulfil_request');
1518: IGS_GE_MSG_STACK.ADD;
1519: App_Exception.Raise_Exception;
1520:
1513: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1514: END IF;
1515: --**
1516: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
1517: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_submit_fulfil_request');
1518: IGS_GE_MSG_STACK.ADD;
1519: App_Exception.Raise_Exception;
1520:
1521: END;
1601:
1602: p_request_status := 'SUBMITTED';
1603: OPEN c_per_processed(p_person_id);
1604: FETCH c_per_processed INTO l_person_number,l_full_name;
1605: Fnd_Message.Set_name('IGF','IGF_AW_PROC_STUD');
1606: FND_MESSAGE.SET_TOKEN('STDNT',l_person_number||' - '||l_full_name);
1607: fnd_file.put_line(fnd_file.log,fnd_message.get);
1608: Fnd_Message.Set_name('IGS','IGS_CO_REQ_INFO');
1609: FND_MESSAGE.SET_TOKEN('REQUEST_ID',p_request_id);
1602: p_request_status := 'SUBMITTED';
1603: OPEN c_per_processed(p_person_id);
1604: FETCH c_per_processed INTO l_person_number,l_full_name;
1605: Fnd_Message.Set_name('IGF','IGF_AW_PROC_STUD');
1606: FND_MESSAGE.SET_TOKEN('STDNT',l_person_number||' - '||l_full_name);
1607: fnd_file.put_line(fnd_file.log,fnd_message.get);
1608: Fnd_Message.Set_name('IGS','IGS_CO_REQ_INFO');
1609: FND_MESSAGE.SET_TOKEN('REQUEST_ID',p_request_id);
1610: fnd_file.put_line(fnd_file.log,fnd_message.get);
1603: OPEN c_per_processed(p_person_id);
1604: FETCH c_per_processed INTO l_person_number,l_full_name;
1605: Fnd_Message.Set_name('IGF','IGF_AW_PROC_STUD');
1606: FND_MESSAGE.SET_TOKEN('STDNT',l_person_number||' - '||l_full_name);
1607: fnd_file.put_line(fnd_file.log,fnd_message.get);
1608: Fnd_Message.Set_name('IGS','IGS_CO_REQ_INFO');
1609: FND_MESSAGE.SET_TOKEN('REQUEST_ID',p_request_id);
1610: fnd_file.put_line(fnd_file.log,fnd_message.get);
1611:
1604: FETCH c_per_processed INTO l_person_number,l_full_name;
1605: Fnd_Message.Set_name('IGF','IGF_AW_PROC_STUD');
1606: FND_MESSAGE.SET_TOKEN('STDNT',l_person_number||' - '||l_full_name);
1607: fnd_file.put_line(fnd_file.log,fnd_message.get);
1608: Fnd_Message.Set_name('IGS','IGS_CO_REQ_INFO');
1609: FND_MESSAGE.SET_TOKEN('REQUEST_ID',p_request_id);
1610: fnd_file.put_line(fnd_file.log,fnd_message.get);
1611:
1612: IF igs_co_process.l_message_logged THEN
1605: Fnd_Message.Set_name('IGF','IGF_AW_PROC_STUD');
1606: FND_MESSAGE.SET_TOKEN('STDNT',l_person_number||' - '||l_full_name);
1607: fnd_file.put_line(fnd_file.log,fnd_message.get);
1608: Fnd_Message.Set_name('IGS','IGS_CO_REQ_INFO');
1609: FND_MESSAGE.SET_TOKEN('REQUEST_ID',p_request_id);
1610: fnd_file.put_line(fnd_file.log,fnd_message.get);
1611:
1612: IF igs_co_process.l_message_logged THEN
1613: igs_co_process.l_message_logged := FALSE;
1606: FND_MESSAGE.SET_TOKEN('STDNT',l_person_number||' - '||l_full_name);
1607: fnd_file.put_line(fnd_file.log,fnd_message.get);
1608: Fnd_Message.Set_name('IGS','IGS_CO_REQ_INFO');
1609: FND_MESSAGE.SET_TOKEN('REQUEST_ID',p_request_id);
1610: fnd_file.put_line(fnd_file.log,fnd_message.get);
1611:
1612: IF igs_co_process.l_message_logged THEN
1613: igs_co_process.l_message_logged := FALSE;
1614: END IF;
1647: COMMIT;
1648: ELSE
1649: l_corp_submit_fulfil_request := TRUE;
1650: IF NOT igs_co_process.l_message_logged THEN
1651: fnd_message.set_name('IGS','IGS_CO_HOLD_EXISTS');
1652: fnd_file.put_line(fnd_file.log,fnd_message.get);
1653: igs_co_process.l_message_logged := TRUE;
1654: END IF;
1655: OPEN log_details; LOOP
1648: ELSE
1649: l_corp_submit_fulfil_request := TRUE;
1650: IF NOT igs_co_process.l_message_logged THEN
1651: fnd_message.set_name('IGS','IGS_CO_HOLD_EXISTS');
1652: fnd_file.put_line(fnd_file.log,fnd_message.get);
1653: igs_co_process.l_message_logged := TRUE;
1654: END IF;
1655: OPEN log_details; LOOP
1656: FETCH log_details INTO l_full_name,l_person_number,l_encumbrance_desc;
1671: l_debug_str := 'inside exception section and exception is ' || sqlerrm;
1672: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1673: END IF;
1674: --**
1675: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
1676: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_submit_fulfil_request');
1677: IGS_GE_MSG_STACK.ADD;
1678: App_Exception.Raise_Exception;
1679: END corp_submit_fulfil_request;
1672: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1673: END IF;
1674: --**
1675: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
1676: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_submit_fulfil_request');
1677: IGS_GE_MSG_STACK.ADD;
1678: App_Exception.Raise_Exception;
1679: END corp_submit_fulfil_request;
1680:
1760: --**
1761:
1762: EXCEPTION
1763: WHEN OTHERS THEN
1764: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
1765: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_post_process');
1766: IGS_GE_MSG_STACK.ADD;
1767: App_Exception.Raise_Exception;
1768: END corp_post_process;
1761:
1762: EXCEPTION
1763: WHEN OTHERS THEN
1764: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
1765: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_post_process');
1766: IGS_GE_MSG_STACK.ADD;
1767: App_Exception.Raise_Exception;
1768: END corp_post_process;
1769:
1840: END IF;
1841:
1842: EXCEPTION
1843: WHEN OTHERS THEN
1844: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
1845: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_get_system_letter_view');
1846: IGS_GE_MSG_STACK.ADD;
1847: App_Exception.Raise_Exception;
1848: END corp_get_system_letter_view;
1841:
1842: EXCEPTION
1843: WHEN OTHERS THEN
1844: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
1845: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_get_system_letter_view');
1846: IGS_GE_MSG_STACK.ADD;
1847: App_Exception.Raise_Exception;
1848: END corp_get_system_letter_view;
1849:
2234: END IF;
2235: END IF;
2236: EXCEPTION
2237: WHEN OTHERS THEN
2238: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
2239: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_get_parameter_value');
2240: IGS_GE_MSG_STACK.ADD;
2241: App_Exception.Raise_Exception;
2242: END corp_get_parameter_value;
2235: END IF;
2236: EXCEPTION
2237: WHEN OTHERS THEN
2238: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
2239: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_get_parameter_value');
2240: IGS_GE_MSG_STACK.ADD;
2241: App_Exception.Raise_Exception;
2242: END corp_get_parameter_value;
2243:
2342: WHEN OTHERS THEN
2343: IF l_called_from_conc = 'Y' THEN
2344: ROLLBACK;
2345: RETCODE:=2;
2346: ERRBUF:= Fnd_Message.GET_STRING('IGS','IGS_GE_UNHANDLED_EXCEPTION');
2347: Igs_Ge_Msg_Stack.CONC_EXCEPTION_HNDL;
2348: ELSE
2349: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
2350: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_check_request_status');
2345: RETCODE:=2;
2346: ERRBUF:= Fnd_Message.GET_STRING('IGS','IGS_GE_UNHANDLED_EXCEPTION');
2347: Igs_Ge_Msg_Stack.CONC_EXCEPTION_HNDL;
2348: ELSE
2349: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
2350: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_check_request_status');
2351: IGS_GE_MSG_STACK.ADD;
2352: App_Exception.Raise_Exception;
2353: END IF;
2346: ERRBUF:= Fnd_Message.GET_STRING('IGS','IGS_GE_UNHANDLED_EXCEPTION');
2347: Igs_Ge_Msg_Stack.CONC_EXCEPTION_HNDL;
2348: ELSE
2349: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
2350: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_check_request_status');
2351: IGS_GE_MSG_STACK.ADD;
2352: App_Exception.Raise_Exception;
2353: END IF;
2354: END corp_check_request_status;
2421: p_parameter_1 IS NOT NULL OR p_parameter_2 IS NOT NULL OR p_parameter_3 IS NOT NULL OR
2422: p_parameter_4 IS NOT NULL OR p_parameter_6 IS NOT NULL OR p_parameter_7 IS NOT NULL OR
2423: p_parameter_9 IS NOT NULL OR p_person_id IS NOT NULL THEN
2424: p_exception := 'Y';
2425: fnd_message.set_name('IGS','IGS_CO_LIST_PRAM');
2426: fnd_file.put_line(fnd_file.log,fnd_message.get());
2427: fnd_file.put_line(FND_FILE.LOG,' ');
2428: --** proc level logging.
2429: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2422: p_parameter_4 IS NOT NULL OR p_parameter_6 IS NOT NULL OR p_parameter_7 IS NOT NULL OR
2423: p_parameter_9 IS NOT NULL OR p_person_id IS NOT NULL THEN
2424: p_exception := 'Y';
2425: fnd_message.set_name('IGS','IGS_CO_LIST_PRAM');
2426: fnd_file.put_line(fnd_file.log,fnd_message.get());
2427: fnd_file.put_line(FND_FILE.LOG,' ');
2428: --** proc level logging.
2429: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2430: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2442: p_parameter_7 IS NOT NULL OR p_parameter_9 IS NOT NULL OR p_person_id IS NOT NULL THEN
2443: --As letter has been submitted with select type as List
2444: --Only List Name should be specified
2445: p_exception := 'Y';
2446: fnd_message.set_name('IGS','IGS_CO_LIST_PRAM');
2447: fnd_file.put_line(fnd_file.log,fnd_message.get());
2448: fnd_file.put_line(FND_FILE.LOG,' ');
2449: --** proc level logging.
2450: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2443: --As letter has been submitted with select type as List
2444: --Only List Name should be specified
2445: p_exception := 'Y';
2446: fnd_message.set_name('IGS','IGS_CO_LIST_PRAM');
2447: fnd_file.put_line(fnd_file.log,fnd_message.get());
2448: fnd_file.put_line(FND_FILE.LOG,' ');
2449: --** proc level logging.
2450: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2451: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2465: --As letter has been submitted with select type as List
2466: --Only List Name should be specified
2467: --
2468: p_exception := 'Y';
2469: fnd_message.set_name('IGS','IGS_CO_LIST_PRAM');
2470: fnd_file.put_line(fnd_file.log,fnd_message.get());
2471: fnd_file.put_line(FND_FILE.LOG,' ');
2472: --** proc level logging.
2473: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2466: --Only List Name should be specified
2467: --
2468: p_exception := 'Y';
2469: fnd_message.set_name('IGS','IGS_CO_LIST_PRAM');
2470: fnd_file.put_line(fnd_file.log,fnd_message.get());
2471: fnd_file.put_line(FND_FILE.LOG,' ');
2472: --** proc level logging.
2473: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2474: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2488: p_parameter_4 IS NOT NULL OR p_parameter_6 IS NOT NULL OR p_parameter_7 IS NOT NULL OR
2489: p_parameter_9 IS NOT NULL THEN
2490: p_exception := 'Y';
2491:
2492: fnd_message.set_name('IGS','IGS_CO_STUD_PRAM');
2493: fnd_file.put_line(fnd_file.log,fnd_message.get());
2494: fnd_file.put_line(FND_FILE.LOG,' ');
2495: --** proc level logging.
2496: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2489: p_parameter_9 IS NOT NULL THEN
2490: p_exception := 'Y';
2491:
2492: fnd_message.set_name('IGS','IGS_CO_STUD_PRAM');
2493: fnd_file.put_line(fnd_file.log,fnd_message.get());
2494: fnd_file.put_line(FND_FILE.LOG,' ');
2495: --** proc level logging.
2496: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2497: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2509: p_parameter_7 IS NOT NULL OR p_parameter_9 IS NOT NULL THEN
2510: --As letter has been submitted with select type as List
2511: --Only List Name should be specified
2512: p_exception := 'Y';
2513: fnd_message.set_name('IGS','IGS_CO_STUD_PRAM');
2514: fnd_file.put_line(fnd_file.log,fnd_message.get());
2515: fnd_file.put_line(FND_FILE.LOG,' ');
2516: --** proc level logging.
2517: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2510: --As letter has been submitted with select type as List
2511: --Only List Name should be specified
2512: p_exception := 'Y';
2513: fnd_message.set_name('IGS','IGS_CO_STUD_PRAM');
2514: fnd_file.put_line(fnd_file.log,fnd_message.get());
2515: fnd_file.put_line(FND_FILE.LOG,' ');
2516: --** proc level logging.
2517: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2518: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2532: p_list_id IS NOT NULL THEN
2533:
2534:
2535: p_exception := 'Y';
2536: fnd_message.set_name('IGS','IGS_CO_STUD_PRAM');
2537: fnd_file.put_line(fnd_file.log,fnd_message.get());
2538: fnd_file.put_line(FND_FILE.LOG,' ');
2539: --** proc level logging.
2540: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2533:
2534:
2535: p_exception := 'Y';
2536: fnd_message.set_name('IGS','IGS_CO_STUD_PRAM');
2537: fnd_file.put_line(fnd_file.log,fnd_message.get());
2538: fnd_file.put_line(FND_FILE.LOG,' ');
2539: --** proc level logging.
2540: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2541: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2560: l_all_not_null := 'TRUE';
2561: END IF;
2562: IF NOT( l_all_null = 'TRUE' OR l_all_not_null = 'TRUE') THEN
2563: p_exception := 'Y';
2564: fnd_message.set_name('IGS','IGS_AD_INVALID_PARAM_COMB');
2565: fnd_file.put_line(fnd_file.log,fnd_message.get());
2566: fnd_file.put_line(FND_FILE.LOG,' ');
2567: --** proc level logging.
2568: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2561: END IF;
2562: IF NOT( l_all_null = 'TRUE' OR l_all_not_null = 'TRUE') THEN
2563: p_exception := 'Y';
2564: fnd_message.set_name('IGS','IGS_AD_INVALID_PARAM_COMB');
2565: fnd_file.put_line(fnd_file.log,fnd_message.get());
2566: fnd_file.put_line(FND_FILE.LOG,' ');
2567: --** proc level logging.
2568: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2569: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2587: -- As letter has been submitted with select type as Parameter
2588: -- either Person ID Group or other parameters should be selected. Both cannot be specified.
2589: --
2590: p_exception := 'Y';
2591: fnd_message.set_name('IGS','IGS_AD_INVALID_PARAM_COMB');
2592: fnd_file.put_line(fnd_file.log,fnd_message.get());
2593: fnd_file.put_line(FND_FILE.LOG,' ');
2594: --** proc level logging.
2595: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2588: -- either Person ID Group or other parameters should be selected. Both cannot be specified.
2589: --
2590: p_exception := 'Y';
2591: fnd_message.set_name('IGS','IGS_AD_INVALID_PARAM_COMB');
2592: fnd_file.put_line(fnd_file.log,fnd_message.get());
2593: fnd_file.put_line(FND_FILE.LOG,' ');
2594: --** proc level logging.
2595: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2596: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2671: p_person_id IS NOT NULL OR p_list_id IS NOT NULL THEN
2672: --As letter has been submitted with select type as Group
2673: --Only Group Name should be specified
2674: p_exception := 'Y';
2675: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2676: fnd_file.put_line(fnd_file.log,fnd_message.get());
2677: fnd_file.put_line(FND_FILE.LOG,' ');
2678: --** proc level logging.
2679: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2672: --As letter has been submitted with select type as Group
2673: --Only Group Name should be specified
2674: p_exception := 'Y';
2675: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2676: fnd_file.put_line(fnd_file.log,fnd_message.get());
2677: fnd_file.put_line(FND_FILE.LOG,' ');
2678: --** proc level logging.
2679: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2680: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2692: p_person_id IS NOT NULL OR p_list_id IS NOT NULL THEN
2693: --As letter has been submitted with select type as Group
2694: --Only Group Name should be specified
2695: p_exception := 'Y';
2696: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2697: fnd_file.put_line(fnd_file.log,fnd_message.get());
2698: fnd_file.put_line(FND_FILE.LOG,' ');
2699: --** proc level logging.
2700: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2693: --As letter has been submitted with select type as Group
2694: --Only Group Name should be specified
2695: p_exception := 'Y';
2696: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2697: fnd_file.put_line(fnd_file.log,fnd_message.get());
2698: fnd_file.put_line(FND_FILE.LOG,' ');
2699: --** proc level logging.
2700: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2701: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2715: -- As letter has been submitted with select type as Parameter
2716: -- either Person ID Group or other parameters should be selected. Both cannot be specified.
2717: --
2718: p_exception := 'Y';
2719: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2720: fnd_file.put_line(fnd_file.log,fnd_message.get());
2721: fnd_file.put_line(FND_FILE.LOG,' ');
2722: --** proc level logging.
2723: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2716: -- either Person ID Group or other parameters should be selected. Both cannot be specified.
2717: --
2718: p_exception := 'Y';
2719: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2720: fnd_file.put_line(fnd_file.log,fnd_message.get());
2721: fnd_file.put_line(FND_FILE.LOG,' ');
2722: --** proc level logging.
2723: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2724: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2739: -- List nanm should not be selected
2740: --
2741:
2742: p_exception := 'N';
2743: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2744: fnd_file.put_line(fnd_file.log,fnd_message.get());
2745: fnd_file.put_line(FND_FILE.LOG,' ');
2746: --** proc level logging.
2747: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2740: --
2741:
2742: p_exception := 'N';
2743: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2744: fnd_file.put_line(fnd_file.log,fnd_message.get());
2745: fnd_file.put_line(FND_FILE.LOG,' ');
2746: --** proc level logging.
2747: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2748: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2756: END IF; -- p_parameter_1 IS NOT NULL THEN
2757:
2758: IF p_parameter_1 IS NULL THEN
2759: p_exception := 'Y';
2760: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2761: fnd_file.put_line(fnd_file.log,fnd_message.get());
2762: fnd_file.put_line(FND_FILE.LOG,' ');
2763: END IF;
2764: END IF; -- final end IF for selection type.
2757:
2758: IF p_parameter_1 IS NULL THEN
2759: p_exception := 'Y';
2760: fnd_message.set_name('IGS','IGS_CO_PER_LIS_PRAM');
2761: fnd_file.put_line(fnd_file.log,fnd_message.get());
2762: fnd_file.put_line(FND_FILE.LOG,' ');
2763: END IF;
2764: END IF; -- final end IF for selection type.
2765:
2767: -- Check if the parameter values are not correct.
2768: --
2769: IF l_error_flag = 'TRUE' THEN
2770: p_exception := 'Y';
2771: fnd_message.set_name('IGS','IGS_AD_INVALID_PARAM_COMB');
2772: fnd_file.put_line(fnd_file.log,fnd_message.get());
2773: fnd_file.put_line(FND_FILE.LOG,' ');
2774: --** proc level logging.
2775: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2768: --
2769: IF l_error_flag = 'TRUE' THEN
2770: p_exception := 'Y';
2771: fnd_message.set_name('IGS','IGS_AD_INVALID_PARAM_COMB');
2772: fnd_file.put_line(fnd_file.log,fnd_message.get());
2773: fnd_file.put_line(FND_FILE.LOG,' ');
2774: --** proc level logging.
2775: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
2776: l_label := 'igs.plsql.igs_co_process.corp_validate_parameters';
2788: l_debug_str := 'Exception in corp_validate_parameters.';
2789: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
2790: END IF;
2791: --**
2792: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
2793: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_validate_parameters');
2794: IGS_GE_MSG_STACK.ADD;
2795: App_Exception.Raise_Exception;
2796: END corp_validate_parameters;
2789: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
2790: END IF;
2791: --**
2792: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
2793: FND_MESSAGE.SET_TOKEN('NAME','IGS_CO_PROCESS.corp_validate_parameters');
2794: IGS_GE_MSG_STACK.ADD;
2795: App_Exception.Raise_Exception;
2796: END corp_validate_parameters;
2797: