السلام عليكم عندي مشكلة مع show_alert عندما استخدمها لاظهار رسالة وعند الضغط على ok  لفتح شاشة ثانية فلا يتم فتحها بل تعلق وبعدين بخرج بشكل كامل ويغلق الشاشات ارجو منكم مساعدتي

ما هو الكود المستخدم 

declare

v_alert_id alert;

v_alert_button number;

v_text varchar2(200);

begin

v_alert_id:=find_alert('alert');

set_alert_property(v_alert_id,alert_message_text,v_text);

if show_alert(v_alert_id)=alert_button1 then

call('main_form');

end if;

end;

تم تعديل 13 نوفمبر 201411 سنة بواسطة Ahmad.Hasan

v_alert_button ده مبتعملش بيه حاجة في الكود

v_text ده null

- مفيش حاجة اسمها call , اسمها call_form('main_form.fmx') ;

Show_Alert Hanging

 

When running a form in 10g the follwoing code in executed under a When Button Pressed Trigger

 

SET_ALERT_PROPERTY('ok_cancel', TITLE, 'Confirm Rev TIs');
SET_ALERT_PROPERTY('ok_cancel', ALERT_MESSAGE_TEXT, t_count || ' TIs will be reversed ?' );
v_alert := SHOW_ALERT('ok_cancel');
IF v_alert = ALERT_BUTTON1 THEN -- Continue
     t_count := 0;
     pom.rev_ti(:rev_ti.po_id, :rev_ti.item_number, :rev_ti.source, :rev_ti.destination,
     :rev_ti.sched_name, :rev_ti.cost_centre, :rev_ti.customer, t_count);
ELSIF v_alert = ALERT_BUTTON2 THEN -- Stop
     RETURN;
END IF;


SET_ALERT_PROPERTY( 'ok', ALERT_MESSAGE_TEXT, t_count || ' TIs were reversed' );
SET_ALERT_PROPERTY( 'ok', TITLE, 'TIs Reversed' ); 
v_alert := SHOW_ALERT( 'ok' );

The issue is the code will run successfully a number of times and then hang with the egg timer, after adding some debug messages the hang appears to be in the line v_alert := SHOW_ALERT( 'ok' );

 

Is this a known issue and is there a work around?

 

Thanks

تم تعديل 18 نوفمبر 201411 سنة بواسطة Ahmad.Hasan

أرج مساعدتكم في المشكلة أعلاه