subconsulta sql com VFP e firebird

[Campolinainfo]

Olá,
Tenho abaixo uma consulta que necessita de dois selects para trazer os dados que preciso.

[select "RECIBO", SUM("TAXAS") from
(select servico.numero as "RECIBO",
custa.codigo as "CODIGO",
servico.nome as "NOME",
servico_ato.quantidade as "QTDE",
servico_ato_valores.valor as "VALOR"
(servico_ato.quantidade * servico_ato_valores.valor) as "TAXAS"
from servico,
servico_ato,
ato_basico,
servico_ato_valores,
custa
where servico.id = servico_ato.id_servico
and servico_ato.id_ato_basico = ato_basico.id
and servico_ato_valores.id_servico_ato = servico_ato.id
and custa.id = servico_ato_valores.id_custa
and servico.numero = '318361'

group by servico.numero, custa.codigo, servico.nome, SERVICO_ATO.quantidade, servico_ato_valores.valor)
group by "RECIBO"
]

Ela roda certinha no iBexpert, mas não consigo escreve-la no vfp. como poderia escrever essa consulta no VFP9?
Para consulta com um select eu consigo assim:

LOCAL llRetorno
llRetorno = SQLEXEC(gncon,"select servico.numero, custa.codigo, ato_basico.nome, servico.nome as ENTIDADE, servico_ato.quantidade as QTDE, servico_ato.id as ITEM_ATO from SERVICO, SERVICO_ATO, ATO_BASICO, SERVICO_ATO_VALORES, CUSTA "+;
"where servico.id = servico_ato.id_servico and servico_ato.id_ato_basico = ato_basico.id and servico_ato_valores.id_servico_ato = servico_ato.id and custa.id = servico_ato_valores.id_custa AND servico.numero = " + Alltrim(this.value) + " group by custa.codigo, servico.nome, servico_ato.quantidade, ato_basico.nome, servico.numero, servico_ato.id" + " order by custa.codigo","ArqRec")

[alceu11]

Consultas View Local em Vfp, 4 videos como criar as Cosultas.

Como gerar consultas em Visual Fox pro
[Você precisa estar registrado e conectado para ver este link.]


Importando dados do Postgree com VFP Autor Rogerio R.
link
[Você precisa estar registrado e conectado para ver este link.]

Acesso ao Firebird pelo Visual Fox Pro Autor Walney M.
[Você precisa estar registrado e conectado para ver este link.]

Mais UM ARQUIVO para baixar o video eo zip
[Você precisa estar registrado e conectado para ver este link.]
Video autor Marcos Guedes



[Você precisa estar registrado e conectado para ver este link.] src="[Você precisa estar registrado e conectado para ver este link.] width="425" height="350" type="application/x-shockwave-flash" wmode="transparent" quality="high" scale="exactfit">

[Sub-Zero]

Código:

 LINHA_A = "select RECIBO,custa.codigo,servico.nome,"
 LINHA_B = "servico_ato.quantidade,servico_ato_valores.valor"
 LINHA_D = "from servico, servico_ato, ato_basico, servico_ato_valores, custa"
 LINHA_E = "where servico.id = servico_ato.id_servico and servico_ato.id_ato_basico"
 LINHA_F = "and ato_basico.id and servico_ato_valores.id_servico_ato = servico_ato.id"
 LINHA_G = "and custa.id = servico_ato_valores.id_custa and servico.numero = '318361'"
 LINHA_H = "group by servico.numero, custa.codigo, servico.nome, SERVICO_ATO.quantidade, servico_ato_valores.valor"

 LINHA_COMANDO = LINHA_A+LINHA_B+LINHA_D+LINHA_E+LINHA_F+LINHA_G+LINHA_H
 SQLEXEC(gncon, LINHA_COMANDO,"ArqRec")

TESTA ASSIM primeiramente , depois complicaremos