Nome do Campo: AD_NUNOTADEST
Desfrição do Campo: Nro.Único Dest.
Expressão:
#type.sql#
SELECT DISTINCT
RTRIM(REGEXP_REPLACE((LISTAGG(CASE WHEN V.NUNOTA = C.NUNOTA THEN NULL ELSE V.NUNOTA END,'-') WITHIN GROUP (ORDER BY V.NUNOTA) OVER ()),'([^-]*)(-\1)+($|-)','\1\3'),'-') AS NUNOTA_DEST
FROM
TGFVAR V LEFT OUTER JOIN TGFCAB C ON V.NUNOTAORIG = C.NUNOTA
WHERE
V.NUNOTAORIG = TGFCAB.NUNOTA
AND V.NUNOTA = (SELECT MAX(NUNOTA) FROM TGFVAR WHERE NUNOTAORIG = C.NUNOTA)
Nome do Campo: AD_NUMNOTADEST
Desfrição do Campo: Nro.Nota Dest.
Expressão:
#type.sql#
SELECT DISTINCT
RTRIM(REGEXP_REPLACE((LISTAGG((CASE WHEN (SELECT NUMNOTA FROM TGFCAB WHERE NUNOTA = V.NUNOTA) = C.NUMNOTA THEN NULL ELSE (SELECT NUMNOTA FROM TGFCAB WHERE NUNOTA = V.NUNOTA) END),'-') WITHIN GROUP (ORDER BY V.NUNOTA) OVER ()),'([^-]*)(-\1)+($|-)','\1\3'),'-') AS NUMNOTA_DEST
FROM
TGFVAR V LEFT OUTER JOIN TGFCAB C ON V.NUNOTAORIG = C.NUNOTA
WHERE
V.NUNOTAORIG = TGFCAB.NUNOTA
AND V.NUNOTA = (SELECT MAX(NUNOTA) FROM TGFVAR WHERE NUNOTAORIG = C.NUNOTA)
Atributos para ambos campos adicionais
Portal de Venda - Tipo Movimento Pedido de Venda
Portal de Venda - Tipo Movimento Nota de Venda
Nome do Campo: AD_QTDITEFATUR
Desfrição do Campo: Qtd. Itens Faturados
Expressão:
#type.sql#
SELECT
COUNT(ITE.QTDNEG) AS QTDNEG
FROM
TGFITE ITE INNER JOIN TGFPRO PRO ON ITE.CODPROD = PRO.CODPROD
WHERE

Bacana!
ResponderExcluir