Problem in forms 6i

Question

here is the code i am using to call a report from forms.
the reports works fine in cleint server mode but fails in web enviornment.
the errorr i am getting in web enviornment i have given below.
can somebody help me to find out where the problem is laying?
the date format of application server is 'dd-mm-yyyy'.
and of client server date format is 'dd-mon-yy'
==========================================================================
Declare
     Report_Id Report_Object;
     V_Rep Varchar2(100);
     vjob_id varchar2(100);
     vc_rep_status varchar2(100);
     mId ParamList;
Begin
If get_application_property(user_interface) = 'WEB' Then
     message('firing if');
     Report_Id := Find_Report_object('REPORT269');
     Set_Report_Object_Property(Report_Id,Report_Comm_Mode,SYNCHRONOUS);
     Set_Report_Object_Property(Report_Id,Report_Destype,CACHE);
     Set_Report_Object_Property(Report_Id,Report_Desformat,'HTML');
                    mId := Get_parameter_List('Tmp');
     If Not Id_Null(mId) then
          Destroy_Parameter_List(mId);
          mId := Create_parameter_list('Tmp');
     Else
          mId := Create_parameter_list('Tmp');
     End if;
     Add_parameter(mId,'P_CO_DPCD',Text_Parameter,:GLOBAL.CO_DPCD);
     Add_parameter(mId,'P_FROM_DT',Text_Parameter,TO_DATE(:CONTROL.FROM_DT,'DD-MM-YYYY'));
     Add_parameter(mId,'P_TO_DT',Text_Parameter,TO_DATE(:CONTROL.TO_DT,'DD-MM-YYYY'));
     V_Rep := run_report_object(Report_Id,mId);
     --V_Rep := run_report_object(Report_Id
vjob_id := substr(v_rep, length('REP60EDP')+2 , length(v_rep));
vc_rep_status := REPORT_OBJECT_STATUS(v_rep);
if vc_rep_status = 'FINISHED' then
     web.show_document('/dev60cgi/rwcgi60.exe/getjobid'||vjob_id||'?server=REP60EDP','_blank');
else
     message('Report failed');
     message('Report failed');
end if;      
Else
     --message('firing else');pause;
          Report_Id := Find_Report_object('REPORT269');
          Set_Report_Object_Property(report_id,REPORT_SERVER,'');
          SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESTYPE,SCREEN);
          mId := Get_parameter_List('Tmp');
     If Not Id_Null(mId) then
          Destroy_Parameter_List(mId);
          mId := Create_parameter_list('Tmp');
     Else
          mId := Create_parameter_list('Tmp');
     End if;
     Add_parameter(mId,'P_CO_DPCD',Text_Parameter,:GLOBAL.CO_DPCD);
     Add_parameter(mId,'P_FROM_DT',Text_Parameter,TO_DATE(:CONTROL.FROM_DT,'DD-MM-YYYY'));
     Add_parameter(mId,'P_TO_DT',Text_Parameter,TO_DATE(:CONTROL.TO_DT,'DD-MM-YYYY'));
          V_rep := RUN_REPORT_OBJECT(Report_id,mId);
End If;     
End;
===============================================================================     
Terminated with Error :
ORA-01861: literal does not match format string WHERE DPCD IN ( SELECT DPCD FROM BRMST WHERE COCD = ( SELECT CO_CODE FROM CIRCLE_DECD WHERE CO_DPCD = : P_CO_DPCD ) ) AND TO_DATE ( COVER_START_DT , 'DD-MM-YYYY' ) >= TO_DATE ( : P_FROM_DT , ' DD-MM-YYYY ' ) AND TO_DATE ( COVER_START_DT , 'DD-MM-YY
=================================================================================

Answer 1

Hi,
to trace the problem, I'd try to provide a static value for the date taht you want to be passed
Add_parameter(mId,'P_FROM_DT',Text_Parameter,'01-10-2003');
Add_parameter(mId,'P_TO_DT',Text_Parameter,'01-10-2003');
Replace '01-10-2003' with valid dates in your.
Frank