Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations cowski on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

Export to excel help (Comand (APDL)) issue

Status
Not open for further replies.

Enginerd4390

Mechanical
Joined
Mar 13, 2019
Messages
2
Location
US
Hello all, So I am running into a code issue. Need help please.

Task: To get a solution that was solved to export stress intensity across a path from node start to end.
issue is that I cant get it to load the stress across the path as well as export it to excel. It is just making a empty excel. the error it gives me is

Error in format, not enough data format specifiers
('EPTO',F10.4,3X,F10,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,.

This is the code I wrote:

! enter the number of nodes to extract results
nnnode=2
! enter the number of time steps at which to extract results
nnnstep=1

!1DIMENSION ARRY
*dim,nni,array,nnnode
*dim,nnstep,array,nnnstep

*dim,neptoint,array,nnnode
*dim,nepto1,array,nnnode
*dim,nepto2,array,nnnode
*dim,nepto3,array,nnnode
*dim,neptox,array,nnnode
*dim,neptoy,array,nnnode
*dim,neptoz,array,nnnode
*dim,neptoxy,array,nnnode
*dim,neptoyz,array,nnnode
*dim,neptoxz,array,nnnode

*dim,nepplint,array,nnnode
*dim,neppl1,array,nnnode
*dim,neppl2,array,nnnode
*dim,neppl3,array,nnnode
*dim,nepplx,array,nnnode
*dim,nepply,array,nnnode
*dim,nepplz,array,nnnode
*dim,nepplxy,array,nnnode
*dim,nepplyz,array,nnnode
*dim,nepplxz,array,nnnode

*dim,nepelint,array,nnnode
*dim,nepel1,array,nnnode
*dim,nepel2,array,nnnode
*dim,nepel3,array,nnnode
*dim,nepelx,array,nnnode
*dim,nepely,array,nnnode
*dim,nepelz,array,nnnode
*dim,nepelxy,array,nnnode
*dim,nepelyz,array,nnnode
*dim,nepelxz,array,nnnode


! node 1 - PATH
allse
nsel,s,ext
csys,0
nni(1)=node(1054.9,1048.3,2952.8)

! node 2 - PATH
allse
nsel,s,ext
csys,0
nni(2)=node(1054.9,0,2952.8)

allse
nnstep(1)=1

set,list
*CFOPEN,epto1,csv
*do,i,1,nnnstep
set,nnstep(i)

*do,j,1,nnnode

*get,neptoint(j),node,nni(j),epto,int
*get,neptox(j),node,nni(j),epto,x
*get,neptoy(j),node,nni(j),epto,y
*get,neptoz(j),node,nni(j),epto,z
*get,neptoxy(j),node,nni(j),epto,xy
*get,neptoyz(j),node,nni(j),epto,yz
*get,neptoxz(j),node,nni(j),epto,xz
*get,nepto1(j),node,nni(j),epto,1
*get,nepto2(j),node,nni(j),epto,2
*get,nepto3(j),node,nni(j),epto,3

var1=nnstep(i)
var2=nni(j)
var3=neptoint(j)
var4=nepto1(j)
var5=nepto2(j)
var6=nepto3(j)
var7=neptox(j)
var8=neptoy(j)
var9=neptoz(j)
var10=neptoxy(j)
var11=neptoyz(j)
var12=neptoxz(j)





*vwrite,var1,var2,var3,var4,var5,var6,var7,var8,var9,var10,var11,var12
('EPTO',F10.4,3X,F10,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,e10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,e10.4,3X,)


*enddo


*enddo

*CFCLOSE
set,list
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top