淺議基于CASS開發(fā)勘測定界項目

1、淺議基于cass開發(fā)勘測定界項目摘要：本文闡述了基于cass開發(fā)勘測定界項目 的必要性與緊迫性；敘述了基于cass開發(fā)勘測定界項目的 目的；分析了項目開發(fā)的功能；剖析了項目開發(fā)的總體流程 圖；文章討論了項目開發(fā)的塊狀工程與線狀工程的具體流 程，并給出了部分典型代碼；最后，筆者根據(jù)多年的實踐經(jīng) 驗總結(jié)了全文，在現(xiàn)階段具有一定的理論與實踐意義。關(guān)鍵詞：cass,勘測定界，二次開發(fā)中圖分類號：tu19文獻標識碼：a土地勘測定界是根據(jù)土地征用、劃撥、出讓、農(nóng)用地轉(zhuǎn) 用、土地利用規(guī)劃及土地開發(fā)、整理、復墾等工作的需要， 實地界定土地使用范圍、測定界址位置、調(diào)繪土地利用現(xiàn)狀、 計算用地面積，為國土資源行政

2、主管部門用地審批和地籍管 理提供科學、準確的基礎資料而進行的技術(shù)服務性工作。近年來隨著城市總體規(guī)劃的發(fā)展和國家大力的加大基 礎設施的建設，各種建設征地較多，勘測定界的工作也就顯 的越來越重要，其勘界外業(yè)工作快捷簡單，而內(nèi)業(yè)工作較于 繁瑣，勘測定界報告書和勘測定界圖等都是要報批國務院國 土資源部進行審批，它與測繪的地形圖和地籍圖等均有許多 不同要求。因此怎樣完成好勘測定界的測繪工作，是個新的 課題，各測繪作業(yè)單位也就急需一款能夠方便快捷、專業(yè)的 測繪勘測定界軟件來完成這些繁瑣的內(nèi)業(yè)處理工作，為土地 勘測定界提供完整的解決方案1-2 o因此，基于cass二次開發(fā)勘測定界項目變得極為重要。 本文基于

3、cass對勘測定界項目做二次開發(fā)，大大提高了生 產(chǎn)效率，希望能給廣大同行帶來一定的理論與實踐意義。1目的與功能1.1目的當前我國已進入城市發(fā)展的快速階段，在城市化過程 中，為了有效的利用有限的土地資源，國土部門需要嚴格審 批大量的建設用地，杜絕一切違法用地現(xiàn)象。基于cass對勘測定界項目做二次開發(fā)，其主要目的是 面向國土資源部門土地勘測定界工作，以最大化提高作業(yè)效 率與最簡化作業(yè)員操作為原則，采用后臺數(shù)據(jù)庫管理技術(shù)， 以gis概念實現(xiàn)了圖形數(shù)據(jù)與屬性數(shù)據(jù)的雙向聯(lián)動，使用戶 在繪土地勘測定界圖、界址點點之記和編制土地勘測定界技 術(shù)報告書的工作中從大量重復性繪制與計算統(tǒng)計等密集勞 動中解放出來，解

4、決計算統(tǒng)計數(shù)據(jù)容易出錯的問題，為國土 資源管理部門用地審批和地籍管理基礎資料的科學性、準確 性提供了有力的保障，推動國土資源管理的信息化建設。1.2依據(jù)與功能（一）依據(jù)本文力求對勘測定界成果中的圖形處理、圖幅整飾、土 地勘測定界技術(shù)報告書的格式與要求、點之記的繪制，按照 標準技術(shù)規(guī)程、規(guī)范和圖式進行。本文依據(jù)的規(guī)程和規(guī)范主 要有3：(1) ：500、1： 1000、1： 2000地形圖數(shù)字化規(guī)范 gb/t17160-1997(2) 1： 500、1： 1000、1： 2000地形圖要素分類與代 碼gb/t14804-93(3) 1： 500、1： 1000、1： 2000 地形圖圖式 gb/t

5、20257-2007(4) 城鎮(zhèn)地籍調(diào)查規(guī)程td1001-93(5) 土地利用現(xiàn)狀調(diào)查技術(shù)規(guī)程(1984年全國農(nóng)業(yè)區(qū) 劃委員會)(6) 土地勘測定界規(guī)程td/t10082007(7) 建設用地審查報批業(yè)務工作手冊(8) 測繪產(chǎn)品檢查驗收規(guī)定(ch1002-95)(9) 測繪產(chǎn)品質(zhì)量評定標準(ch1003-95)(10) 全球定位系統(tǒng)城市測量技術(shù)規(guī)程cjj 73-97(11) 工程測量規(guī)范gb50026-93(12) 土地利用現(xiàn)狀分類(gb/t 21010-2007)(13) 本項目技術(shù)設計書(二)功能基于cass開發(fā)勘測定界項目，其主要功能如下：(1) 具備cass編繪數(shù)字地形圖、地籍圖、宗地

6、圖的所 有功能；(2) 編繪土地勘測定界圖；(3) 輸出完整的土地勘測定界技術(shù)報告書；(4) 輸出宗地面積分類、土地面積分類表、界址點成果 表等excel格式成果表格；(5) 管理各種數(shù)據(jù)文件(主要應用測量放樣、數(shù)據(jù)管 理)。2總體流程圖基于cass開發(fā)勘測定界項目的總體流程圖如圖1所示:圖1基于cass開發(fā)勘測定界項目的總體流程圖3線狀工程流程線狀工程流程中主要包括了中線單個交點處理、中線要素文件錄入、中線要素文件處理、參考線轉(zhuǎn)換為中線、中線 加中樁、繪制公路征地邊線、參考線轉(zhuǎn)換為邊線、邊線加邊 樁、刪除邊樁和中線無縫布局圖框。(1) 定圖形比例尺模塊用戶應根據(jù)用地范圍大小確定將輸出的土地勘

7、測定界 圖的比例尺；先確定比例尺的大小是為了避免作圖過程中改 變比例尺的大小，系統(tǒng)默認的比例尺是l：500o(2) 繪中線(轉(zhuǎn)換中線)模塊錄入中線設計值并繪制中線，保存中樁數(shù)據(jù)文件。(3) 生成直曲線成果表模塊根據(jù)圖形的中線數(shù)據(jù)反算直曲線成果表(中線直圓曲線 元素表)以便和設計值比較以確定中線繪制是否正確。(4) 繪邊樁模塊本文提供了兩種繪邊界的方法：交互繪邊界與文件繪邊 界(5) 生成中樁、邊樁等數(shù)據(jù)文件模塊當中樁和邊樁都繪制完成并檢查正確無誤后，由屏幕生 成邊樁數(shù)據(jù)文件、邊樁對應中樁數(shù)據(jù)文件用于外業(yè)實地放樣 或檢核。部分主要代碼如下：dim strcopy as stringif past

8、etext. text = “ “ thenexit subend if strcopy = pastetext textistf訂e. cleartreesearch strcopy, "*dwg” , sfiles ()dim adtext as acadtextdim ftype(0 to 1) as integer, fdata(0 to 1)dim i as integerif istf訂e. listcount 二 0 thenexit subend if(6) 連接用地邊接線、權(quán)屬界線、地類界線模塊封閉用地界線后就轉(zhuǎn)入塊狀工程的操作流程。4塊狀工程流程塊狀工程包括如下流

9、程：(l) mapgis數(shù)據(jù)導入模塊勘測定界項目需用到二調(diào)的數(shù)據(jù)，而廣西絕大部分二調(diào) 數(shù)據(jù)mapgis,因此mapgis數(shù)據(jù)無縫導入到cass中變?yōu)闃O其 重要。其部分主要代碼如下：do while len(sdir)ingfiles 二 ingfiles + 1redim preserve sfiles (1 to ingfiles)sfiles(ingfiles) = spath & sdirloopdo while len(sdir)if left(sdir, 1)" and left(sdir, 1)"then ''lnglndex = lng

