[ali_ahmed12]

(28-10-22, 07:07 PM)Taha Okla كتب :

(28-10-22, 05:21 PM)ali_ahmed12 كتب : السلام عليكم ورحمة الله وبركاته
لدي مشكلة في عملية طباعة التقرير وهو يطبع موجود في فاتورة مع موجود سابقا 
مرفق كود طباعة واستعلام التقرير 

كود :

Dim CR As New CrystalReport5
       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()

كود :

create  proc [dbo].[Get_order_detils_for_print]  
as
SELECT Tbl_Order_detils.ID_product
     ,Tbl_Orderes.Des
      ,Tbl_Orderes.ID_Order
        ,order_date
        ,salesman
        ,TBL_Customers.ID
        ,TBL_Customers.FullName
        ,TBL_Customers.TEL
        ,PRODUCTS.ID_product
        ,PRODUCTS.label
     ,Tbl_Order_detils.Qty
     ,Tbl_Order_detils.price
     ,Tbl_Order_detils.Amount
 FROM [dbo].[Tbl_Order_detils]
inner join Tbl_Orderes
on Tbl_Orderes.ID_Order=Tbl_Order_detils.ID_Order
inner join TBL_Customers
on TBL_Customers.ID=Tbl_Orderes.ID_CUSTOMER
inner join PRODUCTS
on PRODUCTS.ID_product=Tbl_Order_detils.ID_product

وعليكم السلام ورحمة الله وبركاته


راجع معلوماتك في الـ SQL
المشكلة في الاستعلام ..
يجب أن تحدد على أي أساس تريد طباعة التقرير 
(Where)

غيرت فيه  اجراء مخزن ولزالت نفس مشكله

كود :

ALTER  proc [dbo].[Get_order_detils_for_print]  
@id int
as
SELECT Tbl_Order_detils.ID_product
     ,Tbl_Orderes.Des
      ,Tbl_Orderes.ID_Order
        ,order_date
        ,salesman
        ,TBL_Customers.ID
        ,TBL_Customers.FullName
        ,TBL_Customers.TEL
        ,PRODUCTS.ID_product
        ,PRODUCTS.label
     ,Tbl_Order_detils.Qty
     ,Tbl_Order_detils.price
     ,Tbl_Order_detils.Amount
 FROM [dbo].[Tbl_Order_detils]
inner join Tbl_Orderes
on Tbl_Orderes.ID_Order=Tbl_Order_detils.ID_Order
inner join TBL_Customers
on TBL_Customers.ID=Tbl_Orderes.ID_CUSTOMER
inner join PRODUCTS
on PRODUCTS.ID_product=Tbl_Order_detils.ID_product
where Tbl_Orderes.ID_Order=@id

وهدا كود طباعه تكست بوكس 2 وهو رقم فاتورة id_order ولزالت نفس مشكله يوجد تكرار في تقرير 

كود :

 Dim CR As New CrystalReport5
       CR.SetParameterValue("@id", TextBox2.Text)
       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()

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