Hallo Speeedy!
Wie wär´s damit:
/***** IDENTNUMMER *******************
PRAEFIX = SEARCH(REL_MODEL_NAME(),"-")+2
NAME_LAENGE = STRING_LENGTH(REL_MODEL_NAME())
IF SEARCH(REL_MODEL_NAME,"-")>0
PRAEFIX_NAME = EXTRACT( REL_MODEL_NAME(), 1, PRAEFIX)
HAUPT_NAME = EXTRACT(REL_MODEL_NAME(),PRAEFIX+1,NAME_LAENGE-PRAEFIX)
ELSE
PRAEFIX_NAME = ""
HAUPT_NAME = REL_MODEL_NAME()
ENDIF
IDENTNUMMER=FAB_NR +FAB_JAHR+"-"+VARNUMMER+"-"+POSBEZEICHNUNG
oder
BLECHSTAERKE = SMT_THICKNESS()
IF BLECHSTAERKE < 10
MATERIAL = "011-0123-0"+ITOS(BLECHSTAERKE)+"0-01"
ELSE
MATERIAL = "011-0123-"+ITOS(BLECHSTAERKE)+"0-01"
ENDIF
oder
/* BIEGERADIEN
IF LAYOUT_BIEGETABELLE == "schwarz"
IF SMT_THICKNESS()==4
BIEGERAD=4
ELSE
IF SMT_THICKNESS()==5 | SMT_THICKNESS()==8
BIEGERAD=7.5
ELSE
IF SMT_THICKNESS()==6
BIEGERAD=7
ELSE
BIEGERAD=SMT_THICKNESS()
ENDIF
ENDIF
ENDIF
ELSE
/* MATRIAL NIRO
IF SMT_THICKNESS()==4
BIEGERAD=6
ELSE
IF SMT_THICKNESS()==5
BIEGERAD=8.5
ELSE
IF SMT_THICKNESS()==6
BIEGERAD=9
ELSE
BIEGERAD=SMT_THICKNESS()
ENDIF
ENDIF
ENDIF
ENDIF
oder
/* Kontrollwinkelberechnung Längswand
G_WA_A_WINK=ATAN((G_WA_A_H-(G_WA_BUND_O+G_WA_BUND_U))/ \
((G_WA_BREITE-G_WA_SW_A_BI-(2*G_WA_TL)-G_WA_AUSSENTOL)*0.5))
/*
/* Kontrolllängenberechnung schräger Anteil Blech (f. Lochreihe)
G_WA_A_PAN_L=SQRT((G_WA_A_H-(G_WA_BUND_O+G_WA_BUND_U))^2+ \
((G_WA_BREITE-G_WA_SW_A_BI-(2*G_WA_TL)-G_WA_AUSSENTOL)*0.5)^2)
/*
oder
....
------------------
Pro/DUZENT
Alchi
------------------------------------------------
Stress ? -> www.sahajayoga.de
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP