---

Hallo Hier eine Frage:

in OSD 11.6 kann man Teile mit "Abwickeln" abwickeln, die nicht im Belchmodul erzeugt wurden.
Standardvorgabe ist jedoch immer eine Korrekturfaktor von 0.4 welcher falsche Zuschnitte liefert.
Wie kann ich den k-Faktor z.B. auf 0.25 ändern in der Vorgabe ?
Sicher kann man das in irgendeiner Customize eintragen

Das ganze läuft unter HP UX bei uns.

Danke für jegliche Tips

B.Rückl

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo BennoR,
Ich hätte da eine Idee: Mach dir doch einen neuen Schalter der den
Wert 0.25 besitzt! Einen neuen Schalter macht man wie folgt (Ich hoffe das dies unter HP-UX auch so ist):
1. Das Menu Anpassen... öffnen
2. Auf Neu... klicken
3. Dem Schalter einen Namen geben und in einer Gruppe zuweisen.
4. Aufzeichnen anklicken
5. Das Menu Auf/Abwickeln wählen und den gewünschten Wert eingeben.
6. Befehlsaufzeichnung stopp drücken und OK.
7. Nun sollte unter der zugewiesenen Gruppe (Bsp. Verschiedenes)
  ein neuer Schalter auftauchen mit dem gewählten Namen. Wenn man
  nun Abwickeln über diesen Schalter erledigt, hat man den     
  gewünschten Korrekturfaktor.

Wie schon gesagt, ich bin nicht sicher ob das Vorgehen unter HP-UX
auch so klappt, aber es sollte eigentlich recht ähnlich sein. Ich hoffe es nützt dir was.

Grüsse und so

FL

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo FL,

tja unter Unix geht da so gaaaar nichts, zumindest nicht soweit ich es kenne....
Viel schlimmer ist ja auch eigentlich, dass das Blechmodul nicht rechnen kann,
ich weiss nicht wer da welche Formeln hinterlegt hat, aber das stimmt hinten und vorne
nicht.... (nicht sheet metal, std "Bleche"). Bei 3 Biegungen fehlen mal schnell einige mm !
Aber wenn man an die Funktion kommt würde ich mir sogar die Mühe machen, die
DIN-Formeln zu hinterlegen oder Sie CocReate zur Verfügung zu stellen.

Trotzdem Danke für den Tip, aber windows läuft hier nicht

Gruss
Benno

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo BennoR,
Leider steck ich nicht so in der Materie von k-Faktoren. Es gibt ein html-Dokument über k- faktoren file:/opt/CoCreate/SolidDesigner/help/german/pesd.ht/sha_adm/allow_05.html#SHA-ALLOW-FIXK
Zudem gibt es ein LISP-file unter /opt/CoCreate/SolidDesigner/personality/SheetAdvisor
demoshop.lsp
demoshop_func.lsp

BEND_CREATE :bend-k-factor .25 würde ein Fenster mit k-faktor .25 öffnen

Gruß Edgar

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

eine Methode den K Faktor zu aendern ist:
(ELAN::FLD-SET-DEFAULT-K-FACTOR [WERT])

Damit wird in allen Blech Dialogen der Wert fuer den K Faktor geaendert.

Diese Methode hat den Nachteil, dass sie NICHT im Integration-Kit enthalten ist, daher auch NICHT offiziell unterstuetzt wird ;-))

Den aktuellen Wert kann man wie folgt abfragen:
(ELAN::FLD-GET-DEFAULT-K-FACTOR)

Das funktioniert sehr gut. Bisher sind mir keine Probleme bekannt.

Mario

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

schon mal vielen Dank für die Tips.
Frage: Wo gebe ich den "Elan" vor ? in der
pesd_customize ?

Weiss vielleicht doch jemand, wie man in die Berechnung eingreifen kann,
damit der Abzugswert stimmt (hat nix mit K zu tun) ?

Vielen Dank

Benno Rückl
Fritzmeier Systems www.fritzmeier.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von BennoR:

Weiss vielleicht doch jemand, wie man in die Berechnung eingreifen kann,
damit der Abzugswert stimmt (hat nix mit K zu tun) ?

---

