mode quiet
matrix(600,3)  smplrange=0
matrix(600,3)  stk=0
   table tab_results
        tab_results(1,1)="stkcd"























        tab_results(1,2)="s1"
        tab_results(1,3)="s2"
!j=1
!i=1
!obs=@obsrange
while !i<!obs
           !stk=stkcda(!i)
            while stkcda(!i)=!stk
                        !i=!i+1
                 if !i>!obs then
                        exitloop
                  endif
             wend
             !j=!j+1   
                 

           smplrange(!j)=!i-1
wend


!j1=0
for !j1=1 to !j-1
        !beginnumber=smplrange(!j1)+1
        !endnumber=smplrange(!j1+1)
        smpl !beginnumber !endnumber
  var myvar1.ec(c,1) 1 2 lnpa lnphgcny   
  next
提示error in sample：range error in "smpl 1 307"