Visualizzare la data dell'ultimo scarico di un articolo

Creato 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)

Login