 3   
====================================================
1             INV          Invalid

id N(10)-------person_id    Opis
cName C(50)    Inv_id-------invalid

     5...        
  ...

     InputData
     PAGE,    
 ,     
:
INVALID1
   
SELECT * FROM Invalid INTO CURSOR Invalid_q ORDER BY opis
RowSource = Invalid_q.opis
RowSourceType = 6-fields

     
 2  - 1  INV    Invalid
    ....
     ...

      
  .
     EditData
  nCurrentId
nCurrentId = T1.id
(         ,   
)
     PAGE,    
 ,     
:
INVALID1
   
SELECT * FROM Invalid INTO CURSOR Invalid_q ORDER BY opis
RowSource = Invalid_q.opis
RowSourceType = 6-fields
       
  ,    ...  1- 
  ,  ,    
    ...  ,   
    Invalid
   
   ,    
  Invalid_q.opis
   :

SELECT * FROM pens!inv;
 WHERE Inv.person_id = nCurrentID ;
 INTO CURSOR PageInv
SELECT * FROM Invalid INTO CURSOR Invalid_q ;
ORDER BY opis  
LOCATE FOR Invalid_q.invalid = PageInv.invalid_id
IF FOUND()
	a = RECNO()
	thisform.pgfr1.page3.INVALID1.value = a (   )
ENDIF

,   - FOUND()
  -     
   ....
   ...
 ,      -      ...

   PageInv  RECCOUNT()
           -   ...

   :
     
 ,       1,  5 
  (    INV),       6 PAGEs
   PAGE  ,   ...
      ...  
     = ...




