Hola
Haciendo un bug creo que verías cual es el problema. Es que no le has dado el espacio en
Código sql:
Ver originalSQL = SQL & "where a.cod_estado_proyecto = b.cod_estado_proyecto"
por lo tanto la consulta queda algo como
Cita: where a.cod_estado_proyecto = b.cod_estado_proyectoorder by a.txt_nombre asc;
Suerte