...
| Linha Línea de Produtoproducto: | Microsiga Protheus® | ||||||
|---|---|---|---|---|---|---|---|
Segmento: | Backoffice | ||||||
Módulo: | Financeiro Financiero | ||||||
| Função Función: | FINA090 - Baixas Pagar Automática Bajas por pagar automática | ||||||
Requisito/ | StoryStory/Issue (informe | o el requisito relacionado) : | DSERFINP-30523 | Observação||||
Observación: | Este | ponto punto de entrada | somente estará em funcionamento no fonte solamente estará en funcionamiento en el fuente FINA090 a partir | da versão de la versión 12.1.17 | da data de fecha , | pois o mesmo está substituindo o ponto pues este está sustituyendo el punto de entrada F090AFIL | devido a alteração da estrutura debido a la modificación de la estructura de filtro codebase para query. |
...
La finalidad del punto de entrada F090QFIL es permitir complementar el filtro estándar de los registros de la Baja por pagar automática
...
A finalidade do ponto de entrada F090QFIL é permitir complementar o filtro padrão dos registros da Baixa Pagar Automática (FINA090).
...
NomeNombre | Tipo | DescriçãoDescripción |
cFiltro | CaractereCarácter | Filtro padrão da rotina estándar de la rutina FINA090 |
nTipoBx | Numérico | Tipo de Baixa baja (1=Títulos ou o 2=BorderôsBorderós) |
...
NomeNombre | Tipo | DescriçãoDescripción |
cFiltro | Caractere Carácter | Novo Nuevo filtro |
...
...
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#include 'totvs.ch'
/*/{Protheus.doc} F090QFIL()
Complemento dodel Filtro estándar de padrãola darutina rotinaBaja Baixapor Pagarpagar Automáticaautomática (FINA090)
@param ParamIxb[1] - cFiltro - Filtro padrãoestándar de dala rotinarutina
@param Paramixb[2] - nTipoBx - Tipo de Baixabaja (1=Títulos ouo 2=BorderôsBorderós)
@return cRetFiltro - NovoNuevo Filtrofiltro
/*/
User Function F090QFIL()
Local cFiltro := ParamIXB[1] //Filtro padrãoestándar
Local nTipoBx := ParamIXB[2] //Tipo de la Baixabaja
Local cRetFiltro := cFiltro //NovoNuevo Filtrofiltro
If (nTipoBx == 1) //Títulos
cRetFiltro += " AND E2_FILIAL = '01' AND "
cRetFiltro += " E2_FORNECE BETWEEN '000001' AND '000002' AND "
cRetFiltro += " E2_LOJA = '01'"
Else //Borderôs
cRetFiltro += " AND E2_FILIAL = '02' AND "
cRetFiltro += " E2_FORNECE BETWEEN '000003' AND '000004' AND "
cRetFiltro += " E2_LOJA = '01'"
EndIf
Return cRetFiltro |
...