@Jürgen,
Haben diese Tabellen auf den Spalten einen Unique key?
TMP$Attachments -> TMP$User
Einstellungen -> Bezeichnung
Wenn nicht kann nicht sichergestellt werden, dass du nur einen Datensatz bekommst für die Abfragen innerhalb der SProc.
Ich würde also einfach mal testen, ob diese Spalten eindeitige Werte enthalten.
Entweder durch das Setzen eines Unique keys, oder so:
SQL-Code:
SELECT TMP$User, Count(*)
FROM TMP$Attachments
GROUP BY TMP$User
HAVING Count(*) > 1
SELECT Bezeichnung, Count(*)
FROM Einstellungen
GROUP BY Bezeichnung
HAVING Count(*) > 1
Edit: Ahhh... Ich hatte den Tab hier zu lange auf bevor ich weiter editiert hatte. (3 Stunden, oder so
)
Einen Schlawiner hätten wir also gefunden.
Nachtrag2: Oki und Beichnung ist der PrimKey. Alles klar, bitte weiterfahren. Die Idee war also nix...
Hier ist mal ein möglichst minimalistischer Ansatz, der mit dem Firebird DataProvider laufen sollte. (Für den BDP einfach die @ durch : ersetzen)
Code:
public static void LogbuchStart(IDbConnection connection,
int datenNr,
int selectionNr,
out int neuId,
out bool neuerMonat)
{
using (IDbCommand cmd = connection.CreateCommand())
{
cmd.CommandText = "Logbuch_Start";
cmd.CommandType = CommandType.StoredProcedure;
IDataParameter datenNrPrm = cmd.CreateParameter();
IDataParameter selectionNrPrm = cmd.CreateParameter();
IDataParameter formularNrPrm = cmd.CreateParameter();
IDataParameter neuIdPrm = cmd.CreateParameter();
IDataParameter neuerMonatPrm = cmd.CreateParameter();
datenNrPrm.ParameterName = "Daten_Nr";
datenNrPrm.Direction = ParameterDirection.Input;
datenNrPrm.DbType = DbType.Int32;
datenNrPrm.Value = datenNr;
selectionNrPrm.ParameterName = "Selektion_Nr";
selectionNrPrm.Direction = ParameterDirection.Input;
selectionNrPrm.DbType = DbType.Int32;
selectionNrPrm.Value = selectionNr;
formularNrPrm.ParameterName = "Formular_Nr";
formularNrPrm.Direction = ParameterDirection.Input;
formularNrPrm.DbType = DbType.Int16;
formularNrPrm.Value = datenNr;
neuIdPrm.ParameterName = "neu_ID";
neuIdPrm.Direction = ParameterDirection.Output;
neuIdPrm.DbType = DbType.Int32;
neuerMonatPrm.ParameterName = "Neuer_Monat";
neuerMonatPrm.Direction = ParameterDirection.Output;
neuerMonatPrm.DbType = DbType.Int16;
cmd.ExecuteNonQuery();
if (neuIdPrm.Value != null
&& neuIdPrm.Value != DBNull.Value)
neuId = (int) neuIdPrm.Value;
else
neuId = -1;
if (neuerMonatPrm.Value != null
&& neuerMonatPrm.Value != DBNull.Value)
neuerMonat = (int) neuerMonatPrm.Value == 1;
else
neuerMonat = false;
}
}
Falls er hier immer noch kracht könnte das an der Eigenheit von PSQL liegen, dass es einfach gar keine Unterstützung von Funktionen besitzt.
Rückgabewerte können nur in einer Ergebnismenge zurückgeliefert werden.
Flls dein DataProvider das nicht für ein single select automatisch umwurschtelt könnte es so mit einem Select aussehen:
Code:
public static void LogbuchStartSelect(IDbConnection connection,
int datenNr,
int selectionNr,
out int neuId,
out bool neuerMonat)
{
using (IDbCommand cmd = connection.CreateCommand())
{
cmd.CommandText = "SELECT neu_ID\n" +
" ,Neuer_Monat\n"
+ "FROM Logbuch_Start(@datenNr, @selectionNr, @formularNr)";
cmd.CommandType = CommandType.Text;
IDataParameter datenNrPrm = cmd.CreateParameter();
IDataParameter selectionNrPrm = cmd.CreateParameter();
IDataParameter formularNrPrm = cmd.CreateParameter();
datenNrPrm.ParameterName = "datenNr";
datenNrPrm.Direction = ParameterDirection.Input;
datenNrPrm.DbType = DbType.Int32;
datenNrPrm.Value = datenNr;
selectionNrPrm.ParameterName = "selectionNr";
selectionNrPrm.Direction = ParameterDirection.Input;
selectionNrPrm.DbType = DbType.Int32;
selectionNrPrm.Value = selectionNr;
formularNrPrm.ParameterName = "formularNr";
formularNrPrm.Direction = ParameterDirection.Input;
formularNrPrm.DbType = DbType.Int16;
formularNrPrm.Value = datenNr;
neuId = -1;
neuerMonat = false;
using (IDataReader reader = cmd.ExecuteReader())
{
if (reader.Read())
{
if (!reader.IsDBNull(0))
neuId = reader.GetInt32(1);
if (!reader.IsDBNull(1))
neuerMonat = reader.GetInt32(1) == 1;
}
}
}
}
Zitat von
Hansa:
Inwiefern ist hier :
SQL-Code:
IF ( Formular_Nr = 0 )
THEN BEGIN
/* einige weitere Befehle */
Neuer_Monat = True;
END
@H.
sichergestellt, daß die Datenmenge nur aus einem Element besteht ?
Weil nur ein einziges "suspend" ausgeführt wird?
Mann, Mann, wenn man dir jetzt auch noch das erklären muss wo normalerweise dein Horizont endet...