عند كتابة الكود التالي

DECLARE

cursor c is select * FROM PEX_PAYMENTS B
A NUMBER
begin
FOR X IN C LOOP
SELECT GUARAMT INTO A FROM PEX_SHIPMENT WHERE EXPORTER=X.EXPORTER AND BYERCODE=X.BYERCODE
AND SHIPNO=X.SHIPNO AND SERNUM=X.SERNUM
IF A > X.PAYAMT THEN
UPDATE PEX_PAYMENTS SET STATUS=3
WHERE
EXPORTER=X.EXPORTER AND BYERCODE=X.BYERCODE AND SHIPNO=X.SHIPNO AND SERNUM=X.SERNUM
UPDATE PEX_PAYMENTS SET PAYSER=1
WHERE
EXPORTER=X.EXPORTER AND BYERCODE=X.BYERCODE AND SHIPNO=X.SHIPNO AND SERNUM=X.SERNUM
UPDATE PEX_SHIPPAY SET STATUS = 4
WHERE
EXPORTER=X.EXPORTER AND BYERCODE=X.BYERCODE AND SHIPNO=X.SHIPNO AND SERNUM=X.SERNUM
END IF;
END LOOP
END;

يظهر الخطأ اللآتي:
ORA-01403: no data found
ORA-06512: at line 6

الرجاء المساعده العاجله
اخوكم...

اعتقد ان هذه الاستعلام لم يظهر اي نتائج، وهذا احد اسباب not data found

SELECT GUARAMT INTO A FROM PEX_SHIPMENT WHERE EXPORTER=X.EXPORTER AND BYERCODE=X.BYERCODE 
AND SHIPNO=X.SHIPNO AND SERNUM=X.SERNUM 

أخي العزيز يجب إستخدام ما يسمي بال exceptions و يمكنك البحث عنها بالمنتدي
و في حالتك يمكن إستخدام:
exception
when no_data_found then
message(no results);
message(no results);

اخى هذا الرقم للخطأ من الارقام المشهوره و مفاده ان شروط جملة الاستعلام غير متوفر فى البيانات المخزنه فىجدول قاعدة البيانات المستعلم عنه ولهذا السبب يستخدم EXCEPTION فى بلوك ال PL/SQL