por hudson » 28 Dez 2019 11:54
Bom dia.
Consegui montar uma consulta (query) com Mysql/HarbourMinigui 2.44.
Ficou assim:
vQuery := oServer:Query( "select itemnfce.CbdcProd, itemnfce.CbdcEAN, itemnfce.CbdxProd, itemnfce.CbdnItem, itemnfce.CbdxProd, itemnfce.CbdNCM, itemnfce.CbdqCOM, itemnfce.CbdvUnCom,itemnfce.CbdUCom, itemnfce.CbdvDesc, itemnfce.cbdvoutro_item, itemnfce.CbdCFOP, itemnfce.CbdvAliq, itemnfce.cbdcsittrib, itemnfce.DESCONTO, itemnfce.aliqnac, itemnfce.aliqimp, itemnfce.aliqest, itemnfce.CEST, itemnfce.CSTPIS, itemnfce.CSTCOFINS," +;
" nfce.Cbdntfnumero,nfce.Cbdntfserie, nfce.CbdvProd_ttlnfe, nfce.CbdvNF, nfce.CbddEmi, nfce.desc1, nfce.CbdvOutro, nfce.CbdvDesc_ttlnfe, nfce.CbdvServ, nfce.Cbdxnome_dest, nfce.CbdCNPJ_dest, nfce.cbdvfor, nfce.CbdvOutro, nfce.CbdStatus, nfce.aliqnac, nfce.aliqimp, nfce.aliqest, nfce.CHAVE, nfce.AUTORIZACAO" +;
" from itemnfce , nfce " +;
" where nfce.cbddemi >= '2019/12/01' and nfce.cbddemi <= '2019/12/31' " +;
" and itemnfce.cbdntfnumero = nfce.cbdntfnumero " )
Testei e está funcionando.
Espero ajudar a iniciantes.