If ExistBlock( "PCOA1012" )
//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ?
//P_E?Ponto de entrada utilizado para inclusao de botoes de usuario na toolbar?
//P_E?da tela de itens do orcamento. ?
//P_E?Parametros : Nenhum ?
//P_E?Retorno : Array contendo as rotinas a serem adicionados na toolbar ?
//P_E? Ex. : User Function PCOA1012 ?
//P_E? Return {{"Titulo", {|| U_Teste() } }} ?
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ?
aButtons:= ExecBlock("PCOA1012",.F.,.F.)
EndIf |