KORE-Objekt erstellen
GetBebuObj
Parameter
Diese Methode hat keine Parameter.
Returnwert
Gibt als Returnwert einen Pointer auf das KORE-Objekt zurück. Wird die Methode mehrmals aufgerufen, werden auch mehrere Objekte erstellt.
Bemerkung
Um die COM-Schnittstelle benützen zu können, muss im VisualBasic die SBSActiveX Library aktiviert werden. Sie wird unter dem Menüpunkt Project – References mit dem Namen „SBSxas X.X.X.X Type Library“ gefunden und aktiviert. X.X.X.X ist die Version der Type Library (z.B. 1.1.9.0)
Alle erstellten Objekte müssen beim Beenden des Programmes dealloziert werden. Die Deallozierung erfolgt in der gekehrten Reihenfolge, als die Allozierung.
Konkret zum Beispielen.
Set Bebu = Nothing Set Finanz = Nothing
Beispiel
Beispiel – Automation Schnittstelle: Dim FinanzSrv, Bebu As Object Set Finanz = CreateObject("SBSxas.AXFinanz") Set Bebu = Finanz.GetBebuObj Beispiel – COM Schnittstelle: Dim Finanz As AXFinanz Dim Bebu As AXiBeBu Set Finanz = New SBSXASLib.AXFinanz Set Bebu = Finanz.GetBebuObj
Zusatzinformationen
Beschreibung
Zusatzinformationen können hinzugefügt, gelöscht gelesen und modifiziert werden.
Siehe dazu das Kapitel Adressen-Zusatzinformationen
Optionen setzen
Beschreibung
Diese Methode setzt Optionen, die für dieses Objekt gültig sind.
EntlProjJN gibt an, ob Tests auf das entlastende Projekt ausgeführt werden müssen, auch wenn kein solches übergeben wurde. Wird der Wert ‚J’ übergeben, werden alle Tests ausgeführt. Wird jedoch der Wert ‚N’ übergeben, wird das entlastende Projekt auf ’’ gesetzt und Tests ausgelassen.
Aus diesem ist klar, dass wenn z.B. die Methode WriteLeistung ohne entlastendes Projekt aufgeruffen wird und EntlPojJN einmal den Wert ‚J’ und einmal den Wert ‚N’ bei dem Wert ‚J’ Fehler erzeugt werden können.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
EntlProjektJN |
String |
String |
Ja |
Nur gültig für die Methoden WriteUmbuchung, WriteLeistung und WriteLeistungsbuchung. Defaultwert im Server ist ‚J’ Siehe Beschreibung unten: |
Beispiel
Call Bebu.SetOptionen(“J“)
Projektplanvariante schreiben
Beschreibung
Um alle Projektplan-Felder füllen zu können, müssen keine zusätzlichen Tabellen vorhanden sein.
Ablauf
Zuerst werden die verschiedenen Werte den einzelnen Feldern des Projektplans zugewiesen. Wenn alle Zuweisungen erfolgt sind, kann der gesamte Projektplan geschrieben werden.
Das Schreiben des Projektplans erfolgt in 4 verschiedenen Schritten. Die Feldangaben sind in den folgenden Parameterbeschreibungen aufgeführt.
-
SetPrjPlanVariante(): zwingend
Mit dieser Methode wird eine Projektplanvariante angelegt und benannt. Existiert diese Variante bereits, so wird sie umbenannt. -
SetPrjPlanParent(): fakultativ
Mit dieser Methode kann angegeben werden bei welcher Gruppennummer das einfügen des Projektplans beginnen soll. -
SetProjekt2(): zwingend
Mit dieser Methode werden Informationen aller Projekte abgefüllt. -
WritePrjPlan(): zwingend
Die Kontrollen und das eigentliche Schreiben des Projektplans wird ausgeführt. Es wird keine Kopie eines vorhandenen Projektplans erzeugt. Um trotzdem eine Kopie zu erhalten kann die entsprechende StoredProcedure im BSE-Objekt ausgeführt werden.
SetPrjPlanVariante
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Variantenummer |
Long |
Numerisch |
Ja |
Variantennummer |
2. |
Name der Variante |
String |
Alphanumerisch (40) |
Ja |
Name der Variante |
Returnwert
Diese Methode hat keinen Returnwert.
SetPrjPlanParent
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Parent |
String |
Alphanumerisch(15) |
Ja |
Gruppennummer |
Returnwert
Diese Methode hat keinen Returnwert.
SetProjekt2
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Level |
Long |
Numerisch |
Nein |
Dieses Feld wird nicht mehr benötigt. |
2. |
Nummer |
String |
Alphanumerisch(30) |
Ja |
Prj-Nummer |
3. |
TypGEP |
String |
Alphanumerisch(1) |
Ja |
P-Projekt, G-Gruppe, E-Gruppenendzeile(Totalzeile) |
4. |
Bezeichnung |
String |
Alphanumerisch(60) |
Nein |
Bezeichnung |
5. |
giltVon |
String |
Datum(4,2,2) |
Ja |
JJJJMMDD Wenn das Projekt keine Datumsbeschränkung besitzt muss den Feldern ‘giltVon‘ und ‘giltBis‘ 19000101 eingegeben werden. |
6. |
giltBis |
String |
Datum(4,2,2) |
Ja |
JJJJMMDD Wenn das Projekt keine Datumsbeschränkung besitzt muss den Feldern ‘giltVon‘ und ‘giltBis‘ 19000101 eingegeben werden. |
7. |
Limit |
String |
Numerisch(17.2) |
Nein |
Limit |
8. |
Statistik |
String |
Alphanumerisch(5) |
Nein |
Statistik |
9. |
Text |
String |
Alphanumerisch(255) |
Nein |
Text |
10. |
Seitenumbruch |
String |
Alphanumerisch(1) |
Ja |
J-Ja , N-Nein |
11. |
Sprachcode |
String |
Numerisch |
Nein |
Wird keine Sprachcode angegeben, wird der Sprachcode, der bei connectSBSDB verwendet wurde übernommen. |
Returnwert
Diese Methode hat keinen Returnwert.
WritePrjPlan
Parameter
Diese Methode hat keine Parmeter.
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call Bebu.SetPrjPlanVariante(3, "Automation Projekt Variante") Call Bebu.SetProjekt2(0,"PROJEKT","G"...) Call Bebu.SetProjekt2(0,"PR1","P"...) Call Bebu.SetProjekt2(0,"PROJEKT","E"...) Call Bebu.WritePrjPlan
Dieses Beispiel fügt das Projetk PR2 bei der Gruppennummer Projekt ein
Call Bebu.SetPrjPlanVariante(3, "Automation Projekt Variante") Call Bebu.SetPrjPlanParnt("PROJEKT") Call Bebu.SetProjekt2(0,"PR2","P"...) Call Bebu.WritePrjPlan
Projektplanvariante löschen
Beschreibung
DropPrjPlanVariante
Diese Methode löscht die angegebene Projektplanvariante. Projektplanvariante 0 kann nicht gelöscht werden.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Variantenummer |
Long |
Numerisch |
Ja |
Variantennummer |
Beispiel
Call Bebu.DropPrjPlanVariante(3)
Projektplanvariante umbenennen
UpdatePrjPlanVariante
Beschreibung
Diese Methode umbenennt die Projektplanvariante.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Variantenummer |
Long |
Numerisch |
Ja |
Variantennummer |
2. |
Text |
String |
Alphanumerisch(50) |
Nein |
Neuer Variante-Titel Text |
Beispiel
Bebu.UpdatePrjPlanVariante(0, "Basisvariante")
Projektplanvariante modifizieren
Beschreibung
Um alle Projektplan-Felder füllen zu können, müssen keine zusätzlichen Tabellen vorhanden sein.
Ablauf
Zuerst werden die verschiedenen Werte den einzelnen Feldern des Projektplans zugewiesen. Wenn alle Zuweisungen erfolgt sind, kann der gesamte Projektplan geschrieben werden.
Das modifizieren des Projektplans erfolgt in 3 verschiedenen Schritten. Die Feldangaben sind in den folgenden Parameterbeschreibungen aufgeführt.
-
SetPrjPlanVariante(): zwingend
Mit dieser Methode wird eine Projektplanvariante angelegt und benannt. Existiert diese Variante bereits, so wird sie umbenannt.
-
SetProjekt2(): zwingend
Mit dieser Methode werden Informationen aller Projekte abgefüllt. -
UpdateProjekt(): zwingend
Die Kontrollen und das modifizieren des Projektplans wird ausgeführt
SetPrjPlanVariante
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Variantenummer |
Long |
Numerisch |
Ja |
Variantennummer |
2. |
Name der Variante |
String |
Alphanumerisch(40) |
Ja |
Name der Variante |
Returnwert
Diese Methode hat keinen Returnwert.
SetProjekt2
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Level |
Long |
Numerisch |
Nein |
Dieses Feld wird nicht mehr benötigt. |
2. |
Nummer |
String |
Alphanumerisch(30) |
Ja |
Prj-Nummer |
3. |
TypGEP |
String |
Alphanumerisch(1) |
Ja |
P-Projekt, G-Gruppe, E-Gruppenendzeile(Totalzeile) |
4. |
Bezeichnung |
String |
Alphanumerisch(50) |
Nein |
Bezeichnung |
5. |
giltVon |
String |
Datum(4,2,2) |
Ja |
JJJJMMDD |
6. |
giltBis |
String |
Datum(4,2,2) |
Ja |
JJJJMMDD |
7. |
Limit |
String |
Numerisch(17.2) |
Nein |
Limit |
8. |
Statistik |
String |
Alphanumerisch(5) |
Nein |
Statistik |
9. |
Text |
String |
Alphanumerisch(255) |
Nein |
Text |
10. |
Seitenumbruch |
String |
Alphanumerisch(1) |
Ja |
J-Ja , N-Nein |
11. |
Sprachcode |
String |
Numerisch |
Nein |
Wird keine Sprachcode angegeben, wird der Sprachcode, der bei connectSBSDB verwendet wurde übernommen. |
Returnwert
Diese Methode hat keinen Returnwert.
Bemerkung
Bei der Eingabe des Strings ‘NOT_UPD‘ bei bei den Feldern 4 bis 10 werden diese Daten nicht geändert.
UpdateProjekt
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call Bebu.SetPrjPlanVariante(3, "Automation Projekt Variante") Call Bebu.SetProjekt2(...) Call Bebu.SetProjekt2(...) Call Bebu.SetProjekt2(...) Call Bebu.UpdateProjekt
Projekt überprüfen
CheckProjekt
Beschreibung
Diese Methode überprüft die Existenz eines Projektes im aktuellen Mandanten (Returnwert 0 = Projekt existiert, Returnwert 100 = Projekt existiert nicht). Wird ein Datum ungleich leer eingeben, wird zusätzlich geprüft ob das Projekt zum Datum offen ist (Returnwert 0) oder abgeschlossen (Returnwert 100).
In den Einstellungen muss im Tab Kostenrechnung, Gruppe Plausibilitäten Projekte die Checkbox Projektbuchungen ohne Stammdaten NICHT gesetzt sein damit das Projekt überprüft werden kann.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
ProjNr |
String |
Alphanumerisch(30) |
Ja |
Projektnummer |
2. |
Datum |
String |
Alphanumerisch(8) |
Ja |
Eingabeformat: YYYYMMTT |
Returnwerte
0 = Projekt existiert und/oder ist offen
100 = Projekt existiert nicht und/oder ist geschlossen
Beispiel
b = Bebu.CheckProjekt("PROD", "20080101") b = Bebu.CheckProjekt("PROD", "")
Projekte und Kst/Ktr-Kostenarten gruppieren
BindPrjKstKa
Beschreibung
Diese Methode ordnet die Kostenstellen/Kostenträger in Verbindung mit Kostenartenzu den Projektenten zu.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Projektnummer |
String |
Alphanumerisch(30) |
Ja |
Projektnummer |
2. |
KstKtrKaList |
String |
Alphanumerisch(n) |
Ja |
Eingabeformat: Kart Feld_Trenner Kst Rec_Trenner Kart Feld_Trenner Kst Rec_Trenner... Die Liste muss mit einem Rec_Trenner abgeschlossen sein. siehe Methode SetDelimiters |
Beispiel
Call Bebu.BindKaKst("MyProjektIntern", "300{<}HANDEL{>} _ 300{<}PROJEKT{>} 300{<}REWE{>} 300{<}PROD{>}")
Betriebliche Umbuchungen schreiben
WriteUmbuchung2
Beschreibung
Schreibt eine betriebliche Umbuchung. Siehe auch Kapitel Optionen setzen.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Datum |
|
Datum(4,2,2) |
Ja |
JJJJMMDD |
2. |
Belegnummer |
|
Numerisch |
Ja |
Belegnummer (*) |
3. |
BelStelle |
|
Alphanumerisch(15) |
Ja |
Belastene Stelle |
4. |
EntStelle |
|
Alphanumerisch(15) |
Ja |
Entalstene Stelle |
5. |
Buchungstext |
|
Alphanumerisch(60) |
Ja |
Text |
6. |
Betrag |
|
Numerisch(17.2) |
Ja |
Betrag |
7. |
EntlProjekt |
|
Alphanumerisch(30) |
Nein |
Entlastendes Projekt |
8. |
BelProjekt |
|
Alphanumerisch(30) |
Ja |
Belastenes Projekt |
9. |
Ka |
|
Alphanumerisch(15) |
Ja |
Kostenart |
(*)
-
Wird die Belegnummer auf -100 gesetzt, wird die Belegnummer der Umbuchung fortlaufend, eindeutig durchnum-meriert (= interne Laufnummer lfnbrb).
-
Wird die Belegnummer auf -200 gesetzt, wird die Belegnummer der Umbuchung fortlaufend anhand der Vorgabe unter Extras/Einstellungen/Kostenrechnung/Belegnummerierung KORE vergeben.
Returnwert
Diese Methode hat keinen Returnwert.
Betriebliche Umbuchung: Belegnummer holen
GetBelegNr
Beschreibung
Mit dieser Methode bekommt man die Belegnummer einer Umbuchung (=Kostenbuchung) zurück.
Parameter
Diese Methode hat keine Parameter.
Returnwert
Belegnummer der Umbuchung (=Kostenbuchung).
Beispiel
Int Belegnummer = BeBu.GetBelegNr()
Betriebliche Umbuchung: Interne Laufnummer holen
GetUmBuchLaufnr
Beschreibung
Mit dieser Methode bekommt man die interne Laufnummer (lfnbrb) einer Umbuchung (=Kostenbuchung) zurück, die man zum Löschen benötigt.
Parameter
Diese Methode hat keine Parameter.
Returnwert
Interne Laufnummer, die bei der Methode WriteUmbuchung2 automatisch vergeben wird
Beispiel
Laufnummer = BeBu.GetUmBuchLaufnr
Betriebliche Umbuchung löschen
DeleteUmbuchung
Beschreibung
Diese Methode löscht eine Umbuchung (=Kostenbuchung).
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Laufnummer |
String |
Numerisch |
Ja |
Umbuchung-Laufnummer (lfnbrb) |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.DeleteUmbuchung(Laufnummer)
Bezugsgrösse schreiben
WriteBezugsgroesse
Beschreibung
Diese Methode trägt eine Bezugsgrösse ein.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(15) |
Ja |
Nummer |
2. |
Bezeichnung |
String |
Alphanumerisch(50) |
Ja |
Bezeichnung |
3. |
Verrechnungssatz |
String |
Numerisch(17,2) |
Ja |
Verrechnungssatz |
Returnwert
Diese Methode hat keinen Returnwert.
Bezugsgrösse modifizieren
UpdateBezugsgroesse
Beschreibung
Diese Methode aktualisiert einen Bezugsgrösse-Eintrag.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
1. |
Nummer |
String |
Alphanumerisch(15) |
Ja |
Nummer |
2. |
Bezeichnung |
String |
Alphanumerisch(50) |
Ja |
Bezeichnung |
3. |
Verrechnungssatz |
String |
Numerisch(17,2) |
Ja |
Verrechnungssatz |
Returnwert
Diese Methode hat keinen Returnwert.
Bezugsgrösse löschen
DeleteBezugsgroesse
Beschreibung
Diese Methode löscht einen Bezugsgrösse-Eintrag.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(15) |
Ja |
Nummer |
Returnwert
Diese Methode hat keinen Returnwert.
Bezugsgrösse auslesen
ReadBezugsgroessen, GetBezugsgroesse
Beschreibung
Bezugsgrössen werden ausgelesen. Wird das Ende des Resultsets erreicht, wird der Returnwert „EOF“ zurückgegeben.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(15) |
Ja |
Nummer |
Returnwert
ReadBezugsgroessen initialisiert das Lesen und gibt keinen Returnwert zurück.
GetBezugsgroesse gibt als Returnwert eine Zeile des Resultsets zurück. Einzelne Felder, wie in der unteren Tabelle beschrieben, sind durch den FeldDelim getrennt (siehe Kapitel Trennzeichen setzen).
Eine Zeile beinhaltet folgende Felder:
Nr. |
Feldname |
Erklärung |
---|---|---|
1. |
bezgrnr |
Nummer |
2. |
bezgrbez |
Bezeichnung |
3. |
kstsatz |
Satz |
Beispiel
Call Bebu.ReadBezugsgroessen lab: zeile = Bebu.GetBezugsgroesse If zeile = "EOF" Then GoTo iyend GoTo lab iyend:
Leistungsartenplanvariante löschen
DropLaPlanVariante
Beschreibung
Diese Methode löscht eine Variante des Leistungsartenplans.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Variantenummer |
Long |
Numerisch |
Ja |
Variantennnummer |
Returnwert
Diese Methode hat keinen Returnwert.
Leistungartenplanvariante umbenennen
UpdateLaPlanVariante
Beschreibung
Diese Methode umbenennt die Leistungsartenplanvariante.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Variantenummer |
Long |
Numerisch |
Ja |
Variantennummer |
2. |
Text |
String |
Alphanumerisch(50) |
Nein |
Neuer Variante-Titel Text |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Bebu.UpdateLaPlanVariante(0, "Basisvariante")
Leistungsartenplan schreiben
Beschreibung
Um alle Leistungsarten-Felder füllen zu können, müssen keine zusätzlichen Tabellen vorhanden sein.
Ablauf
Zuerst werden die verschiedenen Werte den einzelnen Feldern aller Leistungsarten zugewiesen. Wenn alle Zuweisungen erfolgt sind, kann der gesamte Leistungsarten geschrieben werden.
Das Schreiben des Leistungsartenplans erfolgt in 4 verschiedenen Schritten. Die Feldangaben sind in den folgenden Parameterbeschreibungen aufgeführt.
-
SetLaPlanVariante(): zwingend
Mit dieser Methode wird eine Leistungsartenplanvariante angelegt und benannt. Existiert diese Variante bereits, so wird sie umbenannt. -
SetLaPlanParent (): fakultativ
Mit dieser Methode kann angegeben werden bei welcher Gruppennummer das einfügen des Leistungsartenplans beginnen soll -
SetLaart 2(): zwingend
Mit dieser Methode werden Informationen aller Leistungsarten abgefüllt. -
WriteLaPlan (): zwingend
Die weitreichenden Kontrollen und das eigentliche Schreiben des Leistungsartenplans wird ausgeführt. Es wird keine Kopie eines vorhandenen Leistungsartenplan erzeugt. Um trotzdem eine Kopie zu erhalten kann die entsprechende StoredProcedure im BSE-Objekt ausgeführt werden.
SetLaPlanVariante
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Variantenummer |
Long |
Numerisch |
Ja |
Variantennummer |
2. |
Name der Variante |
String |
Alphanumerisch(50) |
Ja |
Name der Variante |
Returnwert
Diese Methode hat keinen Returnwert.
SetLaPlanParent
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Parent |
String |
Alphanumerisch(15) |
Ja |
Gruppennummer |
Returnwert
Diese Methode hat keinen Returnwert.
SetLaart2
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Level |
Long |
Numerisch |
Nein |
Dieses Feld wird nicht mehr benötigt. |
2. |
Nummer |
String |
Alphanumerisch(15) |
Ja |
LA-Nummer, Gruppennummer |
3. |
TypGEL |
String |
Alphanumerisch(1) |
Ja |
L-Leistungsart, G-Gruppe, E-Gruppenendzeile (oder anders Totalzeile) Jede Gruppe hat ihre Totalzeile auf einer um eine Stufe tieferer Ebene |
4. |
Bezeichnung |
String |
Alphanumerisch(50) |
Nein |
Bezeichnung |
5. |
BezugsgroesseNr |
String |
Alphanumerisch(5) |
Nein |
aus dem Beugsgrössenstamm |
6. |
Statistik |
String |
Alphanumerisch(5) |
Nein |
Statistik |
7. |
Seitenumbruch |
String |
Alphanumerisch(1) |
Ja |
J-Ja , N-Nein |
Returnwert
Diese Methode hat keinen Returnwert.
WriteLaPlan
Beschreibung
Es wird keine Kopie eines vorhandenen Leistungsartenplan erzeugt.
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call Bebu.SetLaPlanVariante (3, "Automation Variante") Call Bebu.SetLaart2 (0, "LAGR", "G", "Gruppe", "", "", "N") Call Bebu.SetLaart2 (0, "LA1", "L", "Leist1", "1", "", "N") Call Bebu.SetLaart2 (0, "LA2", "L", "Leist2", "2", "", "N") Call Bebu.SetLaart2 (0, "LAGR", "E", "Gruppe", "", "", "N") Call Bebu.WriteLaPlan
Dieses Beispiel fügt die Leistungsart LA3 bei der Gruppennummer LAGR ein.
Call Bebu.SetLaPlanVariante (3, "Automation Variante") Call Bebu.SetLaPlanParent("LAGR") Call Bebu.SetLaart2 (0, "LA3", "L", "Leist1", "3", "", "N") Call Bebu.WriteLaPlan
Kst/Ktr in Leistungsarten gruppieren
BindLaKstKa
Beschreibung
Diese Methode ordnet die Kostenstellen/Kostenträger in Verbindung mit Kostenarten zu den Leistungsartenarten zu.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
LaartNr |
String |
Alphanumerisch(15) |
Ja |
Leistungsart-Nummer |
2. |
KstKtrKaList |
String |
Alphanumerisch(n) |
Ja |
Es muss eine Sekundäre Kostenart sein. Eingabeformat: Kart Feld_Trenner Kst Kst Rec_Trenner Kart Feld_Trenner Kst Rec_Trenner... Die Liste muss mit einem Rec_Trenner abgeschlossen sein. siehe Methode SetDelimiters |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call Bebu.BindLaKstKa("LA1", "900{<}HANDEL{>}900{<}PROJEKT{>}900{<} REWE{>}900{<}PROD{>}")
Projektstamm auslesen
ReadProjektTree, GetProjektLine
Beschreibung
Mit diesen Methoden wird der Projektstamm ausgelesen werden. Dabei wird die Methode ReadProjektTree verwendet um das Lesen zu initialisieren. Danach kann mit der Methode GetProjektLine die Daten ausgelesen werden. Wird das Ende des Resultsets erreicht, wird der Returnwert „EOF“ zurückgegeben.
Parameter
Parameter von ReadProjektTree: (Fehler in der Dokumentation)
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
VarianteNr |
Long |
Numerisch |
Ja |
Variantennummer |
Die Methode GetProjektLine hat keine Parameter.
Returnwert
ReadProjektTree initialisiert das Lesen und gibt keinen Returnwert zurück.
GetProjektLine gibt als Returnwert eine Zeile des Resultsets zurück. Einzelne Felder, wie in der unteren Tabelle beschrieben, sind durch den FeldDelim getrennt (siehe Kapitel Trennzeichen setzen).
Eine Zeile beinhaltet folgende Felder.
Nr. |
Feldname |
Erklärung |
---|---|---|
1. |
projnr |
Nummer |
2. |
projbez |
Bezeichnung |
3. |
sort |
Reihenfolgenummer |
4. |
projart |
Art |
5. |
statcode |
Statistik |
6. |
projtext |
Text |
7. |
dtevon |
Datum von |
8. |
dtebis |
Datum bis |
9. |
limite |
Limit |
Beispiel
Call Bebu.ReadProjektTree(VarianteNr) lab: zeile = Bebu.GetProjektLine If zeile = "EOF" Then GoTo iyend GoTo lab iyend:
KORE-Buchungen auslesen
ReadKstJournal, GetKstJournalLine2
Beschreibung
KORE-Buchungen werden ausgelesen. Wird das Ende des Resultsets erreicht, wird der Returnwert „EOF“ zurückgegeben.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
AktPeriodeJN |
String |
Alphanumerisch |
Nein |
Defaultwert ‚J’ Wird der Wert ‚N’ übergeben werden alle KORE-Buchungen des Mandanten ausgelesen, welche nicht dem Periodenstatus ‚A’ entsprechen. |
Returnwert
ReadKstJournal initialisiert das Lesen und gibt keinen Returnwert zurück.
GetKstJournalLine2 gibt als Returnwert eine Zeile des Resultsets zurück. Einzelne Felder, wie in der unteren Tabelle beschrieben, sind durch den FeldDelim getrennt (siehe Kapitel Trennzeichen setzen).
Eine Zeile beinhaltet folgende Felder.
Nr. |
Feldname |
Erklärung |
---|---|---|
1. |
belnbr |
Belegnummer |
2. |
bhgdte |
Buchungsdatum |
3. |
kstbhgtext |
Kostenstellenbuchungstext |
4. |
kstnr |
Kst-Nummer |
5. |
kstnrh |
Kostenstelle Haben |
6. |
kanr |
Ka-Nummer |
7. |
katext |
Bezeichnung |
8. |
betragdm |
|
9. |
gegenkto |
Gegenkonto |
10. |
gegenktotext |
Gegenkonto-Text |
11. |
kafibukto |
Kostenart Fibukonto |
12. |
kafibuktotext |
Kontotext Fibukonto |
13. |
umlagestatus |
Umlagen-Status |
14. |
mitarbeiter |
Mitarbeiter |
15. |
externebelegnr |
Externe Belegnummer |
16. |
lfnbrf |
Laufnummer |
17. |
sortnbrf |
Sortnummer |
18. |
kdnummer |
Kundennummer |
19. |
kdname |
Kundenname |
20. |
mandant |
Mandanten-Identifikation |
21. |
dtevon |
Datum von der aktuellen Periode |
22. |
dtebis |
Datum bis der aktuellen Periode |
23. |
gdatvon |
Geschäftsjar von |
24. |
gdatbis |
Geschäftsjar bis |
25. |
belvon |
Beleg von |
26. |
belbis |
Beleg bis |
27. |
rptsprache |
Sprachcode |
28. |
koatext |
Kostenartentext |
29. |
ksthtext |
Kostenstellentext |
30. |
lanr |
Leistungsartennummer |
31. |
latext |
Bezeichnung |
32. |
menge |
Einheiten |
33. |
preis |
Preis |
34. |
projnr |
Projekt-Nummer |
35. |
projbez |
Projekt-Bezeichnung |
Beispiel
Call Bebu.ReadKstJournal() Call Bebu.ReadKstJournal("J") lab: zeile = Bebu.GetKstJournalLine2 If zeile = "EOF" Then GoTo iyend GoTo lab iyend:
Leistungserfassung schreiben
WriteLeistung2
Beschreibung
Diese Methode schreibt eine neue Betriebliche Leistungserfassung. Siehe auch Kapitel Optionen setzen.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Datum |
String |
Datum(4,2,2) |
Ja |
JJJJMMDD |
2. |
BelegNr |
String |
Numerisch |
Ja |
Belegnummer |
3. |
LeistendeStelle |
String |
Alphanumerisch(15) |
Ja |
Kostenstelle oder Kostenträger |
4. |
EmpfStelle |
String |
Alphanumerisch(15) |
Ja |
Kostenstelle oder Kostenträger |
5. |
LeistungsArt |
String |
Alphanumerisch(15) |
Ja |
Die Leistungsart muss eine Bezugsgrösse haben. |
6. |
ZusatzStelle |
String |
Alphanumerisch(15) |
Nein |
Darf kein Kostenträger sein, wenn Leistende- oder Empfangendestelle ein Kostenträger ist. |
7. |
LeistProjekt |
String |
Alphanumerisch(30) |
Nein |
Leistendes Projekt |
8. |
EmpfProjekt |
String |
Alphanumerisch(30) |
Nein |
Empfangendes Projekt |
9. |
Text |
String |
Alphanumerisch(60) |
Nein |
Text |
10. |
Menge |
String |
Numerisch(17,2) |
Ja |
Einheiten |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteLeistung2(Datum, BelegNr, LeistendeStelle, EmpfStelle, LeistungsArt, ZusatzStelle, LeistProjekt, EmpfProjekt, Text, Menge)
Leistungserfassung testen
CheckLeistung
Beschreibung
Diese Methode kontrolliert ob eine Leistung erfasst werden kann oder nicht. Wird die Methode ohne eine Fehlermeldung beendet, ist das definitive schreiben möglich.
Es wird dabei nicht kontrolliert, ob der Benutzer genügend Rechte besitzt.
Leistungsbuchung schreiben
WriteLeistungsbuchung2
Beschreibung
Diese Methode schreibt eine neue Betriebliche Leistungsbuchung. Siehe auch Kapitel Optionen setzen.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Datum |
String |
Datum(4,2,2) |
Ja |
JJJJMMDD |
2. |
BelegNr |
String |
Numerisch |
Ja |
Belegnummer |
3. |
LeistendeStelle |
String |
Alphanumerisch(15) |
Ja |
Kostenstelle oder Kostenträger |
4. |
EmpfStelle |
String |
Alphanumerisch(15) |
Ja |
Kostenstelle oder Kostenträger |
5. |
LeistungsArt |
String |
Alphanumerisch(15) |
Ja |
Die Leistungsart muss eine Bezugsgrösse haben. |
6. |
ZusatzStelle |
String |
Alphanumerisch(15) |
Nein |
Darf kein Kostenträger sein, wenn Leistende- oder Empfangendestelle ein Kostenträger ist. |
7. |
LeistProjekt |
String |
Alphanumerisch(30) |
Nein |
Leistendes Projekt |
8. |
EmpfProjekt |
String |
Alphanumerisch(30) |
Nein |
Empfangedes Projekt |
9. |
Sekundaerkostenart |
String |
Alphanumerisch(15) |
Ja |
Die Sekundärkostenart muss in der Leistenden-, der Empfangenden-Stelle und Leistungsart vorhanden sein, sowie Sekundär sein. |
10. |
Text |
String |
Alphanumerisch(60) |
Nein |
Text |
11. |
Preis |
String |
Numerisch |
Nein |
Wird ein leeres Feld übergeben, wird der Preis aus dem Verrechnungssatz der zugewiesenen Leistungsart übernommen. |
12. |
Menge |
String |
Numerisch(17,2) |
Ja |
Menge |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu. WriteLeistungsbuchung2(Datum, BelegNr, LeistendeStelle, EmpfStelle, LeistungsArt, ZusatzStelle, LeistProjekt, EmpfProjekt, Sekundaerkostenart, Text, Preis, Menge)
Leistungsbuchung testen
CheckLeistungsbuchung
Beschreibung
Diese Methode kontrolliert ob eine Leistungsbuchung erfasst werden kann oder nicht. Wird die Methode ohne eine Fehlermeldung beendet, ist das definitive schreiben möglich.
Es wird dabei nicht kontrolliert, ob der Benutzer genügend Rechte besitzt.
Leistungs-Belegnummer holen
GetLeistungsLaufnr
Beschreibung
Mit dieser Methode bekommt man die Laufnummer zurück, die man zum löschen der Leistungsbuchung, Leistungserfassung benützen kann.
Parameter
Diese Methode hat keine Parameter.
Returnwert
Laufnummer, die bei der Methode WriteLeistung oder WriteLeistungsbuchung benützt wurde.
Beispiel
Laufnummer = BeBu.GetLeistungsLaufnr
Leistungsbuchung- / Leistungserfassung löschen
DeleteLeistung
Beschreibung
Diese Methode löscht eine vorhandene Leistungsbuchung, Leistungserfassungseintrag.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Laufnummer |
String |
Numerisch |
Ja |
Leistungsart-Laufnummer |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.DeleteLeistung(LeistungLaufnummer)
Anlageknoten schreiben
WriteAnlageNode
Beschreibung
Mit dieser Methode kann ein neuer Knoten in den Anlagestamm eingefügt werden.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
NodeNr |
String |
Alphanumerisch(15) |
Ja |
Der neue Knoten wird in den Knoten mit dieser NodeNr eingefügt. 0 bedeutet, dass der Knoten in der obersten Ebene eingefügt wird. |
2. |
NodePrecedesor |
String |
Alphanumerisch(15) |
Ja |
Mit diesem Feld wird der Knoten identifiziert. Diese Nummer muss auch gegenüber den Anlagen eindeutig sein. |
3. |
Bezeichnung |
String |
Alphanumerisch(60) |
|
Bezeichnung |
4. |
Bemerkung |
String |
Alphanumerisch(255) |
|
Bemerkung |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteAnlageKnoten(NodeNr, NodePrecedesor, Bezeichnung, Bemerkung)
Anlage schreiben
Beschreibung
Um alle Anlagestamm-Felder füllen zu können, müssen zusätzliche Tabellen vorhanden sein. Um diese Tabellen zu füllen, müssen die Methoden WriteAnlageKategorie, WriteAnlageGruppe, WriteAnlageStandort, WriteAnlageKalkulZins und WriteAnlageAbschreibung aufgerufen werden. Siehe weiter in Kapitel Anlagetabellen füllen.
Ablauf
Zuerst werden die verschiedenen Werte den einzelnen Feldern aller Anlagen zugewiesen. Wenn alle Zuweisungen erfolgt sind, kann die gesamte Anlage geschrieben werden.
Das Schreiben der Anlage erfolgt in 4 verschiedenen Schritten. Die Feldangaben sind in den folgenden Parameterbeschreibungen aufgeführt.
-
SetAnlageCommonInfo2 (): zwingend
Mit dieser Methode werden die Allgemeinen Informationen eingefügt. -
S etAnlageExtendedInfo2(): zwingend
Mit dieser Methode werden Erweiterten Informationen eingefügt. -
SetAnlageBewertungB/2(): zwingend
Mit dieser Methode werden die Bilanziellen Anlagebewertungen gesetzt.
Zuerst muss immer diese Methode aufgerufen werden, bevor die Methoden SetAnlageBewertungF SetAnlageBewertungI, SetAnlageBewertungK aufgerufen werden können. -
SetAnlageBewertungF/2(),SetAnlageBewertungI/2(),SetAnlageBewertungK/2(): fakultativ
Mit dieser Methode werden die Fiskalischen, Individuellen und Kalkulatorischen Anlagebewertungen gesetzt. -
: fakultativ
Mit diesen Methoden können Individuelle Informationen zu den Anlagen hinzugefügt werden.
Siehe Kapitel Individuelle Anlageninformationen hinzufügen -
SetAnlageVersicherung: fakultativ:
Diese Methode setzt die Versicherungsinformationen der Anlage. -
WriteAnlage (): zwingend
Das schreiben der Anlage wird ausgeführt.
SetAnlageCommonInfo2
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Node |
String |
Alphanumerisch(15) |
Nein |
KnotenID wo die neue Anlage eingefügt wird. Hat Node den Wert=0 wird die Anlage direkt im obersten Zweig eingetragen. |
2. |
Nummer |
String |
Alphanumerisch(15) |
Ja |
Diese ist die Gruppenbezeichnung und muss gegenüber anderen Anlagen eindeutig sein. |
3. |
Anlagestatus |
String |
Numerisch |
Ja |
Mögliche Werte siehe Codetabelle |
4. |
Bezeichnung |
String |
Alphanumerisch(60) |
Ja |
Bezeichnung |
5. |
Bezeichn2ID |
String |
Alphanumerisch(5) |
Nein |
Mögliche Werte siehe Codetabelle |
6. |
Anschaffungsdatum |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
7. |
StrichcodeTyp |
String |
Numerisch |
Nein |
Mögliche Werte siehe Codetabelle |
8. |
Strichcode |
String |
Alphanumerisch(30) |
Nein |
Strichcode |
9. |
InventarNr |
String |
Alphanumerisch(15) |
Ja |
Inventar-Nummer |
10. |
SerienNr |
String |
Alphanumerisch(30) |
Nein |
Serien-Nummer |
11. |
Sachbearbeiter |
String |
Alphanumerisch(5) |
Nein |
Sachbearbeiter-Identifikation |
12. |
AnlageTypBU |
String |
Alphanumerisch(1) |
Ja |
B=Beweglich U=Unbeweglich |
13. |
AnlageKto |
String |
Alphanumerisch(15) |
Ja |
Anlagenkonto |
14. |
Kostenstelle |
String |
Alphanumerisch(15) |
Ja |
Kostenstelle |
15. |
Projekt |
String |
Alphanumerisch(30) |
Nein |
Projekt |
Returnwert
Diese Methode hat keinen Returnwert.
SetAnlageExtendedInfo2
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Anlagegruppe |
String |
Alphanumerisch(15) |
Ja |
Dieses Feld muss eine eingegebene ID der Methode WriteAnlageStandort sein. |
2. |
StandortID |
String |
Alphanumerisch(15) |
Nein |
Diese muss eine eingegebene ID der Methode WriteAnlageStandort sein. |
3. |
KategorieID |
String |
Alphanumerisch(15) |
Nein |
Diese muss eine eingegebene ID der Methode WriteAnlageKategorie sein. |
4. |
Baujahr |
String |
Alphanumerisch(15) |
Nein |
Baujahr |
5. |
Bemerkung |
String |
Alphanumerisch(1) |
Nein |
Bemerkung |
6. |
GarantieEnde |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
7. |
GarantieArt |
String |
Alphanumerisch(15) |
Nein |
Mögliche Werte siehe Codetabelle |
8. |
HeimfallDte |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
9. |
EntgeltlichJN |
String |
Alphanumerisch(1) |
Ja |
Mögliche Werte J=Ja, N=Nein |
10. |
Lieferant |
String |
Alphanumerisch(15) |
Nein |
Lieferant |
11. |
Katasterwert |
String |
Numerisch(17,2) |
Nein |
|
Returnwert
Diese Methode hat keinen Returnwert.
Anlagebewertungen schreiben
Beschreibung
Mit den folgenden Methoden können Bilanzielle-, Finanzielle-, Individuelle- und Kalkulatorische Anlagebewertungen gesetzt werden.
Zuerst muss immer die Methode SetAnlageBewertungB/2 aufgerufen werden, bevor eine andere Anlagebewertung gesetzt werden kann. Je nach den Einstellungen in Finanz ist es möglich, dass Individuelle und Kalkulatorische Anlagebewertungen nicht gesetzt werden können, da diese so auch nicht in Finanz erfasst werden können.
SetAnlageBewertungB, SetAnlageBewertungB2, SetAnlageBewertungF, SetAnlageBewertungF2, SetAnlageBewertungI, SetAnlageBewertungI2
Beschreibung
Die Methode SetAnlageBewertungB muss aufgerufen werden, die anderen sind fakultativ.
Parameter
Die Methoden SetAnlageBewertungB, SetAnlageBewertungF und SetAnlageBewertungI haben 11 Parameter.
Die Methoden SetAnlageBewertungB2, SetAnlageBewertungF2, SetAnlageBewertung I2 haben 12 Parameter.
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
VereifachungJN |
String |
Alphanumerisch(1) |
Nein |
Mögliche Werte J=Ja, N=Nein Falls ein leerer String übergeben wird, wird der Wert aus der Einstellung verwendet. |
2. |
AktivJN |
String |
Alphanumerisch(1) |
Nein |
Wird noch nicht verwendet |
3. |
GWGJN |
String |
Alphanumerisch(1) |
Nein |
Mögliche Werte J=Ja, N=Nein |
4. |
DatumBeginn |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
5. |
ArtID |
String |
Alphanumerisch(15) |
Ja |
Abschreibungsart Diese muss eine eingegebene ID der Methode WriteAnlageAbschreibung sein. |
6. |
WiederBeschWert |
String |
Numerisch(17,2) |
Nein |
Wiederbeschaffungswert |
7. |
HistAnschaffwert |
String |
Numerisch(17,2) |
Nein |
Anschaffungswert |
8. |
Liquititaetserloes |
String |
Numerisch(17,2) |
Nein |
Liquiditätserlös |
9. |
Erinnerungswert |
String |
Numerisch(17,2) |
Nein |
Mögliche Werte J=Ja, N=Nein |
10. |
Kontierungsgruppe |
String |
Alphanumerisch(15) |
Ja |
Kontierungsgruppe |
11. |
Text |
String |
Alphanumerisch(255) |
Nein |
Text |
12. |
Restnutzungsdauer |
String |
Numerisch |
Nein |
Restnutzungsdauer |
Returnwert
Diese Methode hat keinen Returnwert.
SetAnlageBewertungK, SetAnlageBewertungK2
Parameter
Die Methode SetAnlageBewertungK hat 14, SetAnlageBewertungK2 15 Parameter.
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
VereifachungJN |
String |
Alphanumerisch(1) |
Nein |
Mögliche Werte J=Ja, N=Nein Falls ein leerer String übergeben wird, wird der Wert aus der Einstellung verwendet. |
2. |
AktivJN |
String |
Alphanumerisch(1) |
Nein |
Wird noch nicht verwendet |
3. |
GWGJN |
String |
Alphanumerisch(1) |
Nein |
Mögliche Werte J=Ja, N=Nein |
4. |
DatumBeginn |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
5. |
ArtID |
String |
Alphanumerisch(15) |
Ja |
Abschreibungsart Diese muss eine eingegebene ID der Methode WriteAnlageAbschreibung sein. |
6. |
WiederBeschWert |
String |
Numerisch(17,2) |
Nein |
Wiederbeschaffungswert |
7. |
HistAnschaffwert |
String |
Numerisch(17,2) |
Nein |
Anschaffungswert |
8. |
Liquititaetserloes |
String |
Numerisch(17,2) |
Nein |
Liquiditätserlös |
9. |
Erinnerungswert |
String |
Numerisch(17,2) |
Nein |
Mögliche Werte J=Ja, N=Nein |
10. |
Kontierungsgruppe |
String |
Alphanumerisch(15) |
Ja |
Kontierungsgruppe |
11. |
Text |
String |
Alphanumerisch(255) |
Nein |
Text |
12. |
ZinsStartDteKalk |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
13. |
ZinsNrKalk |
String |
Alphanumerisch(15) |
Nein |
Diese muss eine eingegebene ID der Methode WriteAnlageKalkulZins sein. |
14. |
ZinsLastDteKalk |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
15. |
Restnutzungsdauer |
String |
Numerisch |
Nein |
Restnutzungsdauer |
Returnwert
Diese Methode hat keinen Returnwert.
SetBmsgrLageKalkZins()
Parameter
Die Methode SetBmsgrLageKalkZins hat 1 Parameter.
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
BmsgrLageKalkZins |
long |
numerisch |
Ja |
Mögliche Werte: 0=Bilanziell (Default) 1=Kalkulatorisch |
Returnwert
Diese Methode hat keinen Returnwert.
SetAnlageVersicherung
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Gesellschaft |
String |
Numerisch |
Nein |
Versicherung |
2. |
PoliceNr |
String |
Alphanumerisch(30) |
Nein |
Policen-Nummer |
3. |
VersicherungsArt |
String |
Numerisch |
Nein |
Mögliche Werte siehe Codetabelle |
4. |
VersicherungsBeginn |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
5. |
VersicherungsEnde |
String |
Datum(4,2,2) |
Nein |
JJJJMMDD |
6. |
VersicherungsIndex |
String |
Numerisch |
Nein |
Versicherungs-Index |
7. |
Versicherungswert |
String |
Numerisch(17,2) |
Nein |
Versicherungs-Wert |
Returnwert
Diese Methode hat keinen Returnwert.
WriteAnlage
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.SetAnlageCommonInfo2(Node, Nummer, Anlagestatus, _ Bezeichnung, Bezeichnung2ID, AnschaffungsDatum, StrichCodeTyp, _ StrichCode, InventarNr, SerienNr, Sachbearbeiter, _ AnlageTypBU, AnlageKto, Kostenstelle, Projekt) Call BeBu.SetAnlageExtendedInfo2(Anlagegruppe, Standort, _ Kategorie, Baujahr, Bemerkung, GarantieEnde, GarantieArt, _ HeimfallDatum, EntgeltlichJN, Lieferant, Katasterwert) Call BeBu.SetAnlageBewertungB(VereifachungsregelJN, _ AktivJN, GeringwertigesWGJN, DatumBeginn, ArtID, _ WiederBeschWert, HistAnschaffwert, Liquititaetserloes, _ Erinnerungswert, Kontierungsgruppe, Text) Call BeBu.SetAnlageBewertungF(VereifachungsregelJN, _ AktivJN, GeringwertigesWGJN, DatumBeginn, ArtID, _ WiederBeschWert, HistAnschaffwert, Liquititaetserloes, _ Erinnerungswert, Kontierungsgruppe, Text) Call BeBu.SetAnlageBewertungI(VereifachungsregelJN, _ AktivJN, GeringwertigesWGJN, DatumBeginn, ArtID, _ WiederBeschWert, HistAnschaffwert, Liquititaetserloes, _ Erinnerungswert, Kontierungsgruppe, Text) Call BeBu.SetAnlageBewertungK(VereifachungsregelJN, _ AktivJN, GeringwertigesWGJN, DatumBeginn, ArtID, _ WiederBeschWert, HistAnschaffwert, Liquititaetserloes, _ Erinnerungswert, Kontierungsgruppe, Text, ZinsStartDte, _ ZinsNr, ZinsLastDte) Call BeBu.SetAnlageVersicherung(Gesellschaft, PoliceNr, _ VersicherungsArt, VersicherungsBeginn, VersicherungsEnde, _ VersicherungsIndex, Versicherungswert) Call BeBu.SetAnlageIndividText(N, Text) Call BeBu.SetAnlageIndividWert(N, Wert) Call BeBu.SetAnlageIndividCombo(N, ZusatzID) Call BeBu.WriteAnlage()
Anlagetabellen füllen
Gruppe schreiben
WriteAnlageGruppe
Beschreibung
Mit dieser Methode fügt man neue Gruppen hinzu, die man bei der Methode SetAnlageCommonInfo benützen muss.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(5) |
Ja |
Dies ist die GruppenID (GrpID), die man bei der Methode SetAnlageCommonInfo benützen kann. |
2. |
Bezeichnung |
String |
Alphanumerisch(60) |
Ja |
Bezeichnung |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteAnlageGruppe(Nummer, Bezeichnung)
Kategorie schreiben
WriteAnlageKategorie
Beschreibung
Mit dieser Methode fügt man neue Kategorien hinzu, die man bei der Methode SetAnlageCommonInfo benützen kann.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(5) |
Ja |
Dies ist die KategorieID, die man bei der Methode SetAnlageCommonInfo benützen muss. |
2. |
Bezeichnung |
String |
Alphanumerisch(50) |
Ja |
Bezeichnung |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteAnlageKategorie(Nummer, Bezeichnung)
Bezeichnung schreiben
WriteAnlageBezeichnung
Beschreibung
Mit dieser Methode fügt man neue Bezeichnungen hinzu, die man bei der Methode SetAnlageCommonInfo benützen kann.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(5) |
Ja |
Dies ist die KategorieID, die man bei der Methode SetAnlageCommonInfo benützen muss. |
2. |
Bezeichnung |
String |
Alphanumerisch(50) |
Ja |
Bezeichnung |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteAnlageBezeichnung(Nummer, Bezeichnung)
Standort schreiben
WriteAnlageStandort
Beschreibung
Mit dieser Methode fügt man neue Standorte hinzu, die man bei der Methode SetAnlageCommonInfo benützen kann.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(5) |
Ja |
Dies ist die KategorieID, die man bei der Methode SetAnlageCommonInfo benützen muss. |
2. |
Bezeichnung |
String |
Alphanumerisch(50) |
Ja |
Bezeichnung |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteAnlageStandort(Nummer, Bezeichnung)
Kalkulatorische Zinsarten Schreiben
WriteAnlageKalkulZins
Beschreibung
Mit dieser Methode fügt man neue Kalkulatorische Zinsarten hinzu, die man bei der Methode SetAnlageExtendedInfo benützen muss.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(5) |
Ja |
Eindeutige ID mit der die Zinsart identifiziert wird. |
2. |
Bezeichnung |
String |
Alphanumerisch(60) |
|
Bezeichnung |
3. |
Prozentsatz |
String |
Numerisch (6,2) |
Ja |
Prozentsatz |
4. |
Kostenart |
String |
Alphanumerisch(15) |
|
Kostenart |
5. |
Art |
String |
Numerisch |
Ja |
1: vom Anschaffungswert 2: vom halben Anschaffungswert 3: vom Buchwert 4: vom Wiederbeschaffungswert |
6. |
Buchungstext |
String |
Alphanumerisch(60) |
Ja |
Buchungstext |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteAnlageKalkulZins(Nummer, Bezeichnung, Prozentsatz, Kostenart, Art, Buchungstext)
Abschreibungen schreiben
WriteAnlageAbschreibung
Beschreibung
Mit dieser Methode fügt man neue Abschreibungen hinzu, die man bei der Methode SetAnlageExtendedInfo benützen muss.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(5) |
Ja |
Eindeutige ID mit der die Abschreibung identifiziert wird. |
2. |
Bezeichnung |
String |
Alphanumerisch(60) |
|
Bezeichnung |
3. |
TypLD |
String |
Alphanumerisch(1) |
Ja |
L: Linear D: Degressiv |
4. |
LaufZeitProcSatz |
String |
Numerisch(6,2) |
Ja |
Beinhaltet TypLD ‘L‘, ist dies die Anzahl ganze Jahre. Beinhaltet TypLD ‘D‘, ist dies der Prozentsatz. |
5. |
UnterNullJN |
String |
Alphanumerisch(1) |
Ja |
Ja, Nein |
6. |
Buchungstext |
String |
Alphanumerisch(60) |
|
Buchungstext |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteAnlageKalkulZins(Nummer, Bezeichnung, Prozentsatz, Kostenart, Art, Buchungstext)
Anlagezusätze schreiben
WriteAnlageIndivZusatz
Beschreibung
Mit dieser Methode fügt man neue Anlagezusätze hinzu, die man bei der Methode SetAnlageIndividCombo benützen kann.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nummer |
String |
Alphanumerisch(15) |
Ja |
Diese Nummer wird als ID benützt und muss deshalb einzigartig sein innerhalb jeder der 5 Comboboxen. |
2. |
Bezeichnung |
String |
Alphanumerisch(50) |
|
Bezeichnung |
3. |
ComboboxNr |
Long |
Numerisch |
Ja |
Comboboxnummer: 1.. 5 |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.WriteAnlageIndividZusatz(Nummer, Bezeichnung, ComboboxNr)
Individuelle Anlageinformationen hinzufügen
Individuellen Text schreiben
SetAnlageIndividText
Beschreibung
Mit dieser Methode kann man bis 5 Individuelle Texte zu eine Anlage hinzufügen.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nr |
Long |
Numerisch |
Ja |
Dieses Feld muss einen Wert von 0 bis 5 enthalten. |
2. |
Text |
String |
Alphanumerisch(50) |
Ja |
Text |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.SetAnlageIndividText(Nr, Text)
Individuelle Werte schreiben
SetAnlageIndividWert
Beschreibung
Mit dieser Methode kann man zu einer Anlage bis 5 Individuelle Werte hinzufügen.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nr |
Long |
Numerisch |
Ja |
Dieses Feld muss einen Wert von 0 bis 5 enthalten. |
2. |
Wert |
String |
Numerisch(17,2) |
Ja |
Dies ist der zur Feldnummer gehörende Wert. |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.SetAnlageIndividText(Nr, Text)
Individuelle Combo schreiben
SetAnlageIndividCombo
Beschreibung
Mit dieser Methode kann man zu einer Anlage bis 5 Individuelle Comboinformationen hinzufügen, die zuvor mit der Methode WriteAnlageIndividZusatz hinzugefügt wurden.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Nr |
Long |
Long |
Ja |
Dieses Feld muss einen Wert von 0 bis 5 enthalten. |
2. |
ZusatzID |
String |
Alphanumerisch(5) |
Ja |
Dies ist die ID(Nummer), die man bei der Methode WriteAnlageIndividZusatz der dort angegebenen Combobox benützt hat. |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.SetAnlageIndividCombo(Nr, ZusatzID)
Ka/Kst-Kombination zu einer Projektnummer auslesen
ReadKstPrjList, GetKstPrjLine
Beschreibung
Die vorhandenen Verbindungen zu einer Projektnummer werden ausgelesen. Wird das Ende des Resultsets erreicht, wird der Returnwert „EOF“ zurückgegeben.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
Projekt |
String |
Alphanumerisch(30) |
Ja |
Projektnummer |
Returnwert
GetKstPrjLine gibt als Returnwert eine Zeile des Resultsets zurück. Einzelne Felder des Resultsets, wie in der folgenden Tabelle beschrieben, sind durch den FeldDelim getrennt (siehe Kapitel Trennzeichen setzen).
Die Zeile beinhaltet folgende Felder:
Nr. |
Feldname |
Erklärung |
---|---|---|
1. |
kanr |
Kostenartennummer |
2. |
katext |
Kostenartentext |
3. |
isverb |
1 = Es existiert eine Verbindung, 0 = Es existiert keine Verbindung zwischen der Kostenstelle- / Kostenträgernummer und der Kostenartennummer |
Beispiel
Call Bebu.ReadKstPrjList("PR1") lab: zeile = Bebu.GetKstPrjLine If zeile = "EOF" Then GoTo iyend GoTo lab iyend:
Kostenarten-Kombinationen zu einer Kostenstelle- / Kostenträgernummer auslesen
ReadKaLnk, GetKaLnkLine
Beschreibung
Die vorhandenen Verbindungen zu einer Kostenstelle- / Kostenträgernummer werden ausgelesen. Wird das Ende des Resultsets erreicht, wird der Returnwert „EOF“ zurückgegeben.
ReadKaLnk initialisiert das Lesen und gibt keinen Returnwert zurück. Dabei wird folgender Parameter verwendet.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
KstNr |
String |
Alphanumerisch(15) |
Ja |
Kostenstelle- / Kostenträgernummer |
Returnwert
GetKaLnkLine gibt als Returnwert eine Zeile des Resultsets zurück. Einzelne Felder des Resultsets, wie in der folgenden Tabelle beschrieben, sind durch den FeldDelim getrennt (siehe Kapitel Trennzeichen setzen).
Eine Zeile beinhaltet folgende Felder.
Nr. |
Feldname |
Erklärung |
---|---|---|
1. |
kanr |
Kostenartennummer |
2. |
katext |
Kostenartentext |
3. |
isverb |
1 = Es existiert eine Verbindung, 0 = Es existiert keine Verbindung zwischen der Kostenstelle- / Kostenträgernummer und der Kostenartennummer |
Beispiel
Call Bebu.ReadKaLnk("HANDEL") lab: zeile = Bebu.GetKaLnkLine If zeile = "EOF" Then GoTo iyend GoTo lab iyend:
Anlagen Einbuchen
Beschreibung
Mit dieser Methode werden Anlagen eingebucht.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1. |
BelNbr |
String |
Long |
Nein |
Belegnummer. Wird ein Leerer String übergeben, wird als Belegnummer die nächste Fibu-Belegnummer verwendet. |
2. |
Anlage |
String |
Alphanumerisch(15) |
Ja |
Einzubuchende Anlage |
3. |
BeschWertF |
String |
Numerisch(17,2) |
Nein |
Beschaffungswert Fiskalisch |
4. |
BeschWertB |
String |
Numerisch(17,2) |
Nein |
Beschaffungswert Bilanziell |
5. |
BeschWertK |
String |
Numerisch(17,2) |
Nein |
Beschaffungswert Kalkulatorisch |
6. |
BeschWertI |
String |
Numerisch(17,2) |
Nein |
Beschaffungswert Individuell |
7. |
BeschWertDatum |
String |
Datum(4,2,2) |
Nein |
Beschaffungswert Datum |
8. |
BeschWertText |
String |
Alphanumerisch(60) |
Ja |
Beschaffungswert Text |
9. |
ShAbschreibungF |
String |
Numerisch(17,2) |
Nein |
Hist. Abschreibung Fiskalisch |
10. |
ShAbschreibungB |
String |
Numerisch(17,2) |
Nein |
Hist. Abschreibung Bilanziell |
11. |
ShAbschreibungK |
String |
Numerisch(17,2) |
Nein |
Hist. Abschreibung Kalkulatorisch |
12. |
ShAbschreibungI |
String |
Numerisch(17,2) |
Nein |
Hist. Abschreibung Individuell |
13. |
ShAbschreibungDatum |
String |
Datum(4,2,2) |
Nein |
Hist. Abschreibung Datum |
14. |
ShAbschreibungText |
String |
Alphanumerisch(60) |
Nein |
Hist. Abschreibung Text |
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.AnlagenEinbuchen(BelNbr, Anlage, BeschWertF, BeschWertB, BeschWertK, BeschWertI, BeschWertDatum, BeschWertText, ShAbschreibungF, ShAbschreibungB, ShAbschreibungK, ShAbschreibungI, ShAbschreibungDatum, ShAbschreibungText)
Anlagen Vollabgang buchen
Beschreibung
Diese Methode ermöglicht das Buchen eines Vollabganges für eine bestimmte Anlage.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1 |
AnlNr |
String |
Alphanumerisch(15) |
Ja |
Anlagennummer |
2 |
Datum |
String |
Datum(4,2,2) |
Ja |
Abgangsdatum |
- Buchungskreis Fiskalkisch (Abgrenzung) |
|||||
3 |
fText |
String |
Alphanumerisch(60) |
Nein* |
Buchungstext |
- Buchungskreis Bilanziell |
|||||
4 |
bBelNbr |
String |
Long |
Nein* |
Belegnummer |
5 |
bText |
String |
Alphanumerisch(60) |
Nein* |
Buchungstext |
6 |
bAfaKto |
String |
Alphanumerisch(15) |
Nein* |
Konto Abschreibung |
7 |
bLiqErloes |
String |
Numerisch(17,2) |
Nein* |
Liquidationserlös |
8 |
bLiqErloesKto |
String |
Alphanumerisch(15) |
Nein* |
Konto Liquidationserlös |
9 |
bProjekt |
String |
Alphanumerisch(30) |
Nein* |
Projekt |
10 |
bGKto |
String |
Alphanumerisch(15) |
Nein* |
Konto Gewinn |
11 |
bVKto |
String |
Alphanumerisch(15) |
Nein* |
Konto Verlust |
- Buchungskreis Kalkulatorisch (Abgrenzung) |
|||||
12 |
kBelNbr |
String |
Long |
Nein* |
Belegnummer |
13 |
kText |
String |
Alphanumerisch(60) |
Nein* |
Buchungstext |
- Buchungskreis Individuell (Abgrenzung) |
|||||
14 |
iText |
String |
Alphanumerisch(60) |
Nein* |
Buchungstext |
Bemerkung
(*) Die Eingaben sind optional. Wird keine Eingabe gemacht werden die notwendigen Angaben aus den Stammdaten (Stammdaten/Anlagenbuchhaltung/Kontierungsgruppe) oder den Einstellungen (Einstellungen/Extras) geholt.
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.AnlagenEinbuchen(BelNbr, Anlage, BeschWertF, BeschWertB, BeschWertK, BeschWertI, BeschWertDatum, BeschWertText, ShAbschreibungF, ShAbschreibungB, ShAbschreibungK, ShAbschreibungI, ShAbschreibungDatum, ShAbschreibungText)
Ausserplanmässige Abschreibungen buchen
Beschreibung
Diese Methode ermöglicht das Buchen von Ausserplanmässigen Abschreibungen für eine bestimmte Anlage.
Parameter
Nr. |
Feldname |
Parametertyp |
Typ des Wertes |
Zwingend |
Erklärung |
---|---|---|---|---|---|
1 |
AnlNr |
String |
Alphanumerisch(15) |
Ja |
Anlagennummer |
2 |
AnlSubNrExtern |
String |
Alphanumerisch(10) |
Ja |
AnlagenUnternummerExtern (default 0) |
3 |
Datum |
String |
YYYYMMDD |
Ja |
Datum |
- Buchungskreis Fiskalkisch (Abgrenzung) |
|||||
4 |
fText |
String |
Alphanumerisch(60) |
Nein* |
Buchungstext |
5 |
fKtoSoll |
String |
Alphanumerisch(15) |
Ja |
Soll Konto |
6 |
fBetrag |
String |
Numerisch(17,2) |
Ja |
Betrag |
- Buchungskreis Bilanziell |
|||||
7 |
bText |
String |
Alphanumerisch(60) |
Nein* |
Buchungstext |
8 |
bBelegNr |
String |
Alphanumerisch(15) |
Nein* |
Belegnummer |
9 |
bKtoSoll |
String |
Alphanumerisch(15) |
Ja |
Soll Konto |
10 |
bProjekt |
String |
Alphanumerisch(30) |
Nein* |
Projekt |
11 |
bBetrag |
String |
Alphanumerisch(15) |
Ja |
Betrag |
- Buchungskreis Kalkulatorisch (Abgrenzung) |
|||||
12 |
kText |
String |
Alphanumerisch(60) |
Nein* |
Buchungstext |
13 |
kBelegNr |
String |
Alphanumerisch(15) |
Nein* |
Belegnummer |
14 |
kKstSoll |
String |
Alphanumerisch(15) |
Ja |
Kst-Soll |
15 |
kBetrag |
String |
Numerisch(17,2) |
Ja |
Betrag |
- Buchungskreis Individuell (Abgrenzung) |
|||||
16 |
iText |
String |
Alphanumerisch(60) |
Nein* |
Buchungstext |
17 |
iKtoSoll |
String |
Alphanumerisch(15) |
Ja |
Soll Konto |
18 |
iBetrag |
String |
Numerisch(17,2) |
Ja |
Betrag |
Bemerkung
(*) Die Eingaben sind optional. Wird keine Eingabe gemacht werden die notwendigen Angaben aus den Stammdaten (Stammdaten/Anlagenbuchhaltung/Kontierungsgruppe) oder den Einstellungen (Einstellungen/Extras) geholt.
Returnwert
Diese Methode hat keinen Returnwert.
Beispiel
Call BeBu.AusserPlanmaessigeAbschreibung(AnlNr, AnlSubNrExtern, Datum, fText fKtoSoll, fBetrag, bText, bBelegNr, bKtoSoll, bProjekt, bBetrag, kText, kBelegNr, kKstSoll, kBetrag, iText, iKtoSoll, iBetrag)