السلام عليكم

اخباركم؟
ان شاءالله بخير

ياطويلن العمر والسلامه
انا عندي مشكله في الداتا بيس الي مسويتها

هي صح كجداول وترابط

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

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

اتمنى تردون علي باسرع وقت
لان التسليم السبت

وهذي البروسيدجرز

CREATE OR REPLACE PROCEDURE fill
IS
CURSOR c is
select s.SECTIONNUM,s.DAY,s.LECTURE,c.DATEFINAL,c.COURSEID,p.PREREQUEST1,p.PREREQUEST2
from SCHEDUALED s,COURSESE c,PREQUEST p,temp1 t
where c.COURSEID=s.COURSEID and p.COURSEID=c.COURSEID and c.COURSEID=t.COURSEID and s.SECTIONNUM=t.SECTIONNUM;
i varchar2(20);
d varchar2(20);
s varchar2(20);
l varchar2(20);
f varchar2(20);
p1 varchar2(20):='';
p2 varchar2(20):='';
BEGIN open c;
loop
exit when c%notfound;
fetch c into i,s,f,p1,p2,l,d; insert into temp2 values(i,s,f,p1,p2,l,d);
end loop;
close c;
end;
/
=====================================
CREATE OR REPLACE PROCEDURE checkf
IS
CURSOR c1 is
select COURSEID,DATEFINAL
from temp2; i varchar2(20);
f varchar2(20);
CURSOR c2 is
select COURSEID,DATEFINAL
from temp2; i2 varchar2(20);
f2 varchar2(20);
BEGIN open c1;
loop
exit when c1%notfound;
fetch c1 into i,f; open c2;
loop
exit when c2%notfound;
fetch c2 into i2,f2; if i<>i2 then
if f=f2 then
dbms_output.put_line('=ERROR= there is overlap in date of final between -'||i||'- and -'||i2);
dbms_output.put_line('you cant register'||i2);
DELETE FROM temp2 WHERE courseID=i2;
DELETE FROM temp1 WHERE courseID=i2;
end if;
end if;
end loop;
end loop;

close c1;
close c2;

end;
/
========================================
CREATE OR REPLACE PROCEDURE checkl
IS
CURSOR c1 is
select COURSEID,SECTIONNUM,DAY,LECTURE
from temp2; i varchar2(20);
d varchar2(20);
s varchar2(20);
l varchar2(20);
CURSOR c2 is
select COURSEID,SECTIONNUM,DAY,LECTURE
from temp2; ix varchar2(20);
dx varchar2(20);
sx varchar2(20);
lx varchar2(20);
BEGIN open c1;
loop
exit when c1%notfound;
fetch c1 into i,s,d,l; open c2;
loop
exit when c2%notfound;
fetch c2 into ix,sx,dx,lx; if i<>ix then
if d=dx then
if l=lx then
dbms_output.put_line('=ERROR= there is overlap in lecture time between -'||i||'- section -'||s||'- and -'||ix||'- sction -'||sx);
dbms_output.put_line('you cant register'||ix);
DELETE FROM temp2 WHERE courseID=ix;
end if;
end if;
end if;
end loop;
end loop;

close c1;
close c2;

end;
/

=====================================
CREATE OR REPLACE PROCEDURE checkp1p2
IS
CURSOR c1 is
select COURSEID,prerequest1,prerequest2
from temp2; i varchar2(20);
p1 varchar2(20):='';
p2 varchar2(20):='';
CURSOR c2 is
select COURSEID,prerequest1,prerequest2
from temp2; ix varchar2(20);
px1 varchar2(20):='';
px2 varchar2(20):='';
BEGIN open c1;
loop
exit when c1%notfound;
fetch c1 into i,p1,p2; open c2;
loop
exit when c2%notfound;
fetch c2 into ix,px1,px2; if i<>ix then

if i=px1 then
dbms_output.put_line('=ERRORE= you are trying to register -'||i||'- with its pre request -'||px1);
dbms_output.put_line('you cant register'||px1);
DELETE FROM temp2 WHERE courseID=px1;
end if;

if i=px2 then
dbms_output.put_line('=ERRORE= you are trying to register -'||i||'- with its pre request -'||px2);
dbms_output.put_line('you cant register'||px2);
DELETE FROM temp2 WHERE courseID=px2;
end if;

end if;
end loop;
end loop;

close c1;
close c2;

end;
/

كـود SQL

[/sql]

واضفت للداتا بيس جدولين عشان يساعدوني

CREATE TABLE temp1
( courseID   varchar(20) not null,sectionnum int not null);

CREATE TABLE temp2
( courseID   varchar(20) not null,
sectionnum int not null,datefinal  varchar(20),
prerequest1  varchar(40),prerequest2  varchar(40),
lecture int,day varchar(20));
[sql]

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


وسلام

______.doc

Hi There
Can you please tell me whats the error code and message and what procedure give the error, and if possible can u produce a full script for all tables and procedures involved here to try to trace the error.

with my best wishes.