الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

الله يجزاكم الجنه -طلب مساعده-لاهنتوا

بدأه كيوت في 9 مايو 2011 · 1 رد · 735 مشاهدة · في قسم لغةالاجرائات Pl/sql
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

اريد منكم مساعدتي في حل هذا السؤال عن البروسيجر-وبالاخص اخر براقراف في السؤال التالي

Write a procedure PhDrugInfo that uses an explicit cursor to determine the name of the patient he/she buy drugs, the drug name and price, and date of purchases and the quantities.

The procedure receives the name of drug as input parameters and returns the patient name, price, date of purchases and the quantities as output parameters.Add an exception to handle the case of no row found by outputting nice text message.

Write a program to invoke the procedure and print the patient name, drug price, date of purchases and the quantities for the patients they buys a “Fevadol” drug.

علما ان لدي قاعدة بيانات مسبقه عن الpationt

#2 
PROCEDURE PhDrugInfo(DRUG IN VARCHAR2, PATIENT_NAME OUT VARCHAR2, PRICE OUT NUMBER, DATE_OF_PURCHASE OUT DATE, QUANTITY OUT NUMBER) IS

	CURSOR PHARM_CURS(DRUG VARCHAR2) IS
	SELECT PATIEN_NAME, PRICE, DATE_OF_PURCHASE , QUANTITY
	FROM PHARMACY
	WHERE DRUG_NAME = DRUG ;

BEGIN
	IF NOT PHARM_CURS %ISOPEN THEN
			OPEN PHARM_CURS(DRUG);
	END IF;

	FETCH PHARM_CURS 
	INTO	PATIENT_NAME, PRICE,DATE_OF_PURCHASE,QUANTITY;
  CLOSE PHARM_CURS;

EXCEPTION

		WHEN NO_DATA_FOUND THEN
			RAISE_APPLICATION_ERROR(-33333, 'No rows were found');
		END;
END;

تقريبا بيكون شكله كذا

No intellectual battle was ever won through retreat
You do not watch Gintama? Dude, you are missing a lot!

صورةmsrgb1485.gif ocajavase7programmerclr.gif

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…