ما المشكلة في هذا الكود؟

ببساطة :

طريقتك في الفحص خاطئة و السبب : لو أن كلمة السر أو اسم المستخدم خاطىء فلن يحضر الcursor أي بيانات بالتاي قيمة المتحول s.pass أو s.username ستكون Null و هذا سيخالف الشرط ....

يمكن اعتماد الطريقة التالية :

declare 
 pass varchar2(13); 
uname varchar2(13); 
begin 
if :b.username is null then
n:= show_alert('nullname');
RAISE form_trigger_failure; 
end if;
 if :b.pass is null then
     n:= show_alert('nullpass'); 
     RAISE form_trigger_failure; 
end if; 
select password , username into pass , uname where :b.username and password = :b.pass ; 
run_product(forms,'d:\sumaa1\wil',asynchronous,runtime,filesystem,'','');
exit_form; 

Exception 
  when no_data_found then 
     n:= show_alert('error , your password or username is invalid , try again '); 
end;

تعليمة select هنا ستحضر سجل واحد فقط إذا تحقق الشرط الخاص بها أي كانت كلمة المرور و اسم المستخدم صحيح و إلا فإنها لن تحضر أي بيانات و بالتالي سيحدث Exception ..

بالتوفيق

اعتقد انه يوجد تعديل بسيط فى الكود السابق

declare 
  pass varchar2(13); 
  uname varchar2(13); 
begin 
  if :b.username is null then
    n:= show_alert('nullname');
    RAISE form_trigger_failure; 
  end if;
  if :b.pass is null then
    n:= show_alert('nullpass'); 
    RAISE form_trigger_failure; 
  end if; 
  select password , username into pass , uname where username= :b.username  and
 password = :b.pass; 
if id_null( pass ) and id_null(uname) then
  run_product(forms,'d:\sumaa1\main',asynchronous,runtime,filesystem,'','');
else
  run_product(forms,'d:\sumaa1\wil',asynchronous,runtime,filesystem,'','');
end if;
exit_form; 
Exception 
 when no_data_found then 
    n:= show_alert('error , your password or username is invalid , try again '); 
end;

ارجو المعزره اذا كان كلامى خاطئ

ايهاب وجدى

مشكووووووووووووووووووووور يا أخوان على المساعدة وحلت المشكلة 0000000000000

أفهم أخي لماذا عدلت الكود لأنك تظن أنه يمكن أن لا يحضر بيانات و بالتالية قيمة المتحولين uname و pass قد تكون فارغة null ، أليس كذلك ؟

لن يحصل ذلك بالتأكيد و السبب لو أن التعليمة لم تحضر أي بيانات بالتالي لن يتابع التنفيذ و إنما سينتقل مباشرة إلى Exception فلذلك لا داعي لإضافة الشرط الذي كتبته ...

على كل حال أتمنى أن تكون المشكلة قد حلت .... و بالتوفيق للجميع

معك حق ......................

ايهاب وجدى