Atualização da migration para carga do flash de contribuição.

This commit is contained in:
2026-05-13 14:54:01 -03:00
parent e537c11d80
commit b4651b491b
2 changed files with 895 additions and 29 deletions
@@ -130,7 +130,7 @@ BEGIN
FROM (SELECT /*+OPTIMIZER_FEATURES_ENABLE('10.2.0.4')*/
TO_DATE( Y.DTAENTRADASAIDA, 'DD/MM/RRRR' ) DTA,
V.NROEMPRESA,
E.NOMEFANTASIA AS NOMEEMPRESA,
E.FANTASIA AS NOMEEMPRESA,
V.NROSEGMENTO,
V.NRODIVISAO,
V.SEQPRODUTO,
@@ -139,8 +139,8 @@ BEGIN
CC1.SEQCATEGORIA AS SEQCATEGORIAN1,
CC1.CATEGORIA AS CATEGORIAN1,
( SELECT CC2.SEQCATEGORIA
FROM MAP_FAMDIVCATEG DC2
JOIN MAP_CATEGORIA CC2
FROM consinco.MAP_FAMDIVCATEG DC2
JOIN consinco.MAP_CATEGORIA CC2
ON CC2.SEQCATEGORIA = DC2.SEQCATEGORIA
AND CC2.STATUSCATEGOR in ('A', 'F')
AND CC2.NIVELHIERARQUIA = 2
@@ -151,8 +151,8 @@ BEGIN
AND DC2.STATUS in ('A', 'F')
) AS SEQCATEGORIAN2,
( SELECT CC2.CATEGORIA
FROM MAP_FAMDIVCATEG DC2
JOIN MAP_CATEGORIA CC2
FROM consinco.MAP_FAMDIVCATEG DC2
JOIN consinco.MAP_CATEGORIA CC2
ON CC2.SEQCATEGORIA = DC2.SEQCATEGORIA
AND CC2.STATUSCATEGOR in ('A', 'F')
AND CC2.NIVELHIERARQUIA = 2
@@ -163,8 +163,8 @@ BEGIN
AND DC2.STATUS in ('A', 'F')
) AS CATEGORIAN2,
( SELECT CC2.SEQCATEGORIA
FROM MAP_FAMDIVCATEG DC2
JOIN MAP_CATEGORIA CC2
FROM consinco.MAP_FAMDIVCATEG DC2
JOIN consinco.MAP_CATEGORIA CC2
ON CC2.SEQCATEGORIA = DC2.SEQCATEGORIA
AND CC2.STATUSCATEGOR = 'A'
AND CC2.NIVELHIERARQUIA = 3
@@ -175,8 +175,8 @@ BEGIN
AND DC2.STATUS = 'A'
) AS SEQCATEGORIAN3,
( SELECT CC2.CATEGORIA
FROM MAP_FAMDIVCATEG DC2
JOIN MAP_CATEGORIA CC2
FROM consinco.MAP_FAMDIVCATEG DC2
JOIN consinco.MAP_CATEGORIA CC2
ON CC2.SEQCATEGORIA = DC2.SEQCATEGORIA
AND CC2.STATUSCATEGOR = 'A'
AND CC2.NIVELHIERARQUIA = 3
@@ -187,8 +187,8 @@ BEGIN
AND DC2.STATUS = 'A'
) AS CATEGORIAN3,
( SELECT CC2.SEQCATEGORIA
FROM MAP_FAMDIVCATEG DC2
JOIN MAP_CATEGORIA CC2
FROM consinco.MAP_FAMDIVCATEG DC2
JOIN consinco.MAP_CATEGORIA CC2
ON CC2.SEQCATEGORIA = DC2.SEQCATEGORIA
AND CC2.STATUSCATEGOR = 'A'
AND CC2.NIVELHIERARQUIA = 4
@@ -199,8 +199,8 @@ BEGIN
AND DC2.STATUS = 'A'
) AS SEQCATEGORIAN4,
( SELECT CC2.CATEGORIA
FROM MAP_FAMDIVCATEG DC2
JOIN MAP_CATEGORIA CC2
FROM consinco.MAP_FAMDIVCATEG DC2
JOIN consinco.MAP_CATEGORIA CC2
ON CC2.SEQCATEGORIA = DC2.SEQCATEGORIA
AND CC2.STATUSCATEGOR = 'A'
AND CC2.NIVELHIERARQUIA = 4
@@ -211,8 +211,8 @@ BEGIN
AND DC2.STATUS = 'A'
) AS CATEGORIAN4,
( SELECT CC2.SEQCATEGORIA
FROM MAP_FAMDIVCATEG DC2
JOIN MAP_CATEGORIA CC2
FROM consinco.MAP_FAMDIVCATEG DC2
JOIN consinco.MAP_CATEGORIA CC2
ON CC2.SEQCATEGORIA = DC2.SEQCATEGORIA
AND CC2.STATUSCATEGOR = 'A'
AND CC2.NIVELHIERARQUIA = 5
@@ -223,8 +223,8 @@ BEGIN
AND DC2.STATUS = 'A'
) AS SEQCATEGORIAN5,
( SELECT CC2.CATEGORIA
FROM MAP_FAMDIVCATEG DC2
JOIN MAP_CATEGORIA CC2
FROM consinco.MAP_FAMDIVCATEG DC2
JOIN consinco.MAP_CATEGORIA CC2
ON CC2.SEQCATEGORIA = DC2.SEQCATEGORIA
AND CC2.STATUSCATEGOR = 'A'
AND CC2.NIVELHIERARQUIA = 5
@@ -357,24 +357,24 @@ BEGIN
, CAST( 0.0000 AS NUMBER(20,4)) AS VLRVENDA_ANO_ANT
, CAST( 0.0000 AS NUMBER(20,4)) AS VLRCONTRIB_ANO_ANT
, MAX(A.PROPQTDPRODUTOBASE) AS PROPQTDPRODUTOBASE
FROM MRL_CUSTODIA Y
JOIN MAXV_ABCDISTRIBBASE V ON Y.DTAENTRADASAIDA = V.DTAVDA
JOIN MAP_PRODUTO A ON A.SEQPRODUTO = V.SEQPRODUTO
JOIN MAP_PRODUTO PB ON PB.SEQPRODUTO = V.SEQPRODUTOCUSTO AND PB.SEQPRODUTO = Y.SEQPRODUTO
JOIN MAP_FAMDIVISAO D ON D.SEQFAMILIA = A.SEQFAMILIA AND D.NRODIVISAO = V.NRODIVISAO
JOIN MAP_FAMEMBALAGEM K ON K.SEQFAMILIA = A.SEQFAMILIA AND K.QTDEMBALAGEM = 1
JOIN MAX_EMPRESA E ON E.NROEMPRESA = V.NROEMPRESA AND Y.NROEMPRESA = NVL( E.NROEMPCUSTOABC, E.NROEMPRESA )
JOIN MAX_DIVISAO DV ON E.NRODIVISAO = DV.NRODIVISAO
JOIN MAP_FAMDIVCATEG DC ON DC.NRODIVISAO = D.NRODIVISAO AND DC.STATUS = 'A' AND DC.SEQFAMILIA = D.SEQFAMILIA
JOIN MAP_CATEGORIA CC1 ON CC1.SEQCATEGORIA = DC.SEQCATEGORIA AND CC1.STATUSCATEGOR in ('A', 'F') AND CC1.NIVELHIERARQUIA = 1 AND CC1.NRODIVISAO = DC.NRODIVISAO AND CC1.TIPCATEGORIA = 'M'
LEFT JOIN MAP_PRODACRESCCUSTORELAC PR ON PR.SEQPRODUTO = V.SEQPRODUTO AND PR.DTAMOVIMENTACAO = V.DTAVDA
FROM consinco.MRL_CUSTODIA Y
JOIN consinco.MAXV_ABCDISTRIBBASE V ON Y.DTAENTRADASAIDA = V.DTAVDA
JOIN consinco.MAP_PRODUTO A ON A.SEQPRODUTO = V.SEQPRODUTO
JOIN consinco.MAP_PRODUTO PB ON PB.SEQPRODUTO = V.SEQPRODUTOCUSTO AND PB.SEQPRODUTO = Y.SEQPRODUTO
JOIN consinco.MAP_FAMDIVISAO D ON D.SEQFAMILIA = A.SEQFAMILIA AND D.NRODIVISAO = V.NRODIVISAO
JOIN consinco.MAP_FAMEMBALAGEM K ON K.SEQFAMILIA = A.SEQFAMILIA AND K.QTDEMBALAGEM = 1
JOIN consinco.MAX_EMPRESA E ON E.NROEMPRESA = V.NROEMPRESA AND Y.NROEMPRESA = NVL( E.NROEMPCUSTOABC, E.NROEMPRESA )
JOIN consinco.MAX_DIVISAO DV ON E.NRODIVISAO = DV.NRODIVISAO
JOIN consinco.MAP_FAMDIVCATEG DC ON DC.NRODIVISAO = D.NRODIVISAO AND DC.STATUS = 'A' AND DC.SEQFAMILIA = D.SEQFAMILIA
JOIN consinco.MAP_CATEGORIA CC1 ON CC1.SEQCATEGORIA = DC.SEQCATEGORIA AND CC1.STATUSCATEGOR in ('A', 'F') AND CC1.NIVELHIERARQUIA = 1 AND CC1.NRODIVISAO = DC.NRODIVISAO AND CC1.TIPCATEGORIA = 'M'
LEFT JOIN consinco.MAP_PRODACRESCCUSTORELAC PR ON PR.SEQPRODUTO = V.SEQPRODUTO AND PR.DTAMOVIMENTACAO = V.DTAVDA
WHERE V.NROEMPRESA IN ( SELECT E.EMPRESA_ID FROM EMPRESA_PARAMETROS E WHERE E.PARTICIPA_FLASH = 1 )
AND V.NROSEGMENTO IN ( SELECT A.NROSEGMENTO FROM CONSINCO.MAD_SEGMENTO A WHERE A.STATUS = 'A' )
AND DECODE(V.TIPTABELA, 'S', V.CGOACMCOMPRAVENDA, V.ACMCOMPRAVENDA) IN ( 'S','I' )
AND V.DTAVDA BETWEEN p_data_inicial AND p_data_final
GROUP BY TO_DATE( Y.DTAENTRADASAIDA, 'DD/MM/RRRR' )
, V.NROEMPRESA
, E.NOMEFANTASIA
, E.FANTASIA
, V.NRODIVISAO
, V.NROSEGMENTO
, V.SEQPRODUTO