--期首口座の初期マスタ(MST:会社CD)を作成するクエリ --「SPM期首残高マスタ複製繰越」が必要 --変数宣言 DECLARE @システムCD varchar(40) DECLARE @演習CD varchar(40) DECLARE @会社CD varchar(40) --カーソル宣言 DEALLOCATE KaishaCur --同一セッション内で使う場合必要 --演習CDの配列作成 DECLARE KaishaCur CURSOR FOR SELECT システムCD, 演習CD, 会社CD FROM TDA会社M WHERE 学生番号 = '' GROUP BY システムCD, 演習CD, 会社CD --カーソルオープン OPEN KaishaCur --カーソル行から変数に代入 FETCH NEXT FROM KaishaCur INTO @システムCD, @演習CD, @会社CD --配列ループ while (@@fetch_status <> -1) --エラーまたはEOFでない間ループ begin if (@@fetch_status <> -2) --EOFで無ければ処理 begin -- EXEC SPM期首残高マスタ複製勘定 @システムCD, @演習CD, @会社CD EXEC SPM期首残高マスタ複製繰越 @システムCD, @演習CD, @会社CD end --カーソル行から変数に代入 FETCH NEXT FROM KaishaCur INTO @システムCD, @演習CD, @会社CD end --カーソルクローズ CLOSE KaishaCur