diff --git a/src/products/products.module.ts b/src/products/products.module.ts index e119478..dd2fef7 100644 --- a/src/products/products.module.ts +++ b/src/products/products.module.ts @@ -517,13 +517,15 @@ export default moduleFactory detalhe: (args) => { return { sql: /*sql*/ ` - select pemp.nroempresa, +select /*+ OPT_PARAM('_optim_peek_user_binds','FALSE') */ + pemp.nroempresa, tcomp.comprador, nvl(mff.fornecedor, 'N/A') fornecedor, consinco.gmgbfcategoriafamilian1(pro.seqfamilia, me.nrodivisao, 1) categoria, pro.seqproduto, initcap(pro.desccompleta) Descricao, nvl(mapi.urlecommerceimg,'') ImagemUrl, + case when trunc(case when pes2.precovalidpromoc > 0.00 then nvl(pes2.precovalidpromoc,0) when pes2.precovalidpromoc = 0.00 then nvl(pes2.precovalidnormal,0) @@ -559,18 +561,21 @@ export default moduleFactory else nvl(CONSINCO.GMGB_FN_BUSCAMARGEMPRODUTO_AT2(pemp.nroempresa,pemp.seqproduto),0) end MargemAtacado, + nvl(pemp.codclassifpreco,'Sem valor') ClasseAbastecimento, emb.embalagem DescricaoEmbalagem, trunc(nvl(emb.qtdembalagem,0)) QuantidadeEmbalagem, + case when pemp.nroempresa in (979, 980, 981) then trunc(nvl(pemp.estqdeposito - pemp.qtdreservadavda,0),3) - else trunc(nvl(pemp.estqloja,0), 3) - (NVL(pemp.qtdreservadavda,0)) + else trunc(nvl(pemp.estqloja,0), 3) - (NVL(pemp.qtdreservadavda,0)) end EstoqueDisponivel, NVL(pemp.estqtroca,0) EstoqueTroca, NVL(pemp.qtdpedrectransito,0) EstoqueTransito, pemp.qtdpendpedcompra EstoqueFuturo, - NVL(pemp.qtdreservadavda,0) + nvl(pemp.estqoutro,0) EstoqueReservado, --24/05/2024 - cfreitas - Inclu�do estqoutro para n�o ser necess�rio utilizar MADV_COMPOSICAORESERVASELINV + NVL(pemp.qtdreservadavda,0) + nvl(pemp.estqoutro,0) EstoqueReservado, + ROUND(nvl(case when NVL(pemp.medvdiaforapromoc, 0) = 0 then 0 when NVL(pemp.medvdiaforapromoc,0) > 0 then (nvl(case when me.nroempresa in (979, 980, 981) then trunc(nvl(pemp.estqdeposito,0), 3) else trunc(nvl(pemp.estqloja,0), 3) end,0) - NVL(pemp.qtdreservadavda,0) ) / trunc(nvl(pemp.medvdiaforapromoc,1),4) @@ -578,8 +583,10 @@ export default moduleFactory nvl(pemp.estqminimodv,0) DDVMinimo, nvl(pemp.estqmaximodv, 0) DDVMaximo, + + -- FIX 2: subquery de mlo_prodembwm substituido por LEFT JOIN (wm_fr) case - WHEN (select count(1) from mlo_prodembwm w where w.nroempresa = 979 and w.seqproduto = pemp.seqproduto and w.codlinhasepar = 'FR') > 0 THEN 'FRACIONADO' + WHEN wm_fr.seqproduto IS NOT NULL THEN 'FRACIONADO' when pemp.formaabastecimento = 'I' then 'ARMAZENAGEM' when pemp.formaabastecimento = 'C' then 'CROSS' when pemp.formaabastecimento = 'N' then 'CENTRAL-EDL' @@ -591,21 +598,27 @@ export default moduleFactory when pes.precovalidpromoc > 0.00 then 'PROMOCAO' when pes.precovalidpromoc = 0.00 then 'NORMAL' end Situacao, + pempcd.estqdeposito - nvl(pempcd.qtdreservadavda,0) EstoqueDisponivelCD, pempcd.qtdpendpedcompra EstoqueFuturoCD, consinco.gmgb_fn_busca_dtult_entrada(pemp.nroempresa,pemp.seqproduto) DATAULTIMAENTRADA, pemp.dtaultvenda DATAULTIMAVENDA, consinco.fmrl_custoprodempatual(pro.seqproduto, pemp.nroempresa, 'L') custoliquido, - CASE WHEN (select count(*) from mrl_prodempseg pest where pest.seqproduto = pemp.seqproduto and pest.nroempresa = pemp.nroempresa and pest.nrosegmento = seg.nrosegmento and pest.statusvenda = 'A' ) > 0 then 'A' ELSE 'I' end STATUSVENDA, - --case when (pemp.statuscompra='A') then 1 else 0 end STATUSCOMPRA, + + -- FIX 2: subquery de statusvenda substituido por LEFT JOIN (pest_chk) + CASE WHEN pest_chk.seqproduto IS NOT NULL THEN 'A' ELSE 'I' END STATUSVENDA, + pemp.statuscompra, - nvl((select min(qtdembalagem) from mrl_prodempseg where nroempresa=me.nroempresa and nrosegmento=me.nrosegmentoprinc and seqproduto=pro.seqproduto and statusvenda='A' and qtdembalagem>1), 1) QtdeAtacado, + + -- FIX 2: subquery de qtdeAtacado substituido por LEFT JOIN (atac) + nvl(atac.qtdemb_min, 1) QtdeAtacado, + nvl(pro.seqprodutobase,0) IdBase, + case when mfdv.indnegavariacentral = 'S' THEN 'TROCA FISICA' ELSE - case when mff.indindenizavaria = 'S' then case when (me.nroempresa >= 400 and me.nroempresa <=499) or (me.nroempresa >= 600 and me.nroempresa <= 699) then 'SEM TROCA' @@ -618,6 +631,7 @@ export default moduleFactory 'SEM TROCA' end END TIPOTROCA, + mfdv.padraoembcompra QUANTIDADECOMPRA, pemp.qtdreservadavda RESERVA, NVL(pro.pzovalidadedia, 0) VALIDADEDIAS, @@ -625,11 +639,13 @@ export default moduleFactory nvl(pes.precovalidpromoc,0) PrecoPromoc, nvl(pes.precovalidnormal,0) PrecoNormal, nvl(pes3.precovalidpromoc,0) PrecoMeuMambo, + case when pes3.precovalidpromoc > 0 then nvl(consinco.mbo_fn_buscamargemprodutoseg(pemp.nroempresa,pemp.seqproduto,15),0) else 0 end MargemMeuMambo, + nvl(consinco.mbo_fn_buscamargemprodutoseg(pemp.nroempresa,pemp.seqproduto,2,'S'),0) MargemNormal, trunc(nvl(pemp.medvdiapromoc,0),4) MdvPromoc, NVL(vncto.vlrprecovenctoprox,0) VLRPRECOVENCTOPROX, @@ -638,20 +654,20 @@ export default moduleFactory from max_divisao md inner join max_empresa me - on me.nrodivisao = md.nrodivisao +on me.nrodivisao = md.nrodivisao and me.nroempresa not in (104,200,291,298,910,911,920,930,931,940,980) and me.dtainiciomovestoque <= trunc(sysdate) and me.status = 'A' inner join mad_segmento seg - on md.nrodivisao = me.nrodivisao +on md.nrodivisao = me.nrodivisao and me.nrosegmentoprinc = seg.nrosegmento inner join mrl_produtoempresa pemp - on pemp.nroempresa = me.nroempresa +on pemp.nroempresa = me.nroempresa left join mrl_produtoempresa pempcd - on pempcd.seqproduto = pemp.seqproduto +on pempcd.seqproduto = pemp.seqproduto and pempcd.nroempresa in (979) left join map_classeabastec mcab @@ -660,43 +676,92 @@ and mcab.nroempresa = pemp.nroempresa and mcab.classeabastvlr = pemp.classeabastvlr inner join map_produto pro - on pro.seqproduto = pemp.seqproduto +on pro.seqproduto = pemp.seqproduto inner join map_famdivisao mfdv - on mfdv.seqfamilia = pro.seqfamilia +on mfdv.seqfamilia = pro.seqfamilia and mfdv.nrodivisao = me.nrodivisao inner join max_comprador mco - on mco.seqcomprador = mfdv.seqcomprador +on mco.seqcomprador = mfdv.seqcomprador left join tb_comprador tcomp - on tcomp.COMPRADOR = mco.comprador +on tcomp.COMPRADOR = mco.comprador left join map_produtoimagem mapi - on mapi.seqproduto = pro.seqproduto +on mapi.seqproduto = pro.seqproduto and mapi.indpricipal = 'S' inner join mrl_prodempseg pes - on pes.seqproduto = pemp.seqproduto +on pes.seqproduto = pemp.seqproduto and pes.nroempresa = pemp.nroempresa and pes.nrosegmento = seg.nrosegmento and pes.qtdembalagem = 1 -inner join mrl_prodempseg pes2 - on pes2.nroempresa = pes.nroempresa -and pes2.seqproduto = pes.seqproduto +-- FIX 1: pes2 materializado em inline view (elimina subquery correlacionado no WHERE) +inner join ( + select a.nroempresa, + a.seqproduto, + a.nrosegmento, + a.qtdembalagem, + a.precovalidpromoc, + a.precovalidnormal + from mrl_prodempseg a + where a.qtdembalagem = ( + select nvl(max(b.qtdembalagem), 1) + from mrl_prodempseg b + where b.nroempresa = a.nroempresa + and b.seqproduto = a.seqproduto + and b.nrosegmento = a.nrosegmento + and b.statusvenda = 'A' + ) +) pes2 +on pes2.nroempresa = pes.nroempresa +and pes2.seqproduto = pes.seqproduto and pes2.nrosegmento = pes.nrosegmento left join mrl_prodempseg pes3 - on pes3.seqproduto = pemp.seqproduto +on pes3.seqproduto = pemp.seqproduto and pes3.nroempresa = pemp.nroempresa and pes3.nrosegmento = 15 and pes3.qtdembalagem = 1 inner join map_famembalagem emb - on emb.seqfamilia = pro.seqfamilia +on emb.seqfamilia = pro.seqfamilia and emb.qtdembalagem = 1 +-- FIX 2a: substituir subquery correlacionado de mlo_prodembwm por LEFT JOIN +left join ( + select distinct seqproduto + from mlo_prodembwm + where nroempresa = 979 + and codlinhasepar = 'FR' +) wm_fr +on wm_fr.seqproduto = pemp.seqproduto + +-- FIX 2b: substituir subquery correlacionado de statusvenda por LEFT JOIN +left join ( + select distinct seqproduto, nroempresa, nrosegmento + from mrl_prodempseg + where statusvenda = 'A' +) pest_chk +on pest_chk.seqproduto = pemp.seqproduto +and pest_chk.nroempresa = pemp.nroempresa +and pest_chk.nrosegmento = seg.nrosegmento + +-- FIX 2c: substituir subquery correlacionado de qtdeAtacado por LEFT JOIN +left join ( + select nroempresa, nrosegmento, seqproduto, + min(qtdembalagem) qtdemb_min + from mrl_prodempseg + where statusvenda = 'A' + and qtdembalagem > 1 + group by nroempresa, nrosegmento, seqproduto +) atac +on atac.nroempresa = me.nroempresa +and atac.nrosegmento = me.nrosegmentoprinc +and atac.seqproduto = pro.seqproduto + left join (select mffTemp.Seqfamilia, mfdvTemp.Nrodivisao, mffTemp.indindenizavaria, @@ -715,7 +780,7 @@ left join (select mffTemp.Seqfamilia, and mffTemp.Principal = 'S' ) mff - on mff.seqfamilia = pro.seqfamilia +on mff.seqfamilia = pro.seqfamilia and mff.nrodivisao = md.nrodivisao left join (select pvencto.nroempresa, @@ -729,22 +794,13 @@ left join (select pvencto.nroempresa, group by pvencto.nroempresa, pvencto.seqproduto ) vncto - ON vncto.nroempresa = pemp.nroempresa +ON vncto.nroempresa = pemp.nroempresa and vncto.seqproduto = pemp.seqproduto where 1=1 ---and pemp.SEQPRODUTO = 136011 ---and pemp.nroempresa = 202 and md.nrodivisao in (2,4) and (${args.codproduto} is null or pemp.seqproduto = ${args.codproduto}) and (me.nroempresa in (${args.ctx_user_companies})) - -and pes2.qtdembalagem = (select nvl(max(pes3.qtdembalagem), 1) - from mrl_prodempseg pes3 - where pes3.nroempresa = pes.nroempresa - and pes3.seqproduto = pes.seqproduto - and pes3.nrosegmento = pes.nrosegmento - and pes3.statusvenda = 'A') `, }; },