minhdao25
20-10-2010, 22:14
Cả nhà ơi, xem đoạn code này dùm mình nha! Mình create đc mà sao k chạy ra kết quả đc.
Đề bài: Viết store nhập vào mã lớp, tên môn học. Thực hiện tăng 1 điểm trên cột điểm cuối cùng của môn học nhập vào cho các sinh viên thuộc lớp đó.
Đây là code của mình nà:
create procedure Cursor_1
@malop varchar(10), @tenmonhoc nvarchar(100)
as
begin
declare curBangDiem cursor for
select SV.Ma, MH.TenMonHoc, KQ.Diem
from SinhVien SV, MonHoc MH, KetQua KQ
where @malop = SV.MaLop and SV.Ma = KQ.MaSinhVien and MH.Ma = KQ.MaMonHoc and MH.TenMonHoc = @tenmonhoc and KQ.LanThi = (select max(KQ1.LanThi from KetQua KQ1 where KQ1.MaMonHoc = KQ.MaMonHoc)
open curBangDiem
declare @maSV varchar(10), @tenMH nvarchar(100), @diem float
fetch next from curBangDiem into @maSV, @tenMH, @diem
while(@@fetch_status=0)
begin
set @diem = @diem + 1
print @maSV+' '+@diem;
fetch next from curBangDiem into @maSV, @tenMH, @diem
end
close curBangDiem
deallocate curBangDiem
end
go
exec Cursor_1 'TH2002/01', 'Toán Cao Cấp A1'
--Mình có file database nhưng k tài nào kèm theo đc, mình thử cả .rar và .text--
Đề bài: Viết store nhập vào mã lớp, tên môn học. Thực hiện tăng 1 điểm trên cột điểm cuối cùng của môn học nhập vào cho các sinh viên thuộc lớp đó.
Đây là code của mình nà:
create procedure Cursor_1
@malop varchar(10), @tenmonhoc nvarchar(100)
as
begin
declare curBangDiem cursor for
select SV.Ma, MH.TenMonHoc, KQ.Diem
from SinhVien SV, MonHoc MH, KetQua KQ
where @malop = SV.MaLop and SV.Ma = KQ.MaSinhVien and MH.Ma = KQ.MaMonHoc and MH.TenMonHoc = @tenmonhoc and KQ.LanThi = (select max(KQ1.LanThi from KetQua KQ1 where KQ1.MaMonHoc = KQ.MaMonHoc)
open curBangDiem
declare @maSV varchar(10), @tenMH nvarchar(100), @diem float
fetch next from curBangDiem into @maSV, @tenMH, @diem
while(@@fetch_status=0)
begin
set @diem = @diem + 1
print @maSV+' '+@diem;
fetch next from curBangDiem into @maSV, @tenMH, @diem
end
close curBangDiem
deallocate curBangDiem
end
go
exec Cursor_1 'TH2002/01', 'Toán Cao Cấp A1'
--Mình có file database nhưng k tài nào kèm theo đc, mình thử cả .rar và .text--