بتاريخ: 29 سبتمبر 200718 سنة comment_111539 الاخوة الكرام عملت بللك من جدول emp وبه text_item(No database) وز الذي اريده هو ان ادخل رقم الموظف علي Text ثم اضغط علي الزر بحث يتم عرض كافة حقول الموظف الذي يحمل الرقم المدخل ... والا يعرض رساله تفيد بعدم وجود موظف بالرقم المدخل ساعدوني .. يااصحاب المعرفة والله اني في ورطة تقديم بلاغ
بتاريخ: 29 سبتمبر 200718 سنة comment_111561 أخى الفاضل قم بعمل تريجر When-button_pressed ثم فى الكود قم بعمل كيرسور يختار بيانات الموظف و يضعها فى بلوك اسفل الزر ... لو الكلام مش واضح ممكن ارسلك فورمه جاهزه ان شاء الله لعمل هذا البحث ... فى انتظار ردك .. تقديم بلاغ
بتاريخ: 30 سبتمبر 200718 سنة كاتب الموضوع comment_111653 الاخ الكريم عملت هذا الكود ولكن ظهرت بعض الاخطاءdeclare txt_num number(50); cursor getemp is select emono,ename,job,hiredate,mgr,sal,comm from emp; where empno= txt_num;begin go_block('emp'); first_record; open getemp; loop fetch getemp into :emp.empno,:emp.ename,:emp.hiredate,:emp.mgr,:emp.sal,:emp.comm exit when getemp%notfound; next_record; end loop; close getemp;end; ارجوا شاكراً ارفاق الكود ولكن كل الاماني السمحةوربنا يجعلك من اعلام هذه الامة تقديم بلاغ
بتاريخ: 1 أكتوبر 200718 سنة comment_111712 الأخطاء بسيطة يعني يا فاصلة منقوطة ناقصة او اسم العمود خطأ وهي الكود بعد التصحيح declare txt_num number; cursor getemp is select emPno,ename,job,hiredate,mgr,sal,comm from emp where empno= :txt_num; begin go_block('emp'); first_record; open getemp; loop fetch getemp into :emp.empno,:emp.ename,:EMP.JOB,:emp.hiredate,:emp.mgr,:emp.sal,:emp.comm; exit when getemp%notfound; end loop; close getemp; end; تقديم بلاغ
انضم إلى المناقشة
يمكنك المشاركة الآن والتسجيل لاحقاً. إذا كان لديك حساب, سجل دخولك الآن لتقوم بالمشاركة من خلال حسابك.