...
Linha Línea de Produtoproducto: | Microsiga Protheus® |
---|---|
Segmento: | ServiçosServicios |
Módulo: | FinanceiroFinanciero |
...
O Ponto El punto de Entrada entrada FA260QBRW permite manipular a condição WHERE padrão de filtragem dos títulos a serem apresentados no browse da conciliação bancáriamanejar la condición WHERE estándar de filtrado de los títulos que se mostrarán en el browse de la conciliación bancaria.
Informações | ||
---|---|---|
| ||
Parâmetros que são passados para o ponto Parámetros que se pasan al punto de entrada PARAMIXB - variável variable pública do del tipo ARRAY, e na posição 1 contém a condição do WHERE padrão gerada na rotinay en la posición 1 contiene la condición del WHERE estándar generada en la rutina. Modo de uso: PARAMIXB[1] O retorno esperado pela rotina padrão do PE são as condições a serem tratadas como filtro para a tabela La devolución esperada por la rutina estándar del PE son las condiciones que se tratarán como filtro para la tabla SE2. |
...
...
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" user function FA260QBRW as character Local cWhere := PARAMIXB[ 1 ] as character Local nTamCodBar := 0 as numeric Local nTamIdCnab := 0 as numeric Local dDtIni := CToD( ' / / ' ) as date Local dDtFin := CToD( ' / / ' ) as date If cFilAnt == 'D MG 01 ' nTamCodBar := TAMSX3("FIG_CODBAR")[1] nTamIdCnab := TAMSX3("E2_IDCNAB")[1] //Verifico si seel oparámetro parametroDe/A Vencto de/Ateno naoestá esta vaziovacío dDtIni := Max(dDtIni,Iif(Empty(mv_par09),dDtIni,mv_par09)) dDtFin := Max(dDtFin,Iif(Empty(mv_par10),dDtFin,mv_par10)) // AcrescentoAumento/diminuodisminuyo de daslas variaveisvariables para abrir periodoperíodo dDtIni := dDtIni - mv_par14 dDtFin := dDtFin + mv_par13 cWhere := "E2_FILIAL IN('D MG 01 ','D MG 02 ','D MG 03 ') AND " cWhere += "E2_FORNECE >= '"+ mv_par04 + "' AND " cWhere += "E2_FORNECE <= '"+ mv_par05 + "' AND " cWhere += "E2_LOJA >= '" + mv_par06 + "' AND " cWhere += "E2_LOJA <= '" + mv_par07 + "' AND " //Considera Vencto dodel titulotítulo If mv_par08 == 1 cWhere += "E2_VENCTO >= '" + DTOS(dDtIni) + "' AND " cWhere += "E2_VENCTO <= '" + DTOS(dDtFin) + "' AND " Else//Considera Vencto real dodel titulotítulo cWhere += "E2_VENCREA >= '" + DTOS(dDtIni) + "' AND " cWhere += "E2_VENCREA <= '" + DTOS(dDtFin) + "' AND " Endif cWhere += "E2_SALDO > 0 AND " cWhere += "E2_TIPO NOT IN " + FORMATIN(MV_CPNEG+MVPAGANT,,3) + " AND " cWhere += "E2_TIPO NOT IN " + FORMATIN(MVABATIM,'|') + " AND " cWhere += "E2_TIPO NOT IN " + FORMATIN(MVTXA+"INA",,3) + " AND " cWhere += "E2_TIPO NOT IN " + FORMATIN(MVTAXA,,3) + " AND " cWhere += "E2_TIPO NOT IN " + FORMATIN(MVPROVIS,,3) + " AND " cWhere += "E2_CODBAR = '" + Space(nTamCodbar) + "' AND " cWhere += "E2_IDCNAB = '" + Space(nTamIdCnab) + "' AND " cWhere += "D_E_L_E_T_ = ' ' " EndIf return cWhere |
...
No hay
...
Não há
...
Templatedocumentos |
---|
...
Templatedocumentos |
---|
...