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