LPARAMETERS nKeyCode, nShiftAltCtrl

IF nkeycode =  13 

ns1=val(thisform.txtns.text)
sele s_strok
locate for ns=ns1
 if found()
    do case
       case ns1= 1 
        sele table1
        go top
        locate for okpo=okpo1 and ns= 1 
        if found()
           thisform.release()
           CLOSE DATA ALL
           USE table1
           SET FILTER TO okpo= okpo1 .AND. ns = ns1
           DO FORM f_tabl
           CLOSE DATA
         else
         sele a
           thisform.lblgr2.enabled=.t.
           thisform.txtgr2.enabled=.t.
           thisform.lblgr3.enabled=.t.
           thisform.txtgr3.enabled=.t.
           thisform.lblgr5.enabled=.t.
           thisform.txtgr5.enabled=.t.
           thisform.lblgr6.enabled=.f.
	thisform.txtgr6.enabled=.f.
        endif  
       case ns= 2 
           thisform.lblinn.enabled=.t.
           thisform.txtinn.enabled=.t.
           thisform.lblgr2.enabled=.f.
           thisform.txtgr2.enabled=.f.
           thisform.lblgr3.enabled=.t.
           thisform.txtgr3.enabled=.t.
           thisform.lblgr5.enabled=.t.
           thisform.txtgr5.enabled=.t.
           thisform.lblgr6.enabled=.t.
           thisform.txtgr6.enabled=.t.
       endcase
       
 else
     MESSAGEBOX( "Такой строки нет")
     ns1 =  0 
     thisform.txtns.value =  0 
     thisform.txtns.setfocus()
         
 endif


endif