PE MNTA7357 Ponto de entrada para modificar propriedades da estrutura de campos

#Include 'Protheus.ch'
 
User Function MNTA7357()
 
    Local lModView := PARAMIXB[1] //Valor .T. quando chamado pelo Modelo, valor .F. quando chamado pela View.
    Local oStruct7 := PARAMIXB[2] //Busca o valor passado pelo parametro do ponto de entrada.
 
    If lModView
 
        //Realiza alteração da propriedade titulo do campo.
        oStruct7:Afields[1,1] := "Campo Novo"
 
        //Adiciona um campo novo na Grid.
        oStruct7:AddField("Campo","Campo",'TTG_CAMPO','C',1,0,Nil,{|| MNT735OK()},{},.F.,,.T.,.F.,.F.)     
    Else
 
       //Realiza alteração do nome do campo.
       oStruct7:Afields[1,3] := "Campo Novo"
 
        //Adiciona um campo novo na Grid.
        oStruct7:AddField("TTG_CAMPO","01","Campo","Campo",Nil,"C","@!",Nil,Nil,Iif(INCLUI, .T., .F.),Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)  
    EndIf
 
Return