Das macht doch der Blechmodul schon.
Die Formeln findet man in der Datei demoshop_func.lsp.
Also wozu etwas programmieren, was es schon gibt?

Ob berechnet werden soll oder auf Tabellenwerte zugegriffen
werden soll entscheidet man in der Datei demoshop.lsp

Gruss von WoHo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo woho,

vielleicht stehe ich ja auf der Leitung ...
Wir haben kein SHEETMETAL sondern nur
das in 11.6 standard mässig enthaltene "Bleche"
SHEETMATEL hatte ich mal als DEMO, war gut aber
dieses MOdul haben wir in PROE schon...

"Bleche" liefert mit dem STD K-Faktor 0.4 einfach zu grosse
Abweichungen von der Realität.

Gruss
B.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Benno,

die Zeile, z.B.

(ELAN::FLD-SET-DEFAULT-K-FACTOR 0.25)

kann in direkt in die Kommandozeile eingegeben werden. Soll dieser
Wert grundsaetzlich gesetzt werden, kann die Zeile auch in das
pesd_customize eingefuegt werden.

Mario

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,
hat auch mal jemand daran gedacht, dass K-Faktor nicht gleich
K-Faktor ist? Jedenfalls ist die Betrachtungsweise unterschiedlich
zwischen DIN und ANSI. Dummerweise arbeitet OSD in ANSI, d.h. der Faktor ist falsch. Ich weiss jetzt nicht auswendig ob zu gross oder zu klein. Nachschauen in der Hilfe. Im Menue für die Blechabwicklung das ?-Zeichen anklicken, und dann nach K-Faktor schauen (ist ein Link eingebaut, auf die entsprechende Sequenz)

gruss KJW

------------------
kjw

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

lt. "help" entspricht K = 0.4 der DIN.
Ich werde aber den Verdacht nicht los, dass die hinterlegte Formel für den Abzugswert nicht stimmt, manchmal sind die Ergebnisse 100 % i.o, bei einigen Teilen fehlt es aber gleich 2-3 mm.
Da könnte man dann über "K" korrigieren, wenn man wüsste wohin...
Wir haben die Abzugsformel im Excel hinterlegt, da ist die Gesamtlänge des Zuschnittes dann mit einem Klick kontorllierber und die Abzüge / Biegung .. Aber EXCEL läuft nicht unter UNIC; also muss jeder KOsntruktuer erst mal zum PC traben....

Gruss
B.Rückl

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Benno,

Ein K-Faktor von 0,4 ist meines erachtens mit Sicherheit ein ANSI-K-Faktor, da er für einen DIN-K-Faktor zu klein ist (siehe unten).

Wenn es nur darum geht, das der Weg zum PC zu aufwendig ist, könnt ihr ja ein Lisp-Makro unter Werkzeuge hinterlegen, welches den K-Faktor ausgibt.

Ich hab unten mal die Formel angehängt, mit der wir im SheetMetal arbeiten, die läßt sich sicher auch so anpassen, das sie den K-Faktor einfach nur ausgibt, die Eingabemaske für die Werte müßtet Ihr dann noch dazubasteln.
Da ist noch ziemlich viel Sheet-Metal-Gezeugse drin (die ganzen Parameter und so) und da das eins meiner ersten Werke in Lisp ist, sicher auch nicht schön programmiert, aber die Formel funktioniert.

