- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Somar os campos digitados em um acols em um campo do acab.
×
Linguagem de Programação ADVPL
Perguntas Somar os campos digitados em um acols em um campo do acab.
- Wagner Lima
- Autor do Tópico
- Desconectado
- Membro Júnior
Menos
Mais
- Postagens: 30
- Obrigados Recebidos: 0
7 anos 11 meses atrás #31576
por Wagner Lima
Respondido por Wagner Lima no tópico Somar os campos digitados em um acols em um campo do acab.
Kanaãm
Em primeiro lugar muito obrigado pela ajuda!!!
Dessa forma dá certo, más suponhamos que eu tenha digitado um valor errado Exemplo: "10" e de veria ter digitado "20". Quando eu corrigir esse valor ele vai somar 10 + 20 = 30 e o valor vai estar errado.
Estou chamando a função pela validação de usuário.
Teria como fazer essa validação de outra forma?
Esse é o font que eu chamo
USER FUNCTION VldValor()
Local nValor
Local nVal := 0
Local lRet:=.T.
Local cItem
Local nCont
MsgInfo(cValToChar(cCont))
cZO_TOTGER := 0
For nCont := 1 to Len(aCols)
nValor := ZI_VALOR
nVal := aCols[nCont][6]
If nCont == 1
cZO_TOTGER := nValor + nVal
ElseIf nCont > 1
cZO_TOTGER := cZO_TOTGER + nVal
cZO_TOTGER := cZO_TOTGER
EndIf
Next nCont
Em primeiro lugar muito obrigado pela ajuda!!!
Dessa forma dá certo, más suponhamos que eu tenha digitado um valor errado Exemplo: "10" e de veria ter digitado "20". Quando eu corrigir esse valor ele vai somar 10 + 20 = 30 e o valor vai estar errado.
Estou chamando a função pela validação de usuário.
Teria como fazer essa validação de outra forma?
Esse é o font que eu chamo
USER FUNCTION VldValor()
Local nValor
Local nVal := 0
Local lRet:=.T.
Local cItem
Local nCont
MsgInfo(cValToChar(cCont))
cZO_TOTGER := 0
For nCont := 1 to Len(aCols)
nValor := ZI_VALOR
nVal := aCols[nCont][6]
If nCont == 1
cZO_TOTGER := nValor + nVal
ElseIf nCont > 1
cZO_TOTGER := cZO_TOTGER + nVal
cZO_TOTGER := cZO_TOTGER
EndIf
Next nCont
Por favor Acessar ou Registrar para participar da conversa.
- kanaamlrr
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
7 anos 11 meses atrás #31578
por kanaamlrr
Respondido por kanaamlrr no tópico Somar os campos digitados em um acols em um campo do acab.
Nessa caso você sempre tem que subtrair o valor do aCols e somar o da memória (M).
Pois assim que valida a memória, o valor é gravado no aCols.
Faça o teste.
Abraço!
Pois assim que valida a memória, o valor é gravado no aCols.
Faça o teste.
Abraço!
Por favor Acessar ou Registrar para participar da conversa.
- Wagner Lima
- Autor do Tópico
- Desconectado
- Membro Júnior
Menos
Mais
- Postagens: 30
- Obrigados Recebidos: 0
7 anos 11 meses atrás #31580
por Wagner Lima
Respondido por Wagner Lima no tópico Somar os campos digitados em um acols em um campo do acab.
Mais uma vez muito obrigado pela ajuda.
Como eu faço para ver qual linha do acols está sendo editada?
Como eu faço para ver qual linha do acols está sendo editada?
Por favor Acessar ou Registrar para participar da conversa.
- kanaamlrr
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
- Wagner Lima
- Autor do Tópico
- Desconectado
- Membro Júnior
Menos
Mais
- Postagens: 30
- Obrigados Recebidos: 0
7 anos 11 meses atrás #31583
por Wagner Lima
Respondido por Wagner Lima no tópico Somar os campos digitados em um acols em um campo do acab.
OK
Muito obrigado!!!
Muito obrigado!!!
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Somar os campos digitados em um acols em um campo do acab.
Tempo para a criação da página:0.089 segundos