csql = "INSERT INTO IFCOMPAN ( CID, CNAME1, CNAME2, CADDRESS1, CZIPCODE, CLOCALITY, CVATCAT, "+;
    " CCUSTYPE, CSUPTYPE, CCUSCAT, CCUSPAYDELAY )"+;
    " ?(SELECT B.code, B.nom , B.nom2 , B.rue, B.cpays + B.ccp , ?B.localite , 'N' ,   'C' , 'U' ,"
    
    csql2 = csql + " B.codePersonnel , 30  FROM BobClient AS 'B' ) "

   
  nresult = SQLEXEC( lnAccess ,   csql2 )