Date problem in the form

Question

I have a field called exp_date data type is date in the database and also in the form.
In the recieving form field this date is entered as 2010/03 (year.month)
In my irradiation form the exp_date( scanned or entered as 201003) YYYYMM, is validated against the recieving table
and then based on the month I have to update my exp_date in irradiation form to the last day of the month. I ndo all the conversion and that works fine.
If march then 31, If april 30 etc.
I have master codes table where we store codes.
01 - 31
02 - 28
03 - 31
etc
v_exp_date1 varchar2(11);
v_exp_dat2 varchar2(11);
v_exp_date3 varchar2(11);
v_udf1 number;
v_complete_string varchar2(11);
v_exp_date date;     
Cursor C3 is Select to_char(exp_date,'MM')
     from supplies_received
     where lot = :plt_irradiation_log_t.lot;
Cursor C2 is select code,udf1 from master_codes
where code_type = 'DAYS'
and term_date is null
and code = to_number(v_exp_date1);
Cursor C4 is Select to_char(exp_date,'DD')
     from supplies_received
     where lot = :plt_irradiation_log_t.lot;
Cursor C5 is Select to_char(exp_date,'YYYY')
     from supplies_received
     where lot = :plt_irradiation_log_t.lot;
     open c3;
     fetch c3 into v_exp_date1;
     close c3;
     Open C2;
     Fetch C2 into v_day,v_udf1;     
     Close C2;
     open c4;
     fetch c4 into v_exp_date2;
     close c4;
     open c5;
     fetch c5 into v_exp_date3;
     close c5;
v_complete_string := v_exp_date1||'/'||v_udf1||'/'||v_exp_date3;
:plt_irradiation_log_t.exp_date := to_date(v_exp_date1||'/'||v_udf1||'/'||v_exp_date3);
:system.message_level := '10';
commit;
:system.message_level := '0';
v_complete_string is varchar2(11); If I make it date there is no action.
Now my exp_date is null.
I need help to populate exp_date.
Thanks in advance
Anu

Answer 1

I think your problem is the TO_DATE you use without giving a format-mask:
:plt_irradiation_log_t.exp_date := to_date(v_exp_date1||'/'||v_udf1||'/'||v_exp_date3);
try changing it to :
:plt_irradiation_log_t.exp_date := to_date(v_exp_date1||'/'||v_udf1||'/'||v_exp_date3, 'DD/MM/YYYY');btw... As fas as i understand your code you only want to get the last day of the date which matches :plt_irradiation_log_t.lot. If so, you may reduce your code to
DECLARE
  Cursor C3 is
    Select LAST_DAY(exp_date)
      from supplies_received
     where lot = :plt_irradiation_log_t.lot;
BEGIN
  OPEN c3;
  FETCH c3 INTO :plt_irradiation_log_t.exp_date;
  CLOSE c3;
  -- the rest of your code
  :system.message_level := '10';
  commit;
  :system.message_level := '0';
END;