llTableUpdateii = TABLEUPDATE(.T.,.F.,'ii') IF llTableUpdateii *update issue records with this bill date SELE billset SET ORDER TO creqno IN pireq SET RELATION TO creqno INTO pireq ADDITIVE SCAN llRlockpi = RLOCK('pireq') IF llRlockpi SELECT pireq REPLACE pireq.dbilled WITH m.idate ELSE llOk = .F. EXIT ENDIF ENDSCAN llTableUpdatepi = TABLEUPDATE(.T.,.F.,'pireq') IF NOT llTableUpdatepi llOk = .F. ENDIF SET RELATION TO USE IN billset USE IN billtotl ELSE llOk = .F. ENDIF ENDIFI do NOT understand what is happening. Any help appreciated.