小區(qū)物業(yè)管理系統(tǒng)內(nèi)附代碼-資料下載頁
2025-04-07 23:07本頁面
【正文】 39。 print 39。業(yè)主姓名39。 +39。 39。+ 39。性別39。 +39。 39。+ 39。電話39。+39。 39。+ 39。門牌號39。 +39。 39。+ 39。面積39。+39。 39。+ 39。身份證39。 while @@FETCH_STATUS = 0 begin print @姓名 + @性別 + @電話+ @門牌號 + @面積+ @身份證 fetch next from GR into @姓名,@性別,@電話,@門牌號,@面積,@身份證 endprint 39。39。 close GR deallocate GR end go ，在該存儲過程中建立生成報表的游標(biāo)，分別顯示已解決的報修事項信息和未解決的報修事項信息。存儲過程...生成報表create proc 報修情況asbegindeclare @業(yè)主編號 char(10),@報修名稱 char(10), @日期 char(22)declare @受理人 char(10)已解決的報修declare BX_OK cursorforselect 業(yè)主編號,報修名稱,日期,受理人 from 報修信息表where 維修狀態(tài) = 39。ok39。open BX_OKfetch next from BX_OK into @業(yè)主編號,@報修名稱,@日期,@受理人print 39。已經(jīng)解決的報修事項39。print 39。39。print 39。業(yè)主編號 39。 + 39。報修名稱 39。 + 39。日期 39。 + 39。受理人 39。 while @@FETCH_STATUS = 0 begin print @業(yè)主編號 + @報修名稱 + @日期 + @受理人 fetch next from BX_OK into @業(yè)主編號,@報修名稱,@日期,@受理人 end print 39。39。close BX_OKdeallocate BX_OK print 39。39。print 39。39。未完成報修的游標(biāo)操作declare BX_NOT cursorforselect 業(yè)主編號,報修名稱,日期,受理人 from 報修信息表where 維修狀態(tài) = 39。not39。open BX_NOTfetch next from BX_NOT into @業(yè)主編號,@報修名稱,@日期,@受理人print 39。未解決的報修事項39。print 39。39。print 39。業(yè)主編號 39。 + 39。報修名稱 39。 + 39。日期 39。 + 39。受理人 39。 while @@FETCH_STATUS = 0 begin print @業(yè)主編號 + @報修名稱 + @日期 + @受理人 fetch next from BX_NOT into @業(yè)主編號,@報修名稱,@日期,@受理人 end print 39。39。close BX_NOTdeallocate BX_NOT end把維修好的報修寫入數(shù)據(jù)庫的存儲過程 方便處理維修好的數(shù)據(jù)create proc 報修完成@編號 intasupdate 報修信息表 set 維修狀態(tài) = 39。ok39。where 報修事項編號 = @編號goC．設(shè)計一個存儲過程，利用游標(biāo)，輸出投訴表中第一、二行和最后一行的信息。create proc 輸出asbegindeclare @業(yè)主編號 char(10),@投訴名稱 char(10), @日期 char(22)declare @受理人 char(10)輸出第一第二行declare TS cursorforselect top 2 業(yè)主編號,投訴名稱,日期,受理人 from 投訴信息表 open TSfetch next from TS into @業(yè)主編號,@投訴名稱,@日期,@受理人print 39。投訴事項39。print 39。39。print 39。業(yè)主編號 39。 + 39。投訴名稱 39。 + 39。日期 39。 + 39。受理人 39。 while @@FETCH_STATUS = 0 begin print @業(yè)主編號 + @投訴名稱 + @日期 + @受理人 fetch next from TS into @業(yè)主編號,@投訴名稱,@日期,@受理人 end close TSdeallocate TS 輸出最后一項declare TS_last cursorforselect top 1 業(yè)主編號,投訴名稱,日期,受理人 from 投訴信息表 order by 投訴事項編號 descopen TS_lastfetch next from TS_last into @業(yè)主編號,@投訴名稱,@日期,@受理人 while @@FETCH_STATUS = 0 begin print @業(yè)主編號 + @投訴名稱 + @日期 + @受理人 fetch next from TS_last into @業(yè)主編號,@投訴名稱,@日期,@受理人 end print 39。39。close TS_lastdeallocate TS_last end
公司管理相關(guān)推薦
鄂ICP備17016276號-1