67: PROCEDURE Timestamp IS
68: Current_Time DATE;
69: BEGIN
70: Current_Time := sysdate;
71: fnd_message_cache.set_name('FND' , 'UTIL-CURRENT TIME');
72: fnd_message_cache.set_token('DATE' , fnd_date.date_to_displaydate(Current_Time));
73: fnd_message_cache.set_token('TIME' , to_char(Current_Time , 'HH24:MI:SS'));
74: PJM_CONC.put_line(fnd_message_cache.get);
75: PJM_CONC.new_line(1);
68: Current_Time DATE;
69: BEGIN
70: Current_Time := sysdate;
71: fnd_message_cache.set_name('FND' , 'UTIL-CURRENT TIME');
72: fnd_message_cache.set_token('DATE' , fnd_date.date_to_displaydate(Current_Time));
73: fnd_message_cache.set_token('TIME' , to_char(Current_Time , 'HH24:MI:SS'));
74: PJM_CONC.put_line(fnd_message_cache.get);
75: PJM_CONC.new_line(1);
76: EXCEPTION
69: BEGIN
70: Current_Time := sysdate;
71: fnd_message_cache.set_name('FND' , 'UTIL-CURRENT TIME');
72: fnd_message_cache.set_token('DATE' , fnd_date.date_to_displaydate(Current_Time));
73: fnd_message_cache.set_token('TIME' , to_char(Current_Time , 'HH24:MI:SS'));
74: PJM_CONC.put_line(fnd_message_cache.get);
75: PJM_CONC.new_line(1);
76: EXCEPTION
77: WHEN OTHERS THEN
70: Current_Time := sysdate;
71: fnd_message_cache.set_name('FND' , 'UTIL-CURRENT TIME');
72: fnd_message_cache.set_token('DATE' , fnd_date.date_to_displaydate(Current_Time));
73: fnd_message_cache.set_token('TIME' , to_char(Current_Time , 'HH24:MI:SS'));
74: PJM_CONC.put_line(fnd_message_cache.get);
75: PJM_CONC.new_line(1);
76: EXCEPTION
77: WHEN OTHERS THEN
78: NULL;