27:
28:
29: BEGIN
30: l_request_id :=p_request_id;
31: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Start Raise Delinquency Event Concurrent program');
32: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date:'||SYSDATE);
33: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
34: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'PARAMETERS');
35: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Request Id = ' ||l_request_id);
28:
29: BEGIN
30: l_request_id :=p_request_id;
31: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Start Raise Delinquency Event Concurrent program');
32: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date:'||SYSDATE);
33: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
34: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'PARAMETERS');
35: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Request Id = ' ||l_request_id);
36: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
29: BEGIN
30: l_request_id :=p_request_id;
31: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Start Raise Delinquency Event Concurrent program');
32: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date:'||SYSDATE);
33: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
34: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'PARAMETERS');
35: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Request Id = ' ||l_request_id);
36: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
37:
30: l_request_id :=p_request_id;
31: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Start Raise Delinquency Event Concurrent program');
32: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date:'||SYSDATE);
33: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
34: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'PARAMETERS');
35: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Request Id = ' ||l_request_id);
36: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
37:
38:
31: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Start Raise Delinquency Event Concurrent program');
32: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date:'||SYSDATE);
33: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
34: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'PARAMETERS');
35: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Request Id = ' ||l_request_id);
36: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
37:
38:
39: --Event Counter
32: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Program Run Date:'||SYSDATE);
33: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
34: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'PARAMETERS');
35: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Request Id = ' ||l_request_id);
36: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
37:
38:
39: --Event Counter
40: l_evt_ctr :=0;
94: l_parameter_list.DELETE;
95: l_evt_ctr:=l_evt_ctr +1;
96: END LOOP;
97:
98: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'No of Events raised :'||l_evt_ctr);
99: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'End Raise Delinquency Event Concurrent program');
100: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
101:
102: EXCEPTION
95: l_evt_ctr:=l_evt_ctr +1;
96: END LOOP;
97:
98: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'No of Events raised :'||l_evt_ctr);
99: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'End Raise Delinquency Event Concurrent program');
100: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
101:
102: EXCEPTION
103: WHEN OTHERS THEN
96: END LOOP;
97:
98: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'No of Events raised :'||l_evt_ctr);
99: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'End Raise Delinquency Event Concurrent program');
100: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
101:
102: EXCEPTION
103: WHEN OTHERS THEN
104: write_log(FND_LOG.LEVEL_UNEXPECTED,
112: l_dot varchar2(10);
113: l_module varchar2(10);
114: BEGIN
115: if (mesg_level >= l_msgLevel) then
116: fnd_file.put_line(FND_FILE.LOG, mesg);
117: end if;
118: END write_log;
119:
120: BEGIN