// ---------------------------------------------------------------------------- // Erstellen der Mastertabelle // ---------------------------------------------------------------------------- // ----------------------------------- // Hinzufügen der Food-Daten // ----------------------------------- DT_name = "Mastertabelle"; DT_columnprefix = "Food"; Try( Mastertabelle = Open Database( "DSN=MS Access Database;DBQ=" || OrdnerFuerRohdatenDB || "JMP_Food.mdb; DefaultDir=" || OrdnerFuerRohdatenDB || ";DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;UID=admin;", "SELECT * FROM Daten WHERE Number >= 0 ORDER BY Meeting ASC", DT_name, invisible ); // Sortieren der Tabelle Mastertabelle << Sort( By( Meeting ), Order( Ascending ), Replace Table ); // Hinzufügen eines Tabellenspezifischen Prefix bei jedem Spaltennamen AddColumnPrefix( Mastertabelle, DT_columnprefix ); log = log || Char( MDYHMS( Today() ) ) || "\!t\!t\!t 'Food-Daten' erfolgreich hinzugefügt \!n"; Save Text File( Ord_Log || log_Datei, log ); , Try(Close( Datentabelle, nosave )); log = log || Char( MDYHMS( Today() ) ) || "\!t\!t 'Food-Daten' konnten NICHT hinzugefügt werden \!n"; Save Text File( Ord_Log || log_Datei, log ); ); Delete Globals( DT_name, DT_columnprefix ); // ----------------------------------- // Hinzufügen der KnowHowTransfer-Daten // ----------------------------------- DT_name = "Info"; DT_columnprefix = "Info"; Try( Datentabelle = Open( OrdnerFuerRohdaten || "JMP_Info.txt", columns( Column( "Meeting", Character, Nominal ), Column( "KnowHowTranfer", Numeric, Continuous ), Column( "BesuchteVorträge", Numeric, Ordinal ) ), Import Settings( End Of Line( CRLF, CR, LF ), End Of Field( Tab, CSV( 0 ) ), Strip Quotes( 1 ), Use Apostrophe as Quotation Mark( 0 ), Scan Whole File( 1 ), Treat empty columns as numeric( 0 ), CompressNumericColumns( 0 ), CompressCharacterColumns( 0 ), CompressAllowListCheck( 0 ), Labels( 1 ), Column Names Start( 1 ), Data Starts( 2 ), Lines To Read( "All" ), Year Rule( "20xx" ) ) ); columnNames = Datentabelle << get column names( ); // Sortieren der Tabelle Datentabelle << Sort( By( Meeting ), Order( Ascending ), Replace Table ); // Hinzufügen eines Tabellenspezifischen Prefix bei jedem Spaltennamen AddColumnPrefix( Datentabelle, DT_columnprefix ); // Hinzufügen der Daten zur DT_gesamt AddColumns2DTByMatchOneCol( Datentabelle, Mastertabelle, "Meeting" ); Close( Datentabelle, nosave ); log = log || Char( MDYHMS( Today() ) ) || "\!t\!t\!t 'KnowHowTransfer-Daten'-Daten erfolgreich hinzugefügt \!n"; Save Text File( Ord_Log || log_Datei, log ); , Try(Close( Datentabelle, nosave )); log = log || Char( MDYHMS( Today() ) ) || "\!t\!t 'KnowHowTransfer-Daten'-Daten konnten NICHT hinzugefügt werden \!n"; Save Text File( Ord_Log || log_Datei, log ); ); Delete Globals( DT_name, DT_columnprefix );