Estou tentando criar uma rotina de cadastro MVC para a tabela TN3 e usei o mesmo modelo que já funciona para outras tabelas. Quando eu acesso a rotina, ela exibe os dados - inclusive de acordo com o filtro implementado, mas quando eu clico para INCLUIR exibe um erro em outro fonte.

variable does not exist AHEADER on MDT620EPWH(MDTA620.PRX) 19/07/2021 14:04:23 line : 908

Quando eu uso o mesmo código passando uma outra tabela qualquer como referência, o fonte funciona perfeitamente. Alguma ideia do que possa estar acontecendo? Abraços!

#Include 'Protheus.ch'
#include 'parmtype.ch'
#Include 'FWMVCDef.ch'



Static cTitulo := "Cadastro de EPI"

user function CADTN3()

    Local aArea   := GetArea()
    Local oBrowse := FWMBrowse():New()

    oBrowse:SetAlias("TN3")
    oBrowse:SetDescription(cTitulo)
    oBrowse:SetFilterDefault("TN3_FORNEC=='002516' .AND. TN3_LOJA=='01'")
    oBrowse:Activate()

    RestArea(aArea)

Return Nil



Static Function MenuDef()

    Local aRotina := {}

    ADD OPTION aRotina TITLE 'Visualizar' ACTION 'VIEWDEF.CADTN3' OPERATION 2 ACCESS 0
    ADD OPTION aRotina TITLE 'Incluir'    ACTION 'VIEWDEF.CADTN3' OPERATION 3 ACCESS 0
    ADD OPTION aRotina TITLE 'Alterar'    ACTION 'VIEWDEF.CADTN3' OPERATION 4 ACCESS 0
    ADD OPTION aRotina TITLE 'Excluir'    ACTION 'VIEWDEF.CADTN3' OPERATION 5 ACCESS 0

Return aRotina



Static Function ModelDef()

    Local oModel := MPFormModel():New("MODEL_TN3",/*bPre*/, /*bPos*/,/*bCommit*/,/*bCancel*/)
    Local oStTN3 := FWFormStruct(1, "TN3")

    oModel:AddFields("FORMTN3",/*cOwner*/,oStTN3)
    oModel:SetPrimaryKey({'TN3_FILIAL'})

Return oModel



Static Function ViewDef()

    Local oModel := FWLoadModel("CADTN3")
    Local oStTN3 := FWFormStruct(2, "TN3")
    Local oView := FWFormView():New()

    oStTN3:SetProperty('TN3_CODEPI', MVC_VIEW_LOOKUP , "SB1")

    oView:SetModel(oModel)
    oView:AddField("VIEW_TN3", oStTN3, "FORMTN3")
    oView:CreateHorizontalBox("TELA",100)
    oView:SetOwnerView('VIEW_TN3','TELA')

Return oView