اضافة Bean للفورم

السلام عليكم ورحمة الله وبركاته
اريد المساعدة في اضافة مكون جافا للفورم
وجدت في موقع امثلة وملفات جاهزة ونزلتتها واتبعت الخطوات المذكورة لكن لم يتنفذ


The implementation class of the Bean Item

oracle.forms.fd.JCalendar

Set_Custom_Property('BL.BEAN',1, 'SET_PROPERTY','plasticLAF,true');
Set_Custom_Property('BL.BEAN',1, 'SET_PROPERTY','log,true');
Set_Custom_Property('BL.BEAN',1, 'SET_PROPERTY','title,Choose...');
Set_Custom_Property('BL.BEAN',1, 'SET_PROPERTY','locale,US');
Set_Custom_Property('BL.BEAN',1, 'SET_PROPERTY','foreground,r128g50b50');
Set_Custom_Property('BL.BEAN',1, 'SET_PROPERTY','date,2007,12,25');

Show the calendar
Set_Custom_Property('BL.BEAN',1, 'SHOW_CALENDAR','50,50');

The event received from the Bean

CALENDAR_EVENT

DECLARE

eventName varchar2(30) := :system.custom_item_event;
eventValues ParamList;
eventValueType number;
LC$Date varchar2(256); -- complete date
LC$Day varchar2(256); -- day number (1-31)
LC$Month varchar2(256); -- month number (1-12)
LC$Year varchar2(256); -- year number

BEGIN

IF (eventName='CALENDAR_EVENT') THEN
eventValues := get_parameter_list(:system.custom_item_event_parameters);
get_parameter_attr(eventValues,'CALENDAR_EVENT_DATE',eventValueType, LC$Date);
get_parameter_attr(eventValues,'CALENDAR_EVENT_DAY',eventValueType, LC$Day);
get_parameter_attr(eventValues,'CALENDAR_EVENT_MONTH',eventValueType, LC$Month);
get_parameter_attr(eventValues,'CALENDAR_EVENT_YEAR',eventValueType, LC$Year);
Clear_Message;
Message('Selected date:'|| LC$Date || '(' || LC$Day||'/'||LC$Month||'/'||LC$Year || ')');
Synchronize ;
END IF;

END;

لو حد عنده فكرة ياريت يساعدني

تم تعديل 17 أكتوبر 201114 سنة بواسطة اخت اشراقة