01. DADOS GERAIS

Linha de Produto:TOTVS RENTAL
Segmento:Serviços
Módulo:SIGALOC
Função:

APPQueryresult

Ticket:Não há.
Story:

DSERLOCA-4098

02. SITUAÇÃO/REQUISITO

Criar API do Tipo Post (Regra tipo API Sync) para receber o Body com a informações do Resultado da Query

03. SOLUÇÃO

Foi criada a API no seguinte end point: /APPQueryresult

Parâmetros de entrada:

                 Parâmetros de entrada para Retornar (01) Quantidade de Multas, (02) Motoristas por Cliente, (03) Qtde de Notificação de Multas, (05) Qtde de Bens em Manutenção, (05) Qtde de Motoristas

Obrigatórios:

                Parâmetros de entrada para retornar os Serviços de Manutenção do Tipo Corretiva (06)              

Obrigatórios:

                

                  Parâmetros de entrada para retornar os Serviços de Manutenção do Tipo Corretiva (07)              

Obrigatórios:

                Parâmetros de entrada para retornar Notas de Retorno e seus respectivos títulos a pagar (08)              

Obrigatórios:

         

                Parâmetros de entrada para retornar Tabela de Preço de Compras por Fornecedor (09)              

Obrigatórios:

                Parâmetros de entrada para retornar a ultima AS, o ulitmo Projeto e Obra da FQ4 (10)              

Obrigatórios:



Request:


Para execução da Query 01

{
   "cnpj_empresa":"53485215000106",
   "cod_query":"01",
   "cod_cli":"000094",
   "loj_cli":"01"
 }


Para execução da Query 02

{
   "cnpj_empresa":"53485215000106",
   "cod_query":"02",
   "cod_cli":"000094",
   "loj_cli":"01"
 }


Para execução da Query 03

{
   "cnpj_empresa":"53485215000106",
   "cod_query":"03",
   "cod_cli":"000094",
   "loj_cli":"01"
 }


Para execução da Query 04

{
   "cnpj_empresa":"53485215000106",
   "cod_query":"04",
   "cod_cli":"000094",
   "loj_cli":"01"
 }


Para execução da Query 05

{
   "cnpj_empresa":"53485215000106",
   "cod_query":"05",
   "cod_cli":"000094",
   "loj_cli":"01"
 }


Para execução da Query 06

{
   "cnpj_empresa":"53485215000106",
   "cod_query":"05",
   "cod_cli":"",
   "loj_cli":""
 }


Para execução da Query 07

