C# と VB.NET の質問掲示板

初歩的な質問ですが、よろしくお願いいたします。

Oracleのストアドでデータをループし
ブレイクキーごとの値を集計し、集計値をInsertしています。
以下のようなコードを書いたのですが、ループ外で「集計値をInsert」が必要になります。
なんとかループ内の「集計値をInsert」で一緒に判定する方法はないでしょうか？

わかりにくい説明で申しわけありません。

OPEN カーソル変数
nSum := 0;
nKey := -1;
LOOP
    FETCH カーソル変数 INTO レコード格納変数;
    EXIT WHEN  カーソル変数%NOTFOUND;
    
    nSum := nSum + レコード格納変数.Suu;
    
    IF (nKey != -1 AND nKey != レコード格納変数.Key) THEN
        nKey := レコード格納変数.Key;
        集計値をInsert；
    END IF;
    
END LOOP;
    
集計値をInsert；

CLOSE カーソル変数;

> ■No59014 (long さん) に返信

未検証ですが、おおまかにこんな感じってことで。

RET_TRUE	NUMBER := 1;
RET_FALSE	NUMBER := 0;

nSum := 0;
nKey := -1;
nCnt := 0;
nFlg := RET_FALSE;

OPEN  カーソル変数;
LOOP
	FETCH カーソル変数 INTO レコード格納変数;
	IF nCnt = 0 AND カーソル変数%NOTFOUND THEN EXIT; END IF;

	IF カーソル変数%FOUND THEN

		nSum := nSum + レコード格納変数.Suu;

		IF (nKey != -1 AND nKey != レコード格納変数.Key) THEN
			nKey := レコード格納変数.Key;
			nFlg := RET_TRUE;
		END IF;
	END IF;

	IF nFlg = RET_TRUE OR カーソル変数%NOTFOUND THEN
		集計値をInsert；
		nFlg := RET_FALSE;
	END IF;

	nCnt := nCnt + 1;

	IF カーソル変数%NOTFOUND THEN EXIT; END IF;
END LOOP;
CLOSE  カーソル変数;