مشروع C# - Vcl.net - Prism

بال designer لا اعرف كيف

لكن يمكن ان تجعل انشاء الجدول باستعلام sql مباشر (create table)

ثم تستعمل

ALTER TABLE "اسم الجدول" ADD PRIMARY KEY (idx_facture, idx_produit)

ساحاول ان اجد طريقة اخرى

هذه اخي طلال الطريقة

قمت باضافة query و نفذتها

مشكور اخي امين سأحاول بها واخبرك بالنتيجة

ثم انني بجاجة رأيك عن الموضوع السابق , هل الطريقة تعتبر صحيحة ام لا علما انه لاداعي لادخال رقم الصنف , فقط الضغط على الصنف في الجدول لينتقل رقم المادة الى الاedit

طريقتك صحيحة اخي طلال الا انها مزعجة للمستخدم

كما ان جميع البرامج التجارية تستعمل الطريقة التي ذكرتها

جربها و لاحظ الفرق :)

السلام عليكم

اخي امين لحد الان لم افهم من الشرح لكن غدا ان شاء الله ساحاول ان اجد الوقت كي اتفقد السورس واطرح افكار جديدة و كذلك العمل مع على على البريسم اصبحت انا المتأخر عليكم عذرا .

اخي طلال غدا اضع اسماء الحقول بالعربية ان شاء الله .

مشكور اخي امين نجحت العملية

اما بالنسبة لتجريبها , المشكلة انني لااملك نسخة بريسم ولا نسخة سي شارب

الامر بسيط اخي عبد العالي

jointure برك :angry: و استعملها في اظهار اسماء dci في مكان ان اظهر ارقام dci لكي لا يفقد المستخدم تركيزه

و نفسها استعملها لملأ combobox كي يستطيع المستعمل اختيار idx_dci بمجرد معرفة الاسم فقط (يعني لن يضطر الى معرفة idx_dci الرقم)

حسننا اخي ذكيري

لماذا لانضع الصنف في الفاتورة . صحيح انه مربوط الى جدول الاصناف . ولكن لو اضفناه اليس افضل

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

ممم الاخوة اليوم نائمون... ماعليش :D

هذا اخر تعديل قمت به على عجالة..

Copie_de_GestionPharmacie.rar

ربما اذا وجدت الوقت ساضيف اشياء اخرى

انا لست نائم

اخي امين ارجو ان تضيف صور للواجهة ,

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

الواجهة الاصلية لم تتغير ...

كما تلاحظ اخي طلال في الواجهة الاولى استغنيت عن اظهار رقم الدواء و استعنت في مكانه باسمه مباشرة

اما بخصوص الاضافة يتحول الامر الى الكمبو لتحديد الاسم

يمكن ان تجرب الدوال المخزنة التالية في حالة رغبتك ان تجرب الطريقة مع الدلفي

ALTER PROCEDURE dbo.AddProduitProc(
@Nom varchar(50),
@DCI varchar(50),
@Remarques varchar(50)
)

AS begin declare @idx_dci int

select @idx_dci=idx from DCI where DCI=@DCI


insert into Produits(idx_dci, Nom, Remarques)
values (@idx_dci ,@Nom,@Remarques)
end
	/* SET NOCOUNT ON */
	RETURN

ALTER PROCEDURE dbo.UpdateProduitProc(
@idx int,
@Nom varchar(50),
@DCI varchar(50),
@Remarques varchar(50)
)
AS begin declare @idx_dci int

select @idx_dci=idx from DCI where DCI=@DCI

Update Produits
Set idx_dci = @idx_dci, Nom = @Nom, Remarques=@Remarques
where idx=@idx

end
	/* SET NOCOUNT ON */
	RETURN

السلام عليكم

عذرا عذرا لم اتمكن من المشاركة في الايام الماضية بسبب امور تقنية .

واكسه هذه الابام

طليت عطلة بدون اجر كي اذهب الا الجزاءر و لحد الان لم القا اي موارفقة - كان يجب على الحكومة ان تعطيني اوراق لزوجتي هذا الشهر لكن لحد الان لا حيات لمن تنادي - اشتريت سيارة كي افرح بها امي و اقول لها اني و الحمد لله بخير بطريقة غير مباشرة وجده ان البائع غشني .

