Hallo,
ich hätte mal wieder eine Frage.
Und zwar habe ich die Beziehungen unserer Start prt's und asm's umgeschrieben, bzw. erweitert, damit in den Stücklisten die auf der Zeichnung und von Pro.File generiert werden, das gleiche drinnen steht.
Da in den alten Teilen diese Beziehungen nicht vorhanden sind, muss der Konstrukteur leider aktuell immer von Hand erst die Beziehungen aus einem anderen Teil kopieren und in das Alte einfügen.
Das wollte ich jetzt durch ein Mapkey vereinfachen. Ich habe die Mapkeys mit der Aufzeichnungsfunktion aufgenommen, mit einfacheren Texten, klappt es wunderbar, leider nur nicht mit dem was ich brauche.
Weis jemand wo ich einen Fehler gemacht habe, weil mir wird auch keiner angezeigt.
Hier ist erstmal was unter Regenerieren beim prt's drinnen stehen soll:
Zitat:
GEWICHT=ceil(MP_MASS(""),3)
/* MASSE=MP_MASS("")
/* Uebergabe des Materialnamens an den Parameter MATERIAL (bei zugewiesenen Material)
IF MATERIAL_PARAM("CONDITION")==""
IF MATERIAL_PARAM("SELECT_EN_NAME")==MATERIAL_PARAM("SELECT_DIN_NAME")
MATERIAL=MATERIAL_PARAM("SELECT_EN_NAME")
ELSE
MATERIAL=MATERIAL_PARAM("SELECT_EN_NAME")+" ("+MATERIAL_PARAM("SELECT_DIN_NAME")+")"
ENDIF
ELSE
MATERIAL=MATERIAL_PARAM("CONDITION")
ENDIF
/* Übergabe des Materialnamens und Nummer an den Parameter WERKSTOFF fuer die Zeichnung
IF MATERIAL==" "
WERKSTOFF=""
ELSE
IF MATERIALNR==""
WERKSTOFF=MATERIAL
ELSE
WERKSTOFF=MATERIAL+"; ("+MATERIALNR+")"
ENDIF
ENDIF
/* Uebergabe der Materialnummer an den Parameter MATERIALNR (bei zugewiesenen Material)
MATERIALNR=MATERIAL_PARAM("SELECT_MATERIAL_NUMBER")
/* Übergabe für die Stücklisteninfo
IF HERSTELLER==""
IF NORM==""
IF ABMESSUNG==""
STK_INFO=""
ELSE
STK_INFO=ABMESSUNG
ENDIF
ELSE
IF ABMESSUNG==""
STK_INFO=NORM
ELSE
STK_INFO=NORM+" - "+ABMESSUNG
ENDIF
ENDIF
ELSE
STK_INFO=HERSTELLER+" - "+HERSTELLERARTNR
ENDIF
Und hier der Mapkey der mir generiert wurde:
Zitat:
mapkey bp @MAPKEY_NAMEErstezt die Beziehungen im Part;\
mapkey(continued) @MAPKEY_LABELBeziehungen Part;~ Command `ProCmdMmRels` ;\
mapkey(continued) ~ Open `relation_dlg` `PrePostOM`;~ Close `relation_dlg` `PrePostOM`;\
mapkey(continued) ~ Select `relation_dlg` `PrePostOM`1 `PostRegen`;\
mapkey(continued) ~ Select `relation_dlg` `MenuBar1`1 `Edit`;\
mapkey(continued) ~ Close `relation_dlg` `MenuBar1`;~ Activate `relation_dlg` `PBSelectAll`;\
mapkey(continued) ~ Select `relation_dlg` `MenuBar1`1 `Edit`;\
mapkey(continued) ~ Close `relation_dlg` `MenuBar1`;~ Activate `relation_dlg` `PBDelete`;\
mapkey(continued) ~ Arm `relation_dlg` `RelText`;\
mapkey(continued) ~ Input `relation_dlg` `RelText`1 0 0 1 `GEWICHT=ceil(MP_MASS(\"\"),3)\n/* \
mapkey(continued) MASSE=MP_MASS(\"\")\n\n\n/* Uebergabe des Materialnamens an den Parameter \
mapkey(continued) MATERIAL (bei zugewiesenen Material)\nIF \
mapkey(continued) MATERIAL_PARAM(\"CONDITION\")==\"\"\nIF \
mapkey(continued) MATERIAL_PARAM(\"SELECT_EN_NAME\")==MATERIAL_PARAM(\"SELECT_DIN_NAME\")\nMAT\
mapkey(continued) ERIAL=MATERIAL_PARAM(\"SELECT_EN_NAME\")\nELSE\nMATERIAL=MATERIAL_PARAM(\"SE\
mapkey(continued) LECT_EN_NAME\")+\" \
mapkey(continued) (\"+MATERIAL_PARAM(\"SELECT_DIN_NAME\")+\")\"\nENDIF\nELSE\nMATERIAL=MATERIA\
mapkey(continued) L_PARAM(\"CONDITION\")\nENDIF\n\n/* Übergabe des Materialnamens und Nummer \
mapkey(continued) an den Parameter WERKSTOFF fuer die Zeichnung\nIF MATERIAL==\" \
mapkey(continued) \"\nWERKSTOFF=\"\"\nELSE\nIF \
mapkey(continued) MATERIALNR==\"\"\nWERKSTOFF=MATERIAL\nELSE\nWERKSTOFF=MATERIAL+\";\
mapkey(continued) (\"+MATERIALNR+\")\"\nENDIF\nENDIF\n\n/* Uebergabe der Materialnummer an \
mapkey(continued) den Parameter MATERIALNR (bei zugewiesenen \
mapkey(continued) Material)\nMATERIALNR=MATERIAL_PARAM(\"SELECT_MATERIAL_NUMBER\")\n\n/* \
mapkey(continued) Übergabe für die Stücklisteninfo\nIF HERSTELLER==\"\"\n IF NORM==\"\"\n IF \
mapkey(continued) ABMESSUNG==\"\"\n STK_INFO=\"\"\n ELSE\n STK_INFO=ABMESSUNG\n ENDIF\n EL\
mapkey(continued) SE\n IF ABMESSUNG==\"\"\n STK_INFO=NORM\n ELSE\n STK_INFO=NORM+\" - \
mapkey(continued) \"+ABMESSUNG\n ENDIF\n ENDIF\nELSE\nSTK_INFO=HERSTELLER+\" - \
mapkey(continued) \"+HERSTELLERARTNR\nENDIF`;~ Update `relation_dlg` `RelText`0 ;\
mapkey(continued) ~ Activate `relation_dlg` `PB_OK`;
Vielen Dank schonmal im Vorraus
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP