Olá, Seja Bem-vindo!!!
Vou mostrar o uso do PE MA651FIL. Porém utilizei esse PE para adicionar botões no aRotina ao invés do filtro, já que que a rotina MATA651 não possui PE para adição de botões,
O mesmo ocorre antes de abrir a tela com os dados.
Exemplo abaixo, foi adicionado para filtrar C2_LOCAL 'Armazém' == '01':
/*/{Protheus.doc} MA651FIL
LOCALIZAÇÃO: Function A651Filtra
Função responsável por filtrar a tabela de Ordens de Produção, antes da execução do Browse.
@author Eurai Rapelli
@since 16/09/2014
@param cFirmaCond , Caracter , Filtro gerado pela função A651Filtra().
@return cFirmaCond , Caracter , Filtro gerado pela função A651Filtra().
/*/
User Function MA651FIL()
Local cFiltro := PARAMIXB[01]
cFiltro += " .AND. C2_LOCAL = '01' "
Return( cFiltro )
Exemplo do PE MA651FIL, nesse caso foi adicionado botões no aRotina:
/*/{Protheus.doc} MA651FIL
LOCALIZAÇÃO: Function A651Filtra
Função responsável por filtrar a tabela de Ordens de Produção, antes da execução do Browse.
@author Eurai Rapelli
@since 16/09/2014
@param cFirmaCond , Caracter , Filtro gerado pela função A651Filtra().
@return cFirmaCond , Caracter , Filtro gerado pela função A651Filtra().
/*/
User Function MA651FIL()
Local cFiltro := PARAMIXB[01]
aAdd( aRotina, {'*Produto' ,'MATA010()' , 0, 3 } )
Return( cFiltro )
Esse PE nos obriga a retornar um valor para o filtro.
Local cFiltro := PARAMIXB[01], nesse é retornado o filtro padrão do sistema 'Ops Prevista'; Return( cFiltro ) e aqui é retornado o seu próprio filtro.
E dessa forma, é possível utilizar o PE MA651FIL, destinado a filtrar os dados para adicionar botões na rotina. E sim, é possivel filtrar e adicionar botões ao mesmo tempo.
Dessa forma:
/*/{Protheus.doc} MA651FIL
LOCALIZAÇÃO: Function A651Filtra
Função responsável por filtrar a tabela de Ordens de Produção, antes da execução do Browse.
@author Eurai Rapelli
@since 16/09/2014
@param cFirmaCond , Caracter , Filtro gerado pela função A651Filtra().
@return cFirmaCond , Caracter , Filtro gerado pela função A651Filtra().
/*/
User Function MA651FIL()
Local cFiltro := PARAMIXB[01]
cFiltro += " .AND. C2_LOCAL = '01' "
aAdd( aRotina, {'*Produto' ,'MATA010()' , 0, 3 } )
Return( cFiltro )
Esse foi exemplo sobre PE MA651FIL.
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima