PMS32 Online- Hilfereferenz
EK-Mahnungen -Pos
Eingabe des Datums oder Auswahl in der Kalendermaske mit STRG+F2 oder durch Mausklick auf den Button rechts neben dem Datumsfeld.
Bestelldatum. Dieses Datum wird in der Tabelle D40 gesetzt, wenn die Bestellung als Bestellt gebucht wurde. Dazu ist es notwendig den Marker "ist bestellt" zu aktivieren. Ist der Marker gesetzt worden und wurde abgespeichert, kann dieser nicht mehr zurück genommen werden.
Bestellnummer oder Artikelnummer des Lieferanten.
Bestellnummer oder Artikelnummer des Lieferanten. Diese Nummer wird in Bestellungen benötigt und muss vom Lieferanten identifiziert werden können. Bei der Eingabe deshalb bitte auf Korrektheit achten. Im Artikelstamm wird dieses Feld zum Preisupdate der EK-Daten des Lieferanten benötigt. Wird die Bestellnummer dort geändert, so kann eventuell ein externes System den Artikel nicht mehr finden und legt ihn unter Umständen nochmals an.
Eingabe des Datums oder Auswahl in der Kalendermaske mit STRG+F2 oder durch Mausklick auf den Button rechts neben dem Datumsfeld.
In dieses Feld können Sie das Datum eintragen, das Ihr Lieferant als möglichen Liefertermin angegeben hat. Sie können über den Button
Eingabe des Datums oder Auswahl in der Kalendermaske mit STRG+F2 oder durch Mausklick auf den Button rechts neben dem Datumsfeld.
In dieses Feld wird das Datum eingetragen, daß sich aus Bestelldatum plus Wiederbeschaffungszeit ergibt. Sie können nichts ändern.
Eingabe des Datums oder Auswahl in der Kalendermaske mit STRG+F2 oder durch Mausklick auf den Button rechts neben dem Datumsfeld.
Dieses Datum wird gesetzt, wenn das späteste Lieferdatum des Lieferanten überschritten wurde.
Umrechnungsfaktor für Währungsumrechnungen. Der Faktor muss größer Null sein! Er dient zur besseren Berechnung bei großen Währungseinheiten.
Umrechnungsfaktor für Währungsumrechnungen. Der Faktor muss größer Null sein! Er dient zur besseren Berechnung bei großen Währungseinheiten. Dieser Faktor wird für die Umrechnung von der Systemwährung in andere Fremdwährungen benötigt. Zusätzlich werden die Felder KURS, WSYSBOL, NMINW und NKOMMA zur Umrechnung benötigt. An einem Codebeispiel für die Umrechnung in die Kundenwährung in einem Vorgang können Sie die Formel zur Umrechnung von Währungen einsehen.
*/ Codebeispiel für die Umrechnung des VK-Preises im Vorgang zur Währung des Kunden. */ Angenommen, der Kunde bezahlt seine Rechnungen in US Dollar und in den Stammdaten sind folgende Werte hinterlegt: */ Maske C0301: */ C03.IDC03 = "USD" */ C03.KURS = 1,236 && US-Doller für einen EURO */ C03.FAKTOR = 1 && Bleibt eins, bei kleinen Währungen */ Dann wird der VK-Preis in US Doller für eine Position wie folgt berechnet: */ Maske E....: */ E10.IDC03 = "USD" */ E10.FAKTOR = 1 */ E10.KURS = 1,236 && Wird bei Neuanlage übernommen */ E10.WSYMBOL = "EUR" && Systemwährung */ E12.VKSTAMM = 134,24 EUR && Summe in Systemwährung, berechnet aus Kalkualtion */ E11.PREIS_F = Gesamtpreis in Fremdwährung e11.preis_f = e12.vkstamm * e10.kurs / e10.faktor e11.preis_f = 134,24 * 1,236 / 1 = 165,92064 => Gerundet: 165,92 US$ */ Der Preis wird dann noch durch eine Systemroutine auf die korrekte Anzahl der Nachkommastellen gerundet */ Außerdem wird in der Systemroutine die "kleinste Währungseinheit" - NMINW beachtet, die die kleinste */ Einheit in der Währung angibt. Z.B., in der Schweiz 5 Rappen => 0,05 SFR */ Umrechnung von einer Fremdwährung in eine andere Fremdwährung über die Systemwährung */ Währung a: IDC03="USD", KURS=1,236, FAKTOR=1 */ Währung b: IDC03="SFR", KURS=1,352, FAKTOR=1 */ Nach obigem Beispiel: WERTb = WERTa * FAKTORa / KURSa / FAKTORb * KURSb WERTb = 165,92 * 1 / 1,236 / 1 * 1,352 = 181,49177994 SFR => Gerundet: 181,50 SFR !! NMINW=0,05
Relationales Feld (Lookup) in den Artikelstamm. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt.
Relationales Feld zum Artikelstamm. Dieses Feld ist ein Lookup- relationales Feld in den Artikelstamm (B01). Bei SQL Abfragen wird dieses Feld zur Verknüpfung der eigentlichen Tabelle mit dem Artikelstamm benötigt. Ein Beispiel: SELECT b01.artnr, i33.menge_i FROM i33, b01 WHERE i33.idb01 = b01.idb01 AND ...
*/ Dieses Feld ist ein relationales Feld zur Tabelle: B01 - Artikelstamm */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und B01... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDB01 AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"B01.DBF") ON D58.IDB01=B01.IDB01 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle B01 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDB01 AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"B01.DBF") ON D58.IDB01=B01.IDB01 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDB01 AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"B01.DBF") ; WHERE D58.IDB01=B01.IDB01 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loB01 AS Object loB01 = My.Bussines.Strain.Misc.oB01[D58.IDB01] IF !EMPTY(loB01.IDB01) */ Dann wurde der Datensatz in der Tabelle B01 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Relationales Feld (Lookup) in die Währungstabelle. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt.
Relationales Feld zur Währungstabelle. Dieses Feld ist ein Lookup- relationales Feld in die Währungstabelle (C03). Bei SQL Abfragen wird dieses Feld zur Verknüpfung der eigentlichen Tabelle mit der Währungstabelle benötigt. Ein Beispiel: SELECT c03.icc03, COUNT(*) AS anzahl FROM c03,d40 WHERE c03.idc03=d40.idc03 AND ... GROUP BY 1 ... In den Tabellen, in denen die Währung als Lookup abgebildet wird, wird beim Ändern der Währung durch F3 eine Neuberechnung der Positionen mit der neuen Währung durchgeführt.
*/ Dieses Feld ist ein relationales Feld zur Tabelle: C03 - Währungen */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und C03... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDC03 AS _Quelle, C03.IDC03 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"C03.DBF") ON D58.IDC03=C03.IDC03 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle C03 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDC03 AS _Quelle, C03.IDC03 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"C03.DBF") ON D58.IDC03=C03.IDC03 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDC03 AS _Quelle, C03.IDC03 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"C03.DBF") ; WHERE D58.IDC03=C03.IDC03 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loC03 AS Object loC03 = My.Bussines.Strain.Misc.oC03[D58.IDC03] IF !EMPTY(loC03.IDC03) */ Dann wurde der Datensatz in der Tabelle C03 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Relationales Feld zur Steuerschlüsseltabelle. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt.
Relationales Feld zur Steuerschlüsseltabelle. Dieses Feld ist ein Lookup- relationales Feld in die Steuerschlüsseltabelle (C08). Dieses Feld ist außer im Artikelstamm sonst nur in diversen Positionstabellen zu finden. Über diesen Schlüssel wird die Berechnung des Steuersatzes der Positon bestimmt. Die Vorgabe der Berechnung kommt aus dem Artikelstamm und sollte nicht geändert werden. Hierzu sei ein Hinweis zur Steuerberechnung äußerst wichtig!! Die Steuerberechnung in PMS32 geht über verschiedene Felder der Kopf- sowie der Positionsdaten. Ein Beispiel für die Berechnung der Mehrwertsteuer im Vorgang können Sie sich im Codebeispiel ansehen. In der Stammmaske C0801 wird jeweils nur EIN Kürzel für den Steuerschlüssel "voller Steuersatz" für C08.IDC08 gewählt. Z.B. "001". Alle weiteren Daten werden dann in den Feldern C08.IDC09 - Steuerschlüsselland C08.GDATUM - Gültig ab und C08.IDC26 hinterlegt, wobei die Sprache zumindest in der Systemsprache vorliegen muss. Ändert sich der Steuersatz ab einem bestimmten Datum, so wird in der Maske C0108 einfach eine Kopie des Datensatzes mit "gleichem" Schlüssel erstellt und ein neues Datum für C08.GDATUM eingetragen. Damit berechnet PMS32 für alle Steuerberechnungen ab diesem Datum die Steuersätze mit dem neuen Steuersatz. In etwa Gleiches gilt für Steuerberechnungen, die für ausländische Kunden bzw. Lieferanten durchgeführt werden müssen. Hier wird eine Kopie mit gleichem Schlüssel erstellt und nur das Land C08.IDC09 entsprechend ausgetauscht. Beim Kunden bzw. Lieferanten muss dort im Feld "Steuerschlüsselland" .IDC09ST dann das entsprechende Land hinterlegt werden, was als Vorlage für Vorgänge bzw. Bestellungen dient.
*/ Dieses Feld ist ein relationales Feld zur Tabelle: C08 - Steuerschlüssel */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und C08... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDC08 AS _Quelle, C08.IDC08 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"C08.DBF") ON D58.IDC08=C08.IDC08 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle C08 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDC08 AS _Quelle, C08.IDC08 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"C08.DBF") ON D58.IDC08=C08.IDC08 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDC08 AS _Quelle, C08.IDC08 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"C08.DBF") ; WHERE D58.IDC08=C08.IDC08 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loC08 AS Object loC08 = My.Bussines.Strain.Misc.oC08[D58.IDC08] IF !EMPTY(loC08.IDC08) */ Dann wurde der Datensatz in der Tabelle C08 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Relationales Feld (Lookup) in die Einheitenabelle. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt.
Relationales Feld (Lookup) in die Einheitenabelle. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt. Hier kann die Einheit des Artikels mit F3 geändert werden. Bitte beachten Sie in diesem Zusammenhang, dass eventuell bei einer Änderung der Einheit auch eine Änderung des Umrechnungsfaktors zur Basiseinheit vorgenommen werden muss. Siehe dazu auch die Umrechnungsfaktoren der Mengeneinheiten.
*/ Dieses Feld ist ein relationales Feld zur Tabelle: C19 - Einheiten-Basiseinheiten */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und C19... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDC19MEEK AS _Quelle, C19.IDC19 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"C19.DBF") ON D58.IDC19MEEK=C19.IDC19 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle C19 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDC19MEEK AS _Quelle, C19.IDC19 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"C19.DBF") ON D58.IDC19MEEK=C19.IDC19 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDC19MEEK AS _Quelle, C19.IDC19 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"C19.DBF") ; WHERE D58.IDC19MEEK=C19.IDC19 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loC19 AS Object loC19 = My.Bussines.Strain.Misc.oC19[D58.IDC19MEEK] IF !EMPTY(loC19.IDC19) */ Dann wurde der Datensatz in der Tabelle C19 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Relationales Feld (Lookup) in die Lieferantentabelle. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt.
Relationales Feld zur Lieferantentabelle. Dieses Feld ist ein Lookup- relationales Feld in die Lieferantentabelle (C61). Bei SQL Abfragen wird dieses Feld zur Verknüpfung der eigentlichen Tabelle mit der Lieferantentabelle benötigt. Ein Beispiel: SELECT c61.match, COUNT(*) AS anzahl FROM c61,d40 WHERE c61.idc61=d40.idc61 AND ... GROUP BY 1 ...
*/ Dieses Feld ist ein relationales Feld zur Tabelle: C61 - Lieferanten */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und C61... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDC61 AS _Quelle, C61.IDC61 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"C61.DBF") ON D58.IDC61=C61.IDC61 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle C61 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDC61 AS _Quelle, C61.IDC61 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"C61.DBF") ON D58.IDC61=C61.IDC61 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDC61 AS _Quelle, C61.IDC61 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"C61.DBF") ; WHERE D58.IDC61=C61.IDC61 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loC61 AS Object loC61 = My.Bussines.Strain.Misc.oC61[D58.IDC61] IF !EMPTY(loC61.IDC61) */ Dann wurde der Datensatz in der Tabelle C61 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Relationales Feld (Lookup) in die Lagerorttabelle. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt.
Relationales Feld zur Lagerorttabelle. Dieses Feld ist ein Lookup- relationales Feld in die Lagerorttabelle (C66). Bei SQL Abfragen wird dieses Feld zur Verknüpfung der eigentlichen Tabelle mit der Lagerorttabelle benötigt. Ein Beispiel: SELECT c66.match, i20.menge_s FROM i20,c66 WHERE i20.idc66 = c66.idc66 AND ...
*/ Dieses Feld ist ein relationales Feld zur Tabelle: C66 - Lagerorte */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und C66... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDC66 AS _Quelle, C66.IDC66 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"C66.DBF") ON D58.IDC66=C66.IDC66 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle C66 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDC66 AS _Quelle, C66.IDC66 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"C66.DBF") ON D58.IDC66=C66.IDC66 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDC66 AS _Quelle, C66.IDC66 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"C66.DBF") ; WHERE D58.IDC66=C66.IDC66 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loC66 AS Object loC66 = My.Bussines.Strain.Misc.oC66[D58.IDC66] IF !EMPTY(loC66.IDC66) */ Dann wurde der Datensatz in der Tabelle C66 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Relationales Feld (Lookup) in die Bestelltabelle. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt.
Relationales Feld zu den Bestellungen (D40). Dieses Feld wird zum größten Teil durch das System gefüllt. In den Masken des Bestellwesens wird der Wert dann gefüllt, wenn mit F3 - Auswahl eine Bestellung ausgewählt wurde. Z.B.: in den Eingangsrechnungen, etc.
*/ Dieses Feld ist ein relationales Feld zur Tabelle: D40 - EK-Bestellungen */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und D40... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDD40 AS _Quelle, D40.IDD40 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"D40.DBF") ON D58.IDD40=D40.IDD40 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle D40 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDD40 AS _Quelle, D40.IDD40 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"D40.DBF") ON D58.IDD40=D40.IDD40 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDD40 AS _Quelle, D40.IDD40 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"D40.DBF") ; WHERE D58.IDD40=D40.IDD40 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loD40 AS Object loD40 = My.Bussines.Strain.Misc.oD40[D58.IDD40] IF !EMPTY(loD40.IDD40) */ Dann wurde der Datensatz in der Tabelle D40 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Lookup in : EK-Mahnungen (D47). Eine Änderung erfolgt durch F3 - Auswahl. Der Srung zu Stammtabelle erfolgt mit F2
Lookup- bzw. relationale Felder werden benötigt um Tabellen mittels SQL Select oder einer Relation zu verbinden. Durch die Namensgebung der Lookupfelder kann aus dem Feldnamen "meistens" die Zieltabelle der Relation bestimmt werden. Alle Relationen werden in PMS32 über sogenannte ID- Felder hergestellt, wobei die Zieltabelle ab der dritten Stelle des Feldnamens bis zur fünften Stelle des Feldnames angegeben ist. Aus ein paar Beispielen: D51.IDB01 => B01, I40.IDC42VKB => C42, I50.IDC25B => C25. Mit der Formel aus dem Codeblock kann zu "fast" allen ID Feldern die entsprechende Zieltabelle ermittelt werden. Spezial- Lookupfelder wie z.B.: I20.IDZWI oder I23.IDAUFA... benötigen zur Bestimmung die entsprechende IP, mit der über die Systemtabelle Y01 die entsprechende Zieltabelle ermittelt werden kann.
*/ Dieses Feld ist ein relationales Feld zur Tabelle: D47 - EK-Mahnungen */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und D47... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDD47 AS _Quelle, D47.IDD47 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"D47.DBF") ON D58.IDD47=D47.IDD47 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle D47 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDD47 AS _Quelle, D47.IDD47 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"D47.DBF") ON D58.IDD47=D47.IDD47 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDD47 AS _Quelle, D47.IDD47 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"D47.DBF") ; WHERE D58.IDD47=D47.IDD47 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loD47 AS Object loD47 = My.Bussines.Strain.Misc.oD47[D58.IDD47] IF !EMPTY(loD47.IDD47) */ Dann wurde der Datensatz in der Tabelle D47 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Lookup in : EK-Bestellungen -Pos (D51). Eine Änderung erfolgt durch F3 - Auswahl. Der Srung zu Stammtabelle erfolgt mit F2
Lookup- bzw. relationale Felder werden benötigt um Tabellen mittels SQL Select oder einer Relation zu verbinden. Durch die Namensgebung der Lookupfelder kann aus dem Feldnamen "meistens" die Zieltabelle der Relation bestimmt werden. Alle Relationen werden in PMS32 über sogenannte ID- Felder hergestellt, wobei die Zieltabelle ab der dritten Stelle des Feldnamens bis zur fünften Stelle des Feldnames angegeben ist. Aus ein paar Beispielen: D51.IDB01 => B01, I40.IDC42VKB => C42, I50.IDC25B => C25. Mit der Formel aus dem Codeblock kann zu "fast" allen ID Feldern die entsprechende Zieltabelle ermittelt werden. Spezial- Lookupfelder wie z.B.: I20.IDZWI oder I23.IDAUFA... benötigen zur Bestimmung die entsprechende IP, mit der über die Systemtabelle Y01 die entsprechende Zieltabelle ermittelt werden kann.
*/ Dieses Feld ist ein relationales Feld zur Tabelle: D51 - EK-Bestellungen -Pos */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen D58 und D51... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT D58.IDD51 AS _Quelle, D51.IDD51 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"D51.DBF") ON D58.IDD51=D51.IDD51 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle D58 im Feld _Quelle und nur vorhandene Datensätze der Tabelle D51 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT D58.IDD51 AS _Quelle, D51.IDD51 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"D51.DBF") ON D58.IDD51=D51.IDD51 ; WHERE D58.... ; INTO CURSOR qD58 NOFILTER READWRITE */ Geht auch so... SELECT D58.IDD51 AS _Quelle, D51.IDD51 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"D58.DBF") , (My.Clients.Path.cDbfDir+"D51.DBF") ; WHERE D58.IDD51=D51.IDD51 AND D58.... ; INTO CURSOR qD58 NOFILTER READWRITE
Primärschlüssel der Tabelle : EK-Mahnungen -Pos
Primärfelder einer Tabelle indentifizieren den Datensatz der Tabelle. Der Feldinhalt ist immer eindeutig und kann niemals mehrfach vorkommen. Primärfelder können aus einem Feld der Tabelle oder aus mehreren Feldern der Tabelle bestehen.
*/ Das Feld IDD58 ist das Primärschlüsselfeld der Tabelle D58 - EK-Mahnungen -Pos */ Dieses Feld kann in anderen Tabellen als relationaler Schlüssel zu dieser Tabelle dienen */ An einem SQL - Beispiel eines beschreibbaren Cursors... */ Die Daten des Cursors können zwar geändert werden, die Änderungen werden jedoch NICHT in die Datenbank zurückgeschrieben! SELECT D58.* FROM (My.Clients.Path.cDbfDir+"D58.DBF") ; WHERE D58.IDD58 = m.idd58 ; INTO CURSOR qD58 NOFILTER READWRITE */ Werden die Daten über die die Methode _SqlRead() abgerufen, so kann der Pfad als Datenbank-Verweis angegeben werden... IF poThis._SqlRead([SELECT D58.* FROM CDBFDIR!D58 WHERE IDD58=']+m.idd58+['],"qD58",2) */ Hier könnte Code stehen... */ Siehe auch: My.Clients.SQL.SQLRead(tnDataSession,tcSQLStatement,tcAlias,tvTable) ENDIF
Artikelart des Datensatzes. Kann entweder mit F3 - Auswahl gewählt werden oder wird vom System vorgegeben.
Artikelart des Datensatzes. Die Artikelart spezifiziert den Artikel (IDB01, ARTNR) genauer. Folgende Artikelarten stehen zur Verfügung: "001" - Stammartikel, "002" - Baugruppe, "003" - Kostenartikel, "004" - Dienstleistung, "005" - Beistellung (Aus Vorgang) "006" - Fremdbearbeitung (Aus Vorgang), "007" - Projektartikel (Auch Baugruppe), "009" - Pseudobaugruppe und "010" - Reparaturartikel (Aus Vorgang). Je nach Artikelart wird der Artikel anders kalkuliert und weiter bearbeitet.
*/ Dieses Feld ist ein IP - Feld der Tabelle... */ Der Abruf der Informationen kann über die Tabelle Y01 erfolgen... */ IP Felder geben entweder eine Zeilenart oder eine relationale Tabelle an... LOCAL loY01 AS Object loY01 = My.Bussines.Strain.Misc.vY01[D58.IPB01] */ Damit kann die Zeilenart bestimmt werden...
Umrechnungskurs für Währungsumrechnungen. Der Kurs muss größer Null sein!
Umrechnungskurs für Währungsumrechnungen. Der Kurs muss größer Null sein! Der Kurs wird für die Umrechnung von der Systemwährung in andere Fremdwährungen benötigt. Zusätzlich werden die Felder FAKTOR, WSYSBOL, NMINW und NKOMMA zur Umrechnung benötigt. An einem Codebeispiel für die Umrechnung in die Kundenwährung in einem Vorgang können Sie die Formel zur Umrechnung von Währungen einsehen.
*/ Codebeispiel für die Umrechnung des VK-Preises im Vorgang zur Währung des Kunden. */ Angenommen, der Kunde bezahlt seine Rechnungen in US Dollar und in den Stammdaten sind folgende Werte hinterlegt: */ Maske C0301: */ C03.IDC03 = "USD" */ C03.KURS = 1,236 && US-Doller für einen EURO */ C03.FAKTOR = 1 && Bleibt eins, bei kleinen Währungen */ Dann wird der VK-Preis in US Doller für eine Position wie folgt berechnet: */ Maske E....: */ E10.IDC03 = "USD" */ E10.FAKTOR = 1 */ E10.KURS = 1,236 && Wird bei Neuanlage übernommen */ E10.WSYMBOL = "EUR" && Systemwährung */ E12.VKSTAMM = 134,24 EUR && Summe in Systemwährung, berechnet aus Kalkualtion */ E11.PREIS_F = Gesamtpreis in Fremdwährung e11.preis_f = e12.vkstamm * e10.kurs / e10.faktor e11.preis_f = 134,24 * 1,236 / 1 = 165,92064 => Gerundet: 165,92 US$ */ Der Preis wird dann noch durch eine Systemroutine auf die korrekte Anzahl der Nachkommastellen gerundet */ Außerdem wird in der Systemroutine die "kleinste Währungseinheit" - NMINW beachtet, die die kleinste */ Einheit in der Währung angibt. Z.B., in der Schweiz 5 Rappen => 0,05 SFR */ Umrechnung von einer Fremdwährung in eine andere Fremdwährung über die Systemwährung */ Währung a: IDC03="USD", KURS=1,236, FAKTOR=1 */ Währung b: IDC03="SFR", KURS=1,352, FAKTOR=1 */ Nach obigem Beispiel: WERTb = WERTa * FAKTORa / KURSa / FAKTORb * KURSb WERTb = 165,92 * 1 / 1,236 / 1 * 1,352 = 181,49177994 SFR => Gerundet: 181,50 SFR !! NMINW=0,05
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld führt ein sogenanntes Änderungskennzeichen mit.
Bei jeder Änderung an dem Datensatz der Tabelle wird dieses Feld um 1 nach oben gezählt.
Bei einem Wert der größer 999 ist wird wieder bei 0 angefangen.
*/ Ein Beispiel für die Berechnung: REPLACE ... , LASTUPD WITH (LASTUPD+1)%1000 UPDATE .... , LASTUPD = (LASTUPD+1)%1000
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld enthält das letzte Änderungsdatum des Datensatzes.
*/ Ein Beispiel für die Berechnung: REPLACE ... , LDATUM WITH My.xDate UPDATE .... , LDATUM = My.xDate
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld enthält das Programm der letzten Änderung des Datensatzes.
*/ Ein Beispiel für die Berechnung: REPLACE ... , LPRG WITH My.lProgram UPDATE .... , LPRG = My.lProgram
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld enthält den Benutzer der letzten Änderung des Datensatzes.
*/ Ein Beispiel für die Berechnung: REPLACE ... , LWER WITH My.cUser UPDATE .... , LWER = My.cUser
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld enthält die Uhrzeit der letzten Änderung des Datensatzes.
*/ Ein Beispiel für die Berechnung: REPLACE ... , LZEIT WITH My.xTime UPDATE .... , LZEIT = My.xTime
Mahnstufen 1 - 99,
wird automatisch mit jeder Mahnung hochgezählt.
Auftragsbestätigungsnummer des Lieferanten
Mengeneingabe in der entsprechenden Einheit vornehmen. Bei Mengenfeldern mit verschiedenen Einheiten, kann die Einheit mit F2 ausgewählt werden. Beispiel: Menge einer Baugruppenposition.
gelieferte Menge
Mengeneingabe in der entsprechenden Einheit vornehmen. Bei Mengenfeldern mit verschiedenen Einheiten, kann die Einheit mit F2 ausgewählt werden. Beispiel: Menge einer Baugruppenposition.
offene Bestellmenge
Mengeneingabe in der entsprechenden Einheit vornehmen. Bei Mengenfeldern mit verschiedenen Einheiten, kann die Einheit mit F2 ausgewählt werden. Beispiel: Menge einer Baugruppenposition.
Bestellmenge
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld enthält das Neuanlagedatum des Datensatzes.
My.xDate gibt das aktuelle Datum zurück.
Bitte verwenden Sie nicht DATE()!
*/ Ein Beispiel für die Berechnung: INSERT INTO ... (...,NDATUM) VALUES (...,My.xDate)
Anzahl der Nachkommastellen für Währungsumrechnungen.
Anzahl der Nachkommastellen für Währungsumrechnungen. Mit dem Wert wird die Anzahl der Nachkommastellen in der Fremdwährung berechnet. Zusätzlich werden die Felder FAKTOR, WSYSBOL, NMINW und KURS zur Umrechnung benötigt. An einem Codebeispiel für die Umrechnung in die Kundenwährung in einem Vorgang können Sie die Formel zur Umrechnung von Währungen einsehen.
*/ Codebeispiel für die Umrechnung des VK-Preises im Vorgang zur Währung des Kunden. */ Angenommen, der Kunde bezahlt seine Rechnungen in US Dollar und in den Stammdaten sind folgende Werte hinterlegt: */ Maske C0301: */ C03.IDC03 = "USD" */ C03.KURS = 1,236 && US-Doller für einen EURO */ C03.FAKTOR = 1 && Bleibt eins, bei kleinen Währungen */ Dann wird der VK-Preis in US Doller für eine Position wie folgt berechnet: */ Maske E....: */ E10.IDC03 = "USD" */ E10.FAKTOR = 1 */ E10.KURS = 1,236 && Wird bei Neuanlage übernommen */ E10.WSYMBOL = "EUR" && Systemwährung */ E12.VKSTAMM = 134,24 EUR && Summe in Systemwährung, berechnet aus Kalkualtion */ E11.PREIS_F = Gesamtpreis in Fremdwährung e11.preis_f = e12.vkstamm * e10.kurs / e10.faktor e11.preis_f = 134,24 * 1,236 / 1 = 165,92064 => Gerundet: 165,92 US$ */ Der Preis wird dann noch durch eine Systemroutine auf die korrekte Anzahl der Nachkommastellen gerundet */ Außerdem wird in der Systemroutine die "kleinste Währungseinheit" - NMINW beachtet, die die kleinste */ Einheit in der Währung angibt. Z.B., in der Schweiz 5 Rappen => 0,05 SFR */ Umrechnung von einer Fremdwährung in eine andere Fremdwährung über die Systemwährung */ Währung a: IDC03="USD", KURS=1,236, FAKTOR=1 */ Währung b: IDC03="SFR", KURS=1,352, FAKTOR=1 */ Nach obigem Beispiel: WERTb = WERTa * FAKTORa / KURSa / FAKTORb * KURSb WERTb = 165,92 * 1 / 1,236 / 1 * 1,352 = 181,49177994 SFR => Gerundet: 181,50 SFR !! NMINW=0,05
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld enthält das Programm der Neuanlage des Datensatzes.
My.lProgram gibt das aktuelle Programm zurück.
*/ Ein Beispiel für die Berechnung: INSERT INTO ... (...,NWER) VALUES (...,My.cUser)
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld enthält den Benutzer der Neuanlage des Datensatzes.
My.cUser gibt den angemeldeten Benutzer (C65) zurück.
*/ Ein Beispiel für die Berechnung: INSERT INTO ... (...,NWER) VALUES (...,My.cUser)
Diese Feld dient als Timestamp Feld innerhalb der Tabelle und wird vom System verwendet.
Dieses Feld enthält das Neuanlageuhrzeit des Datensatzes.
My.xTime gibt das aktuelle Uhrzeit zurück.
Bitte verwenden Sie nicht TIME()!
*/ Ein Beispiel für die Berechnung: INSERT INTO ... (...,NZEIT) VALUES (...,My.xTime)
Preiseinheit Einkauf. Dieser Wert muss größer Null sein. Der Einzelpreis einer Position wird durch diesen Wert geteilt.
Preiseinheit Einkauf. Dieser Wert muss größer Null sein. Der Einzelpreis einer Position wird durch diesen Wert geteilt. An einem Codebeispiel für die Umrechnung der Einkaufspreise in Lagerpreise eines Artikels.
*/ Umrechnung der Einkaufspreise in verschiedenen Bereichen: */ Artikelstamm: D03 => B01 b01.ekbr = d03.ekpreis / c03.faktor * c03.kurs && Umrechnung des Brutto in Firmenwährung b01.eknet = b01.ekbr * (1 - d03.rabatt/100) * (1 - d03.rabatt1/100) && EK Netto in Firmenwährung und Einheit Einkauf b01.eknet1 = b01.eknet / d03.meekuf / d03.peek && Lagerpreis für eine Lagereinheit b01.lfarab = d03.rabatt b01.rabatt1 = d03.rabatt1 b01.peek = d03.peek b01.ufla = d03.meekuf */ Bestellwesen, Lieferantenrechnungen. Zur besseren Übersicht untereinander gestellt PreisLager = ; (; d55.preis_f/d55.peek/d55.ufla * ; (1 - d55.rabatt/100) * (1 - d55.rabatt1/100) + ; d55.edpreis_i; ) / ; d44.faktor * d44.kurs * ; (1 - d44.ekrabatt/100) */ Bestellwesen, Wareneingang MengeLager = d52.menge_i * d52.ufla
Positionsnummer. Sortierkriterium der Positionstabelle.
Positionsnummer. Sortierkriterium der Positionstabelle. Die Nummer kann in verschiedenen Modulen mit entsprechenden Funktionen (Menü) geändert bzw. neu nummeriert werden. Teilweise wird die Positionsnummer nur intern verwendet und ist für den Benutzer nach außen nicht sichtbar. In der Vorgangsverwaltung, E-Masken, besteht eine besondere Positionsnummerierung. Dort werden Positionen der gleichen Pseudobaugruppe mit gleicher Positionsnummer angegeben. Intern jedoch verwendet die Positionsnummer vier Nachkommastellen, die aber bei der Anzeige nicht ausgegeben werden. Dadurch entsteht der Effekt der "gleichen" Positionsnummer bei korrekter Sortierung.
Preisfeld in Firmenwährung. Diese Feld enthält einen Wert in Firmenwährung.
Zu- bzw. Abschlagsfeld in Prozent "%". Bitte achten Sie auf die Einstellungen "%","/",".","F" falls vorhanden.
Prozentfeld für die Eingabe eines Zu- bzw. Abschlags in Prozent "%". Bitte beachten Sie bei einigen Eingaben, dass der Auf- bzw. Abschlag mal auf 100 bzw. von 100 berechnet werden kann. Standard ist die Berechnung auf 100, "%" d.h., der Endwert berechnet sich mit: Endwert = Anfangswert * (1 + Prozent/100). Anders ist die Berechnung bei der Einstellung von 100, "/" hier berechnet sich der Endwert mit: Endwert = Anfangswert * (1 + Prozent/(1-ABS(Prozent)/100)). Bitte achten Sie in diesem Zusammenhang auch auf die Einstellungen "." - Fester Zu- bzw. Abschlag in der Währungseinheit. "F" - Der Endwert des Zu- bzw. Abschlags ist ein Festwert.
Zu- bzw. Abschlagsfeld in Prozent "%". Bitte achten Sie auf die Einstellungen "%","/",".","F" falls vorhanden.
Prozentfeld für die Eingabe eines Zu- bzw. Abschlags in Prozent "%". Bitte beachten Sie bei einigen Eingaben, dass der Auf- bzw. Abschlag mal auf 100 bzw. von 100 berechnet werden kann. Standard ist die Berechnung auf 100, "%" d.h., der Endwert berechnet sich mit: Endwert = Anfangswert * (1 + Prozent/100). Anders ist die Berechnung bei der Einstellung von 100, "/" hier berechnet sich der Endwert mit: Endwert = Anfangswert * (1 + Prozent/(1-ABS(Prozent)/100)). Bitte achten Sie in diesem Zusammenhang auch auf die Einstellungen "." - Fester Zu- bzw. Abschlag in der Währungseinheit. "F" - Der Endwert des Zu- bzw. Abschlags ist ein Festwert.
Umrechnungsfaktor zwischen verschiedenen Mengeneinheiten. Die Eingabe muss größer Null sein!
Umrechnungsfaktor zwischen verschiedenen Mengeneinheiten. Die Eingabe muss größer Null sein! Der hier eigegebene Wert dient als Umrechnungsfaktor zwischen verschiedenen Mengeneinheiten sowohl im Einkauf wie im Verkauf. Bitte sehen Sie im Codebeispiel nach, wie die verschiedenen Einheiten umgerechnet werden.
*/ Umrechnungen zwischen verschiedenen Mengeneinheiten */ Umrechnung zwischen Einkauf- und Lagereinheit MengeLager = MengeEinkauf * UmrechnungsfaktorEinkauf */ Beispiel aus D4101 - Wareneingang und Erzeugen der Lagerumbuchung i23.menge = d52.menge_i * d52.ufla */ Umrechnung zwischen Verkauf und Lagereinheit MengeLager = MengeVerkauf * UmrechnungsfaktorVerkauf */ Beispiel aus der Disposition, wenn der Vorgang disposniert wird i20.menge_s = e11.mgb * IIF(e11.vkrech=1,e12.mevkuf,e12.meekuf) */ e11.vkrech=1 => Fertigung */ Umrechnungen zwischen Einkauf und Verkauf MengeEinkauf = MengeVerkauf * UmrechnungsfaktorVerkauf / UmrechnungsfaktorEinkauf MengeVerkauf = MengeEinkauf * UmrechnungsfaktorEinkauf / UmrechnungsfaktorVerkauf
Basiswährung des Vorgangs. Enthält das Systemwährungskürzel aus den Firmenparametern.
Basiswährung des Vorgangs. Enthält das Systemwährungskürzel aus den Firmenparametern. Zusätzlich werden die Felder FAKTOR, NKOMMA, NMINW und KURS zur Umrechnung benötigt. An einem Codebeispiel für die Umrechnung in die Kundenwährung in einem Vorgang können Sie die Formel zur Umrechnung von Währungen einsehen.
*/ Codebeispiel für die Umrechnung des VK-Preises im Vorgang zur Währung des Kunden. */ Angenommen, der Kunde bezahlt seine Rechnungen in US Dollar und in den Stammdaten sind folgende Werte hinterlegt: */ Maske C0301: */ C03.IDC03 = "USD" */ C03.KURS = 1,236 && US-Doller für einen EURO */ C03.FAKTOR = 1 && Bleibt eins, bei kleinen Währungen */ Dann wird der VK-Preis in US Doller für eine Position wie folgt berechnet: */ Maske E....: */ E10.IDC03 = "USD" */ E10.FAKTOR = 1 */ E10.KURS = 1,236 && Wird bei Neuanlage übernommen */ E10.WSYMBOL = "EUR" && Systemwährung */ E12.VKSTAMM = 134,24 EUR && Summe in Systemwährung, berechnet aus Kalkualtion */ E11.PREIS_F = Gesamtpreis in Fremdwährung e11.preis_f = e12.vkstamm * e10.kurs / e10.faktor e11.preis_f = 134,24 * 1,236 / 1 = 165,92064 => Gerundet: 165,92 US$ */ Der Preis wird dann noch durch eine Systemroutine auf die korrekte Anzahl der Nachkommastellen gerundet */ Außerdem wird in der Systemroutine die "kleinste Währungseinheit" - NMINW beachtet, die die kleinste */ Einheit in der Währung angibt. Z.B., in der Schweiz 5 Rappen => 0,05 SFR */ Umrechnung von einer Fremdwährung in eine andere Fremdwährung über die Systemwährung */ Währung a: IDC03="USD", KURS=1,236, FAKTOR=1 */ Währung b: IDC03="SFR", KURS=1,352, FAKTOR=1 */ Nach obigem Beispiel: WERTb = WERTa * FAKTORa / KURSa / FAKTORb * KURSb WERTb = 165,92 * 1 / 1,236 / 1 * 1,352 = 181,49177994 SFR => Gerundet: 181,50 SFR !! NMINW=0,05
Siehe auch : Hauptmenü / Hauptindex / Such Index / Cursor Index / Programm Module / Tabellen Index / Tabellenmodule / Masken Index / Programmcode Index / Servicepacks / My.Struktur / Funktionen / Sonstiges Index
Lokale Benutzerhilfe : Meine eigene Hilfe / Zurück zur PMS32 - Hilfe
Dateiversion:1.0.04#3648 - H.U.DD#SSFF 02.12.2022
Senden Sie Ihren Kommentar zu diesem Thema an das Entwicklungsteam von PMS32
Weitere Informationen finden Sie unter der aktuellen
PMS32 WEB-Hilfe
Die Informationen dieser Mitteilung sind vertraulich und nur für Sie bestimmt. Unbefugtes Weiterleiten,
Veröffentlichen, Kopieren usw. sind untersagt und werden gerichtlich verfolgt.
© PMS Compelec GmbH 2022 ® el-Projekt