*next line fails &lcIndex. ENDFOR USE IN (SELECT(JUSTSTEM(.c_OutputFile))) *-- La actualización de la fecha sirve para evitar diferencias al regenerar el DBF IF toFoxBin2Prg.l_ClearDBFLastUpdate THEN ldLastUpdate = EVALUATE( '{^2013/11/04}' ) ELSE ldLastUpdate = EVALUATE( '{^' + toTable._LastUpdate + '}' ) ENDIF loDBFUtils.write_DBC_BackLink( .c_OutputFile, toTable._Database, ldLastUpdate ) toFoxBin2Prg.updateProcessedFile() ENDWITH && THIS CATCH TO loEx lnCodError = loEx.ERRORNO toFoxBin2Prg.updateProcessedFile( 0, '', '', 'E1' ) loEx.USERVALUE = 'lcIndex="' + TRANSFORM(lcIndex) + '"' IF THIS.n_Debug > 0 AND _VFP.STARTMODE = 0 SET STEP ON *this line stopsnow in command window &lcIndex. runs.