Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Linha de Produto:

Microsiga Protheus

Segmento:

Varejo

Módulo:

SIGALOJA

Função:

LOJXFUNC, LOJANF, LOJA950 e UPDLO163.

Situação/Requisito:

O Venda Assistida considera operação interna/dentro do estado vendas onde é utilizado o conceito de retira, ou seja, a mercadoria é entregue ao consumidor no ato da venda. Para ser considerada operação interestadual seria necessário a utilização do conceito de venda com entrega, nesse caso é gerado o pedido de venda e a venda é finalizada no módulo de Faturamento. (conforme documentação TDN: DT_TUIRXM_DIFAL_NO_VAREJO(SIGALOJA)_PARA_CONSUMIDOR_FINAL)

Com o advento da legislação que trata a venda interestadual denominada DIFAL (diferencial de alíquota), nossos clientes de Varejo ficaram obrigados a utilizar o módulo do Faturamento para a emissão de nota fiscal interestadual, essa operação onerou a operação de Varejo.

Solução/Implementação:

O objetivo dessa ficha é disponibilizar a emissão de Nota Fiscal Interestadual no Venda Assistida, facilitando assim a operação de Varejo.

Referencias para a operação:

http://www.tdn.totvs.com/display/PROT/FIS0012_Emenda_Constitucional_87_2015

http://tdn.totvs.com/display/PROT/DT_MV_LJLBNT

http://tdn.totvs.com/display/PROT/DT_MV_LJINTUF

LJRETGUIA_Responsavel_por_manipular_as_perguntas_referentes_a_geracao_de_guia_de_DIFAL_e_FECP

Conversores e Parâmetros:

Executar o UPDATE u_UPDLO163, para a criação dos seguintes parâmetros:

MV_LJINTUF - Responsável por habilitar Venda Interestadual.(0 - Não, 1 - Sim)

MV_LJLBNT - Liberação de Geração de Nota.(0- Verificação Padrão, 1- Emissao de Nota para Pessoa Juridica, 2 - Emissão de Nota para Pessoa Fisica e Juridica)      

 

View file
nameTUXK67_et_sus_bra.pdf
height250

Importante

(Apenas para Microsiga Protheus, versões anteriores à versão 12)

...

User Function LJRETGUIA()

Local aRet           := {}
Local lDifal          := .T. //Imprime Guia DIFAL
Local lLancCont  := .T. //Define se o Lancamento Contabil e On-line
Local lFecpDi      := .T. //Imprimr Guia Fecp Difal

MsgInfo("Definindo variável de retorno com 3 posições, esperando dois possíveis resultados, sendo, 'SIM' e 'NAO'. ")

aRet := {IIF(lDifal         ,  "SIM",  "NAO"),;
              IIF(lLancCont ,  "SIM",  "NAO"),;
              IIF(lFecpDi     ,  "SIM",  "NAO")}

Return aRet

 

View filenameTUXK67_et_sus_bra.pdfheight250