a problem of loop

wilfriedhao

I Have a problem error  :  Load set not found on result file file.rst.
please can you help me
i have 100 substeps i would like to obtain the out put  ( that i search) in every substeps and this is will be inside a loop
think you for your prompt reply
/solu                  ! SOLUTION
antype,static
TIME,10
nsel,s,loc,y,14
nsel,r,loc,x,-25,-23
d,all,uy,0.1
nsel,all
nlgeom,on                      ! LARGE STRAIN OPTION ACTIVATED  !KBC,1              !  SUDDENLY                             
nsubst,100
autots,off
outpr,all,all
solve
esel,s,elem,,1
nsle                       ! SELECT ALL NODES ATT. TO ELEM
! ENTER GENERAL POSTPROCESSOR TO DISPLAY RESULTS
/POST1
sdefava=0
*do,j,1,100,1              ! CREATE DO LOOP FOR SUBSTEPS
     SET,j
     !esel,s,elem,,n,nbrelem,1
      K=1

         *do,i,1,4,1         ! LOOP ON NODES CONNECTED TO ELEM1
            
              *GET,num,node,0,NUM,MIN         ! OBTAIN MINI NUMBER OF n
              *GET,ceqv,node,num,s,eqv        !GET LA CONTRAINTE DE VON MISES  AT THAT NODE
              *GET,hyd,node,num,nl,hpres      !GET LA CONTRAINTE HYDROSTATIQUE  AT THAT NODE
              *GET,defpla,node,num,nl,epeq    !GET LA DEFORMATION PLASTIQUE CUMULEE  AT THAT NODE
                    VALUE(j,K)=ceqv  
                    VALUE(j,K+1)=hyd
                    VALUE(j,K+2)=defpla
      K=K+3
                nsel,u,,,num                  ! UNSELECT NODE
               !*status,parm                  ! LIST SCALAR PARAMETERS
          *enddo
     sceqv=VALUE(j,1)+VALUE(j,4)+VALUE(j,7)+VALUE(j,10)
     shyd=VALUE(j,2)+VALUE(j,5)+VALUE(j,8)+VALUE(j,11)
     sdefpla=VALUE(j,3)+VALUE(j,6)+VALUE(j,9)+VALUE(j,12)
     incdefpla=sdefpla-sdefava
     ceqvmoy(j)=sceqv/4
     hydmoy(j)=shyd/4
     incdefplamoy(j)=incdefpla/4
     sdefava=sdefpla
     ETABLE,hydmoy(j),nl,hpres
     *GET,hydmoy,etab,0,NCOL,hydmoy(j)
  
     ETABLE,incdefplamoy(j),nl,epeq
     *GET,incdefplamoy,etab,0,NCOL,incdefplamoy(j)
     ETABLE,ceqvmoy(j),s,eqv
     *GET,ceqvmoy,etab,0,NCOL,ceqvmoy(j)
       *vwrite,ceqvmoy,hydmoy,incdefplamoy
       (F10.1,';';,F10.5,';';,E20.5)
     
  *enddo