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

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم لغة الفيجوال بيسك VB.NET > قسم اسئلة VB.NET > مشكله في طباعة التقرير يوجد تكرار
نسخة كاملة : مشكله في طباعة التقرير يوجد تكرار
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2

ali_ahmed12

28-10-22, 05:21 PM
السلام عليكم ورحمة الله وبركاته
لدي مشكلة في عملية طباعة التقرير وهو يطبع موجود في فاتورة مع موجود سابقا 
مرفق كود طباعة واستعلام التقرير 
كود :
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

h2551996

28-10-22, 05:44 PM
(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
حصل عندي نفس المشكلة 

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

ali_ahmed12

28-10-22, 05:48 PM
(28-10-22, 05:44 PM)h2551996 كتب : [ -> ]
(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
حصل عندي نفس المشكلة 

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

هدا صورة تقرير

h2551996

28-10-22, 05:50 PM
(28-10-22, 05:48 PM)ali_ahmed12 كتب : [ -> ]
(28-10-22, 05:44 PM)h2551996 كتب : [ -> ]
(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
حصل عندي نفس المشكلة 

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

هدا صورة تقرير

اعمل خط line 
على كل تقسيمة وجرب

ali_ahmed12

28-10-22, 05:58 PM
(28-10-22, 05:50 PM)h2551996 كتب : [ -> ]
(28-10-22, 05:48 PM)ali_ahmed12 كتب : [ -> ]
(28-10-22, 05:44 PM)h2551996 كتب : [ -> ]
(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
حصل عندي نفس المشكلة 

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

هدا صورة تقرير

اعمل خط line 
على كل تقسيمة وجرب

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

h2551996

28-10-22, 06:14 PM
(28-10-22, 05:58 PM)ali_ahmed12 كتب : [ -> ]
(28-10-22, 05:50 PM)h2551996 كتب : [ -> ]
(28-10-22, 05:48 PM)ali_ahmed12 كتب : [ -> ]
(28-10-22, 05:44 PM)h2551996 كتب : [ -> ]
(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
حصل عندي نفس المشكلة 

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

هدا صورة تقرير

اعمل خط line 
على كل تقسيمة وجرب

لازالت نفس مشكله واصلا line  مجرد تنسيق فقط لاعلاقة له
عندي مجرد ما الغي الخط هذا يقوم بتداخل المنتجات كاملة في الفاتورة ويقوم بتكرارها

Taha Okla

28-10-22, 07:07 PM
(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)

ali_ahmed12

28-10-22, 07:39 PM
(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()
هدا تكرار في صورة اخر اثنين منتجات اثنين جدد اما فوق منهم من فاتورة سابقة هدا تكرار اقصد به في الطباعه

ali_ahmed12

28-10-22, 11:20 PM
(28-10-22, 07:39 PM)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()
هدا تكرار في صورة اخر اثنين منتجات اثنين جدد اما فوق منهم من فاتورة سابقة هدا تكرار اقصد به في الطباعه
لا يزال يوجد تكرار اثناء طباعه سابق مع جديد ماحل اخ طه

Taha Okla

28-10-22, 11:33 PM
أتمنى لو كنت أستطيع مساعدتك في هذا الأمر
ولكن للأسف لم أٌقم بتزيل الـ SQL Server  على أي جهاز عندي 

وبدون تجريب لا يمكنني التأكد من الأمر .

عسى أن يستطيع أحد الاخوة هنا مساعدتك ..

ولكن يفضل أن ترفق مثال فيه نفس المشكلة حتى يستطيعوا مساعدتك فيه....
وبدون مشروع لا أظن ستجد من يتفرغ ليصنع لك مشروع من الصفر.
الصفحات : 1 2
منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم لغة الفيجوال بيسك VB.NET > قسم اسئلة VB.NET > مشكله في طباعة التقرير يوجد تكرار