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,