Select com parametros + DBExpress + SQL Server

Salve galera, tudo beleza??

Seguinte, estou tentando fazer algo simples. Executar um Select com passagem de parâmetro. Exemplo (apenas um exemplo):

 

SELECT A.PRO_COD, A.PRO_ATIVO, A.PRO_ASSUNTO, A.PRO_TRANS, A.PRO_CONTATO, A.CAP_COD_ORI, A.CAP_COD_DES

FROM TPROTOCOLOW A

LEFT OUTER JOIN TUSUEMP X ON X.CODUSU = :GCODUSU

WHERE A.PRO_ATIVO = 'S'

No Delphi, executo o comando com o ClientDataSet (pois minha aplicação trabalha como Client/Server). Então fica assim o código:

 ClientDataSet1.Close;

 ClientDataSet1.Params.Clear;

 ClientDataSet1.CommandText := 'SELECT A.PRO_COD,A.PRO_ATIVO,A.PRO_ASSUNTO,A.PRO_TRANS, A.PRO_CONTATO, A.CAP_COD_ORI,A.CAP_COD_DES' +

 ' FROM TPROTOCOLOW A ' +

 ' LEFT OUTER JOIN TUSUEMP X ON X.CODUSU = :GCODUSU' +

 ' WHERE A.PRO_ATIVO = ''S''';

 

 ClientDataSet1.Params.ParamByName('GCODUSU').AsInteger := 7;

 ClientDataSet1.Open;

Porem ele não executa e retorna a mensagem: "Syntax error or access violation"

A aplicação rodava em Firebird e como mudei para o SQL Server 2005

O que pode ser??? Isso ocorre para qualquer parâmetro de qualquer tipo (String, Data, etc).

Abs