Olá,
Com o binário mais recente (Harpia) os meus programas em MVC não estão sendo reconhecidos quando tento chamá-los direto via FwExecView ou FWLoadModel. Os programas são todos como User Function. Por exemplo:
Tenho um programa em MVC que utiliza a tabela SB1 de produtos, o qual defino o model e view da seguinte maneira:
User Function CXNF004()
Return
// ------------------------------------------------------------------------
// Modelo de dados
// ------------------------------------------------------------------------
Static Function ModelDef()
Local oModel := MPFormModel():New("CXNFSB1",,,{|oModel| CommitMdl(oModel) })
Local oStruSB1 := FWFormStruct(1, "SB1")
oModel:AddFields("SB1FIELDS", /*cOwner*/, oStruSB1)
Return oModel
// ------------------------------------------------------------------------
// Componentes de visualização
// ------------------------------------------------------------------------
Static Function ViewDef()
Local oModel := ModelDef()
Local oView := FWFormView():New()
Local oStruSB1 := FWFormStruct(2, "SB1")
oView:SetModel(oModel)
oView:AddField("SB1VIEW", oStruSB1, "SB1FIELDS")
Return oView
Uso a estrutura acima para chamar a inclusão de um produto da seguinte forma:
oModelSB1 := FWLoadModel("CXNF004")
oModelSB1:SetOperation(MODEL_OPERATION_INSERT)
oModelSB1:Activate()
Fazendo dessa forma nos binários antigos funciona, ele reconhece e retorna o modelo, apenas no Harpia que não. Teriam algum direcionamento de como devo fazer a definição e chamada?
Grato, Felipe