PLSQLでの丸め

Question

DECLARE 
    CURSOR cursor1 IS SELECT STUDENTNAME, COURSEID, COURSEDESCRIPTION, COURSECREDITS, GRADE 
    FROM STUDENTINFO 
    WHERE STUDENTNAME = '&student' 
    GROUP BY (STUDENTNAME, COURSEID, COURSEDESCRIPTION, COURSECREDITS, GRADE) 
    ORDER BY COURSEID; 
    S_NAME STUDENTINFO.STUDENTNAME%TYPE; 
    S_COURSEID STUDENTINFO.COURSEID%TYPE; 
    S_COURSEDESCRIPTION STUDENTINFO.COURSEDESCRIPTION%TYPE; 
    S_COURSECREDITS STUDENTINFO.COURSECREDITS%TYPE; 
    S_GRADE STUDENTINFO.GRADE%TYPE; 
    S_TOTALCREDITS STUDENTINFO.COURSECREDITS%TYPE := 0; 
    S_A STUDENTINFO.COURSECREDITS%TYPE := 4; 
    S_B STUDENTINFO.COURSECREDITS%TYPE := 3; 
    S_C STUDENTINFO.COURSECREDITS%TYPE := 2; 
    S_D STUDENTINFO.COURSECREDITS%TYPE := 1; 
    S_F STUDENTINFO.COURSECREDITS%TYPE := 0; 
    S_GPABEFOREDIV STUDENTINFO.COURSECREDITS%TYPE := 0; 
    S_CREDITSTOGPA STUDENTINFO.COURSECREDITS%TYPE := 0; 
    S_GPA NUMBER(2); 
BEGIN 
    OPEN CURSOR1; 
    LOOP 
    FETCH CURSOR1 INTO S_NAME, S_COURSEID, S_COURSEDESCRIPTION, S_COURSECREDITS, S_GRADE; 
    EXIT WHEN cursor1%NOTFOUND; 
     IF (S_GRADE = 'A') THEN 
     S_CREDITSTOGPA := (S_COURSECREDITS * S_A); 
     S_GPABEFOREDIV := S_GPABEFOREDIV + S_CREDITSTOGPA; 
    ELSIF (S_GRADE = 'B') THEN 
     S_CREDITSTOGPA := (S_COURSECREDITS * S_B); 
     S_GPABEFOREDIV := S_GPABEFOREDIV + S_CREDITSTOGPA; 
    ELSIF (S_GRADE = 'C') THEN 
     S_CREDITSTOGPA := (S_COURSECREDITS * S_C); 
     S_GPABEFOREDIV := S_GPABEFOREDIV + S_CREDITSTOGPA; 
    ELSIF (S_GRADE = 'D') THEN 
     S_CREDITSTOGPA := (S_COURSECREDITS * S_D); 
     S_GPABEFOREDIV := S_GPABEFOREDIV + S_CREDITSTOGPA; 
    ELSE 
     S_CREDITSTOGPA := (S_COURSECREDITS * S_F); 
     S_GPABEFOREDIV := S_GPABEFOREDIV + S_CREDITSTOGPA; 
    END IF; 
    DBMS_OUTPUT.PUT_LINE(CHR(10)); 
    DBMS_OUTPUT.PUT_LINE(S_COURSEID ||' '|| S_COURSEDESCRIPTION ||' '|| S_COURSECREDITS ||' '|| S_GRADE); 
    S_TOTALCREDITS := S_TOTALCREDITS + S_COURSECREDITS; 
    S_GPA := ROUND((S_GPABEFOREDIV/S_TOTALCREDITS),2); 
    END LOOP; 
    DBMS_OUTPUT.PUT_LINE('Total Credits: ' || S_TOTALCREDITS); 
    DBMS_OUTPUT.PUT_LINE('Overall GPA: ' || S_GPA); 
    CLOSE CURSOR1; 
    END; 
    /

2桁の小数点以下四捨五入を必要とします。私は、このような

Overall GPA: ROUND(S_GPA,2) 

のように複数のスポットで2つのスポットにROUND関数を使用してみました。しかし、私はまだ0小数

で立ち往生しています私は何とかselect文でこれを行う必要がありますか？すべての助けをいただければ幸いです。

Answer 1

私はそれを得ました、私はS_GPAをS_GPA（4,2）に変更しました。