OBS/Makros und Scripting/Anwendungsbereiche/Zugriff auf externe Datenquellen - Versionsgeschichte

Schinke: /* Einrichtung ODBC-Treiber */

2021-12-07T14:06:03Z

Einrichtung ODBC-Treiber

← Nächstältere Version		Version vom 7. Dezember 2021, 15:06 Uhr
Zeile 112:		Zeile 112:

	*Anschließend wählen Sie den Treiber für die Datenbank, auf die Sie zugreifen möchten und anschließend auf Fertigstellen. Hier ''ODBC Driver 17 for SQL Server''.		*Anschließend wählen Sie den Treiber für die Datenbank, auf die Sie zugreifen möchten und anschließend auf Fertigstellen. Hier ''ODBC Driver 17 for SQL Server''.
	:[[Datei:~~ODBC_Neue_Datenwuelle~~.png\|400px]]		:[[Datei:ODBC_Neue_Datenquelle.png\|400px]]

	*Im Anschluss öffnet sich der Konfigurator.		*Im Anschluss öffnet sich der Konfigurator.

Thiel: /* Allgemein */

2020-08-25T11:19:41Z

Allgemein

← Nächstältere Version		Version vom 25. August 2020, 12:19 Uhr
Zeile 35:		Zeile 35:
	//Connect zur Datenbank OBS_MSSQL_DB		//Connect zur Datenbank OBS_MSSQL_DB
	DB_ConnectToDatabase(oMSSQLDB, 'OBS_MSSQL_DB');		DB_ConnectToDatabase(oMSSQLDB, 'OBS_MSSQL_DB');

			//Connect für Access
			//DB_ConnectToDatabase(oMSSQLDB, 'c:\mdb\platin.mdb');

	//Freigeben der Instanz		//Freigeben der Instanz

Thiel: /* Allgemein */

2020-08-25T11:18:48Z

Allgemein

← Nächstältere Version		Version vom 25. August 2020, 12:18 Uhr
Zeile 13:		Zeile 13:
	*DB_MSSQL		*DB_MSSQL
	*DB_SQLite		*DB_SQLite
			*DB_MDB (Access)

	{{Achtung\|OBS ist für den Betrieb mit einer MySQL-Datenbank entwickelt. Alle anderen Datenbank-Typen sind für den Zugriff auf externe Datenquellen gedacht, um zum Beispiel Daten in die OBS-Datenbanken zu konvertieren. Fehler und Seiteneffekte sind nicht auszuschließen.}}		{{Achtung\|OBS ist für den Betrieb mit einer MySQL-Datenbank entwickelt. Alle anderen Datenbank-Typen sind für den Zugriff auf externe Datenquellen gedacht, um zum Beispiel Daten in die OBS-Datenbanken zu konvertieren. Fehler und Seiteneffekte sind nicht auszuschließen.}}

Thiel: /* Allgemein */

2020-01-07T13:51:34Z

Allgemein

← Nächstältere Version		Version vom 7. Januar 2020, 14:51 Uhr
Zeile 35:		Zeile 35:
	DB_ConnectToDatabase(oMSSQLDB, 'OBS_MSSQL_DB');		DB_ConnectToDatabase(oMSSQLDB, 'OBS_MSSQL_DB');

	//~~Wieder freigeben~~ der Instanz		//Freigeben der Instanz
	MyFreeAndNil(oMSSQLDB);		MyFreeAndNil(oMSSQLDB);
	end;		end;

Thiel am 7. Januar 2020 um 13:51 Uhr

2020-01-07T13:51:03Z

@@ Zeile 3: / Zeile 3: @@
 =Allgemein=
 In den Makros steht Ihnen die Klasse TxDB für den Zugriff auf externe Datenquellen zur Verfügung.
 <source lang="delphi">

Thiel: /* Einrichtung ODBC-Treiber */

2020-01-07T13:37:19Z

Einrichtung ODBC-Treiber

