DECLARE
    CURSOR cur_fetch IS
        SELECT D.DET_MAIL_ID,D.TEMP_NUM,D.TEMP_DATE,D.OBJECT_MAIL,D.PERSON_ID,D.IMPORT,P.PROCEDUR_ID,
    P.TYP_PROC,P.DET_MAIL_ID,P.DEPT_ID,P.DET_PROC_ID,P.STAT_ID,P.PERSON_ID,P.DATE_END FROM DETAIL_MAIL D,PROCEDURS P
        WHERE D.DET_MAIL_ID = P.DET_MAIL_ID;
        c cur_fetch%rowtype;
BEGIN
    go_block('BLK');
    first_record;
    OPEN cur_fetch;
  loop
      FETCH cur_fetch INTO c;
    EXIT WHEN cur_fetch%NOTFOUND;
    :BLK.row1         :=c.DET_MAIL_id;
    :BLK.row2         :=c.TEMP_NUM;
    :BLK.row3         :=c.TEMP_DATE;
    :BLK.row4         :=c.OBJECT_MAIL;
    :BLK.row5         :=c.PERSON_ID;
    :BLK.row6         :=c.IMPORT;
    :BLK.row7         :=c.PROCEDUR_ID;
    :BLK.row8         :=c.TYP_PROC;
    :BLK.row9         :=c.DET_MAIL_ID;
    :BLK.row10         :=c.DEPT_ID;
    :BLK.row11         :=c.DET_PROC_ID;
    :BLK.row12         :=c.STAT_ID;
    :BLK.row13         :=c.PERSON_id;
    :BLK.row14         :=c.DATE_END;
    next_record;
  END LOOP;
  first_record;
END;

ومشكورين مقدما

الاستعلام من جدولين واريد يظهر في الفورمز يطلع اخطا كما في الصوره