Gerar Código Sequencial

[mbfilho]

Caros colegas,

estou precisando gerar o código seqüencial para meu produto, sendo que a seqüência depende do código do grupo escolhido.
EX:

Selecionar tudo

grupo: 1 prod: 1
grupo: 1 prod: 2
grupo: 2 prod: 1
grupo: 2 prod: 2
grupo: 2 prod: 3

MEU COMANDO SQL:

Selecionar tudo

SELECT (NVL(MAX(M.ISN_MATERIAL),0) + 1) AS PROXIMO 
FROM T_MATERIAIS M, T_GRUPOS G                   
WHERE G.ISN_GRUPO = M.ISN_GRUPO                    
AND G.ISN_GRUPO = :ISN_GRUPO

O comando funciona corretamente no ORACLE, mas quando utilizo na minha aplicação feita em Delphi 7, recebo o seguinte erro:

Selecionar tudo

'ORA-00937: não é uma função de grupo de grupo simples'

[dr_gori]

Que estranho...
Será que o Delphi coloca um campo a mais implicitamente ?

[mbfilho]

DR_GORI,

pesquisei e acabei achando a solução.
Era só setar a propriedade LockType da minha ADOQuery para ltReadOnly.

Agradeço a ajuda,
Marcos Bastos