Histórico da Página

#include 'protheus.ch'

User Function MNTA435J()

    Local aBtnaButtons := ParamIXB[1]
	Local nPosBtn  := Local0 nX
   := 0
    /*---------------------+
    aBtnTempo| :=Incluindo aClone(novo aBtnbotão )|
    +---------------------*/
    For nX:= 1 to Len(aBtnTempo)

        nPos := aScan(aBtnTempo[nX], "oBtSpl")
 aAdd( aButtons,  { 'NG_ICO_ALTBEMM', { || MsgInfo( 'Ponto de Entrada MNTA435J', '' ) }, 'P.E. MNTA435J', 'oBtn435J', .T. } )

    /*------------------------+
    | Removendo o botão IfSPOOL nPos|
 <> 0

    +------------------------*/
    If ( nPosBtn := ADelaScan(aBtn, nX)
    aButtons, { |x| x[4] == 'oBtSpl' } ) ) > 0

       ASize aDel(aBtn aButtons, nPosBtn Len(aBtn) - 1)

)
        
        EndIf
 
    Next nX
 
Return aBtnaSize( aButtons, Len( aButtons ) - 1 )

    EndIf

Return aButtons