Mit dem Modul ADASSIN können Objekte aus einer Adalin ADASS Datei gelesen werden.
Der Modul wird mit:
|INCL \script\adassin.mod
in einer ICS RUN1-Konfiguration verfügbar gemacht.
Folgende Parameter können in der Map
ADASSIN_PARAM gesetzt werden:
| Parameter | req/opt | Beschreibung |
APPLI_DIR | r | Verzeichnis in dem die Adalin .form und
.attr Dateien gespeichert sind.
.form und .attr Dateien
beschreiben das interne Adalin Datenmodell. |
TRACE | r | Tracemodus ein- oder ausschalten (ON
oder OFF). Falls der Tracemodus eingeschaltet
ist, wird für jedes gelesene Objekt in der .log Datei eine Meldung
ausgegeben. |
DEBUG | r | ON oder OFF, Default
= OFF. Debugmodus ein oder aus. |
STATISTICS | r | ON oder OFF, Default
= OFF. Statistik anzeigen. |
In der Map ADASSIN_TABID müssen für jede Adalin
Tabelle Einträge von der Form:
MAP ADASSIN_TABID
...
<table> => <form/attr-file>,<tabletype>
...
END_MAPgemacht werden. Die einzelnen Parameter haben folgende Bedeutung:
<table>Name der Adalintabelle (z.B. POLYG).
<form/attr-file>Name der zugehörigen .form oder .attr Datei (ohne Endung und ohne Verzeichnispfad).
<tabletype>Adalin Tabellentyp (P = Punkttabelle,
N = Flächennetz, D =
Detailebene).
Der ADASSIN Modul liefert für jedes IN-Objekt folgende Komponenten:
| Komponente | req/opt | Beschreibung |
IN.TYP(s) | r | Objekttyp (s.a. unten). |
IN.EBENE(s) | r | Adalin Ebene. |
IN.TABELLE(s) | r | Adalin Tabelle. |
IN.OBJID(s) | r | Adalin Transferidentifikation. |
Ausserdem sind in jedem IN-Objekt die Attribute des Objekts gemäss .attr Datei enthalten (z.B: IN.a für Art).
IN.TYP =
'TEXT'| Komponente | req/opt | Beschreibung |
IN.TXT(s) | r | Textinhalt. |
IN.ALI(s) | r | Textjustierung. |
IN.ROT(s) | r | Rotationswinkel. |
IN.POS(s) | r | Textposition. |
IN.FONT(s) | r | Textfont. |
| Prozedur | ADSSIN_OPEN [s input][] |
| Beschreibung | Öffnet eine bestehende ADASS Datei
<input> und initialisiert den Modul. Die
Prozedur wird von RUN1 automatisch aufgerufen. |
| Beispiel | |
| Prozedur | ADASSIN_READ_OBJECT [][b state] |
| Beschreibung | Liest das nächste IN-Objekt aus der geöffneten ADASS Datei. Die Prozedur wird von RUN1 automatisch aufgerufen. |
| Beispiel | |
| Prozedur | ADASSIN_CLOSE [][] |
| Beschreibung | Schliesst den Modul und gibt die durch den Modul belegten Resourcen wieder frei. Die Prozedur wird von RUN1 automatisch aufgerufen. |
| Beispiel | |
! Diese ICS Konfiguration zeigt alle von adassin.mod
! gelesenen Objekte in der .log Datei an.
|LICENSE \license\iltools.lic
MAP USER_INPUT1
DIALOG => FILE ! FILE | STRING | ODBC
MESSAGE => 'Enter .avs Input File'
FILE_FILTER => avs
FILE_EXISTS => TRUE
OPT => input
END_MAP
MAP ADASSIN_PARAM
APPLI_DIR => data\adalin\
STATISTICS => ON
TRACE => OFF
DEBUG => OFF
END_MAP
MAP ADASSIN_TABID
! AdalinTabellenid => Form/Attr-Filename,Typ {P|N|D}
Header => head,D
POLYG => ppun,P
GRENZ => gpun,P
SITUS => spun,P
Liegenschaften => lieg,N
Mut_Liegenschaften => lieg,N
Baurechte => baur,N
Mut_Baurechte => baur,N
Unterbaurechte => ubau,N
Mut_Unterbaurechte => ubau,N
Baurecht-an-Unterbaurecht => buba,N
Mut_Baurecht-an-Unterbaurecht => buba,N
Bodenbedeckung => bodb,N
Mut_Bodenbedeckung => bodb,N
Unterirdische-Gebaeude => ugeb,N
Servitute => serv,D
Mut_Servitute => serv,D
OEigBeschr => oebs,D
ObjekteLinien => dets,D
Rohrleitungen => rohr,D
END_MAP
MAP INPUT_SOURCES
I1 => ADASSIN,OPT.input
END_MAP
MAP INOUT
I1 => DISPLAY_OBJECT1,IN
END_MAP
|INCL \script\adassin.mod
|INCL \script\run1.prg