DMIMIX_1_PUNTO_DE_ENTRADA_FILTRREM_PARA_MODIFICAR_LA_QUERY_ANTES_DE_LA_TRANSMISIÓN_DEL_REMITO_ELECTRÓNICO_COT

PARAMIXB -> Array

PARAMIXB[1] //Query principal

PARAMIXB[2] //Serie de la factura

PARAMIXB[3] //Factura inicial

PARAMIXB[4] //Factura final

PARAMIXB[5] //Planta

PARAMIXB[6] //Puerto

#Include 'Protheus.ch'

User Function FILTRREM()

Local cQuery := PARAMIXB[1] //Query principal
Local cSerie := PARAMIXB[2] //Serie de la factura
Local cNotaIni := PARAMIXB[3] //Factura inicial
Local cNotaFim := PARAMIXB[4] //Factura final
Local cPlanta := PARAMIXB[5] //Planta
Local cPorto := PARAMIXB[6] //Puerto

//Variable cQuery puede modificarse la query principal

cQuery := "SELECT * FROM "
cQuery += RetSqlName('SF2') + "  SF2 "
cQuery += " WHERE SF2.F2_FILIAL = '" + xFilial('SF2') + "' AND "
cQuery += " SF2.F2_SERIE = '" + cSerie + "'  AND "
cQuery += " SF2.F2_DOC >= '" + cNotaIni + "'  AND "
cQuery += " SF2.F2_DOC <= '" + cNotaFim + "'  AND "
cQuery += " ( (SF2.F2_FORMUL='S' AND SF2.F2_FLREMEL NOT IN ('E') ))"
cQuery += " AND SF2.D_E_L_E_T_ = ' ' "

Return cQuery