Vai al contenuto

Visualizzare la data dell'ultimo scarico di un articolo

Aggiornato il 11.05.2020
Sfruttando il metodo SearchDocRows e' possibile creare report statistici anche complessi

Ad esempio il seguente script determina la data dell'ultimo scarico effettuato con DDT, Fatture accompagnatorie, Documenti non fiscali e ricevute di cassa per un determinato articolo
Option Explicit
 
Dim UltimoMovimento
Dim RigaMovimento
Dim Documento
Dim DataMovimento
 
UltimoMovimento=""
For Each RigaMovimento In Product.SearchDocRows
    Set Documento=RigaMovimento.ParentDoc
    Select Case Documento.DocType
        Case 1, 2, 3, 14
            ' 1 = DDT
            ' 2 = Fatture accompagnatorie
            ' 3 = Documenti non fiscali
            ' 14 = Ricevute di cassa
            DataMovimento = Documento.DocDate
            If UltimoMovimento="" Then
                UltimoMovimento = DataMovimento
            ElseIf DataMovimento > UltimoMovimento Then
                UltimoMovimento = DataMovimento
            End If
    End Select
Next
Response.Write(UltimoMovimento)