OBS Wiki - Benutzerbeiträge [de]

OBS/Kostenpflichtige Module/SteVe

2024-02-01T09:46:22Z

Wiki-Admin:

{{Kostenpflichtige Module}}

=SteVe =
SteVe gehört zum [[OBS/Kostenpflichtige Module/OCPP Ladestationen|OCPP Ladestationen Modul]]
==Home-Screen==
Hier werden grundlegende Informationen angezeigt: 
[[IMAGE:SteVe_HomeScreen.png|1300px]] 

==Ladekarten verwalten==
Aufruf: '''Data Management''' → '''OCPP Tags ''' 
Hier kann über die Schaltfläche ''Add New'' neue Ladekarten hinterlegt und mit entsprechenden Eigenschaften (bspw. ''Blocked''?) versehen werden. 
[[IMAGE:SteVe_OCPPTags.png|1300px]] 

==User anlegen==
Aufruf: '''Data Management''' → '''Users''' 
Hier können User angelegt werden und mit Personeninformationen hinterlegt werden. So kann bspw. eine Karte bzw. ein OCPP Tag zu einem Fahrzeug zugeordnet werden. 
[[IMAGE:SteVe_Users.png|1300px]] 

==Weitere Optionen==
SteVe verfügt über zahlreiche weitere Optionen und Möglichkeiten, welche jedoch nicht weiter benutzt werden. 

Hierzu gehören bspw. das Anlegen von Reservierungen oder auch Ladeprofilen… 
[[IMAGE:SteVe_ChargePointDetails.png|1300px]]

OBS/Häufig gestellte Fragen/Hardwareanforderungen

2022-08-01T06:37:07Z

Wiki-Admin: /* Systemvoraussetzungen Server */

{{Häufig gestellte Fragen}}

=Systemvoraussetzungen Workstations=

