DB.SensusOracle.Database : (1) Procedure params., (2) S620 support, (3) SensusTestInfo for 620.

2020-11-06 14:33:32 +01:00
parent 1f581a72c1
commit 705f4de0b0
11 changed files with 587 additions and 297 deletions
@@ -172,13 +172,14 @@ namespace TBF.UI.ResultsMI
                        TBF.BenchControl.Output.DB.SensusOracle.DatabaseCfg cfg = TBF.BenchControl.ComponentCfgBase.CreateFromDbEntity(DatabaseCfg.Serializer, cmpntEntities[0], null)
                                                                               as TBF.BenchControl.Output.DB.SensusOracle.DatabaseCfg;

-                        MessageBox.Show(string.Format("Výsledky budú zapísané do '{0}' databázy", cfg.DBUsed),
+                        /// TODO: Implement database selection
+                        MessageBox.Show(string.Format("Výsledky budú zapísané do produkčnej databázy"),
                                        Strings.Information,
                                        MessageBoxButtons.OK,
                                        MessageBoxIcon.Information);

                        OracleConnection conn;
-                        switch (cfg.DBUsed)
+                        switch (DBUsed.Production)
                        {
                            default:
                            case DBUsed.Production:
@@ -192,6 +193,7 @@ namespace TBF.UI.ResultsMI
                                break;
                        }

+
                        if ((TBF.BenchControl.Sequences.ProcessData.OracleDB != null) &&
                            (TBF.BenchControl.Sequences.ProcessData.OracleDB.WriteResultsToDB(conn, b, true) == Retv.OK))
                        {