Histórico da Página
Ponto de Entrada - LjRAQryO
Este Ponto de Entrada é executado na rotina LJRetailApp , para considerar a query do cliente para ser executada e enviar os dados das vendas.
Descrição: | Miscelânea\RetailApp | |||||||||
Eventos: | Integração Protheus x RetailApp | |||||||||
Programa Fonte: | LJRetailApp | |||||||||
Função: | Protheus | |||||||||
Parâmetos: |
| |||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function LjRAQryO()
Local aArea := GetArea()
Local cDtIni:= ParamIxb[1]
Local cFiliais:= ParamIxb[2]
Local cQuery := ""
cQuery := "SELECT SUM(D2_DESCON) D2DESCON, D2_DOC, D2_SERIE, D2_COD, SUM(D2_QUANT) QTDE, SUM(D2_TOTAL) TOTAL, D2_EMISSAO, F2_HORA, D2_FILIAL, F2_VEND1, D2_GRUPO, D2_CLIENTE, D2_LOJA, 'SD2' ALIAS"
cQuery += " FROM " + RetSqlName('SD2') + " SD2"
cQuery += " INNER JOIN " + RetSqlName('SF2') + " SF2 ON "
cQuery += " SD2.D2_FILIAL = SF2.F2_FILIAL AND SD2.D2_DOC = SF2.F2_DOC AND SD2.D2_SERIE = SF2.F2_SERIE AND SD2.D2_CLIENTE = SF2.F2_CLIENTE AND SD2.D2_LOJA = SF2.F2_LOJA"
cQuery += " WHERE "
cQuery += " SD2.D2_FILIAL IN (" + cFiliais + ") AND "
cQuery += " SD2.D2_DOC <> ' ' AND SD2.D2_EMISSAO >= '" + cBeginDate + "' AND SD2.D2_TES IN ('501') AND "
cQuery += " SD2.D2_TIPO = 'N' AND SD2.D_E_L_E_T_ = ' ' AND SF2.D_E_L_E_T_ = ' ' "
cQuery += " GROUP BY D2_DOC, D2_SERIE, D2_COD, D2_EMISSAO, F2_HORA, D2_FILIAL, F2_VEND1, D2_GRUPO, D2_CLIENTE, D2_LOJA "
RestArea(aArea)
Return cQuery