أصدقائي الأعزاء :
أنا عملت على أحد حقول unique constraint ولايسمح ال form بإدخال قيمة مكررة كما هو مطلوب ؛
لكن كيف أخرج رسالة للمستخدم أن "هذا الحقل مكرر" ؟؟



شاكراً لكم جهودكم الدائمة

/* 

** Built-in:  MESSAGE_CODE,MESSAGE_TEXT,MESSAGE_TYPE 
** Example:   Reword certain FRM message messages by checking 
**            the Message_Code in an ON-MESSAGE trigger 
** Trigger:   On-Message 
*/ 
DECLARE 
 msgnum NUMBER       := MESSAGE_CODE; 
 msgtxt VARCHAR2(80) := MESSAGE_TEXT; 
 msgtyp VARCHAR2(3)  := MESSAGE_TYPE; 
BEGIN 
 IF msgnum = 40400 THEN 
   Message('Your changes have been made permanent.'); 
 ELSIF msgnum = 40401 THEN 
   Message('You have no unsaved changes outstanding.'); 
 ELSE 
   /* 
   ** Print the Normal Message that would have appeared 
   ** 
   **  FRM-12345: Message Text Goes Here 
   */ 
   Message(msgtyp||'-'||TO_CHAR(msgnum)||': '||msgtxt); 
 END IF; 
END; 

هذا مثال يعطي رسالة عند التخزين
يجب معرفة رقم duplicate record error
ضعها داخل تريجر on-message

مشكور لجهدك

لكن أدخلت رقم duplicate record error وهو 40508
لكن لم ينجح هل من ممكن أن تعطيني رقمه ؟ شاكراً لك جهودك

تم تعديل 12 مارس 200620 سنة بواسطة ammartalal2005

/* 

** Built-in:  MESSAGE_CODE,MESSAGE_TEXT,MESSAGE_TYPE 
** Example:   Reword certain FRM message messages by checking 
**            the Message_Code in an ON-MESSAGE trigger 
** Trigger:   On-Message 
*/ 
DECLARE 
msgnum NUMBER       := MESSAGE_CODE; 
msgtxt VARCHAR2(80) := MESSAGE_TEXT; 
msgtyp VARCHAR2(3)  := MESSAGE_TYPE; 
BEGIN 
IF msgnum = 40600 THEN 
     MESSAGE(‘Duplicate Record’);
     RAISE FORM_TRIGGER_FAILURE;
ELSE 
  /* 
  ** Print the Normal Message that would have appeared 
  ** 
  **  FRM-12345: Message Text Goes Here 
  */ 
  Message(msgtyp||'-'||TO_CHAR(msgnum)||': '||msgtxt); 
END IF; 
END; 

رقم التكرار 40600

تم تعديل 12 مارس 200620 سنة بواسطة Admin05

اليك هذا الموقع ايضا
http://www.odtug.com/members/online_journals/0999/forms.htm

مشكور لك أخي admin05 على أجوبتك الوافية ومختصرة

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
أخي الكريم هناك طريقة أخرى لو تحب
عند ملء كل الITEM أعمل على أخر أيتم TRIGGER باسم POST CHANGE
عرف CURSOR بحيث يبحث عن الحقل المطابق لقيم الأيتم في الفورم عندما يجده أخر له مسج طبعا سوي WHEN C%FOUND THEN
على أعتبار أن أسم الكيرسر هوا C
وإذا لم يجده أعمل NULL
إذا لم تتضح الفكرة أعيدها
والسلام عليكم ورحمة الله وبركاته