Exemplo do Ponto de Entrada F080FIL.
Exemplo do Ponto de Entrada:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | //Bibliotecas#Include "Protheus.ch"/*---------------------------------------------------------------------------------------------------------* | P.E.: F080FIL | | Desc: P.E. executado para filtrar as baixas por lote - Contas a Pagar | | Link: http://tdn.totvs.com/display/public/mp/F080FIL+-+Antes+da+IndRegua+na+baixa+por+lote+CP+--+11661 | *---------------------------------------------------------------------------------------------------------*/User Function F080FIL() Local aArea := GetArea() Local cFiltro := "" cFiltro += " SE2->E2_X_CAMPO = 'XXX' " RestArea(aArea)Return cFiltro |
Observações:
– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;