Histórico da Página
...
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#Include "PROTHEUS.CH"
User Function A410BLCO()
Local nPQtdVen := aScan(ParamIxb[1],{|x| AllTrim(x[2])== 'C6_QTDVEN'})
Local nPPrcVen := aScan(ParamIxb[1],{|x| AllTrim(x[2])== 'C6_PRCVEN'})
Local nPPrUnit := aScan(ParamIxb[1],{|x| AllTrim(x[2])== 'C6_PRUNIT'})
Local nPValor := aScan(ParamIxb[1],{|x| AllTrim(x[2])== 'C6_VALOR' })
ParamIxb[2][nPPrcVen] := 10 //Alterado o Preço de Venda
ParamIxb[2][nPPrUnit] := 10 //Alterado o Preço Unitário
ParamIxb[2][nPValor ] := A410Arred(ParamIxb[2][nPQtdVen] * ParamIxb[2][nPPrcVen], 'C6_VALOR') //Alterado o Valor Total
Return(ParamIxb[2]) |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas