lcSQL = "select * " + ; "from TRPSurvey" + "..exported " + ; "where ltrim(rtrim(PermID)) = '" + lcPermID + "'" IF sqlexec(m.lnHandle,lcSQL,"crsImport") < 0 AERROR(laError) MessageBox(laError[1,2]) ENDIF