23-09-22, 04:09 AM
السلام عليكم
قمت باشاء كود اجراء مخزن
واريد طريقة ارسال القيم من داخل الفيجوال بيسك
يوجد جدول راس الفاتورة
القيم من خلال التكست بوكس
جدول تفاصيل الفاتورة
القيم المرسلة من خلال داتا جريد فيو
جدول المخزن
ارسال القيم من خلال داتا جريد فيو
ارجو المساعدة فى كود الفيجوال بيسك لارسال القيم الى السيكوال سيرفر
كود الاجراء المخزن
قمت باشاء كود اجراء مخزن
واريد طريقة ارسال القيم من داخل الفيجوال بيسك
يوجد جدول راس الفاتورة
القيم من خلال التكست بوكس
جدول تفاصيل الفاتورة
القيم المرسلة من خلال داتا جريد فيو
جدول المخزن
ارسال القيم من خلال داتا جريد فيو
ارجو المساعدة فى كود الفيجوال بيسك لارسال القيم الى السيكوال سيرفر
كود الاجراء المخزن
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