1 Help me!!! Nhóm 5 cần trợ giúp gấp!!! mấy pro giúp đỡ giùm 2010-05-11, 22:44
lean202008
Thành Viên
2 câu thủ tục 9,10 wa khó ko thể hiểu đề nổi. Mong các bạn cùng chung tay giúp đỡ giùm cái. Còn 2 ngày nữa là vấn đáp rồi mà chưa hoàn thành gì cả.
boy_saudoi đã viết:Đáng lẽ là phải hoàn thành trước 1 tuần đề phòng trục trặc hay sự cố chứ . Ở đây làm là tính điểm chung nên tôi nghĩ phải có trách nhiệm cao hơn . Tới giai đoạn này thì đã rút được kinh nghiệm từ các nhóm khác mà còn vậy
--CÂU 9.....Kem_Skillno1_group
Create or replace
proc SKILLNO1(idhoatdong hoatdong.id%type)
as
idtemp hoatdong.id%type;
tde hoatdong.tieude%type;
idkhach hoatdong.idkhachhang%type;
idlienhe hoatdong.idnguoilienhe%type;
nv hoatdong.sonv%type;
nguoicn hoatdong.nguoicn%type;
ngaycn hoatdong.ngaycn%type;
ngaydukienkt date;
ngaydukienbd date;
tthai hoatdong.trangthai%type;
idnhatky nhatky.id%type;
Begin
select id into idtemp from hoatdong hd where hd.id=idhoatdong;
if idtemp is null then
DBMS_output.put_line('ID khong hop le');
else
select hd.trangthai into tthai from hoatdong hd where hd.id=idhoatdong;
if tthai=1 then
DBMS_output.put_line('Hoat dong da co lich');
else
select hd.tieude, hd.idkhachhang, hd.idnguoilienhe, hd.sonv, hd.nguoicn, hd.ngaycn
into tde, idkhach, idlienhe, nv, nguoicn, ngaycn
from hoatdong hd
where hd.id=idhoatdong;
idnhatky := 'nk001';
insert into nhatky values(idnhatky,tde,idhoatdong,null,idkhach,idlienhe,'0',null,null,nv,null,null,null,ngaycn, nguoicn);
select ct.ngaygiodkbatdau, ct.ngaygiodkketthuc
into ngaydukienbd, ngaydukienkt
from hoatdong hd, chitiethoatdong ct
where hd.id=idhoatdong and ct.idhoatdong= hd.id;
insert into chitietnhatky values('1',idnhatky, ngaydukienbd, ngaydukienkt,null);
update hoatdong set trangthai=1 where id=idhoatdong;
End if;
End if;
End SKILLNO1;
» DBA | HỌC TẬP-TRAO ĐỔI » Database » Đồ Án Lớn » Help me!!! Nhóm 5 cần trợ giúp gấp!!! mấy pro giúp đỡ giùm
Permissions in this forum:
Bạn không có quyền trả lời bài viết
|
|