Tela Modelo 2 MVC

Bom dia pessoal ,

Preciso da ajuda de voces , eu criei uma tela modelo 2 MVC , está funcionando , exceto que eu preciso iniciar um campo na tela Pai com determinado valor. Como faço pra atribuir um valor nesse campo ? li algo a respeito e vi que consigo fazer isso com a propriedade SetValue() que é uma propriedade da classe FWModelActive()

Como instancio a classe FWModelActive() preciso abrir uma function ? ou uso o viewdef ? ou ModelDef ?.

Comecei a fazer algo em MVC à pouco tempo , alguém pode me dar uma dica ou Exemplo? Anexei o programa para voces terem uma ideia , de como está ..

Obrigado.

mvcmd2

criado 03 de Dec de 2019
Elielton Pereira
10 pontos
editado 03 de Dec de 2019

0

Elielton, Boa tarde. Se eu entendi bem o que você precisa, um inicializador padrão pelo configurador não resolveria?
— FELIPE CAIADO ALMEIDA 03 de Dec de 2019

1

Boa tarde Felipe. O Valor do Campo é condicional, já pensei nessa possibilidade ..
— Elielton Pereira 03 de Dec de 2019

0

Elielton, boa tarde, mesmo sendo condicional você consegue fazer pelo configurador, inclusive é a melhor prática que você pode adotar.
— Daniel Mendes 03 de Dec de 2019

Anexos

MACALT.PRW

Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

2 respostas

up 0 down
você quiser manipular um campo especifico antes da tela abrir você pode passar um bloco de código na propriedade "SetActivate" do seu modelo de dados

segue exemplo:

Local oModel := nil

Local bBloco := {|oModel| loadField(oModel)}

oModel := MPFormModel():New('MODELO' , ,{|oModel| VldTudOk(oModel) })

oModel:SetActivate(bBloco)

Static Function loadField(oModel)

If oModel:GetOperation() == 4

If Empty(oModel:GetValue('ZZL_FORM',"ZZL_DTPUBL"))

oModel:LoadValue( 'ZZL_FORM', 'ZZL_DTPUBL', DDataBase )

EndIf

EndIF

return nil
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 04 de Dec de 2019
  Cleuto Lima
  28 pontos
- 0
  
  Carca vlw mesmo .. Era exatamente o que eu queria .. Obrigado à todos
  — Elielton Pereira 04 de Dec de 2019
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações

Já tentou usar um gatilho? Segue ai um exemplo:

    aAux := nil
    aAux := FwStruTrigger(;
    'CAMPO_ORIGEM'        ,;        // DOMINIO
    'CAMPO_DESTINO'        ,;        // CONTRA DOMINIO
    'U_FUNCAO(M->CAMPO_ORIGEM)'    ,;    // REGRA PREENCHIMENTO
    .F.,;    // POSICIONA
    ,;    // ALIAS
    ,;    // ORDEM
    ,;    // CHAVE
    ,;    // CONDICAO
    )

    oStruct:AddTrigger( ;
    aAux[1], ;                                                      // [01] Id do campo de origem
    aAux[2], ;                                                      // [02] Id do campo de destino
    aAux[3], ;                                                      // [03] Bloco de codigo de validação da execução do gatilho
    aAux[4] )                                                       // [04] Bloco de codigo de execução do gatilho

editar
- x
grosseiro ou ofensivo pouco construtivo obsoleto outro...
Motivo

criado 03 de Dec de 2019
Gustavo A. Afonso
56 pontos

up 0 down
Boa Tarde Elielton,

Não entendi muito bem o que deseja direito, mas se for simplesmente atribuir uma informação ao campo de um model, pode tentar usar o FwFldPut, https://tdn.totvs.com/display/framework/FWFldPut

Atenciosamente,
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 03 de Dec de 2019
  Douglas Bichir
  641 pontos
- 0
  
  Douglas sou bem iniciante , consegue me dar um dica da sintaxe detalhada ? confesso que não consegui entender .
  — Elielton Pereira 03 de Dec de 2019
- 0
  
  Acho que entendi o que deseja, reli e vi que tem dúvida de onde pode manipular a informação, se for alguma condição na inicialização, pode criar um gatilho dentro da ModelDef como o Gustavo sugeriu, logo após as declações das variaveis, chamando uma função, dentro desta função você realiza a atribuição pelo método setvalue mesmo. O FwFldPut faz o mesmo que o SetValue, porém de forma não performatica, uma vez que não passando o model ele irá procurar em todos abertos no momento, consumindo processamento.
  — Douglas Bichir 03 de Dec de 2019
- 0
  
  Então a ideia do gatilho é boa mais não me atende .. Basicamente preciso que: se o campo SZQ_CODPRO == '0001' então eu vou atribuir '23454' para o campo SZQ_LOTE .
  — Elielton Pereira 03 de Dec de 2019
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações

Tela Modelo 2 MVC

Comentário

2 respostas

Comentário

Comentário

Comentário

Não é a resposta que estava procurando? Procure outras perguntas com as tags mvcmd2 ou faça a sua própria pergunta.