-- SGPV-Variablen mit Index und SGPM -- ================================= -- add SGPM to edbBstn 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 ('SGPM', 'Schriftgutbezogene Variablen Mapping', 'CTV', 'ASCT', 'CSV', 0, 0, 'NETW', 707, NULL, 1, 0, 1, 3, 1, NULL, NULL, NULL, NULL, 16, NULL, NULL, NULL, NULL, 0); INSERT INTO [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp],[LinkBstn],[Redundant],[Flags],[Bezeichnung]) VALUES (707,0,'NAME',1,0,37,1,0,0,0,0,'Name'); INSERT INTO [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp],[LinkBstn],[Redundant],[Flags],[Bezeichnung]) VALUES (707,1,'VARIABLE',1,1,37,1,0,0,0,0,'Variable'); INSERT INTO [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp],[LinkBstn],[Redundant],[Flags],[Bezeichnung]) VALUES (707,2,'INDEX',1,2,4,2,0,0,0,0,'Index'); -- create table Anweisung für MS-Acess: CREATE TABLE [edbSgpm] ( [Name] VARCHAR(37) NOT NULL PRIMARY KEY, [Variable] VARCHAR(37) NOT NULL, [INDEX] INT NOT NULL ); -- create table Anweisung für SQL-Server: CREATE TABLE [edbSgpm] ( [Name] VARCHAR(37) NOT NULL, [Variable] VARCHAR(37) NOT NULL, [Index] INT NOT NULL, PRIMARY KEY (Name) ); -- update SGPV UPDATE [edbBstn] SET [Anzahl_Felder] = 17 WHERE [EdbInt] = 704; INSERT INTO [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp],[LinkBstn],[Redundant],[Flags],[Bezeichnung]) VALUES (704,15,'MAXINDEX',1,15,4,2,0,0,0,0,'MaximalIndex'); INSERT INTO [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp],[LinkBstn],[Redundant],[Flags],[Bezeichnung]) VALUES (704,16,'MININDEX',1,16,4,2,0,0,0,0,'MinimumIndex'); ALTER TABLE [edbSgpv] ADD [MaxIndex] INT; ALTER TABLE [edbSgpv] ADD [MinIndex] INT; -- Datenstruktur-Interface (DITF) als Ressource generieren: EDB_FLG_GEN_ASRES UPDATE edbBstn set Flags=2064 where edbint=478 -- Define view for source object in module Interfaces UPDATE [edbBstn] SET [Anzahl_Felder] = 21 WHERE [Name] = 'MHDR'; INSERT INTO [edbTdef] ([EdbInt],[Feldnummer],[Feldname],[Cluster],[Position],[Länge],[Typ],[Rochadetyp], [LinkBstn],[Redundant],[Bezeichnung],[Flags]) VALUES (301, 20, 'SOURCEOBJECT', 7, 0, -1, 5, 0, 0, 0, 'Source-Objekt', 0); -- Falscher table mode für Webservice UPDATE edbBstn set Table_Mode = 0 WHERE [Name] = 'WEBS'