Venduto del giorno

Si puo' estrapolare un report di questo tipo dalla lista articoli con qualche script.
In particolare uno script che calcoli le quantita' vendute dal... al...

https://www.readypro.it/help/it/2283/calcolo-delle-quantita-vendute-in-uno-specifico-periodo


SUPPORTO PER LO SVILUPPO DI SCRIPT E PROCEDURE PERSONALIZZATE
Data l'eterogeneita' e la complessita' delle richieste non abbiamo possibilita' di fornire un supporto gratuito per lo sviluppo di script e procedure personalizzate.
Se si hanno le dovute conoscenze di programmazione esiste una reference, sufficiente per lo sviluppo, a questo indirizzo:
https://www.readypro.it/help/it/1600/ready-pro-scripting-language
All'interno della reference e' presente anche una sezione con numerosi esempi.
In alternativa e' possibile acquistare delle ore di teleassistenza per farsi aiutare, nello sviluppo degli script, da parte di un nostro tecnico

Perfetto.
Grazie
saluti

Scusami se riapro questa conversazione.
Lo script di esempio va bene ma vorrei che invece di estrarre il venduto di tutti i documenti, lo facesse solo per i documenti del tipo "ricevuta di cassa".
Ho fissato un appuntamento per vedere se è possibile farlo ma dovrò aspettare giovedi prossimo. Non è che per caso fosse possibile avere la risposta qui?


Option Explicit

Dim TotMovimenti
Dim DataInizioStatistica
Dim DataFineStatistica
Dim rigaDoc
Dim RigheMovimenti

TotMovimenti = 0
DataInizioStatistica = DateAdd("d",-30,Rdy.Today())
DataFineStatistica = Rdy.Today()
Set RigheMovimenti = Product.SearchDocRows(DataInizioStatistica, DataFineStatistica)
For Each rigaDoc In RigheMovimenti
    If rigaDoc.Doc.DocCause.IsSelling Then ' Considera solo causali di tipo VENDITA
        TotMovimenti = TotMovimenti + rigaDoc.Quantity ' Somma la quantita'
    End If
Next
Set RigheMovimenti = Nothing
Response.Write("" & TotMovimenti)





Invece di

If rigaDoc.Doc.DocCause.IsSelling Then

usa

If rigaDoc.Doc.DocCause.IsSelling AND rigaDoc.Doc.DocType=14 Then

Grazie infinite mi hai risolto un problema enorme.
saluti

Ciao,
in un codice come questo,
si può aggiungere di considerare solo le quantità movimentate da un magazzino specifico? Nel nostro caso del magazzino "200" (sarebbe il codice del magazzino).

Option Explicit

Dim TotMovimenti
Dim DataInizioStatistica
Dim DataFineStatistica
Dim rigaDoc
Dim RigheMovimenti

TotMovimenti = 0
DataInizioStatistica = DateAdd("d",-1,Rdy.Today())
DataFineStatistica = Rdy.Today()
Set RigheMovimenti = Product.SearchDocRows(DataInizioStatistica, DataFineStatistica)
For Each rigaDoc In RigheMovimenti
    If rigaDoc.Doc.DocCause.IsSelling AND rigaDoc.Doc.DocType=14 Then ' Considera solo causali di tipo VENDITA
        TotMovimenti = TotMovimenti + rigaDoc.Quantity ' Somma la quantita'
    End If
Next
Set RigheMovimenti = Nothing
Response.Write("" & TotMovimenti)

Per questo tipo di supporto devo purtroppo rimandarvi al nostro servizio di teleassistenza
L'altra volta ho fatto una eccezione, ma sul forum non possiamo fornire supporto allo sviluppo di script

Comprendo perfettamente e l'altra volta è stato fin troppo gentile e la ringrazio ancora. La richiesta l'ho fatta solo per capire se avesse senso, cioè se è fattibile al punto da richiedere l'assistenza telefonica. Certe volte per chi non è del mestiere non è facile capire se una richiesta è fattibile o è semplicemente insensata.
saluti

Modificare lo script per tenere conto anche del magazzino collegato al documento tecnicamente e' possibile. Sul fatto che abbia senso dipende pero' da cosa vorreste ottenere: non sapendo come sono configurati i vostri magazzini e' difficile dare una opinione in questa direzione. E' perche'  dovreste calcolare il venduto in uno specifico punto vendita, per il quale usate un magazzino specifico?

esatto! a me serve il venduto di uno specifico punto vendita e l'unica cosa che mi è venuta in mente è applicare il filtro magazzino.

Sì, allora direi che potete farlo