Ola Pessoal, estou tentando alterar o modo de edição de um campo na Grid do MVC pelo ponto de entrada em MVC WMSA332A(), estou utilizando todos os meios que conheço e não consigo fazer o campo vir como editável na tela, ou seja não habilita de jeito nenhum! alguém já passou por isso e poderia dar uma ideia?? estou usando o ponto MODELVLDACTIVE para alterar o model já testei também o ponto MODELPRE e também não funcionou.
ja tentei todas as opções abaixo, debugando eu vejo que ele acaba alterando a estrutura da memoria mas quando carrega a tela o campo ainda continua não editavel
user function WMSA332A()
Local aParams := PARAMIXB Local xRet := .T. Local oView := FwViewActive() Local oObj := NIL // OBJETO QUE ARMAZENARÁ O MODELO TOTAL Local cIdPonto := "" // ID DO MOMENTO DA CHAMADA DO PONTO Local cIdModel := "" // QUAL MODELO OU SUBMODELO ESTÁ ATIVO Local nNovaLid := 0
If (!aParams == NIL)
// ATRIBUIÇÃO DE VALORES oObj := aParams[1] cIdPonto := aParams[2] cIdModel := aParams[3]
// VALIDAÇÃO ANTES DA ATIVAÇÃO DO MODELO If (cIdPonto == "MODELVLDACTIVE") oObj:Getmodel('D12DETAIL'):GetStruct():SetProperty("D12_QTDLID" ,MODEL_FIELD_WHEN,FWBuildFeature( STRUCT_FEATURE_WHEN, ".T." )) oObj:Getmodel('D12DETAIL'):GetStruct():SetProperty("D12_QTDLID" , MODEL_FIELD_NOUPD, .T.) oObj:Getmodel('D12DETAIL'):GetStruct():SetProperty("D12_QTDLID" , MODEL_FIELD_WHEN,.T.) oObj:Getmodel('D12DETAIL'):GetStruct():SetProperty("D12_QTDLID" , MVC_VIEW_CANCHANGE,.T.) EndIf
//if (cIdPonto == "MODELPRE" )
//EndIf
ENDIF
Return xRet
