VENDA DE VALE PRESENTE COMO VALE CRÉDITO NO TOTVSPDV
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Varejo | ||||||||
Módulo: | SIGAFRT | ||||||||
Rotina: |
| ||||||||
Cadastros Iniciais: | Cadastro de produtos Cadastro de vales-presentes | ||||||||
Parâmetro(s): | MV_LJVALEP MV_LJVPVAR | ||||||||
Ponto de Entrada: | STGeraCr - STGeraCr_Alteracao de valores na geracao do vale credito - TOTVS PDV | ||||||||
País(es): | Brasil | ||||||||
Banco(s) de Dados: | TODOS | ||||||||
Tabelas Utilizadas: | MDD - Vale Presente | ||||||||
Sistema(s) Operacional(is): | TODOS | ||||||||
Fontes do Pacote: | LOJA830.PRW 05/04/2016 11:23:29 07 | ||||||||
Pacote: | TVCWUE.rar |
#Include 'Protheus.ch'
User Function stgeracr()Local aRetorno := {} //Retorno do ponto de entradaLocal cCodValeCredito := PARAMIXB[1] //Codigo do vale presente/creditoLocal nValor := PARAMIXB[2] //Valor original da NCCLocal cCliente := PARAMIXB[3] //Cliente da vendaLocal cLoja := PARAMIXB[4] //Loja da vendaLocal nParcelas := 1 //Quantidade de parcelas de NCCLocal nRetValor := 0 //Valor da NCC por parcela If nValor > 100 nRetValor := nValor + 50 //Da R$ 50,00 de bonusEndIf
aRetorno := {nRetValor ,nParcelas }
Return aRetorno
Descrição
Esta melhoria consiste em realizar a venda de um vale presente como vale crédito, para que ao termino da venda seja gerado um crédito (NCC) para o cliente selecionado na venda. Desta forma quando é vendido o vale crédito para o cliente ao termino da venda será gerado uma NCC no ambiente de retaguarda no mesmo valor da venda, porem o ponto de entrada STGeraCr é responsável por realizar qualquer alteração no valor da NCC a ser gerada ou a sua quantidade de vezes, ou seja, ele fica responsável por dar mais créditos ou dividir o crédito em varias vezes. Este crédito gerado poderá ser utilizado como forma de pagamento nas futuras vendas realizadas pelo cliente.
Exemplo de case:
Venda de um crédito de banho e tosa para cachorro: O cliente pode comprar R$ 100,00 de crédito disponibilizado pela loja e ganhar mais R$ 50,00 como promoção, ou seja, ao comprar um vale crédito por R$ 100,00 ele irá ter um crédito de R$ 150,00 a ser utilizado nas futuras compras. A regra de dar R$ 50,00 pode estar atrelado à um conjunto de informações do cliente (cliente que é identificado para o ponto de entrada) para que seja gerado esse bônus de R$ 50,00.
Procedimento para Implantação
O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.
- Aplique o patch do chamado nos ambientes de PDV e Retaguarda.
Atualizações do Campos
1. Criação de Campos no arquivo SX3 – Campos:
- Tabela MDD - Vale Presente:
Campo | MDD_TIPO |
Tipo | C |
Tamanho | 1 |
Decimal | 0 |
Título | Tipo de Vale |
Descrição | Tipo de Vale |
Usado | Sim |
Obrigatório | Não |
Opções | P=Presente;C=Credito |
Relação | "P" |
Val. Sistema | Pertence('PC') .And. Lj830VldVP(a,b,c,d) |
Help | Credito: Tipo de vale onde é gerado NCC para o cliente e não é modificado o seu status (vendido/utilizado). Exemplo: Gerar crédito para antecipação de pagamento. Presente: Tipo de vale onde é controlado seus status e modificado de acordo com as operações realizadas(vendido/utilizado). Exemplo: Venda de cartão vale presente. |
Importante:
O tamanho dos campos que possuem grupo pode variar conforme ambiente em uso.
Procedimento para Utilização
Pré-Requisito:
- Possuir ambiente configurado para vale presente (“MV_LJVALEP” igual a “.T.” - http://tdn.totvs.com.br/display/PROT/DT_MV_LJVALEP ) com valor variável (“MV_LJVPVAR” conteudo igual a “.T.” - DT_MV_LJVPVAR) conforme detalhado no link: http://tdn.totvs.com/pages/viewpage.action?pageId=241699811
- Possuir o campo “Tipo de vale (MDD_TIPO)” cadastrado na base de dados conforme exemplo abaixo:
Sequencia 01: Cadastrando vale presente como vale crédito.
- No ambiente de “Controle de lojas (SIGALOJA)”, acesse “Atualizações / Cadastros / Produtos (LOJA110)”. Cadastrar um produto que possua na descrição as palavras “VALE PRESENTE” ou “VALE CREDITO”.
- O campo “Vale Present (B1_VALEPRE)” deve estar como “Sim”.
- No ambiente de “Controle de lojas (SIGALOJA)”, acesse “Atualizações / Cadastros / Vale presente (LOJA830)”. Clique em “Incluir”.
- Preencha as informações necessário para o cadastro e clique em “Confirmar”.
Obs.: Preencher principalmente o campo “Tipo de vale (MDD_TIPO)”, campo responsável por informar qual dos tipos de vale o registro a ser incluído será:
Credito: Tipo de vale onde é gerado NCC para o cliente e não é modificado o seu status (vendido/utilizado), sendo assim não é necessário criar um registro por venda pois este único registro pode ser vendidos quantas vezes necessário ate seu vencimento. Exemplo: Gerar crédito para antecipação de pagamento.
Presente: Tipo de vale onde é controlado seus status e modificado de acordo com as operações realizadas (vendido/utilizado), para este caso cada registro do vale presente será vendido uma única venda. Exemplo: Venda de cartão vale presente.
Sequencia 02: Venda do vale crédito.
- No ambiente de “Front Loja (SIGAFRT)”, acesse “Atualizações / Frente de lojas / TOTVS (STIPOSMAIN)”. Abra o caixa e selecione o cliente da venda.
- Clique no “Menu / Vale presente”.
- Informe o código do vale crédito e clique em “Buscar”. Neste momento serão exibidos os valores mínimo e máximo do vale credito.
- Preencha o valor desejado para o vale e clique em “Vale Presente/Crédito”.
- O produto referente ao vale é lançado na venda, neste momento cliquem em “Finalizar venda”.
- Selecione a forma de pagamento desejada e clique em “Finalizar pagamento”.
- O comprovante é impresso:
- Neste momento é gerada a NCC do vale crédito na retaguarda.
- No ambiente de “Controle de lojas (SIGALOJA)”, acesse “Atualizações / Gerencia de finanças / Contas a Receber”. Note que a NCC foi gerada para o cliente para ser utilizada a qualquer momento como forma de pagamento nas vendas.
Ponto de Entrada
Descrição: | Ponto de entrada para customização dos valores do crédito do vale crédito. Link: STGeraCr_Alteracao de valores na geracao do vale credito - TOTVS PDV | ||||||||||||
Eventos: | Geração da NCC na retaguarda, apos gravação de venda no TOTVSPDV | ||||||||||||
Programa Fonte: | STIValePresente.PRW | ||||||||||||
Função: | SIGAFRT | ||||||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function stgeracr()
Local aRetorno := {} //Retorno do ponto de entrada
Local cCodValeCredito := PARAMIXB[1] //Codigo do vale presente/credito
Local nValor := PARAMIXB[2] //Valor original da NCC
Local cCliente := PARAMIXB[3] //Cliente da venda
Local cLoja := PARAMIXB[4] //Loja da venda
Local nParcelas := 1 //Quantidade de parcelas de NCC
Local nRetValor := 0 //Valor da NCC por parcela
If nValor > 100
nRetValor := nValor + 50 //Da R$ 50,00 de bonus
EndIf
aRetorno := {nRetValor ,nParcelas }
Return aRetorno