Fabio,

thank

Is just ?

csql = [INSERT INTO IFCOMPAN ( CID, CNAME1, CNAME2, CADDRESS1, CZIPCODE, CLOCALITY, CVATCAT,;
CCUSTYPE, CSUPTYPE, CCUSCAT, CCUSPAYDELAY ) VALUES (;
?code, ?nomteleph , ?nom2 , ?rue,?(cpays+ccp) , ?localite , 'N' , 'C' , 'U' ,;
?codePersonnel , 30)]

_TALLY=0

SELECT BobClient
SCAN ALL
IF SQLPREPARE(m.lnAccess,m.csql)>0

SQLEXEC(m.lnAccess,m.csql)

   * with buffering
  *COUNT NOOPTIMIZE FOR SQLEXEC(m.mlnAccess)>0 AND TABLEUPDATE()
ENDIF
ENDSCAN

 COUNT NOOPTIMIZE FOR SQLEXEC(m.mlnAccess)>0

IF _TALLY<m.BobClientCount
	WAIT WINDOWS 'ERRORS'
ENDIF