--Lesen als DataView:
Insert Into [edbBstn] ([Name],[Bezeichnung],[Suffix],[Präfix],[Zielsystem],[Aufrufbar],[Baustein_Kategorie],[Parent],[EdbInt],[Path],[Version],[Interface_Version],[Header_Record],[Anzahl_Felder],[Table_Mode],[AltPath],[ExtName],[AltExtName],[Sequenz],[Flags],[Picture],[ListBy],[ListFor],[Settings],[Interface_Dialog])
Values('KSTR','Komponentenstruktur',NULL,NULL,NULL,0,4,'KMPE',630,NULL,1,0,0,3,4,NULL,NULL,NULL,0,0,NULL,NULL,NULL,NULL,0)

Insert into [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp],[ExtName],[AltExtName],[LinkBstn],[Redundant],[ExtMap],[AltExtMap],[Bezeichnung],[Flags])
        Values (630,0,'NAME',1,0,32,1,7,'TL-DOK;TL-DRD;TL-SDAR;TL-BTTST;TL-BSTTL;TL-BAJOB','TL-DOK;TL-DRD;TL-SDAR;TL-BTTST;TL-BSTTL;TL-BAJOB',50,0,NULL,NULL,'Name',1)
Insert into [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp],[ExtName],[AltExtName],[LinkBstn],[Redundant],[ExtMap],[AltExtMap],[Bezeichnung],[Flags])
        Values (630,1,'BSTN',1,1,4,1,8,NULL,NULL,0,0,NULL,NULL,'Typ',0)
Insert into [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp],[ExtName],[AltExtName],[LinkBstn],[Redundant],[ExtMap],[AltExtMap],[Bezeichnung],[Flags])
        Values (630,2,'INFO',2,0,71,1,5,NULL,NULL,0,0,NULL,NULL,'Info',128)

--Reihenfolge und Anzahl Felder korrigeren bei kmpe/kclr:
Update [edbTdef] set [feldnummer] = 3 where ([edbint] =600 or [edbint] =609) and [feldname]='struct'
Update [edbTdef] set [feldnummer] = 4 where ([edbint] =600 or [edbint] =609) and [feldname]='shortname'
Update [edbbstn] set [anzahl_felder]=5 where ([edbint] =600 or [edbint] =609)