1. Fórum
  3. Protheus/Microsiga/Totvs
  5. AdvPL (Advanced Protheus Language)
  7. Dúvidas Gerais
  9. PONTO ENTRADA COMPRAS
× Linguagem de Programação ADVPL

Perguntas PONTO ENTRADA COMPRAS

Mais
10 anos 7 meses atrás #17163 por felipe_jabu
PONTO ENTRADA COMPRAS foi criado por felipe_jabu
no cadastro produto, Temos o campo B1_PRV1 = PREÇO VENDA E O B1_UPRC = ULTIMA COMPRA
Aqui no cliente, ele sempre trabalha alterando o preço de venda dependendo do preço de compra.
eu queria uma ponto de entrada de quando o campo B1_UPRC for alimentado, também alimentar o campo B1_PRV1
como eu poderia fazer funcionar?


Obrigado

Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo.

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 7 meses atrás #17165 por lalberto
Respondido por lalberto no tópico PONTO ENTRADA COMPRAS
Nao testei, veja se funfa ai.

User function MT103UPC()
Local nPreco :=0

nPreco:= SD1->D1_VUNIT + SD1->D1_VALFRE + (SF1->F1_DESPESA / SD1->D1_QUANT)

If SB1->(dbSetOrder(1), dbSeek(xFilial("SB1")+SD1->D1_COD))
If RecLock("SB1",.f.)
SB1->B1_PRV1 := nPreco
SB1->(MsUnlock())
Endif
Endif

Return nPreco
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 7 meses atrás #17173 por felipe_jabu
Respondido por felipe_jabu no tópico PONTO ENTRADA COMPRAS
Obrigado Luiz!!

Funcionou direitinho...


Obrigado.


Felipe Cunha

Por favor Acessar ou Registrar para participar da conversa.

  1. Fórum
  3. Protheus/Microsiga/Totvs
  5. AdvPL (Advanced Protheus Language)
  7. Dúvidas Gerais
  9. PONTO ENTRADA COMPRAS
Tempo para a criação da página:0.094 segundos
Joomla templates by a4joomla