PMS32 Online- Hilfereferenz
VK-Lohngruppen
Aktiver Datensatz
Lookup in : Lohngruppen (C02). 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: C02 - Lohngruppen */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen E04 und C02... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT E04.IDC02 AS _Quelle, C02.IDC02 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"E04.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"C02.DBF") ON E04.IDC02=C02.IDC02 ; WHERE E04.... ; INTO CURSOR qE04 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle E04 im Feld _Quelle und nur vorhandene Datensätze der Tabelle C02 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT E04.IDC02 AS _Quelle, C02.IDC02 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"E04.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"C02.DBF") ON E04.IDC02=C02.IDC02 ; WHERE E04.... ; INTO CURSOR qE04 NOFILTER READWRITE */ Geht auch so... SELECT E04.IDC02 AS _Quelle, C02.IDC02 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"E04.DBF") , (My.Clients.Path.cDbfDir+"C02.DBF") ; WHERE E04.IDC02=C02.IDC02 AND E04.... ; INTO CURSOR qE04 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loC02 AS Object loC02 = My.Bussines.Strain.Misc.oC02[E04.IDC02] IF !EMPTY(loC02.IDC02) */ Dann wurde der Datensatz in der Tabelle C02 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Primärschlüssel der Tabelle : VK-Lohngruppen
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 IDE04 ist das Primärschlüsselfeld der Tabelle E04 - VK-Lohngruppen */ 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 E04.* FROM (My.Clients.Path.cDbfDir+"E04.DBF") ; WHERE E04.IDE04 = m.ide04 ; INTO CURSOR qE04 NOFILTER READWRITE */ Werden die Daten über die die Methode _SqlRead() abgerufen, so kann der Pfad als Datenbank-Verweis angegeben werden... IF poThis._SqlRead([SELECT E04.* FROM CDBFDIR!E04 WHERE IDE04=']+m.ide04+['],"qE04",2) */ Hier könnte Code stehen... */ Siehe auch: My.Clients.SQL.SQLRead(tnDataSession,tcSQLStatement,tcAlias,tvTable) ENDIF
Relationales Feld (Lookup) in die Vorgangstabelle. Der Feldinhalt wird meistens durch F2 bzw. F3 - Auswahl gefüllt.
Relationales Feld zur Vorgangstabelle. Dieses Feld ist ein Lookup- relationales Feld in die Vorgangstabelle (E10). Bei SQL Abfragen wird dieses Feld zur Verknüpfung der eigentlichen Tabelle mit der Vorgangstabelle benötigt. Ein Beispiel: SELECT e10.nummer, i20.menge_s FROM i20,e10 WHERE i20.idzwi = e10.ide10 AND i20ipzwi $ "101,107,108" AND ...
*/ Dieses Feld ist ein relationales Feld zur Tabelle: E10 - VK-Vorgänge */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen E04 und E10... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT E04.IDE10 AS _Quelle, E10.IDE10 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"E04.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"E10.DBF") ON E04.IDE10=E10.IDE10 ; WHERE E04.... ; INTO CURSOR qE04 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle E04 im Feld _Quelle und nur vorhandene Datensätze der Tabelle E10 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT E04.IDE10 AS _Quelle, E10.IDE10 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"E04.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"E10.DBF") ON E04.IDE10=E10.IDE10 ; WHERE E04.... ; INTO CURSOR qE04 NOFILTER READWRITE */ Geht auch so... SELECT E04.IDE10 AS _Quelle, E10.IDE10 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"E04.DBF") , (My.Clients.Path.cDbfDir+"E10.DBF") ; WHERE E04.IDE10=E10.IDE10 AND E04.... ; INTO CURSOR qE04 NOFILTER READWRITE */ Es gibt auch einen Zugriff über die My - Struktur, die ein Tabellen-Objekt zurückgibt... LOCAL loE10 AS Object loE10 = My.Bussines.Strain.Misc.oE10[E04.IDE10] IF !EMPTY(loE10.IDE10) */ Dann wurde der Datensatz in der Tabelle E10 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Preisfeld in Firmenwährung. Diese Feld enthält einen Wert in Firmenwährung.
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
Fertigungsminuten feste Zeiten. Die Eingabe erfolgt in Minuten mit den entsprechenden Nachkommastellen.
Fertigungsminuten feste Zeiten. Die Eingabe erfolgt in Minuten mit den entsprechenden Nachkommastellen in EINE MINUTE = 100 SEKUNDEN. Diese Zeiten werden als FIX Zeiten angesehen und "normaler Weise" nicht mit der Fertigungsmenge multipliziert. Ausnahme: Der Bezeichnung des Arbeitsgangs wird eine "~" Tilde vorangestellt. In diesem Fall wird die Zeit mit der Fertigungsmenge multipliziert. Dies ist bei Losbaugruppen wichtig!
Fertigungsminuten variable Zeiten. Die Eingabe erfolgt in Minuten mit den entsprechenden Nachkommastellen.
Fertigungsminuten vaiable Zeiten. Die Eingabe erfolgt in Minuten mit den entsprechenden Nachkommastellen in EINE MINUTE = 100 SEKUNDEN. Diese Zeiten werden immer mit der entsprechenden Fertigungsmenge multipliziert.
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)
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)
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.
Hier wird der Lohnzuschlag in Prozentangaben, bezogen auf den aktuellen Vorgang für die jeweilige Lohngruppe, ausgewiesen bzw. angepasst.
Preisfeld in Firmenwährung. Diese Feld enthält einen Wert in Firmenwährung.
Hier wird der Lohnzuschlag in Währungseinheiten, bezogen auf den aktuellen Vorgang für die jeweilige Lohngruppe, ausgewiesen bzw. angepasst.
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