--期首口座の初期マスタ(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