خليها على ربي . الحمد لله .

حسبي الله و نعم الوكيل... :(

ربي يصبرك اخي عبد العالي و يعوضك احسن مما ضيعته

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

أرى ان أهم مافي الموضوع توفير قاعدة بيانات للأدوية

شكراً لك اخي الكريم

اقتباس

al_ashrf

- اولا مرحبا بك

- هل ستشاركنا المشروع

اقتباس

- أهم مافي الموضوع توفير قاعدة بيانات للأدوية

أهم مافي الموضوع تعلم البريسم winform

للانتقال بعدها الى wPF و الويب .

- هذا المشروع تعليمي اي اننا لا ندخل الادوية الى القاعدة الا لتجارب فقط .

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

كيف حال الجميع , إن شاء الله بخير

اعتذر عن التأخير بسبب السفر ,

اخي ذكيري , مال الحلال لايذهب , وستلمس ذلك قريبا إن شاء الله وبإذنه,

اخي امين شكرا لك, سأحاول تجريبها في مرحلة الفاتورة

يجب ان ابدأ العمل لآنني فقدت قاعدة البيانات ,

بالمناسبة اين اخي علي , إن شاء الله يكون بخير

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

بذات البوم في انشاء نموذج الادوية

و انا الان في عملية الاضافة و التغيير حيث اعرض كل الاصناف و عند الاضافة ننحدد صنف من القاءمة ثم نضيف خصاءص الدواء

اما في عملية العرض فانا استعملت ربط بين الجدولين كي اعرض اسماء الاصناف.

لاضافة الضنف ننقر فقط على الزر الذي بجانب التاكس الخاص بالبحث حيث ان لم نجد الصنف نضيفه الى الجدول .

مرحبا

كنت مشغول هذا الاسبوع لذا لم اتمكن من اضافة الجديد ارجو ان يغطي هذا الحاجة مؤقتا

Copie_de_GestionPharmacie.rar

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

اتمنى ان يكون الجميع بخير

شكرا اخي طلال انا بخير والحمد لله

اعتذر للاخوة عن غيابي بسبب مشكل خط الانترنت عندي اتمنى ان اجد حل للمشكلة

تاكدو دائما اني لن انسحب

وفقنا الله واياكم

كلنا لنا مشاكلنا وانشغالاتنا اخي علي لذلك فاني متاكد ان الاخوة يعذرونك على الغياب :)

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

تمت اضافة المراحل الخاصة ب انواع الفواتير . فواتير. المخزون. الشراء.....

الاجراءات المخزنة المستعملة

ALTER PROCEDURE dbo.AddFactureAchatProc(
	@Nom varchar(50),
	@type varchar(50),
	@Code varchar(50),
	@Date datetime,
	@Remise Money,
	@Echeance datetime,
	@Remarques varchar(50)
)	
AS begin declare @idx_fournisseur int
		declare @idx_type int		

		select @idx_fournisseur=idx from Fournisseurs where Nom=@Nom
		select @idx_type=idx from Type_facture where type=@type

		insert into Factures_Achat(idx_fournisseur,idx_type,code,DateFacture, remise, echeance, Remarques)
		values (@idx_fournisseur,@idx_type,@code,@date,@remise,@Echeance,@Remarques)
end	
	RETURN

ALTER PROCEDURE dbo.AddLotProc(
	@Nom varchar(50),
    @Lot varchar(50),
    @DDP datetime,
    @PPA money,
    @Remarques	varchar(100)
)

AS begin declare @idx_produit int
		select @idx_produit=idx from Produits where Nom=@Nom

		insert into Lots(idx_produit,Lot,DDP, PPA, Remarques)
		values (@idx_produit ,@Lot,@DDP, @PPA, @Remarques)
	end
	RETURN

ALTER PROCEDURE [dbo].[AddTypeFactureProc](
	@Type		varchar(50),		
	@Remarques	varchar(100)

)

