SobreCarga de metodo de carga não recomendado

Um dos meus fontes no codeanalysis acusou esse erro, alguém tem ideia do que pode ser e como consertar? Ele deu erro no bCommit. Vou deixar em baixo uma parte do código para análise.


Static Function ModelDef()
    Local oStruPai := FWFormStruct(1, cTabPai)
    Local oStruFilho := FWFormStruct(1, cTabFilho)
    Local aRelation := {}
    Local oModel
    Local bPre := Nil
    Local bPos := Nil
    Local bCommit := Nil
    Local bCancel := Nil
    Local bVldPos := {|| u_ValidPrio()} //Validação ao clicar no Confirmar

    //Cria o modelo de dados para cadastro
    oModel := MPFormModel():New("zCodBarM", bPre, bVldPos, bCommit, bCancel) -> ERRO NESSA LINHA, NO bCommit 
    oModel:AddFields("SB1MASTER", /*cOwner*/, oStruPai)
    oModel:AddGrid("SLKDETAIL","SB1MASTER",oStruFilho,/*bLinePre*/, /*bLinePost*/,/*bPre - Grid Inteiro*/,/*bPos - Grid Inteiro*/,/*bLoad - Carga do modelo manualmente*/)
    oModel:SetDescription("Modelo de dados - " + cTitulo)
    oModel:GetModel("SB1MASTER"):SetDescription( "Dados de - " + cTitulo)
    oModel:GetModel("SLKDETAIL"):SetDescription( "Grid de - " + cTitulo)
    oModel:SetPrimaryKey({})

    //Fazendo o relacionamento
    aAdd(aRelation, {"LK_FILIAL", "FWxFilial('SLK')"} )
    aAdd(aRelation, {"LK_CODIGO", "B1_COD"})
    oModel:SetRelation("SLKDETAIL", aRelation, SLK->(IndexKey(1)))

Return oModel

Olá,

A ideia é não sobrescrever o commit padrão do MVC.

Logo essa sua linha:


oModel := MPFormModel():New("zCodBarM", bPre, bVldPos, bCommit, bCancel)

Ficaria da seguinte forma:


oModel := MPFormModel():New("zCodBarM", bPre, bVldPos, /*bCommit*/, bCancel)

Com isso o MVC será o responsável pela persistência de dados, se você possui gravações ou validações dentro do seu bloco de commit customizado, a recomendação é você utilizar dos eventos do MVC para fazer isso:

https://tdn.totvs.com/pages/viewpage.action?pageId=269552294