{  
  "cnpj_empresa":"53485215000106",
  "cod_query":"07",
  "cod_bem":"0000000002",
  "placa":"EEEEEEEE" 


Para execução da Query 08

{
   "cnpj_empresa":"53485215000106",
   "cod_query":"08",
   "cod_for":"000006",
   "loj_for":"01",
   "dtini":"20160101",
   "dtfim":"20251231"
 }


Para execução da Query 09

{
   "cnpj_empresa":"53485215000106",
   "cod_query":"09",
   "cod_for":"000006",
   "loj_for":"01"
 }


Para execução da Query 10

{  
  "cnpj_empresa":"53485215000106",
  "cod_query":"10",
  "cod_bem":"0000000002",




Retorno esperado:
Response:

cod_query = 01

{
   "Retorno": "OK",
   "Dados": [   {
      "TRX_NOME": "MOTORISTA SIGALOC",
      "MULTAS": 1
   }]
}

cod_query = 02

{
   "Retorno": "OK",
   "Dados":    [
            {
         "DA4_COD": "LOC001",
         "DA4_NOME": "DENNIS3",
         "DA4_CGC": "12345678901",
         "DA4_NUMCNH": "1234567890"
      },
            {
         "DA4_COD": "LOC005",
         "DA4_NOME": "DENNIS1",
         "DA4_CGC": "12345678901",
         "DA4_NUMCNH": "1234567890"
      },
            {
         "DA4_COD": "LOC004",
         "DA4_NOME": "DENNIS2",
         "DA4_CGC": "12345678901",
         "DA4_NUMCNH": "1234567890"
      }
   ]
}


cod_query = 03

{
   "Retorno": "OK",
   "Dados": [   {
      "TRX_NOME": "MOTORISTA SIGALOC",
      "QTDE_NOTIFICACOES_MULTAS": 1
   }]
}


cod_query = 04

{
   "Retorno": "OK",
   "Dados": [{"QTDE_BENS_MANUTENCAO": 1}]
}


cod_query = 05

{
   "Retorno": "OK",
   "Dados": [{"QTDE_MOTORISTAS": 4}]
}


cod_query = 06

{
   "Retorno": "OK",
   "Dados":    [
            {
         "T4_SERVICO": "ELEINS",
         "T4_NOME": "INSPECAO DE PECAS ELETRICAS",
         "TE_CARACTE": "C"
      },
            {
         "T4_SERVICO": "ELESUB",
         "T4_NOME": "SUBSTITICAO DE PECAS ELETRICAS",
         "TE_CARACTE": "C"
      },
            {
         "T4_SERVICO": "MECANI",
         "T4_NOME": "SERVICO MECANICO",
         "TE_CARACTE": "C"
      },
            {
         "T4_SERVICO": "CORMNT",
         "T4_NOME": "CORRETIVA PADRAO MNT",
         "TE_CARACTE": "C"

}


cod_query = 07

{
   "Retorno": "OK",
   "Dados": [   {
      "T9_FILIAL": "D MG 01",
      "T9_CODBEM": "0000000002",
      "T9_NOME": "ATIVO 0000000002",
      "T9_PLACA": "EEEEEEEE",
      "T9_CODFAMI": "FAM01",
      "T6_NOME": "FAMILIA DE BENS 01"
   }]
}


cod_query = 08

{
   "Retorno": "OK",
   "Dados":    [
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 380.74,
         "EMISS_NOTA": "",
         "NUM_TITU": "FN430_002",
         "EMISS_TIT": "20230807",
         "PARCELA": "",
         "PREV_PAGTO": "20230807",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 500,
         "EMISS_NOTA": "",
         "NUM_TITU": "FINA05001",
         "EMISS_TIT": "20160108",
         "PARCELA": "",
         "PREV_PAGTO": "20160108",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 808.12,
         "EMISS_NOTA": "",
         "NUM_TITU": "FN430_007",
         "EMISS_TIT": "20230807",
         "PARCELA": "",
         "PREV_PAGTO": "20230807",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 985,
         "EMISS_NOTA": "",
         "NUM_TITU": "FINR15006",
         "EMISS_TIT": "20160511",
         "PARCELA": "",
         "PREV_PAGTO": "20160511",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 1000,
         "EMISS_NOTA": "",
         "NUM_TITU": "FINR72101",
         "EMISS_TIT": "20161205",
         "PARCELA": "",
         "PREV_PAGTO": "20161205",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 1000,
         "EMISS_NOTA": "",
         "NUM_TITU": "FINA24001",
         "EMISS_TIT": "20220317",
         "PARCELA": "1",
         "PREV_PAGTO": "20220317",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 1500,
         "EMISS_NOTA": "",
         "NUM_TITU": "FINA05001",
         "EMISS_TIT": "20210908",
         "PARCELA": "1",
         "PREV_PAGTO": "20210909",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 1970,
         "EMISS_NOTA": "",
         "NUM_TITU": "FINR15007",
         "EMISS_TIT": "20160511",
         "PARCELA": "",
         "PREV_PAGTO": "20160511",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 4443.52,
         "EMISS_NOTA": "",
         "NUM_TITU": "FN430_003",
         "EMISS_TIT": "20230807",
         "PARCELA": "",
         "PREV_PAGTO": "20230807",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 5890,
         "EMISS_NOTA": "",
         "NUM_TITU": "FN430_013",
         "EMISS_TIT": "20230807",
         "PARCELA": "",
         "PREV_PAGTO": "20230807",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 9570,
         "EMISS_NOTA": "",
         "NUM_TITU": "FN430_012",
         "EMISS_TIT": "20230807",
         "PARCELA": "",
         "PREV_PAGTO": "20230807",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 12000,
         "EMISS_NOTA": "",
         "NUM_TITU": "ADT002",
         "EMISS_TIT": "20220315",
         "PARCELA": "",
         "PREV_PAGTO": "20220315",
         "PAGO_EM": "20220315"
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 15075,
         "EMISS_NOTA": "",
         "NUM_TITU": "FN430_001",
         "EMISS_TIT": "20230807",
         "PARCELA": "",
         "PREV_PAGTO": "20230807",
         "PAGO_EM": ""
      },
            {
         "NOTA": "",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 25000,
         "EMISS_NOTA": "",
         "NUM_TITU": "CTWEB0015",
         "EMISS_TIT": "20220506",
         "PARCELA": "",
         "PREV_PAGTO": "20220506",
         "PAGO_EM": ""
      },
            {
         "NOTA": "000018400",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 26701.4,
         "EMISS_NOTA": "20241112",
         "NUM_TITU": "000018400",
         "EMISS_TIT": "20241112",
         "PARCELA": "",
         "PREV_PAGTO": "20241112",
         "PAGO_EM": ""
      },
            {
         "NOTA": "244400",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 100,
         "EMISS_NOTA": "20200324",
         "NUM_TITU": "244400",
         "EMISS_TIT": "20200324",
         "PARCELA": "",
         "PREV_PAGTO": "20200324",
         "PAGO_EM": ""
      },
            {
         "NOTA": "COMTIR001",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 200,
         "EMISS_NOTA": "20200324",
         "NUM_TITU": "COMTIR001",
         "EMISS_TIT": "20200324",
         "PARCELA": "",
         "PREV_PAGTO": "20200324",
         "PAGO_EM": ""
      },
            {
         "NOTA": "EST191001",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 5,
         "EMISS_NOTA": "20191001",
         "NUM_TITU": "EST191001",
         "EMISS_TIT": "20191001",
         "PARCELA": "",
         "PREV_PAGTO": "20191001",
         "PAGO_EM": ""
      },
            {
         "NOTA": "F0308K",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 150000,
         "EMISS_NOTA": "20220315",
         "NUM_TITU": "F0308K",
         "EMISS_TIT": "20220315",
         "PARCELA": "",
         "PREV_PAGTO": "20220315",
         "PAGO_EM": "20220315"
      },
            {
         "NOTA": "FIN91D",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 1500,
         "EMISS_NOTA": "20210331",
         "NUM_TITU": "FIN91D",
         "EMISS_TIT": "20210331",
         "PARCELA": "",
         "PREV_PAGTO": "20210331",
         "PAGO_EM": ""
      },
            {
         "NOTA": "FIN91F",
         "OS": "",
         "PED_COMPRA": "",
         "VLR_TOTAL": 8000,
         "EMISS_NOTA": "20210331",
         "NUM_TITU": "FIN91F",
         "EMISS_TIT": "20210331",
         "PARCELA": "",
         "PREV_PAGTO": "20210331",
         "PAGO_EM": ""
      },
            {
         "NOTA": "TESTE",
         "OS": "002249",
         "PED_COMPRA": "TSUBA0",
         "VLR_TOTAL": 100,
         "EMISS_NOTA": "20250625",
         "NUM_TITU": "TESTE",
         "EMISS_TIT": "20250625",
         "PARCELA": "",
         "PREV_PAGTO": "20250625",
         "PAGO_EM": ""
      },
            {
         "NOTA": "TESTE2",
         "OS": "002251",
         "PED_COMPRA": "TSUB95",
         "VLR_TOTAL": 1500,
         "EMISS_NOTA": "20250625",
         "NUM_TITU": "TESTE2",
         "EMISS_TIT": "20250625",
         "PARCELA": "",
         "PREV_PAGTO": "20250625",
         "PAGO_EM": ""
      }
   ]
}                                                                                         


cod_query = 09

{
   "Retorno": "OK",
   "Dados":    [
            {
         "AIA_DATATE": "20491231",
         "AIB_CODFOR": "COM002",
         "AIB_LOJFOR": "01",
         "AIB_CODPRO": "COM00000000000000000000000PA03",
         "B1_DESC": "PRODUTO PA COMPRAS 003-TABELA",
         "B1_UM": "UN",
         "AIB_PRCCOM": 3.5,
         "AIB_CODTAB": "002",
         "AIB_ITEM": "0001"
      },
            {
         "AIA_DATATE": "20491231",
         "AIB_CODFOR": "COM002",
         "AIB_LOJFOR": "01",
         "AIB_CODPRO": "COM00000000000000000000000MP01",
         "B1_DESC": "PRODUTO MP COMPRAS 001",
         "B1_UM": "KG",
         "AIB_PRCCOM": 2.35,
         "AIB_CODTAB": "002",
         "AIB_ITEM": "0002"
      }
   ]
}


cod_query = 10

{
   "Retorno": "OK",
   "Dados": [   {
      "FQ4_FILIAL": "",
      "FQ4_CODBEM": "174LOC",
      "FQ4_NOME": "174LOC",
      "FQ4_STATUS": "L2",
      "FQ4_CODFAM": "001LOC",
      "FQ4_DESTAT": "NF DE REMESSA GERADA",
      "FQ4_TIPMOD": "",
      "FQ4_FABRIC": "",
      "FQ4_SUBLOC": "N",
      "FQ4_POSCON": 100000,
      "FQ4_CENTRA": "",
      "FQ4_NOMTRA": "",
      "FQ4_DOCUME": "000000347",
      "FQ4_SERIE": "",
      "FQ4_OS": "",
      "FQ4_SERVIC": "",
      "FQ4_TPSERV": "CHECKLIST SAIDA",
      "FQ4_PRELIB": "310725",
      "FQ4_PROJET": "202500319",
      "FQ4_OBRA": "Obr",
      "FQ4_AS": "AS002",
      "FQ4_CODCLI": "",
      "FQ4_NOMCLI": "",
      "FQ4_NFREM": "",
      "FQ4_SERREM": "",
      "FQ4_CODMUN": "39806",
      "FQ4_MUNIC": "POA",
      "FQ4_EST": "SP",
      "FQ4_DTINI": "",
      "FQ4_DTFIM": "",
      "FQ4_PREDES": "",
      "FQ4_LOG": "BEM 174LOC - 174LOC - STATUS: L1-CONTRATO GERADO - CHECKLIST - CONTRATO: 202500319 - OBRA: Obr - STATUS ATUAL: L2-NF DE REMESSA GERADA -  -   /  /    -",
      "FQ4_STSOLD": "L1",
      "FQ4_LOJCLI": "",
      "FQ4_SEQ": "001629",
      "R_E_C_N_O_": 300,
      "R_E_C_D_E_L_": 0
   }]
}

04. DEMAIS INFORMAÇÕES

Para saber as queries que são executadas no app, seguem abaixo com seus respectivos códigos:

cod 01
      SELECT TRX_NOME, COUNT(*) MULTAS
      FROM xEmp('TRX') TRX
      INNER JOIN xEmp('FP0') FP0
        ON FP0_FILIAL = xFilial('FP0')
        AND FP0.D_E_L_E_T_ = ' '
        AND FP0_CLI = '${CLIENT_ID}'
        AND FP0_LOJA = '${CLIENT_LOJA}'
      INNER JOIN xEmp('FPA') FPA
        ON FPA_FILIAL = xFilial('FPA')
        AND FPA_PROJET = FP0_PROJET
        AND FPA.D_E_L_E_T_ = ' '
        AND FPA_AS <> ''
      WHERE TRX_FILIAL = xFilial('TRX')
        AND TRX_AS = FPA_AS

        AND TRX_TPMULT = 'TRANSITO'
        AND TRX.D_E_L_E_T_ = ' '
      GROUP BY TRX_NOME
      ORDER BY TRX_NOME

cod 02
SELECT DA4_COD,DA4_NOME,DA4_CGC,DA4_NUMCNH 
FROM "+RETSQLNAME("DA4")+" DA4 " 
WHERE DA4_FILIAL = '" + xFilial('DA4') + "' "
AND DA4_CODCLI  = '"+cCli+"' "
AND DA4_LOJCLI = '"+cLoja+"' "  
AND DA4.D_E_L_E_T_ = ' ' "

cod03
SELECT COUNT(*) AS QTDE_NOTIFICACOES_MULTAS
      FROM xEmp('TRX') TRX
      INNER JOIN xEmp('FP0') FP0
        ON FP0_FILIAL = xFilial('FP0')
        AND FP0.D_E_L_E_T_ = ' '
        AND FP0_CLI = '${CLIENT_ID}'
        AND FP0_LOJA = '${CLIENT_LOJA}'
      INNER JOIN xEmp('FPA') FPA
        ON FPA_FILIAL = xFilial('FPA')
        AND FPA_PROJET = FP0_PROJET
        AND FPA.D_E_L_E_T_ = ' '
        AND FPA_AS <> ''

      AND TRX_TPMULT = 'NOTIFICACAO'

      WHERE TRX_FILIAL = xFilial('TRX')
        AND TRX_AS = FPA_AS
        AND TRX.D_E_L_E_T_ = ' '

cod04
SELECT COUNT(*) AS QTDE_BENS_MANUTENCAO
      FROM xEmp('FQF') FQF
      INNER JOIN xEmp('FP0') FP0
        ON FP0_FILIAL = xFilial('FP0')
        AND FQF_PROJET = FP0_PROJET
        AND FP0.D_E_L_E_T_ = ' '
        AND FP0_CLI = '${CLIENT_ID}'
        AND FP0_LOJA = '${CLIENT_LOJA}'
      INNER JOIN xEmp('FQE') FQE
        ON FQE_FILIAL = xFilial('FQE')
        AND FQE_CODIGO = FQF_SUBST
        AND FQE.D_E_L_E_T_ = ' '
      WHERE FQF_FILIAL = ' '
        AND FQF_OS <> ''
        AND FQF_DPRFIM = ''
        AND FQF.D_E_L_E_T_ = ' '

cod05
SELECT COUNT(*) AS QTDE_MOTORISTAS
      FROM xEmp('DA4') DA4
      WHERE DA4_FILIAL = xFilial('DA4')
        AND DA4_CODCLI = '${CLIENT_ID}'
        AND DA4_LOJCLI = '${CLIENT_LOJA}'
        AND DA4.D_E_L_E_T_ = ' '

cod06

SELECT T4_SERVICO, T4_NOME,TE_CARACTE "
FROM "+RETSQLNAME("ST4")+" ST4 " 
INNER JOIN "+RetSqlName("STE")+" STE ON TE_TIPOMAN = T4_TIPOMAN AND STE.D_E_L_E_T_ = ' ' AND TE_CARACTE = 'C' "
WHERE T4_FILIAL = '" + xFilial('ST4') + "' "
AND ST4.D_E_L_E_T_ = ' ' "

cod06

    cQuery := "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME  "
    cQuery += "FROM "+RETSQLNAME("ST9")+" ST9 " 
    cQuery += "INNER JOIN "+RetSqlName("ST6")+" ST6 ON T6_CODFAMI = T9_CODFAMI AND ST6.D_E_L_E_T_ = '' "
    cQuery += "WHERE T9_FILIAL = '" + xFilial('ST9') + "' "
    If !Empty(cPlaca)
        cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
    EndIf    
    If !Empty(cBem)
        cQuery += "AND T9_CODBEM = '" + cBem + "' "
    EndIf        
    cQuery += "AND ST9.D_E_L_E_T_ = ' ' "
EndIf 


cod07

    cQuery := "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME  "
    cQuery += "FROM "+RETSQLNAME("ST9")+" ST9 " 
    cQuery += "INNER JOIN "+RetSqlName("ST6")+" ST6 ON T6_CODFAMI = T9_CODFAMI AND ST6.D_E_L_E_T_ = '' "
    cQuery += "WHERE T9_FILIAL = '" + xFilial('ST9') + "' "
    If !Empty(cPlaca)
        cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
    EndIf    
    If !Empty(cBem)
        cQuery += "AND T9_CODBEM = '" + cBem + "' "
    EndIf        
    cQuery += "AND ST9.D_E_L_E_T_ = ' ' "


cod08

    cQuery := "SELECT SF1.F1_DOC NOTA,  "
    cQuery += "MAX(FH1.FH1_ORDEM) OS,  "
    cQuery += "MAX(FH1.FH1_PEDCOM) PED_COMPRA,  "
    cQuery += "SE2.E2_VALOR VLR_TOTAL,  "
    cQuery += "MAX(SF1.F1_EMISSAO) EMISS_NOTA, SE2.E2_NUM NUM_TITU,  "
    cQuery += "MAX(SE2.E2_EMISSAO) EMISS_TIT,  "
    cQuery += "(SE2.E2_PARCELA) PARCELA,  "
    cQuery += "MAX(SE2.E2_VENCREA) PREV_PAGTO,  "
    cQuery += "MAX(SE2.E2_BAIXA) PAGO_EM  "
    cQuery += "FROM "+RETSQLNAME("SE2")+" SE2 "
    cQuery += "LEFT JOIN "+RetSqlName("SD1")+" SD1 ON SD1.D1_FILIAL = SE2.E2_FILIAL "
    cQuery += "AND SD1.D1_DOC = SE2.E2_NUM AND SD1.D_E_L_E_T_ = ''  "
    cQuery += "AND SD1.D1_FORNECE = SE2.E2_FORNECE AND SD1.D1_LOJA = SE2.E2_LOJA "
    cQuery += "LEFT JOIN "+RetSqlName("SF1")+" SF1 ON SF1.F1_FILIAL = SD1.D1_FILIAL  "
    //cQuery += "AND SF1.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' AND SF1.F1_FORNECE = '"+cCodFor+"' AND SF1.F1_LOJA = '"+cLojFor+"' "
    cQuery += "AND SF1.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' "
    cQuery += "LEFT JOIN "+RetSqlName("FH1")+" FH1 ON FH1.FH1_FILIAL = SD1.D1_FILIAL   "
    cQuery += "AND FH1.FH1_PEDCOM = SD1.D1_PEDIDO AND FH1.FH1_CODIGO = SD1.D1_COD AND FH1.D_E_L_E_T_ = '' "
    cQuery += "WHERE SE2.E2_FILIAL = '" + xFilial('SE2') + "' AND SE2.D_E_L_E_T_ = '' "
    cQuery += "AND SE2.E2_FORNECE = '"+cCodFor+"' AND SE2.E2_LOJA = '"+cLojFor+"' "
    cQuery += "AND SE2.E2_EMISSAO >= '"+cdtini+"' AND SE2.E2_EMISSAO <= '"+cdtfim+"' "
    cQuery += "GROUP BY SF1.F1_DOC,SE2.E2_VALOR,SE2.E2_PARCELA,SE2.E2_NUM "

cod09

    cQuery := "SELECT AIA_DATATE,AIB.AIB_CODFOR,AIB.AIB_LOJFOR, AIB.AIB_CODPRO,  "
    cQuery += "SB1.B1_DESC, SB1.B1_UM,AIB.AIB_PRCCOM,AIB_CODTAB, AIB.AIB_ITEM  "
    cQuery += "FROM "+RETSQLNAME("AIA")+" AIA " 
    cQuery += "INNER JOIN "+RetSqlName("AIB")+" AIB ON AIA.AIA_CODTAB = AIB.AIB_CODTAB "
    cQuery += "AND AIA.AIA_FILIAL = AIB.AIB_FILIAL AND  AIB.AIB_FILIAL = '" + xFilial('AIB') + "' AND AIB.D_E_L_E_T_ = '' "
    cQuery += "AND AIB.AIB_CODFOR = '"+cCodFor+"' AND AIB.AIB_LOJFOR = '"+cLojFor+"' AND AIB.D_E_L_E_T_ = '' "
    cQuery += "INNER JOIN "+RetSqlName("SB1")+" SB1 ON AIB.AIB_CODPRO = SB1.B1_COD "
    cQuery += "AND SB1.B1_FILIAL = '" + xFilial('SB1') + "'AND SB1.D_E_L_E_T_ = ''  "
    cQuery += "WHERE AIA.AIA_FILIAL = '" + xFilial('AIA') + "' AND AIA.D_E_L_E_T_ = '' "
    cQuery += "AND AIA.AIA_DATATE >= '"+DTOS(dDataBase)+"' "
    cQuery += "ORDER BY AIB.AIB_CODTAB "

cod10

    cQuer := "SELECT *  "
    cQuer += "FROM "+RETSQLNAME("FQ4")+" FQ41 "
    cQuer += "WHERE FQ41.FQ4_FILIAL = '" + xFilial('FQ4') + "' AND FQ41.D_E_L_E_T_ = '' "
    cQuer += "AND FQ41.R_E_C_N_O_ = '"+str(TRBFQ4->RECNO)+"' "

05. ASSUNTOS RELACIONADOS

Apps RENTAL