#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
ASizeaDel(aBtn aButtons, Len(aBtn) - 1)
nPosBtn )
aSize( EndIf
Next nX
Return aBtnaButtons, Len( aButtons ) - 1 )
EndIf
Return aButtons | 