Hallo zusammen,
gibt es eine Option, über TRAC nachverfolgte Lastfälle aus der Datenbank zu extrahieren und zu speichern?
Ich habe das soweit partiell schon mal in etwa wie folgt probiert:
+PROG TEMPLATE
KOPF EXTRAHIEREN TRAC LASTFALL
@KEY LC_ACT_L 120 $ Die im vorherigen TRAC-Lauf ermittelten Lastfälle wurden mit KSAV $unter 120 gespeichert
let#lf @lf
ende
Ich erhalte hiermit lediglich nur den ersten Lastfall, der ermittelt wird. Eine Zugriffsmöglichkeit auf zb. den 5 Lastfall der eingeht sehe ich nicht.
Danke und VG
Drilon Gubetini
Hallo,
Ich finde keinen Hauptschlüssel LC_ACT_L in der Datenbankhilfe cdbase.chm, meinst du eher LC_ACT_LC oder was anderes? Was ist die entsprechende KWH-Nummer?
Ich kann gerade nicht nachvollziehen, was hier passiert, ohne den Beginn der Berechnung zu sehen. Kannst du ein Minimalbeispiel zeigen?
Hallo,
danke für die Rückmeldung. Alles klar, hier ein Minimalbeispiel:
+prog aqua urs:1
kopf
NORM ‘DIN’ ‘EN199X-200X-BRIDGE’ CAT B COUN 49 WIND 2 SNOW 1 WCAT B UNIT 5
beto nr 1 art c fcn 30
qb nr 1 h 500 b 500 mnr 1
ende
+prog sofimsha urs:2
kopf
syst art 3d gdiv 1000
knot 1 z 0 fix f
knot 2 z 5
grup 1
stab ka 1 ke 2 qnr 1 teil 10 km 0
ende
+prog sofiload urs:3
kopf
ACT G_1 GAMU 1.35 1 PSI0 1 1 1 1 PART ‘G’ SUP PERM BEZ ‘EIGENGEWICHT G1’
ACT G_2 GAMU 1.35 1 PSI0 1 1 1 1 PART ‘G’ SUP PERM BEZ ‘EIGENGEWICHT G2’
$ VERKEHR - LM1
ACT L_T GAMU 1.35 0 PSI0 0.75 0.75 0.2 0.8 PART ‘Q’ SUP EXCL BEZ ‘VERKEHRSLAST TS’
ACT L_U GAMU 1.35 0 PSI0 0.4 0.4 0.2 0.8 PART ‘Q’ SUP EXCL BEZ ‘VERKEHRSLAST UDL’
ACT W GAMU 1.5 0 PSI0 0.55 0.2 0 0.6 PART ‘Q’ SUP EXCL BEZ ‘WIND’
$ VERÄNDERLICH - Q
ende
+prog sofiload urs:4
kopf last 0
lf 1000 typ G_1 fakg 1.0
ende
+prog sofiload urs:5
kopf last 1
lf 1100 typ l_t
knot 2 typ pyy 100
ende
+prog sofiload urs:7
kopf last 2
lf 1200 typ l_u
knot 2 typ pyy 500
ende
+prog sofiload urs:8
kopf last 3
lf 1400 typ w
stab von grp 1 typ pyy pa -500
ende
+prog ase urs:6
kopf
lf alle
ende
+PROG MAXIMA URS:23 $ GZT/GZG ÜBERLAGERUNGEN
KOPF GZT/GZG ÜBERLAGERUNGEN
KOMB 1 EXTR DESI BASE 10000 BEZ ‘GZT EZ’
ACT G_1; LF 1000
ACT L_T; LF 1100
ACT L_U; LF 1200
ACT W; LF 1400
SUPP 1 EXTR MAMI ETYP STAB ZUST AUTO BEZ ‘GZT’
ende
+prog maxima urs:9
kopf
trac lf 10029 elem 1010 x 0.5 ksav 120
ende
+PROG TEMPLATE urs:10
KOPF EXTRAHIEREN TRAC LASTFALL
@KEY LC_ACT_L 120
let#lf @lf
prt#lf
ende
Hier greife ich den key ab. Komischerweise zeigt er mir hier am Minimalbeispiel allerdings die Kombination 120 dort gar nicht an…
Die Kombination wird nicht angezeigt, weil du in deinem TRAC-Befehl keinen Elementtyp ETYP angibst.
Was du machst ist korrekt, du musst nur über den gesamten Record loopen.
Ich habe die beiden letzten Module deiner Eingabe entsprechend angepasst.
+PROG MAXIMA
KOPF
TRAC LF 10029 ETYP STAB ELEM 1010 X 0 KSAV 120
ENDE
+PROG TEMPLATE
KOPF EXTRAHIEREN TRAC LASTFALL
LET#CDB_IER 0
@KEY KWH LC_ACT_L KWL 120
TXE FÜR DEN LASTFALL 120:
LOOP#I
LET#LF @(LF)
LET#FACT @(FACT)
IF #LF <> 0 $ damit die letzte Zeile (mit Nullen) nicht ausgegeben wird
TXE Der Lastfall #LF geht mit Faktor #(#FACT,1.2) ein.
ENDIF
ENDLOOP #CDB_IER < 2
ENDE
Ist das, was du erreichen wolltest?
Genau das wollte ich. Vielen Dank!
