Árvore de páginas

Assunto

Produto:

ADVPL

Versões:

Todas

Ocorrência:

Ao atualizar as rotinas os gatilhos que eram realizado para campos desabilitados para edição via X3_WHEN estão apresentado um help, não permitindo a inserção de valor.

Ambiente:

todos

Passo a passo:

Isso normalmente está ocorrendo devido as recentes atualizações de alguma rotinas para o conceito MVC, nesse cenário um campo não editável não pode receber um valor, já que não pode ser editado.

Em casos dessa natureza uma maneira de realizar o mesmo comportamento é a criação de uma tratativa via validação de usuário do campo que aciona o gatilho retirando o gatilho que antes era utilizado, já que um valor é retornado e irá ocorrer o mesmo comportamento.

No caso, uma ideia é utilizar o modelo que possui o campo em que se deseja atribuir o valor e utilizar o método loadValue par atribuir o conteúdo.


Segue um exemplo realizado na rotina MATA020 que busca dados na tabela CC2 :


#include "protheus.ch"
#include "fwmvcdef.ch"


function u_tstGatMunA2()


local oMdlSA2 := fwModelActive()
local oSa2Mast := oMdlSA2:getModel("SA2MASTER")
local aAreaCC2 := CC2->(getArea())
local lRet := .t.


dbSelectArea("CC2")


if (CC2->(dbSeek(xFilial("CC2") + oSa2Mast:getValue("A2_EST") + oSa2Mast:getValue("A2_COD_MUN"))))
oSa2Mast:loadValue("A2_MUN", CC2->CC2_MUN)
else
msgAlert("Codigo de municipio nao possui desc. de municipio cadastrado")

lRet := .f.
endIf


restArea(aAreaCC2)


return lRet

Observações:

http://tdn.totvs.com/display/public/mp/AdvPl+utilizando+MVC