Boa tarde pessoal, preciso de uma ajuda se puderem.
Criei um ponto de entrada em MVC na qual eu aciono um botão em outras ações e ao clicar nele, preciso que seja incluído uma nova linha nesse grid automaticamente (estou fazendo isso através de código). Já tentei dar Refresh e nada. Poderiam me ajudar?
Segue código:
Função ponto de entrada:
IF cIdPonto == 'BUTTONBAR'
xRet := { {'Salvar', 'SALVAR', { || u_FATTHSK2() }, 'Este botao Salva' } }
EndIf
Return xRet
Função na qual estou tentando fazer com que sejam salvos as informações na LINHA (atualizar na hora na qual eu faço o RecLock).
Local oModel := FWLoadModel('FATTHSK0')
Local oView := FWViewActive()
omodelAut := oModel:GetModel("Z36DT1")
nLinha := Len(omodelAut:Acols)
nLinha++
omodelAut := FwModelActive()
omodelAut:DeActivate()
omodelAut:Activate()
omodelAut:SetValue("Z36_GRUPRO", "020")
omodelAut:SetValue("Z36_ACAO", 'D')
omodelAut:SetValue("Z36_GRUPRO", '020')
omodelAut:SetValue("Z36_TIPO", 'G')
omodelAut:AddLine()
oView:Refresh()
Ele da o erro de: Tipos permitidos: STRING, DATE, NUMERIC, LOGICAL on FWFORMMODEL:SETVALUE(FWFORMMODEL.PRX).
Obrigado.
Boa tarde, tente remover o comando "omodelAut:AddLine()", por favor. Acredito que não seja necessário chama-lo, pois ao executar o Activate o grid já vem com uma linha.
— Leandro Francisco Silveira 22 de Oct de 2020