Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | |
Função: | ATFA251 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46829 |
O ponto de entrada AF251FILTR permite a manipulação do filtro padrão utilizado na rotina de Aquisição por Transferência. Com esse ponto de entrada, é possível ajustar os critérios de filtragem aplicados à visualização dos registros de aquisição, conforme as necessidades específicas do usuário ou da organização.
If ExistBlock("AF251FILTR") cFilAux := ExecBlock( "AF251FILTR", .F., .F., {cFiltro} ) If Valtype( cFilAux ) == "C" cFiltro := cFilAux EndIf Endif |
User Function AF251FILTR() Local cFilAux := paramixb[1] Local aFilAux := {cFilAux} Local cMsg := "Ponto de entrada AF251FILTR() executado." Local cFiltro := "" If ValType(aFilAux) == "A" AADD(aFilAux, {'N3_FILIAL == "01" .AND. N3_CBASE >= "100002" .AND. N3_CBASE <= "100002 " .AND. N3_BAIXA < "1".And. ( N3_TIPO $ "01/03" .OR. ( N3_TIPO $ "10/12/13/14/15/13/15" .And. N3_TPSALDO == " ") ) '} ) Alert(cMsg) cFiltro := aFilAux[2][1] Endif Return cFiltro |
|