doctype aggiustamenti di magazzino

Buongiorno,

Con lo script di esempio qui sotto si possono conteggiare le qtà articoli movimentate con i documenti.


UltimaVendita=""
For Each RigaMovimento In Product.SearchDocRows
  Select Case RigaMovimento.ParentDoc.DocType
    Case 1,2,3,4      
      ' 1 = DDT
      ' 2 = Fatture accompagnatorie
      ' 3 = Documenti non fiscali
      ' 4 = Ricevute di cassa
      DataVendita = Rdy.toDate(RigaMovimento.ParentDoc.CustomField(20))
      If UltimaVendita="" Then
        UltimaVendita = DataVendita
      ElseIf DataVendita > UltimaVendita Then
        UltimaVendita = DataVendita
      End If
  End Select
Next
Rdy.ResponseWrite(UltimaVendita)


Esiste una funzione simile per avere le qtà movimentate come "Aggiustamenti di magazzino"?

Grazie