>I just hope that code will work, but :o(((
>So Your exit of this situation is what Martin said but You must incude it with cikle:
>
>

>
>SELECT BobClient
>SCAN
>   csql = "INSERT INTO IFCOMPAN ( CID, CNAME1, CNAME2, CADDRESS1, CZIPCODE, CLOCALITY, CVATCAT, "+;
>          " CCUSTYPE, CSUPTYPE, CCUSCAT, CCUSPAYDELAY ) VALUES ("+;
>          " ?BobClient.code, ?BobClient.nomteleph , ?BobClient.nom2 , ?BobClient.rue,"+;
>          " ?BobClient.cpays + ?BobClient.ccp , ?BobClient.localite , 'N' ,   'C' , 'U' ,"+;
>          " ?BobClient.codePersonnel , 30)"
>
>   nresult = SQLEXEC( lnAccess ,   csql)
>   IF nresult < 0
>      **** Error hapened
>   ENDIF
>ENDSCAN
>
>

Borislav, pardon me if I allow myself:

SELECT BobClient
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
IF SQLPREPARE(m.lnAccess,m.csql)>0
  COUNT NOOPTIMIZE FOR SQLEXEC(m.mlnAccess)>0
  * with buffering
  *COUNT NOOPTIMIZE FOR SQLEXEC(m.mlnAccess)>0 AND TABLEUPDATE()
ENDIF
IF _TALLY<m.BobClientCount
	WAIT WINDOWS 'ERRORS'
ENDIF