pues...
revisando un poco y pensando mucho mas halle la solucion
lo que hice fue jalar los 2 campos y en el query agregue 2 campos calculados
y en el procedimiento OnCalc puse algo como esto y lo solucione
gracias de todas maneras
Código:
if frm1.moneda = 'S'
qry1Debe.Value := qry1DebeMN.Value
else
qry1Debe.Value := qry1DebeME.Value
end