Tempo aproximado para leitura: 00:03:00 min
Dúvida
Como Gerar Vendas com Entrega Futura?
Observação: Recurso liberado no RC 63943.
Ambiente
Varejo Supermercados - Expedição - Todas as versões.
Solução
### Instruções para Configuração ###:
Cgo de emissão: Configurar um CGO para não gerar alteração de estoque. Nesse mesmo CGO deve-se marcar a opção 'Controla Remessa de Entrega Futura'. Vai habilitar um campo para informar o cgo .Colocar um CGO que gera alteração de estoque para que seja feito outro pedido de remessa futura com esse cgo parametrizado. Esse CGO será utilizado para montar os pedidos com entrega futura.
Cgo de recebimento. Marcar a opção 'Controla Remessa de Entrega Futura' do cgo utilizado no recebimento que terá suas quantidades direcionadas a atender os pedidos de remessa futura.
Adicionar uma nova crítica comercial de nome 'Remessa futura com Estoque'. Essa crítica irá barrar os pedidos feitos com o novo cgo configurado caso os mesmos tenham em algum de seus itens o estoque atendido maior que zero. O Script encontra-se abaixo, no final da documentação.
### Instruções para Utilização ###:
Ao digitar um pedido de venda com esse cgo configurado conforme descrito acima, deve-se colocar os itens que possuem estoque atendido zerado. Ao faturar esse pedido, o mesmo será clonado com o CGO parametrizado na opção 'Controla Remessa de Entrega Futura'.
Ao fazer um recebimento utilizando o cgo parametrizado como 'remessa de entrega futura', ao efetivar o estoque o mesmo será direcionado aos pedidos de venda feitos com o novo cgo parametrizado desde que seu estoque disponível fique maior que as quantidades vendidas.
Observação: Os estoques somente serão direcionados aos pedidos de venda quando atender totalmente a quantidade pedida, pois a nota já foi emitida para o cliente e não pode ser enviado quantidade menor do que o que foi pedido.
### Script da crítica ###
select a.nropedvenda,
a.nroempresa,
'Remessa Futura com Estoque' codcritica
from mad_pedvenda a,
mad_pedvendaitem b,
max_codgeraloper c
where a.nropedvenda = b.nropedvenda
and a.nroempresa = b.nroempresa
and a.codgeraloper = c.codgeraloper
and nvl(c.indremessaentregafutura, 'N') = 'S'
and fEstoqueDisponivelPedVenda(a.nroempresa, a.nropedvenda, b.seqproduto) > 0
group by a.nropedvenda,
a.nroempresa
0 Comentários