Filtrare articoli per data aggiornamento prezzo di vendita

Per filtrare gli articoli in base alla data di modifica del prezzo utilizziamo uno script fa voi fornitoci ci siamo accorti che RowItem.CustomField(563)  corrisponde alla data di aggiornamento del prezzo di vendita per uno qualunque dei listini di vendita mentre a noi serve filtrarli per la data di aggiornamento del prezzo di vendita solo per un determinato listino.
Al momento per filtrare gli articoli dobbiamo aggiungere a mano tramite filtri avanzati Data aggiornamento prezzo di vendita (dopo averla selezionata ci fa scegliere tra i vari listini) e in questo modo funziona, ho fatto la prova modificando il prezzo di un articolo solo per un determinato listino.

Come si può fare utilizzando solo solo lo script per filtrare le righe?


Riporto qui sotto lo script attuale

Option Explicit

Dim Qtot
Dim Prezzo
Dim Data
Dim TipoEtichetta
Dim DataPrezzo


Data = "16/04/2012" 'Specificare qui dentro i doppi apici la data di inizio

Qtot = RowItem.CustomField(340)                 'Quantità totale a magazzino
Prezzo = RowItem.SellingPrice(13, False).Price  'Prezzo di vendita del listino ID 13
DataPrezzo = RowItem.CustomField(563)           'Data Modifica Prezzo
Data = Rdy.toDate(Data)
TipoEtichetta = RowItem.CustomField(170)

If DataPrezzo >= Data and Qtot > 0 and Prezzo > 0 and TipoEtichetta <> "P" Then
  Response.Write("SHOW")
Else
  Response.Write("HIDE")
End If