administracion@riversa.es

Buenas noches:

Ya he conseguido abrir una página aplicando múltiples filtros, gracias a la pista que me dieron en el ScaleUp2020.

He cambiado la Query por un procedimiento donde hago un filtro de una tabla y concateno el resultado con “|” en una variable que luego aplico como filtro en la otra tabla.

El código por si a alguien le puede servir:

……

begin
//Filtramos los Documentos de Ventas por Tipo Pedido y por el Id Del usuario
SalesHeader.SetFilter(“Document Type”, ‘Order’);
SalesHeader.SetFilter(“Assigned User ID”, database.UserId());

//Concatenamos por el caracter | todos los Nº de Pedidos del Usuario
if SalesHeader.Find(‘-‘) then
repeat
OrderSales += SalesHeader.”No.” + ‘|’;
until (SalesHeader.Next() = 0);

SalesHeader.SetFilter(“No.”, ”); // Es para quitar el aviso de que se tiene que modificar.
SalesHeader.Reset();

OrderSales := DelChr(OrderSales, ‘>’, ‘|’); // Es para eliminar el último caracter de la cadena concatenada

SalesShipmentLine.SetFilter(“Type”, ‘Item | Resource | G/L Account’);
SalesShipmentLine.SetFilter(“Qty. Shipped Not Invoiced”, ‘<>0’);
SalesShipmentLine.SetFilter(“Order No.”, OrderSales);

…….

Y luego un page.Run(PAGE::JTRSalesShipPendInvo, SalesShipmentLine);

Gracias,

 

 

 

#1017377