السلام عليكم
كيف حالكم جميعا

اريد عمل وحده برمجية لتسلسل يحتوي كود
لنقل A رمز نوع من الاغذية

سيكون التسلسل A1,A2,A3

B نوع اخر من الاغذية التسلسل سيكون بالطريقة
B1,B2,B3

وهكذا
اتمنى ان تكون الفكرة قد وصلتكم

وجزيتم خيرا جميعا

أخي الفاضل قم بكتابة الكود التالي على مستوى البلوك في التريجر Pre-Insert


أولا لنفترض أن الحقل المراد إدارج القيمه فيه هو Item _ID سيكون الكود كالتالي:

select 'a'||max(nvl(item_id,0))+1 into :item_ID from table_name;

مع تحياتي

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

CREATE OR REPLACE FUNCTION ADD_SERIAL(PCAT IN VARCHAR2) RETURN NUMBER IS
V_SERIAL NUMBER;
BEGIN SELECT NVL(MAX( SUBSTR(F_NM,2)),0) + 1
   INTO V_SERIAL FROM ST_MSTRD
   WHERE SUBSTR(F_NM,1,1)= PCAT;
   RETURN(V_SERIAL);
END;

بفرض اسم الجدول هو ST_MSTRD والحقل الذي يخزن فيه التسلسل هو F_NM وهو طبعا VARCHAR2
وإحدى الطرق السريعة لنداء FUNCTION هى
SELECT ADD_SERIAL('A') FROM DUAL
أو
SELECT ADD_SERIAL('B') FROM DUAL
بإرسال رمز نوع الاغذية 'A' أو 'B'
أتمنى أن أكون أوضحت الموضوع بالقدر الكافي وعلى استعداد للرد على أي استفسارات
أحمد مرجان
Senior System Analyst