2021年人事管理系统-实验报告x

1、. windows windows 3 1232 (2).(2). e-r :3. e-r (4).admin(ano,aname,sex,age,pass)(admin)anochar(2):an amechar(2)sexchar(2)agesmalli ntpasschar(1)guest(g name,sex,gstyle,style3_id,tel,beizhu)(guest )gn amechar(2)sexchar(2)gstylechar(1)style idchar(3)telchar(16)beizhuchar(3)room(r no,rstyle,r_m on ey,i

2、nfo,state)(room)rnochar(4)rstylechar(8)r_moneyintinfochar(3)statechar(6)()gr_in fo(g name,r no ,style_id,tel,r_ mon ey,tia nshu,dazhe,all_ mon ey,pre_ mon ey,state ,in time,pre_outtime,beizhu,adm in)(gr_infogn amechar(2):rnochar(4)style idchar(3):telchar(16)r_moneyfloattian shuint:dazhefloatall mone

3、yfloatpre moneyfloatstatechar(8)in timechar(2)pre outtimechar(2)beizhuchar(3)adminchar(2)outroom_ in fo(g name,r no ,style_id,tel,r_ mon ey,pre_day,true_day,dazhe,all_ mon ey,p re_mon ey,i ntime,pre_outtime,true_outtime,adm in)(outroomnfo) gn amechar(2):rnochar(4)style idchar(3)telchar(16)r_moneyflo

4、atpre dayinttrue dayint:dazhefloatall moneyfloatpre moneyfloatin timechar(2)pre outtimechar(2)true outtimechar(2):adminchar(2)3create procedure maderoom g name char(8),sexchar(2),gstyle char(1o),style_idchar(3),tel char(16),r no char(4),r_m oneyfloat,tia nshusmalli nt,i ntimechar(2),beizhu char(3),a

5、dmin char(8),state char (6),dazhefloat output,pre_money float output,all_money float outputasbegi nif tia nshu=3 set dazhe=.9else set dazhe=.8set all_m on ey=(r_m on ey*tia nshu*dazhe)set pre_money=all_money*.5 - 5%declare pre_outtime char(2)if in timeset pre_outtime dateadd( day , tia nshu, in time

6、)-if not exists(select * from guest where style_id=style_id) in sert into guestvalues(g name,sex,gstyle,style_id,tel,beizhu)in sert into gr_info -values(g name,rno,style_id,tel,r_m on ey,tia nshu,dazhe ,all_m on ey,pre_ mon ey,state,i ntime,pre_outtime,beizhu,admi n)update room - set state=statewher

7、e rno=rnoend;gocreate procedure cha ngeroom style_id char(3),first_r no char(4),sec on d_rno char(4)asbegi nupdate roomset state=where rno=first_rnoupdate roomset state=where rnosecond_rnoupdate gr_infosetrnosecond_rno,r_money=(selectr_money fromroomwhere rno sec ond_rno)where style_id=style_id and

8、rno=first_rnoend;go:style_id char(3),rno char(4),admin char(8)aswheredeclare pre_outtime char(2),tia nshu intwheresettia nshu=(selecttia nshu from gr_infostyle_id=style_id and rno=rno)set pre_outtime dateadd( day , tia nshu, getdate() update roomset statewhere rno=rnoupdate gr_infoset in time=(getda

9、te(),pre_outtime=pre_outtime,state=,admi n=admingo:create procedure outroom -style_id char(3),rno char(4),admin char(8)aschar(2),dazhedeclare true_dayin t,true_outtimechar(2), in timechar(2),dazhefloat,pre_day int,r_money float,all_ money float,pre_ money floatset true_outtime=getdate()select in tim

10、e=i ntime from gr_info where style_id=styled and rno=rnoselect dazhe=dazhe from gr_info where style_id=style_id and rno=rnoselect pre_day=tia nshu from gr_info where style_id=styled and rno=rnoset true_day=datediff ( day ,intime , true_outtime)select r_money=r_money from gr_info where style_id=style

11、dand rno=rnoset all_ mon ey=(r_ mon ey*true_day)*dazhe-pre_ moneyin sert into outroom_ in fo(g name,r no ,style_id,tel,r_ mon ey,pre_day,true_day,all_ mon ey,pre_ mon ey,i ntime,pre_outtime,true_outtime,adm inselect gn ame,rno,style_id,tel,r_m on ey,tia nshu,true_day,all_m on ey,pre_ mon ey,i ntime,

12、pre_outtime,true_outtime,admin from gr_i nfowhere style_id=style_id and rno=rnodelete gr_info - gr_roomwhere style_id=style_id and rno=rnoupdate roomset state= where rno=rnogo.guest / . 4 o 4 o :- o . . w 9#tft il aprojectl: e 211 1 1/ 27:76: xj278298311532153315341535153622udi:322313.9

13、327211-1-17 22:28:59:-x2b2|i|ra13|p. 2d225272b2|i|ra13|p. 2d2252729cd1sg33c43636-118sq15two 15 1 15 2g t *admin1322112d51(smttk27812d9ao311513q21qa3315f3415a3516_3623d723bt1b213d92q411uui|z4q2iaoa431fi*:*:1jsi1iwww1 413.91135s5 211-1-17 526161 2 211 9 281232d113.927d13 oh 16 3m 4|m 19211 stloamuj11|1135245m 15 2111q1ammaoani woumq11huhu1511235d3.5m 153ff111123amoh 172ot11123am1 11c535968412365236214253iffim 15 2m1 1 1a