AS begin INSERT INTO Type_Facture (Type,Remarques)
VALUES   (@Type,@Remarques)
end	
	/* SET NOCOUNT ON */
	RETURN

ALTER PROCEDURE dbo.UpdateAchatProc(
	@idx int,
	@Nom varchar(50),  
	@idx_facture int,   
    @QAchat int,
    @PAchat money 
)

AS begin declare @idx_produit int
		select @idx_produit=idx from Produits where Nom=@Nom		

		Update Achats
		Set idx_produit = @idx_produit, idx_facture = @idx_facture, PAchat = @PAchat,QAchat = @QAchat
		where idx=@idx		
	end
	RETURN

ALTER PROCEDURE dbo.UpdateFactureAchatProc(
	@idx_facture int,
	@Nom varchar(50),
	@type varchar(50),
	@code varchar(50),
	@date datetime,
	@remise Money,
	@Echeance varchar(50),
	@Remarques varchar(50)
)	
AS begin declare @idx_fournisseur int
		declare @idx_type int		

		select @idx_fournisseur=idx from Fournisseurs where Nom=@Nom
		select @idx_type=idx from Type_facture where type=@type	

		Update Factures_Achat
		Set 
			idx_fournisseur = @idx_fournisseur, 
			idx_type = @idx_type,
			code = @code, 
			_Date = @date, 
			remise = @remise,
			echeance = @echeance,
			Remarques=@Remarques
		where idx_facture=@idx_facture
end	
	RETURN

ALTER PROCEDURE dbo.UpdateLotProc(
	@idx int,
	@Nom varchar(50),
    @Lot varchar(50),
    @DDP datetime,
    @PPA money,
    @Remarques	varchar(100)
)

AS begin declare @idx_produit int
		select @idx_produit=idx from Produits where Nom=@Nom		

		Update Lots
		Set idx_produit = @idx_produit, Lot = @Lot,DDP = @DDP, PPA = @PPA, Remarques=@Remarques
		where idx=@idx
	end
	RETURN

ALTER PROCEDURE [dbo].[UpdateTypeFactureProc](
	@idx int,
	@Type		varchar(50),		
	@Remarques	varchar(100)

)

AS begin Update Type_Facture
Set Type = @Type, Remarques=@Remarques
where idx=@idx
end	
	/* SET NOCOUNT ON */
	RETURN

هيا يا جماعة اين انتم ... في الحركة بركة :). ام تريدون ان نبقي في مشروع الصيدلية الى الابد

Copie_de_GestionPharmacie.rar

بخصوص طريقة الاخ عبد العالي .. ساحاول ان اضيفها اليوم لبعض المراحل التي من الممكن ان تكون الاسماء مكررة.. كأسم الممول مثلا لكن بخصوص dci فيمكن ان نحمل مباشرة اسماء dci في comboBox لان من المستحيل ان نجد 2 dci بنفس الاسم

---- تعديل بسيط لتوضيح الفكرة

التعديلات الحالية ... تسمح باضافة مباشرة لدواء في حالة عدم وجوده في جدول الادوية

Copie_de_GestionPharmacie.rar

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

كيف الاحوال يا جماعة :happy:

يظهر انكم مشغولون كثيرا.. ان شاء الله تحل المشاكل ان وجدت

حاليا تم انهاء الجداول الملونة بالاحمر و ان شاء الله اجد الوقت لاكملها جميعا خلال الايام القادمة لننتقل الى مرحلة report و اشياء اخرى :D

Copie_de_GestionPharmacie.rar

السلام عليكم

ارجوا ان تواصلو المشروع بارك الله فيكم على العمل الجيد .

الاخ طلال مسافر .

الاخ على فقد الانترنت بسب عطب في الجهاز المودم .

الاخ مسعود يحضر في شهادة ميكروسفت .

الاخ عبد العالي يحضر للانتقال الى مؤسسة اخري للعمل على .NET

باذن الله راجعون .

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

تم اضافة type_reglement و كذلك تحسين الكود من اجل تحديث المعلومات مباشرة بعد الاضافة

Copie_de_GestionPharmacie.rar