Permissão de Vendas - Origem e Destino
Customização referente a restrição de vendas por UF - SK
Solicitante: Robledo Duarte / Kleber Teixeira
Analista: Jonathan Torioni
Objetivo
Essa documentação foi desenvolvida com o intuíto de formalizar a customização realizada.
Transcrição da solicitação
Boa tarde, Kleber.
Dando continuidade ao trabalho de redução de despesas com fretes nas filiais, criamos a tabela anexa que define as origens e destinos permitidos para a emissão de pedidos de vendas interestaduais.
Inicialmente, a ideia era bloquear as vendas restringindo as TES inteligentes no Protheus. No entanto, devido às amarrações do sistema, essas mudanças impactam outras rotinas, tornando essa opção inviável.
Como alternativa, pensamos em configurar o sistema para que as filiais visualizem apenas os destinos permitidos. Esse bloqueio deve abranger todas as operações, inclusive transferências.
Peço que avalie a viabilidade dessa solução ou, caso não seja possível, sugira uma alternativa exequível.
Sugestões de customização
Criar cadastro de restrições entre UF's (Simples)
- Manipular preço 50% maior
- Na validação do cliente identificar e bloquear a criação do pedido (Recomendado)
- Criar novo bloqueio com alçada
- Bloqueio de TES (Avaliar com o Fernando) **Maior impacto
A customização foi desenvolvida com o aceite da opção 2 (recomendada)
Fontes customizados
- skxfun.prw - Funções genéricas SK
- speca155.prw - Orçamento/remoto
- speca170.prw - Transferência empresa grupo
- speca175.prw - Pedido de vendas*
Funções customizadas
- U_ZP2CAD() - Axcadastro simples para permissão de vendas por UF
- U_ZP2VUF(_cFil, cUfCli, cCliente, cLoja, cTipo) - Validação de permissão de vendas por UF
- ZPUFFIL(_cFil) - Busca uf da filial do pedido
Parâmetros
- ES_RESTVEN [Lógico] - Ativa ou desativa a customização de restrição de venda por UF (DEFAULT .F. - CUSTOMIZAÇÃO DESATIVADA)
Tabela customizada
| X3_ARQUIVO | X3_CAMPO | X3_TIPO | X3_TAMANHO | X3_DECIMAL | X3_TITULO |
|---|---|---|---|---|---|
| ZP2 | ZP2_FILIAL | C | 2 | 0 | Filial |
| ZP2 | ZP2_UFORI | C | 2 | 0 | UF ORI FIL |
| ZP2 | ZP2_UFDEST | M | 10 | 0 | UF DESTINO |
Campo customizado
C5_LOJACLI - A modificação ocorreu no X3_VLDUSER
Antes: U_ShSc5Aval(.t.).AND.IF(U_ISPB().AND.CMODULO $"ESP|ESP1",U_SPECV010(),.T.)
Depois: U_ShSc5Aval(.t.).AND.IF(U_ISPB().AND.CMODULO $"ESP|ESP1",U_SPECV010(),.T.) .AND. U_ZP2VUF(cFilAnt,,M->C5_CLIENTE,M->C5_LOJACLI,M->C5_TIPO)
Menu cadastro permissão de venda x UF
