الشفرة البرمجية للزر Next Button - Toolbar: الشفرة البرمجية للزر Next Button - Toolbar: انقر نقرا مزدوجا على الزر Next Button – Toolbar لفتح Script Editor واكتب العبارت التالية : clear window ARB_Customer_MSTR; range clear table ARB_Customer_MSTR; get next table ARB_Customer_MSTR; if err() <> OKAY then range clear table ARB_Customer_MSTR; get last table ARB_Customer_MSTR; end if; if err()= OKAY then copy from table ARB_Customer_MSTR to window ARB_Customer_MSTR; lock field ARBCUSTID; end if; هنا نستخدم نفس العبارت السابقة ولكن المنطق مختلف قليلا فبعد عبارت تهيئة الجدول والنافذة Clear window & Clear range استخدمنا عبارة جديدة وهي get next table وهي تعمل على ملئ ال Table Buffer بالسجل التالي للسجل الحالي وهنا بعد هذه العملية نفحص نتيجة العملية بواسطة الدالة err() فأذا لم يكن هناك سجل تالي سوف ننتقل الى السجل ا لاخير وهذا ما تقوم به عبارة If then الاولى اما اذا كان هناك سجل تالي سوف ننتقل الى عبارة if then الثانية والتي تعمل على نسخ السجل التالي او السجل الاخير الى النافذة وثم نقوم بأقفال الحقل Customer ID . __________________ GP Techno-Functional Consultant |