Somar valores de um mesmo campo

Produtos da Linha Protheus Sigapcp - Planejamento e Controle da Produção
, ,
1

Minha situação é a seguinte, tem um campo que ira receber valores diferentes e preciso somar cada um desses, retornando o valor da soma em outro campo de outra tabela, como poderia fazer isso?

2

Victor, consegue dar mais detalhes, qual o nome do campo, qual seria o valor presente nele, você precisa pegar os valores presentes em um único campo e somar eles para gravar em um campo da mesma tabela?

3

No caso o meu campo seria o ZZB_VLRSOL que no caso receberia valores de valores solicitados e seria retornada a soma no ZYD_VALOR. Ou seja enquanto a pessoa adicionar valores no ZZB_VLRSOL no mesmo registro, seja somado automaticamente e retornada no outro campo. Eu pensei em algo assim, porém não tive sucesso: User Function vCalcGatilho()

while ZZB_VLRSOL != 0
	_cCalcCau := ZZB_VLRSOL += ZZB_VLRSOL
ENDDO

return FwFldPut(“ZYD_VALOR”, _cCalcCau)

4

Olá Victor, imagino que dentro do seu campo tenha alguma virgula ou algo separando os valores, caso positivo, pode ser feito da forma abaixo:

Se não seja o caso explica melhor como ficam os valores no seu campo.


    nValor := 0
    aValor := StrTokArr(cTexto,';')
    For Nx := 1 to Len(aValor)
        nValor += aValor[nX]
    Next