← Nächstältere Version		Version vom 7. Januar 2020, 14:37 Uhr
Zeile 96:		Zeile 96:

	*Anschließend wählen Sie den Treiber für die Datenbank, auf die Sie zugreifen möchten und anschließend auf Fertigstellen. Hier ''ODBC Driver 17 for SQL Server''.		*Anschließend wählen Sie den Treiber für die Datenbank, auf die Sie zugreifen möchten und anschließend auf Fertigstellen. Hier ''ODBC Driver 17 for SQL Server''.
	:[[Datei:ODBC_Neue_Datenwuelle.png]]		:[[Datei:ODBC_Neue_Datenwuelle.png\|400px]]

	*Im Anschluss öffnet sich der Konfigurator.		*Im Anschluss öffnet sich der Konfigurator.
	:Hier können Sie im ersten Schritt den DSN-Namen (Wichtig für die Nutzung im Makro) der neuen Verbindung eingeben.		:Hier können Sie im ersten Schritt den DSN-Namen (Wichtig für die Nutzung im Makro) der neuen Verbindung eingeben.
	:[[Datei:ODBC_Konfiguration_1.png]]		:[[Datei:ODBC_Konfiguration_1.png\|400px]]

	*Je Nach Einstellungen Ihres MS-SQL-Servers können Sie in den folgenden Schritten die entsprechende Einstellungewn wählen.		*Je Nach Einstellungen Ihres MS-SQL-Servers können Sie in den folgenden Schritten die entsprechende Einstellungewn wählen.

	:[[Datei:ODBC_Konfiguration_2.png]]		:[[Datei:ODBC_Konfiguration_2.png\|400px]]

	*Wenn am Ende der Verbindungstest erfolgreich war, können Sie über das Macro auf die neue Datenquelle zugreifen.		*Wenn am Ende der Verbindungstest erfolgreich war, können Sie über das Macro auf die neue Datenquelle zugreifen.

Thiel: /* Einrichtung ODBC-Treiber */

2020-01-07T13:32:27Z

Einrichtung ODBC-Treiber

← Nächstältere Version		Version vom 7. Januar 2020, 14:32 Uhr
Zeile 91:		Zeile 91:

	=Einrichtung ODBC-Treiber=		=Einrichtung ODBC-Treiber=
			{{Hinweis\|Möglicherweise müssen Sie den ODBC-Treiber bei Microsoft oder einem Drittanbieter herunterladen.}}

			Zur Einrichtung öffnen Sie den ODBC-Datenquellen-Administrator und wählen ''Hinzufügen''.

			*Anschließend wählen Sie den Treiber für die Datenbank, auf die Sie zugreifen möchten und anschließend auf Fertigstellen. Hier ''ODBC Driver 17 for SQL Server''.
			:[[Datei:ODBC_Neue_Datenwuelle.png]]

			*Im Anschluss öffnet sich der Konfigurator.
			:Hier können Sie im ersten Schritt den DSN-Namen (Wichtig für die Nutzung im Makro) der neuen Verbindung eingeben.
			:[[Datei:ODBC_Konfiguration_1.png]]

			*Je Nach Einstellungen Ihres MS-SQL-Servers können Sie in den folgenden Schritten die entsprechende Einstellungewn wählen.

			:[[Datei:ODBC_Konfiguration_2.png]]

			*Wenn am Ende der Verbindungstest erfolgreich war, können Sie über das Macro auf die neue Datenquelle zugreifen.

Thiel: Die Seite wurde neu angelegt: „{{Makros und Scripting}} =Allgemein= In den Makros steht Ihnen die Klasse TxDB für den Zugriff auf externe Datenquellen zur Verfügung. ← Nächstältere Version Version vom 7. Januar 2020, 14:19 Uhr Zeile 1: Zeile 1:
50 yr old Business Broker Mcqueeney from Quesnel, likes beach tanning, [http://www.picturetrail.com/sfx/album/view/24761395 wood flooring types philippines] flooring and hockey. Has toured since childhood and has visited a number of locales, including Carioca Landscapes between the Mountain and the Sea.
{{Makros und Scripting}}

=Allgemein=

In den Makros steht Ihnen die Klasse TxDB für den Zugriff auf externe Datenquellen zur Verfügung.

<source lang="delphi">

...

var oMSSQLDB:TxDB;

...

//Klasse instanziieren

oMSSQLDB:= TxDB.Create(DB_MSSQL);

//Passwort

oMSSQLDB.UserPassword := 'Passwort';

//Benutzer

oMSSQLDB.UserName := 'Benutzer';

//ODBC DSN-Name

oMSSQLDB.DataSource := 'mssql';

//Connect zur Datenbank OBS_MSSQL_DB

DB_ConnectToDatabase(oMSSQLDB, 'OBS_MSSQL_DB');

//Wieder freigeben der Instanz

MyFreeAndNil(oMSSQLDB);

end;

</source>

=wichtige Konstanten=

'''CONST_NO_SYSDB''' (False)<br/>

Viele interne Funktionen (z.B. DB_WriteSQLWhere) prüfen ob eine Tabelle exisitert, bevor diese manipuliert werden darf. Mit dieser Konstante kann dies verhindert werden.

=Häufige Funktionen=

Die oben beschriebene Verbindung muss immer aufgebaut werden.

==Nutzung im Query==

<source lang="delphi">

function StartProc():Boolean;

var oQuery: TxQuery;

begin

if DB_SOpen(oMSSQLDB,'SELECT * FROM Obs_Adressen',oQuery) then begin

Meldung(oQuery.a2c('adrnr'));

end;

DB_Close(oQuery);

end;

</source>

==Daten lesen==

<source lang="delphi">

function StartProc():Boolean;

begin

DB_ReadSQLValue(oMSSQLDB, 'Obs_Adressen', 'Zahlbed', 'adrnr = 900003');

end;

</source>

==Daten verändern==

<source lang="delphi">

function StartProc():Boolean;

begin

DB_WriteSQLWhere(oMSSQLDB, 'Obs_Adressen', ['Zahlbed'], ['dies ist ein Test'], 'adrnr = 900003', CONST_NO_SYSDB);

end;

</source>

==Daten löschen==

<source lang="delphi">

function StartProc():Boolean;

begin

DB_DeleteRecordWhere(oMSSQLDB, 'Obs_Adressen', 'adrnr = 000000');

end;

</source>

==Daten einfügen==

<source lang="delphi">

function StartProc():Boolean;

var xData: TqSQL;

begin

//Leeren Datensatz nutzen

xData := qSQlInit(oMSSQLDB, 'Obs_Adressen', CONST_DIFFERENCE, CONST_NO_SYSDB);

//Alternativ mit qSQLRead einen vorhanden Datensat einlesen

//Dieser muss zuvor in oQuery eingelesen werden (Siehe: Nutzung im Query)

xData := qSQLRead(oMSSQLDB, 'Obs_Adressen', oQuery, CONST_NO_SYSDB);

xData.qSet('adrnr', '000000');

xData.lNoSysUID := True;

xData.SaveData(NEW_RECORD);

qSqlFree(xData);

end;

</source>

=Einrichtung ODBC-Treiber=

Böhrer: Die Seite wurde neu angelegt: „50 yr old Business Broker Mcqueeney from Quesnel, likes beach tanning, [http://www.picturetrail.com/sfx/album/view/24761395 wood flooring types philippines] fl…“

2017-05-24T19:53:19Z

Die Seite wurde neu angelegt: „50 yr old Business Broker Mcqueeney from Quesnel, likes beach tanning, [http://www.picturetrail.com/sfx/album/view/24761395 wood flooring types philippines] fl…“

Neue Seite

50 yr old Business Broker Mcqueeney from Quesnel, likes beach tanning, [http://www.picturetrail.com/sfx/album/view/24761395 wood flooring types philippines] flooring and hockey. Has toured since childhood and has visited a number of locales, including Carioca Landscapes between the Mountain and the Sea.