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.)