---

Hallo Zusammen,

habe folgende Problem/Fragestellung:
ich möchte mir von mehreren Linien die Nodenumber, Nodekoordinaten,etc in ein array schreiben. Dabei ist es wichtig das in der ersten Spalte die Liniennummer steht, anschließend die ensprechenden Nodes der Linien, etc. Ich bin das mit einer schleife in einer schleife angegangen.
Problem ist jetzt, dass beim rausschreiben die Werte immer wieder überschrieben werden... Es hat natürlich mit der Schleifenwert i zutun, da dieser immer wieder bei 1 startet.

Hat jemand eine Idee wie man die innere Schleife mit letzten i-Wert wieder beginnen lassen kann?

Vielen Dank für Eure Rückmeldungen...

Grüße
freddy

lsel,s,line,,3
lsel,a,line,,4
lsel,a,line,,5
cm,LINIENA,line
nsll,s,1

*get,AnzahlL,Line,,count
*get,AnzahlNall,node,,count
*get,NummerierungLall,LINE,,NUM,MIN
*set,nodeL1

!allgemein: DIM,name,array/table,Anzahl Zeilen,Anzahl Spalten
*DIM,nodeL1,array,AnzahlNall,6,, , ,

*do,R,1,AnzahlL,1
esel,s,type,,100
lsel,s,line,,NummerierungLall
nsll,s,1
*get,Anzahl,NODE,,count
*get,NummerierungL1,NODE,,NUM,MIN

*do,i,1,Anzahl,1
E1=ENEARN(NummerierungL1)
nodeL1(i,1)=NummerierungLall
nodeL1(i,2)=NummerierungL1
*get,nodeL1(i,3),NODE,NummerierungL1,LOC,X
*get,nodeL1(i,4),NODE,NummerierungL1,LOC,Y
*get,nodeL1(i,5),NODE,NummerierungL1,LOC,Z
*get,nodeL1(i,6),ELEM,E1,SMISC,1

NummerierungL1=NDNEXT(NummerierungL1)
*enddo
i=i+10
lsel,s,line,,LINIENA
NummerierungLall=LSNEXT(NummerierungLall)
*enddo

*CREATE,ansuitmp
*CFOPEN,'Line3','txt','M:\'
*vwrite,nodeL1(1,1),nodeL1(1,2),nodeL1(1,3),nodeL1(1,4),nodeL1(1,5),nodeL1(1,6),
(6f13.5)
*CFCLOS
*END
/INPUT,ansuitmp

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

---

Fehlt nicht bei *cfopen als fünfter Parameter append ?
Und vielleicht muss noch einmal auf Flüchtigkeitsfehler überprüft werden.

------------------
Viel Erfolg wünscht
Wolfgang Schätzing

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

---

habe das jetzt folgendermaßen versucht:

Problem ist aber hier, dass ich *create nicht in einer *do schleife verwenden darf... Vielleicht noch ne andere idee oder tipp?
Gruß und danke

lsel,s,line,,3
lsel,a,line,,4
lsel,a,line,,5
cm,LINIENA,line
nsll,s,1

*get,AnzahlL,Line,,count
*get,AnzahlNall,node,,count
*get,NummerierungLall,LINE,,NUM,MIN

*do,R,1,AnzahlL,1

esel,s,type,,100
lsel,s,line,,NummerierungLall
nsll,s,1

*get,Anzahl,NODE,,count
*get,NummerierungL1,NODE,,NUM,MIN
*set,nodeL%NummerierungLall%
!allgemein: DIM,name,array/table,Anzahl Zeilen,Anzahl Spalten
*DIM,nodeL%NummerierungLall%,array,Anzahl,6,, , ,

*do,i,1,Anzahl,1
E1=ENEARN(NummerierungL1)
nodeL%NummerierungLall%(i,1)=NummerierungLall
nodeL%NummerierungLall%(i,2)=NummerierungL1
*get,nodeL%NummerierungLall%(i,3),NODE,NummerierungL1,LOC,X
*get,nodeL%NummerierungLall%(i,4),NODE,NummerierungL1,LOC,Y
*get,nodeL%NummerierungLall%(i,5),NODE,NummerierungL1,LOC,Z
*get,nodeL%NummerierungLall%(i,6),ELEM,E1,SMISC,1

NummerierungL1=NDNEXT(NummerierungL1)
*enddo

*CREATE,ansuitmp,,,APPEND
*CFOPEN,'Lines','txt','M:\Entwicklungsprojekt CGB\FEM\globales Tragverhalten\reine CFK Schalung\120813_CFK freiform\output'
*vwrite,nodeL%NummerierungLall%(1,1),nodeL%NummerierungLall%(1,2),nodeL%NummerierungLall%(1,3),nodeL%NummerierungLall%(1,4),nodeL%NummerierungLall%(1,5),nodeL%NummerierungLall%(1,6 ),
(6f13.5)
*CFCLOS
!*END
!/INPUT,ansuitmp
lsel,s,line,,LINIEN
NummerierungLall=LSNEXT(NummerierungLall)
*enddo

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

---

ohman, grad gesehen das ich APPEND bei *create und nicht bei *cfopen angewendet hab!

jetzt passts!
gruß und danke

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