VBA mikrostasyon: jenere kat jeyografik

Kèk jou de sa te montre ki jan yo jenere enprime kouman lè l sèvi avèk mikrostasyon. Anvan te gen opsyon sa a pou manyen fèy papye ak modèl, li te nesesè pou fè li ansyen fason pa pwodwi blòk (selil) ak kontni taye.

Retounen soti nan minit mwen sabbatical, egzanp mwen montre ou nan okazyon sa a se yon aplikasyon devlope sou Vizyèl Debaz Mikrostasyon, nan ki se yon kat bòde pwodwi, oswa kòm kèk sètifika Cadastre rele li. Ideyal pou depatman Cadastre, ki dwe jenere yon kat sou demann, nan echèl, yon sèvis pou ki yo chaje, men ki, si se pa otomatik, pran yon tan long.

Ante te gen yon videyo ke mwen retire tanporèman, men pou rezon edikasyon isit la mwen kite wout la li te devlope ak Customized.

Entrain yo.

• Yon dgn, lye nan nivo fèm
• Yon baz done Aksè, ki te gen kolòn nan zòn nan, perimèt, ak ranje kowòdone. Lè sa a, yon rantre nan yon lòt baz done ki te gen non yo nan kontribyab yo (moun), ki soti nan kle a Cadastre.
• Yon dosye .cel ki gen selil la ankadreman (blòk), echèl 1: 100, nò senbòl, ak nœuds pou ajoute done ki sòti nan baz done a. Sa a dwe mete nan plas kote bibliyotèk yo anrejistre yo estoke (espas travay / konfigirasyon / selil)

Nan VBA yon fòm kaptire te fèt ak yon fòma mask dapre kòd Cadastre nan minisipalite a ki te ale nan sèvi ak li. Li te gen yon espas yo ajoute obsèvasyon ak opsyon yo dwe eleman kòm anotezi non yo nan mèt pwopriyete yo, kle yo Cadastre oswa nimewo pwopriyete a sèlman.

Ki jan yo kouri.

Yon fwa karakteristik yo ap deziyen, bouton "jenere sètifika" a se bourade ak sistèm nan fè operasyon nòmal ki ta dwe fè manyèlman nan ka pa gen aplikasyon an.

Depi li egzekite sou yon nouvo dosye (travay), sistèm lan fè sa ki annapre yo:

• Referans kat jeyografik refere a kat la mare ki gen konplo a
• Kalkile ranje ki soti nan kowòdone ki gen trase a, etabli echèl ki apwopriye a
• Lè sa a, kreye yon kloti alantou pwopriyete a, ak ekivalan an gwosè a sis anpil, kidonk, ou pa bezwen travay ak kat jeyografik la an antye
• Lè sa a, li fè yon clip ki gen sèlman kouch ki nesesè yo, bilding limit, nimewo bilding, limit nan blòk ak non lari. Nan pwosesis sa a, operasyon egzanp lan se tan konsome paske kritè yo topolojikal pa byen adapte nan kat sa yo, olye pou yo ki lye ak santwoyid la lye limit yo, fòse yo fè yon transfè Fleurit kwen nan santwoyid a ak lefèt jere yon kat jeyografik yon sèl olye pou yo zòn oswa dosye kadran fè analiz la ankonbran.
• Lè sa a, kalkile echèl la, ki fè yon gwosè referans blòk (selilè) nivo 1: 100 yo wè si kontra fè li pi gwo oswa pi piti epi mete selil la.
• Lè sa a, jenere yon kloti nan ankadreman an nan sa ki gen kat jeyografik la limite, ak koupe sipli la.

Rezilta a.

Gen nou genyen li, yon sètifika Cadastre, nan ki se modil done eleman kòm ajans lan egzekite pou pwojè a, logo la nan minisipalite a, zòn nan kalkile, echèl, nimewo fèy ak deskripsyon endike.

Sou yon dezyèm fèy, jenere tab la nan kowòdone nan estasyon yo diferan, distans ak BEARINGS ki te pwodwi sou vole a soti nan yon kloti entèn sou pwopriyete a, mete yon pwen ak yon kantite somè nan yon direksyon ki goch soti nan kote li ye. plis lwès. Si sa nesesè, paske poligòn lan gen anpil somè, jenere fèy nesesè yo.

Pou ka ekstrèm, nan pasèl ki ale twò pre, ki se pwochen nan yon lari trè laj, Lè sa a, opsyon yo te kreye fòse echèl sa a oswa jenere yon echèl 1: 125 ki soti nan ki sistèm nan kalkile. Ka egzanp lan mande pou fè sa, paske yo wè ke vwazen lòt bò lari a pa soti nan echèl sa.

Aplikasyon an ap travay sou mikrostasyon jewografik V8, byenke sou tan sa a ak yon mil lòt bagay yo te fè pou pwosesis sa a ke yon sèl jou a mwen espere pale.