منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - ارجو تعديل الكود جلب البيانات عن طريق اجراء مخزن

السلام عليكم جميعا
اريد عمل بحث برقم الصنف مع كود المورد وكود الوحدة من جدول الوحدات

لو موجود يتم جلب الباركود المرتبط بالمورد والوحدة من جدول الوحدات

ثم يتم جلب بيانات الصنف من جدول الاصناف

لو الباركود غير موجود يتم انشاء باركود جديد
مع جلب بيانات الصنف

علما انى حاولت كثيرا فى صنع الكود لكن ام اتمكن منه

مرفق مثال مع سكربت قاعدة البيانات

[attachment=30025]

الاجراء المخزن الموجود بالمثال المرفق -

تم تعديل الكود / الكود يعمل فى جلب وعرض البيانات فى حالة وجود الباركود مسجل

اريد جلب البيانات ايضا فى حالة انشاء الباركود الجديد

كود :

ALTER PROCEDURE [dbo].[StoredProcedure3] 

     @itemCode2  nvarchar (max),

@vindCode int,

@unitCode int 

AS

   DECLARE @barCode int

  SET @barCode = (SELECT [barCode] FROM Items_UintesTbl WHERE [ItemCode2]=@itemCode2 AND ClaintID=@vindCode  AND [UnitCode]=@unitCode )

   /* التأكد من موجود باركود مسبق */

   IF @barCode IS NOT NULL    

     select  [itemCode],[itemCode2],[barCode],[ClaintID],[StoreCode],[PurchasePrice],[CostPrice]

              FROM  [dbo].[Items_UintesTbl]  where [barCode]=@barCode

    ELSE

        BEGIN TRY

            -- الباركود الجديد

            SET @barCode = (SELECT MAX([barCode]) + 1 FROM [dbo].[Items_UintesTbl])

              IF @barCode IS NULL 

                        SET  @barCode=1

                         select  [itemCode],[itemCode2],@barCode,[ClaintID],[StoreCode],[PurchasePrice],[CostPrice]

                         FROM  [dbo].[Items_UintesTbl]  where  [ItemCode2]=@itemCode2 AND ClaintID=@vindCode  AND [UnitCode]=@unitCode

      END TRY

        BEGIN CATCH

            RETURN -1

        END CATCH

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

new_programer