Olá pessoal, alguém teria a query sql que gera o relatório matr550 analítico?
Olá pessoal, alguém teria a query sql que gera o relatório matr550 analítico?
algo assim:
BeginSql Alias cAliasQry SELECT F2_CLIENTE CLIFOR,F2_LOJA LOJA,F2_DOC DOC,F2_SERIE SERIE,F2_EMISSAO EMISSAO %Exp:cSelect% ,F2_MOEDA MOEDA,F2_TXMOEDA TXMOEDA,F2_TIPO TIPO,F2_ESPECIE ESPECIE ,F2_FRETE FRETE,F2_FRETAUT FRETAUT,F2_SEGURO SEGURO,F2_DESPESA DESPESA ,SA1.A1_NOME NOME,D2_DOC DOCITEM,D2_SERIE SERIEITEM,D2_CLIENTE CLIFORITEM,D2_LOJA LOJAITEM,D2_TIPO TIPOITEM ,D2_GRADE GRADE,D2_COD COD ,D2_QUANT QUANT ,D2_CF CF,D2_TES TES,D2_LOCAL ALMOX,D2_ITEMPV ITEMPV,D2_PEDIDO PEDIDO,D2_REMITO REMITO,D2_ITEMREM ITEMREM ,D2_PRCVEN PRCVEN,%Exp:cExpTot% ,D2_DESCON VALDESC,D2_ITEM ITEM, "2" TIPODOC %Exp:cCamposD2% FROM %Table:SF2% SF2, %Table:SD2% SD2, %Table:SA1% SA1 WHERE F2_FILIAL = %xFilial:SF2% AND F2_DOC >= %Exp:mv_par01% AND F2_DOC <= %Exp:mv_par02% AND F2_EMISSAO >= %Exp:DTOS(mv_par03)% AND F2_EMISSAO <= %Exp:DTOS(mv_par04)% AND %Exp:cIDWhere% AND F2_TIPO <> 'D' AND SF2.%notdel% AND SA1.A1_FILIAL = %xFilial:SA1% AND SA1.A1_COD = F2_CLIENTE AND SA1.A1_LOJA = F2_LOJA AND SA1.%notdel% AND D2_FILIAL = %xFilial:SD2% AND D2_CLIENTE = F2_CLIENTE AND D2_LOJA = F2_LOJA AND D2_DOC = F2_DOC AND D2_SERIE = F2_SERIE AND SD2.%notdel% %Exp:cWhereF2%
UNION ALL
SELECT F1_FORNECE CLIFOR,F1_LOJA LOJA,F1_DOC DOC,F1_SERIE SERIE,F1_DTDIGIT EMISSAO %Exp:cSelectUni% ,F1_MOEDA MOEDA,F1_TXMOEDA TXMOEDA,F1_TIPO TIPO,F1_ESPECIE ESPECIE ,F1_FRETE,0 FRETAUT,F1_SEGURO SEGURO,F1_DESPESA DESPESA ,SA1.A1_NOME NOME,D1_DOC DOCITEM,D1_SERIE SERIEITEM,D1_FORNECE CLIFORITEM,D1_LOJA LOJAITEM,D1_TIPO TIPOITEM ," " GRADE,D1_COD COD,D1_QUANT QUANT ,D1_CF CF,D1_TES TES,D1_LOCAL ALMOX,D1_ITEMPV ITEMPV,D1_NUMPV PEDIDO,D1_REMITO REMITO,D1_ITEMREM ITEMREM ,D1_VUNIT PRCVEN,D1_TOTAL TOTAL,0 VALADI,D1_VALDESC VALDESC,D1_ITEM ITEM, "1" TIPODOC %Exp:cCamposD1% FROM %Table:SF1% SF1, %Table:SD1% SD1, %Table:SA1% SA1 WHERE F1_FILIAL = %xFilial:SF1% AND F1_DOC >= %Exp:mv_par01% AND F1_DOC <= %Exp:mv_par02% AND F1_DTDIGIT >= %Exp:DtoS(mv_par03)% AND F1_DTDIGIT <= %Exp:DtoS(mv_par04)% AND %Exp:cIDWhereU% AND F1_TIPO = 'D' AND SF1.%notdel% AND SA1.A1_FILIAL = %xFilial:SA1% AND SA1.A1_COD = F1_FORNECE AND SA1.A1_LOJA=F1_LOJA AND SA1.%notdel% AND D1_FILIAL = %xFilial:SD1% AND D1_FORNECE = F1_FORNECE AND D1_LOJA = F1_LOJA AND D1_DOC = F1_DOC AND D1_SERIE = F1_SERIE AND SD1.%notdel% %Exp:cWhereF1%ORDER BY EMISSAO,TIPODOC,DOC,SERIE,COD,ITEM EndSql