PMS32 Online- Hilfereferenz
Fertigungsauftrag -Pos
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 F61 und B01... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT F61.IDB01 AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"B01.DBF") ON F61.IDB01=B01.IDB01 ; WHERE F61.... ; INTO CURSOR qF61 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle F61 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 F61.IDB01 AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"B01.DBF") ON F61.IDB01=B01.IDB01 ; WHERE F61.... ; INTO CURSOR qF61 NOFILTER READWRITE */ Geht auch so... SELECT F61.IDB01 AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") , (My.Clients.Path.cDbfDir+"B01.DBF") ; WHERE F61.IDB01=B01.IDB01 AND F61.... ; INTO CURSOR qF61 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[F61.IDB01] IF !EMPTY(loB01.IDB01) */ Dann wurde der Datensatz in der Tabelle B01 gefunden! */ Weiterer Code kann hier stehen... ENDIF
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 F61 und B01... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT F61.IDB01K AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"B01.DBF") ON F61.IDB01K=B01.IDB01 ; WHERE F61.... ; INTO CURSOR qF61 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle F61 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 F61.IDB01K AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"B01.DBF") ON F61.IDB01K=B01.IDB01 ; WHERE F61.... ; INTO CURSOR qF61 NOFILTER READWRITE */ Geht auch so... SELECT F61.IDB01K AS _Quelle, B01.IDB01 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") , (My.Clients.Path.cDbfDir+"B01.DBF") ; WHERE F61.IDB01K=B01.IDB01 AND F61.... ; INTO CURSOR qF61 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[F61.IDB01K] IF !EMPTY(loB01.IDB01) */ Dann wurde der Datensatz in der Tabelle B01 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 F61 und C66... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT F61.IDC66 AS _Quelle, C66.IDC66 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"C66.DBF") ON F61.IDC66=C66.IDC66 ; WHERE F61.... ; INTO CURSOR qF61 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle F61 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 F61.IDC66 AS _Quelle, C66.IDC66 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"C66.DBF") ON F61.IDC66=C66.IDC66 ; WHERE F61.... ; INTO CURSOR qF61 NOFILTER READWRITE */ Geht auch so... SELECT F61.IDC66 AS _Quelle, C66.IDC66 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") , (My.Clients.Path.cDbfDir+"C66.DBF") ; WHERE F61.IDC66=C66.IDC66 AND F61.... ; INTO CURSOR qF61 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[F61.IDC66] IF !EMPTY(loC66.IDC66) */ Dann wurde der Datensatz in der Tabelle C66 gefunden! */ Weiterer Code kann hier stehen... ENDIF
Lookup in : Fertigungsauftrag (F60). 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: F60 - Fertigungsauftrag */ Evetuell ist dieses Feld NICHT gefüllt, dann besteht keine relationale Verbindung zwischen F61 und F60... */ Eine SQL - Abfrage zum Ermitteln von Quelle und Ziel: SELECT F61.IDF60 AS _Quelle, F60.IDF60 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") LEFT OUTER JOIN (My.Clients.Path.cDbfDir+"F60.DBF") ON F61.IDF60=F60.IDF60 ; WHERE F61.... ; INTO CURSOR qF61 NOFILTER READWRITE */ Der obige Cursor enthält alle Datensätze der Tabelle F61 im Feld _Quelle und nur vorhandene Datensätze der Tabelle F60 */ Besteht keine relationale Verbindung, so ist der Inhalt der Cursorspalte _Ziel = .NULL. */ Die 'gleiche' Abfrage in der NUR relationale Daten vonhanden sind: SELECT F61.IDF60 AS _Quelle, F60.IDF60 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") INNER JOIN (My.Clients.Path.cDbfDir+"F60.DBF") ON F61.IDF60=F60.IDF60 ; WHERE F61.... ; INTO CURSOR qF61 NOFILTER READWRITE */ Geht auch so... SELECT F61.IDF60 AS _Quelle, F60.IDF60 AS _Ziel ; FROM (My.Clients.Path.cDbfDir+"F61.DBF") , (My.Clients.Path.cDbfDir+"F60.DBF") ; WHERE F61.IDF60=F60.IDF60 AND F61.... ; INTO CURSOR qF61 NOFILTER READWRITE
Primärschlüssel der Tabelle : Fertigungsauftrag -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 IDF61 ist das Primärschlüsselfeld der Tabelle F61 - Fertigungsauftrag -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 F61.* FROM (My.Clients.Path.cDbfDir+"F61.DBF") ; WHERE F61.IDF61 = m.idf61 ; INTO CURSOR qF61 NOFILTER READWRITE */ Werden die Daten über die die Methode _SqlRead() abgerufen, so kann der Pfad als Datenbank-Verweis angegeben werden... IF poThis._SqlRead([SELECT F61.* FROM CDBFDIR!F61 WHERE IDF61=']+m.idf61+['],"qF61",2) */ Hier könnte Code stehen... */ Siehe auch: My.Clients.SQL.SQLRead(tnDataSession,tcSQLStatement,tcAlias,tvTable) ENDIF
ID Feld der Positionstabelle des Quell- bzw. Zielvorgangs. Dient zur relationalen Verbindung mit den Positionsdaten des Vorgangs, der aus den Feldern IP... und ID... bestimmt wird.
ID Feld der Positionstabelle des Quell- bzw. Zielvorgangs. Dient zur relationalen Verbindung mit den Positionsdaten des Vorgangs, der aus den Feldern IP... und ID... bestimmt wird. Siehe dazu auch das Codebeispiel.
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[F61.IPB01] */ Damit kann die Zeilenart bestimmt werden...
Baugruppe?. Diese Option gibt an, ob die entsprechende Artikelposition eine Baugruppe ist.
Baugruppe?. Diese Option gibt an, ob die entsprechende Artikelposition eine Baugruppe ist. Baugruppen oder Stammbaugruppen werden im System wie ein Artikel mit Positionen behandelt. Die Stammbaugruppendaten werden in den Tabelle F02 und F03, siehe dort, verwaltet. Im System gibt es bis dato drei verschiedene Arten von Baugruppen. Wie diese bearbeitet bzw. definiert sind entnehmen Sie bitte der Dokumentation. Im Codebeispiel sind verschiedene Arten von Stammbaugruppen aufgeführt.
*/ Baugruppen und was sie sind und was sie tun... */ Der Baugruppenkopf wird immer im Artikelstamm (B01) definiert! */ "Normale" Stammbaugruppe: b01.ipb01 = "002", b01.is_sl = .T., b01.mglos = 0 ! Diese Baugruppe wird beim Einlasten in die Dispositon aufgelöst. ! Die Auflösungsstufe richtet sich nach den Vorgaben in den Firmenparametern */ Pseudobaugruppe: b01.ipb01 = "009", b01.is_sl = .T., b01.mglos = 0 (wird nicht beachtet) ! Diese Baugruppe wird beim Einfügen in einen Vorgang aufgelöst ! Die Positionen können dann im Vorgang geändert bzw. angepasst werden */ Losbaugruppe: b01.ipb01 = "002", b01.is_sl = .T., b01.mglos > 0 !! (Nur zu Ändern, wenn in Firmenparametern aktiviert) ! Diese Baugruppe wird beim Einlasten der den Vorgangsarten "101" und "108" NICHT aufgelöst ! Eine Auflösung der ERSTEN Stufe erfolgt nur beim Einlasten eines Vorratsauftrags "107" */ Projektspezifische Baugruppe b01.ipb01 = "007", b01.is_sl = .T., b01.mglos = 0 (IMMER NULL) ! Verhalten wie "normale" Stammbaugruppe, kann jedoch nur für das entsprechende Projekt (K10) genutzt werden
Mengeneingabe in der entsprechenden Einheit vornehmen. Bei Mengenfeldern mit verschiedenen Einheiten, kann die Einheit mit F2 ausgewählt werden. Beispiel: Menge einer Baugruppenposition.
Mengenfeld. Hier kann eine Menge eingegeben werden. Bitte beachten Sie, dass die Mengeneingabe immer größer oder gleich Null sein muss. Negative Mengen können im System eigentlich nicht vorkommen oder werden direkt vom System berechnet.
Mengeneingabe in der entsprechenden Einheit vornehmen. Bei Mengenfeldern mit verschiedenen Einheiten, kann die Einheit mit F2 ausgewählt werden. Beispiel: Menge einer Baugruppenposition.
Mengenfeld. Hier kann eine Menge eingegeben werden. Bitte beachten Sie, dass die Mengeneingabe immer größer oder gleich Null sein muss. Negative Mengen können im System eigentlich nicht vorkommen oder werden direkt vom System berechnet.
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.
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.
Status der Position. Die genaue Beschreibung der einzelnen Stati entnehmen Sie bitte der Dokumentation.
Status der Position. Die genaue Beschreibung der einzelnen Stati entnehmen Sie bitte der Dokumentation.
Storniert. Diese Option gibt an, ob die Position oder der ganze Vorgang storniert wurde.
Storniert. Diese Option gibt an, ob die Position oder der ganze Vorgang storniert wurde. Der Wert ist vom Benutzer "meistens" nicht zu ändern, sondern wird vom System gesetzt. Wird eine Position bzw. ein Vorgang storniert, so ist "meistens" der Stornogrund, siehe Feld GRUND, anzugeben. Vorgänge bzw. Positionen werden Storniert, wenn diese z.B. vorher verbucht, siehe GEBUCHT, wurden. Dann dürfen die Positionen nicht mehr gelöscht werden.
Auflösungsstufe. Dieses Feld beschreibt die Auflösungsstufe einer Baugruppe. Die Nummerierung erfolgt mit Stufe=0 für die erste Ebene.
Auflösungsstufe. Dieses Feld beschreibt die Auflösungsstufe einer Baugruppe. Die Nummerierung erfolgt mit Stufe=1 für die erste Ebene. Je nach Komplexität kann die Stufe bis zu 50 erreichen, was aber wohl kaum möglich ist. Bei der Auflösung von Baugruppen wird getestet, ob keine rekursive Verschachtelung vorliegt. Wird eine Rekursion festgestellt, so wird die Auflösung der Baugruppe bei der entsprechenden Stufe abgebrochen. Eine Fehlermeldung wird ausgegeben. Im Codebeispiel ist erklärt, wie eine Baugruppe mit einem Script aufgelöst werden kann.
*/ Auflösung einer Baugruppe und Anzeige der Werte in einem Datenraster
*/ Kann mit PMS32K.EXE ausgeführt werden...
*/ 1.) Ermitteln "einer" Baugruppe
SELECT TOP 1 b01.artnr AS _id,b01.idb01,1 AS menge;
FROM (My.Clients.Path.cDbfDir+'b01.dbf');
WHERE b01.is_sl;
ORDER BY 1;
INTO TABLE (My.Clients.Path.cTmpDir+'MyBom.dbf')
*/ Gibts denn mindestens eine Baugruppe?
IF _TALLY>0
*/ Tabelle schliessen
USE IN ("MyBom")
*/ Baugruppe auflösen
m.lcDbf = My.Clients.Bom.GetBom(;
My.Clients.Path.cTmpDir+'MyBom.dbf',; && Pfad und Name des Baugruppenkopfes
.T.,; && Sortierung nach Position ermöglichen
.F.,; && NICHT summieren
.F.,; && Enthaltene Losbaugruppen auch auflösen
.T.) && Einbaudaten aus F03 einbeziehen
IF !EMPTY(m.lcDbf)
USE (m.lcDbf) SHARED
ENDIF
ENDIF
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