10、lndex + 1redim preserve ssubdirs (1 to lnglndex)end ifsdir = dirloop(2) 展繪平面點點號模塊將野外采集的坐標數(shù)據(jù)展繪到圖形中去，cass勘界支持 展平面點點號的數(shù)據(jù)文件文件名為*.dat或*. txt,文件格 式為：點號，編碼，橫坐標(e),縱坐標(n),高程(z).(3) 繪制地形、地物模塊在沒有工作底圖的情況下，根據(jù)外業(yè)采集到的用地周圍 地形地物點位繪制地形、地籍要素。屏幕左側(cè)為地形繪制菜單，嚴格按照地形圖圖式，采用 三級圖形索引，用戶可更加方便快捷地尋找編輯工具。(4) 連接用地邊界線、權(quán)屬界線、地類界線模塊根據(jù)野外采

11、集的邊界點(或按設計邊界坐標)、權(quán)屬點、 地類點，依據(jù)相應繪制邊界線、權(quán)屬線、地類線的命令繪制, 比如村界用相應的村界命令，地類線用相應的地類界命令等。(5) 界址點標注(自動)模塊點擊標注點號命令，系統(tǒng)會根據(jù)用戶繪制的邊界線、權(quán) 屬線、地類線自動標注點號。以j開頭的表示外圍用地邊界 樁。根據(jù)規(guī)范要求，權(quán)屬界線(行政界線)與用地范圍線的 交叉界址點編號應冠以字母表示：s表示省界；e表示地區(qū) (市)；a表示縣界；x表示鄉(xiāng)(鎮(zhèn))界；c表示村界；d表 示地類界等。標注點號完成后，用戶應檢查點號是否標注完全，有沒 有沒標的地塊。(6) 生成圖斑模塊根據(jù)權(quán)屬界線和地類界線自動封閉圖斑區(qū)域，生成圖斑 系統(tǒng)

12、可以繼承權(quán)屬的屬性，后向每個圖斑添加圖斑屬性，屬 性包括：權(quán)屬信息、圖斑信息及地類信息。其部分主要代碼 如下：for each ent (0) in objdbx. modelspace 'thisdrawing. layers. item( "tk")if typeof t is acadtext or typeof t is acadmtext thenif ent (0). height = 1.2 thenif ent(0).scalefactor -1=0 thenobjdbx. copyobjects ent, objdbx22. modelspacee

13、nd ifend if(7) 圖斑檢查模塊系統(tǒng)檢查圖斑編號是否重復以及是否存在沒有生成屬 性的圖斑。系統(tǒng)將對所有圖斑進行檢查，如果包含沒有生成 屬性的圖斑，雙擊檢查對話框中的對應的檢查信息，系統(tǒng)將 自動將該地塊移到視區(qū)中心并閃爍顯示。(8) 圖形審核模塊用戶可以按權(quán)屬、地類、用地類型等方式檢查地塊屬性 標注的正確性。地塊屬性標注的正確性決定報告書數(shù)據(jù)統(tǒng)計 的正確性。(9) 項目信息模塊錄入項目及用地單位、土地相關(guān)、勘測單位、勘測資料 等勘測定界項目信息，用于系統(tǒng)填寫勘測定界技術(shù)報告書。(10) 輸出電子報盤系統(tǒng)、生成勘界報告書與面積表模 塊根據(jù)當前圖形將勘測定界報告書生成為word文檔，根 據(jù)圖斑地類批量輸出各地類面積匯總表。其部分主要代碼如下：if left(version, 2)二 “15” thensetobjdbxcreateobject( objectdbx. axdbdocument. 1”)end ifobjdbx. open strdwgnamedim ent as acadentityfor each ent in objdbx. modelspaceif typeof ent is acadtext or typeof ent is acadmtext thenend ifnext ent5結(jié)束語綜上所