oModel:AddCalc+oModel:SetValue

Framework - Linha Protheus LIB
, ,
1

bom dia, alguém tem um fonte funcionando para mim testar aqui porque não estou conseguindo gravar no banco de dados

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

Static Function fLineOk()

Local nTotal := 0 Local oModel := FwModelActive()

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

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

Return (.T.)

2

Boa tarde,

O AddCalc() não vai gravar no banco de dados pois é uma função somente em tela.

Se quiser gravar algo no Banco não pode usar o AddCalc() e sim os métodos do grid para que some os valores de uma determinada coluna e grave no campo do cabeçalho.