Inserir dados de um campo ADDCALC NO BANCO

Bom dia pessoal, fiz uma rotina utilizando o ADDCALC, para mostrar a soma dos valores que são inseridos no campo ZN_PESNF(PESO NF, este campo está na grid) que estão na minha grid, ou seja cada nova linha da grid que vai sendo incluída, o total é atualizado.

Só que estou em um grande dilema. Eu não sei como pegar esse valor que esta no campo XX_TOTAL (OBS: não tenho nenhuma tabela no banco referente a este campo) e fazer tipo um gatilho para alimentar o campo ZM_PESTOT (PESO TOTAL, esse campo esta no cabeçalho).

Estou fazendo dessa forma abaixo

//Adicionando totalizadores oModel:AddCalc('TOT_SALDO', 'SZMMASTER', 'SZNDETAIL', 'ZN_PESNF', 'XX_TOTAL', 'SUM', , , "Peso Total:" ) Return oModel

Em anexo, está o print da tela.

criado 19 de Jun de 2020
Arthur Morgan
85 pontos
editado 19 de Jun de 2020

Anexos

tela.jpg

Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

3 respostas

up 0 down
Arthur, boa tarde! Já tentou usando a função FWCalcStruct ?

Segue documentação e exemplo: https://tdn.totvs.com/display/framework/FWCalcStruct
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 19 de Jun de 2020
  Raphael Neves Pinheiro
  269 pontos
- 0
  
  Opa, boa tarde Raphael, estou usando essa função e funcionou de boa. Porém não estou conseguindo pegar o valor do campo virtual criado e alimentar em outro campo, tipo um gatilho.
  — Arthur Morgan 21 de Jun de 2020
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações
up 0 down
Boa tarde, Arthur!

Tente fazer da seguinte maneira:
```
nTotal := oModel:GetModel('TOT_SALDO'):GetValue('XX_TOTAL')
```
Você pode tentar fazer essa modificação no LinhaOk do seu programa, sendo assim, a cada linha nova o seu campo do cabeçalho será atualizado, por exemplo:
```
Static Function fLineOk
Local nTotal    := 0
Local oModel    := FwModelActive()

    nTotal := oModel:GetModel('TOT_SALDO'):GetValue('XX_TOTAL')

    oModel:SetValue('ZNMASTER', 'ZN_PESNF', nTotal)

Return(.T.)
```
Faça um teste e verifique se lhe atende.
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 22 de Jun de 2020
  Giordano Trabach Xavier
  4208 pontos
- 0
  
  Bom dia pessoal Fiz o processo mas não deu certo.
  — Arthur Morgan 24 de Jun de 2020
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações
up 0 down
bom dia, fiz o teste mas não grava no banco de dados no campo Z09_TOTAL

oModel:AddCalc("COMP022CALC1", "Z09MASTER", "Z10DETAIL", "Z10_VALOR", "Z09_TOTAL", "SUM", , , "Total:" )

Return oModel

Static Function fLineOk() Local nTotal := 0 Local oModel := FwModelActive()

nTotal := oModel:GetModel("COMP022CALC1"):GetValue("Z09_TOTAL")

oModel:SetValue("Z09MASTER", "Z10_VALOR", nTotal)

Return (.T.)
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 20 de Jan de 2021
  pplay
  42 pontos
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações

Inserir dados de um campo ADDCALC NO BANCO

Comentário

3 respostas

Comentário

Comentário

Comentário

Não é a resposta que estava procurando? Procure outras perguntas com as tags advpl protheus mvc ou faça a sua própria pergunta.