SeekStr = CompCode +; SSN +; left(rtrim(NameL)+', '+rtrim(NameF),37)+; str(OEPDY,4) +; str(OEPDM,2,0,'0')+; str(OEPDD,2,0,'0') if .not.(; CompCode +; SSN +; left(rtrim(NameL)+', '+rtrim(NameF),37)+; str(OEPDY,4) +; str(OEPDM,2,0,'0')+; str(OEPDD,2,0,'0') = SeekStr) select 'QChange' replace CouldntUpd with .T. loop endif This is what V.dbase help says about STR STR(<expN> [, <length expN> [, <decimals expN> [, <expC>]]])expC