Sage Classic Line
Modulare Software für alle betriebswirtschaftlichen Geschäftsprozesse kleiner und mittelständischer Unternehmen.
|
Demoversion downloaden
Ab sofort stellen wir Ihnen eine kostenlose Demoversion zum Download zur Verfügung. Für diese Demo wird keine Lizenz benötigt.
|
Sie wollen auf dem neuesten Stand bleiben?
Senden Sie uns eine Mail an info@bizz-consult.de, wenn Sie in den Newsletterversand aufgenommen werden und regelmäßig Informationen zum Classic Line Connector erhalten möchten.
|
|
Referenz - Bibliothek "Connector-DLL"
zur Klasse CLConnector
zur Klasse CLDateiInfo
Klasse CLDateiZugriff
Enumeration CLSyncStatus |
Name |
CLSyncStatus |
Beschreibung |
In dieser Enumeration sind die möglichen Sync-Status der Klasse CLDateizugriff aufgeführt |
Enumeration |
Aktuell = &H0
Geloescht = &H1
Geaendert = &H2
Neu = &H4
AlleStati = &HF
|
Enumeration CLDatentypenVB |
Name |
CLDatentypenVB |
Beschreibung |
In dieser Enumeration sind die Datentypen von Visual Basic 6.0 aufgeführt |
Enumeration |
Datum = 1
Text = 2
Binaer = 3
LongZahl = 4
IntZahl = 5
DoubleZahl = 6
SingleZahl = 7
ByteZahl = 8
|
UDT CLDaten |
Name |
CLDaten |
Beschreibung |
Dieser UDT beschreibt einen Datentyp, der für die Neuanlage von Datensätze benötigt wird (nur für AIS-Version erforderlich) |
UDT |
Public Type CLDaten
strTabelle As String
strFeldname As String
strFeldWert As String
End Type
|
oCLConnector |
Routinennamen |
Public Property Set oCLConnector(ByVal oCLConnector As CLConnector)
Public Property Get oCLConnector() As CLConnector |
Beschreibung |
Setzt das Verbindungsobjekt für den Dateizugriff oder fragt dieses ab |
Rückgabewert |
Aktuelle Verbindungsobjekt |
Parameter |
oCLConnector |
Verbindungsobjekt |
strGetDatei |
Routinennamen |
Public Property Get strGetDatei() As String |
Beschreibung |
Liest den Dateinamen der verbundenen Datei aus |
Rückgabewert |
Name der verbundenen Datei |
strGetPfad |
Routinennamen |
Public Property Get strGetPfad() As String |
Beschreibung |
Ermittelt das Verzeichnis der verbundenen Datei |
Rückgabewert |
Pfadname der verbundenen Datei |
lngDatensatznummer |
Routinennamen |
Public Property Let lngDatensatznummer(ByVal lngDatensatznummer As Long)
Public Property Get lngDatensatznummer() As Long |
Beschreibung |
Ermittelt die Datensatznummer der verbundenen Kettdatei oder setzt diese |
Rückgabewert |
Aktuelle Datensatznummer |
Parameter |
lngDatensatznummer |
Datensatznummer |
blnDatei_Oeffnen |
Routinennamen |
Public Function blnDatei_Oeffnen(ByVal sTabelle As String, Optional ByVal udt-Dateityp As CLDateiTyp = CLDateiTyp.R300Datei, Optional ByVal sPfad As String) As Boolean |
Beschreibung |
Öffnet die angegebene Tabelle |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
sTabelle |
Tabelle, die geöffnet werden soll |
|
udtDateityp |
Typ der Datei, die geöffnet werden soll
R300Datei = 1
KettDatei = 2
(siehe auch Enumeration CLDateiTyp)
Dieser Parameter ist optional. Wird er weggelassen, so wird die Datei als R300-Datei geöffnet.)
|
|
sPfad |
Verzeichnis, in der die zu öffnenden Datei abgelegt ist. Dieser
Parameter ist optional. Wird er weggelassen, so wird die Datei im Daten-
oder Mandantenverzeichnis (in Abhängigkeit von den bekannten Namenskonventionen) gesucht.
|
Bemerkung |
Bevor eine Tabelle geöffnet werden kann, muss eine Verbindung zur Classic Line hergestellt worden sein. |
Schliesse Datei |
Routinennamen |
Public Sub Schliesse_Datei() |
Beschreibung |
Schließt die aktuelle Tabelle |
Rückgabewert |
- keine - |
Parameter |
- keine - |
blnLeseDatensatz_Key |
Routinennamen |
Public Function blnLeseDatensatz_Key(ByVal sKey As String) As Boolean |
Beschreibung |
Liest einen Datensatz mit dem angegebenen Schlüssel |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
sKey |
Schlüssel des Datensatzes, der gelesen werden soll |
Bemerkung |
Wurde kein Datensatz gefunden oder trat ein Fehler auf, so ist das Funktionser-gebnis = False. |
blnSchreibeDatensatz |
Routinennamen |
Public Function blnSchreibeDatensatz() |
Beschreibung |
Schreibt den aktuellen Datensatz zurück in die Datenbank |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
- keine - |
|
Bemerkung |
Bevor ein Datensatz geschrieben werden kann, muss er zuvor gelesen werden.
Nach dem Lesen werden die gewünschten Felder mit der Funktion blnSetFeldwert
beschrieben und anschließend der Datensatz wieder in den Tabellen
mit dieser Funktion zurück geschrieben.
Beachten Sie, dass Sie mit dieser Funktion keine neuen Datensätze anlegen,
sondern nur vorhandene Datensätze zurück schreiben können.
|
blnLeseDatensatz_Kette |
Routinennamen |
Public Function blnLeseDatensatz_Kette() As Boolean |
Beschreibung |
Liest einen Datensatz aus einer Kettdatei |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
- keine - |
|
Bemerkung |
Bevor Sie einen Datensatz mit dieser Funktion lesen können,
muss die entsprechende Datensatznummer mit der Eigenschaft lngDatensatznummer gesetzt werden.
|
blnLeseNaechstenDatensatz_Kette |
Routinennamen |
Public Function blnLeseNaechstenDatensatz_Kette() As Boolean |
Beschreibung |
Liest den nächsten Datensatz aus einer Kettdatei |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
- keine - |
|
Bemerkung |
Lesen Sie zunächst den ersten Datensatz mit der Funktion blnLeseDatensatz_Kette
und durchlaufen Sie alle weiteren Datensätze mit dieser Funktion.
Sobald das Ende der Kette erreicht ist, wird die Datensatznummer
(Abrufbar mit der Eigenschaft lngDatensatznummer) auf 0 gesetzt.
|
blnLeseSplitDatensatz_Kette |
Routinennamen |
Public Function blnLeseSplitDatensatz_Kette() As Boolean |
Beschreibung |
Liest den zugehörigen Datensatz des aktuellen Datensatzes aus einer Kettdatei |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
- keine - |
|
Bemerkung |
Lesen Sie zunächst den ersten Datensatz mit der Funktion blnLeseDatensatz_Kette.
Ist ein Ergänzungsdatensatz vorhanden, so können Sie diesen mit dieser Funktion lesen.
Beispiel:
In der Tabelle "AuftraegePositionen" (A10212) sind die Artikelpositionen der Vor-gänge abgelegt.
Die Satzart "Artikel" ist über das Feld "Ergaenzungsposition" mit der Satzart "ArtikelErgaenz" verbunden.
Diese Ergänzungposition können Sie mit dieser Funktion lesen.
|
blnSchreibeDatensatz_Kette |
Routinennamen |
Public Function blnSchreibeDatensatz_Kette(Optional ByVal bSplit As Boolean = False) As Boolean |
Beschreibung |
Schreibt einen Datensatz in eine Kettdatei |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
bSplit |
Über diesen Parameter bestimmen Sie, ob Sie den Hauptdatensatz (= False) oder den zugehörigen Ergänzungsdatensatz (= True) zurück schreiben wollen. |
Bemerkung |
Bevor ein Datensatz geschrieben werden kann, muss er zuvor gelesen werden.
Nach dem Lesen werden die gewünschten Felder mit der Funktion blnSetFeldwert
beschrieben und anschließend der Datensatz wieder in den Tabellen mit dieser Funktion zurück geschrieben.
Beachten Sie, dass Sie mit dieser Funktion keine neuen Datensätze anlegen, sondern nur vorhandene Datensätze zurück schreiben können.
|
blnGetSatzart |
Routinennamen |
Public Function blnGetSatzart(rsSatzart As String) As Boolean |
Beschreibung |
Ermittelt die Satzart des aktuellen Datensatzes |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
rsSatzart |
Über diesen Parameter wird die Satzart des aktuellen Datensatzes zurückübergeben. |
Bemerkung |
Bevor Sie diese Funktion nutzen können müssen Sie einen Datensatz eingelesen haben. |
blnLeseDatensatz_Erster |
Routinennamen |
Public Function blnLeseDatensatz_Erster(ByVal sKeyStart As String, ByVal sKeyEnde As String, ByVal sSyncStatus As CLSyncStatus) As Boolean |
Beschreibung |
Gibt einen Datensatz zurück, der innerhalb des angegebenen Schlüsselbereiches in einer Tabelle gefunden wurde. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
sKeyStart |
Untere Grenze des Schlüsselbereiches |
|
sKeyEnde |
Obere Grenze des Schlüsselbereiches |
|
sSyncStatus |
Bestimmen Sie über diesen Parameter, welchen Status die gelesenen Datensätze haben dürfen.
Aktuell = &H0
Geloescht = &H1
Geaendert = &H2
Neu = &H4
AlleStati = &HF
Über den Status können Sie beispielsweise nur alle neuen oder gelöschten Datensätze lesen.
|
Bemerkung |
Erst wenn Sie den Sync-Status über die Function blnSetSyncStatus entsprechend gesetzt haben, können Sie gezielt nach Datensätzen mit einem bestimmten Status suchen. |
blnLeseDatensatz_Naechster |
Routinennamen |
Public Function blnLeseDatensatz_Naechster() As Boolean |
Beschreibung |
Liest den nächsten Datensatz aus einer Tabelle |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
- keine - |
|
Bemerkung |
Lesen Sie zunächst den ersten Datensatz mit der Funktion
blnLeseDatensatz_Erster und durchlaufen Sie alle weiteren Datensätze mit dieser Funktion.
Ist kein Datensatz mehr vorhanden, liefert die Funktion den Wert False zurück.
|
blnLeseDatensatz_Letzter |
Routinennamen |
Public Function blnLeseDatensatz_Letzter(ByVal sKeyStart As String, ByVal sKeyEnde As String, ByVal sSyncStatus As CLSyncStatus) As Boolean |
Beschreibung |
Gibt den letzten Datensatz zurück, der innerhalb des angegebenen Schlüsselbereiches in einer Tabelle gefunden wurde. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
sKeyStart |
Untere Grenze des Schlüsselbereiches |
|
sKeyEnde |
Obere Grenze des Schlüsselbereiches |
|
sSyncStatus |
Bestimmen Sie über diesen Parameter, welchen Status die gelesenen Datensätze haben dürfen.
Aktuell = &H0
Geloescht = &H1
Geaendert = &H2
Neu = &H4
AlleStati = &HF
Über den Status können Sie beispielsweise nur alle neuen oder gelöschten Datensätze lesen.
|
Bemerkung |
Erst wenn Sie den Sync-Status über die Function blnSetSyncStatus entsprechend gesetzt haben, können Sie gezielt nach Datensätzen mit einem bestimmten Status suchen. |
blnLeseDatensatz_Vorgaenger |
Routinennamen |
Public Function blnLeseDatensatz_Vorgaenger() As Boolean |
Beschreibung |
Liest den vorhergehenden Datensatz aus einer Tabelle |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
- keine - |
|
Bemerkung |
Lesen Sie zunächst den letzten Datensatz mit der Funktion blnLeseDatensatz_Letzter
und durchlaufen Sie alle weiteren Datensätze mit dieser Funktion.
Ist kein Datensatz mehr vorhanden, liefert die Funktion den Wert False zurück.
|
blnDateiEntsperren |
Routinennamen |
Public Function blnDateiEntsperren() As Boolean |
Beschreibung |
Setzt eine Dateisperre zurück, die mit den Lesefunktionen gesetzt wurden. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
- keine - |
|
Bemerkung |
Gesetzte Sperren werden beim Schließen einer Datei automatisch zurückgesetzt.
Sollte es erforderlich sein, Sperren auch gezielt zurückzusetzen, dann können Sie dafür diese Funktion nutzen.
|
blnGetSyncStatus |
Routinennamen |
Public Function blnGetSyncStatus(ByRef rSyncStatus As CLSyncStatus) As Boolean |
Beschreibung |
Ermittelt den Sync-Status des aktuellen Datensatzes |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
rSyncStatus |
In dieser Variable wird der Sync-Status des aktuellen Datensatzes zurückgegeben.
Aktuell = &H0
Geloescht = &H1
Geaendert = &H2
Neu = &H4
AlleStati = &HF
|
blnSetSyncStatus |
Routinennamen |
Public Function blnSetSyncStatus(ByVal udtSyncStatus As CLSyncStatus, Optional ByVal strEntferneKey As String = "") As Boolean |
Beschreibung |
Setzt den Sync-Status des aktuellen Datensatzes |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
udtSyncStatus |
Übergeben Sie in dieser Variable den Status, der für den aktuellen Datensatz gesetzt werden soll.
Aktuell = &H0
Geloescht = &H1
Geaendert = &H2
Neu = &H4
AlleStati = &HF
|
|
strEntferneKey |
Schlüssel, der für einen gelöschten Datensatz aus der Synchronisationstabelle entfernt werden soll.
Der Status in udtSyncStatus muss für diesen Fall auf "Geloescht" gesetzt sein. |
blnGetSyncDatum |
Routinennamen |
Public Function blnGetSyncDatum(ByRef rdtSyncDatum As Date) As Boolean |
Beschreibung |
Ermittelt das Datum, an dem der aktuelle Datensatz zuletzt synchronisiert wurde |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
rdtSyncDatum |
In dieser Variable wird das letzte Synchronisationsdatum des aktuellen Datensatzes zurückgegeben |
blnGetKundennummerformatiert |
Routinennamen |
Public Function blnGetKundennummerformatiert(ByRef strKundennummer As String) As Boolean |
Beschreibung |
Formatiert eine Kundennummer (Personenkonto) gemäß den Einstellungen im Mandantenstamm der Classic Line. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
strKundennummer |
Die in dieser Variable angelegte Kundennummer wird formatiert und in gleicher Variable auch wieder zurückgegeben |
blnSetFeldwert |
Routinennamen |
Public Function blnSetFeldwert(ByVal sFeldname As String, ByVal sDaten-satzname As String, ByRef vntFeldwert As Variant) As Boolean |
Beschreibung |
Setzt einen Feldwert im aktuellen Datensatz |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
sFeldname |
Der übergebene Wert wird in diesem Feld abgelegt |
|
sDatensatzname |
Der zum aktuellen Datensatz gehörende Satzart wird hier übergeben |
|
vntFeldwert |
Der hier abgelegte Wert wird in das Feld mit dem Namen sFeldname im aktuellen Datensatz abgespeichert |
blnGetFeldwert |
Routinennamen |
Public Function blnGetFeldwert(ByVal sFeldname As String, ByVal sDaten-satzname As String, ByRef rvntFeldwert As Variant, ByRef rudtTyp As CLDaten-TypenVB) As Boolean |
Beschreibung |
Liest einen Feldwert im aktuellen Datensatz |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
sFeldname |
Der übergebene Wert wird in diesem Feld abgelegt |
|
sDatensatzname |
Der zum aktuellen Datensatz gehörende Satzart wird hier übergeben |
|
rvntFeldwert |
Der gelesene Wert wird in dieser Variable zurück gegeben |
|
rudtTyp |
In dieser Variable wird zurück gegeben, von welchem Typ der gelesene Wert ist.
Datum = 1
Text = 2
Binaer = 3
LongZahl = 4
IntZahl = 5
DoubleZahl = 6
SingleZahl = 7
ByteZahl = 8
|
blnInsertDatensatz |
Routinennamen |
Public Function blnInsertDatensatz(sKey As String) As Boolean |
Beschreibung |
Fügt einen neuen Datensatz in einer Tabelle ein. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
sKey |
Schlüssel des Datensatzes, der angelegt werden werden soll |
Bemerkung |
Die einzelnen Felder des Datensatzes müssen vor Verwendung dieser Funktion über blnSetFeldwert gesetzt worden sein. |
blnDeleteDatensatz |
Routinennamen |
Public Function blnDeleteDatensatz(sKey As String) As Boolean |
Beschreibung |
Löscht einen Datensatz in einer Tabelle. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
sKey |
Schlüssel des Datensatzes, der gelöscht werden werden soll |
blnNeuenKundenAnlegen |
Routinennamen |
Public Function blnNeuenKundenAnlegen(ByRef strKundennummer As String, udtFelder() As CLDaten, ByVal strMinKundennummer As String, ByVal strMaxKundennummer As String) As Boolean |
Beschreibung |
Legt einen neuen Kunden in der Classic Line an oder aktualisiert einen bestehenden Kunden. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
strKundennummer |
- Möglichkeit: leer: Es wird ein neuer Kunde angelegt. Anschließend enthält strKundennummer die neue Kundennummer.
- Möglichkeit: Kundennummer im Format "1234567890": Existiert der angegebene Kunde, wird dieser aktualisiert; Existiert der angegebene Kunde nicht, wird er angelegt.
Das Feld enthält die neue Kundennummer, wenn die Funktion erfolgreich beendet wurde.
|
|
udtFelder() |
Alle zu setzenden Felder werden in diesem Array vom Typ CLDaten übergeben. Nicht gesetzte Felder erhalten einen Defaultwert. |
|
strMinKundennummer |
Untergrenze für eine neu anzulegende Kundennummer. |
|
strMaxKundennummer |
Obergrenze für eine neu anzulegende Kundennummer. |
Ereignisse |
Public Event BeforeCustomerInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Kundendatensatz eingefügt wird. Die Variable
strDatensatz enthält den Datensatzstring, der im nächsten Schritt geschrieben wird.
In der Collection colFelder werden die über udtFelder() gesetzten Felder übergeben. |
|
Public Event AfterCustomerInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Kundendatensatz eingefügt wurde.
Die Parameter entsprechen dem Ereignis BeforeCustomerInsert |
|
Public Event BeforeDebitorInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Debitorendatensatz eingefügt wird. Die Parameter entsprechen dem
Ereignis BeforeCustomerInsert |
|
Public Event AfterDebitorInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Debitorendatensatz eingefügt wurde. Die Parameter entsprechen dem
Ereignis BeforeCustomerInsert |
|
Public Event BeforeCustomerUpdate(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Kundendatensatz aktualisiert wird. Die Parameter entsprechen dem
Ereignis BeforeCustomerInsert |
|
Public Event AfterCustomerUpdate(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Kundendatensatz aktualisiert wurde. Die Parameter entsprechen dem
Ereignis BeforeCustomerInsert |
|
Public Event BeforeDebitorUpdate(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Debitorendatensatz aktualisiert wird. Die Parameter entsprechen dem
Ereignis BeforeCustomerInsert |
|
Public Event AfterDebitorUpdate(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Debitorendatensatz aktualisiert wurde. Die Parameter entsprechen dem
Ereignis BeforeCustomerInsert |
Bemerkung |
Wird in strKundennummer ein Leerstring übergeben, wird eine neue Kundennummer im Bereich von
strMinKundennummer bis strMaxKundennummer angelegt.
Das besondere an dieser Funktion ist, dass bei der Anlage bzw. Aktualisierung der Kundendaten die Geschäftslogik
der Classic Line beachtet wird. Dies bedeutet insbesondere, dass auch Indexdateien, Matchcodedateien und ähnliche
Funktionalitäten beachtet werden. Diese Funktion sollte der direkten Aktualisierung des Kundenstammsatzes über blnSchreibeDatensatz
vorgezogen werden.
Die Ereignisse stellen wir Ihnen für folgende Funktionalitäten zur Verfügung:
- Sie können den zu schreibenden Datensatz noch einmal manipulieren, bevor er geschrieben wird.
Achtung: Tun Sie dies nur, wenn Sie sich genau
mit dem Aufbau des Datensatzes auskennen. Andernfalls können Sie den Eintrag unbrauchbar machen.
- Wollen Sie eigene Zusatzdaten anlegen, für die Sie z.B. schon die Kundennummer benötigen bevor der Datensatz geschrieben ist,
erhalten Sie auf diese Art die Möglichkeit dazu.
|
blnNeuenLieferantenAnlegen |
Routinennamen |
Public Function blnNeuenLieferantenAnlegen(ByRef strLieferantennummer As String, udtFelder() As CLDaten, ByVal strMinLieferantennummer As String, ByVal strMaxLieferantennummer As String) As Boolean |
Beschreibung |
Legt einen neuen Lieferanten in der Classic Line an oder aktualisiert einen bestehenden Lieferanten. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
strLieferantennummer |
- Möglichkeit: leer: Es wird ein neuer Lieferant angelegt. Anschließend enthält strLieferantennummer die neue Lieferantennummer.
- Möglichkeit: Lieferantennummer im Format "1234567890": Existiert der angegebene Lieferant, wird dieser aktualisiert; Existiert der angegebene Lieferant nicht, wird er angelegt.
Das Feld enthält die neue Lieferantennummer, wenn die Funktion erfolgreich beendet wurde.
|
|
udtFelder() |
Alle zu setzenden Felder werden in diesem Array vom Typ CLDaten übergeben. Nicht gesetzte Felder erhalten einen Defaultwert. |
|
strMinLieferantennummer |
Untergrenze für eine neu anzulegende Lieferantennummer. |
|
strMaxLieferantennummer |
Obergrenze für eine neu anzulegende Lieferantennummer. |
Ereignisse |
Public Event BeforeSupplierInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Lieferantendatensatz eingefügt wird. Die Variable
strDatensatz enthält den Datensatzstring, der im nächsten Schritt geschrieben wird.
In der Collection colFelder werden die über udtFelder() gesetzten Felder übergeben. |
|
Public Event AfterSupplierInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Lieferantendatensatz eingefügt wurde. Die Parameter entsprechen dem
Ereignis BeforeSupplierInsert |
|
Public Event BeforeKreditorInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Kreditorendatensatz eingefügt wird. Die Parameter entsprechen dem
Ereignis BeforeSupplierInsert |
|
Public Event AfterKreditorInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Kreditorendatensatz eingefügt wurde. Die Parameter entsprechen dem
Ereignis BeforeSupplierInsert |
|
Public Event BeforeSupplierUpdate(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Lieferantendatensatz aktualisiert wird. Die Parameter entsprechen dem
Ereignis BeforeSupplierInsert |
|
Public Event AfterSupplierUpdate(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Lieferantendatensatz aktualisiert wurde. Die Parameter entsprechen dem
Ereignis BeforeSupplierInsert |
|
Public Event BeforeKreditorUpdate(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Kreditorendatensatz aktualisiert wird. Die Parameter entsprechen dem
Ereignis BeforeSupplierInsert |
|
Public Event AfterKreditorUpdate(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Kreditorendatensatz aktualisiert wurde. Die Parameter entsprechen dem
Ereignis BeforeSupplierInsert |
Bemerkung |
Wird in strLieferantennummer ein Leerstring übergeben, wird eine neue Lieferantennummer im Bereich von
strMinLieferantennummer bis strMaxLieferantennummer angelegt.
Das besondere an dieser Funktion ist, dass bei der Anlage bzw. Aktualisierung der Lieferantendaten die Geschäftslogik
der Classic Line beachtet wird. Dies bedeutet insbesondere, dass auch Indexdateien, Matchcodedateien und ähnliche
Funktionalitäten beachtet werden. Diese Funktion sollte der direkten Aktualisierung des Lieferantenstammsatzes über blnSchreibeDatensatz
vorgezogen werden.
Die Ereignisse stellen wir Ihnen für folgende Funktionalitäten zur Verfügung:
- Sie können den zu schreibenden Datensatz noch einmal manipulieren, bevor er geschrieben wird.
Achtung: Tun Sie dies nur, wenn Sie sich genau
mit dem Aufbau des Datensatzes auskennen. Andernfalls können Sie den Eintrag unbrauchbar machen.
- Wollen Sie eigene Zusatzdaten anlegen, für die Sie z.B. schon die Lieferantennummer benötigen bevor der Datensatz geschrieben ist,
erhalten Sie auf diese Art die Möglichkeit dazu.
|
blnNeuenKontaktAnlegen |
Routinennamen |
Public Function blnNeuenKontaktAnlegen(ByRef strKontakt As String, udtFelder() As CLDaten) As Boolean |
Beschreibung |
Legt einen neuen Kontakt in der Classic Line an oder aktualisiert einen bestehenden Kontakt. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
strKontakt |
- Möglichkeit: "DA1234567890#####" oder "KA1234567890#####": Es wird ein neuer Kontakt zur Debitoren- bzw. Kreditorennummer angelegt. Anschließend enthält strKontakt die neue Kontaktnummer.
- Möglichkeit: Kontaktnummer im Format "DA123456789012345" oder "KA123456789012345": Existiert der angegebene Kontakt, wird dieser aktualisiert; Existiert der angegebene Kontakt nicht, wird er angelegt.
Das Feld enthält die neue Kontaktnummer, wenn die Funktion erfolgreich beendet wurde.
|
|
udtFelder() |
Alle zu setzenden Felder werden in diesem Array vom Typ CLDaten übergeben. Nicht gesetzte Felder erhalten einen Defaultwert. |
Ereignisse |
Public Event AfterDContactInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Kundenkontaktdatensatz eingefügt wird. Die Variable
strDatensatz enthält den Datensatzstring, der im nächsten Schritt geschrieben wird.
In der Collection colFelder werden die über udtFelder() gesetzten Felder übergeben. |
|
Public Event AfterKContactInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Lieferantenkontaktdatensatz eingefügt wurde. Die Parameter entsprechen dem
Ereignis AfterDContactInsert |
|
Public Event BeforeDContactInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Kundenkontaktdatensatz eingefügt wird. Die Parameter entsprechen dem
Ereignis AfterDContactInsert |
|
Public Event BeforeKContactInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Lieferantenkontaktdatensatz eingefügt wird. Die Parameter entsprechen dem
Ereignis AfterDContactInsert |
Bemerkung |
Wird in strKontakt ein Sting im Format "DA1234567890#####" oder "KA1234567890#####" übergeben (die Rauten müssen übergeben werden),
wird eine neue Kontaktnummer für den Kunden bzw. Lieferanten angelegt.
Existiert der Kunde bzw. Lieferant nicht, wird eine Fehlermeldung ausgelöst.
Das besondere an dieser Funktion ist, dass bei der Anlage bzw. Aktualisierung der Kontaktdaten die Geschäftslogik
der Classic Line beachtet wird. Dies bedeutet insbesondere, dass auch Indexdateien, Matchcodedateien und ähnliche
Funktionalitäten beachtet werden. Diese Funktion sollte der direkten Aktualisierung des Kontaktstammsatzes über blnSchreibeDatensatz
vorgezogen werden.
Die Ereignisse stellen wir Ihnen für folgende Funktionalitäten zur Verfügung:
- Sie können den zu schreibenden Datensatz noch einmal manipulieren, bevor er geschrieben wird.
Achtung: Tun Sie dies nur, wenn Sie sich genau
mit dem Aufbau des Datensatzes auskennen. Andernfalls können Sie den Eintrag unbrauchbar machen.
- Wollen Sie eigene Zusatzdaten anlegen, für die Sie z.B. schon die Lieferantennummer benötigen bevor der Datensatz geschrieben ist,
erhalten Sie auf diese Art die Möglichkeit dazu.
Hinweis: Diese Funktionalität ist zurzeit von uns nicht freigeschaltet. Sie können diese jedoch gesondert erwerben.
Bitte wenden Sie sich dafür an Ihren Classic Line Fachhändler. |
blnNeuenArtikelAnlegen |
Routinennamen |
Public Function blnNeuenArtikelAnlegen(ByRef strArtikelnummer As String, ByRef strHersteller As String, udtFelder() As CLDaten) As Boolean |
Beschreibung |
Legt einen neuen Artikel in der Classic Line an oder aktualisiert einen bestehenden Artikel. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
strArtikelnummer |
Die Artikelnummer, die angelegt oder aktualisiert werden soll. Dieser Parameter ist ein Pflichtparameter. |
|
strHersteller |
Die Herstellernummer, zu der der Artikel angelegt bzw. aktualisiert werden soll im Format "1234567890". Dieser
Parameter ist ein Pflichtfeld. |
|
udtFelder() |
Alle zu setzenden Felder werden in diesem Array vom Typ CLDaten übergeben. Nicht gesetzte Felder erhalten einen Defaultwert. |
Ereignisse |
- keine - |
Zurzeit werden für die Artikelanlage keine Ereignisse unterstützt. |
Bemerkung |
Das besondere an dieser Funktion ist, dass bei der Anlage bzw. Aktualisierung der Artikeldaten die Geschäftslogik
der Classic Line beachtet wird. Dies bedeutet insbesondere, dass auch Indexdateien, Matchcodedateien und ähnliche
Funktionalitäten beachtet werden. Diese Funktion sollte der direkten Aktualisierung des Artikelstammsatzes über blnSchreibeDatensatz
vorgezogen werden.
|
blnNeuenBelegAnlegen |
Routinennamen |
Public Function blnNeuenBelegAnlegen(ByRef strBelegnummer As String, udtFelder() As CLDaten, ByVal blnPreiseInCLBerechnen As Boolean) As Boolean |
Beschreibung |
Legt einen neuen Verkaufsbeleg in der Classic Line an. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
strBelegnummer |
Das Feld enthält die neue Belegnummer, wenn die Funktion erfolgreich beendet wurde.
|
|
udtFelder() |
Alle zu setzenden Felder werden in diesem Array vom Typ CLDaten übergeben. Nicht gesetzte Felder erhalten einen Defaultwert. |
|
blnPreiseInCLBerechnen |
Steht dieser Wert auf True, so werden die übergebenen Artikelpreise ignoriert. Statt dessen wird
die Standard-Preisermittlung für diesen Artikel durchgeführt, als ob ein Anwender den Artikel in der Positionserfassung
manuell eingegeben hätte. Sonderprogrammierungen für die Preisfindung können natürlich nicht automatisch berücksichtigt werden. |
Ereignisse |
Public Event AfterBelegInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem der Belegdatensatz eingefügt wurde. Die Variable
strDatensatz enthält den Datensatzstring, der im nächsten Schritt geschrieben wird.
In der Collection colFelder werden die über udtFelder() gesetzten Felder übergeben. |
|
Public Event AfterPositionInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, nachdem ein Belegpositiondatensatz eingefügt wurde. Die Parameter entsprechen dem
Ereignis AfterBelegInsert. |
|
Public Event BeforeBelegInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Belegdatensatz eingefügt wird. Die Parameter entsprechen dem
Ereignis AfterBelegInsert |
|
Public Event BeforePositionInsert(ByRef strDatensatz As String, ByRef colFelder As Collection) |
Dieses Ereignis wird ausgelöst, bevor der Belegpositiondatensatz eingefügt wird. Die Parameter entsprechen dem
Ereignis AfterBelegInsert
Mit dieser Funktion ist es möglich, z.B. individuelle Preisfindungen zu realisieren. |
Bemerkung |
Das erste im Array übergebene Feld bestimmt die Belegart. Gültige Werte sind:
Q = Angebot
A = Auftrag
L = Lieferschein, inkl. Auftrag
R = Rechnung, inkl. Auftrag
D = Direktrechung, inkl. Auftrag
Hinweis: Diese Funktionalität unterliegt zurzeit noch einigen Beschränkungen:
Es wird zu einem Beleg in der Auftragserfassung immer ein Auftrag angelegt.
Es ist nicht möglich, Folgebelege zu bestehenden Aufträgen anzulegen.
Belege können nicht bearbeitet werden.
Es werden nur Artikelpositionen unterstützt.
Es werden keine Einkaufsbelege unterstützt.
Es werden noch nicht alle Kopffelder des Beleges unterstützt.
Es werden nicht alle Felder der Artikelposition unterstützt.
|
Zurzeit unterstützte Felder |
Belegkopf Angebote |
Vorgang (nur "Q")
Kundennummer
|
|
Belegkopf Verkaufsbelege |
Vorgang (nur "A","L","R","D")
Nummer
Kundennummer
Name1
Name2
Adresszusatz
Strasse
Postleitzahl
Ort
Laendercode
Versand
Kopfrabatt1
Bestellnr_DesKunden
Liefer_Name1
Liefer_Name2
Liefer_Adresszusatz
Liefer_Strasse
Liefer_Postleitzahl
Liefer_Ort
Liefer_Laendercode
Liefer_Text1
Liefer_Text2
Kennz_Bruttopreise
Fremdsprache
USt_Schluessel
|
|
Belegpositionen Angebote |
Artikelnummer
Menge
Einzelpreis
|
|
Belegpositionen Verkaufsbelege |
Artikelnummer
Menge
Einzelpreis
Lagerort
Bezeichnung2
|
blnGetOPSummen |
Routinennamen |
Public Function blnGetOPSummen(ByVal Konto As String, ByRef OPSummen() As Double) As Boolean |
Beschreibung |
Ermittelt die OP-Summen in einem vierstufigen 30-Tage-Raster |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
Konto |
Kreditoren oder Debitorennummer im Format "K1234567890" bzw. "D1234567890".
|
|
OPSummen() |
Rückgabe der OP-Summen der übergebenen Kontokorrentnummer. Dabei enthält
OPSummen(0) die gesamte OP-Summe,
OPSummen(1) die Summe <=30 Tage,
OPSummen(2) die Summe >30 und <=60Tage,
OPSummen(3) die Summe >60 und <=90 Tage und
OPSummen(4) die Summe >90 Tage. |
Bemerkung |
Hinweis: Diese Funktionalität ist zurzeit von uns nicht freigeschaltet. Sie können diese jedoch gesondert erwerben.
Bitte wenden Sie sich dafür an Ihren Classic Line Fachhändler. |
blnGetSperrvermerke |
Routinennamen |
Public Function blnGetSperrvermerke(ByRef Sperrvermerke() As String) As Boolean |
Beschreibung |
Ermittelt die Bezeichnungen der Sperrvermerke des aktuellen Mandanten |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
Sperrvermerke() |
Die Bezeichnungen der Sperrvermerke des aktuellen Mandanten. Das Array hat zwölf Einträge. Dabei beinhalten
die ersten sechs Einträge die Debitorensperrvermerke und die übrigen die Kreditorensperrvermerke.
|
Bemerkung |
Hinweis: Diese Funktionalität ist zurzeit von uns nicht freigeschaltet. Sie können diese jedoch gesondert erwerben.
Bitte wenden Sie sich dafür an Ihren Classic Line Fachhändler. |
vntUniversal |
Routinennamen |
Public Function vntUniversal(nFunktionsnummer As Integer, Optional ByRef rvntParameter As Variant) As Boolean |
Beschreibung |
Mit dieser Funktion können nachträglich Funktionen implementiert werden, ohne die Binärkompatibilität der COM-Klasse zu unterbrechen. |
Rückgabewert |
True |
Vorgang konnte erfolgreich beendet werden |
|
False |
Vorgang konnte nicht erfolgreich beendet werden |
Parameter |
Abhängig von der zukünftig implementierten Funktion |
Bemerkung |
Die Funktion vntUniversal wird zurzeit nicht benötigt. Weitere Informationen ent-nehmen Sie den zukünftigen Dokumentationen zur Connector-DLL. |
|
|