--- copy objt TO USE AS GROUP level, CHANGE edbint,parent OF objt AND name, bezeichnung OF objp :
--- change edbint of objt to 507 and parent to obpt
update [edbbstn] set edbint=507 where edbint=4 
UPDATE [edbBstn] SET Parent= 'OBTP' WHERE edbint=507 
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 ('OBTP', 'Objecttype Parent', NULL, NULL, 'DMR', 0, 0, 'HOST', 4, '$R', 1, 0, 1, 6,0, '$R', 'FM-DATS', 'FM-DATS', NULL, 16, NULL, NULL, NULL, NULL, 0);

--- copy löschen falls vorhanden um anschließend neu anzulegen
DELETE FROM edbBstn WHERE name='COPY'
 
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 ('COPY', 'Cobol-Copy', NULL, NULL, 'DMR', 0, 0, 'OBTP', 508, '$R', 1, 0, 0, 6,0, '$R', 'DV-COPY', 'DV-COPY', NULL, 0, NULL, NULL, NULL, NULL, 0);
 
--  Lokal genutzte Dstr können auch auf copy verweisen:
UPDATE [edbtdef]
SET Extname = ' TL-DATS;TL-BCOP', AltExtname = ' TL-DATS;TL-BCOP'
WHERE edbint = 313 AND feldnummer = 0
 
INSERT INTO [edbRmap]
([MapName], [RoName])
VALUES ('DV-COPY', 'DV_COPY')
 
--- copy ntaa TO USE AS GROUP level, CHANGE edbint,parent OF ntaa AND name, bezeichnung OF update [edbbstn] set edbint=506 where edbint=79
update [edbbstn] set edbint=506 where name='NTAA'
UPDATE [edbBstn] SET Parent= 'NTAP' WHERE edbint=506 
UPDATE [edbBstn] SET Parent= 'NTAP' WHERE edbint=509  

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 ('NTAP', 'NTAA Parent', NULL, NULL, 'DMR', -1, 1, 'MODL', 79, '$R', 3, 8, 925, 14,0, '$R', NULL, NULL, NULL, 74, 0, 'LNTA', NULL, 'Ityp="";0', 3075);