(defun Pf_bend_allowance_din (&key sheet_thickness bend_angle bend_radius
sheet_material tool_id
&allow-other-keys )
;___________________________________________________________________
;
; Diese Funktion berechnet den Einzugswert einer Biegung unter
; benutzung
; der DIN-Formel zur Berechnung des k-Faktors.
; Der K-Faktor beschreibt die Lage der neutralen Faser zwischen Innen- und
; AuÞenseite der Biegung.
; Aus dem K-Faktor, der Materialdicke, dem Winkel der Biegung und dem
; Biegeradius wird in einer Unterfunktion der Einzugswert berechnet und
; zurÏckgegeben.
;
; DIN ANSI Achtung:
; Der K-Faktor ist in der DIN-Formel
; _______ 2 1 anders definiert, als in der ANSI-
; / Formel.
; / .. 1 0,5 Der DIN-Wert entspricht dem doppelten
; / . ANSI-Wert (siehe Beispiel).
; / . __ 0 0
; / . /
; | . |
;
;
; INPUT
; =====
; sheet_thickness Material thickness [mm]
; bend_angle [deg] bend angle of bend (0 = no bend )
; bend_radius [mm] bend radius of bend (0 = no bend )
; sheet_material Material property list :
; syntax:
; (:shopname <shopname> :tabname <sheet mat. table>
; :rowkey <material key property list>)
; syntax e.g.
; (:SHOPNAME "demoshop" :TABNAME "sheet_metals"
; :ROWKEY (:MATERIAL "UST 1203" :THICK 1.25))
;
;
; RETURN
; ======
; property list ( :allowance allowance-value ; if not given the
; ; system uses a
; ; fallback strategy
; :warning-headline message-string ; optional
; :error-type violation-type ; optional
; :error-message message_string ) ; optional
;___________________________________________________________________________

(declare (ignore sheet_material)) ; to keep compiler quite when compiling

; (display sheet_material)
; (display (nth 5 sheet_material))

(setf pf_material_list (nth 5 sheet_material))
(setf pf_material (nth 1 pf_material_list))
; (setf pf_mat_list (sd-string-split pf_material " "))
;; (display pf_material)

(let* (R_t
R_t_Kehrwert
Offset
Min-K-Factor
Max-K-Factor
;; K_factor_echt
K_factor
Materialtyp
return_values

(shopname (getf sheet_material :shopname))
(tool-rowkey (or (getf tool_id :rowkey)
; if used as fallback formula (no tool_id)
(list :RADIUS bend_radius)))
(allowance-table (if tool_id
(sha-get-db-entry tool_id :ALLOWANCE_TABLE)
; if used as fallback formula (no tool_id)
(sha-get-shop-entry
:shopname shopname
:column :ALLOWANCE_TABLE)))
(material-rowkey (getf sheet_material :rowkey))
(material-keys (sha-separate-plist material-rowkey))
(tool-keys (remove ':angle (sha-separate-plist
tool-rowkey)))

)

(setf R_t (/ bend_radius sheet_thickness))
(setf R_t_Kehrwert (/ sheet_thickness bend_radius))
; Calculate k-factor according DIN

;*****************************************************************************
;** Allowance-Formel-Anpassung fÏr Buntmet./Stahl:
;*****************************************************************************
(if (sd-string= pf_material "Buntmetall")
(progn
(setf Offset 0.65)
(setf Min-K-Factor 0.66)
(setf Max-K-Factor 1)
(setf K_factor_echt (+ Offset (/ (log R_t 10) 2)))
)
)


;*****************************************************************************
;** Allowance-Formel-Anpassung fÏr Buntmet./Stahl:
;*****************************************************************************
(if (sd-string= pf_material "Stahl")
(progn
(setf Offset 0.65)
(setf Min-K-Factor 0.66)
(setf Max-K-Factor 1)
(setf K_factor_echt (+ Offset (/ (log R_t 10) 2)))
)
)

;*****************************************************************************
;** Allowance-Formel-Anpassung fÏr K-Materialien:
;*****************************************************************************
(if (sd-string= pf_material "K-Materialien")
(progn
(setf Offset 0.65)
(setf Min-K-Factor 0.66)
(setf Max-K-Factor 1)
(setf K_factor_echt (+ Offset (/ (log R_t 10) 2)))
)
)

;*****************************************************************************
;** Allowance-Formel-Anpassung fÏr Nirosta:
;*****************************************************************************
(if (sd-string= pf_material "Nirosta")
(progn
(setf Offset 0.65)
(setf Min-K-Factor 0.66)
(setf Max-K-Factor 1)
(setf K_factor_echt (+ Offset (/ (log R_t 10) 2)))
;;(setf K_factor_echt (+ Offset (/ (*(log R_t 10) (+ (/ R_t_Kehrwert 2.7) 0.5)) 2)))
)
)


;; (display (fix_mesg "Offset : {1}" (sd-num-to-string Offset 2) ))
;; (display (fix_mesg "Min-K-Factor : {1}" (sd-num-to-string Min-K-Factor 2) ))
;; (display (fix_mesg "Max-K-Factor : {1}" (sd-num-to-string Max-K-Factor 2) ))

(if (< R_t 0.65 )
(if (and *Sh_global_dfm_checks* *Sh_local_dfm_checks*)
(progn
(setf return_values
(list :warning-headline "WARNUNG: VerstoÞ gegen Fertigungsregel (DFM)."
:error-type :DFM_rule_violation
:error-message
"VerhÌltnis Radius/Dicke sollte nicht kleiner als 0.65 sein."
)
)
)
)
)



(if (> K_factor_echt Max-K-Factor) ;maximalen K-Faktor auf Max-K-Factor begrenzen
(progn
(setf K_factor Max-K-Factor)
(progn
(setf return_values
(list :warning-headline "Info"
:error-type :DFM_rule_violation
:error-message
(fix_mesg "DIN-K_factor ist grÎÞer als {1}, wird auf {1} gesetzt" (sd-num-to-string Max-K-Factor 2))
)
)
)
)
)


(if (< K_factor_echt Min-K-Factor) ;minimalen K-Faktor auf Min-K-Factor begrenzen
(progn
(setf K_factor Min-K-Factor)
(progn
(setf return_values
(list :warning-headline "Info"
:error-type :DFM_rule_violation
:error-message
(fix_mesg "DIN-K_factor ist kleiner als {1}, wird auf {1} gesetzt" (sd-num-to-string Min-K-Factor 2))
)
)
)
)
)

(if (and(>= K_factor_echt Min-K-Factor)(<= K_factor_echt Max-K-Factor))
(setf K_factor K_factor_echt)
)

(progn

(nconc return_values
(list
:error-message
(fix_mesg "Offset : {1}" (sd-num-to-string Offset 2) )
:error-message
(fix_mesg "Min-K-Factor : {1}" (sd-num-to-string Min-K-Factor 2) )
:error-message
(fix_mesg "Max-K-Factor : {1}" (sd-num-to-string Max-K-Factor 2) )
)
)

)

;; (display " ")
;; (display (fix_mesg "ermittelter K-Faktor (DIN) : {1}" (sd-num-to-string K_factor 4) ))
;; (display (fix_mesg "ermittelter K-Faktor (ANSI): {1}" (sd-num-to-string (/ K_factor 2) 4) ))
;; (display " ")
;; (display " ")

;*********************************************************************


; Calculate bend allowance and set global return value
; Pass open angle between bent lips instead bend angle

(append return_values (list :allowance
(Sh_calculate_bend_allowance_DIN sheet_thickness bend_radius
(- 180 bend_angle) K_factor)))

;; (setf test
;; (append return_values (list :allowance
;; (Sh_calculate_bend_allowance_DIN sheet_thickness bend_radius
;; (- 180 bend_angle) K_factor)
;; :K_factor_echt K_factor_echt))
;; )
;; (display test)
);end let
;; (display K_factor_echt)
)

Ich hoffe, das hilft irgendwie weiter!

Gruß
Andreas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

kfaktor_dos.txt

Nochmal ich, tschuldigung, meine Zeichnung sieht hier im Forum irgendwie nicht ganz so toll aus, deshalb nochmal der ganze Quatsch als Anhang! (wenns denn klappt)

Gruß
Andreas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Andreas

Weisse Fahne !!! ich verstehe von Deiner Formel ungefähr soviel,
wie Du vermutlich vom Klavierspielen,

ich würde Dich dazu gerne mal telefonisch bearbeiten. Schick mir doch mal
bitte per mehl Deine Telefonnummer, dann würde ich mich dazu
nächste Woche gerne melden, wenn ich darf ??

Danke

B.Rückl,

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

Im SheetMetal und im Bleche Bereich des Designers wird mit der ANSI Definition des k-Faktors gearbeitet, also ein Wert von 0 bis 1 ist zulaessig.

Wenn komplexe Tabellen oder Formeln fuer unterschiedliche Materialen,  etc. zur Berechnung gebraucht werden (wie die von Andreas gepostete), bietet es sich an das SheetMetal Modul zu nutzen.

--
Mario

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP