lcSQL = 'SELECT rub_code,rub_libelle,rub_alias,; > rub_touche,trub_libelle,rub_etat,; > ser_code,trub_code FROM Rubrique Rubrique INNER JOIN Typerubrique Typerubrique; > ON Rubrique.trub_code=Typerubrique.trub_code; > WHERE ser_code=?Cser and SUBSTR(rub_libelle,1,3) NOT IN("acc","ind")','Cursdetail')' >SQLEXEC(gnConnHandle,lcSQL)
lcSQL = 'SELECT rub_code,rub_libelle,rub_alias,; rub_touche,trub_libelle,rub_etat,; ser_code,trub_code FROM Rubrique RU INNER JOIN Typerubrique TR; ON RU.trub_code=TR.trub_code; WHERE ser_code=?Cser and SUBSTR(rub_libelle,1,3) NOT IN("acc","ind")','Cursdetail')' SQLEXEC(gnConnHandle,lcSQL)