*OBS unterstützt Microsoft Betriebssysteme nicht über ihren erweiterten Support-Zeitraum hinaus. Eine Liste aller Support-Zeiträume von Microsoft finden Sie unter folgendem Link: [https://support.microsoft.com/de-de/help/13853/windows-lifecycle-fact-sheet Informationsblatt zum Lebenszyklus von Windows] 

{{Hinweis|Ab OBS 4.0 (KW 39, 2021) wird mindestens Windows 10 benötigt.}}
{{Achtung|Ab dem OBS-Update vom 30.03.2022 ist es nicht mehr möglich OBS auf einem PC mit Windows 7 zu starten.}}

*Arbeitsspeicher: Mindestens 4 GB
*Festplatte: Mindestens 128 GB

=Systemvoraussetzungen Server=
OBS unterstützt Microsoft Server-Betriebssysteme nicht über ihren erweiterten Support-Zeitraum hinaus. Sie können den Support-Zeitraum von Microsoft Server-Betriebssystemen unter folgendem Link finden: 
[https://docs.microsoft.com/de-de/lifecycle/] 

Das Verwenden von Betriebssystemen über den Support-Zeitraum hinaus zu verwenden ist allgemein nicht zu empfehlen. So ist z.B. Windows Server 2008 R2 seit Anfang 2020 nicht mehr DSGVO konform:
[[https://news.microsoft.com/de-de/supportende-windows-server-2008-umstieg-auf-microsoft-azure/ Microsoft rät Kunden mit Windows Server 2008 zum schnellen Umstieg auf Azure-Cloud]] 
Die Dimensionierung des Servers ist von mehreren Faktoren abhängig:
*Anzahl der Arbeitsplätze (siehe Unten)
*Wird das DMS verwendet? (Jährlich 30.000 Dokumente entsprechen etwa 30GB Festplattenspeicher im Jahr)
*Wird das System als Terminalserver genutzt?

Allgemeine Anforderungen an den Server:
*64-Bit Betriebssystem
*Der Server muss 24 Stunden täglich über das Internet erreichbar sein (Updates, Shoppflege, Artikelimporte, ...)
*OBS unterstützt bisher Microsoft Server-Betriebssysteme bis '''Windows Server 2022'''.

Probleme und mögliche Störungen des Serversystems: 
[[OBS/System/Systemstörungen_von_Serversystemen | Systemstörungen von Serversystemen]]

=Hardwareanforderungen (Beispiele):=
Im Folgenden erhalten Sie einige Beispiele, mit welcher Hardware eine Firma ausgestattet sein könnte. Setzten Sie sich jedoch bitte mit Firma Bergau in Verbindung um Ihre genauen Anforderungen abzustimmen.
==1 Arbeitsplatz==
Einzelplatz-Lösung:
*Betriebssystem: Windows 10 64 Bit
*Arbeitsspeicher: 16 GB
*Quadcore Prozessor 3GHz

==bis 3 Arbeitsplätze==
Client/Server-Lösung:
*Betriebssystem: Windows Server 2019 64 Bit
*Arbeitsspeicher: 32GB
*Quadcore Prozessor 3GHz
*Thin-Client mit Terminalserver oder Desktop-PCs

==ab 4 Arbeitsplätzen==
Ab 4 Arbeitsplätzen sollte immer eine Client/Server-Lösung verwendet werden. 
*Betriebssystem: Windows Server 2019 64 Bit
*Arbeitsspeicher: 32GB
*Quadcore Prozessor 3GHz
*Thin-Client mit Terminalserver oder Desktop-PCs
==ab 40 Arbeitsplätzen==
*In jedem Fall vorher mit Firma Bergau abstimmen
*Arbeitsspeicher: 80Gb (InnoDB)
*Raid 1 mit mindestens 500GB
*Optimalerweise HotSpare-Festplatte
*Xeon Quadcore CPU
==ab 100 Arbeitsplätze==
Aus Erfahrung unserer Großkunden um 100 Benutzer
Vorschlag zur Umsetzung der OBS Umgebung auf ein neues Serverumfeld.
Es ist wichtig wegen der Redundanz zwei Domänencontroller zu haben weil sonst bei Ausfall eines Domänencontrollers keine Anmeldungen mehr möglich sind.
Die User melden sich an dem Terminal RDS Balancer an und werden dann auf die nachgelagerten Terminalserver je nach Auslastung verteilt. Der OBS DB Server wird idealerweise auf einem Host mit hochgeachtetem XEON Prozessor gefahren. Wegen der idealen Geschwindigkeit ist dieses Plattensystem auf einem RAID 10 System zu installieren.
Für Druckaufbereitung und einen Antivirusserver kann einer der zwei Domänencontroller genutzt werden.

*VM Domänencontroller 1 120 GB VHDX im Raid5, 2 x XEON CORE, 4 GB RAM
*VM Domänencontroller 2 120 GB VHDX im Raid5 auf anderen Host 2 x XEON CORE, 4 GB RAM
*Terminalserverbalancer 8 GB RAM, 240 GB VHDX im RAID 5 (Userprofile) 4 x XEON CORE
*Terminalserver 1 400 GB VHDX im RAID 5 128 GB RAM 12 x XEON CORE
*Terminalserver 2 400 GB VHDX im RAID 5 128 GB RAM 12 x XEON CORE
*OBS DB Server 8 x Xeon Core hoher Takt, 192 GB RAM, 1 TB VDX in separatem RAID 10
*Fileserver 1000 GB (bitte Bedarf selber ermitteln) VHDX im RAID 5 8 GB RAM 2 x XEON CORE

=Infrastrukturelle Anforderungen=
==Firewall==
*Der Port 1337 muss für OBS-Kommunikation (Tickets, OBS-Updates, Update-Informationen, Support, etc.) freigeschaltet werden.
*Für zeitnahen Support sollte eine Möglichkeit für einen festen Fernzugriff gegeben sein.
==Netzwerkanbindung==
Mindestens 100Mbit, eine 1GBit-Verbindung ist allerdings ausdrücklich empfohlen.
==Terminalanbindung==
Wenn eine Terminalserverlösung eingesetzt wird, muss diese auf einem separaten Rechner installiert werden. Wir empfehlen hierfür den Einsatz von mindestens Microsoft Windows-Server 2012.
==Homeoffice/Remote Arbeiten==
Wenn OBS außerhalb des lokalen Firmennetzwerkes verwendet werden soll muss OBS in einer [https://de.wikipedia.org/wiki/Remote_Desktop_Protocol RDP]-Sitzung gestartet werden.
{{Achtung|Es reicht nicht aus eine VPN-Verbindung herzustellen um OBS dann über das VPN auf dem externen Client zu starten.}}
==Datensicherung (Backup)==
Ein regelmäßiges Backup auf eine externe HDD oder ein NAS muss mit geeigneter Software (Unsere Empfehlung: StorageCraft Shadow Protect) durchgeführt werden.
==USV==
Es wird eine für den Server ausreichende unterbrechungsfreie Stromversorgung benötigt.
==Rechtevergabe, Dateifreigabe, Antivirenprogramm Ausnahmen==
===OBS- und MySQL Verzeichnis===
Die MySQL-Datenbank wird standardmäßig in einem gesonderten Verzeichnis installiert. Das OBS-Verzeichnis muss innerhalb des Netzwerks für alle Clients im Vollzugriff verfügbar sein, da hieraus sowohl OBS gestartet wird als auch von OBS im Betrieb Daten gespeichert und verändert werden. Das MySQL Verzeichnis sollte aus Sicherheitsgründen auf keinen Fall von außerhalb des Server zugreifbar sein.
===Antivirenprogramm Ausnahmen===
Je nach Antivirenprogramm (AV) kann es erforderlich sein, unterschiedliche Ausnahmeregeln zu bestimmen. Einige AVs erkennen in den OBS*.EXE Dateien des OBS-Hauptverzeichnisses Schadcode, da diese Dateien von unser verschüsselt werden und die AVs diese so nicht prüfen können. Es ist daher ratsam auf jeden Fall diese von einer Überprüfung auszuschließen.
In einigen Fällen kann es auch passieren, dass AVs Einfluss auf Datenbankoperationen nehmen. Aus diesem Grund ist es ratsam auch das MySQL Verzeichnis von einer Prüfung auszuschließen.
==Microsoft Windows Server Updates==
Vor Windows-Server-Updates ist es zu empfehlen den MySQL Dienst zu beenden. Nach dem Windows Update ohne Server Neustart muss dieser dann manuell wieder gestartet.
Bei einem Server Neustart muss kontrolliert werden ob der MySQL Dienst wieder korrekt gestartet ist.
Der Name des MySQL Servers kann je nach Version variieren.

[[Datei:Windows_service.jpg]]

=Weitere Anforderungen=
==Browser==
Bestimmte OBS-Module benötigen den aktuellen Microsoft Edge Browser um zu funktionieren. Ab Windows 10 ist dieser standardmäßig installiert. Für ältere Betriebssystem können Sie ihn hier herunterladen und installieren: 
[[https://www.microsoft.com/de-de/edge Microsoft Edge]] 
[[https://www.microsoft.com/en-us/edge/business/download Microsoft Edge Business]] 

===Internet Explorer und Edge Legacy===
*Internet Explorer Support für bestimmte Betriebssysteme ab dem 15. Juni 2022 beendet [[https://docs.microsoft.com/de-de/lifecycle/products/internet-explorer-11 Internet Explorer 11 Lebenzyklus]] [[https://docs.microsoft.com/en-us/lifecycle/announcements/internet-explorer-11-end-of-support?form=MY01SV&OCID=MY01SV Internet Explorer 11 Support-Ende]]
*Ende des Support für andere Anwendungen von MS Ab dem 30. November 2020 wird die Anwendung Microsoft Teams den Internet Explorer 11 schon mal nicht mehr unterstützen. Die übrigen Microsoft-365-Apps und Microsoft-365-Dienste stellen ihren Support für den Internet Explorer 11 dann am 17. August 2021 ein. Über den Internet Explorer 11 wird man sich dann also nicht mehr mit Microsoft-365-Apps und -Diensten verbinden können. Die übrigen Microsoft-365-Funktionen würden nach diesem Datum nur noch sehr eingeschränkt über den Internet Explorer 11 verfügbar sein. [[https://www.pcwelt.de/news/Aus-fuer-IE-11-und-alten-Edge-Das-muessen-Sie-wissen-10867151.html PC-Welt: Aus für Internet Explorer 11 und alten Edge]]
*Alter Edge Browser Den Support für Edge Legacy stellt Microsoft am 9. März 2021 ein. Ab diesem Zeitpunkt liefert Microsoft keine neuen Sicherheitsupdates mehr für den alten Edge aus. [[https://docs.microsoft.com/en-us/lifecycle/announcements/internet-explorer-11-end-of-support?form=MY01SV&OCID=MY01SV Internet Exporer 11 Support-Ende]]

===Betroffene Module===
*Google Maps [[https://developers.google.com/maps/documentation/javascript/browsersupport Google Browsersupport]] '''Ab August 2021 wird für Nutzer des Internet Explorer 11 eine Warnmeldung am oberen Rand der Karten angezeigt. Die letzte Version der Maps JavaScript API, die Internet Explorer 11 unterstützt, ist v3.47. Die Unterstützung für Internet Explorer 11 wird im August 2022 vollständig eingestellt. Dies gilt auch für den IE-Modus in Edge.''' 
*HTML Anzeige für E-Mails
*Alle Browser Komponenten in OBS

{{Hinweis|Google scheint den Support für IE bereits am 17.02.2022 eingestellt zu haben. Ab OBS Version 003917 sind die betroffenen Module in der Neuen Version verfügbar}}

=Serverumzug=
Falls Sie OBS schon im Einsatz haben und einen neuen OBS-Server beschaffen möchten, ist folgendes zu beachten: 

{{Hinweis|Serverumzüge sind Kostenpflichtig und fallen nicht in die Servicevertrags-Leistungen.}}

Bei einem Serverumzug installieren und konfigurieren wir auf dem neuen Server die MySQL Datenbank und das OBS. Hierbei wird durch OBS und MySQL jeweils ein neuer Dienst in der Windows Diensteverwaltung angelegt.
Die reine Einrichtung und Konfiguration dauert ca. 1 - 2 Stunden. Hinzu kommt die Übertragung der Daten: Es müssen Dumps der Datenbank angefertigt, kopiert und auf dem neuen Server importiert werden. Der OBS-Ordner muss komplett kopiert werden. Wie lange dies insgesamt dauert lässt sich nur schwer einschätzen, da dies von der Menge der Daten, der Geschwindigkeit des alten Servers (Erstellen der Dumps) und der Übertragungsgeschwindigkeit abhängt.

Die beste Konstellation für einen Serverumzug ist, wenn wir zeitlich Zugriff auf den alten und den neuen Server erhalten. Dann können die Daten schon einmal kopiert und alles für den eigentlich Umzug vorbereitet werden. Zum gewünschten Umzugszeitpunkt müssen dann nur noch einmal die geänderten Daten aus dem OBS-Verzeichnis kopiert und die MySQL Dumps importiert werden.
Ein weiterer Vorteil ist, dass so vor dem eigentlichen Umzug OBS schon einmal getestet werden kann.

Wir können den Umzug prinzipiell jederzeit durchführen. Wenn wir dies jedoch außerhalb unserer gewöhnlichen Geschäftszeiten (08:00-16:30) durchführen erheben wir einen Aufschlag von 50% auf die Aufwandskosten.

OBS/Häufig gestellte Fragen/Hardwareanforderungen

2022-08-01T06:36:45Z

Wiki-Admin: /* Systemvoraussetzungen Server */

{{Häufig gestellte Fragen}}

=Systemvoraussetzungen Workstations=

*OBS unterstützt Microsoft Betriebssysteme nicht über ihren erweiterten Support-Zeitraum hinaus. Eine Liste aller Support-Zeiträume von Microsoft finden Sie unter folgendem Link: [https://support.microsoft.com/de-de/help/13853/windows-lifecycle-fact-sheet Informationsblatt zum Lebenszyklus von Windows] 

{{Hinweis|Ab OBS 4.0 (KW 39, 2021) wird mindestens Windows 10 benötigt.}}
{{Achtung|Ab dem OBS-Update vom 30.03.2022 ist es nicht mehr möglich OBS auf einem PC mit Windows 7 zu starten.}}

*Arbeitsspeicher: Mindestens 4 GB
*Festplatte: Mindestens 128 GB

=Systemvoraussetzungen Server=
OBS unterstützt Microsoft Server-Betriebssysteme nicht über ihren erweiterten Support-Zeitraum hinaus. Sie können den Support-Zeitraum von Microsoft Server-Betriebssystemen unter folgendem Link finden: 
[https://docs.microsoft.com/de-de/lifecycle/] 

Das Verwenden von Betriebssystemen über den Support-Zeitraum hinaus zu verwenden ist allgemein nicht zu empfehlen. So ist z.B. Windows Server 2008 R2 seit Anfang 2020 nicht mehr DSGVO konform:
[[https://news.microsoft.com/de-de/supportende-windows-server-2008-umstieg-auf-microsoft-azure/ Microsoft rät Kunden mit Windows Server 2008 zum schnellen Umstieg auf Azure-Cloud]] 
Die Dimensionierung des Servers ist von mehreren Faktoren abhängig:
*Anzahl der Arbeitsplätze (siehe Unten)
*Wird das DMS verwendet? (Jährlich 30.000 Dokumente entsprechen etwa 30GB Festplattenspeicher im Jahr)
*Wird das System als Terminalserver genutzt?

Allgemeine Anforderungen an den Server:
*64-Bit Betriebssystem
*Der Server muss 24 Stunden täglich über das Internet erreichbar sein (Updates, Shoppflege, Artikelimporte, ...)
*OBS unterstützt bisher Microsoft Server-Betriebssysteme bis '''Windows Server 2022''' geprüft.

Probleme und mögliche Störungen des Serversystems: 
[[OBS/System/Systemstörungen_von_Serversystemen | Systemstörungen von Serversystemen]]

=Hardwareanforderungen (Beispiele):=
Im Folgenden erhalten Sie einige Beispiele, mit welcher Hardware eine Firma ausgestattet sein könnte. Setzten Sie sich jedoch bitte mit Firma Bergau in Verbindung um Ihre genauen Anforderungen abzustimmen.
==1 Arbeitsplatz==
Einzelplatz-Lösung:
*Betriebssystem: Windows 10 64 Bit
*Arbeitsspeicher: 16 GB
*Quadcore Prozessor 3GHz

==bis 3 Arbeitsplätze==
Client/Server-Lösung:
*Betriebssystem: Windows Server 2019 64 Bit
*Arbeitsspeicher: 32GB
*Quadcore Prozessor 3GHz
*Thin-Client mit Terminalserver oder Desktop-PCs

==ab 4 Arbeitsplätzen==
Ab 4 Arbeitsplätzen sollte immer eine Client/Server-Lösung verwendet werden. 
*Betriebssystem: Windows Server 2019 64 Bit
*Arbeitsspeicher: 32GB
*Quadcore Prozessor 3GHz
*Thin-Client mit Terminalserver oder Desktop-PCs
==ab 40 Arbeitsplätzen==
*In jedem Fall vorher mit Firma Bergau abstimmen
*Arbeitsspeicher: 80Gb (InnoDB)
*Raid 1 mit mindestens 500GB
*Optimalerweise HotSpare-Festplatte
*Xeon Quadcore CPU
==ab 100 Arbeitsplätze==
Aus Erfahrung unserer Großkunden um 100 Benutzer
Vorschlag zur Umsetzung der OBS Umgebung auf ein neues Serverumfeld.
Es ist wichtig wegen der Redundanz zwei Domänencontroller zu haben weil sonst bei Ausfall eines Domänencontrollers keine Anmeldungen mehr möglich sind.
Die User melden sich an dem Terminal RDS Balancer an und werden dann auf die nachgelagerten Terminalserver je nach Auslastung verteilt. Der OBS DB Server wird idealerweise auf einem Host mit hochgeachtetem XEON Prozessor gefahren. Wegen der idealen Geschwindigkeit ist dieses Plattensystem auf einem RAID 10 System zu installieren.
Für Druckaufbereitung und einen Antivirusserver kann einer der zwei Domänencontroller genutzt werden.

*VM Domänencontroller 1 120 GB VHDX im Raid5, 2 x XEON CORE, 4 GB RAM
*VM Domänencontroller 2 120 GB VHDX im Raid5 auf anderen Host 2 x XEON CORE, 4 GB RAM
*Terminalserverbalancer 8 GB RAM, 240 GB VHDX im RAID 5 (Userprofile) 4 x XEON CORE
*Terminalserver 1 400 GB VHDX im RAID 5 128 GB RAM 12 x XEON CORE
*Terminalserver 2 400 GB VHDX im RAID 5 128 GB RAM 12 x XEON CORE
*OBS DB Server 8 x Xeon Core hoher Takt, 192 GB RAM, 1 TB VDX in separatem RAID 10
*Fileserver 1000 GB (bitte Bedarf selber ermitteln) VHDX im RAID 5 8 GB RAM 2 x XEON CORE

=Infrastrukturelle Anforderungen=
==Firewall==
*Der Port 1337 muss für OBS-Kommunikation (Tickets, OBS-Updates, Update-Informationen, Support, etc.) freigeschaltet werden.
*Für zeitnahen Support sollte eine Möglichkeit für einen festen Fernzugriff gegeben sein.
==Netzwerkanbindung==
Mindestens 100Mbit, eine 1GBit-Verbindung ist allerdings ausdrücklich empfohlen.
==Terminalanbindung==
Wenn eine Terminalserverlösung eingesetzt wird, muss diese auf einem separaten Rechner installiert werden. Wir empfehlen hierfür den Einsatz von mindestens Microsoft Windows-Server 2012.
==Homeoffice/Remote Arbeiten==
Wenn OBS außerhalb des lokalen Firmennetzwerkes verwendet werden soll muss OBS in einer [https://de.wikipedia.org/wiki/Remote_Desktop_Protocol RDP]-Sitzung gestartet werden.
{{Achtung|Es reicht nicht aus eine VPN-Verbindung herzustellen um OBS dann über das VPN auf dem externen Client zu starten.}}
==Datensicherung (Backup)==
Ein regelmäßiges Backup auf eine externe HDD oder ein NAS muss mit geeigneter Software (Unsere Empfehlung: StorageCraft Shadow Protect) durchgeführt werden.
==USV==
Es wird eine für den Server ausreichende unterbrechungsfreie Stromversorgung benötigt.
==Rechtevergabe, Dateifreigabe, Antivirenprogramm Ausnahmen==
===OBS- und MySQL Verzeichnis===
Die MySQL-Datenbank wird standardmäßig in einem gesonderten Verzeichnis installiert. Das OBS-Verzeichnis muss innerhalb des Netzwerks für alle Clients im Vollzugriff verfügbar sein, da hieraus sowohl OBS gestartet wird als auch von OBS im Betrieb Daten gespeichert und verändert werden. Das MySQL Verzeichnis sollte aus Sicherheitsgründen auf keinen Fall von außerhalb des Server zugreifbar sein.
===Antivirenprogramm Ausnahmen===
Je nach Antivirenprogramm (AV) kann es erforderlich sein, unterschiedliche Ausnahmeregeln zu bestimmen. Einige AVs erkennen in den OBS*.EXE Dateien des OBS-Hauptverzeichnisses Schadcode, da diese Dateien von unser verschüsselt werden und die AVs diese so nicht prüfen können. Es ist daher ratsam auf jeden Fall diese von einer Überprüfung auszuschließen.
In einigen Fällen kann es auch passieren, dass AVs Einfluss auf Datenbankoperationen nehmen. Aus diesem Grund ist es ratsam auch das MySQL Verzeichnis von einer Prüfung auszuschließen.
==Microsoft Windows Server Updates==
Vor Windows-Server-Updates ist es zu empfehlen den MySQL Dienst zu beenden. Nach dem Windows Update ohne Server Neustart muss dieser dann manuell wieder gestartet.
Bei einem Server Neustart muss kontrolliert werden ob der MySQL Dienst wieder korrekt gestartet ist.
Der Name des MySQL Servers kann je nach Version variieren.

[[Datei:Windows_service.jpg]]

=Weitere Anforderungen=
==Browser==
Bestimmte OBS-Module benötigen den aktuellen Microsoft Edge Browser um zu funktionieren. Ab Windows 10 ist dieser standardmäßig installiert. Für ältere Betriebssystem können Sie ihn hier herunterladen und installieren: 
[[https://www.microsoft.com/de-de/edge Microsoft Edge]] 
[[https://www.microsoft.com/en-us/edge/business/download Microsoft Edge Business]] 

===Internet Explorer und Edge Legacy===
*Internet Explorer Support für bestimmte Betriebssysteme ab dem 15. Juni 2022 beendet [[https://docs.microsoft.com/de-de/lifecycle/products/internet-explorer-11 Internet Explorer 11 Lebenzyklus]] [[https://docs.microsoft.com/en-us/lifecycle/announcements/internet-explorer-11-end-of-support?form=MY01SV&OCID=MY01SV Internet Explorer 11 Support-Ende]]
*Ende des Support für andere Anwendungen von MS Ab dem 30. November 2020 wird die Anwendung Microsoft Teams den Internet Explorer 11 schon mal nicht mehr unterstützen. Die übrigen Microsoft-365-Apps und Microsoft-365-Dienste stellen ihren Support für den Internet Explorer 11 dann am 17. August 2021 ein. Über den Internet Explorer 11 wird man sich dann also nicht mehr mit Microsoft-365-Apps und -Diensten verbinden können. Die übrigen Microsoft-365-Funktionen würden nach diesem Datum nur noch sehr eingeschränkt über den Internet Explorer 11 verfügbar sein. [[https://www.pcwelt.de/news/Aus-fuer-IE-11-und-alten-Edge-Das-muessen-Sie-wissen-10867151.html PC-Welt: Aus für Internet Explorer 11 und alten Edge]]
*Alter Edge Browser Den Support für Edge Legacy stellt Microsoft am 9. März 2021 ein. Ab diesem Zeitpunkt liefert Microsoft keine neuen Sicherheitsupdates mehr für den alten Edge aus. [[https://docs.microsoft.com/en-us/lifecycle/announcements/internet-explorer-11-end-of-support?form=MY01SV&OCID=MY01SV Internet Exporer 11 Support-Ende]]

===Betroffene Module===
*Google Maps [[https://developers.google.com/maps/documentation/javascript/browsersupport Google Browsersupport]] '''Ab August 2021 wird für Nutzer des Internet Explorer 11 eine Warnmeldung am oberen Rand der Karten angezeigt. Die letzte Version der Maps JavaScript API, die Internet Explorer 11 unterstützt, ist v3.47. Die Unterstützung für Internet Explorer 11 wird im August 2022 vollständig eingestellt. Dies gilt auch für den IE-Modus in Edge.''' 
*HTML Anzeige für E-Mails
*Alle Browser Komponenten in OBS

{{Hinweis|Google scheint den Support für IE bereits am 17.02.2022 eingestellt zu haben. Ab OBS Version 003917 sind die betroffenen Module in der Neuen Version verfügbar}}

=Serverumzug=
Falls Sie OBS schon im Einsatz haben und einen neuen OBS-Server beschaffen möchten, ist folgendes zu beachten: 

{{Hinweis|Serverumzüge sind Kostenpflichtig und fallen nicht in die Servicevertrags-Leistungen.}}

Bei einem Serverumzug installieren und konfigurieren wir auf dem neuen Server die MySQL Datenbank und das OBS. Hierbei wird durch OBS und MySQL jeweils ein neuer Dienst in der Windows Diensteverwaltung angelegt.
Die reine Einrichtung und Konfiguration dauert ca. 1 - 2 Stunden. Hinzu kommt die Übertragung der Daten: Es müssen Dumps der Datenbank angefertigt, kopiert und auf dem neuen Server importiert werden. Der OBS-Ordner muss komplett kopiert werden. Wie lange dies insgesamt dauert lässt sich nur schwer einschätzen, da dies von der Menge der Daten, der Geschwindigkeit des alten Servers (Erstellen der Dumps) und der Übertragungsgeschwindigkeit abhängt.

Die beste Konstellation für einen Serverumzug ist, wenn wir zeitlich Zugriff auf den alten und den neuen Server erhalten. Dann können die Daten schon einmal kopiert und alles für den eigentlich Umzug vorbereitet werden. Zum gewünschten Umzugszeitpunkt müssen dann nur noch einmal die geänderten Daten aus dem OBS-Verzeichnis kopiert und die MySQL Dumps importiert werden.
Ein weiterer Vorteil ist, dass so vor dem eigentlichen Umzug OBS schon einmal getestet werden kann.

Wir können den Umzug prinzipiell jederzeit durchführen. Wenn wir dies jedoch außerhalb unserer gewöhnlichen Geschäftszeiten (08:00-16:30) durchführen erheben wir einen Aufschlag von 50% auf die Aufwandskosten.

Vorlage:ZugriffOBS

2022-07-27T11:31:04Z

Wiki-Admin:

<accesscontrol>Programmierer</accesscontrol>

<noinclude>Navigation zwischen den Seiten des Namensraumes für OBS Programmierer (Adminhilfe).</noinclude>

<div style="float:right; clear:both; margin-left:2px; padding:0px; background:#FFFFFF; width:19em">
<div style="border:none;margin-top:0pt;padding:0pt;" id="navigation">
<div style="position:relative;top:-20pt;color:#000000;background:#ffffff; border: 3pt double #cfcfcf; padding: 5pt; margin: 0pt;margin-bottom:-20pt; z-index:1;border-top-right-radius:7pt;-moz-border-radius-topright:7pt;-webkit-border-top-right-radius:7pt;border-bottom-left-radius:7pt;-moz-border-radius-bottomleft:7pt;-webkit-border-bottom-left-radius:7pt;box-shadow: 3px 3px 4px #c0c0c0;-webkit-box-shadow: 3px 3px 4px #c0c0c0;-moz-box-shadow: 3px 3px 4px #c0c0c0;">[[Hauptseite|Wiki]] » [[Admin|Admin-Hilfe]]</div>
</div>
{{Vorlage:Textbox-Rot|1=Admin-Hilfe |2=

{{Vorlage:Klapptext|kopf=FAQ|inhalt=
* [[OBS/Adminhilfe/System Überwachnung|System Überwachung]]
* [[OBS/Adminhilfe/Datenausführungsverhinderung ausschalten|DEP deaktivieren]]
* [[OBS/Adminhilfe/Bildschirmdarstellsung der Listen und Masken unter Windows Vista und Windows 7|Darstellung unter Windows 7]]
* [[OBS/Adminhilfe/Einwahl Windows 2000|Einwahl auf Windows 2000 Server]]
* [[OBS/Preislistenhilfe|Preislisten]]
** [[OBS/Häufig gestellte Fragen/Pflege von Preislisten / Preisgruppen|Preislistenpflege]]
* [[OBS/Adminhilfe/Periodisches Datenbank-Backup mit dem Scheduler|Datenbank Sicherung]]
* [[OBS/Adminhilfe/Anleitung Customize Edit|Customize]]
* [[OBS/Adminhilfe/Zentrallösung|Zentrale]]
* [[OBS/Adminhilfe/MySQL Korrekturen|MySQL Korrekturen]]
* [[OBS/Adminhilfe/Support Macro|Support Macro]]
* [[OBS/Adminhilfe/Service Debug|Service Debug]]
* [[OBS/Adminhilfe/Historienprotokoll|Historienprotokoll (Datenänderung OBS)]]
* [[OBS/Adminhilfe/Fernwartung|Fernwartungsprobleme]]
* [[OBS/Adminhilfe/Startparameter|Startparameter]]
* [[OBS/Adminhilfe/Kassenabschluss_korrigieren|Fehler beim Kassenabschluss]]
* [[OBS/Adminhilfe/Diverses|Diverse Informationen]]
{{vorlage:Klapptext|kopf=FIBU|inhalt=

* [[OBS/Adminhilfe/E-BANKO Löschen|E-BANKO Löschen]]
* [[OBS/Adminhilfe/Buchung offene Posten|Buchungsmöglichkeiten mit offenen Posten]]
}}

{{vorlage:Klapptext|kopf=Häufige Fehler FAQs|inhalt=

* [[OBS/Adminhilfe/Häufige Shop-Fehler|Shop Fehler]]
* [[OBS/Adminhilfe/Häufige OBS-MAIL Fehler|OBS-MAIL Fehler]]
* [[OBS/Adminhilfe/Häufige OBS-FTP Fehler|OBS-FTP Fehler]]
* [[OBS/Adminhilfe/Häufige Service Fehler|Service Fehler]]
* [[OBS/Adminhilfe/Häufige Druck Fehler|Druck Fehler]]
* [[OBS/Adminhilfe/Häufige FIBU Fehler|FIBU Fehler]]
* [[OBS/Adminhilfe/Häufige Preis-Fehler|Preis-Fehler]]
* [[OBS/Adminhilfe/Häufige MySQL Fehler|MySQL-Fehler]]
}}
}}

{{Vorlage:Klapptext|kopf=Allgemeines|inhalt=
* [[OBS/Adminhilfe/Homeoffice|Home Office Kompendium]]
{{Vorlage:Klapptext|kopf=Tools|inhalt=
* [[OBS/Adminhilfe/Tools|Auflistung verschiedener Tools]]
* [[OBS/Adminhilfe/Demo Builder|Videos mit Demo Builder]]
* [[OBS/Adminhilfe/Autohotkey|Autohotkey]]
* [[OBS/Adminhilfe/Open Broadcaster Software|Videos mit Open Broadcaster Software]]
* [[OBS/Adminhilfe/OBS-Monitor|OBS-Monitor]]
}}
* [[OBS/Adminhilfe/Kassendruck für Terminalserverbetrieb einrichten|Kassendruck für Terminalserverbetrieb einrichten]]
* [[OBS/Adminhilfe/KundenSysInfo|KundenSysInfo]]
* [[OBS/Adminhilfe/OBS Updates und deren Ablauf|OBS Update]]
* [[OBS/Adminhilfe/OBS Update(alt)|OBS Update(alt)]]
* [[OBS/Adminhilfe/OBS Versionshistorie|OBS Versionshistorie]]
* [[OBS/Adminhilfe/Flex Archiv Kontrolle|Flex Archiv Kontrolle]]
* [[OBS/Adminhilfe/RTF|RTF-Umstellung]]
* [[OBS/Adminhilfe/Druckumstellung| Druckumstellung]]
* [[OBS/Adminhilfe/PDF-Generierung| PDF-Generierung]]
* [[OBS/Adminhilfe/SupportBerrechnung|Support Berechnen]]
* [[OBS/Adminhilfe/OBS Kosten|OBS Kosten und Berechnung]]
* [[OBS/Adminhilfe/OBS-Hilfetexte erstellen|OBS-Hilfetexte erstellen]]
* [[OBS/Adminhilfe/Batch-Befehle|Nützliche Batch-Befehle (CMD)]]
{{Vorlage:Klapptext|kopf=Widgets|inhalt=
*[[OBS/Adminhilfe/ OBS Logs/Protokolle| OBS Logs/Protokolle]]
*[[OBS/Adminhilfe/ MySQL Process Liste| MySQL Process Liste]]
*[[OBS/Adminhilfe/ Ticketsystem| Ticketsystem]]
}}
}}

{{vorlage:Klapptext|kopf=Wiki Hilfe|inhalt=
{{vorlage:Klapptext|kopf=Syntax|inhalt=
* [[OBS/Adminhilfe/SyntaxTabellen|Tabellen]]
* [[OBS/Adminhilfe/SyntaxBilder|Bilder]]
* [[OBS/Adminhilfe/Syntaxbefehle|Häufig Verwendet]]
* [[OBS/Adminhilfe/Artikel: HTML-Befehle für Textformatierung]]
* [[OBS/Adminhilfe/Textverknüpfungen|Textverknüpfungen]]
* [https://www.mediawiki.org/wiki/Extension:Cite/Cite.php/de Einzelnachweise]
}}
* [[OBS/Adminhilfe/Wiki-Seiten erstellen|Wiki-Seiten erstellen]]
* [[OBS/Adminhilfe/Wiki-Suche|Wiki Suche verwenden]]
* [[OBS/Adminhilfe/Wiki-Admin|Wiki-Admin]]
* [[OBS/Adminhilfe/Wiki Benutzer erstellen-bearbeiten|Wiki Benutzer erstellen-bearbeiten]]
{{vorlage:Klapptext|kopf=Wiki-Gruppen Benutzerlisten|inhalt=
* [[Administrator|Administrator]]
* [[Programmierer|Programmierer]]
* [[Expert|Expert]]
* [[Bürokraten|Bürokraten]]
* [[IT-Techniker|IT-Techniker]]
* [[Officestar|Officestar]]
}}
* [[OBS/Adminhilfe/veraltete Seiten|Veraltete Seiten]]
* [[OBS/Adminhilfe/Documentation Insight|Documentation Insight]]
* [[:Kategorie:Vorlage:Formatierungshilfe|Formatierungshilfe]]
}}

{{Vorlage:Klapptext|kopf=MySQL|inhalt=
* [[OBS/Adminhilfe/MySQL Tipps|MySQL Tipps]]
* [[OBS/Admihilfe/MySQL Aufgaben|MySQL Aufgaben]]
* [[OBS/Adminhilfe/Join Erläuterungen|MySQL Join Erläuterungen]]
* [[OBS/Admihilfe/Dump|Datenbankdump]]
}}

{{Vorlage:Klapptext|kopf=Programmierung und Mergen|inhalt=
{{Vorlage:Klapptext|kopf=Delphi|inhalt=
{{Vorlage:Klapptext|kopf=Einrichtung|inhalt=
* [[OBS/Adminhilfe/Anleitung zur Neuinstallatin von Borland Delphi 5|Delphiinstallation]]
* [[OBS/Adminhilfe/Delphi 5 Konfiguration|Delphi 5 Konfiguration]]
* [[OBS/Adminhilfe/Delphi 10 Konfiguration|Delphi 10 Konfiguration]]
* [[OBS/Adminhilfe/Vererbung Objectpascal|Vererbung Objectpascal]]
* [[OBS/Adminhilfe/Delphi IMP *.Pas-Dateien|Delphi IMP_*.PAS Dateien]]
* [[OBS/Adminhilfe/Delphi-Virus|Delphi-Virus (W32.Induc.A!dcu)]]
* [[OBS/Adminhilfe/ADOM Update|ADOM Update]]
* [[OBS/Adminhilfe/Allgemeine Fragen und Tipps zu Delphi|Allgemeine Fragen und Tipps zu Delphi]]
* [[OBS/Adminhilfe/Packages|Packages]]
* [[OBS/Adminhilfe/Generics|Generics in Delphi XE8]]
}}
* [[OBS/Adminhilfe/Code-Guideline|Guideline]]
* [[OBS/Adminhilfe/Syntax|Syntax-Regeln]]
* [[OBS/Adminhilfe/DebugTimer|DebugTimer]]
* [[OBS/Adminhilfe/SQLite|Arbeiten mit SQLite]]
* [[OBS/Adminhilfe/Schnittstelle testen|Schnittstelle testen]]
* [[OBS/Adminhilfe/Semaphoren|Semaphoren]]
* [[OBS/Adminhilfe/Threading|Threading]]
* [[OBS/Adminhilfe/MemoryLeak|MemoryLeak Hunt]]
* [[OBS/Adminhilfe/Collections|Collections]]
* [[OBS/Adminhilfe/Pax-Freigabe|Pax-Freigabe]]
{{Vorlage:Klapptext|kopf=MMX|inhalt=
* [[OBS/Adminhilfe/MMX|MMX]]
* [[OBS/Adminhilfe/MMX Einstellungen|Einstellungen]]
* [[OBS/Adminhilfe/MMX Code Explorer|Code Explorer]]
* [[OBS/Adminhilfe/MMX Source Indexer|Source Indexer]]
* [[OBS/Adminhilfe/MMX Navigation and Move|Navigation and Move]]
* [[OBS/Adminhilfe/MMX Text Tools|Text Tools]]
* [[OBS/Adminhilfe/MMX Code Generierung & Refactoring|Code Generierung & Refactoring]]
}}
}}
{{Vorlage:Klapptext|kopf=Shop|inhalt=
}}
{{Vorlage:Klapptext|kopf=Git/SmartGit|inhalt=
* [[OBS/Adminhilfe/Git_Fork/Anleitung|Anleitung]]
}}
{{Vorlage:Klapptext|kopf=Programm Update|inhalt=
* [[OBS/Adminhilfe/OBS Programm Update|Übersicht]]
* [[OBS/Adminhilfe/OBS_Programm_Update/Programm_Ini|Programm.ini]]
{{Vorlage:Klapptext|kopf=Schaltflächen|inhalt=
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source einspielen Main zu User|Source einspielen Main zu User]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source einspielen User zu User|Source einspielen User zu User]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/User Sourcen sichern|User Sourcen sichern]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source Änderungen in den Versionen|Source Änderungen in den Versionen]]
* [[OBS/Adminhilfe/OBS Programm Update/F5 Projekte|F5 - Projekte]]
* [[OBS/Adminhilfe/OBS Programm Update/F6 Protokoll|F6 - Protokoll]]
* [[OBS/Adminhilfe/OBS Programm Update/F7 P-Lösch|F7 - Protokoll Löschen]]
* [[OBS/Adminhilfe/OBS Programm Update/F8 Update|F8 - Update]]
* [[OBS/Adminhilfe/OBS Programm Update/F9 FTP|F9 - FTP]]
{{Vorlage:Klapptext|kopf=F10: Weitere Funktionen|inhalt=
* [[OBS/Adminhilfe/OBS_Programm_Update/F10_Weitere_Funktionen|Übersicht]]
}}
}}
}}
{{Vorlage:Klapptext|kopf=PAX|inhalt=
*[[OBS/Adminhilfe/Pax Konvertierung| Konvertierung]]
*[[OBS/Adminhilfe/Pax Ereignisbehandlung| Ereignisbehandlung]]
*[[OBS/Adminhilfe/Pax SQL-Export| SQL-Export]]
*[[OBS/Adminhilfe/Pax Customize| Customize-Scripte]]
*[[OBS/Adminhilfe/Pax Listenrework| Listenrework]]
{{Vorlage:Klapptext|kopf=Nützliche Funktionen|inhalt=
*[[OBS/Adminhilfe/Pax Barcode Beispiele| Barcodes]]
}}
}}
}}

{{Vorlage:Klapptext|kopf=OBS-Administration / Installation|inhalt=
{{Vorlage:Klapptext|kopf=Einrichtung|inhalt=
{{Vorlage:Klapptext|kopf=MySQL|inhalt=
* [[OBS/Adminhilfe/MySQL Installation|MySQL Installieren]]
* [[OBS/Adminhilfe/MySQL ODBC Treiber|MySQL ODBC Treiber]]
* [[OBS/Adminhilfe/MySQL Upgrade|MySQL Upgrade]]
* [[OBS/Adminhilfe/MySQL Tipps|MySQL Tipps]]
* [[OBS/Adminhilfe/MySQL Datenbankeinstellungen|MySQL Tuning & Einstellungen]]
* [[OBS/Admihilfe/Dump|Datenbankdump]]
* [[Admin/SQL-Benutzer|Admin/SQL-Benutzer]]
}}
{{Vorlage:Klapptext|kopf=OBS|inhalt=
* [[OBS/Adminhilfe/OBS Installation|OBS Installation]]
* [[OBS/Adminhilfe/Artikelpflege Besonderheiten|Artikelpflege Besonderheiten]]
* [[OBS/Adminhilfe/OBS.ini|OBS.ini]]
* [[OBS/Adminhilfe/Serverumzug|Serverumzug]]

}}
{{Vorlage:Klapptext|kopf=Dienste|inhalt=
* [[OBS/Adminhilfe/Dienste auf verschiedenen Servern|Dienste auf verschiedenen Servern]]
* [[OBS/Adminhilfe/Problembehandlung Dienste|Problembehandlung]]
* [[ADMINMAIL | Mail]]
** [[OBS/Adminhilfe/EMAILROU.ini|EMAILROU.ini]]
* [[ADMINFTP | FTP]]
** [[OBS/Adminhilfe/OBS FTP Sync|FTP Synchronisation]]
* [[OBS/Adminhilfe/OBS-FAX-MODUL|Fax]]
* [[OBS/Adminhilfe/OBS-Update|OBS Update]]
* [[OBS/Adminhilfe/Dienste-Start-Parameter|Startparameter für Dienste]]
}}
{{Vorlage:Klapptext|kopf=Kasse/Notfallkasse|inhalt=
* [[Admin/Notfallkasse|Notfallkasse]]
* [[Admin/Notfallkassendrucksystem|Notfallkassendrucksystem]]
* [[Admin/TSEEinrichtung|TSE Einrichtung]]
}}
{{Vorlage:Klapptext|kopf=Replikation|inhalt=
* [[Admin/Replikation/Allgemeine Informationen|Allgemeine Informationen]]
* [[Admin/Replikation/Segel Daten Replikation|Segel Daten Replikation]]
}}
{{Vorlage:Klapptext|kopf=Zentrale|inhalt=
}}
{{Vorlage:Klapptext|kopf=Fleet-Management einrichten|inhalt=
* [[Admin/Einrichtung/FleetManagement|Fleet-Management einrichten]]
}}
{{Vorlage:Klapptext|kopf=VirtualUI|inhalt=
* [[Admin/Einrichtung/VirtualUI|VirtualUI einrichten]]
* [[Admin/Einrichtung/VUIFAQ|VirtualUI Tipps und Probleme]]
}}
}}

{{Vorlage:Klapptext|kopf=OBS Umzug|inhalt=
{{vorlage:Klapptext|kopf=Allgemein|inhalt=
}}
{{vorlage:Klapptext|kopf=Bergau|inhalt=
* [[OBS/Adminhilfe/OBS Umzug/Bergau/Besonderheiten|Besonderheiten]]
}}
}}

{{Vorlage:Klapptext|kopf=Admin Funktionen|inhalt=
{{vorlage:Klapptext|kopf=Service Firmen|inhalt=
* [[OBS/Adminhilfe/Service Firmen/Liste|Service Firmen Liste]]
** [[OBS/Adminhilfe/Service Firmen/Liste/F6 Einwahl|F6 Einwahl]]
{{vorlage:Klapptext|kopf=F10|inhalt=
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/A ras.pbk|A ras.pbk]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/B Command Line Interpreter|B Command Line Interpreter]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/C File Zilla Benutzer XML erzeugen|C File Zilla Benutzer XML erzeugen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/D1 OBS_UPDATE.EXE zum OBS Update Server hochladen|D1 OBS_UPDATE.EXE zum OBS Update Server hochladen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/D2 SUPPORT_MACRO zum OBS Update Server hochladen|D2 SUPPORT_MACRO zum OBS Update Server hochladen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/H1 Remote Service Protokoll-Übersicht (Alles)|H1 Remote Service Protokoll-Übersicht (Alles)]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/H Remote Service Protokoll-Übersicht|H Remote ServiceProtokoll-Übersicht]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/I Remote Service Commands|I Remote Service Commands]]
** [[OBS/Adminhilfe/Service Firmen/Liste/F10/I Remote Service Commands/Eingabemaske|Eingabemaske]]
** [[OBS/Adminhilfe/Service_Firmen/Weitere/Multi_Service_Kommando|Multi-Kommando]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/I1 (Admin) Globaler Hinweis für Updates|I1 (Admin) Globaler Hinweis für Updates]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/J Liste der OBS Updates|J Liste der OBS Updates]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/K Angemeldete Service Firmen|K Angemeldete Service Firmen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/L Systeminformationen einlesen|L Systeminformationen einlesen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/M Kundendaten anzeigen|M Kundendaten anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/M1 Kundendatenbankinformationen anzeigen|M1 Kundendatenbankinformationen anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/N Kundendaten einlesen|N Kundendaten einlesen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/O Kunden-Update Informationen anzeigen|O Kunden-Update Informationen anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/P Modul Registrierung OBS|P Modul Registrierung OBS]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/Q App Verwaltung|Q App Verwaltung]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/S1 Firmen Statistik Protokolle OBS|S1 Firmen Statistik Protokolle OBS]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/S2 Statistik Notfallkassen|S2 Statistik Notfallkassen]]
}}
* [[OBS/Adminhilfe/Service Firmen/Eingabemaske|Service Firmen Eingabemaske]]
* [[OBS/Adminhilfe/Service Firmen/Remotecon|Remotecon]]
}}

{{vorlage:Klapptext|kopf=O Support|inhalt=
* [[OBS/Adminhilfe/Support/Interne Tools/A Update-Programme|A Update Programme]]
* [[OBS/Adminhilfe/Support/Interne Tools/B Datenbankoperationen|B Datenbankoperationen]]
* [[OBS/Adminhilfe/Support/Interne Tools/C Tools|C Tools]]
{{vorlage:Klapptext|kopf=D Programmierer-Tools|inhalt=
* [[OBS/Adminhilfe/Programmierer_Tools/N_Datenbank_verfremden|Datenbank verfremden]]
{{vorlage:Klapptext|kopf=V Crypt Autologin Edit|inhalt=
* [[OBS/Adminhilfe/Programmierer_Tools/Zugang.ini|Zugang.ini]]
}}
}}
* [[OBS/Adminhilfe/Support/Interne Tools/E Interne Sonderprogramme|E Interne Sonderprogramme]]
* [[OBS/Adminhilfe/Support/Interne Tools/G Service Tools|G Service Tools]]
* [[OBS/Adminhilfe/Support/Interne Tools/H Script-Tools|H Script-Tools]]
* [[OBS/Adminhilfe/Support/Interne Tools/I Flex Archive|I Flex Archive]]
{{vorlage:Klapptext|kopf=J Update Marko Lib/Pmode/Script Lib|inhalt=
* [[OBS/Adminhilfe/MacroLibary|A Macro Library]]
* [[OBS/Adminhilfe/ScriptLibrary|C Script Library]]

}}
}}
}}
{{Vorlage:Klapptext|kopf=kundenspezifische Anpassungen|inhalt=
* [[OBS/Adminhilfe/OBSAdministration/kundenspez_Anpassungen/UserDB_sys|UserDB.sys]]
}}
{{Vorlage:Klapptext|kopf=OBS Protokolle|inhalt=
* [[OBS/Adminhilfe/OBSAdministration/Protokolle/HistorieProto|HistorieProto]]
}}
{{Vorlage:Klapptext|kopf=OBS DEMO|inhalt=
* [[OBS/Adminhilfe/DEMO/OBS-DEMO|OBS-Demo Allgemeines]]
}}
}}

{{Vorlage:Klapptext|kopf=Shop-Administration|inhalt=
* [[Admin/Shop|Shop Übersicht Voraussetzungen und Einrichtung]]
{{Vorlage:Klapptext|kopf=modified eCommerce 2.x|inhalt=
* [[Admin/ModifiedECommerce2/FAQ|FAQ]]
* [[Admin/ModifiedECommerce2/Installation|Installation]]
}}
{{Vorlage:Klapptext|kopf=modified eCommerce 1.06|inhalt=
* [[Admin/ModifiedECommerce|Shop modified eCommerce]]
}}
{{Vorlage:Klapptext|kopf=Amazon|inhalt=
* [[Admin/Amazon|Schnittstelle Amazon]]
}}
{{Vorlage:Klapptext|kopf=VShop 4.0|inhalt=
* [[Admin/VShop|Shop VShop]]
}}
}}

{{Vorlage:Klapptext|kopf=Kundeninformationen|inhalt=
{{Vorlage:Klapptext|kopf=OfficeStar|inhalt=
* [[Admin/OfficeStar/Allgemeine Informationen|Allgemeine Informationen]]
* [[Admin/OfficeStar/Hinweiszeiten|Hinweiszeiten]]
}}
{{Vorlage:Klapptext|kopf=MDS|inhalt=
* [[Admin/MDS/Skrip-Automatische Ablage von Dokumenten|Skrip-Automatische Ablage von Dokumenten]]
}}
}}


}}
</div>

<noinclude>
----
</noinclude>

<noinclude>

Diese Vorlage fügt die Zugriffsberechtigung für Techniker zu.
Gäste bzw. nicht angemeldete Benutzer dürfen diese Seite dann nicht mehr sehen!

Folgender Code muss in die jeweils gewünschte Seite hinzugefügt werden:
<nowiki>{{ZugriffOBS}}</nowiki>
[[Kategorie:Templates]]
</noinclude>
[[Kategorie:OBS]]

Vorlage:ZugriffOBS

2022-07-27T11:10:17Z

Wiki-Admin:

<accesscontrol>Programmierer</accesscontrol>

<noinclude>Navigation zwischen den Seiten des Namensraumes für OBS Programmierer (Adminhilfe).</noinclude>

<div style="float:right; clear:both; margin-left:2px; padding:0px; background:#FFFFFF; width:19em">
<div style="border:none;margin-top:0pt;padding:0pt;" id="navigation">
<div style="position:relative;top:-20pt;color:#000000;background:#ffffff; border: 3pt double #cfcfcf; padding: 5pt; margin: 0pt;margin-bottom:-20pt; z-index:1;border-top-right-radius:7pt;-moz-border-radius-topright:7pt;-webkit-border-top-right-radius:7pt;border-bottom-left-radius:7pt;-moz-border-radius-bottomleft:7pt;-webkit-border-bottom-left-radius:7pt;box-shadow: 3px 3px 4px #c0c0c0;-webkit-box-shadow: 3px 3px 4px #c0c0c0;-moz-box-shadow: 3px 3px 4px #c0c0c0;">[[Hauptseite|Wiki]] » [[Admin|Admin-Hilfe]]</div>
</div>
{{Vorlage:Textbox-Rot|1=Admin-Hilfe |2=

{{Vorlage:Klapptext|kopf=FAQ|inhalt=
* [[OBS/Adminhilfe/System Überwachnung|System Überwachung]]
* [[OBS/Adminhilfe/Datenausführungsverhinderung ausschalten|DEP deaktivieren]]
* [[OBS/Adminhilfe/Bildschirmdarstellsung der Listen und Masken unter Windows Vista und Windows 7|Darstellung unter Windows 7]]
* [[OBS/Adminhilfe/Einwahl Windows 2000|Einwahl auf Windows 2000 Server]]
* [[OBS/Preislistenhilfe|Preislisten]]
** [[OBS/Häufig gestellte Fragen/Pflege von Preislisten / Preisgruppen|Preislistenpflege]]
* [[OBS/Adminhilfe/Periodisches Datenbank-Backup mit dem Scheduler|Datenbank Sicherung]]
* [[OBS/Adminhilfe/Anleitung Customize Edit|Customize]]
* [[OBS/Adminhilfe/Zentrallösung|Zentrale]]
* [[OBS/Adminhilfe/MySQL Korrekturen|MySQL Korrekturen]]
* [[OBS/Adminhilfe/Support Macro|Support Macro]]
* [[OBS/Adminhilfe/Service Debug|Service Debug]]
* [[OBS/Adminhilfe/Historienprotokoll|Historienprotokoll (Datenänderung OBS)]]
* [[OBS/Adminhilfe/Fernwartung|Fernwartungsprobleme]]
* [[OBS/Adminhilfe/Startparameter|Startparameter]]
* [[OBS/Adminhilfe/Kassenabschluss_korrigieren|Fehler beim Kassenabschluss]]
* [[OBS/Adminhilfe/Diverses|Diverse Informationen]]
{{vorlage:Klapptext|kopf=FIBU|inhalt=

* [[OBS/Adminhilfe/E-BANKO Löschen|E-BANKO Löschen]]
* [[OBS/Adminhilfe/Buchung offene Posten|Buchungsmöglichkeiten mit offenen Posten]]
}}

{{vorlage:Klapptext|kopf=Häufige Fehler FAQs|inhalt=

* [[OBS/Adminhilfe/Häufige Shop-Fehler|Shop Fehler]]
* [[OBS/Adminhilfe/Häufige OBS-MAIL Fehler|OBS-MAIL Fehler]]
* [[OBS/Adminhilfe/Häufige OBS-FTP Fehler|OBS-FTP Fehler]]
* [[OBS/Adminhilfe/Häufige Service Fehler|Service Fehler]]
* [[OBS/Adminhilfe/Häufige Druck Fehler|Druck Fehler]]
* [[OBS/Adminhilfe/Häufige FIBU Fehler|FIBU Fehler]]
* [[OBS/Adminhilfe/Häufige Preis-Fehler|Preis-Fehler]]
* [[OBS/Adminhilfe/Häufige MySQL Fehler|MySQL-Fehler]]
}}
}}

{{Vorlage:Klapptext|kopf=Allgemeines|inhalt=
* [[OBS/Adminhilfe/Homeoffice|Home Office Kompendium]]
{{Vorlage:Klapptext|kopf=Tools|inhalt=
* [[OBS/Adminhilfe/Tools|Auflistung verschiedener Tools]]
* [[OBS/Adminhilfe/Demo Builder|Videos mit Demo Builder]]
* [[OBS/Adminhilfe/Autohotkey|Autohotkey]]
* [[OBS/Adminhilfe/Open Broadcaster Software|Videos mit Open Broadcaster Software]]
* [[OBS/Adminhilfe/OBS-Monitor|OBS-Monitor]]
}}
* [[OBS/Adminhilfe/Kassendruck für Terminalserverbetrieb einrichten|Kassendruck für Terminalserverbetrieb einrichten]]
* [[OBS/Adminhilfe/KundenSysInfo|KundenSysInfo]]
* [[OBS/Adminhilfe/OBS Updates und deren Ablauf|OBS Update]]
* [[OBS/Adminhilfe/OBS Update(alt)|OBS Update(alt)]]
* [[OBS/Adminhilfe/OBS Versionshistorie|OBS Versionshistorie]]
* [[OBS/Adminhilfe/Flex Archiv Kontrolle|Flex Archiv Kontrolle]]
* [[OBS/Adminhilfe/RTF|RTF-Umstellung]]
* [[OBS/Adminhilfe/Druckumstellung| Druckumstellung]]
* [[OBS/Adminhilfe/PDF-Generierung| PDF-Generierung]]
* [[OBS/Adminhilfe/SupportBerrechnung|Support Berechnen]]
* [[OBS/Adminhilfe/OBS Kosten|OBS Kosten und Berechnung]]
* [[OBS/Adminhilfe/OBS-Hilfetexte erstellen|OBS-Hilfetexte erstellen]]
* [[OBS/Adminhilfe/Batch-Befehle|Nützliche Batch-Befehle (CMD)]]
{{Vorlage:Klapptext|kopf=Widgets|inhalt=
*[[OBS/Adminhilfe/ OBS Logs/Protokolle| OBS Logs/Protokolle]]
*[[OBS/Adminhilfe/ MySQL Process Liste| MySQL Process Liste]]
*[[OBS/Adminhilfe/ Ticketsystem| Ticketsystem]]
}}
}}

{{vorlage:Klapptext|kopf=Wiki Hilfe|inhalt=
{{vorlage:Klapptext|kopf=Syntax|inhalt=
* [[OBS/Adminhilfe/SyntaxTabellen|Tabellen]]
* [[OBS/Adminhilfe/SyntaxBilder|Bilder]]
* [[OBS/Adminhilfe/Syntaxbefehle|Häufig Verwendet]]
* [[OBS/Adminhilfe/Artikel: HTML-Befehle für Textformatierung]]
* [[OBS/Adminhilfe/Textverknüpfungen|Textverknüpfungen]]
* [https://www.mediawiki.org/wiki/Extension:Cite/Cite.php/de Einzelnachweise]
}}
* [[OBS/Adminhilfe/Wiki-Seiten erstellen|Wiki-Seiten erstellen]]
* [[OBS/Adminhilfe/Wiki-Suche|Wiki Suche verwenden]]
* [[OBS/Adminhilfe/Wiki-Admin|Wiki-Admin]]
* [[OBS/Adminhilfe/Wiki Benutzer erstellen-bearbeiten|Wiki Benutzer erstellen-bearbeiten]]
{{vorlage:Klapptext|kopf=Wiki-Gruppen Benutzerlisten|inhalt=
* [[Administrator|Administrator]]
* [[Programmierer|Programmierer]]
* [[Expert|Expert]]
* [[Bürokraten|Bürokraten]]
* [[IT-Techniker|IT-Techniker]]
* [[Officestar|Officestar]]
}}
* [[OBS/Adminhilfe/veraltete Seiten|Veraltete Seiten]]
* [[OBS/Adminhilfe/Documentation Insight|Documentation Insight]]
* [[:Kategorie:Vorlage:Formatierungshilfe|Formatierungshilfe]]
}}

{{Vorlage:Klapptext|kopf=MySQL|inhalt=
* [[OBS/Adminhilfe/MySQL Tipps|MySQL Tipps]]
* [[OBS/Admihilfe/MySQL Aufgaben|MySQL Aufgaben]]
* [[OBS/Adminhilfe/Join Erläuterungen|MySQL Join Erläuterungen]]
* [[OBS/Admihilfe/Dump|Datenbankdump]]
}}

{{Vorlage:Klapptext|kopf=Programmierung und Mergen|inhalt=
{{Vorlage:Klapptext|kopf=Delphi|inhalt=
{{Vorlage:Klapptext|kopf=Einrichtung|inhalt=
* [[OBS/Adminhilfe/Anleitung zur Neuinstallatin von Borland Delphi 5|Delphiinstallation]]
* [[OBS/Adminhilfe/Delphi 5 Konfiguration|Delphi 5 Konfiguration]]
* [[OBS/Adminhilfe/Delphi 10 Konfiguration|Delphi 10 Konfiguration]]
* [[OBS/Adminhilfe/Vererbung Objectpascal|Vererbung Objectpascal]]
* [[OBS/Adminhilfe/Delphi IMP *.Pas-Dateien|Delphi IMP_*.PAS Dateien]]
* [[OBS/Adminhilfe/Delphi-Virus|Delphi-Virus (W32.Induc.A!dcu)]]
* [[OBS/Adminhilfe/ADOM Update|ADOM Update]]
* [[OBS/Adminhilfe/Allgemeine Fragen und Tipps zu Delphi|Allgemeine Fragen und Tipps zu Delphi]]
* [[OBS/Adminhilfe/Packages|Packages]]
* [[OBS/Adminhilfe/Generics|Generics in Delphi XE8]]
}}
* [[OBS/Adminhilfe/Code-Guideline|Guideline]]
* [[OBS/Adminhilfe/Syntax|Syntax-Regeln]]
* [[OBS/Adminhilfe/DebugTimer|DebugTimer]]
* [[OBS/Adminhilfe/SQLite|Arbeiten mit SQLite]]
* [[OBS/Adminhilfe/Schnittstelle testen|Schnittstelle testen]]
* [[OBS/Adminhilfe/Semaphoren|Semaphoren]]
* [[OBS/Adminhilfe/Threading|Threading]]
* [[OBS/Adminhilfe/MemoryLeak|MemoryLeak Hunt]]
* [[OBS/Adminhilfe/Collections|Collections]]
* [[OBS/Adminhilfe/Pax-Freigabe|Pax-Freigabe]]
{{Vorlage:Klapptext|kopf=MMX|inhalt=
* [[OBS/Adminhilfe/MMX|MMX]]
* [[OBS/Adminhilfe/MMX Einstellungen|Einstellungen]]
* [[OBS/Adminhilfe/MMX Code Explorer|Code Explorer]]
* [[OBS/Adminhilfe/MMX Source Indexer|Source Indexer]]
* [[OBS/Adminhilfe/MMX Navigation and Move|Navigation and Move]]
* [[OBS/Adminhilfe/MMX Text Tools|Text Tools]]
* [[OBS/Adminhilfe/MMX Code Generierung & Refactoring|Code Generierung & Refactoring]]
}}
}}
{{Vorlage:Klapptext|kopf=Shop|inhalt=
}}
{{Vorlage:Klapptext|kopf=Git/SmartGit|inhalt=
* [[OBS/Adminhilfe/Git_Fork/Anleitung|Anleitung]]
}}
{{Vorlage:Klapptext|kopf=Programm Update|inhalt=
* [[OBS/Adminhilfe/OBS Programm Update|Übersicht]]
* [[OBS/Adminhilfe/OBS_Programm_Update/Programm_Ini|Programm.ini]]
{{Vorlage:Klapptext|kopf=Schaltflächen|inhalt=
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source einspielen Main zu User|Source einspielen Main zu User]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source einspielen User zu User|Source einspielen User zu User]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/User Sourcen sichern|User Sourcen sichern]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source Änderungen in den Versionen|Source Änderungen in den Versionen]]
* [[OBS/Adminhilfe/OBS Programm Update/F5 Projekte|F5 - Projekte]]
* [[OBS/Adminhilfe/OBS Programm Update/F6 Protokoll|F6 - Protokoll]]
* [[OBS/Adminhilfe/OBS Programm Update/F7 P-Lösch|F7 - Protokoll Löschen]]
* [[OBS/Adminhilfe/OBS Programm Update/F8 Update|F8 - Update]]
* [[OBS/Adminhilfe/OBS Programm Update/F9 FTP|F9 - FTP]]
{{Vorlage:Klapptext|kopf=F10: Weitere Funktionen|inhalt=
* [[OBS/Adminhilfe/OBS_Programm_Update/F10_Weitere_Funktionen|Übersicht]]
}}
}}
}}
{{Vorlage:Klapptext|kopf=PAX|inhalt=
*[[OBS/Adminhilfe/Pax Konvertierung| Konvertierung]]
*[[OBS/Adminhilfe/Pax Ereignisbehandlung| Ereignisbehandlung]]
*[[OBS/Adminhilfe/Pax SQL-Export| SQL-Export]]
*[[OBS/Adminhilfe/Pax Customize| Customize-Scripte]]
*[[OBS/Adminhilfe/Pax Listenrework| Listenrework]]
{{Vorlage:Klapptext|kopf=Nützliche Funktionen|inhalt=
*[[OBS/Adminhilfe/Pax Barcode Beispiele| Barcodes]]
}}
}}
}}

{{Vorlage:Klapptext|kopf=OBS-Administration / Installation|inhalt=
{{Vorlage:Klapptext|kopf=Einrichtung|inhalt=
{{Vorlage:Klapptext|kopf=MySQL|inhalt=
* [[OBS/Adminhilfe/MySQL Installation|MySQL Installieren]]
* [[OBS/Adminhilfe/MySQL ODBC Treiber|MySQL ODBC Treiber]]
* [[OBS/Adminhilfe/MySQL Upgrade|MySQL Upgrade]]
* [[OBS/Adminhilfe/MySQL Tipps|MySQL Tipps]]
* [[OBS/Adminhilfe/MySQL Datenbankeinstellungen|MySQL Tuning & Einstellungen]]
* [[OBS/Admihilfe/Dump|Datenbankdump]]
* [[Admin/SQL-Benutzer|Admin/SQL-Benutzer]]
}}
{{Vorlage:Klapptext|kopf=OBS|inhalt=
* [[OBS/Adminhilfe/OBS Installation|OBS Installation]]
* [[OBS/Adminhilfe/Artikelpflege Besonderheiten|Artikelpflege Besonderheiten]]
* [[OBS/Adminhilfe/OBS.ini|OBS.ini]]
* [[OBS/Adminhilfe/Serverumzug|Serverumzug]]

}}
{{Vorlage:Klapptext|kopf=Dienste|inhalt=
* [[OBS/Adminhilfe/Dienste auf verschiedenen Servern|Dienste auf verschiedenen Servern]]
* [[OBS/Adminhilfe/Problembehandlung Dienste|Problembehandlung]]
* [[ADMINMAIL | Mail]]
** [[OBS/Adminhilfe/EMAILROU.ini|EMAILROU.ini]]
* [[ADMINFTP | FTP]]
** [[OBS/Adminhilfe/OBS FTP Sync|FTP Synchronisation]]
* [[OBS/Adminhilfe/OBS-FAX-MODUL|Fax]]
* [[OBS/Adminhilfe/OBS-Update|OBS Update]]
* [[OBS/Adminhilfe/Dienste-Start-Parameter|Startparameter für Dienste]]
}}
{{Vorlage:Klapptext|kopf=Kasse/Notfallkasse|inhalt=
* [[Admin/Notfallkasse|Notfallkasse]]
* [[Admin/Notfallkassendrucksystem|Notfallkassendrucksystem]]
* [[Admin/TSEEinrichtung|TSE Einrichtung]]
}}
{{Vorlage:Klapptext|kopf=Replikation|inhalt=
* [[Admin/Replikation/Allgemeine Informationen|Allgemeine Informationen]]
* [[Admin/Replikation/Segel Daten Replikation|Segel Daten Replikation]]
}}
{{Vorlage:Klapptext|kopf=Zentrale|inhalt=
}}
{{Vorlage:Klapptext|kopf=Fleet-Management einrichten|inhalt=
* [[Admin/Einrichtung/FleetManagement|Fleet-Management einrichten]]
}}
{{Vorlage:Klapptext|kopf=VirtualUI|inhalt=
* [[Admin/Einrichtung/VirtualUI|VirtualUI einrichten]]
* [[Admin/Einrichtung/VUIFAQ|VirtualUI Tipps und Probleme]]
}}
}}

{{Vorlage:Klapptext|kopf=OBS Umzug|inhalt=
{{vorlage:Klapptext|kopf=Allgemein|inhalt=
}}
{{vorlage:Klapptext|kopf=Bergau|inhalt=
}}
}}

{{Vorlage:Klapptext|kopf=Admin Funktionen|inhalt=
{{vorlage:Klapptext|kopf=Service Firmen|inhalt=
* [[OBS/Adminhilfe/Service Firmen/Liste|Service Firmen Liste]]
** [[OBS/Adminhilfe/Service Firmen/Liste/F6 Einwahl|F6 Einwahl]]
{{vorlage:Klapptext|kopf=F10|inhalt=
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/A ras.pbk|A ras.pbk]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/B Command Line Interpreter|B Command Line Interpreter]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/C File Zilla Benutzer XML erzeugen|C File Zilla Benutzer XML erzeugen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/D1 OBS_UPDATE.EXE zum OBS Update Server hochladen|D1 OBS_UPDATE.EXE zum OBS Update Server hochladen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/D2 SUPPORT_MACRO zum OBS Update Server hochladen|D2 SUPPORT_MACRO zum OBS Update Server hochladen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/H1 Remote Service Protokoll-Übersicht (Alles)|H1 Remote Service Protokoll-Übersicht (Alles)]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/H Remote Service Protokoll-Übersicht|H Remote ServiceProtokoll-Übersicht]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/I Remote Service Commands|I Remote Service Commands]]
** [[OBS/Adminhilfe/Service Firmen/Liste/F10/I Remote Service Commands/Eingabemaske|Eingabemaske]]
** [[OBS/Adminhilfe/Service_Firmen/Weitere/Multi_Service_Kommando|Multi-Kommando]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/I1 (Admin) Globaler Hinweis für Updates|I1 (Admin) Globaler Hinweis für Updates]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/J Liste der OBS Updates|J Liste der OBS Updates]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/K Angemeldete Service Firmen|K Angemeldete Service Firmen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/L Systeminformationen einlesen|L Systeminformationen einlesen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/M Kundendaten anzeigen|M Kundendaten anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/M1 Kundendatenbankinformationen anzeigen|M1 Kundendatenbankinformationen anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/N Kundendaten einlesen|N Kundendaten einlesen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/O Kunden-Update Informationen anzeigen|O Kunden-Update Informationen anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/P Modul Registrierung OBS|P Modul Registrierung OBS]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/Q App Verwaltung|Q App Verwaltung]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/S1 Firmen Statistik Protokolle OBS|S1 Firmen Statistik Protokolle OBS]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/S2 Statistik Notfallkassen|S2 Statistik Notfallkassen]]
}}
* [[OBS/Adminhilfe/Service Firmen/Eingabemaske|Service Firmen Eingabemaske]]
* [[OBS/Adminhilfe/Service Firmen/Remotecon|Remotecon]]
}}

{{vorlage:Klapptext|kopf=O Support|inhalt=
* [[OBS/Adminhilfe/Support/Interne Tools/A Update-Programme|A Update Programme]]
* [[OBS/Adminhilfe/Support/Interne Tools/B Datenbankoperationen|B Datenbankoperationen]]
* [[OBS/Adminhilfe/Support/Interne Tools/C Tools|C Tools]]
{{vorlage:Klapptext|kopf=D Programmierer-Tools|inhalt=
* [[OBS/Adminhilfe/Programmierer_Tools/N_Datenbank_verfremden|Datenbank verfremden]]
{{vorlage:Klapptext|kopf=V Crypt Autologin Edit|inhalt=
* [[OBS/Adminhilfe/Programmierer_Tools/Zugang.ini|Zugang.ini]]
}}
}}
* [[OBS/Adminhilfe/Support/Interne Tools/E Interne Sonderprogramme|E Interne Sonderprogramme]]
* [[OBS/Adminhilfe/Support/Interne Tools/G Service Tools|G Service Tools]]
* [[OBS/Adminhilfe/Support/Interne Tools/H Script-Tools|H Script-Tools]]
* [[OBS/Adminhilfe/Support/Interne Tools/I Flex Archive|I Flex Archive]]
{{vorlage:Klapptext|kopf=J Update Marko Lib/Pmode/Script Lib|inhalt=
* [[OBS/Adminhilfe/MacroLibary|A Macro Library]]
* [[OBS/Adminhilfe/ScriptLibrary|C Script Library]]

}}
}}
}}
{{Vorlage:Klapptext|kopf=kundenspezifische Anpassungen|inhalt=
* [[OBS/Adminhilfe/OBSAdministration/kundenspez_Anpassungen/UserDB_sys|UserDB.sys]]
}}
{{Vorlage:Klapptext|kopf=OBS Protokolle|inhalt=
* [[OBS/Adminhilfe/OBSAdministration/Protokolle/HistorieProto|HistorieProto]]
}}
{{Vorlage:Klapptext|kopf=OBS DEMO|inhalt=
* [[OBS/Adminhilfe/DEMO/OBS-DEMO|OBS-Demo Allgemeines]]
}}
}}

{{Vorlage:Klapptext|kopf=Shop-Administration|inhalt=
* [[Admin/Shop|Shop Übersicht Voraussetzungen und Einrichtung]]
{{Vorlage:Klapptext|kopf=modified eCommerce 2.x|inhalt=
* [[Admin/ModifiedECommerce2/FAQ|FAQ]]
* [[Admin/ModifiedECommerce2/Installation|Installation]]
}}
{{Vorlage:Klapptext|kopf=modified eCommerce 1.06|inhalt=
* [[Admin/ModifiedECommerce|Shop modified eCommerce]]
}}
{{Vorlage:Klapptext|kopf=Amazon|inhalt=
* [[Admin/Amazon|Schnittstelle Amazon]]
}}
{{Vorlage:Klapptext|kopf=VShop 4.0|inhalt=
* [[Admin/VShop|Shop VShop]]
}}
}}

{{Vorlage:Klapptext|kopf=Kundeninformationen|inhalt=
{{Vorlage:Klapptext|kopf=OfficeStar|inhalt=
* [[Admin/OfficeStar/Allgemeine Informationen|Allgemeine Informationen]]
* [[Admin/OfficeStar/Hinweiszeiten|Hinweiszeiten]]
}}
{{Vorlage:Klapptext|kopf=MDS|inhalt=
* [[Admin/MDS/Skrip-Automatische Ablage von Dokumenten|Skrip-Automatische Ablage von Dokumenten]]
}}
}}


}}
</div>

<noinclude>
----
</noinclude>

<noinclude>

Diese Vorlage fügt die Zugriffsberechtigung für Techniker zu.
Gäste bzw. nicht angemeldete Benutzer dürfen diese Seite dann nicht mehr sehen!

Folgender Code muss in die jeweils gewünschte Seite hinzugefügt werden:
<nowiki>{{ZugriffOBS}}</nowiki>
[[Kategorie:Templates]]
</noinclude>
[[Kategorie:OBS]]

OBS/Stammdaten/Personen/Weitere Funktionen/B3- Definierte Adressen

2022-07-27T05:57:13Z

Wiki-Admin: /* {{F10}} Weitere Funktionen */

OBS/Stammdaten/Personen/Weitere Funktionen/B3 - Definierte Adressen
{{Vorlage:Stammdaten}}

=Definierte Adressen abgleichen mit dem OBS Personenstamm=
Um vorhandene Personenstammdaten mit Ihrem Kunden/Lieferanten abzugleichen gibt es nun einen Adressen Konfliktmanager. Hier können Adresslisten ihres Lieferanten/Kunden eingespielt werden.
Dies ist notwendig um einen automatischen Austausch der Adressen mit ihrem Kunden/Lieferanten mit Adressdaten zu gewährleisten. Außerdem verringert es Rückläufer bei den Versendern.

Aufruf definierte Adresse unter Personenstamm → F10 → B3 Definierte Adressen 
[[IMAGE:DefinierteAdressen_Liste.png|600px]]

=={{F7}} Konflikt==
Hierüber kann der Konfliktmanager aufgerufen werden. Weitere Informationen hierzu erhalten Sie hier: 
[[OBS/Stammdaten/Personen/Weitere_Funktionen/B3-_Definierte_Adressen#Adressen_Konfliktmanager|Adressen Konfliktmanager]]
=={{F9}} Protokoll==
Hier wird jede Änderung im Konfliktmanager Benutzerbezogen festgehalten 
[[IMAGE:DefinierteAdressen_Log.png|700px]]

=={{F10}} Weitere Funktionen==
Unter {{F10}} finden sie Weitere Funktionen 
[[IMAGE:DefinierteAdressen_Liste_F10.png]]

===A Adressdatei Importieren===
Die zu Importierenden TXT Dateien müssen folgendes Format besitzen:
*Als Feldtrenner muss Chr(9) '''Tab''' verwendet werden
*Als Zeilentrenner muss Chr(13) Chr(10) '''Zeilenumbruch''' werden
*CharSet ist Unicode
*Die Datei muss im Verzeichnis ..\OBS\DATA\DataInOut abgelegt sein.
Felder (Ort | Ortsteil | PLZ | Straße | Haus Nr. | Haus-Nr. Zusastz)
Es werden 1000 Adressen pro Sekunde importiert

===B Adressliste zum Shop hochladen===
Besitzen sie einen Shop der Adressen verwaltet und eine Schnittstelle zu OBS besitzt, können sie diese Adressen zum Shop hochladen.
===C OBS Adressen auf Normalisierung Prüfen===

Eine Normalisiert Adresse muss folgenden Aufbau besitzen:

*Muss eine PLZ besitzen
*Muss einen Ort besitzen
*Kann einen Ortsteil besitzen
*Muss eine Hausnummer besitzen
*Kann einen Zusatz besitzen

'''Beispiele:''' 
{|
|-
|21684 Musterhausen Musterstr. 1 ||(Minimum) 
|-
|21684 Musterhausen (Muster) Musterstr. 1 ||Ortsteil 
|-
|21684 Musterhausen (Ortsteil1/Ortsteil2) Musterstr. 1A || Ortsteil + Zusatz 
|}

'''Regeln:''' 
*Ortsteile müssen immer in Klammern stehen ()
*Die Hausnummer muss mit einem Leerzeichen von der Straße getrennt sein
*Der Zusatz muss direkt nach der Hausnummer folgen
*Eine Hausnummer darf nur aus Zahlen bestehen
*Klammern dürfen nicht im Zusatz und in der Straße benutzt werden

Das Ergebnis finden Sie unter {{F9}} im Protokoll

===D OBS Adressen Normalisieren===

Nach dem oberen Regelwerk werden vorhandene Adressen automatisch Formatiert 

=={{Return}} Ändern==
Einfügen / Ändern von Definierten Adressen 
[[IMAGE:DefinierteAdressen_Maske.png]]
(1) Manuelle Veränderung (Der Datensatz wurde abgeändert oder neu angelegt) 
(2) Letzte Übertragung des Datensatzes zum Shop, wenn vorhanden. 

Jede Änderung wird protokolliert und kann unter F9 eingesehen werden

=Adressen Konfliktmanager=
{{Hinweis|Vorraussetzunge: Konflikt-Personen müssen eine passende Eigenschaft besitzen!}}

Legen sie eine Personenauswertung: 
Mit gewünschtem Ort oder PLZ 
Geben sie allen Personen die Eigenschaft '''9106 Konfliktadresse'''. 
Dieses können sie mehrmals '''wiederholen''' bis sie alle gewünschten Adressen mit der Eigenschaft ausgestattet haben. [[OBS/AUSWERTUNG/Auswertung#F8_Gef.|Auswertung → F8 Gef.]] 

Mit {{F7}} können sie den Konfliktmanager aufrufen 
[[IMAGE:DefinierteAdressen_Konfliktmanager.png]] 
Positionieren sie beide Listen entsprechen und speichern sie „Größe und Position“ der Fenster
Achten sie beim Arbeiten mit dem Konfliktmanager das keine Auswahl in den Auswahlboxen (2) ausgewählt worden sind. Stellen sie unter F4 ihre gewünschte Sortierung ein. Wenn gewünscht können die unter (1 PLZ) mit einem Postleitzahlenbereich ihre Adressen reduzieren.
Schalten sie die Live Suche in den Listen als Priorität ein. Sollten Daten Exportiert werden, schalten sie den XLSX Export für Listen (CTRL-F5) bei ihren Benutzern frei.
Wenn sie Adressen manuell hinzufügt haben, können sie den Adressherausgeber mit der XLSX Datei auf den neusten Stand bringen (Manuelle Adressen werden in der Liste Fett angezeigt)

Benutzen Sie den Live Filter (4) und (3) um Einschränkungen in den Listen zu Erzeugen.

In (5) finden Sie Angaben zur Person
Über die Schnellstart Icons gelangen sie direkt zu der Personenliste der angezeigten Person
(Schnellstart Icons müssen beim Benutzer aktiviert sein!)
==Mögliche Einstellungen Auswahlboxen (1)==
{| class="wikitable"
|-
! Auswahlbox !! Beschreibung
|-
|Konflikte mit Definierten Adressen || In der Liste werden nur Adressen mit Konflikten angezeigt
|-
|Übereinstimmungen || In der Liste werden nur korrekte Adressen angezeigt
|-
|Mögliche Werte || In der Liste Definierte Adressen Konflikte werden links mögliche Adressen angezeigt
|-
|Mit Adressen Synchronisieren || Die Obere Liste wird mit der Adresse Synchronisiert
|-
|Mit Eigenschaft Konfliktadresse || Es werden nur Adressen mit der Eigenschaft Konfliktadresse angezeigt
|-
|Mit HausNr. || Die Hausnummer wird in der Überprüfung mit einbezogen. (Viele Konflikte)
|}

==Synchronisation {{F7}} oder mit der rechten Maustaste==
Rechte Maustaste in Spalte PLZ 
[[IMAGE:DefinierteAdressen_RClick_PLZ.png]]
{| class="wikitable"
|-
! Menüpunkt !! Beschreibung
|-
|PLZ Übernehmen || Die PLZ aus Definierte Adressen wird in den Personenstamm übernommen
|-
|Live Filter löschen || Der Live Filter in der Liste Definierte Adressen wird gelöscht
|}

Rechte Maustaste in Spalte Ort 
[[IMAGE:DefinierteAdressen_RClick_ORT.png]]
{| class="wikitable"
|-
! Menüpunkt !! Beschreibung
|-
|Ort/Ortsteil Übernehmen || Der Ort + Ortsteil aus Definierte Adressen wird in den Personenstamm übernommen
|-
|Live Filter löschen || Der Live Filter in der Liste Definierte Adressen wird gelöscht
|}

Rechte Maustaste in Spalte Straße 
[[IMAGE:DefinierteAdressen_RClick_STRASSE.png]]
{| class="wikitable"
|-
! Menüpunkt !! Beschreibung
|-
|Nur Straße Übernehmen || Nur die Strasse aus Definierte Adressen wird in den Personenstamm übernommen. Die Hausnummer bleibt in der Straße erhalten
|-
|Straße,HausNr,Zusatz Übernehmen || Straße,Hausnummer und Zusatz aus Definierte Adressen wird in den Personenstamm übernommen.
|-
|Live Filter übernehmen || Die Straße ohne Hausnummer wird in den Live Filter Definierte Adressen übernommen
|-
|Live Filter löschen || Der Live Filter in der Liste Definierte Adressen wird gelöscht
|-
|Adresse in Definierte Liste übernehmen || Die komplette Adresse wir in die Liste Definierte Adressen Übernehmen übernommen. Und als manuelle Eingabe gekennzeichnet. Durch die Auswahlbox „Nur Manuelle Adressen anzeigen“ könne in diese in der Liste Definierte Adressen angezeigt werden.
|-
|Eigenschaft keine Definierte Adresse setzen || In der Person wird die Eigenschaft „Keine definierte Adresse“ gesetzt. Diese Adressen werden nicht mehr im Konfliktmanager überprüft/angezeigt.
|-
|Eigenschaft Konfliktadresse löschen || In der Person wird die Eigenschaft „Konfliktadresse“ gelöscht. Diese Adressen werden nicht mehr im Konfliktmanager überprüft/angezeigt.
|}
Rechte Maustaste in Spalte Haus-Nr. 
[[IMAGE:DefinierteAdressen_RClick_STRASSE2.png]]
{| class="wikitable"
|-
! Menüpunkt !! Beschreibung
|-
|Zusatz Übernehmen || Der Zusatz aus Definierte Adressen wird in den Personenstamm übernommen (Straße)
|-
|Live Filter löschen || Der Live Filter in der Liste Definierte Adressen wird gelöscht
|}

OBS/Stammdaten/Personen/Weitere Funktionen/B3- Definierte Adressen

2022-07-27T05:54:56Z

Wiki-Admin: /* {{F10}} Weitere Funktionen */

OBS/Stammdaten/Personen/Weitere Funktionen/B3 - Definierte Adressen
{{Vorlage:Stammdaten}}

=Definierte Adressen abgleichen mit dem OBS Personenstamm=
Um vorhandene Personenstammdaten mit Ihrem Kunden/Lieferanten abzugleichen gibt es nun einen Adressen Konfliktmanager. Hier können Adresslisten ihres Lieferanten/Kunden eingespielt werden.
Dies ist notwendig um einen automatischen Austausch der Adressen mit ihrem Kunden/Lieferanten mit Adressdaten zu gewährleisten. Außerdem verringert es Rückläufer bei den Versendern.

Aufruf definierte Adresse unter Personenstamm → F10 → B3 Definierte Adressen 
[[IMAGE:DefinierteAdressen_Liste.png|600px]]

=={{F7}} Konflikt==
Hierüber kann der Konfliktmanager aufgerufen werden. Weitere Informationen hierzu erhalten Sie hier: 
[[OBS/Stammdaten/Personen/Weitere_Funktionen/B3-_Definierte_Adressen#Adressen_Konfliktmanager|Adressen Konfliktmanager]]
=={{F9}} Protokoll==
Hier wird jede Änderung im Konfliktmanager Benutzerbezogen festgehalten 
[[IMAGE:DefinierteAdressen_Log.png|700px]]

=={{F10}} Weitere Funktionen==
Unter {{F10}} finden sie Weitere Funktionen 
[[IMAGE:DefinierteAdressen_Liste_F10.png]]

===A Adressdatei Importieren===
Die zu Importierenden TXT Dateien müssen folgendes Format besitzen:
*Als Feldtrenner muss Chr(9) '''Tab''' verwendet werden
*Als Zeilentrenner muss Chr(13) Chr(10) '''Zeilenumbruch''' werden
*CharSet ist Unicode
*Die Datei muss im Verzeichnis ..\OBS\DATA\DataInOut abgelegt sein.
Felder (Ort Ortsteil. PLZ Straße Haus Nr. Haus-Nr. Zus)
Es werden 1000 Adressen pro Sekunde importiert

===B Adressliste zum Shop hochladen===
Besitzen sie einen Shop der Adressen verwaltet und eine Schnittstelle zu OBS besitzt, können sie diese Adressen zum Shop hochladen.
===C OBS Adressen auf Normalisierung Prüfen===

Eine Normalisiert Adresse muss folgenden Aufbau besitzen:

*Muss eine PLZ besitzen
*Muss einen Ort besitzen
*Kann einen Ortsteil besitzen
*Muss eine Hausnummer besitzen
*Kann einen Zusatz besitzen

'''Beispiele:''' 
{|
|-
|21684 Musterhausen Musterstr. 1 ||(Minimum) 
|-
|21684 Musterhausen (Muster) Musterstr. 1 ||Ortsteil 
|-
|21684 Musterhausen (Ortsteil1/Ortsteil2) Musterstr. 1A || Ortsteil + Zusatz 
|}

'''Regeln:''' 
*Ortsteile müssen immer in Klammern stehen ()
*Die Hausnummer muss mit einem Leerzeichen von der Straße getrennt sein
*Der Zusatz muss direkt nach der Hausnummer folgen
*Eine Hausnummer darf nur aus Zahlen bestehen
*Klammern dürfen nicht im Zusatz und in der Straße benutzt werden

Das Ergebnis finden Sie unter {{F9}} im Protokoll

===D OBS Adressen Normalisieren===

Nach dem oberen Regelwerk werden vorhandene Adressen automatisch Formatiert 

=={{Return}} Ändern==
Einfügen / Ändern von Definierten Adressen 
[[IMAGE:DefinierteAdressen_Maske.png]]
(1) Manuelle Veränderung (Der Datensatz wurde abgeändert oder neu angelegt) 
(2) Letzte Übertragung des Datensatzes zum Shop, wenn vorhanden. 

Jede Änderung wird protokolliert und kann unter F9 eingesehen werden

=Adressen Konfliktmanager=
{{Hinweis|Vorraussetzunge: Konflikt-Personen müssen eine passende Eigenschaft besitzen!}}

Legen sie eine Personenauswertung: 
Mit gewünschtem Ort oder PLZ 
Geben sie allen Personen die Eigenschaft '''9106 Konfliktadresse'''. 
Dieses können sie mehrmals '''wiederholen''' bis sie alle gewünschten Adressen mit der Eigenschaft ausgestattet haben. [[OBS/AUSWERTUNG/Auswertung#F8_Gef.|Auswertung → F8 Gef.]] 

Mit {{F7}} können sie den Konfliktmanager aufrufen 
[[IMAGE:DefinierteAdressen_Konfliktmanager.png]] 
Positionieren sie beide Listen entsprechen und speichern sie „Größe und Position“ der Fenster
Achten sie beim Arbeiten mit dem Konfliktmanager das keine Auswahl in den Auswahlboxen (2) ausgewählt worden sind. Stellen sie unter F4 ihre gewünschte Sortierung ein. Wenn gewünscht können die unter (1 PLZ) mit einem Postleitzahlenbereich ihre Adressen reduzieren.
Schalten sie die Live Suche in den Listen als Priorität ein. Sollten Daten Exportiert werden, schalten sie den XLSX Export für Listen (CTRL-F5) bei ihren Benutzern frei.
Wenn sie Adressen manuell hinzufügt haben, können sie den Adressherausgeber mit der XLSX Datei auf den neusten Stand bringen (Manuelle Adressen werden in der Liste Fett angezeigt)

Benutzen Sie den Live Filter (4) und (3) um Einschränkungen in den Listen zu Erzeugen.

In (5) finden Sie Angaben zur Person
Über die Schnellstart Icons gelangen sie direkt zu der Personenliste der angezeigten Person
(Schnellstart Icons müssen beim Benutzer aktiviert sein!)
==Mögliche Einstellungen Auswahlboxen (1)==
{| class="wikitable"
|-
! Auswahlbox !! Beschreibung
|-
|Konflikte mit Definierten Adressen || In der Liste werden nur Adressen mit Konflikten angezeigt
|-
|Übereinstimmungen || In der Liste werden nur korrekte Adressen angezeigt
|-
|Mögliche Werte || In der Liste Definierte Adressen Konflikte werden links mögliche Adressen angezeigt
|-
|Mit Adressen Synchronisieren || Die Obere Liste wird mit der Adresse Synchronisiert
|-
|Mit Eigenschaft Konfliktadresse || Es werden nur Adressen mit der Eigenschaft Konfliktadresse angezeigt
|-
|Mit HausNr. || Die Hausnummer wird in der Überprüfung mit einbezogen. (Viele Konflikte)
|}

==Synchronisation {{F7}} oder mit der rechten Maustaste==
Rechte Maustaste in Spalte PLZ 
[[IMAGE:DefinierteAdressen_RClick_PLZ.png]]
{| class="wikitable"
|-
! Menüpunkt !! Beschreibung
|-
|PLZ Übernehmen || Die PLZ aus Definierte Adressen wird in den Personenstamm übernommen
|-
|Live Filter löschen || Der Live Filter in der Liste Definierte Adressen wird gelöscht
|}

Rechte Maustaste in Spalte Ort 
[[IMAGE:DefinierteAdressen_RClick_ORT.png]]
{| class="wikitable"
|-
! Menüpunkt !! Beschreibung
|-
|Ort/Ortsteil Übernehmen || Der Ort + Ortsteil aus Definierte Adressen wird in den Personenstamm übernommen
|-
|Live Filter löschen || Der Live Filter in der Liste Definierte Adressen wird gelöscht
|}

Rechte Maustaste in Spalte Straße 
[[IMAGE:DefinierteAdressen_RClick_STRASSE.png]]
{| class="wikitable"
|-
! Menüpunkt !! Beschreibung
|-
|Nur Straße Übernehmen || Nur die Strasse aus Definierte Adressen wird in den Personenstamm übernommen. Die Hausnummer bleibt in der Straße erhalten
|-
|Straße,HausNr,Zusatz Übernehmen || Straße,Hausnummer und Zusatz aus Definierte Adressen wird in den Personenstamm übernommen.
|-
|Live Filter übernehmen || Die Straße ohne Hausnummer wird in den Live Filter Definierte Adressen übernommen
|-
|Live Filter löschen || Der Live Filter in der Liste Definierte Adressen wird gelöscht
|-
|Adresse in Definierte Liste übernehmen || Die komplette Adresse wir in die Liste Definierte Adressen Übernehmen übernommen. Und als manuelle Eingabe gekennzeichnet. Durch die Auswahlbox „Nur Manuelle Adressen anzeigen“ könne in diese in der Liste Definierte Adressen angezeigt werden.
|-
|Eigenschaft keine Definierte Adresse setzen || In der Person wird die Eigenschaft „Keine definierte Adresse“ gesetzt. Diese Adressen werden nicht mehr im Konfliktmanager überprüft/angezeigt.
|-
|Eigenschaft Konfliktadresse löschen || In der Person wird die Eigenschaft „Konfliktadresse“ gelöscht. Diese Adressen werden nicht mehr im Konfliktmanager überprüft/angezeigt.
|}
Rechte Maustaste in Spalte Haus-Nr. 
[[IMAGE:DefinierteAdressen_RClick_STRASSE2.png]]
{| class="wikitable"
|-
! Menüpunkt !! Beschreibung
|-
|Zusatz Übernehmen || Der Zusatz aus Definierte Adressen wird in den Personenstamm übernommen (Straße)
|-
|Live Filter löschen || Der Live Filter in der Liste Definierte Adressen wird gelöscht
|}

Systemgastronomie-Kasse

2020-10-01T12:05:24Z

Wiki-Admin: /* Änderungen durch die TSE */

{{Vorlage:Kostenpflichtige Module}}
=Systemgastronomie-Kasse=
Für Systemgastronomiebetrieben bietet OBS die Systemgastronomie-Kasse an. Diese wurde den Systemgastronomiebetrieben angepasst und kann bei Anfrage einfach zugebucht werden. 

[[Image:Systemgastronomie-Kasse.png|500px|Oberfläche der Belegerfassung]]
[[Image:Fahrererfassung.png|500px|Oberflächer der Fahrererfassung]]
[[Image:Systemgastronomie-Zeiterfassung.png|500px|Oberfläche der Zeiterfassung]]

==Handbuch==
Eine Übersichtliche Erklärung der Systemgastronomiekasse erhalten sie auch im [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf Handbuch].

<imagemap>
Datei:OBS-Handbuch-Systemgastronomie-Kasse.png|300px|thumb
default [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf]
</imagemap>

==Änderungen durch die TSE==
Durch die Einführung der TSE ergeben sich einige Änderungen bei der Bedienung:
* Wenn der Kunde eingegeben wurde und in die Artikelerfassung gelangt, wird der Bon gestartet. Wird der Vorgang danach abgebrochen, wird ein leerer Bon gespeichert und ein Abbruch an die TSE gemeldet.
* Wird telefonisch eine Abholbestllung aufgegeben, so darf im ersten Schritt kein Beleg gedruckt werden. Es erscheint eine Abfrage ob, der "Bon direkt abgeschlossen werden soll". Dies muss am Anfang mit nein beantwortet werden, dadruch wird eine Bestellung gedruckt. Diese enthält alle Positionen, die bestellt wurden, aber es sind keine Endbeträge enthalten. Holt der Kunde die Ware ab und bezahlt, wird der echte Beleg gedruckt. In der Übersicht der Offenen Bestellungen [Unter F10 -> 8 "Offene Bestellungen"] findet sich unter F10 -> V die Liste der Vorbestellungen. Diese können mit ENTER wieder in die Erfassung übernommen werden und bei der Abfrage vor dem Drucken mit "Ja" beantwortet werden.
* Wieder in die Erfassung übernommene Vorbestellungen dürfen nicht mehr verändert werden, nur erweitert. Wenn der Kunde eine Position nicht mehr möchte, muss diese mit einer gleichen Minus Position storniert werden. Eine entsprechende Meldung erscheint bei dem Versuch.
* Die übernommenen Vorbestellungen können über ESC abgebrochen werden und es wird auch hier ein leerer Bon gespeichert.
* Lieferbestellungen werden als "Forderungen" an die TSE übergeben, da es in dem Moment keinen Geldfluss gibt. Wird der Mitarbeiter abgemeldet, werden für alle seine Touren entsprechende Geldzu- und Abgänge gebucht. Diese stehen dann auch mit auf dem Tagesabschlussbericht.
* Es gibt nun einen Trainingsmodus, der über einen neuen Standardkunden läuft (die 600). Dort können Positionen erfasst werden, ohne das ein Bon erstellt werden kann. Dies dient z.B. zur Preisauskunft
* Wenn Artikel mit Pfand verkauft werden, wird jetzt ein zusätzlicher Pfandartikel pro Position in die Erfassung übernommen. Diese müssen bei Neuanlage auf der zweiten Seite in der Artikelmaske als "Folgeartikel" hinterlegt werden.
[[Image:Folgeartikel-TSE.png|500px|Folgeartikel]]

==Schnelleinstieg==
Hier ein grober Überblick über den Ablauf und Funktionsweise der Systemgastronomiekasse. 

===Anmelden===
Ein Mitarbeiter muss sich in der Zeiterfassung anmelden, damit, zum Beispiel die Arbeitszeit, Pausen und die gefahrenen Kilometer erfasst werden. 
Dies wird durch das einscannen der Mitarbeiterkarte gemacht. War die Anmeldung erfolgreich, wird der Mitarbeiter in der Liste "Angemeldete Mitarbeiter" aufgelistet. 
Wird der Mitarbeiter nicht aufgelistet, wurde bei der Anmeldung ein Fehler gemacht. Hier muss sich der Mitarbeiter einfach nochmal anmelden 

===Bestellungen entgegen nehmen===
Um eine Bestellung entgegen zu nehmen, müssen zuerst die Kundendaten erfasst werden. Durch die Eingabe der Kundennummer, werden automatisch die restlichen Felder ausgefüllt. 
Ein neuer Kunde muss registriert werden. Im Kassenmenü unter der Funktion "Neuer Kunde" kann der Kunde registriert werden. 
Nach erfassen der Kundendaten wird mit {{Key|F2 Bon}} die Bestellung aufgenommen werden, dies geschieht durch die Eingabe der Nummer der Positionen und wird mit Enter bestätigt. Danach gibt man die Menge der Positionen ein.
Im Kassenmenü kann die Bestellung angepasst werden, um z.B. eine Bestellung als Abhol-Bestellung zu markieren. 
Mit {{Key|F3 Drucken}} wird die Bestellung fertiggestellt und ausgedruckt. 

===Bestellung ausliefern===
Um eine Bestellung auszuliefern, muss sich ein Mitarbeiter für eine oder mehrere Bestellungen in der Fahrererfassung eintragen. 
Die Bestellungen werden dann vom System als erledigt gesehen. 

===Bestellung abschließen===
Eine Bestellung kann durch einscannen der Mitarbeiter und einscannen der Rechnung abgeschlossen werden. 
Das System sieht diese Bestellung dann als erledigt und listet diese nicht mehr auf. 

===Abmelden===
Ist ein Mitarbeiter fertig mit seiner Schicht, kann er sich im Kassenmenü abmelden. 
Wenn der Mitarbeiter ein Privatfahrzeug mit angemeldet hatte, fragt das System nach den Kilometerstand um die Fahrtkosten zu erstatten. 

==Menü-Erläuterung==
Hier wird ihnen das Kassenmenü gezeigt und erklärt 

[[Image:Systemgastronomie-Kassenmenü.png|325px|Das Kassenmenü]]

===Telefon ändern===
Ein neuer Kunde kann ins System eingetragen und mit {{Key|F2}} gespeichert werden. 

===Straße ändern===
Hier kann die Adresse des ausgewählten Kunden gepflegt werden. 

===Bemerkung Kunde eingeben===
Wenn der Kunde bestimmte Wünsche hat oder wichtige Information gibt, kann diese in die Bemerkung vermerkt werden. 

===Bestellliste anzeigen===
Hier werden alle verbuchten Bestellungen aufgelistet. Eine Bestellung kann nach Wunsch mit {{Key|F3 Druck}} nachgedruckt oder eingesehen werden. 

===Namen ändern===
Der Name des ausgewählten Kunden kann gepflegt werden. 

===Gutschrift eingeben===
Hier kann eine Gutschrift eingegeben werden. Dies geht aber nur, wenn {{Key|F2 Bon}} schon gedrückt wurde. 

===Offene Bestellungen===
Hier werden alle Bestellungen aufgelistet die noch nicht verbucht worden sind. Wenn sich etwas an der Bestellung ändert, kann man diese unter {{Key|F10}} „Weitere Funktionen“ nachträglich bearbeiten. 

===Mindestbestellwert===
Der Mindestbestellwert kann verändert werden. 

===Auswertung===
Hat noch keine Funktion 

===Geld-Abgang===
Wenn Geld aus der Kasse entnommen wurde, muss dies hier angegeben werden. 

===Geld-Zugang===
Wenn Geld in die Kasse hinzugefügt wurde, muss dies hier angeben werden. 

===Stammdaten===
In den Stammdaten können verschiedene Daten bearbeitet werden. 

[[Image:Systemgastronomie Untermenü-Stammdaten.png|325px|Das Untermenü von Stammdaten]]

====Buchungstexte Abgang/Zugang bearbeiten====
Hier können die Geldzugänge / Geldausgänge die Buchungstexte gepflegt werden. Es können hier auch mit einfg neue Verwendungszwecke hinzugefügt werden. 
Mit {{Key|F3}} kann ein Kassenbuchtext ausgedruckt werden. 

====Liste Geld – Abgang/Zugang====
Hier werden die Geldzugänge und -abgänge aufgelistet. 

====Mitarbeiter bearbeiten====
Hier werden die Daten der Mitarbeiter gepflegt. 

====Fahrzeuge bearbeiten====
Hier werden die Daten der Fahrzeuge gepflegt. 

====PLZ-Ort Straße bearbeiten====
Hier werden die Daten von Orten gepflegt. Hier kann man auch den Mindestbestellwert für einen Ort eingeben. 

====Bestell Historie====
Hier werden alle Bestellungen aufgelistet. Eine Bestellung kann mit {{Key|F3}} nachgedruckt oder eingesehen werden. 

====Mitarbeiter KM/Lohn Historie====
Hier werden die Daten wie Lohn pro Stunde, Lohn, gefahrene Kilometer, Kilometer Geld und etc. aufgelistet. 

====Hauptkasse definieren====
Zeigt die genutzte Kasse mit Kassenbeständen. 

====Config====
Hier kann die Kasse konfiguriert werden. 

===Abholbestellung===
Möchte der Kunde seine Bestellung selber abholen, kann diese damit markiert werden. 
Mit Termin kann auch der Abholtermin eingegeben werden (Siehe Termin). 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===EC Zahlung===
Hier wird vermerkt, ob die Bestellung mit der EC-Karte bezahlt wurde. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Im Haus===
Möchte der Kunde seine Bestellung gleich in der Filiale essen, kann diese mit „Im Haus“ gekennzeichnet werden. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Online Payment===
Hier wird vermerkt, ob die Bestellung aus dem Internet kommt. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Mitarbeiter abmelden===
Ist ein Mitarbeiter fertig, so kann er sich hier abmelden. Es wird dann automatisch ein Dokument erstellt. 

===Stundenerfassung===
Her werden alle Mitarbeiter aufgelistet, um auf ihre Datensätze zuzugreifen. 
Mit {{Key|F6}} wird eine Liste ausgegeben die auflistet was ein Mitarbeiter für Aufgaben tätigte. 
Mit {{Key|F10}} wird ein Optionsfenster geöffnet, darin sind folgende Optionen: 

====Mitarbeiter inaktiv setzen====
Setzt ausgewählten Mitarbeiter inaktiv. So wird dieser vom System nicht mehr beachtet und wird von vielen Listen ausgeblendet. 

====Mitarbeiter reaktivieren====
Reaktiviert einen ausgewählten Mitarbeiter. Dieser wird dann wieder vom System berücksichtigt und wird wieder auf Listen aufgelistet. 

====QR-Code anzeigen====
Zeigt den QR-Code des ausgewählten Mitarbeiters an. Dieser kann mit {{Key|F2}} kopiert oder mit {{Key|F3}} ausgedruckt werden. 

====QR-Zeiten Excel Monatsauswertung aller Mitarbeiter====
Es wird eine Excel-Datei ausgegeben die die Monatsauswertung aller Mitarbeiter beinhaltet. 

===Termin===
Hier kann man auf der Bestellung ein Abholtermin vermerken. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion und leer lassen des Textfeldes. 

===Umsatzbericht===
Listet bei „Ja“ den Tagesumsatz auf und bei „Nein“ den Monatsumsatz. 

===Vorbestellung===
Hier wird eine Bestellung als Vorbestellung markiert. Vorbestellungen können nicht im aktuellem Datum gemacht werden, sondern müssen in der Zukunft liegen. 

===Tagesumsatz verbuchen===
Dient nur zum manuellen Nachbuchen. 

===Tagesabschlussbericht drucken===
Am Ende eines Tages müssen die Kassen überprüft werden. 

===Neuer Benutzer===
Hier kann man einen Benutzer ummelden.

Systemgastronomie-Kasse

2020-10-01T12:05:14Z

Wiki-Admin: /* Änderungen durch die TSE */

{{Vorlage:Kostenpflichtige Module}}
=Systemgastronomie-Kasse=
Für Systemgastronomiebetrieben bietet OBS die Systemgastronomie-Kasse an. Diese wurde den Systemgastronomiebetrieben angepasst und kann bei Anfrage einfach zugebucht werden. 

[[Image:Systemgastronomie-Kasse.png|500px|Oberfläche der Belegerfassung]]
[[Image:Fahrererfassung.png|500px|Oberflächer der Fahrererfassung]]
[[Image:Systemgastronomie-Zeiterfassung.png|500px|Oberfläche der Zeiterfassung]]

==Handbuch==
Eine Übersichtliche Erklärung der Systemgastronomiekasse erhalten sie auch im [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf Handbuch].

<imagemap>
Datei:OBS-Handbuch-Systemgastronomie-Kasse.png|300px|thumb
default [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf]
</imagemap>

==Änderungen durch die TSE==
Durch die Einführung der TSE ergeben sich einige Änderungen bei der Bedienung:
* Wenn der Kunde eingegeben wurde und in die Artikelerfassung gelangt, wird der Bon gestartet. Wird der Vorgang danach abgebrochen, wird ein leerer Bon gespeichert und ein Abbruch an die TSE gemeldet.
* Wird telefonisch eine Abholbestllung aufgegeben, so darf im ersten Schritt kein Beleg gedruckt werden. Es erscheint eine Abfrage ob, der "Bon direkt abgeschlossen werden soll". Dies muss am Anfang mit nein beantwortet werden, dadruch wird eine Bestellung gedruckt. Diese enthält alle Positionen, die bestellt wurden, aber es sind keine Endbeträge enthalten. Holt der Kunde die Ware ab und bezahlt, wird der echte Beleg gedruckt. In der Übersicht der Offenen Bestellungen [Unter F10 -> 8 "Offene Bestellungen"] findet sich unter F10 -> V die Liste der Vorbestellungen. Diese können mit ENTER wieder in die Erfassung übernommen werden und bei der Abfrage vor dem Drucken mit "Ja" beantwortet werden.
* Wieder in die Erfassung übernommene Vorbestellungen dürfen nicht mehr verändert werden, nur erweitert. Wenn der Kunde eine Position nicht mehr möchte, muss diese mit einer gleichen Minus Position storniert werden. Eine entsprechende Meldung erscheint bei dem Versuch.
* Die übernommenen Vorbestellungen können über ESC abgebrochen werden und es wird auch hier ein leerer Bon gespeichert.
* Lieferbestellungen werden als "Forderungen" an die TSE übergeben, da es in dem Moment keinen Geldfluss gibt. Wird der Mitarbeiter abgemeldet, werden für alle seine Touren entsprechende Geldzu- und Abgänge gebucht. Diese stehen dann auch mit auf dem Tagesabschlussbericht.
* Es gibt nun einen Trainingsmodus, der über einen neuen Standardkunden läuft (die 600). Dort können Positionen erfasst werden, ohne das ein Bon erstellt werden kann. Dies dient z.B. zur Preisauskunft
* Wenn Artikel mit Pfand verkauft werden, wird jetzt ein zusätzlicher Pfandartikel pro Position in die Erfassung übernommen. Diese müssen bei Neuanlage auf der zweiten Seite in der Artikelmaske als "Folgeartikel" hinterlegt werden.
[[Image:Folgeartikel-TSE.png|325px|Folgeartikel]]

==Schnelleinstieg==
Hier ein grober Überblick über den Ablauf und Funktionsweise der Systemgastronomiekasse. 

===Anmelden===
Ein Mitarbeiter muss sich in der Zeiterfassung anmelden, damit, zum Beispiel die Arbeitszeit, Pausen und die gefahrenen Kilometer erfasst werden. 
Dies wird durch das einscannen der Mitarbeiterkarte gemacht. War die Anmeldung erfolgreich, wird der Mitarbeiter in der Liste "Angemeldete Mitarbeiter" aufgelistet. 
Wird der Mitarbeiter nicht aufgelistet, wurde bei der Anmeldung ein Fehler gemacht. Hier muss sich der Mitarbeiter einfach nochmal anmelden 

===Bestellungen entgegen nehmen===
Um eine Bestellung entgegen zu nehmen, müssen zuerst die Kundendaten erfasst werden. Durch die Eingabe der Kundennummer, werden automatisch die restlichen Felder ausgefüllt. 
Ein neuer Kunde muss registriert werden. Im Kassenmenü unter der Funktion "Neuer Kunde" kann der Kunde registriert werden. 
Nach erfassen der Kundendaten wird mit {{Key|F2 Bon}} die Bestellung aufgenommen werden, dies geschieht durch die Eingabe der Nummer der Positionen und wird mit Enter bestätigt. Danach gibt man die Menge der Positionen ein.
Im Kassenmenü kann die Bestellung angepasst werden, um z.B. eine Bestellung als Abhol-Bestellung zu markieren. 
Mit {{Key|F3 Drucken}} wird die Bestellung fertiggestellt und ausgedruckt. 

===Bestellung ausliefern===
Um eine Bestellung auszuliefern, muss sich ein Mitarbeiter für eine oder mehrere Bestellungen in der Fahrererfassung eintragen. 
Die Bestellungen werden dann vom System als erledigt gesehen. 

===Bestellung abschließen===
Eine Bestellung kann durch einscannen der Mitarbeiter und einscannen der Rechnung abgeschlossen werden. 
Das System sieht diese Bestellung dann als erledigt und listet diese nicht mehr auf. 

===Abmelden===
Ist ein Mitarbeiter fertig mit seiner Schicht, kann er sich im Kassenmenü abmelden. 
Wenn der Mitarbeiter ein Privatfahrzeug mit angemeldet hatte, fragt das System nach den Kilometerstand um die Fahrtkosten zu erstatten. 

==Menü-Erläuterung==
Hier wird ihnen das Kassenmenü gezeigt und erklärt 

[[Image:Systemgastronomie-Kassenmenü.png|325px|Das Kassenmenü]]

===Telefon ändern===
Ein neuer Kunde kann ins System eingetragen und mit {{Key|F2}} gespeichert werden. 

===Straße ändern===
Hier kann die Adresse des ausgewählten Kunden gepflegt werden. 

===Bemerkung Kunde eingeben===
Wenn der Kunde bestimmte Wünsche hat oder wichtige Information gibt, kann diese in die Bemerkung vermerkt werden. 

===Bestellliste anzeigen===
Hier werden alle verbuchten Bestellungen aufgelistet. Eine Bestellung kann nach Wunsch mit {{Key|F3 Druck}} nachgedruckt oder eingesehen werden. 

===Namen ändern===
Der Name des ausgewählten Kunden kann gepflegt werden. 

===Gutschrift eingeben===
Hier kann eine Gutschrift eingegeben werden. Dies geht aber nur, wenn {{Key|F2 Bon}} schon gedrückt wurde. 

===Offene Bestellungen===
Hier werden alle Bestellungen aufgelistet die noch nicht verbucht worden sind. Wenn sich etwas an der Bestellung ändert, kann man diese unter {{Key|F10}} „Weitere Funktionen“ nachträglich bearbeiten. 

===Mindestbestellwert===
Der Mindestbestellwert kann verändert werden. 

===Auswertung===
Hat noch keine Funktion 

===Geld-Abgang===
Wenn Geld aus der Kasse entnommen wurde, muss dies hier angegeben werden. 

===Geld-Zugang===
Wenn Geld in die Kasse hinzugefügt wurde, muss dies hier angeben werden. 

===Stammdaten===
In den Stammdaten können verschiedene Daten bearbeitet werden. 

[[Image:Systemgastronomie Untermenü-Stammdaten.png|325px|Das Untermenü von Stammdaten]]

====Buchungstexte Abgang/Zugang bearbeiten====
Hier können die Geldzugänge / Geldausgänge die Buchungstexte gepflegt werden. Es können hier auch mit einfg neue Verwendungszwecke hinzugefügt werden. 
Mit {{Key|F3}} kann ein Kassenbuchtext ausgedruckt werden. 

====Liste Geld – Abgang/Zugang====
Hier werden die Geldzugänge und -abgänge aufgelistet. 

====Mitarbeiter bearbeiten====
Hier werden die Daten der Mitarbeiter gepflegt. 

====Fahrzeuge bearbeiten====
Hier werden die Daten der Fahrzeuge gepflegt. 

====PLZ-Ort Straße bearbeiten====
Hier werden die Daten von Orten gepflegt. Hier kann man auch den Mindestbestellwert für einen Ort eingeben. 

====Bestell Historie====
Hier werden alle Bestellungen aufgelistet. Eine Bestellung kann mit {{Key|F3}} nachgedruckt oder eingesehen werden. 

====Mitarbeiter KM/Lohn Historie====
Hier werden die Daten wie Lohn pro Stunde, Lohn, gefahrene Kilometer, Kilometer Geld und etc. aufgelistet. 

====Hauptkasse definieren====
Zeigt die genutzte Kasse mit Kassenbeständen. 

====Config====
Hier kann die Kasse konfiguriert werden. 

===Abholbestellung===
Möchte der Kunde seine Bestellung selber abholen, kann diese damit markiert werden. 
Mit Termin kann auch der Abholtermin eingegeben werden (Siehe Termin). 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===EC Zahlung===
Hier wird vermerkt, ob die Bestellung mit der EC-Karte bezahlt wurde. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Im Haus===
Möchte der Kunde seine Bestellung gleich in der Filiale essen, kann diese mit „Im Haus“ gekennzeichnet werden. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Online Payment===
Hier wird vermerkt, ob die Bestellung aus dem Internet kommt. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Mitarbeiter abmelden===
Ist ein Mitarbeiter fertig, so kann er sich hier abmelden. Es wird dann automatisch ein Dokument erstellt. 

===Stundenerfassung===
Her werden alle Mitarbeiter aufgelistet, um auf ihre Datensätze zuzugreifen. 
Mit {{Key|F6}} wird eine Liste ausgegeben die auflistet was ein Mitarbeiter für Aufgaben tätigte. 
Mit {{Key|F10}} wird ein Optionsfenster geöffnet, darin sind folgende Optionen: 

====Mitarbeiter inaktiv setzen====
Setzt ausgewählten Mitarbeiter inaktiv. So wird dieser vom System nicht mehr beachtet und wird von vielen Listen ausgeblendet. 

====Mitarbeiter reaktivieren====
Reaktiviert einen ausgewählten Mitarbeiter. Dieser wird dann wieder vom System berücksichtigt und wird wieder auf Listen aufgelistet. 

====QR-Code anzeigen====
Zeigt den QR-Code des ausgewählten Mitarbeiters an. Dieser kann mit {{Key|F2}} kopiert oder mit {{Key|F3}} ausgedruckt werden. 

====QR-Zeiten Excel Monatsauswertung aller Mitarbeiter====
Es wird eine Excel-Datei ausgegeben die die Monatsauswertung aller Mitarbeiter beinhaltet. 

===Termin===
Hier kann man auf der Bestellung ein Abholtermin vermerken. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion und leer lassen des Textfeldes. 

===Umsatzbericht===
Listet bei „Ja“ den Tagesumsatz auf und bei „Nein“ den Monatsumsatz. 

===Vorbestellung===
Hier wird eine Bestellung als Vorbestellung markiert. Vorbestellungen können nicht im aktuellem Datum gemacht werden, sondern müssen in der Zukunft liegen. 

===Tagesumsatz verbuchen===
Dient nur zum manuellen Nachbuchen. 

===Tagesabschlussbericht drucken===
Am Ende eines Tages müssen die Kassen überprüft werden. 

===Neuer Benutzer===
Hier kann man einen Benutzer ummelden.

Datei:Folgeartikel-TSE.png

2020-10-01T12:04:37Z

Wiki-Admin:

Systemgastronomie-Kasse

2020-10-01T11:57:54Z

Wiki-Admin: /* Änderungen durch die TSE */

{{Vorlage:Kostenpflichtige Module}}
=Systemgastronomie-Kasse=
Für Systemgastronomiebetrieben bietet OBS die Systemgastronomie-Kasse an. Diese wurde den Systemgastronomiebetrieben angepasst und kann bei Anfrage einfach zugebucht werden. 

[[Image:Systemgastronomie-Kasse.png|500px|Oberfläche der Belegerfassung]]
[[Image:Fahrererfassung.png|500px|Oberflächer der Fahrererfassung]]
[[Image:Systemgastronomie-Zeiterfassung.png|500px|Oberfläche der Zeiterfassung]]

==Handbuch==
Eine Übersichtliche Erklärung der Systemgastronomiekasse erhalten sie auch im [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf Handbuch].

<imagemap>
Datei:OBS-Handbuch-Systemgastronomie-Kasse.png|300px|thumb
default [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf]
</imagemap>

==Änderungen durch die TSE==
Durch die Einführung der TSE ergeben sich einige Änderungen bei der Bedienung:
* Wenn der Kunde eingegeben wurde und in die Artikelerfassung gelangt, wird der Bon gestartet. Wird der Vorgang danach abgebrochen, wird ein leerer Bon gespeichert und ein Abbruch an die TSE gemeldet.
* Wird telefonisch eine Abholbestllung aufgegeben, so darf im ersten Schritt kein Beleg gedruckt werden. Es erscheint eine Abfrage ob, der "Bon direkt abgeschlossen werden soll". Dies muss am Anfang mit nein beantwortet werden, dadruch wird eine Bestellung gedruckt. Diese enthält alle Positionen, die bestellt wurden, aber es sind keine Endbeträge enthalten. Holt der Kunde die Ware ab und bezahlt, wird der echte Beleg gedruckt. In der Übersicht der Offenen Bestellungen [Unter F10 -> 8 "Offene Bestellungen"] findet sich unter F10 -> V die Liste der Vorbestellungen. Diese können mit ENTER wieder in die Erfassung übernommen werden und bei der Abfrage vor dem Drucken mit "Ja" beantwortet werden.
* Wieder in die Erfassung übernommene Vorbestellungen dürfen nicht mehr verändert werden, nur erweitert. Wenn der Kunde eine Position nicht mehr möchte, muss diese mit einer gleichen Minus Position storniert werden. Eine entsprechende Meldung erscheint bei dem Versuch.
* Die übernommenen Vorbestellungen können über ESC abgebrochen werden und es wird auch hier ein leerer Bon gespeichert.
* Lieferbestellungen werden als "Forderungen" an die TSE übergeben, da es in dem Moment keinen Geldfluss gibt. Wird der Mitarbeiter abgemeldet, werden für alle seine Touren entsprechende Geldzu- und Abgänge gebucht. Diese stehen dann auch mit auf dem Tagesabschlussbericht.
* Es gibt nun einen Trainingsmodus, der über einen neuen Standardkunden läuft (die 600). Dort können Positionen erfasst werden, ohne das ein Bon erstellt werden kann. Dies dient z.B. zur Preisauskunft
* Wenn Artikel mit Pfand verkauft werden, wird jetzt ein zusätzlicher Pfandartikel pro Position in die Erfassung übernommen. Diese müssen bei Neuanlage auf der zweiten Seite in der Artikelmaske als "Folgeartikel" hinterlegt werden.

==Schnelleinstieg==
Hier ein grober Überblick über den Ablauf und Funktionsweise der Systemgastronomiekasse. 

===Anmelden===
Ein Mitarbeiter muss sich in der Zeiterfassung anmelden, damit, zum Beispiel die Arbeitszeit, Pausen und die gefahrenen Kilometer erfasst werden. 
Dies wird durch das einscannen der Mitarbeiterkarte gemacht. War die Anmeldung erfolgreich, wird der Mitarbeiter in der Liste "Angemeldete Mitarbeiter" aufgelistet. 
Wird der Mitarbeiter nicht aufgelistet, wurde bei der Anmeldung ein Fehler gemacht. Hier muss sich der Mitarbeiter einfach nochmal anmelden 

===Bestellungen entgegen nehmen===
Um eine Bestellung entgegen zu nehmen, müssen zuerst die Kundendaten erfasst werden. Durch die Eingabe der Kundennummer, werden automatisch die restlichen Felder ausgefüllt. 
Ein neuer Kunde muss registriert werden. Im Kassenmenü unter der Funktion "Neuer Kunde" kann der Kunde registriert werden. 
Nach erfassen der Kundendaten wird mit {{Key|F2 Bon}} die Bestellung aufgenommen werden, dies geschieht durch die Eingabe der Nummer der Positionen und wird mit Enter bestätigt. Danach gibt man die Menge der Positionen ein.
Im Kassenmenü kann die Bestellung angepasst werden, um z.B. eine Bestellung als Abhol-Bestellung zu markieren. 
Mit {{Key|F3 Drucken}} wird die Bestellung fertiggestellt und ausgedruckt. 

===Bestellung ausliefern===
Um eine Bestellung auszuliefern, muss sich ein Mitarbeiter für eine oder mehrere Bestellungen in der Fahrererfassung eintragen. 
Die Bestellungen werden dann vom System als erledigt gesehen. 

===Bestellung abschließen===
Eine Bestellung kann durch einscannen der Mitarbeiter und einscannen der Rechnung abgeschlossen werden. 
Das System sieht diese Bestellung dann als erledigt und listet diese nicht mehr auf. 

===Abmelden===
Ist ein Mitarbeiter fertig mit seiner Schicht, kann er sich im Kassenmenü abmelden. 
Wenn der Mitarbeiter ein Privatfahrzeug mit angemeldet hatte, fragt das System nach den Kilometerstand um die Fahrtkosten zu erstatten. 

==Menü-Erläuterung==
Hier wird ihnen das Kassenmenü gezeigt und erklärt 

[[Image:Systemgastronomie-Kassenmenü.png|325px|Das Kassenmenü]]

===Telefon ändern===
Ein neuer Kunde kann ins System eingetragen und mit {{Key|F2}} gespeichert werden. 

===Straße ändern===
Hier kann die Adresse des ausgewählten Kunden gepflegt werden. 

===Bemerkung Kunde eingeben===
Wenn der Kunde bestimmte Wünsche hat oder wichtige Information gibt, kann diese in die Bemerkung vermerkt werden. 

===Bestellliste anzeigen===
Hier werden alle verbuchten Bestellungen aufgelistet. Eine Bestellung kann nach Wunsch mit {{Key|F3 Druck}} nachgedruckt oder eingesehen werden. 

===Namen ändern===
Der Name des ausgewählten Kunden kann gepflegt werden. 

===Gutschrift eingeben===
Hier kann eine Gutschrift eingegeben werden. Dies geht aber nur, wenn {{Key|F2 Bon}} schon gedrückt wurde. 

===Offene Bestellungen===
Hier werden alle Bestellungen aufgelistet die noch nicht verbucht worden sind. Wenn sich etwas an der Bestellung ändert, kann man diese unter {{Key|F10}} „Weitere Funktionen“ nachträglich bearbeiten. 

===Mindestbestellwert===
Der Mindestbestellwert kann verändert werden. 

===Auswertung===
Hat noch keine Funktion 

===Geld-Abgang===
Wenn Geld aus der Kasse entnommen wurde, muss dies hier angegeben werden. 

===Geld-Zugang===
Wenn Geld in die Kasse hinzugefügt wurde, muss dies hier angeben werden. 

===Stammdaten===
In den Stammdaten können verschiedene Daten bearbeitet werden. 

[[Image:Systemgastronomie Untermenü-Stammdaten.png|325px|Das Untermenü von Stammdaten]]

====Buchungstexte Abgang/Zugang bearbeiten====
Hier können die Geldzugänge / Geldausgänge die Buchungstexte gepflegt werden. Es können hier auch mit einfg neue Verwendungszwecke hinzugefügt werden. 
Mit {{Key|F3}} kann ein Kassenbuchtext ausgedruckt werden. 

====Liste Geld – Abgang/Zugang====
Hier werden die Geldzugänge und -abgänge aufgelistet. 

====Mitarbeiter bearbeiten====
Hier werden die Daten der Mitarbeiter gepflegt. 

====Fahrzeuge bearbeiten====
Hier werden die Daten der Fahrzeuge gepflegt. 

====PLZ-Ort Straße bearbeiten====
Hier werden die Daten von Orten gepflegt. Hier kann man auch den Mindestbestellwert für einen Ort eingeben. 

====Bestell Historie====
Hier werden alle Bestellungen aufgelistet. Eine Bestellung kann mit {{Key|F3}} nachgedruckt oder eingesehen werden. 

====Mitarbeiter KM/Lohn Historie====
Hier werden die Daten wie Lohn pro Stunde, Lohn, gefahrene Kilometer, Kilometer Geld und etc. aufgelistet. 

====Hauptkasse definieren====
Zeigt die genutzte Kasse mit Kassenbeständen. 

====Config====
Hier kann die Kasse konfiguriert werden. 

===Abholbestellung===
Möchte der Kunde seine Bestellung selber abholen, kann diese damit markiert werden. 
Mit Termin kann auch der Abholtermin eingegeben werden (Siehe Termin). 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===EC Zahlung===
Hier wird vermerkt, ob die Bestellung mit der EC-Karte bezahlt wurde. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Im Haus===
Möchte der Kunde seine Bestellung gleich in der Filiale essen, kann diese mit „Im Haus“ gekennzeichnet werden. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Online Payment===
Hier wird vermerkt, ob die Bestellung aus dem Internet kommt. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Mitarbeiter abmelden===
Ist ein Mitarbeiter fertig, so kann er sich hier abmelden. Es wird dann automatisch ein Dokument erstellt. 

===Stundenerfassung===
Her werden alle Mitarbeiter aufgelistet, um auf ihre Datensätze zuzugreifen. 
Mit {{Key|F6}} wird eine Liste ausgegeben die auflistet was ein Mitarbeiter für Aufgaben tätigte. 
Mit {{Key|F10}} wird ein Optionsfenster geöffnet, darin sind folgende Optionen: 

====Mitarbeiter inaktiv setzen====
Setzt ausgewählten Mitarbeiter inaktiv. So wird dieser vom System nicht mehr beachtet und wird von vielen Listen ausgeblendet. 

====Mitarbeiter reaktivieren====
Reaktiviert einen ausgewählten Mitarbeiter. Dieser wird dann wieder vom System berücksichtigt und wird wieder auf Listen aufgelistet. 

====QR-Code anzeigen====
Zeigt den QR-Code des ausgewählten Mitarbeiters an. Dieser kann mit {{Key|F2}} kopiert oder mit {{Key|F3}} ausgedruckt werden. 

====QR-Zeiten Excel Monatsauswertung aller Mitarbeiter====
Es wird eine Excel-Datei ausgegeben die die Monatsauswertung aller Mitarbeiter beinhaltet. 

===Termin===
Hier kann man auf der Bestellung ein Abholtermin vermerken. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion und leer lassen des Textfeldes. 

===Umsatzbericht===
Listet bei „Ja“ den Tagesumsatz auf und bei „Nein“ den Monatsumsatz. 

===Vorbestellung===
Hier wird eine Bestellung als Vorbestellung markiert. Vorbestellungen können nicht im aktuellem Datum gemacht werden, sondern müssen in der Zukunft liegen. 

===Tagesumsatz verbuchen===
Dient nur zum manuellen Nachbuchen. 

===Tagesabschlussbericht drucken===
Am Ende eines Tages müssen die Kassen überprüft werden. 

===Neuer Benutzer===
Hier kann man einen Benutzer ummelden.

Systemgastronomie-Kasse

2020-10-01T11:56:21Z

Wiki-Admin: /* Änderungen durch die TSE */

{{Vorlage:Kostenpflichtige Module}}
=Systemgastronomie-Kasse=
Für Systemgastronomiebetrieben bietet OBS die Systemgastronomie-Kasse an. Diese wurde den Systemgastronomiebetrieben angepasst und kann bei Anfrage einfach zugebucht werden. 

[[Image:Systemgastronomie-Kasse.png|500px|Oberfläche der Belegerfassung]]
[[Image:Fahrererfassung.png|500px|Oberflächer der Fahrererfassung]]
[[Image:Systemgastronomie-Zeiterfassung.png|500px|Oberfläche der Zeiterfassung]]

==Handbuch==
Eine Übersichtliche Erklärung der Systemgastronomiekasse erhalten sie auch im [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf Handbuch].

<imagemap>
Datei:OBS-Handbuch-Systemgastronomie-Kasse.png|300px|thumb
default [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf]
</imagemap>

==Änderungen durch die TSE==
Durch die Einführung der TSE ergeben sich einige Änderungen bei der Bedienung:
* Wenn der Kunde eingegeben wurde und in die Artikelerfassung gelangt, wird der Bon gestartet. Wird der Vorgang danach abgebrochen, wird ein leerer Bon gespeichert und ein Abbruch an die TSE gemeldet.
* Wird telefonisch eine Abholbestllung aufgegeben, so darf im ersten Schritt kein Beleg gedruckt werden. Es erscheint eine Abfrage ob, der "Bon direkt abgeschlossen werden soll". Dies muss am Anfang mit nein beantwortet werden, dadruch wird eine Bestellung gedruckt. Diese enthält alle Positionen, die bestellt wurden, aber es sind keine Endbeträge enthalten. Holt der Kunde die Ware ab und bezahlt, wird der echte Beleg gedruckt. In der Übersicht der Offenen Bestellungen [Unter F10 -> 8 "Offene Bestellungen"] findet sich unter F10 -> V die Liste der Vorbestellungen. Diese können mit ENTER wieder in die Erfassung übernommen werden und bei der Abfrage vor dem Drucken mit "Ja" beantwortet werden.
* Wieder in die Erfassung übernommene Vorbestellungen dürfen nicht mehr verändert werden, nur erweitert. Wenn der Kunde eine Position nicht mehr möchte, muss diese mit einer gleichen Minus Position storniert werden. Eine entsprechende Meldung erscheint bei dem Versuch.
* Die übernommenen Vorbestellungen können über ESC abgebrochen werden und es wird auch hier ein leerer Bon gespeichert.
* Lieferbestellungen werden als "Forderungen" an die TSE übergeben, da es in dem Moment keinen Geldfluss gibt. Wird der Mitarbeiter abgemeldet, werden für alle seine Touren entsprechende Geldzu- und Abgänge gebucht. Diese stehen dann auch mit auf dem Tagesabschlussbericht.
* Es gibt nun einen Trainingsmodus, der über einen neuen Standardkunden läuft (die 600). Dort können Positionen erfasst werden, ohne das ein Bon erstellt werden kann. Dies dient z.B. zur Preisauskunft

==Schnelleinstieg==
Hier ein grober Überblick über den Ablauf und Funktionsweise der Systemgastronomiekasse. 

===Anmelden===
Ein Mitarbeiter muss sich in der Zeiterfassung anmelden, damit, zum Beispiel die Arbeitszeit, Pausen und die gefahrenen Kilometer erfasst werden. 
Dies wird durch das einscannen der Mitarbeiterkarte gemacht. War die Anmeldung erfolgreich, wird der Mitarbeiter in der Liste "Angemeldete Mitarbeiter" aufgelistet. 
Wird der Mitarbeiter nicht aufgelistet, wurde bei der Anmeldung ein Fehler gemacht. Hier muss sich der Mitarbeiter einfach nochmal anmelden 

===Bestellungen entgegen nehmen===
Um eine Bestellung entgegen zu nehmen, müssen zuerst die Kundendaten erfasst werden. Durch die Eingabe der Kundennummer, werden automatisch die restlichen Felder ausgefüllt. 
Ein neuer Kunde muss registriert werden. Im Kassenmenü unter der Funktion "Neuer Kunde" kann der Kunde registriert werden. 
Nach erfassen der Kundendaten wird mit {{Key|F2 Bon}} die Bestellung aufgenommen werden, dies geschieht durch die Eingabe der Nummer der Positionen und wird mit Enter bestätigt. Danach gibt man die Menge der Positionen ein.
Im Kassenmenü kann die Bestellung angepasst werden, um z.B. eine Bestellung als Abhol-Bestellung zu markieren. 
Mit {{Key|F3 Drucken}} wird die Bestellung fertiggestellt und ausgedruckt. 

===Bestellung ausliefern===
Um eine Bestellung auszuliefern, muss sich ein Mitarbeiter für eine oder mehrere Bestellungen in der Fahrererfassung eintragen. 
Die Bestellungen werden dann vom System als erledigt gesehen. 

===Bestellung abschließen===
Eine Bestellung kann durch einscannen der Mitarbeiter und einscannen der Rechnung abgeschlossen werden. 
Das System sieht diese Bestellung dann als erledigt und listet diese nicht mehr auf. 

===Abmelden===
Ist ein Mitarbeiter fertig mit seiner Schicht, kann er sich im Kassenmenü abmelden. 
Wenn der Mitarbeiter ein Privatfahrzeug mit angemeldet hatte, fragt das System nach den Kilometerstand um die Fahrtkosten zu erstatten. 

==Menü-Erläuterung==
Hier wird ihnen das Kassenmenü gezeigt und erklärt 

[[Image:Systemgastronomie-Kassenmenü.png|325px|Das Kassenmenü]]

===Telefon ändern===
Ein neuer Kunde kann ins System eingetragen und mit {{Key|F2}} gespeichert werden. 

===Straße ändern===
Hier kann die Adresse des ausgewählten Kunden gepflegt werden. 

===Bemerkung Kunde eingeben===
Wenn der Kunde bestimmte Wünsche hat oder wichtige Information gibt, kann diese in die Bemerkung vermerkt werden. 

===Bestellliste anzeigen===
Hier werden alle verbuchten Bestellungen aufgelistet. Eine Bestellung kann nach Wunsch mit {{Key|F3 Druck}} nachgedruckt oder eingesehen werden. 

===Namen ändern===
Der Name des ausgewählten Kunden kann gepflegt werden. 

===Gutschrift eingeben===
Hier kann eine Gutschrift eingegeben werden. Dies geht aber nur, wenn {{Key|F2 Bon}} schon gedrückt wurde. 

===Offene Bestellungen===
Hier werden alle Bestellungen aufgelistet die noch nicht verbucht worden sind. Wenn sich etwas an der Bestellung ändert, kann man diese unter {{Key|F10}} „Weitere Funktionen“ nachträglich bearbeiten. 

===Mindestbestellwert===
Der Mindestbestellwert kann verändert werden. 

===Auswertung===
Hat noch keine Funktion 

===Geld-Abgang===
Wenn Geld aus der Kasse entnommen wurde, muss dies hier angegeben werden. 

===Geld-Zugang===
Wenn Geld in die Kasse hinzugefügt wurde, muss dies hier angeben werden. 

===Stammdaten===
In den Stammdaten können verschiedene Daten bearbeitet werden. 

[[Image:Systemgastronomie Untermenü-Stammdaten.png|325px|Das Untermenü von Stammdaten]]

====Buchungstexte Abgang/Zugang bearbeiten====
Hier können die Geldzugänge / Geldausgänge die Buchungstexte gepflegt werden. Es können hier auch mit einfg neue Verwendungszwecke hinzugefügt werden. 
Mit {{Key|F3}} kann ein Kassenbuchtext ausgedruckt werden. 

====Liste Geld – Abgang/Zugang====
Hier werden die Geldzugänge und -abgänge aufgelistet. 

====Mitarbeiter bearbeiten====
Hier werden die Daten der Mitarbeiter gepflegt. 

====Fahrzeuge bearbeiten====
Hier werden die Daten der Fahrzeuge gepflegt. 

====PLZ-Ort Straße bearbeiten====
Hier werden die Daten von Orten gepflegt. Hier kann man auch den Mindestbestellwert für einen Ort eingeben. 

====Bestell Historie====
Hier werden alle Bestellungen aufgelistet. Eine Bestellung kann mit {{Key|F3}} nachgedruckt oder eingesehen werden. 

====Mitarbeiter KM/Lohn Historie====
Hier werden die Daten wie Lohn pro Stunde, Lohn, gefahrene Kilometer, Kilometer Geld und etc. aufgelistet. 

====Hauptkasse definieren====
Zeigt die genutzte Kasse mit Kassenbeständen. 

====Config====
Hier kann die Kasse konfiguriert werden. 

===Abholbestellung===
Möchte der Kunde seine Bestellung selber abholen, kann diese damit markiert werden. 
Mit Termin kann auch der Abholtermin eingegeben werden (Siehe Termin). 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===EC Zahlung===
Hier wird vermerkt, ob die Bestellung mit der EC-Karte bezahlt wurde. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Im Haus===
Möchte der Kunde seine Bestellung gleich in der Filiale essen, kann diese mit „Im Haus“ gekennzeichnet werden. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Online Payment===
Hier wird vermerkt, ob die Bestellung aus dem Internet kommt. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Mitarbeiter abmelden===
Ist ein Mitarbeiter fertig, so kann er sich hier abmelden. Es wird dann automatisch ein Dokument erstellt. 

===Stundenerfassung===
Her werden alle Mitarbeiter aufgelistet, um auf ihre Datensätze zuzugreifen. 
Mit {{Key|F6}} wird eine Liste ausgegeben die auflistet was ein Mitarbeiter für Aufgaben tätigte. 
Mit {{Key|F10}} wird ein Optionsfenster geöffnet, darin sind folgende Optionen: 

====Mitarbeiter inaktiv setzen====
Setzt ausgewählten Mitarbeiter inaktiv. So wird dieser vom System nicht mehr beachtet und wird von vielen Listen ausgeblendet. 

====Mitarbeiter reaktivieren====
Reaktiviert einen ausgewählten Mitarbeiter. Dieser wird dann wieder vom System berücksichtigt und wird wieder auf Listen aufgelistet. 

====QR-Code anzeigen====
Zeigt den QR-Code des ausgewählten Mitarbeiters an. Dieser kann mit {{Key|F2}} kopiert oder mit {{Key|F3}} ausgedruckt werden. 

====QR-Zeiten Excel Monatsauswertung aller Mitarbeiter====
Es wird eine Excel-Datei ausgegeben die die Monatsauswertung aller Mitarbeiter beinhaltet. 

===Termin===
Hier kann man auf der Bestellung ein Abholtermin vermerken. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion und leer lassen des Textfeldes. 

===Umsatzbericht===
Listet bei „Ja“ den Tagesumsatz auf und bei „Nein“ den Monatsumsatz. 

===Vorbestellung===
Hier wird eine Bestellung als Vorbestellung markiert. Vorbestellungen können nicht im aktuellem Datum gemacht werden, sondern müssen in der Zukunft liegen. 

===Tagesumsatz verbuchen===
Dient nur zum manuellen Nachbuchen. 

===Tagesabschlussbericht drucken===
Am Ende eines Tages müssen die Kassen überprüft werden. 

===Neuer Benutzer===
Hier kann man einen Benutzer ummelden.

Systemgastronomie-Kasse

2020-10-01T11:52:56Z

Wiki-Admin: /* Änderungen durch die TSE */

{{Vorlage:Kostenpflichtige Module}}
=Systemgastronomie-Kasse=
Für Systemgastronomiebetrieben bietet OBS die Systemgastronomie-Kasse an. Diese wurde den Systemgastronomiebetrieben angepasst und kann bei Anfrage einfach zugebucht werden. 

[[Image:Systemgastronomie-Kasse.png|500px|Oberfläche der Belegerfassung]]
[[Image:Fahrererfassung.png|500px|Oberflächer der Fahrererfassung]]
[[Image:Systemgastronomie-Zeiterfassung.png|500px|Oberfläche der Zeiterfassung]]

==Handbuch==
Eine Übersichtliche Erklärung der Systemgastronomiekasse erhalten sie auch im [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf Handbuch].

<imagemap>
Datei:OBS-Handbuch-Systemgastronomie-Kasse.png|300px|thumb
default [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf]
</imagemap>

==Änderungen durch die TSE==
Durch die Einführung der TSE ergeben sich einige Änderungen bei der Bedienung:
* Wenn der Kunde eingegeben wurde und in die Artikelerfassung gelangt, wird der Bon gestartet. Wird der Vorgang danach abgebrochen, wird ein Leerer Bon gespeichert und ein Abbruch an die TSE gemeldet.
* Wird telefonisch eine Abholbestllung aufgegeben, so darf im ersten Schritt kein Beleg gedruckt werden. Es erscheint eine Abfrage ob, der "Bon direkt abgeschlossen werden soll". Dies muss am Anfang mit nein beantwortet werden, dadruch wird eine Bestellung gedruckt. Diese enthält alle Positionen, die bestellt wurden, aber es sind keine Endbeträge enthalten. Holt der Kunde die Ware ab und bezahlt, wird der echte Beleg gedruckt. In der Übersicht der Offenen Bestellungen [Unter F10 -> 8 "Offene Bestellungen"] findet sich unter F10 -> V die Liste der Vorbestellungen. Diese können mit ENTER wieder in die Erfassung übernommen werden und bei der Abfrage vor dem Drucken mit "Ja" beantwortet werden.
* Wieder in die Erfassung übernommene Vorbestellungen dürfen nicht mehr verändert werden, nur erweitert. Wenn der Kunde eine Position nicht mehr möchte, muss diese mit einer gleichen Minus Position storniert werden. Eine entsprechende Meldung erscheint bei dem Versuch.
* Lieferbestellungen werden als "Forderungen" an die TSE übergeben, da es in dem Moment keinen Geldfluss gibt. Wird der Mitarbeiter abgemeldet, werden für alle seine Touren entsprechende Geldzu- und Abgänge gebucht. Diese stehen dann auch mit auf dem Tagesabschlussbericht.
* Es gibt nun einen Trainingsmodus, der über einen neuen Standardkunden läuft (die 600). Dort können Positionen erfasst werden, ohne das ein Bon erstellt werden kann. Dies dient z.B. zur Preisauskunft

==Schnelleinstieg==
Hier ein grober Überblick über den Ablauf und Funktionsweise der Systemgastronomiekasse. 

===Anmelden===
Ein Mitarbeiter muss sich in der Zeiterfassung anmelden, damit, zum Beispiel die Arbeitszeit, Pausen und die gefahrenen Kilometer erfasst werden. 
Dies wird durch das einscannen der Mitarbeiterkarte gemacht. War die Anmeldung erfolgreich, wird der Mitarbeiter in der Liste "Angemeldete Mitarbeiter" aufgelistet. 
Wird der Mitarbeiter nicht aufgelistet, wurde bei der Anmeldung ein Fehler gemacht. Hier muss sich der Mitarbeiter einfach nochmal anmelden 

===Bestellungen entgegen nehmen===
Um eine Bestellung entgegen zu nehmen, müssen zuerst die Kundendaten erfasst werden. Durch die Eingabe der Kundennummer, werden automatisch die restlichen Felder ausgefüllt. 
Ein neuer Kunde muss registriert werden. Im Kassenmenü unter der Funktion "Neuer Kunde" kann der Kunde registriert werden. 
Nach erfassen der Kundendaten wird mit {{Key|F2 Bon}} die Bestellung aufgenommen werden, dies geschieht durch die Eingabe der Nummer der Positionen und wird mit Enter bestätigt. Danach gibt man die Menge der Positionen ein.
Im Kassenmenü kann die Bestellung angepasst werden, um z.B. eine Bestellung als Abhol-Bestellung zu markieren. 
Mit {{Key|F3 Drucken}} wird die Bestellung fertiggestellt und ausgedruckt. 

===Bestellung ausliefern===
Um eine Bestellung auszuliefern, muss sich ein Mitarbeiter für eine oder mehrere Bestellungen in der Fahrererfassung eintragen. 
Die Bestellungen werden dann vom System als erledigt gesehen. 

===Bestellung abschließen===
Eine Bestellung kann durch einscannen der Mitarbeiter und einscannen der Rechnung abgeschlossen werden. 
Das System sieht diese Bestellung dann als erledigt und listet diese nicht mehr auf. 

===Abmelden===
Ist ein Mitarbeiter fertig mit seiner Schicht, kann er sich im Kassenmenü abmelden. 
Wenn der Mitarbeiter ein Privatfahrzeug mit angemeldet hatte, fragt das System nach den Kilometerstand um die Fahrtkosten zu erstatten. 

==Menü-Erläuterung==
Hier wird ihnen das Kassenmenü gezeigt und erklärt 

[[Image:Systemgastronomie-Kassenmenü.png|325px|Das Kassenmenü]]

===Telefon ändern===
Ein neuer Kunde kann ins System eingetragen und mit {{Key|F2}} gespeichert werden. 

===Straße ändern===
Hier kann die Adresse des ausgewählten Kunden gepflegt werden. 

===Bemerkung Kunde eingeben===
Wenn der Kunde bestimmte Wünsche hat oder wichtige Information gibt, kann diese in die Bemerkung vermerkt werden. 

===Bestellliste anzeigen===
Hier werden alle verbuchten Bestellungen aufgelistet. Eine Bestellung kann nach Wunsch mit {{Key|F3 Druck}} nachgedruckt oder eingesehen werden. 

===Namen ändern===
Der Name des ausgewählten Kunden kann gepflegt werden. 

===Gutschrift eingeben===
Hier kann eine Gutschrift eingegeben werden. Dies geht aber nur, wenn {{Key|F2 Bon}} schon gedrückt wurde. 

===Offene Bestellungen===
Hier werden alle Bestellungen aufgelistet die noch nicht verbucht worden sind. Wenn sich etwas an der Bestellung ändert, kann man diese unter {{Key|F10}} „Weitere Funktionen“ nachträglich bearbeiten. 

===Mindestbestellwert===
Der Mindestbestellwert kann verändert werden. 

===Auswertung===
Hat noch keine Funktion 

===Geld-Abgang===
Wenn Geld aus der Kasse entnommen wurde, muss dies hier angegeben werden. 

===Geld-Zugang===
Wenn Geld in die Kasse hinzugefügt wurde, muss dies hier angeben werden. 

===Stammdaten===
In den Stammdaten können verschiedene Daten bearbeitet werden. 

[[Image:Systemgastronomie Untermenü-Stammdaten.png|325px|Das Untermenü von Stammdaten]]

====Buchungstexte Abgang/Zugang bearbeiten====
Hier können die Geldzugänge / Geldausgänge die Buchungstexte gepflegt werden. Es können hier auch mit einfg neue Verwendungszwecke hinzugefügt werden. 
Mit {{Key|F3}} kann ein Kassenbuchtext ausgedruckt werden. 

====Liste Geld – Abgang/Zugang====
Hier werden die Geldzugänge und -abgänge aufgelistet. 

====Mitarbeiter bearbeiten====
Hier werden die Daten der Mitarbeiter gepflegt. 

====Fahrzeuge bearbeiten====
Hier werden die Daten der Fahrzeuge gepflegt. 

====PLZ-Ort Straße bearbeiten====
Hier werden die Daten von Orten gepflegt. Hier kann man auch den Mindestbestellwert für einen Ort eingeben. 

====Bestell Historie====
Hier werden alle Bestellungen aufgelistet. Eine Bestellung kann mit {{Key|F3}} nachgedruckt oder eingesehen werden. 

====Mitarbeiter KM/Lohn Historie====
Hier werden die Daten wie Lohn pro Stunde, Lohn, gefahrene Kilometer, Kilometer Geld und etc. aufgelistet. 

====Hauptkasse definieren====
Zeigt die genutzte Kasse mit Kassenbeständen. 

====Config====
Hier kann die Kasse konfiguriert werden. 

===Abholbestellung===
Möchte der Kunde seine Bestellung selber abholen, kann diese damit markiert werden. 
Mit Termin kann auch der Abholtermin eingegeben werden (Siehe Termin). 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===EC Zahlung===
Hier wird vermerkt, ob die Bestellung mit der EC-Karte bezahlt wurde. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Im Haus===
Möchte der Kunde seine Bestellung gleich in der Filiale essen, kann diese mit „Im Haus“ gekennzeichnet werden. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Online Payment===
Hier wird vermerkt, ob die Bestellung aus dem Internet kommt. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Mitarbeiter abmelden===
Ist ein Mitarbeiter fertig, so kann er sich hier abmelden. Es wird dann automatisch ein Dokument erstellt. 

===Stundenerfassung===
Her werden alle Mitarbeiter aufgelistet, um auf ihre Datensätze zuzugreifen. 
Mit {{Key|F6}} wird eine Liste ausgegeben die auflistet was ein Mitarbeiter für Aufgaben tätigte. 
Mit {{Key|F10}} wird ein Optionsfenster geöffnet, darin sind folgende Optionen: 

====Mitarbeiter inaktiv setzen====
Setzt ausgewählten Mitarbeiter inaktiv. So wird dieser vom System nicht mehr beachtet und wird von vielen Listen ausgeblendet. 

====Mitarbeiter reaktivieren====
Reaktiviert einen ausgewählten Mitarbeiter. Dieser wird dann wieder vom System berücksichtigt und wird wieder auf Listen aufgelistet. 

====QR-Code anzeigen====
Zeigt den QR-Code des ausgewählten Mitarbeiters an. Dieser kann mit {{Key|F2}} kopiert oder mit {{Key|F3}} ausgedruckt werden. 

====QR-Zeiten Excel Monatsauswertung aller Mitarbeiter====
Es wird eine Excel-Datei ausgegeben die die Monatsauswertung aller Mitarbeiter beinhaltet. 

===Termin===
Hier kann man auf der Bestellung ein Abholtermin vermerken. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion und leer lassen des Textfeldes. 

===Umsatzbericht===
Listet bei „Ja“ den Tagesumsatz auf und bei „Nein“ den Monatsumsatz. 

===Vorbestellung===
Hier wird eine Bestellung als Vorbestellung markiert. Vorbestellungen können nicht im aktuellem Datum gemacht werden, sondern müssen in der Zukunft liegen. 

===Tagesumsatz verbuchen===
Dient nur zum manuellen Nachbuchen. 

===Tagesabschlussbericht drucken===
Am Ende eines Tages müssen die Kassen überprüft werden. 

===Neuer Benutzer===
Hier kann man einen Benutzer ummelden.

Systemgastronomie-Kasse

2020-10-01T11:52:41Z

Wiki-Admin: /* Änderungen durch die TSE */

{{Vorlage:Kostenpflichtige Module}}
=Systemgastronomie-Kasse=
Für Systemgastronomiebetrieben bietet OBS die Systemgastronomie-Kasse an. Diese wurde den Systemgastronomiebetrieben angepasst und kann bei Anfrage einfach zugebucht werden. 

[[Image:Systemgastronomie-Kasse.png|500px|Oberfläche der Belegerfassung]]
[[Image:Fahrererfassung.png|500px|Oberflächer der Fahrererfassung]]
[[Image:Systemgastronomie-Zeiterfassung.png|500px|Oberfläche der Zeiterfassung]]

==Handbuch==
Eine Übersichtliche Erklärung der Systemgastronomiekasse erhalten sie auch im [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf Handbuch].

<imagemap>
Datei:OBS-Handbuch-Systemgastronomie-Kasse.png|300px|thumb
default [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf]
</imagemap>

==Änderungen durch die TSE==
Durch die Einführung der TSE ergeben sich einige Änderungen bei der Bedienung:
* Wenn der Kunde eingegeben wurde und in die Artikelerfassung gelangt, wird der Bon gestartet. Wird der Vorgang danach abgebrochen, wird ein Leerer Bon gespeichert und ein Abbruch an die TSE gemeldet.
* Wird telefonisch eine Abholbestllung aufgegeben, so darf im ersten Schritt kein Beleg gedruckt werden. Es erscheint eine Abfrage ob, der "Bon direkt abgeschlossen werden soll". Dies muss am Anfang mit nein beantwortet werden, dadruch wird eine Bestellung gedruckt. Diese enthält alle Positionen, die bestellt wurden, aber es sind keine Endbeträge enthalten. Holt der Kunde die Ware ab und bezahlt, wird der echte Beleg gedruckt.
In der Übersicht der Offenen Bestellungen [Unter F10 -> 8 "Offene Bestellungen"] findet sich unter F10 -> V die Liste der Vorbestellungen. Diese können mit ENTER wieder in die Erfassung übernommen werden und bei der Abfrage vor dem Drucken mit "Ja" beantwortet werden.
* Wieder in die Erfassung übernommene Vorbestellungen dürfen nicht mehr verändert werden, nur erweitert. Wenn der Kunde eine Position nicht mehr möchte, muss diese mit einer gleichen Minus Position storniert werden. Eine entsprechende Meldung erscheint bei dem Versuch.
* Lieferbestellungen werden als "Forderungen" an die TSE übergeben, da es in dem Moment keinen Geldfluss gibt. Wird der Mitarbeiter abgemeldet, werden für alle seine Touren entsprechende Geldzu- und Abgänge gebucht. Diese stehen dann auch mit auf dem Tagesabschlussbericht.
* Es gibt nun einen Trainingsmodus, der über einen neuen Standardkunden läuft (die 600). Dort können Positionen erfasst werden, ohne das ein Bon erstellt werden kann. Dies dient z.B. zur Preisauskunft

==Schnelleinstieg==
Hier ein grober Überblick über den Ablauf und Funktionsweise der Systemgastronomiekasse. 

===Anmelden===
Ein Mitarbeiter muss sich in der Zeiterfassung anmelden, damit, zum Beispiel die Arbeitszeit, Pausen und die gefahrenen Kilometer erfasst werden. 
Dies wird durch das einscannen der Mitarbeiterkarte gemacht. War die Anmeldung erfolgreich, wird der Mitarbeiter in der Liste "Angemeldete Mitarbeiter" aufgelistet. 
Wird der Mitarbeiter nicht aufgelistet, wurde bei der Anmeldung ein Fehler gemacht. Hier muss sich der Mitarbeiter einfach nochmal anmelden 

===Bestellungen entgegen nehmen===
Um eine Bestellung entgegen zu nehmen, müssen zuerst die Kundendaten erfasst werden. Durch die Eingabe der Kundennummer, werden automatisch die restlichen Felder ausgefüllt. 
Ein neuer Kunde muss registriert werden. Im Kassenmenü unter der Funktion "Neuer Kunde" kann der Kunde registriert werden. 
Nach erfassen der Kundendaten wird mit {{Key|F2 Bon}} die Bestellung aufgenommen werden, dies geschieht durch die Eingabe der Nummer der Positionen und wird mit Enter bestätigt. Danach gibt man die Menge der Positionen ein.
Im Kassenmenü kann die Bestellung angepasst werden, um z.B. eine Bestellung als Abhol-Bestellung zu markieren. 
Mit {{Key|F3 Drucken}} wird die Bestellung fertiggestellt und ausgedruckt. 

===Bestellung ausliefern===
Um eine Bestellung auszuliefern, muss sich ein Mitarbeiter für eine oder mehrere Bestellungen in der Fahrererfassung eintragen. 
Die Bestellungen werden dann vom System als erledigt gesehen. 

===Bestellung abschließen===
Eine Bestellung kann durch einscannen der Mitarbeiter und einscannen der Rechnung abgeschlossen werden. 
Das System sieht diese Bestellung dann als erledigt und listet diese nicht mehr auf. 

===Abmelden===
Ist ein Mitarbeiter fertig mit seiner Schicht, kann er sich im Kassenmenü abmelden. 
Wenn der Mitarbeiter ein Privatfahrzeug mit angemeldet hatte, fragt das System nach den Kilometerstand um die Fahrtkosten zu erstatten. 

==Menü-Erläuterung==
Hier wird ihnen das Kassenmenü gezeigt und erklärt 

[[Image:Systemgastronomie-Kassenmenü.png|325px|Das Kassenmenü]]

===Telefon ändern===
Ein neuer Kunde kann ins System eingetragen und mit {{Key|F2}} gespeichert werden. 

===Straße ändern===
Hier kann die Adresse des ausgewählten Kunden gepflegt werden. 

===Bemerkung Kunde eingeben===
Wenn der Kunde bestimmte Wünsche hat oder wichtige Information gibt, kann diese in die Bemerkung vermerkt werden. 

===Bestellliste anzeigen===
Hier werden alle verbuchten Bestellungen aufgelistet. Eine Bestellung kann nach Wunsch mit {{Key|F3 Druck}} nachgedruckt oder eingesehen werden. 

===Namen ändern===
Der Name des ausgewählten Kunden kann gepflegt werden. 

===Gutschrift eingeben===
Hier kann eine Gutschrift eingegeben werden. Dies geht aber nur, wenn {{Key|F2 Bon}} schon gedrückt wurde. 

===Offene Bestellungen===
Hier werden alle Bestellungen aufgelistet die noch nicht verbucht worden sind. Wenn sich etwas an der Bestellung ändert, kann man diese unter {{Key|F10}} „Weitere Funktionen“ nachträglich bearbeiten. 

===Mindestbestellwert===
Der Mindestbestellwert kann verändert werden. 

===Auswertung===
Hat noch keine Funktion 

===Geld-Abgang===
Wenn Geld aus der Kasse entnommen wurde, muss dies hier angegeben werden. 

===Geld-Zugang===
Wenn Geld in die Kasse hinzugefügt wurde, muss dies hier angeben werden. 

===Stammdaten===
In den Stammdaten können verschiedene Daten bearbeitet werden. 

[[Image:Systemgastronomie Untermenü-Stammdaten.png|325px|Das Untermenü von Stammdaten]]

====Buchungstexte Abgang/Zugang bearbeiten====
Hier können die Geldzugänge / Geldausgänge die Buchungstexte gepflegt werden. Es können hier auch mit einfg neue Verwendungszwecke hinzugefügt werden. 
Mit {{Key|F3}} kann ein Kassenbuchtext ausgedruckt werden. 

====Liste Geld – Abgang/Zugang====
Hier werden die Geldzugänge und -abgänge aufgelistet. 

====Mitarbeiter bearbeiten====
Hier werden die Daten der Mitarbeiter gepflegt. 

====Fahrzeuge bearbeiten====
Hier werden die Daten der Fahrzeuge gepflegt. 

====PLZ-Ort Straße bearbeiten====
Hier werden die Daten von Orten gepflegt. Hier kann man auch den Mindestbestellwert für einen Ort eingeben. 

====Bestell Historie====
Hier werden alle Bestellungen aufgelistet. Eine Bestellung kann mit {{Key|F3}} nachgedruckt oder eingesehen werden. 

====Mitarbeiter KM/Lohn Historie====
Hier werden die Daten wie Lohn pro Stunde, Lohn, gefahrene Kilometer, Kilometer Geld und etc. aufgelistet. 

====Hauptkasse definieren====
Zeigt die genutzte Kasse mit Kassenbeständen. 

====Config====
Hier kann die Kasse konfiguriert werden. 

===Abholbestellung===
Möchte der Kunde seine Bestellung selber abholen, kann diese damit markiert werden. 
Mit Termin kann auch der Abholtermin eingegeben werden (Siehe Termin). 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===EC Zahlung===
Hier wird vermerkt, ob die Bestellung mit der EC-Karte bezahlt wurde. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Im Haus===
Möchte der Kunde seine Bestellung gleich in der Filiale essen, kann diese mit „Im Haus“ gekennzeichnet werden. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Online Payment===
Hier wird vermerkt, ob die Bestellung aus dem Internet kommt. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Mitarbeiter abmelden===
Ist ein Mitarbeiter fertig, so kann er sich hier abmelden. Es wird dann automatisch ein Dokument erstellt. 

===Stundenerfassung===
Her werden alle Mitarbeiter aufgelistet, um auf ihre Datensätze zuzugreifen. 
Mit {{Key|F6}} wird eine Liste ausgegeben die auflistet was ein Mitarbeiter für Aufgaben tätigte. 
Mit {{Key|F10}} wird ein Optionsfenster geöffnet, darin sind folgende Optionen: 

====Mitarbeiter inaktiv setzen====
Setzt ausgewählten Mitarbeiter inaktiv. So wird dieser vom System nicht mehr beachtet und wird von vielen Listen ausgeblendet. 

====Mitarbeiter reaktivieren====
Reaktiviert einen ausgewählten Mitarbeiter. Dieser wird dann wieder vom System berücksichtigt und wird wieder auf Listen aufgelistet. 

====QR-Code anzeigen====
Zeigt den QR-Code des ausgewählten Mitarbeiters an. Dieser kann mit {{Key|F2}} kopiert oder mit {{Key|F3}} ausgedruckt werden. 

====QR-Zeiten Excel Monatsauswertung aller Mitarbeiter====
Es wird eine Excel-Datei ausgegeben die die Monatsauswertung aller Mitarbeiter beinhaltet. 

===Termin===
Hier kann man auf der Bestellung ein Abholtermin vermerken. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion und leer lassen des Textfeldes. 

===Umsatzbericht===
Listet bei „Ja“ den Tagesumsatz auf und bei „Nein“ den Monatsumsatz. 

===Vorbestellung===
Hier wird eine Bestellung als Vorbestellung markiert. Vorbestellungen können nicht im aktuellem Datum gemacht werden, sondern müssen in der Zukunft liegen. 

===Tagesumsatz verbuchen===
Dient nur zum manuellen Nachbuchen. 

===Tagesabschlussbericht drucken===
Am Ende eines Tages müssen die Kassen überprüft werden. 

===Neuer Benutzer===
Hier kann man einen Benutzer ummelden.

Systemgastronomie-Kasse

2020-10-01T11:51:47Z

Wiki-Admin: /* Änderungen durch die TSE */

{{Vorlage:Kostenpflichtige Module}}
=Systemgastronomie-Kasse=
Für Systemgastronomiebetrieben bietet OBS die Systemgastronomie-Kasse an. Diese wurde den Systemgastronomiebetrieben angepasst und kann bei Anfrage einfach zugebucht werden. 

[[Image:Systemgastronomie-Kasse.png|500px|Oberfläche der Belegerfassung]]
[[Image:Fahrererfassung.png|500px|Oberflächer der Fahrererfassung]]
[[Image:Systemgastronomie-Zeiterfassung.png|500px|Oberfläche der Zeiterfassung]]

==Handbuch==
Eine Übersichtliche Erklärung der Systemgastronomiekasse erhalten sie auch im [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf Handbuch].

<imagemap>
Datei:OBS-Handbuch-Systemgastronomie-Kasse.png|300px|thumb
default [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf]
</imagemap>

==Änderungen durch die TSE==
Durch die Einführung der TSE ergeben sich einige Änderungen bei der Bedienung:
- Wenn der Kunde eingegeben wurde und in die Artikelerfassung gelangt, wird der Bon gestartet. Wird der Vorgang danach abgebrochen, wird ein Leerer Bon gespeichert und ein Abbruch an die TSE gemeldet.
- Wird telefonisch eine Abholbestllung aufgegeben, so darf im ersten Schritt kein Beleg gedruckt werden. Es erscheint eine Abfrage ob, der "Bon direkt abgeschlossen werden soll". Dies muss am Anfang mit nein beantwortet werden, dadruch wird eine Bestellung gedruckt. Diese enthält alle Positionen, die bestellt wurden, aber es sind keine Endbeträge enthalten. Holt der Kunde die Ware ab und bezahlt, wird der echte Beleg gedruckt.
In der Übersicht der Offenen Bestellungen [Unter F10 -> 8 "Offene Bestellungen"] findet sich unter F10 -> V die Liste der Vorbestellungen. Diese können mit ENTER wieder in die Erfassung übernommen werden und bei der Abfrage vor dem Drucken mit "Ja" beantwortet werden.
- Wieder in die Erfassung übernommene Vorbestellungen dürfen nicht mehr verändert werden, nur erweitert. Wenn der Kunde eine Position nicht mehr möchte, muss diese mit einer gleichen Minus Position storniert werden. Eine entsprechende Meldung erscheint bei dem Versuch.
- Lieferbestellungen werden als "Forderungen" an die TSE übergeben, da es in dem Moment keinen Geldfluss gibt. Wird der Mitarbeiter abgemeldet, werden für alle seine Touren entsprechende Geldzu- und Abgänge gebucht. Diese stehen dann auch mit auf dem Tagesabschlussbericht.
- Es gibt nun einen Trainingsmodus, der über einen neuen Standardkunden läuft (die 600). Dort können Positionen erfasst werden, ohne das ein Bon erstellt werden kann. Dies dient z.B. zur Preisauskunft

==Schnelleinstieg==
Hier ein grober Überblick über den Ablauf und Funktionsweise der Systemgastronomiekasse. 

===Anmelden===
Ein Mitarbeiter muss sich in der Zeiterfassung anmelden, damit, zum Beispiel die Arbeitszeit, Pausen und die gefahrenen Kilometer erfasst werden. 
Dies wird durch das einscannen der Mitarbeiterkarte gemacht. War die Anmeldung erfolgreich, wird der Mitarbeiter in der Liste "Angemeldete Mitarbeiter" aufgelistet. 
Wird der Mitarbeiter nicht aufgelistet, wurde bei der Anmeldung ein Fehler gemacht. Hier muss sich der Mitarbeiter einfach nochmal anmelden 

===Bestellungen entgegen nehmen===
Um eine Bestellung entgegen zu nehmen, müssen zuerst die Kundendaten erfasst werden. Durch die Eingabe der Kundennummer, werden automatisch die restlichen Felder ausgefüllt. 
Ein neuer Kunde muss registriert werden. Im Kassenmenü unter der Funktion "Neuer Kunde" kann der Kunde registriert werden. 
Nach erfassen der Kundendaten wird mit {{Key|F2 Bon}} die Bestellung aufgenommen werden, dies geschieht durch die Eingabe der Nummer der Positionen und wird mit Enter bestätigt. Danach gibt man die Menge der Positionen ein.
Im Kassenmenü kann die Bestellung angepasst werden, um z.B. eine Bestellung als Abhol-Bestellung zu markieren. 
Mit {{Key|F3 Drucken}} wird die Bestellung fertiggestellt und ausgedruckt. 

===Bestellung ausliefern===
Um eine Bestellung auszuliefern, muss sich ein Mitarbeiter für eine oder mehrere Bestellungen in der Fahrererfassung eintragen. 
Die Bestellungen werden dann vom System als erledigt gesehen. 

===Bestellung abschließen===
Eine Bestellung kann durch einscannen der Mitarbeiter und einscannen der Rechnung abgeschlossen werden. 
Das System sieht diese Bestellung dann als erledigt und listet diese nicht mehr auf. 

===Abmelden===
Ist ein Mitarbeiter fertig mit seiner Schicht, kann er sich im Kassenmenü abmelden. 
Wenn der Mitarbeiter ein Privatfahrzeug mit angemeldet hatte, fragt das System nach den Kilometerstand um die Fahrtkosten zu erstatten. 

==Menü-Erläuterung==
Hier wird ihnen das Kassenmenü gezeigt und erklärt 

[[Image:Systemgastronomie-Kassenmenü.png|325px|Das Kassenmenü]]

===Telefon ändern===
Ein neuer Kunde kann ins System eingetragen und mit {{Key|F2}} gespeichert werden. 

===Straße ändern===
Hier kann die Adresse des ausgewählten Kunden gepflegt werden. 

===Bemerkung Kunde eingeben===
Wenn der Kunde bestimmte Wünsche hat oder wichtige Information gibt, kann diese in die Bemerkung vermerkt werden. 

===Bestellliste anzeigen===
Hier werden alle verbuchten Bestellungen aufgelistet. Eine Bestellung kann nach Wunsch mit {{Key|F3 Druck}} nachgedruckt oder eingesehen werden. 

===Namen ändern===
Der Name des ausgewählten Kunden kann gepflegt werden. 

===Gutschrift eingeben===
Hier kann eine Gutschrift eingegeben werden. Dies geht aber nur, wenn {{Key|F2 Bon}} schon gedrückt wurde. 

===Offene Bestellungen===
Hier werden alle Bestellungen aufgelistet die noch nicht verbucht worden sind. Wenn sich etwas an der Bestellung ändert, kann man diese unter {{Key|F10}} „Weitere Funktionen“ nachträglich bearbeiten. 

===Mindestbestellwert===
Der Mindestbestellwert kann verändert werden. 

===Auswertung===
Hat noch keine Funktion 

===Geld-Abgang===
Wenn Geld aus der Kasse entnommen wurde, muss dies hier angegeben werden. 

===Geld-Zugang===
Wenn Geld in die Kasse hinzugefügt wurde, muss dies hier angeben werden. 

===Stammdaten===
In den Stammdaten können verschiedene Daten bearbeitet werden. 

[[Image:Systemgastronomie Untermenü-Stammdaten.png|325px|Das Untermenü von Stammdaten]]

====Buchungstexte Abgang/Zugang bearbeiten====
Hier können die Geldzugänge / Geldausgänge die Buchungstexte gepflegt werden. Es können hier auch mit einfg neue Verwendungszwecke hinzugefügt werden. 
Mit {{Key|F3}} kann ein Kassenbuchtext ausgedruckt werden. 

====Liste Geld – Abgang/Zugang====
Hier werden die Geldzugänge und -abgänge aufgelistet. 

====Mitarbeiter bearbeiten====
Hier werden die Daten der Mitarbeiter gepflegt. 

====Fahrzeuge bearbeiten====
Hier werden die Daten der Fahrzeuge gepflegt. 

====PLZ-Ort Straße bearbeiten====
Hier werden die Daten von Orten gepflegt. Hier kann man auch den Mindestbestellwert für einen Ort eingeben. 

====Bestell Historie====
Hier werden alle Bestellungen aufgelistet. Eine Bestellung kann mit {{Key|F3}} nachgedruckt oder eingesehen werden. 

====Mitarbeiter KM/Lohn Historie====
Hier werden die Daten wie Lohn pro Stunde, Lohn, gefahrene Kilometer, Kilometer Geld und etc. aufgelistet. 

====Hauptkasse definieren====
Zeigt die genutzte Kasse mit Kassenbeständen. 

====Config====
Hier kann die Kasse konfiguriert werden. 

===Abholbestellung===
Möchte der Kunde seine Bestellung selber abholen, kann diese damit markiert werden. 
Mit Termin kann auch der Abholtermin eingegeben werden (Siehe Termin). 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===EC Zahlung===
Hier wird vermerkt, ob die Bestellung mit der EC-Karte bezahlt wurde. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Im Haus===
Möchte der Kunde seine Bestellung gleich in der Filiale essen, kann diese mit „Im Haus“ gekennzeichnet werden. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Online Payment===
Hier wird vermerkt, ob die Bestellung aus dem Internet kommt. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Mitarbeiter abmelden===
Ist ein Mitarbeiter fertig, so kann er sich hier abmelden. Es wird dann automatisch ein Dokument erstellt. 

===Stundenerfassung===
Her werden alle Mitarbeiter aufgelistet, um auf ihre Datensätze zuzugreifen. 
Mit {{Key|F6}} wird eine Liste ausgegeben die auflistet was ein Mitarbeiter für Aufgaben tätigte. 
Mit {{Key|F10}} wird ein Optionsfenster geöffnet, darin sind folgende Optionen: 

====Mitarbeiter inaktiv setzen====
Setzt ausgewählten Mitarbeiter inaktiv. So wird dieser vom System nicht mehr beachtet und wird von vielen Listen ausgeblendet. 

====Mitarbeiter reaktivieren====
Reaktiviert einen ausgewählten Mitarbeiter. Dieser wird dann wieder vom System berücksichtigt und wird wieder auf Listen aufgelistet. 

====QR-Code anzeigen====
Zeigt den QR-Code des ausgewählten Mitarbeiters an. Dieser kann mit {{Key|F2}} kopiert oder mit {{Key|F3}} ausgedruckt werden. 

====QR-Zeiten Excel Monatsauswertung aller Mitarbeiter====
Es wird eine Excel-Datei ausgegeben die die Monatsauswertung aller Mitarbeiter beinhaltet. 

===Termin===
Hier kann man auf der Bestellung ein Abholtermin vermerken. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion und leer lassen des Textfeldes. 

===Umsatzbericht===
Listet bei „Ja“ den Tagesumsatz auf und bei „Nein“ den Monatsumsatz. 

===Vorbestellung===
Hier wird eine Bestellung als Vorbestellung markiert. Vorbestellungen können nicht im aktuellem Datum gemacht werden, sondern müssen in der Zukunft liegen. 

===Tagesumsatz verbuchen===
Dient nur zum manuellen Nachbuchen. 

===Tagesabschlussbericht drucken===
Am Ende eines Tages müssen die Kassen überprüft werden. 

===Neuer Benutzer===
Hier kann man einen Benutzer ummelden.

Systemgastronomie-Kasse

2020-10-01T11:35:18Z

Wiki-Admin:

{{Vorlage:Kostenpflichtige Module}}
=Systemgastronomie-Kasse=
Für Systemgastronomiebetrieben bietet OBS die Systemgastronomie-Kasse an. Diese wurde den Systemgastronomiebetrieben angepasst und kann bei Anfrage einfach zugebucht werden. 

[[Image:Systemgastronomie-Kasse.png|500px|Oberfläche der Belegerfassung]]
[[Image:Fahrererfassung.png|500px|Oberflächer der Fahrererfassung]]
[[Image:Systemgastronomie-Zeiterfassung.png|500px|Oberfläche der Zeiterfassung]]

==Handbuch==
Eine Übersichtliche Erklärung der Systemgastronomiekasse erhalten sie auch im [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf Handbuch].

<imagemap>
Datei:OBS-Handbuch-Systemgastronomie-Kasse.png|300px|thumb
default [http://wiki.bergau.de/images/7/76/OBS-Handbuch-Systemgastronomie-Kasse.pdf]
</imagemap>

==Änderungen durch die TSE==

==Schnelleinstieg==
Hier ein grober Überblick über den Ablauf und Funktionsweise der Systemgastronomiekasse. 

===Anmelden===
Ein Mitarbeiter muss sich in der Zeiterfassung anmelden, damit, zum Beispiel die Arbeitszeit, Pausen und die gefahrenen Kilometer erfasst werden. 
Dies wird durch das einscannen der Mitarbeiterkarte gemacht. War die Anmeldung erfolgreich, wird der Mitarbeiter in der Liste "Angemeldete Mitarbeiter" aufgelistet. 
Wird der Mitarbeiter nicht aufgelistet, wurde bei der Anmeldung ein Fehler gemacht. Hier muss sich der Mitarbeiter einfach nochmal anmelden 

===Bestellungen entgegen nehmen===
Um eine Bestellung entgegen zu nehmen, müssen zuerst die Kundendaten erfasst werden. Durch die Eingabe der Kundennummer, werden automatisch die restlichen Felder ausgefüllt. 
Ein neuer Kunde muss registriert werden. Im Kassenmenü unter der Funktion "Neuer Kunde" kann der Kunde registriert werden. 
Nach erfassen der Kundendaten wird mit {{Key|F2 Bon}} die Bestellung aufgenommen werden, dies geschieht durch die Eingabe der Nummer der Positionen und wird mit Enter bestätigt. Danach gibt man die Menge der Positionen ein.
Im Kassenmenü kann die Bestellung angepasst werden, um z.B. eine Bestellung als Abhol-Bestellung zu markieren. 
Mit {{Key|F3 Drucken}} wird die Bestellung fertiggestellt und ausgedruckt. 

===Bestellung ausliefern===
Um eine Bestellung auszuliefern, muss sich ein Mitarbeiter für eine oder mehrere Bestellungen in der Fahrererfassung eintragen. 
Die Bestellungen werden dann vom System als erledigt gesehen. 

===Bestellung abschließen===
Eine Bestellung kann durch einscannen der Mitarbeiter und einscannen der Rechnung abgeschlossen werden. 
Das System sieht diese Bestellung dann als erledigt und listet diese nicht mehr auf. 

===Abmelden===
Ist ein Mitarbeiter fertig mit seiner Schicht, kann er sich im Kassenmenü abmelden. 
Wenn der Mitarbeiter ein Privatfahrzeug mit angemeldet hatte, fragt das System nach den Kilometerstand um die Fahrtkosten zu erstatten. 

==Menü-Erläuterung==
Hier wird ihnen das Kassenmenü gezeigt und erklärt 

[[Image:Systemgastronomie-Kassenmenü.png|325px|Das Kassenmenü]]

===Telefon ändern===
Ein neuer Kunde kann ins System eingetragen und mit {{Key|F2}} gespeichert werden. 

===Straße ändern===
Hier kann die Adresse des ausgewählten Kunden gepflegt werden. 

===Bemerkung Kunde eingeben===
Wenn der Kunde bestimmte Wünsche hat oder wichtige Information gibt, kann diese in die Bemerkung vermerkt werden. 

===Bestellliste anzeigen===
Hier werden alle verbuchten Bestellungen aufgelistet. Eine Bestellung kann nach Wunsch mit {{Key|F3 Druck}} nachgedruckt oder eingesehen werden. 

===Namen ändern===
Der Name des ausgewählten Kunden kann gepflegt werden. 

===Gutschrift eingeben===
Hier kann eine Gutschrift eingegeben werden. Dies geht aber nur, wenn {{Key|F2 Bon}} schon gedrückt wurde. 

===Offene Bestellungen===
Hier werden alle Bestellungen aufgelistet die noch nicht verbucht worden sind. Wenn sich etwas an der Bestellung ändert, kann man diese unter {{Key|F10}} „Weitere Funktionen“ nachträglich bearbeiten. 

===Mindestbestellwert===
Der Mindestbestellwert kann verändert werden. 

===Auswertung===
Hat noch keine Funktion 

===Geld-Abgang===
Wenn Geld aus der Kasse entnommen wurde, muss dies hier angegeben werden. 

===Geld-Zugang===
Wenn Geld in die Kasse hinzugefügt wurde, muss dies hier angeben werden. 

===Stammdaten===
In den Stammdaten können verschiedene Daten bearbeitet werden. 

[[Image:Systemgastronomie Untermenü-Stammdaten.png|325px|Das Untermenü von Stammdaten]]

====Buchungstexte Abgang/Zugang bearbeiten====
Hier können die Geldzugänge / Geldausgänge die Buchungstexte gepflegt werden. Es können hier auch mit einfg neue Verwendungszwecke hinzugefügt werden. 
Mit {{Key|F3}} kann ein Kassenbuchtext ausgedruckt werden. 

====Liste Geld – Abgang/Zugang====
Hier werden die Geldzugänge und -abgänge aufgelistet. 

====Mitarbeiter bearbeiten====
Hier werden die Daten der Mitarbeiter gepflegt. 

====Fahrzeuge bearbeiten====
Hier werden die Daten der Fahrzeuge gepflegt. 

====PLZ-Ort Straße bearbeiten====
Hier werden die Daten von Orten gepflegt. Hier kann man auch den Mindestbestellwert für einen Ort eingeben. 

====Bestell Historie====
Hier werden alle Bestellungen aufgelistet. Eine Bestellung kann mit {{Key|F3}} nachgedruckt oder eingesehen werden. 

====Mitarbeiter KM/Lohn Historie====
Hier werden die Daten wie Lohn pro Stunde, Lohn, gefahrene Kilometer, Kilometer Geld und etc. aufgelistet. 

====Hauptkasse definieren====
Zeigt die genutzte Kasse mit Kassenbeständen. 

====Config====
Hier kann die Kasse konfiguriert werden. 

===Abholbestellung===
Möchte der Kunde seine Bestellung selber abholen, kann diese damit markiert werden. 
Mit Termin kann auch der Abholtermin eingegeben werden (Siehe Termin). 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===EC Zahlung===
Hier wird vermerkt, ob die Bestellung mit der EC-Karte bezahlt wurde. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Im Haus===
Möchte der Kunde seine Bestellung gleich in der Filiale essen, kann diese mit „Im Haus“ gekennzeichnet werden. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Online Payment===
Hier wird vermerkt, ob die Bestellung aus dem Internet kommt. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion. 

===Mitarbeiter abmelden===
Ist ein Mitarbeiter fertig, so kann er sich hier abmelden. Es wird dann automatisch ein Dokument erstellt. 

===Stundenerfassung===
Her werden alle Mitarbeiter aufgelistet, um auf ihre Datensätze zuzugreifen. 
Mit {{Key|F6}} wird eine Liste ausgegeben die auflistet was ein Mitarbeiter für Aufgaben tätigte. 
Mit {{Key|F10}} wird ein Optionsfenster geöffnet, darin sind folgende Optionen: 

====Mitarbeiter inaktiv setzen====
Setzt ausgewählten Mitarbeiter inaktiv. So wird dieser vom System nicht mehr beachtet und wird von vielen Listen ausgeblendet. 

====Mitarbeiter reaktivieren====
Reaktiviert einen ausgewählten Mitarbeiter. Dieser wird dann wieder vom System berücksichtigt und wird wieder auf Listen aufgelistet. 

====QR-Code anzeigen====
Zeigt den QR-Code des ausgewählten Mitarbeiters an. Dieser kann mit {{Key|F2}} kopiert oder mit {{Key|F3}} ausgedruckt werden. 

====QR-Zeiten Excel Monatsauswertung aller Mitarbeiter====
Es wird eine Excel-Datei ausgegeben die die Monatsauswertung aller Mitarbeiter beinhaltet. 

===Termin===
Hier kann man auf der Bestellung ein Abholtermin vermerken. 
Kann entfernt werden durch wiederholtes aufrufen der Funktion und leer lassen des Textfeldes. 

===Umsatzbericht===
Listet bei „Ja“ den Tagesumsatz auf und bei „Nein“ den Monatsumsatz. 

===Vorbestellung===
Hier wird eine Bestellung als Vorbestellung markiert. Vorbestellungen können nicht im aktuellem Datum gemacht werden, sondern müssen in der Zukunft liegen. 

===Tagesumsatz verbuchen===
Dient nur zum manuellen Nachbuchen. 

===Tagesabschlussbericht drucken===
Am Ende eines Tages müssen die Kassen überprüft werden. 

===Neuer Benutzer===
Hier kann man einen Benutzer ummelden.

Hauptseite

2020-07-29T06:36:51Z

Wiki-Admin:

<big>Willkommen im Wiki vom Online-Business-System.</big> 
Hier finden Sie viele nützliche Tipps und Hilfestellungen rund um OBS.

{{Hinweis|Die Hilfeseiten befinden sich in ständiger Aktualisierung. Sollten Sie Fragen, Wünsche oder Anregungen haben, teilen Sie uns diese gerne mithilfe unseres [[OBS/System/Ticket-System|Ticket-Systems]] mit. 
'''Bitte beachten Sie unsere Hinweise zu Verbesserungsvorschlägen [[OBS/Häufig_gestellte_Fragen/Verbesserungswünsche|hier]]}}
{{Hinweis|Am '''25.05.2018''' trat die '''EU-Datenschutzgrundverordnung (DSGVO)''' in Kraft. Beachten Sie diesbezüglich die [[DSGVO|Informationen]] zum Vorgehen in OBS.}}
{{Hinweis|Ab dem '''01.01.2020''' treten neue Gesetzesänderungen bezüglich des Kassenbetriebes (z.B. TSE) in Kraft. Beachten Sie diesbezüglich die [[TSE|Informationen]] zum Vorgehen in OBS.}}
{{Hinweis|Eine Wikihilfe für die voraussichtliche Absenkung des Umsatzsteuersatzes vom '''1.7.2020''' bis '''31.12.2020''' von 19% auf 16% bzw. von 7% auf 5% steht Ihnen ab '''KW 25''' für OBS und OBS Kasse zu Verfügung. Die Seite der Wikihilfe finden Sie [[Absenkung des Umsatzsteuersatzes|hier]].}}
 

{{/Orientierung1|Tango-Help-browser.svg|Hilfe|
* [[Hilfe:Einleitung|Wiki-Hilfe]]
* [[Häufig gestellte Fragen|Häufig gestellte Fragen]]
* [[Anwendertreffen|Anwendertreffen]]
{{/Orientierung2|System-search.svg|Suche / Listen / Allgemeines|
* [[OBS/Listen/Listen in OBS|Listen in OBS]]
* [[OBS/Eingabemasken/Aufbau der Eingabemasken|Eingabemasken]]
* [[OBS/Drucke/Allgemeines zu Drucken|Drucke]]
* [[OBS/Listen/Tasten und Schaltflächen|Tasten und Schaltflächen]]
* [[OBS/Tastenkürzel|Tastenkürzel]]
* [[OBS/Häufig gestellte Fragen/Wie funktionieren Platzhalter|Platzhalter]]
* [[OBS/Auftragsbearbeitung/Archivfunktion|Archivfunktion]]
* [[OBS/Eingabemasken/Positionen|Positionserfassung]]
* [[OBS/Systemadministration|Systemadministration]]
* [[OBS/Makros_und_Scripting|Makros und Scripting]]
* [[OBS/Eigenschaften|Eigenschaften]]
}}
{{/Orientierung2|Blockdevice.png|OBS-Module|
* [[Kostenfreie Module]]
* [[Kostenpflichtige Module]]
* [[OBS/Branchenspezifische Module|Branchenspezifische Module]]
* [[OBS/Widgets/Allgemein|Widgets]]
* [[OBS/Stammdaten/Schnittstellen/Internet-Shop|Shopschnittstellen]]
* [[OBS/App/Allgemein|OBS-App]]
}}
}}

{{/Orientierung1|Edit-paste.svg|Auftragsbearbeitung|
* [[OBS/Auftragsbearbeitung/Angebot/Angebot|Angebot]]
* [[OBS/Auftragsbearbeitung/Anzahlung/Liste|Anzahlung]]
* [[OBS/Auftragsbearbeitung/Aufträge/Aufträge|Auftrag]]
* [[OBS/Auftragsbearbeitung/Rechnungen/Rechnungen|Rechnung]]
* [[OBS/Auftragsbearbeitung/Lieferscheine/Lieferscheine|Lieferschein]]
* [[OBS/Stammdaten/Weitere Stammdaten/Mitarbeiter|Stundenerfassung]]
* [[OBS/Auftragsbearbeitung/Material / Lieferanten|Material/Lieferanten]]
* [[OBS/Auftragsbearbeitung/Einkäufe/Einkäufe|Einkauf]]
* [[OBS/Auftragsbearbeitung/Einkaufslieferscheine/Einkaufslieferscheine|Einkaufslieferschein]]
* [[OBS/Auftragsbearbeitung/Bestellung/Bestellung|Bestellungen]]
* [[OBS/Auftragsbearbeitung/Reparatur-Aufträge/Reparatur-Aufträge|Reparaturaufträge]]
* [[FRMGERAET|Geräteverwaltung]]
* [[OBS/Auftragsbearbeitung/Rahmenverträge|Rahmenverträge]]
* [[OBS/Auftragsbearbeitung/Lagerumbuchung|Lagerumbuchung]]
* [[OBS/Auftragsbearbeitung/Lagerauftrag|Lagerauftrag]]
* [[OBS/Auftragsbearbeitung/Produktionsauftrag|Produktionsauftrag]]
* [[OBS/Auftragsbearbeitung/Retoure|Retoure]]
* [[OBS/Auftragsbearbeitung/Verbuchen|Verbuchen]]
* [[OBS/Auftragsbearbeitung/Buchungsprotokoll|Buchungsprotokoll]]
* [[OBS/Auftragsbearbeitung/Monatswechsel|Monatswechsel]]
}}
{{/Orientierung1|Kcalc.png‎|FIBU|
* [[OBS/FIBU/Buchungserfassung|Buchungserfassung]]
* [[OBS/FIBU/Journal|Journal]]
* [[OBS/FIBU/Stapelerfassung|Stapelbearbeitung]]
* [[OBS/FIBU/Kontenverwaltung|Kontenverwaltung]]
* [[OBS/FIBU/Steuerkonten|Steuerkonten]]
* [[OBS/FIBU/Manuelles Bankclearing|Manuelles Bankclearing]]
* [[OBS/FIBU/Offene Posten|Offene Postenverwaltung]]
* [[OBS/FIBU/Mandant|Mandanten]]
* [[OBS/FIBU/Stammdaten|Stammdaten]]
* [[OBS/FIBU/Kostenstellen|Kostenstellenrechnung]]
* [[OBS/FIBU/Berichte / Listen|Auswertungen]]
* [[OBS/FIBU/Monatswechsel|Monatswechsel]]
* [[OBS/FIBU/Jahreswechsel|Jahreswechsel]]
* [[OBS/FIBU/Vorjahre|Vorjahre]]
}}
{{/Orientierung1|Spreadsheet.png |Auswertung|
* [[OBS/AUSWERTUNG/Auswertung|Auswertung]]
* [[OBS/Statistiken/Berichte/Statistiken und Berichte|Statistik/Berichte]]
* [[OBS/Auswertung/Mitarbeiterstatistik|Mitarbeiterstatistik]]
* [[OBS/Auswertungen/Offene Posten Verwaltung|Offene Postenverwaltung]]
* [[OBS/Auswertungen/Datev-Schnittstelle|DATEV-Schnittstelle]]
* [[OBS/Auswertung/Hausbanken|Hausbanken]]
* [[OBS/Auswertung/Bank-Clearing Einstellung|Bank-Clearing Einstellung]]
* [[OBS/Auswertungen/Inventur Artikel|Inventur Artikel]]
* [[OBS/Auswertung/SQL Exporter Designer|Data In/Out]]
* [[OBS/Kasse/Auswertung|Kassenauswertung]]
----
*[[Auswertungstypen|Auswertungstypen]]
{{/Orientierung2|Cashregister.png|Kasse|
* [[OBS/OBS-Kasse|Allgemein]]
* [[OBS/OBS-Kasse/Schnelleinstieg|Schnelleinstieg]]
* [[OBS/Kasse/Erläuterung_Space_Menü#Das_.22Leertasten.22-Men.C3.BC|Leertasten-Menü]]
* [[OBS/Kasse/Erläuterung_Menüleiste|Menüleiste]]
* [[OBS/Kasse/Erläuterung_Magnetkey|Magnetschlüssel]]
* [[OBS/Kasse/Kassennachschau|Kassennachschau]]
}}
}}
{{/Orientierung1|Kpdf.png|Stammdaten|
* [[OBS/Stammdaten/Personen|Personen]]
* [[OBS/Stammdaten/Artikel|Artikel]]
* [[OBS/Stammdaten/Warengruppen|Warengruppen]]
* [[OBS/Weitere Stammdaten/Leistungen|Leistungen]]
* [[OBS/Weitere Stammdaten/Erlöskonten|Erlöskonten]]
* [[OBS/Weitere Stammdaten/Textbausteine|Textbausteine]]
* [[OBS/Weitere Stammdaten/Formulare|Formulare]]
* [[OBS/Stammdaten/Schnittstellen|Schnittstellen]]
* [[OBS/Weitere Stammdaten/Verträge|Verträge]]
* [[OBS/Stammdaten/PSV-Verwaltung|PSV-Verwaltung]]
* [[OBS/Stammdaten/E-Mail|E-Mail]]
* [[OBS/Stammdaten/Projektverwaltung|Projektverwaltung]]
* [[OBS/Stammdaten/Infoverwaltung|Infoverwaltung]]
* [[OBS/Stammdaten/Faxverwaltung|Faxverwaltung]]
* [[OBS/Stammdaten/Automatische Vorgänge|Automatische Vorgänge]]
* [[OBS/Stammdaten/SMS-Verwaltung|SMS-Verwaltung]]
* [[OBS/Stammdaten/Programmparameter|Programmparameter]]
----
* [[OBS/Stammdaten/Weitere Stammdaten|Weitere Stammdaten]]
}}
{{/Orientierung1|Kcmsystem.png|System|
* [[OBS/System/Info|Info]]
* [[OBS/System/Neuer Benutzer|Neuer Benutzer]]
* [[OBS/System/Konstanten|Konstanten]]
* [[OBS/System/Sonderprogramme|Sonderprogramme]]
* [[OBS/System/Benutzer|Benutzerpflege]]
* [[OBS/System/Taschenrechner|Taschenrechner]]
* [[OBS/System/Menülevel ändern|Menülevel ändern]]
* [[OBS/System/Reportlevel ändern|Reportlevel ändern]]
* [[OBS/System/Stammdatenlevel ändern|Stammdatenlevel ändern]]
* [[OBS/System/Internet Update|Internet Update]]
* [[OBS/System/Ticket-System|Ticket-System]]
* [[OBS/System/Systemstörungen_von_Serversystemen|Systemstörungen von Serversystemen]]
}}

[[Kategorie:Portal]]

OBS/Häufig gestellte Fragen/Verbesserungswünsche

2020-07-29T06:35:04Z

Wiki-Admin:

{{Häufig gestellte Fragen}}

==Aufnahme von Verbesserungsvorschlägen / Wünschen==
Da bei uns mehrere Hundert Verbesserungswünsche in einem Jahr eingehen, werden wir diese in unsere Supportverwaltung aufnehmen. 
Sie erhalten von uns nach der Anlage eine Referenznummer zu Ihrem Anliegen. 
Das Entsprechende Ticket oder die Mail werden danach von uns auf erledigt gesetzt.
Die Liste der Wünsche wird von uns periodisch (vierteljährlich/halbjährlich) durchgegangen und priorisiert. 
Diese ausgeführten Änderungen sind kostenlos. Da wir nicht allen Wünschen sofort nachkommen können bitten wir sie um Ihr Verständnis. 
Wenn ihr Änderungswunsch für sie wichtig ist, können sie ein Angebot anfordern. Dieses wird dann priorisiert verarbeitet, ist aber kostenpflichtig.

==Ausführung von Verbesserungsvorschlägen / Wünschen==
Wenn ein Anliegen abgearbeitet wurde, wird die Beschreibung samt der Referenznummer in der Update-Info veröffentlicht.

OBS/Häufig gestellte Fragen/Verbesserungswünsche

2020-07-29T06:24:15Z

Wiki-Admin: Die Seite wurde neu angelegt: „{{Häufig gestellte Fragen}}“

Vorlage:Häufig gestellte Fragen

2020-07-29T06:23:42Z

Wiki-Admin:

<div style="float:right; clear:both; margin-left:2px; padding:0px; background:#FFFFFF; width:19em">
<div style="border:none;margin-top:0pt;padding:0pt;" id="navigation">

<div style="position:relative;top:-20pt;color:#000000;background:#ffffff; border: 3pt double #cfcfcf; padding: 5pt; margin: 0pt;margin-bottom:-20pt; z-index:1;border-top-right-radius:7pt;-moz-border-radius-topright:7pt;-webkit-border-top-right-radius:7pt;border-bottom-left-radius:7pt;-moz-border-radius-bottomleft:7pt;-webkit-border-bottom-left-radius:7pt;box-shadow: 3px 3px 4px #c0c0c0;-webkit-box-shadow: 3px 3px 4px #c0c0c0;-moz-box-shadow: 3px 3px 4px #c0c0c0;">[[Hauptseite|Wiki]] » [[Häufig gestellte Fragen|FAQ]]</div>

</div>

{{Vorlage:Textbox-Blau|1=FAQ|2=

;'''Allgemeines'''
* [[OBS/Häufig_gestellte_Fragen/Hardwareanforderungen|Systemvoraussetzungen]]
* [[OBS/Häufig_gestellte_Fragen/Verbesserungswünsche|Verbesserungswünsche]]
* [[OBS/Häufig_gestellte_Fragen/OBS-Vertrag|OBS-Vertrags-Bedingungen]]
* [[OBS/Häufig_gestellte_Fragen/MySQL Datenbank|Welche Datenbank verwendet mein OBS?]]
* [[OBS/Häufig_gestellte_Fragen/Video Anleitungen|Video Anleitungen]]
* [[OBS/Häufig gestellte Fragen/GAEB 90|Import eines Leistungsverzeichnisses]]
* [[OBS/Häufig gestellte Fragen/Exportieren von Bestellpositionen|Exportieren von Bestellpositionen]]
* [[OBS/Häufig gestellte Fragen/Wie kann man aus OBS Serienbriefe erstellen?|Erstellen von Serienbriefen aus OBS]]
* [[OBS/Häufig gestellte Fragen/Erstellen von Serien E-Mails mit OBS|Erstellen von Serien E-Mails mit OBS]]
* [[OBS/Häufig gestellte Fragen/Rechnungen per Mail versenden|Rechnungen per Mail/Fax versenden]]
* [[OBS/Häufig gestellte Fragen/Wie kann man in Word Dokument-Vorlagen erstellen, die mit den Daten aus OBS gefüllt werden?|Erstellen von Vorlagen in Word]]
* [[OBS/Häufig gestellte Fragen/Erstellen von Abschlagsrechnungen und Schlussrechnungen|Erstellen von Abschlagsrechnungen]]
* [[OBS/Häufig gestellte Fragen/Wie werden personenbezogene Artikelpreise verwaltet|Wie werden personenbezogene Artikelpreise verwaltet?]]
* [[OBS/Häufig gestellte Fragen/Kopieren von personenbezogenen Artikelpreisen|Kopieren von personenbezogenen Artikelpreisen]]
* [[OBS/Häufig gestellte Fragen/Wie kann man Scannerdaten einlesen und in die Inventur übernehmen?|Scannerdaten einlesen und in die Inventur übernehmen]]
* [[OBS/Häufig gestellte Fragen/Versenden von Angeboten mit Outlook|Versenden von Angeboten mit Outlook]]
* [[OBS/Häufig gestellte Fragen/Wann verändert sich der Artikelbestand|Wann verändert sich der Artikelbestand]]
* [[OBS/Häufig gestellte Fragen/Datensicherung OBS|Datensicherung / Backup von OBS]]
* [[OBS/Internet-Shop/ShopV4/FAQs|Shop-Schnittstelle VShop 4.0]]
* [[OBS/Stammdaten/Schnittstellen/Internet-Shop-xtcModified/FAQs|Shop-Schnittstelle modified eComerce]]
* [[OBS/Preislisten/FAQ Preislisten|Preislisten]]
* [[OBS/Häufig gestellte Fragen/Win10_Update_Verzoegern|Win10 Updates verzögern]]
* [[OBS/Häufig_gestellte_Fragen/Nummernkreis_erschöpft|Nummernkreis erschöpft]]
* [[OBS/Häufig_gestellte_Fragen/PDF/A|PDF/A]]
* [[OBS/Kasse/Kassennachschau|Kassennachschau]]
* [[OBS/Häufig_gestellte_Fragen/Fehler bei FTP-Verarbeitung|Fehler bei FTP-Verarbeitung]]
* [[OBS/Häufig_gestellte_Fragen/Unbekannte Tracking ID|Unbekannte Tracking ID]]
* [[OBS/Häufig_gestellte_Fragen/Windows-Anzeigenskalierung|Windows-Anzeigenskalierung]]
* [[OBS/Häufig_gestellte_Fragen/Lieferantenanbindungen|Welche Anbindungen an Lieferanten gibt es?]]
* [[OBS/Häufig_gestellte_Fragen/Wie können Seriennummern geändert werden?|Wie können Seriennummern geändert werden?]]
;'''Wie funktionierts?'''
* [[OBS/Häufig gestellte Fragen/Anlage_eines_Benutzers|Anlage eines Benutzers]]
* [[OBS/Häufig gestellte Fragen/Auswerten von Personen mit Hilfe von Eigenschaften|Personenauswertung mit Eigenschaften]]
* [[OBS/Häufig gestellte Fragen/Wie funktionieren Personenbezogene Leistungen?|Personenbezogene Leistungen]]
* [[OBS/Häufig gestellte Fragen/Wie verwalte ich Urlaub und Krankheitstage in OBS?|Wie verwalte ich Urlaub und Krankheitstage in OBS?]]
* [[OBS/Häufig gestellte Fragen/Einlesen von Artikelpflegedateien|Die Artikelpflege]]
* [[OBS/Häufig gestellte Fragen/Vorgehensweise bei der Inventur|Die Inventur]]
* [[OBS/Häufig gestellte Fragen/Wie funktioniert die Zählerstandsabfrage?|Die Zählerstandsabfrage]]
* [[OBS/Häufig gestellte Fragen/Wie gelangen die Rechnungen zum Steuerberater?|Wie gelangen die Rechnungen zum Steuerberater?]]
* [[OBS/Häufig gestellte Fragen/Wie funktionieren Platzhalter|Wie funktionieren Platzhalter?]]
* [[OBS/Häufig gestellte Fragen/Wie kann man Begriffe und E-Mailadressen manuell in den Spamfilter eintragen?|Begriffe und E-Mailadressen in den Spamfilter eintragen]]
* [[OBS/Häufig gestellte Fragen/Wie kann man Eigenschaften bei Personen hinterlege?|Eigenschaften bei Personen hinterlegen]]
* [[OBS/Häufig gestellte Fragen/Wie kann man Einmal-/Bonusartikel erstellen?|Einmal-/Bonusartikel erstellen]]
* [[OBS/Häufig gestellte Fragen/Wie funktioniert der Amazonexport?|Wie funktioniert der Amazonexport?]]
* [[OBS/Häufig gestellte Fragen/Marketing Aktionen mit OBS|Marketing Aktionen mit OBS]]
* [[OBS/Häufig gestellte Fragen/Skonto und Rabatt bei mehreren Steuersätzen|Skonto und Rabatt bei mehreren Steuersätzen]]
* [[OBS/Häufig gestellte Fragen/Personendokumente|Nutzung der Personendokumente-Funktion]]
* [[OBS/Häufig gestellte Fragen/Preislisten und Projektnummern|Preislisten und Projektnummern]]

}}
</div>

<noinclude>
----
</noinclude>

<noinclude>

Folgender Code muss in die jeweils gewünschte Seite hinzugefügt werden:
<nowiki>{{Vorlage:Häufig gestellte Fragen}}</nowiki>
[[Kategorie:Templates/Navigationen]]
</noinclude>
[[Kategorie:OBS/Häufig gestellte Fragen]]

Datei:Mobile Office Kompendium.pdf

2020-03-27T07:48:25Z

Wiki-Admin:

Datei:Mobile Office Kompendium Rev1.pdf

2020-03-20T08:09:30Z

Wiki-Admin:

Datei:Mobileoffice.png

2020-03-20T08:09:17Z

Wiki-Admin:

Datei:Meeting Kompendium.png

2020-03-20T08:05:46Z

Wiki-Admin:

Datei:Meeting Kompendium.pdf

2020-03-20T08:00:10Z

Wiki-Admin:

OBS/Adminhilfe/Homeoffice

2020-03-20T07:59:34Z

Wiki-Admin: Weiterleitung nach OBS/Adminhilfe/Mobileoffice erstellt

#WEITERLEITUNG [[OBS/Adminhilfe/Mobileoffice]]

OBS/Adminhilfe/Homeoffice

2020-03-17T09:21:25Z

Wiki-Admin: Wiki-Admin verschob die Seite OBS/Adminhilfe/Homeoffice nach OBS/Mobileoffice

#WEITERLEITUNG [[OBS/Mobileoffice]]

Datei:Y008P6NJCF THIEL.PNG

2020-03-16T12:14:58Z

Wiki-Admin:

Datei:RDP Monitor.png

2020-03-16T09:39:34Z

Wiki-Admin:

Vorlage:ZugriffOBS

2020-03-16T09:28:29Z

Wiki-Admin:

<accesscontrol>Programmierer</accesscontrol>

<noinclude>Navigation zwischen den Seiten des Namensraumes für OBS Programmierer (Adminhilfe).</noinclude>

<div style="float:right; clear:both; margin-left:2px; padding:0px; background:#FFFFFF; width:19em">
<div style="border:none;margin-top:0pt;padding:0pt;" id="navigation">
<div style="position:relative;top:-20pt;color:#000000;background:#ffffff; border: 3pt double #cfcfcf; padding: 5pt; margin: 0pt;margin-bottom:-20pt; z-index:1;border-top-right-radius:7pt;-moz-border-radius-topright:7pt;-webkit-border-top-right-radius:7pt;border-bottom-left-radius:7pt;-moz-border-radius-bottomleft:7pt;-webkit-border-bottom-left-radius:7pt;box-shadow: 3px 3px 4px #c0c0c0;-webkit-box-shadow: 3px 3px 4px #c0c0c0;-moz-box-shadow: 3px 3px 4px #c0c0c0;">[[Hauptseite|Wiki]] » [[Admin|Admin-Hilfe]]</div>
</div>
{{Vorlage:Textbox-Rot|1=Admin-Hilfe |2=

{{Vorlage:Klapptext|kopf=FAQ|inhalt=
* [[OBS/Adminhilfe/Datenausführungsverhinderung ausschalten|DEP deaktivieren]]
* [[OBS/Adminhilfe/Bildschirmdarstellsung der Listen und Masken unter Windows Vista und Windows 7|Darstellung unter Windows 7]]
* [[OBS/Adminhilfe/Einwahl Windows 2000|Einwahl auf Windows 2000 Server]]
* [[OBS/Preislistenhilfe|Preislisten]]
** [[OBS/Häufig gestellte Fragen/Pflege von Preislisten / Preisgruppen|Preislistenpflege]]
* [[OBS/Adminhilfe/Periodisches Datenbank-Backup mit dem Scheduler|Datenbank Sicherung]]
* [[OBS/Adminhilfe/Anleitung Customize Edit|Customize]]
* [[OBS/Adminhilfe/Zentrallösung|Zentrale]]
* [[OBS/Adminhilfe/MySQL Korrekturen|MySQL Korrekturen]]
* [[OBS/Adminhilfe/Support Macro|Support Macro]]
* [[OBS/Adminhilfe/Service Debug|Service Debug]]
* [[OBS/Adminhilfe/Historienprotokoll|Historienprotokoll (Datenänderung OBS)]]
* [[OBS/Adminhilfe/Fernwartung|Fernwartungsprobleme]]
* [[OBS/Adminhilfe/Startparameter|Startparameter]]
* [[OBS/Adminhilfe/Kassenabschluss_korrigieren|Fehler beim Kassenabschluss]]
* [[OBS/Adminhilfe/Diverses|Diverse Informationen]]
{{vorlage:Klapptext|kopf=FIBU|inhalt=

* [[OBS/Adminhilfe/E-BANKO Löschen|E-BANKO Löschen]]
* [[OBS/Adminhilfe/Buchung offene Posten|Buchungsmöglichkeiten mit offenen Posten]]
}}

{{vorlage:Klapptext|kopf=Häufige Fehler FAQs|inhalt=

* [[OBS/Adminhilfe/Häufige Shop-Fehler|Shop Fehler]]
* [[OBS/Adminhilfe/Häufige OBS-MAIL Fehler|OBS-MAIL Fehler]]
* [[OBS/Adminhilfe/Häufige OBS-FTP Fehler|OBS-FTP Fehler]]
* [[OBS/Adminhilfe/Häufige Service Fehler|Service Fehler]]
* [[OBS/Adminhilfe/Häufige Druck Fehler|Druck Fehler]]
* [[OBS/Adminhilfe/Häufige FIBU Fehler|FIBU Fehler]]
* [[OBS/Adminhilfe/Häufige Preis-Fehler|Preis-Fehler]]
}}
}}

{{Vorlage:Klapptext|kopf=Allgemeines|inhalt=
* [[OBS/Adminhilfe/Homeoffice|Home Office Kompendium]]
{{Vorlage:Klapptext|kopf=Tools|inhalt=
* [[OBS/Adminhilfe/Tools|Auflistung verschiedener Tools]]
* [[OBS/Adminhilfe/Demo Builder|Videos mit Demo Builder]]
* [[OBS/Adminhilfe/Open Broadcaster Software|Videos mit Open Broadcaster Software]]
* [[OBS/Adminhilfe/OBS-Monitor|OBS-Monitor]]
}}
* [[OBS/Adminhilfe/Kassendruck für Terminalserverbetrieb einrichten|Kassendruck für Terminalserverbetrieb einrichten]]
* [[OBS/Adminhilfe/KundenSysInfo|KundenSysInfo]]
* [[OBS/Adminhilfe/OBS Updates und deren Ablauf|OBS Update]]
* [[OBS/Adminhilfe/OBS Update(alt)|OBS Update(alt)]]
* [[OBS/Adminhilfe/OBS Versionshistorie|OBS Versionshistorie]]
* [[OBS/Adminhilfe/Flex Archiv Kontrolle|Flex Archiv Kontrolle]]
* [[OBS/Adminhilfe/RTF|RTF-Umstellung]]
* [[OBS/Adminhilfe/Druckumstellung| Druckumstellung]]
* [[OBS/Adminhilfe/PDF-Generierung| PDF-Generierung]]
* [[OBS/Adminhilfe/SupportBerrechnung|Support Berechnen]]
* [[OBS/Adminhilfe/OBS-Hilfetexte erstellen|OBS-Hilfetexte erstellen]]
* [[OBS/Adminhilfe/Batch-Befehle|Nützliche Batch-Befehle (CMD)]]
{{Vorlage:Klapptext|kopf=Widgets|inhalt=
*[[OBS/Adminhilfe/ OBS Logs/Protokolle| OBS Logs/Protokolle]]
*[[OBS/Adminhilfe/ MySQL Process Liste| MySQL Process Liste]]
*[[OBS/Adminhilfe/ Ticketsystem| Ticketsystem]]
}}
}}

{{vorlage:Klapptext|kopf=Wiki Hilfe|inhalt=
{{vorlage:Klapptext|kopf=Syntax|inhalt=
* [[OBS/Adminhilfe/SyntaxTabellen|Tabellen]]
* [[OBS/Adminhilfe/SyntaxBilder|Bilder]]
* [[OBS/Adminhilfe/Syntaxbefehle|Häufig Verwendet]]
* [[OBS/Adminhilfe/Artikel: HTML-Befehle für Textformatierung]]
* [[OBS/Adminhilfe/Textverknüpfungen|Textverknüpfungen]]
* [https://www.mediawiki.org/wiki/Extension:Cite/Cite.php/de Einzelnachweise]
}}
* [[OBS/Adminhilfe/Wiki-Seiten erstellen|Wiki-Seiten erstellen]]
* [[OBS/Adminhilfe/Wiki-Suche|Wiki Suche verwenden]]
* [[OBS/Adminhilfe/Wiki-Admin|Wiki-Admin]]
* [[OBS/Adminhilfe/Wiki Benutzer erstellen-bearbeiten|Wiki Benutzer erstellen-bearbeiten]]
{{vorlage:Klapptext|kopf=Wiki-Gruppen Benutzerlisten|inhalt=
* [[Administrator|Administrator]]
* [[Programmierer|Programmierer]]
* [[Expert|Expert]]
* [[Bürokraten|Bürokraten]]
* [[IT-Techniker|IT-Techniker]]
* [[Officestar|Officestar]]
}}
* [[OBS/Adminhilfe/veraltete Seiten|Veraltete Seiten]]
* [[OBS/Adminhilfe/Documentation Insight|Documentation Insight]]
* [[:Kategorie:Vorlage:Formatierungshilfe|Formatierungshilfe]]
}}

{{Vorlage:Klapptext|kopf=MySQL|inhalt=
* [[OBS/Adminhilfe/MySQL Tipps|MySQL Tipps]]
* [[OBS/Admihilfe/MySQL Aufgaben|MySQL Aufgaben]]
* [[OBS/Adminhilfe/Join Erläuterungen|MySQL Join Erläuterungen]]
* [[OBS/Admihilfe/Dump|Datenbankdump]]
}}

{{Vorlage:Klapptext|kopf=Programmierung und Mergen|inhalt=
{{Vorlage:Klapptext|kopf=Delphi|inhalt=
{{Vorlage:Klapptext|kopf=Einrichtung|inhalt=
* [[OBS/Adminhilfe/Anleitung zur Neuinstallatin von Borland Delphi 5|Delphiinstallation]]
* [[OBS/Adminhilfe/Delphi 5 Konfiguration|Delphi 5 Konfiguration]]
* [[OBS/Adminhilfe/Delphi 10 Konfiguration|Delphi 10 Konfiguration]]
* [[OBS/Adminhilfe/Vererbung Objectpascal|Vererbung Objectpascal]]
* [[OBS/Adminhilfe/Delphi IMP *.Pas-Dateien|Delphi IMP_*.PAS Dateien]]
* [[OBS/Adminhilfe/Delphi-Virus|Delphi-Virus (W32.Induc.A!dcu)]]
* [[OBS/Adminhilfe/ADOM Update|ADOM Update]]
* [[OBS/Adminhilfe/Allgemeine Fragen und Tipps zu Delphi|Allgemeine Fragen und Tipps zu Delphi]]
* [[OBS/Adminhilfe/Packages|Packages]]
* [[OBS/Adminhilfe/Generics|Generics in Delphi XE8]]
}}
* [[OBS/Adminhilfe/Code-Guideline|Guideline]]
* [[OBS/Adminhilfe/Syntax|Syntax-Regeln]]
* [[OBS/Adminhilfe/DebugTimer|DebugTimer]]
* [[OBS/Adminhilfe/SQLite|Arbeiten mit SQLite]]
* [[OBS/Adminhilfe/Schnittstelle testen|Schnittstelle testen]]
* [[OBS/Adminhilfe/Semaphoren|Semaphoren]]
}}
{{Vorlage:Klapptext|kopf=Shop|inhalt=
}}
{{Vorlage:Klapptext|kopf=Git/SmartGit|inhalt=
* [[OBS/Adminhilfe/Git_Fork/Anleitung|Anleitung]]
}}
{{Vorlage:Klapptext|kopf=Programm Update|inhalt=
* [[OBS/Adminhilfe/OBS Programm Update|Übersicht]]
* [[OBS/Adminhilfe/OBS_Programm_Update/Programm_Ini|Programm.ini]]
{{Vorlage:Klapptext|kopf=Schaltflächen|inhalt=
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source einspielen Main zu User|Source einspielen Main zu User]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source einspielen User zu User|Source einspielen User zu User]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/User Sourcen sichern|User Sourcen sichern]]
* [[OBS/Adminhilfe/OBS Programm Update/Liste Weitere Funktionen/Source Änderungen in den Versionen|Source Änderungen in den Versionen]]
* [[OBS/Adminhilfe/OBS Programm Update/F5 Projekte|F5 - Projekte]]
* [[OBS/Adminhilfe/OBS Programm Update/F6 Protokoll|F6 - Protokoll]]
* [[OBS/Adminhilfe/OBS Programm Update/F7 P-Lösch|F7 - Protokoll Löschen]]
* [[OBS/Adminhilfe/OBS Programm Update/F8 Update|F8 - Update]]
* [[OBS/Adminhilfe/OBS Programm Update/F9 FTP|F9 - FTP]]
{{Vorlage:Klapptext|kopf=F10: Weitere Funktionen|inhalt=
* [[OBS/Adminhilfe/OBS_Programm_Update/F10_Weitere_Funktionen|Übersicht]]
}}
}}
}}
{{Vorlage:Klapptext|kopf=PAX|inhalt=
*[[OBS/Adminhilfe/Pax Konvertierung| Konvertierung]]
*[[OBS/Adminhilfe/Pax Ereignisbehandlung| Ereignisbehandlung]]
*[[OBS/Adminhilfe/Pax SQL-Export| SQL-Export]]
*[[OBS/Adminhilfe/Pax Customize| Customize-Scripte]]
*[[OBS/Adminhilfe/Pax Listenrework| Listenrework]]
}}
}}

{{Vorlage:Klapptext|kopf=OBS-Administration|inhalt=
{{Vorlage:Klapptext|kopf=Einrichtung|inhalt=
{{Vorlage:Klapptext|kopf=MySQL|inhalt=
* [[OBS/Adminhilfe/MySQL Installation|MySQL Installieren]]
* [[OBS/Adminhilfe/MySQL Upgrade|MySQL Upgrade]]
* [[OBS/Adminhilfe/MySQL Tipps|MySQL Tipps]]
* [[OBS/Adminhilfe/MySQL Datenbankeinstellungen|MySQL Tuning & Einstellungen]]
* [[OBS/Admihilfe/Dump|Datenbankdump]]
* [[Admin/SQL-Benutzer|Admin/SQL-Benutzer]]
}}
{{Vorlage:Klapptext|kopf=OBS|inhalt=
* [[OBS/Adminhilfe/Artikelpflege Besonderheiten|Artikelpflege Besonderheiten]]
* [[OBS/Adminhilfe/Artikel Verfügbarkeit Einrichtung|Artikel Verfügbarkeit Einrichtung]]
* [[OBS/Adminhilfe/Kasseninstallation|Kasseninstallation]]
* [[OBS/Adminhilfe/OBS.ini|OBS.ini]]
* [[OBS/Adminhilfe/OBS Extern|OBS-Extern]]
* [[OBS/Adminhilfe/OBS-Demo erzeugen|OBS Demo erzeugen]]
* [[OBS/Adminhilfe/OBS Installation über Service|OBS-Installation]]
* [[OBS/Adminhilfe/OBS Installation über Service - Checkliste|OBS-Instalaltion Checkliste]]
* [[OBS/Adminhilfe/Serverumzug|Serverumzug]]
* [[OBS/Adminhilfe/Shortcuts|Shortcuts]]
}}
{{Vorlage:Klapptext|kopf=Dienste|inhalt=
* [[OBS/Adminhilfe/Dienste auf verschiedenen Servern|Dienste auf verschiedenen Servern]]
* [[OBS/Adminhilfe/Problembehandlung Dienste|Problembehandlung]]
* [[ADMINMAIL | Mail]]
** [[OBS/Adminhilfe/EMAILROU.ini|EMAILROU.ini]]
* [[ADMINFTP | FTP]]
** [[OBS/Adminhilfe/OBS FTP Sync|FTP Synchronisation]]
* [[OBS/Adminhilfe/OBS-FAX-MODUL|Fax]]
* [[OBS/Adminhilfe/OBS-Update|OBS Update]]
}}
{{Vorlage:Klapptext|kopf=Kasse/Notfallkasse|inhalt=
* [[Admin/Notfallkasse|Notfallkasse]]
* [[Admin/Notfallkassendrucksystem|Notfallkassendrucksystem]]
}}
{{Vorlage:Klapptext|kopf=Replikation|inhalt=
* [[Admin/Replikation/Allgemeine Informationen|Allgemeine Informationen]]
* [[Admin/Replikation/Segel Daten Replikation|Segel Daten Replikation]]
}}
{{Vorlage:Klapptext|kopf=Zentrale|inhalt=
}}
{{Vorlage:Klapptext|kopf=Fleet-Management einrichten|inhalt=
* [[Admin/Einrichtung/FleetManagement|Fleet-Management einrichten]]
}}
}}

{{Vorlage:Klapptext|kopf=Admin Funktionen|inhalt=
{{vorlage:Klapptext|kopf=Service Firmen|inhalt=
* [[OBS/Adminhilfe/Service Firmen/Liste|Service Firmen Liste]]
** [[OBS/Adminhilfe/Service Firmen/Liste/F6 Einwahl|F6 Einwahl]]
{{vorlage:Klapptext|kopf=F10|inhalt=
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/A ras.pbk|A ras.pbk]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/B Command Line Interpreter|B Command Line Interpreter]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/C File Zilla Benutzer XML erzeugen|C File Zilla Benutzer XML erzeugen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/D1 OBS_UPDATE.EXE zum OBS Update Server hochladen|D1 OBS_UPDATE.EXE zum OBS Update Server hochladen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/D2 SUPPORT_MACRO zum OBS Update Server hochladen|D2 SUPPORT_MACRO zum OBS Update Server hochladen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/H1 Remote Service Protokoll-Übersicht (Alles)|H1 Remote Service Protokoll-Übersicht (Alles)]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/H Remote Service Protokoll-Übersicht|H Remote ServiceProtokoll-Übersicht]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/I Remote Service Commands|I Remote Service Commands]]
** [[OBS/Adminhilfe/Service Firmen/Liste/F10/I Remote Service Commands/Eingabemaske|Eingabemaske]]
** [[OBS/Adminhilfe/Service_Firmen/Weitere/Multi_Service_Kommando|Multi-Kommando]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/I1 (Admin) Globaler Hinweis für Updates|I1 (Admin) Globaler Hinweis für Updates]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/J Liste der OBS Updates|J Liste der OBS Updates]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/K Angemeldete Service Firmen|K Angemeldete Service Firmen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/L Systeminformationen einlesen|L Systeminformationen einlesen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/M Kundendaten anzeigen|M Kundendaten anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/M1 Kundendatenbankinformationen anzeigen|M1 Kundendatenbankinformationen anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/N Kundendaten einlesen|N Kundendaten einlesen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/O Kunden-Update Informationen anzeigen|O Kunden-Update Informationen anzeigen]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/P Modul Registrierung OBS|P Modul Registrierung OBS]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/Q App Verwaltung|Q App Verwaltung]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/S1 Firmen Statistik Protokolle OBS|S1 Firmen Statistik Protokolle OBS]]
* [[OBS/Adminhilfe/Service Firmen/Liste/F10/S2 Statistik Notfallkassen|S2 Statistik Notfallkassen]]
}}
* [[OBS/Adminhilfe/Service Firmen/Eingabemaske|Service Firmen Eingabemaske]]
* [[OBS/Adminhilfe/Service Firmen/Remotecon|Remotecon]]
}}

{{vorlage:Klapptext|kopf=O Support|inhalt=
* [[OBS/Adminhilfe/Support/Interne Tools/A Update-Programme|A Update Programme]]
* [[OBS/Adminhilfe/Support/Interne Tools/B Datenbankoperationen|B Datenbankoperationen]]
* [[OBS/Adminhilfe/Support/Interne Tools/C Tools|C Tools]]
{{vorlage:Klapptext|kopf=D Programmierer-Tools|inhalt=
* [[OBS/Adminhilfe/Programmierer_Tools/N_Datenbank_verfremden|Datenbank verfremden]]
}}
* [[OBS/Adminhilfe/Support/Interne Tools/E Interne Sonderprogramme|E Interne Sonderprogramme]]
* [[OBS/Adminhilfe/Support/Interne Tools/G Service Tools|G Service Tools]]
* [[OBS/Adminhilfe/Support/Interne Tools/H Script-Tools|H Script-Tools]]
* [[OBS/Adminhilfe/Support/Interne Tools/I Flex Archive|I Flex Archive]]
{{vorlage:Klapptext|kopf=J Update Marko Lib/Pmode/Script Lib|inhalt=
* [[OBS/Adminhilfe/MacroLibary|A Macro Library]]
* [[OBS/Adminhilfe/ScriptLibrary|C Script Library]]

}}
}}
}}
{{Vorlage:Klapptext|kopf=kundenspezifische Anpassungen|inhalt=
* [[OBS/Adminhilfe/OBSAdministration/kundenspez_Anpassungen/UserDB_sys|UserDB.sys]]
}}
{{Vorlage:Klapptext|kopf=OBS Protokolle|inhalt=
* [[OBS/Adminhilfe/OBSAdministration/Protokolle/HistorieProto|HistorieProto]]
}}
}}

{{Vorlage:Klapptext|kopf=Shop-Administration|inhalt=
* [[Admin/Shop|Shop Übersicht Voraussetzungen und Einrichtung]]
{{Vorlage:Klapptext|kopf=modified eCommerce 2.x|inhalt=
* [[Admin/ModifiedECommerce2/FAQ|FAQ]]
* [[Admin/ModifiedECommerce2/Installation|Installation]]
}}
{{Vorlage:Klapptext|kopf=modified eCommerce 1.06|inhalt=
* [[Admin/ModifiedECommerce|Shop modified eCommerce]]
}}
{{Vorlage:Klapptext|kopf=Amazon|inhalt=
* [[Admin/Amazon|Schnittstelle Amazon]]
}}
{{Vorlage:Klapptext|kopf=VShop 4.0|inhalt=
* [[Admin/VShop|Shop VShop]]
}}
}}

{{Vorlage:Klapptext|kopf=Kundeninformationen|inhalt=
{{Vorlage:Klapptext|kopf=OfficeStar|inhalt=
* [[Admin/OfficeStar/Allgemeine Informationen|Allgemeine Informationen]]
* [[Admin/OfficeStar/Hinweiszeiten|Hinweiszeiten]]
}}
{{Vorlage:Klapptext|kopf=MDS|inhalt=
* [[Admin/MDS/Skrip-Automatische Ablage von Dokumenten|Skrip-Automatische Ablage von Dokumenten]]
}}
}}


}}
</div>

<noinclude>
----
</noinclude>

<noinclude>

Diese Vorlage fügt die Zugriffsberechtigung für Techniker zu.
Gäste bzw. nicht angemeldete Benutzer dürfen diese Seite dann nicht mehr sehen!

Folgender Code muss in die jeweils gewünschte Seite hinzugefügt werden:
<nowiki>{{ZugriffOBS}}</nowiki>
[[Kategorie:Templates]]
</noinclude>
[[Kategorie:OBS]]

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T09:43:57Z

Wiki-Admin: /* TqSQL.A2D */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Floatwert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Datumswert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
var dDate : TDateTime;

dDate := xData.A2D('sys_date');
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
Es wird direkt die sys_uid des Eintrags zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
cUID := xData.A2UID();
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
Das Datenbankfeld '''cxField''' wird mit den Daten aus '''xDaten''' gefüllt. Die Umwandlung von Variant nach Datenbankfeld erfolgt automatisch.
 
Beispiel:
<syntaxhighlight lang="Delphi">
//String
xData.qSet('mbp_ksperre', '0');

//Float
var nEKPreis : Double;

xData.qSet('mbp_ekpreis',nEKPreis);
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:51:47Z

Wiki-Admin: /* TqSQL.A2UID */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Floatwert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Datumswert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
Es wird direkt die sys_uid des Eintrags zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
cUID := xData.A2UID();
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
Das Datenbankfeld '''cxField''' wird mit den Daten aus '''xDaten''' gefüllt. Die Umwandlung von Variant nach Datenbankfeld erfolgt automatisch.
 
Beispiel:
<syntaxhighlight lang="Delphi">
//String
xData.qSet('mbp_ksperre', '0');

//Float
var nEKPreis : Double;

xData.qSet('mbp_ekpreis',nEKPreis);
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:51:35Z

Wiki-Admin: /* TqSQL.A2UID */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Floatwert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Datumswert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
Es wird direkt die sys_uid des Eintrags zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
cUID := xData..A2UID();
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
Das Datenbankfeld '''cxField''' wird mit den Daten aus '''xDaten''' gefüllt. Die Umwandlung von Variant nach Datenbankfeld erfolgt automatisch.
 
Beispiel:
<syntaxhighlight lang="Delphi">
//String
xData.qSet('mbp_ksperre', '0');

//Float
var nEKPreis : Double;

xData.qSet('mbp_ekpreis',nEKPreis);
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:34:00Z

Wiki-Admin: /* TqSQL.qSet */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Floatwert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Datumswert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
Es wird direkt die sys_uid des Eintrags zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
Das Datenbankfeld '''cxField''' wird mit den Daten aus '''xDaten''' gefüllt. Die Umwandlung von Variant nach Datenbankfeld erfolgt automatisch.
 
Beispiel:
<syntaxhighlight lang="Delphi">
//String
xData.qSet('mbp_ksperre', '0');

//Float
var nEKPreis : Double;

xData.qSet('mbp_ekpreis',nEKPreis);
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:29:43Z

Wiki-Admin: /* TqSQL.qSet */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Floatwert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Datumswert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
Es wird direkt die sys_uid des Eintrags zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
Das Datenbankfeld '''cxField''' wird mit den Daten aus '''xDaten''' gefüllt. Die Umwandlung von Variant nach Datenbankfeld erfolgt automatisch.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:28:36Z

Wiki-Admin: /* TqSQL.A2UID */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Floatwert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Datumswert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
Es wird direkt die sys_uid des Eintrags zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:28:00Z

Wiki-Admin: /* TqSQL.A2F */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Floatwert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Datumswert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:27:45Z

Wiki-Admin: /* TqSQL.A2D */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Datumswert umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:27:33Z

Wiki-Admin: /* TqSQL.A2C */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen String umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:27:18Z

Wiki-Admin: /* TqSQL.A2I */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
Der Wert des Datenbankfeldes wird in einen Integer umgewandelt und zurückgegeben.
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:23:26Z

Wiki-Admin: /* TqSQL */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2UID===
Definition:
<syntaxhighlight lang="Delphi">
function A2UID():String;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:22:41Z

Wiki-Admin: /* TqSQL */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}
===TqSQL.A2I===
Definition:
<syntaxhighlight lang="Delphi">
function A2I(const cFeld:String):integer;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2C===
Definition:
<syntaxhighlight lang="Delphi">
function A2C(const cFeld:String):String;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2F===
Definition:
<syntaxhighlight lang="Delphi">
function A2F(const cFeld:String):Double;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.A2D===
Definition:
<syntaxhighlight lang="Delphi">
function A2D(const cFeld:String):TDateTime;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

===TqSQL.qSet===
Definition:
<syntaxhighlight lang="Delphi">
function qSet(const cxField : String; xDaten : Variant):Boolean;
</syntaxhighlight>
Erklärung: 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Allgemeines/Übersicht Funktionen

2020-01-10T08:18:25Z

Wiki-Admin: /* TqSQL */

{{Makros und Scripting}}
Hier finden Sie nützliche [https://de.wikipedia.org/wiki/Funktion_(Programmierung) Funktionen], die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
=Liste Funktionssammlungen=
==TMyDir==
===TMyDir.CreateDirectory===
Definition:
<syntaxhighlight lang="Delphi">
function CreateDirectory(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Erstellt ein neues Verzeichnis mit dem angegebenen Pfad, wenn es noch nicht existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\';
lAngelegt := TMyDir.CreateDirectory(cPfad);
</syntaxhighlight>

===TMyDir.Exists===
Definition:
<syntaxhighlight lang="Delphi">
function Exists(const Path: string; const CreateIfNotExists: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob das Verzeichnis existiert. Wird der optionale Parameter ''CreateIfNotExists'' mit dem boolschen Wert ''True'' übergeben, wird versucht das Verzeichnis anzulegen, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
lExistiert := TMyDir.Exists(cPfad);
</syntaxhighlight>

===TMyDir.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRoot: string; aAdd: array of string): string;
</syntaxhighlight>
Erklärung: 
Dem Pfad ''cRoot'' werden die einzelnen Einträge aus dem [https://de.wikipedia.org/wiki/Feld_(Datentyp) Array] ''aAdd'' als Verzeichnisse angefügt und so ein neuer Pfad erstellt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\Import\2019'
</syntaxhighlight>

===TMyDir.BuildPath===
Definition:
<syntaxhighlight lang="Delphi">
function BuildPath(const cRoot: string; aAdd: array of string; out cPath: string; lCreate: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Diese Funktion ist ein Mix aus [[#TMyDir.CombinePath|TMyDir.CombinePath]] und [[TMyDir.Exists|TMyDir.Exists]]. Es wird ein Pfad aus den Angaben ''cRoot'' und ''aAdd'' erstellt und geprüft, ob der Pfad existiert (Funktionsergebnis). Die Rückgabe des Pfades erfolgt mit ''cPath''. Mit dem oprtionalen Parameter kann angegeben werden, ob das Verzeichnis erstellt werden soll, sollte es nicht existieren. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cRoot := 'c:\Beispiel\Verzeichnis\Pfad';
cPfad := TMyDir.CombinePath(cRoot,['Import','2019']);
if (TMyDir.BuildPath(cRoot,['Import','2019'],cPfad)) then begin
Meldung('Verzeichnis '+cPfad+' existiert.');
end;
</syntaxhighlight>

===TMyDir.GetDirectoryName===
Definition:
<syntaxhighlight lang="Delphi">
function GetDirectoryName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Den Pfad des Verzeichnisses zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
cPfad := TMyDir.GetDirectoryName(cDatei);
//Ergebnis: cPfad ist 'c:\Beispiel\Verzeichnis\Pfad'
</syntaxhighlight>

==TMyFile==
===TMyFile.IsFile===
Definition:
<syntaxhighlight lang="Delphi">
function IsFile(const Path: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
if (TMyFile.IsFile(cPfad)) then begin
Meldung('Datei '+cPfad+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.Combine===
Definition:
<syntaxhighlight lang="Delphi">
function Combine(const Path1: string; const Path2: string): string;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt');
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.IsCombine===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombine(const Path1: string; const Path2: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Kombiniert ''Path1'' und ''Path2'' zu einem Pfad und prüft, ob die Datei existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Combine('c:\Beispiel\Verzeichnis','Pfad\MeineDatei.txt',cPfad)) then begin
//cPfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
Meldung('Datei '+cPfad+' vorhanden');
end;
</syntaxhighlight>

===TMyFile.CombinePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombinePath(const cRootDir: string; aAdd: array of string; const cFileName: string): string;
</syntaxhighlight>
Erklärung: 
Baut aus den Parametern einen Dateipfad zusammen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDateipfad := TMyFile.CombinePath('c:\Beispiel',['Verzeichnis','Pfad'],'MeineDatei.txt');
//cDateipfad ist 'c:\Beispiel\Verzeichnis\Pfad\MeineDatei.txt';
</syntaxhighlight>

===TMyFile.CombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function CombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string): string;
</syntaxhighlight>
Erklärung: 
Extrahiert aus ''FilePath'' den zu ''RelativeBasePath'' relativem Pfad und kombiniert dies mit ''CombineBasePath'' zu einem neuen Dateipfad. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TMyFile.CombineRelativePath(
'c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt',
'c:\Beispiel\Verzeichnis\Pfad\',
'\\mein-server\Netzwerk\OBS\data\Import'
);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.IsCombineRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsCombineRelativePath(const FilePath: string; const RelativeBasePath: string; const CombineBasePath: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
TMyFile.IsCombineRelativePath verbindet die Funktionalität von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]] und [[#TMyFile.IsFile|TMyFile.IsFile]]. ''ReturnPath'' entspricht dem Ergebnis von [[#TMyFile.CombineRelativePath|TMyFile.CombineRelativePath]]. Das Ergebnis der Funktion [[#TMyFile.IsFile|TMyFile.IsFile]] für den Pfad ''ReturnPath'' ist auch das Ergebnis für TMyFile.IsCombineRelativePath. 

===TMyFile.GetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePathUNC(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad für die Datei zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Annahme: Das OBS-Installationsverzeichnis ist mit dem Laufwerksbuchstaben ''O'' als Netzlaufwerk am Arbeitsplatz eingerichtet.
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cUNC := TMyFile.GetFilePathUNC(cPfad);
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
</syntaxhighlight>

===TMyFile.GetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetFilePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Versucht ''Path'' zu einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad aufzulösen. Gibt ''Path'' zurück, wenn kein [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad verfügbar ist, aber ''Path'' existiert. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
cPfadNeu := TMyFile.GetFilePath(cPfad);
//cPfadNeu Werte:
//UNC vorhanden: '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
//Kein UNC, aber Datei existiert: 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
//Datei existiert nicht: ''
</syntaxhighlight>

===TMyFile.IsGetFilePathUNC===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePathUNC(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Prüft, ob die Datei ''Path'' unter einem [https://de.wikipedia.org/wiki/Uniform_Naming_Convention UNC]-Pfad zu finden ist. Dieser wird dann in ''ReturnPath'' enthalten. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.IsGetFilePathUNC('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cUNC)) then begin
//cUNC ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
Meldung('Datei '+cUNC+' ist vorhanden');
end;
</syntaxhighlight>

===TMyFile.IsGetFilePath===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFilePath(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Entspricht im verhalten [[#TMyFile.GetFilePath|TMyFile.GetFilePath]] mit einer zusätzlichen Prüfung, ob der Rückgabepfad ''ReturnPath'' leer ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := 'O:\OBS\data\Import\LieferantA\MeineDatei.txt';
if (TMyFile.IsGetFilePath('O:\OBS\data\Import\LieferantA\MeineDatei.txt',cPfad)) then begin
//UNC vorhanden:
// cPfad ist '\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Kein UNC, aber Datei existiert:
// cPfad ist 'O:\OBS\data\Import\LieferantA\MeineDatei.txt'
// TMyFile.IsGetFilePath Ergebnis ist ''true''
//Datei existiert nicht:
// cPfad ist ''
// TMyFile.IsGetFilePath Ergebnis ist ''false''
end;
</syntaxhighlight>

===TMyFile.Move===
Definition:
<syntaxhighlight lang="Delphi">
function Move(const SourceFileName: string; const DestFileName: string; const CreateDestDir: boolean=False; const Replace: boolean=False): boolean;
</syntaxhighlight>
Erklärung: 
Versucht die Datei ''SourceFileName'' nach ''DestFileName'' zu verschieben. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. Die optionalen Parameter geben hier die Möglichkeit festzulegen, wie die Funktion bei Konflikten reagieren soll. ''CreateDestDir'' erlaubt die Anlage des Ziel-Verzeichnis, sollte es nicht existieren. ''Replace'' erlaubt es vorhandene Dateien zu überschreiben/ersetzen. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Move('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt','\\mein-server\Netzwerk\OBS\data\Import\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde verschoben');
end;
</syntaxhighlight>

===TMyFile.Delete===
Definition:
<syntaxhighlight lang="Delphi">
function Delete(const FilePath: string): boolean;
</syntaxhighlight>
Erklärung: 
Löscht die angegebene Datei ''FilePath''. Das Ergebnis der Funktion teilt mit, ob dies erfolgreich (''true'') oder fehlgeschlagen (''false'') ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TMyFile.Delete('c:\Beispiel\Verzeichnis\Pfad\LieferantA\MeineDatei.txt')) then begin
Meldung('Datei wurde gelöscht');
end;
</syntaxhighlight>

==TObsPath==
===TObsPath.GetExePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetExePath(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Installationsverzeichnis von OBS zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExePath();
</syntaxhighlight>

===TObsPath.GetDataDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''data'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataDir();
</syntaxhighlight>

===TObsPath.GetSysDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetSysDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''sys'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetSysDir();
</syntaxhighlight>

===TObsPath.GetTempDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetTempDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''temp'' im OBS-Installationsverzeichnis. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetTempDir();
</syntaxhighlight>

===TObsPath.GetBildarchivDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetBildarchivDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''bildarchiv'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetBildarchivDir();
</syntaxhighlight>

===TObsPath.GetExportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetExportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''export'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetExportDir();
</syntaxhighlight>

===TObsPath.GetImportDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetImportDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''import'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetImportDir();
</syntaxhighlight>

===TObsPath.GetDataInOutDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDataInOutDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''datainout'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDataInOutDir();
</syntaxhighlight>

===TObsPath.GetLockDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''lock'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockDir();
</syntaxhighlight>

===TObsPath.GetLockFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetLockFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Lock-Datei im Verzeichnis ''locks'' im OBS-Unterverzeichnis ''data'' zurück. Die Dateiendung ''.lock'' wird automatisch ergäntzt. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetLockFile('mein');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\locks\mein.lock'
</syntaxhighlight>

===TObsPath.GetDebugDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''debug'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugDir();
</syntaxhighlight>

===TObsPath.GetDebugFile===
Definition:
<syntaxhighlight lang="Delphi">
function GetDebugFile(cName: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den Dateipfad zu einer Debug-Datei im Verzeichnis ''debug'' im OBS-Unterverzeichnis ''data'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetDebugFile('debug.txt');
//cPfad ist dann in etwa '\\mein-server\Netzwerk\OBS\data\debug\debug.txt'
</syntaxhighlight>

===TObsPath.GetShopDir===
Definition:
<syntaxhighlight lang="Delphi">
function GetShopDir(): string;
</syntaxhighlight>
Erklärung: 
Gibt den Pfad zum Unterverzeichnis ''shop'' im OBS-Unterverzeichnis ''data''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cPfad := TObsPath.GetShopDir();
</syntaxhighlight>

===TObsPath.GetRelativePath===
Definition:
<syntaxhighlight lang="Delphi">
function GetRelativePath(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Gibt den relativen Pfad innerhalb der OBS-Verzeichnisstruktur zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := '\\mein-server\Netzwerk\OBS\data\import\artikel.csv';
cDateiRelativ := TObsPath.GetRelativePath(cDatei);
//cDateiRelativ ist 'data\import\artikel.csv'

cVerzeichnis := '\\mein-server\Netzwerk\OBS\data\import\';
cVerzeichnisRelativ := TObsPath.GetRelativePath(cVerzeichnis);
//cVerzeichnisRelativ ist 'data\import\'
</syntaxhighlight>

===TObsPath.GetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function GetFileName(const Path: string): string;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad. Wenn möglich wird der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cDatei := 'data\import\artikel.csv';
cDatei := TObsPath.GetFileName(cDatei);
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
</syntaxhighlight>

===TObsPath.IsGetFileName===
Definition:
<syntaxhighlight lang="Delphi">
function IsGetFileName(const Path: string; out ReturnPath: string): boolean;
</syntaxhighlight>
Erklärung: 
Macht aus einem relativem Pfad im OBS-Verzeichnis einen vollständigen Pfad und prüft dessen Existens. Wenn möglich wird in ''ReturnPath'' der UNC-Pfad zurückgegeben. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (TObsPath.IsGetFileName('data\import\artikel.csv',cDatei)) then begin
//cDatei ist '\\mein-server\Netzwerk\OBS\data\import\artikel.csv'
Meldung('Datei '+cDatei+' ist vorhanden');
end;
</syntaxhighlight>
==TISO==
{{Hinweis|Für die Verwendung dieser Funktionen siehe auch [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Aufzählungstypen#TISOCountryCodes|TISOCountryCodes]].}}
===TISO.CountrySwap===
Definition:
<syntaxhighlight lang="Delphi">
function CountrySwap(const cCode: string; const eFrom: TISOCountryCodes; const eTo: TISOCountryCodes): string;
</syntaxhighlight>
Erklärung: 
Versucht den ISO-3166-Code ''cCode'' von ''eFrom'' nach ''eTo'' zu wechseln. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Ermittelt die nummerische Kodierung zum Alpha-2-Code "de" (Deutschalnd) und zeigt diesen als Meldung an. Der nummerische Wert für de ist 276.
Meldung(TISO.CountrySwap('de',iso3166_Alpha2,iso3166_Numeric));
</syntaxhighlight>

===TISO.CountryGetRefNo===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetRefNo(oMyDB: TxDB; const eCode: TISOCountryCodes; const cCode: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Ermittelt die OBS-Referenz aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] für den Code ''cCode''. Gibt ''cDefault'' zurück, wenn keine OBS-Referenz ermittelt werden konnte. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, findet diese Funktion die entsprechende Referenz für Deutschland (OBS-Default ist "D-") und zeigt diese als Meldung.
Meldung(TISO.CountryGetRefNo(oDB,'de',iso3166_Alpha2));
</syntaxhighlight>

===TISO.CountryGetCode===
Definition:
<syntaxhighlight lang="Delphi">
function CountryGetCode(oMyDB: TxDB; const eCode: TISOCountryCodes; const cRef: string; cDefault: string=''): string;
</syntaxhighlight>
Erklärung: 
Liste aus der [[OBS/Stammdaten/Weitere_Stammdaten/Ländererkennung|Liste ''Länderkennung'']] den ISO-3166-Code für die OBS-Referenz ''cRef'' aus und gibt den Code für den Typen ''eCode'' zurück. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Wenn im ISO-Feld gepflegt, liest diese Funktion den Wert für die entsprechende Referenz den OBS-Default "D-" für Deutschland und zeigt den Code als Meldung an.
//Da im OBS nur der Alpha2 gepflegt werden kann, wird der Code bei Angabe von z. B. ''iso3166_Alpha3'' in ''eCode'' intern umgewandelt.
Meldung(TISO.CountryGetRefNo(oDB,iso3166_Alpha3,'D-'));
</syntaxhighlight>
==TqSQL==
{{Hinweis|Dies ist nur ein Auszug der Funktionalität}}

=Liste Funktionen=
==Empty==
Verwendung: Prüft, ob der Wert des Parameters leer bzw. 0 ist. Dies Funktioniert mit Zeichenketten (''string'') und Zahlen (''integer'' und ''double'') 
Parameter: string/integer/double 
Rückgabe: boolean 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := '';
IstLeer := Empty(cText);
cText := 'Beispiel';
IstLeer := Empty(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird ein leerer Text zugewiesen. Mit ''Empty'' wird der Wert nun geprüft. Die boolsche Variable ''IstLeer'' ist dann true (wahr). Als nächstes wird ''cText'' der Wert "Beispiel" zugewiesen und eine erneute Prüfung mit ''Empty'' durchgeführt. Da ''cText'' jetzt einen Text enthält, ist der Wert der Variablen ''IstLeer'' nun false (falsch).

==Length==
Verwendung: Ermittelt die Länge einer Zeichenkette (string). 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel.';
nLaenge := Length(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel.'' zugewiesen. Mit ''Length'' wird die Länge ermittelt. Der Satz "Dies ist ein Beispiel." hat 22 Zeichen. ''nLaenge'' hat also den Wert ''22''.

==AllTrim==
Verwendung: Entfernt Umbrüche und Leerzeichen am Anfang und Ende einer Zeichenkette. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := ' Dies ist ein Beispiel. ';
cText := AllTrim(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert "'' Dies ist ein Beispiel. ''" zugewiesen. Mit ''AllTrim'' werden die unnötigen Leerzeichen am Anfang und Ende der Zeichenkette entfernt. Die Variable ''cText'' entspricht also dem Wert "''Dies ist ein Beispiel.''".

==UpperCase/LowerCase==
Verwendung: Umwandeln einer Zeichenkette in Großbuchstaben/Kleinbuchstaben. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Beispiel';
cUpper := UpperCase(cText);
cLower := LowerCase(cText);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Beispiel'' zugewiesen. Mit ''UpperCase'' und ''LowerCase'' wird die Zeichenkette umgewandelt. ''cUpper'' enthält danach den Wert ''BEISPIEL'' und ''cLower'' den Wert ''beispiel''.

==ExtractFileName==
Verwendung: Dateinamen aus Dateipfad auslesen. 
Parameter: string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'c:\\Ordner\Datei.txt';
cDatei := ExtractFileName(cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''c:\\Ordner\Datei.txt'' zugewiesen. Mit ''ExtractFileName'' wird der Dateiname herausgesucht und zurückgegeben. Danach enthält ''cDatei'' nur noch den Wert ''Datei.txt''.

==StrTran==
Verwendung: Sucht einen Text innerhalb eines Textes und ersetzte diesen durch einen andren Text (Suchen und ersetzen). 
Parameter: string, string, string 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei.txt';
cName := StrTran(cDatei ,'.txt','');
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei.txt'' zugewiesen. Mit ''StrTran'' wird im Text der Variable ''cDatei'' nach ''.txt'' gesucht. Der gefundene Teil wird mit einer leeren Zeichenkette ersetzt. Danach enthält ''cDatei'' nur noch den Wert ''Datei''.

==LeftStr/RightStr==
Verwendung: Gibt den linken/rechten Teil einer Zeichenketten zurück. Es werden dabei maximal soviele Zeichen zurückgegeben, wie im zweiten Parameter angegeben. 
Parameter: string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cText := 'Dies ist ein Beispiel';
cLeft := LeftStr(cText,2);
cRight := RightStr(cText,5);
</syntaxhighlight>
Erklärung: Der String-Variable ''cText'' wird der Wert ''Dies ist ein Beispiel'' zugewiesen. Mit ''LeftStr'' und ''RightStr'' werden jeweils die ersten zwei Zeichen von Links und Rechts zurückgegeben. ''cLeft'' enthält danach den Wert ''Di'' und ''cRight'' den Wert ''spiel''.
{{Hinweis|Sollten mehr Zeichen ermittelt werden, als der ursprüngliche Wert Zeichen hat, so ist das Ergbenis gleich dem Ursprung. LeftStr(cDatei,50) hätte z. B. dazu geführt, dass cLeft ebenfalls ''Dies ist ein Beispiel'' enthält.}}

==Token==
Verwendung: Teilt eine Zeichenkette anhand eines Zeichens auf und gibt den engebenen Teil zurück. 
Parameter: string, string, integer 
Rückgabe: string 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
cTeil := Token(cDatei,'_',2);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''Token'' wird die Zeichenkette aufgeteilt. Als Teiler ist ein Unterstrich angeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Es wird der zweite Teil gefordert. Die Variable ''cTeil'' enthält demnach den Wert ''Name''.

==NumToken==
Verwendung: Ermittelt die Anzahl der Teile einer Zeichenketten, wenn diese an den Stelle mit dem Zeichen, das als Parameter übergeben wird, geteilt wird. 
Parameter: string, string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cDatei := 'Datei_Name_Mit_Unterstrichen.txt';
nTeile := NumToken('_',cDatei);
</syntaxhighlight>
Erklärung: Der String-Variable ''cDatei'' wird der Wert ''Datei_Name_Mit_Unterstrichen.txt'' zugewiesen. Mit ''NumToken'' wird die Anzahl der Teil-Zeichenketten der Zeichenkette cDatei ermittelt. Als Trennzeichen wurde ein Unterstrich angegeben. Dies führt im angegebenen Beispiel zu vier Teilen: ''Datei'', ''Name'', ''Mit'' und ''Unterstrichen.txt''. Die Variable ''nTeile'' entspricht also dem Wert 4.

==iVal==
Verwendung: Wandelt die angegebene Zeichenkette in einen Ganzzahlwert um. 
Parameter: string 
Rückgabe: integer 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '4';
nZahl := iVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''4'' zugewiesen. Mit ''iVal'' wird die Zeichenkette in die entsprechende Ganzzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 4.

==fVal==
Verwendung: Wandelt die angegebene Zeichenkette in eine Dezimalzahl um. 
Parameter: string 
Rückgabe: double 
Beispiel: 
<syntaxhighlight lang=="Delphi">
cZahl := '1234,56';
nZahl := fVal(cZahl);
</syntaxhighlight>
Erklärung: Der String-Variable ''cZahl'' wird der Wert ''1234,56'' zugewiesen. Mit ''fVal'' wird die Zeichenkette in die entsprechende Dezimalzahl umgewandelt. Die Variable ''nZahl'' entspricht also dem Wert 1234,56.

==Roundy==
Verwendung: Runden eines Dezimalwerts (Typ: Double) 
Parameter: double, integer 
Rückgabe: double 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nGerundeterWert := Roundy(nDezimalwert,2);
</syntaxhighlight>
Erklärung: Der zu rundende Wert wird mit Parameter 1 übergeben. Die gewünschte Anzahl an Nachkommastellen wird in Parameter 2 angegeben. Die Funktion rundet dann den Wert auf die angegebene Anzahl an Dezimalstellen und gibt das Ergebnis wieder zurück. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nGerundeterWert'' entspricht also 1234,57.

==Trunc==
Verwendung: Abschneiden der Nachkommastellen eines Dezimalwerts 
Parameter: double 
Rückgabe: integer 
Aufruf:
<syntaxhighlight lang=="Delphi">
nDezimalwert := 1234.5678;
nWert := Trunc(nDezimalwert);
</syntaxhighlight>
Erklärung: Der Dezimalwert ist als Parameter zu übergeben. Als Ergbnis werden die Vorkommastellen zurückgegeben. Die Variable ''nDezimalwert'' wird auf den Wert 1234,5678 gesetzt. Anschließend wird der Wert auf zwei Nachkommastellen gerundet. Die Variable ''nWert'' entspricht also 1234.
==PadL==
Definition:
<syntaxhighlight lang="Delphi">
function PadL(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur linken Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadL(cAuffuellen,10);
//cAufgefuellt ist ' Müller'
cAufgefuellt := PadL(cAuffuellen,10,'X');
//cAufgefuellt ist 'XXXXMüller'
</syntaxhighlight>
==PadR==
Definition:
<syntaxhighlight lang="Delphi">
function PadR(const cVar : string; iPad : integer; cPad : char=' ') : string;
</syntaxhighlight>
Erklärung: 
Füllt die Zeichenkette ''cVar'' zur rechten Seite mit ''cPad'' auf, bis ''cVar'' ''iPad'' Zeichen lang ist. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
cAuffuellen := 'Müller';
cAufgefuellt := PadR(cAuffuellen,10);
//cAufgefuellt ist 'Müller '
cAufgefuellt := PadR(cAuffuellen,10,'X');
//cAufgefuellt ist 'MüllerXXXX'
</syntaxhighlight>

==CToD==
Definition:
<syntaxhighlight lang="Delphi">
function CToD(const sDate: string): TDateTime;
</syntaxhighlight>
Erklärung: 
Konvertiert die Zeichenkette ''sDate'' in einen Datumswert des Typs [http://docwiki.embarcadero.com/Libraries/Rio/en/System.TDateTime ''TDateTime'']. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
dDatum := CToD('2016-11-18');
dDatum := CToD('2016-11-18 17:52:35');
//In beiden Fällen entspricht der Wert in dDatum dem 18.11.2016, da CToD nur das Datum übernimmt. Die Uhrzeit wird verworfen.
</syntaxhighlight>
==Artikelstamm==
===AR_Exists===
Definition:
<syntaxhighlight lang="Delphi">
function AR_Exists(oMyDB: TxDB; const cArtNr: string): boolean;
</syntaxhighlight>
Erklärung: 
Sucht im Artikelstamm nach der in ''cArtNr'' angegebenen Artikelnummer und liefert als Ergebnis ''True'' wenn der Artikel gefunden wurde. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
if (AR_Exists(oDB,'ABC123')) then begin
Meldung('Artikel existiert im Artikelstamm');
end;
</syntaxhighlight>
==Umsatz- und Vorsteuer==
===FindUstFromSatz===
Definition:
<syntaxhighlight lang="Delphi">
function FindUstFromSatz(oMyDB: TxDB; nSatz: double): string;
</syntaxhighlight>
Erklärung: 
Ermittelt den OBS-Umsatzsteuerschlüssel für den Steuersatz ''nSatz''. 
 
Beispiel:
<syntaxhighlight lang="Delphi">
//Gibt den zweistelligen Schlüssel (z. B. 01) für die Umsatzsteuer mit dem Satz 19 % aus
Meldung(FindUstFromSatz(oDB,19));
</syntaxhighlight>

===UST_VK_Netto2Brutto===
Definition:
<syntaxhighlight lang="Delphi">
function UST_VK_Netto2Brutto(oMyDB : TxDB;
cArtNr : string;
nNetto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(oMyDB : TxDB;
nNetto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

function UST_VK_Netto2Brutto(nNetto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>
===UST_VK_Brutto2Netto===
Definition:
<syntaxhighlight lang="Delphi">
//Variante 1
function UST_VK_Brutto2Netto(oMyDB : TxDB;
cArtNr : string;
nBrutto : double;
nDefaultResult : double=0;
nDefaultSatz : double=0;
nNK : integer=2): double; overload;

//Variante 2
function UST_VK_Brutto2Netto(oMyDB : TxDB;
nBrutto : double;
cSchl : string;
nDefaultResult : double=0;
nDefaultSatz : double=0;
lUseStd : boolean=False;
nNK : integer=2): double; overload;

//Variante 3
function UST_VK_Brutto2Netto(nBrutto: double; nMwstSatz: double; nNK: integer=2) : double; overload;
</syntaxhighlight>
Erklärung: 
Wandelt einen Preis von Brutto nach Netto. Die Funktion gibt es in drei Ausführungen.
#Umwandlung über Artikelnummer
#:Wandelt den Wert ''nBrutto'' nach Netto um. Der Steuersatz wird dabei über den Steuerschlüssel aus dem Artikelstamm gezogen. Falls kein Artikel mit der Nummer ''cArtNr'' im Artikelstamm gefunden werden kann, wird für die Umrechnung der Satz ''nDefaultSatz'' verwendet. Existiert der Artikel im Artikelstamm wird ''nDefaultResult'' als Ergebnis verwendet, falls kein Steuerschlüssel im Artikel gepflegt ist. {{Hinweis|Wenn die Artikelnummer vorhanden ist, wird diese Variante der Umrechnung empfohlen, da hier auch Artikel mit mehreren Steuersätzen richtig umgewandelt werden.}}
#Umwandlung mit Steuerschlüssel
#:Wandelt den Wert ''nBrutto'' nach Netto anhand des übergebenen Steuerschlüssels ''cSchl'' um. Ist der Steuerschlüssel leer, wird ''nDefaultResult'' als Ergebnis zurückgegeben. Der Steuersatz ''nDefaultSatz'' wird verwendet, wenn kein passender Eintrag zum Steuerschlüssel im OBS gefunden werden konnte.
#Umwandlung mit Steuersatz
#:Der Wert ''nBrutto'' wird mit dem Steuersatz ''nMwstSatz'' umgerechnet. Die Rückgabe wird auf ''nNK'' Nachkommastellen gerundet.{{Achtung|Der Steuersatz 19 % wird in ''nMwstSatz'' als 19.00 (Punkt als Dezimaltrennzeichen) erwartet!}}
 
 
Beispiel:
<syntaxhighlight lang="Delphi">
</syntaxhighlight>

OBS/Makros und Scripting/Anwendungsbereiche/OFML-Kalkulation

2020-01-10T08:12:33Z

Wiki-Admin: /* Felderläuterungen */

{{Makros und Scripting}}
Dieses Macro ist unter dem festen Namen '''OFML_PosToCalc''' in der [[OBS/Makros_und_Scripting/Allgemeines/Script_Library|Sript Lib]] zu finden.

=übergebene Parameter und Rückgabe=
==Übergabe Parameter==
{| class="wikitable"
|-
! Parameter !! Bedeutung !! Datentyp
|-
| cAngNr || Die Nummer des Angebotes für die Kalkulation || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]]
|-
| xData || Datenstruktur, in dem der komplette Datensatz enthalten ist || [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Funktionen#TqSQL|TqSQL]]
|}

==Rückgabe==
{| class="wikitable"
|-
! Parameter !! Bedeutung !! Datentyp
|-
| Result || bei '''True''' wird der Datensatz angelegt, bei '''False''' nicht || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]]
|}

=Felderläuterungen=
{| class="wikitable"
|-
! Datenbankfeld !! Beschreibung !! Datentyp !! Feldlänge
|-
| mbc_bez1 || Bezeichnung 1 der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 200
|-
| mbc_bez2 || Bezeichnung 2 der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 200
|-
| mbc_text || Langtext der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 2000
|-
| mbc_artnr || Artikelnummer der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 40
|-
| mbc_bestnr || Bestellnummer der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 40
|-
| mbc_serie || Serie aus der OFML Datei || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 10
|-
| mbc_hersteller || Hersteller || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 60
|-
| mbc_menge || Menge || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_ekpreis || Brutto EK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_eknetto || Netto EK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_ekrabatt || EK Rabatt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 6 (davon 2 NK)
|-
| mbc_vkpreis || Brutto VK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_vknetto || Netto VK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_vkrabatt || VK Rabatt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 6 (davon 2 NK)
|-
| mbc_memodruck || Artikellangtext wird ausgedruckt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]] || 1 (1=true;2=false)
|-
| mbc_ueberartnr || Artikeltexte aus dem Artikelstamm haben vorang || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]] || 1 (1=true;2=false)
|-
| mbc_ksperre || Diese Position wird in der Kalkulation nicht berücksichtigt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]] || 1 (1=true;2=false)
|-
| mbc_neu_bild || Bild wird in das Angebot übernommen || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]] || 1 (1=true;2=false)
|-
| mbc_neu_artikel || Artikel wird im Artikelstamm angelegt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]] || 1 (1=true;2=false)
|-
| mbc_apostfix || Vorgabe für die Artikelnummer || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 10
|-
| mbc_export || Export freigabe || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]] || 1 (1=true;2=false)
|-
| mbc_sonderpreis || kein Sonderpreis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]] || 1 (1=true;2=false)
|-
| mbc_uebermemo || Langtextet ins Angebot übernehmen || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]] || 1 (1=true;2=false)
|-
|}

=Beispiel=
<source lang="Delphi">
function MyTqSQL(cAngNr:String; xData:TqSQL):Boolean;
begin
DebugLine('Artikel-Nummer:'+xData.A2C('mbc_artnr'));
DebugLine('Bestell-Nummer:'+xData.A2C('mbc_bestnr'));
Result := True;

//Artikelnummer ändern
//xData.qSet('mbc_artnr','123');
end;
</source>

OBS/Makros und Scripting/Anwendungsbereiche/OFML-Kalkulation

2020-01-10T08:10:30Z

Wiki-Admin: /* Felderläuterungen */

{{Makros und Scripting}}
Dieses Macro ist unter dem festen Namen '''OFML_PosToCalc''' in der [[OBS/Makros_und_Scripting/Allgemeines/Script_Library|Sript Lib]] zu finden.

=übergebene Parameter und Rückgabe=
==Übergabe Parameter==
{| class="wikitable"
|-
! Parameter !! Bedeutung !! Datentyp
|-
| cAngNr || Die Nummer des Angebotes für die Kalkulation || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]]
|-
| xData || Datenstruktur, in dem der komplette Datensatz enthalten ist || [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Funktionen#TqSQL|TqSQL]]
|}

==Rückgabe==
{| class="wikitable"
|-
! Parameter !! Bedeutung !! Datentyp
|-
| Result || bei '''True''' wird der Datensatz angelegt, bei '''False''' nicht || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]]
|}

=Felderläuterungen=
{| class="wikitable"
|-
! Datenbankfeld !! Beschreibung !! Datentyp !! Feldlänge
|-
| mbc_bez1 || Bezeichnung 1 der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 200
|-
| mbc_bez2 || Bezeichnung 2 der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 200
|-
| mbc_text || Langtext der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 2000
|-
| mbc_artnr || Artikelnummer der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 40
|-
| mbc_bestnr || Bestellnummer der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 40
|-
| mbc_serie || Serie aus der OFML Datei || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 10
|-
| mbc_hersteller || Hersteller || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 60
|-
| mbc_menge || Menge || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_ekpreis || Brutto EK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_eknetto || Netto EK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_ekrabatt || EK Rabatt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 6 (davon 2 NK)
|-
| mbc_vkpreis || Brutto VK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_vknetto || Netto VK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_vkrabatt || VK Rabatt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 6 (davon 2 NK)
|-
| mbc_memodruck || Artikellangtext wird ausgedruckt
|-
| mbc_ueberartnr || Artikeltexte aus dem Artikelstamm haben vorang
|-
| mbc_ksperre || Diese Position wird in der Kalkulation nicht berücksichtigt
|-
| mbc_neu_bild || Bild wird in das Angebot übernommen
|-
| mbc_neu_artikel || Artikel wird im Artikelstamm angelegt
|-
| mbc_apostfix || Vorgabe für die Artikelnummer || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 10
|-
| mbc_export || Export freigabe
|-
| mbc_sonderpreis || kein Sonderpreis
|-
| mbc_uebermemo || Langtextet ins Angebot übernehmen
|-
|}

=Beispiel=
<source lang="Delphi">
function MyTqSQL(cAngNr:String; xData:TqSQL):Boolean;
begin
DebugLine('Artikel-Nummer:'+xData.A2C('mbc_artnr'));
DebugLine('Bestell-Nummer:'+xData.A2C('mbc_bestnr'));
Result := True;

//Artikelnummer ändern
//xData.qSet('mbc_artnr','123');
end;
</source>

OBS/Makros und Scripting/Anwendungsbereiche/OFML-Kalkulation

2020-01-10T08:09:58Z

Wiki-Admin: /* Felderläuterungen */

{{Makros und Scripting}}
Dieses Macro ist unter dem festen Namen '''OFML_PosToCalc''' in der [[OBS/Makros_und_Scripting/Allgemeines/Script_Library|Sript Lib]] zu finden.

=übergebene Parameter und Rückgabe=
==Übergabe Parameter==
{| class="wikitable"
|-
! Parameter !! Bedeutung !! Datentyp
|-
| cAngNr || Die Nummer des Angebotes für die Kalkulation || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]]
|-
| xData || Datenstruktur, in dem der komplette Datensatz enthalten ist || [[OBS/Makros_und_Scripting/Allgemeines/Übersicht_Funktionen#TqSQL|TqSQL]]
|}

==Rückgabe==
{| class="wikitable"
|-
! Parameter !! Bedeutung !! Datentyp
|-
| Result || bei '''True''' wird der Datensatz angelegt, bei '''False''' nicht || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#boolean|boolean]]
|}

=Felderläuterungen=
{| class="wikitable"
|-
! Datenbankfeld !! Beschreibung !! Datentyp !! Feldlänge
|-
| mbc_bez1 || Bezeichnung 1 der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 200
|-
| mbc_bez2 || Bezeichnung 2 der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 200
|-
| mbc_text || Langtext der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 2000
|-
| mbc_artnr || Artikelnummer der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 40
|-
| mbc_bestnr || Bestellnummer der Position || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 40
|-
| mbc_serie || Serie aus der OFML Datei || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 10
|-
| mbc_hersteller || Hersteller || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 60
|-
| mbc_menge || Menge || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_ekpreis || Brutto EK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_eknetto || Netto EK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double] || 10 (davon 2 NK)
|-
| mbc_ekrabatt || EK Rabatt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 6 (davon 2 NK)
|-
| mbc_vkpreis || Brutto VK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_vknetto || Netto VK-Preis || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 10 (davon 2 NK)
|-
| mbc_vkrabatt || VK Rabatt || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#double|double]] || 6 (davon 2 NK)
|-
| mbc_memodruck || Artikellangtext wird ausgedruckt
|-
| mbc_ueberartnr || Artikeltexte aus dem Artikelstamm haben vorang
|-
| mbc_ksperre || Diese Position wird in der Kalkulation nicht berücksichtigt
|-
| mbc_neu_bild || Bild wird in das Angebot übernommen
|-
| mbc_neu_artikel || Artikel wird im Artikelstamm angelegt
|-
| mbc_apostfix || Vorgabe für die Artikelnummer || [[OBS/Makros_und_Scripting/Allgemeines/Syntax#string|string]] || 10
|-
| mbc_export || Export freigabe
|-
| mbc_sonderpreis || kein Sonderpreis
|-
| mbc_uebermemo || Langtextet ins Angebot übernehmen
|-
|}

=Beispiel=
<source lang="Delphi">
function MyTqSQL(cAngNr:String; xData:TqSQL):Boolean;
begin
DebugLine('Artikel-Nummer:'+xData.A2C('mbc_artnr'));
DebugLine('Bestell-Nummer:'+xData.A2C('mbc_bestnr'));
Result := True;

//Artikelnummer ändern
//xData.qSet('mbc_artnr','123');
end;
</source>

OBS/Makros und Scripting/Anwendungsbereiche/OFML-Kalkulation

2020-01-10T08:05:21Z

Wiki-Admin: /* Felderläuterungen */

OBS/Makros und Scripting/Anwendungsbereiche/OFML-Kalkulation

2020-01-10T08:02:52Z

Wiki-Admin: /* Felderläuterungen */

OBS/Makros und Scripting/Anwendungsbereiche/OFML-Kalkulation

2020-01-10T08:02:29Z

Wiki-Admin: /* Rückgabe */

OBS/Makros und Scripting/Anwendungsbereiche/OFML-Kalkulation

2020-01-10T08:02:07Z

Wiki-Admin: /* Übergabe Parameter */