3,497
社区成员
发帖
与我相关
我的任务
分享
DECLARE
totalcourgrade REAL;
v_id VARCHAR2(30);
v_name VARCHAR2(30);
v_score NUMBER;
BEGIN
FOR cc IN (SELECT * FROM tb_student) LOOP
totalcourgrade := GetCourseGrade(cc.stuid);
SELECT tb_grade.stuid, stuname, SUM(coursegrade)
INTO v_id, v_name, v_score
FROM tb_grade, tb_student
WHERE tb_student.stuid = tb_grade.stuid AND
tb_student.stuid = cc.stuid;
dbms_output.put_line('name:' || v_name || ',id:' || v_id || ',score:' || to_char(v_score) ||
',total:' || to_char(totalcourgrade));
END LOOP;
END;OPEN cur_OUT FOR
'
SELECT TO_CHAR(TRUNC(TO_DATE(D_TIME,''YYYY-MM-DD HH24:MI:SS''),''MI''),''YYYY-MM-DD HH24:MI:SS'') D_TIME,
TO_CHAR(AVG(F_COMPONENTCODE),''fm9999999990.00'') F_COMPONENTCODE
FROM ' || TABLE_NAME || '
WHERE TO_CHAR(TRUNC(TO_DATE(D_TIME,''YYYY-MM-DD HH24:MI:SS''),''MI''),''YYYY-MM-DD HH24:MI:SS'')
BETWEEN ''2010-04-04 02:01'' AND ''2010-04-04 02:06''
GROUP BY TO_CHAR(TRUNC(TO_DATE(D_TIME,''YYYY-MM-DD HH24:MI:SS''),''MI''),''YYYY-MM-DD HH24:MI:SS'')
ORDER BY TO_CHAR(TRUNC(TO_DATE(D_TIME,''YYYY-MM-DD HH24:MI:SS''),''MI''),''YYYY-MM-DD HH24:MI:SS'')
';
declare
totalcourgrade real;
v_stuid tb_grade.stuid%type;
v_stuname varchar2(20);
v_num number;
cursor xsjc_cur is select tb_grade.stuid,stuname,sum(coursegrade) as coursegrade from tb_grade,tb_student where tb_student.stuid = tb_grade.stuid
group by tb_grade.stuid,stuname;
begin
totalcourgrade := GetCourseGrade('S07080101');
for xsjc_cur_rec in xsjc_cur loop
v_stuid:=xsjc_cur_rec.stuid;
v_stuname:=xsjc_cur_rec.stuname;
v_num:=xsjc_cur_rec.coursegrade;
dbms_output.put_line('学号:'||to_char(v_stuid),'姓名:'||v_stuname,'学分:'to_char(v_num));
end loop;
dbms_output.put_line(totalcourgrade);
end;