Vendas com Entrega Futura (???)

[Marcos]

Olá a todos do fórum, gostaria de saber como é feito uma Venda com Mercadoria à Retirar? Como seria a maneira mais fácil de controlar isto em meu programa? Atualmente mantenho 2 campos com muitos espaços no DBF Iten das Vendas onde anoto (Retirou 3 dia 99/99/9999), (Retirou 2 dia 99/99/9999) e assim por diante, eu acho que isto está fazendo com que a minha rotina de venda demore muito quando está sendo executada por mais de 1 terminal, portanto gostaria de mudar isto, mas estou dependendo de sugestões, e sei que neste fórum não ficarei na mão, como vários membros já me ajudaram até aqui.
Abraços a todos.
Marcos.
Da Roça
daroca@terra.com.br

[gransoft]

ARAGUARI-MG, 11 de setembro de 2004.

Prezado Marcos,

Sugestão para o Aplicativo Fiscal:

- Cadastro de Mercadorias (que utilizará de vários outros Cadastros/Tabelas, como Unidades, Local, Marcas, Grupo, CT, CF, CST...)

- Cadastro de Cód. de Operações (Código, Descrição, Entrada/Saída):
1.01, Compras a Vista, "E"
1.02, Compras a Prazo, "E"
...
1.99, Outras Entradas, "E" (NÃO GERA CAIXA e nem C.PAGAR)
...
2.01, Venda a Vista, "S"
2.02, Venda a Prazo (30 Dias), "S"
...
2.10, Venda a Prazo (30/60/90/120 Dias), "S"
...
2.99, Outras Saídas, "S" (NÃO GERA CAIXA e nem C.RECEBER)

...
2.61, Venda a Vista c/Entrega Futura, SPACE(01) *
2.62, Venda a Prazo c/Entrega Futura, SPACE(01) *

- Cadastro de CFOP (Utilize "Ajuda" no Validador SINTEGRA)
... (Inclua APENAS o necessário, para evitar erros...)
1.102
2.102
...
5.102
6.202
...
5.117
6.117
...
5.922 ... Simples Faturamento p/Entrega Futura
6.922 ... Simples Faturamento p/Entrega Futura

Efetuando um Pedido de Venda c/Entrega Futura:
- Dados do Cliente
- Código de Operação: 2.61
- Faturamento (Nota Fiscal) com CFOP: 5.922
- Não há cálculo de Impostos
- Ao Liberar o Pedido, o Aplicativo NÃO EFETUARÁ A BAIXA NO ESTOQUE *

Na data EFETIVA da entrega:
- Dados do Cliente
- Código de Operação: 2.99 (Não gera Caixa e nem C.Receber)
- Faturamento (Nota Fiscal) com CFOP: 5.102
- Haverá cálculo de Impostos NORMALMENTE
- Ao Liberar o Pedido, o Aplicativo EFETUARÁ A BAIXA NO ESTOQUE *

Qualquer outro tipo de controle, deverá ser realizado com critérios EXTRA-Aplicativo Fiscal. Por exemplo:

- Se for RESERVAR a mercadoria, poderá ser emitido um Pedido que ficará PENDENTE com o total dos ítens, que fará uma "pré-baixa" no saldo do estoque, aguardando o FATURAMENTO. No computador, o saldo das mercadorias estará atualizado (pré-baixa), mas no estoque físico, as quantidades SERÃO maiores. É aí que o "bicho pega" ...

Reserva, devolução de Mercadorias e Entrega Futura são as maiores "encrencas" para controle de saldos físicos de estoques, e seus procedimentos deverão ser criteriosos, onde todos os funcionários envolvidos devem ser DEDICADOS.

Algumas Empresas procedem a um RATEIO entre os Funcionários, do valor das mercadorias que faltam após o Inventário. Ilegal ou não, NEM O DONO DA EMPRESA DEVE RETIRAR MERCADORIAS SEM UM PEDIDO. Assim mesmo, RADICAL. Caso contrário, melhor procurar outro emprego.

A propósito:
O SINTEGRA EXIGE o Registro de Inventário, Registro Tipo 74, no mês de Março, juntamente com a movimentação de Fevereiro. VERIFIQUE os SALDOS !!!

*Sobre o controle de "E", "S", " " e PENDENTES:

Código: Selecionar todos

   *
   SELECT ESTOQUE
   SET ORDER TO 1
   GOTO TOP
   SEEK CD(cCodMer)
   *
   WHILE .T.
      *
      HoraData()
      SETCOLOR(cCor4)
      Centro(24,"A G U A R D E  . . .")
      SETCOLOR(cCor0)
      *
      IF Trava_Reg(10)
         IF     cEntSai == "E"  && Entrada ...
            *
            REPLACE ENTRADA_P  WITH ENTRADA_P + nQtd
            REPLACE DATAENT_P  WITH CTOD(cDataLan)
            *
         ELSEIF cEntSai == "S"  && Saida ...
            *
            REPLACE SAIDA_P    WITH SAIDA_P + nQtd
            REPLACE DATASAI_P  WITH CTOD(cDataLan)
            *
         ELSEIF cEntSai == " "  && Saida 2.61, 2.62 ...
            *
         END
         *
         nEstAtual := 0.00
         nEstAtual := ((ESTANT + (ENTRADA + ENTRADA_P)) - (SAIDA + SAIDA_P))
         REPLACE ESTATUAL   WITH nEstAtual
         REPLACE DATAATUAL  WITH CTOD(cDataLan)
         *
       * COMMIT
       * UNLOCK  && CANCELA BLOQUEIO
         *
      ELSE
         Beep(1)
         HoraData()
         SETCOLOR(cCor5)
         Mensagem("*** NAO FOI POSSIVEL A ALTERACAO DESTE REGISTRO ***")
         cTentar := SPACE(01)
         SETCOLOR(cCor3)
         Centro(24,"DESEJA TENTAR ALTERAR ESTE REGISTRO NOVAMENTE  (S/N)? ")
         SETCOLOR(cCor2)
         SET CURSOR ON
         Confirma(24,COL(),@cTentar)
         SET CURSOR OFF
         IF     cTentar == "S"
            LOOP
         END
      END  && Trava_Reg(10)
      EXIT
   END  && WHILE .T.
   *
   COMMIT
   UNLOCK  && CANCELA BLOQUEIO
   *

Atenciosamente,
Janis Peters Grants.

http://www.gransoft.com.br
gransoft@zipmail.com.br

[ANDRIL]

Ola galera

Concordo plenamente com o colega Gransoft. Este tipo de venda é muito complicada.

Certa vez um cliente solicitou um modulo de controle de entrega futura e com possibilidade de controle de saldo caso o cliente não tivesse como receber toda a mercadoria. Já viu a encrenca... Comecei e logo depois desisti pois meu sistema é todo integrado com estoque on-line, controle de caixa e geração de titulos. Muito complicado...


Pensei por alguns instantes e decidi nao fazer pois se eu que estou tendo desenvolvendo estou com todas estas dificuldades imagina o cliente para utilização e integração com os demais módulos...

Se alguem tiver um modo mais simples de fazer gostaria que me avisasse.

Abraços a todos!

[rubens]

Olá pessoal...

O Tópico é antigo, mas preciso postar nele para não abrir outro tópíco... Estou com este problema em loja de materiais para construção... Tenho 05 clientes que estão me deixando doido com esse tópico e não sei o que fazer... pelo que andei pesquisando a melhor saída é a emissão de notas como simples remessa.. e depois na entrega do produto o faturamente propriamente dito... O que pega será o tanto de documento fiscal envolvido né.. Por que o cliente vem e compra 50 sacos de cimento e mais uns itens, daí vem pegar ou mandar entregar 05 sacos de cimento... tem que tiraru ma nota fiscal.. e assim por diante... vira um monte de lançamentos e históricos... porque não é só a questão fiscal tem também o controle interno de estoque do cliente... Criei uma opção de haver do cliente no programa... mas aí me deparei com a questão fiscal... e travou tudo aqui na cabeça... alguém tem mais alguma sugestão?

Rubens

[billy1943]

Antes do advento da NFE, o entendimento era o seguinte:

1. Emitia-se a Nota Fiscal de Venda para entrega futura, destacando-se ou não o ICMS em função do produto;
2. Caso o produto fosse abrangido pelo PIS/COFINS recolhia-se como tributado porque haveria ingresso financeiro;
3. Geravam-se a(s) fatura e as respectivas duplicatas para o recebimento;
4. Posteriormente emitia-se uma Nota Fiscal de remessa, sem nenhuma tributação, apenas para acompanhar a mercadoria, a cada vez que fosse enviado mercadoria constante da Nota inicial;
5. Podia-se fazer inúmeras Notas Fiscais de simples remessa, até fechar o valor e quantidades da nota "mãe" inicial;
6. Fazia-se menção nestas nota de remessa, o número, data e valor da Nota Fiscal de Venda emitida anteriormente;
7. Isto era muito usado nas destilarias de álcool, onde vendia-se para as distribuidoras e entregava-se nos postos de combustíveis, e cruzava-se a nota da distribuidora que era quem vendia para os referidos postos. Com isso, economizava-se frete.

Com a NFE, os CFOPs realmente dão muitas dúvidas.

[rubens]

Certo..
Ok.. na parte fiscal ficou bem explicadinho... vlw.. obg

Rubens

[sambomb]

Na parte do controle de estoque eu creio que seja simples também, vai ter o "quantidade atual" e o "quantidade reservada", para validação na loja é utilizada a soma dos dois, para a venda é utilizado o atual e para a entrega o reservado, assim cada situação da baixa/entrada em um estoque diferente.