[new_programer]

السلام عليكم 

قمت باشاء كود اجراء مخزن 

واريد طريقة ارسال القيم من داخل الفيجوال بيسك 

يوجد جدول راس الفاتورة  
القيم من خلال التكست بوكس 

جدول تفاصيل الفاتورة 
القيم المرسلة من خلال داتا جريد فيو

جدول المخزن 
 ارسال القيم من خلال داتا جريد فيو

ارجو المساعدة فى كود الفيجوال بيسك لارسال القيم الى السيكوال سيرفر

كود الاجراء المخزن 

PHP كود :

    
  Begin Try
       SET @SaveState=0
        Begin Transaction  
            لتاكد من وجود الباركود فى جدول المخزن
 IF NOT EXISTS( SELECT barCode FROM dbo.StorQtyTbl WHERE barCode=@barCode AND  StoreCode=@StoreCode)
            BEGIN 
               --منح رقم تسلسلي للفاتورة
                  DECLARE @SalesNumb2 BIGINT SELECT @SalesNumb=MAX(SalesNumb) + 1 FROM  dbo.SalesHiderTbl
                    IF @SalesNumb IS NULL 
                        SET  @SalesNumb=1
                                                                --   تخزين الفاتورة في جدول راس الفاتورة
                  INSERT INTO  dbo.SalesHiderTbl (SalesNumb,TotitemQuty,userCode)VALUES (@SalesNumb,@TotitemQuty,@userCode)
                 -- الحصول على ID الفاتورة
                  DECLARE @SalesNumb_InvoID INT 
                  SELECT  @SalesNumb_InvoID =  MAX(SalesNumb) FROM SalesHiderTbl
                  
                  -- تخزين محتويات الفاتورة في جدول محتويات تفاصيل الفواتير
                                --                                    ملحوظة ارسال البيانات من داخل الداتا جريد فيو          
                  INSERT INTO dbo.SalesInvTbl (barCode,itemPrice,itemQuty ) values
                  (@barCode ,@itemPrice ,@itemQuty )
                     
                -- خصم وتعديل كميات الأصناف في المخزن
                                   --                            ملحوظة ارسال البيانات من داخل الداتا جريد فيو  
                  UPDATE  dbo.StorQtyTbl SET  itemQuty = itemQuty  - itemQuty
                  FROM  StorQtyTbl WHERE barCode= @barCode  
                      
                SELECT @SalesNumb       --SELECT  MAX(InvoNum) FROM InvoiceTable
                SET @SaveState=1
               END 
            ELSE
            begin
                  SET @SaveState=2                                                      
              end
      commit Transaction
End Try
Begin Catch
Rollback Transaction 
end Catch

END 


[new_programer]

محتاج طريقة ارسال القيم من الداتا جريد