Skip to Main Content

Oracle Forms

Announcement

For appeals, questions and feedback about Oracle Forums, please email oracle-forums-moderators_us@oracle.com. Technical questions should be asked in the appropriate category. Thank you!

Forms 6i update using a Cursor

user626836Mar 21 2011 — edited Mar 24 2011
Hi everyone,
I have a form with 2 non-database datablocks where I bring my data from a table using cursor inside of a procedure. This is my cursor:
BEGIN
DECLARE
CURSOR C1 IS
SELECT A.SCHOOL_ID,A.CLASS_ID,A.STUDENT_ID,A.TEACHER_ID,A.GRADE_Q1,A.GRADE_Q2,A.GRADE_Q3,
A.GRADE_Q4,A.SEMESTER_EX1, A.SEMESTER_1, A.SEMESTER_REC1, A.SEMESTER_EX2, A.SEMESTER_2, A.SEMESTER_REC2, A.FINAL_GRADE,
B.LAST_NAME||', '||B.FIRST_NAME NOMBRE
FROM NOTAS_ISS A, ESTUDIANTES_ISS B
WHERE A.SCHOOL_ID = :UNO.SCHOOL_ID
AND A.TEACHER_ID = :UNO.TEACHER_ID
AND A.CLASS_ID = :UNO.CLASS_ID
AND B.SCHOOL_ID = A.SCHOOL_ID
AND B.STUDENT_ID = A.STUDENT_ID;
BEGIN
GO_BLOCK('DOS');
FIRST_RECORD;
FOR C IN C1
LOOP
:DOS.SCHOOL_ID := C.SCHOOL_ID;
:DOS.STUDENT_ID := C.STUDENT_ID;
:DOS.STUDENT_NAME := C.NOMBRE;
:DOS.GRADE_Q1 := C.GRADE_Q1;
:DOS.GRADE_Q2 := C.GRADE_Q2;
:DOS.SEMESTER_EX1 := C.SEMESTER_EX1;
:DOS.SEMESTER_1 := C.SEMESTER_1;
:DOS.SEMESTER_REC1 := C.SEMESTER_REC1;
:DOS.GRADE_Q3 := C.GRADE_Q3;
:DOS.GRADE_Q4 := C.GRADE_Q4;
:DOS.SEMESTER_EX2 := C.SEMESTER_EX2;
:DOS.SEMESTER_2 := C.SEMESTER_2;
:DOS.SEMESTER_REC2 := C.SEMESTER_REC2;
:DOS.FINAL_GRADE := C.FINAL_GRADE;
next_record;
end loop;
END;
END;

After I make the changes I would like to save the data on my second block.
Can anyone please help me to that!!

Thanks!!
Comments
Locked Post
New comments cannot be posted to this locked post.
Post Details
Locked on Apr 21 2011
Added on Mar 21 2011
39 comments
3,183 views