Questo sito usa i cookie per fornirti un'esperienza migliore. Cliccando su "Accetta" saranno attivate tutte le categorie di cookie. Per decidere quali accettare, cliccare invece su "Personalizza". Per maggiori informazioni è possibile consultare la pagina Cookie policy.

PersonalizzaAccetta
CHIUDI
Autore Messaggio
U651920 23/01/2026 07:46 U651920

Problema script visualizzazione carichi/acquisti

Buongiorno, ho un problema nel seguente script, praticamente lo script in questione visualizza il totale dei pezzi entrati nel magazzino in un determinato periodo. Il problema è che considera solo la causale acquisto e non considera tutte le altre causali. Come posso sistemare la cosa? credo sia una cosa abbastanza veloce no?

Option Explicit

Dim Documento
Dim TotaleFatturato
Dim TotNoIva
Dim DataInizioStatistica
Dim DataFineStatistica
Dim f
Dim objFSO
Const ForReading = 1
Dim DataInizio
Dim DataFine


Set objFSO = CreateObject("Scripting.FileSystemObject")
Set f = objFSO.OpenTextFile("\\srv2016\Shares\StatisticaCarichi.txt", ForReading)

DataInizioStatistica = f.ReadLine
DataFineStatistica = f.ReadLine
f.close

Dim TotMovimenti
Dim RigheMovimenti
Dim rigaDoc

TotMovimenti = 0

Set RigheMovimenti = Product.SearchDocRows(Rdy.toDate(DataInizioStatistica), Rdy.toDate(DataFineStatistica))
For Each rigaDoc In RigheMovimenti
    If rigaDoc.Doc.DocCause.IsPurchase Then ' Considera solo causali di tipo ACQUISTO
        TotMovimenti = TotMovimenti + rigaDoc.Quantity ' Somma la quantita'
    End If
Next
Set RigheMovimenti = Nothing
Response.Write("" & TotMovimenti)

Grazie.
U5210 23/01/2026 08:53 Campo libero: U5210

Buongiorno,
il filtro limitato ai soli documenti con causale di tipo "acquisto" è dovuto alla condizione che è inserita legata alla proprietà rigaDoc.Doc.DocCause.IsPurchase

Intervenendo su quella condizione si può decidere di considerare causali diverse, sempre facendo capo alla proprietà DocCause (in questo caso andrà però fatto in base alle specifiche causali configurate sul vostro archivio)
https://help.readypro.it/it/1796/doccause-object

od al limite si può fare riferimento al tipo dei documenti (proprietà Doc.DocType https://help.readypro.it/it/1800/doctype-property)

Se vi servisse un aiuto più specifico per la personalizzazione dello script, vi rimando eventualmente al nostro servizio di teleassistenza
U651920 26/01/2026 07:33 U651920

Praticamente devo mettere (or rigaDoc.Doc.DocType(5))? per poter caricare i ddt di carico?
U5210 26/01/2026 09:33 Campo libero: U5210

Buongiorno,

DocType è una proprietà numerica, non una collection quindi al limite si può usare nella forma

If rigaDoc.Doc.DocType=5 Then

Come ripeto comunque, dato che non avete dimestichezza con il linguaggio di scripting (cosa che ovviamente è comprensibile, ad ognuno il suo lavoro) tornerei a suggerire di utilizzare il nostro servizio di teleassistenza.
Per scrivere uno script corretto servirebbe infatti vedere nello specifico il vostro archivio, perchè c'è da capire (ad esempio) se considerare anche le fatture accompagnatorie di acquisto, se ci sono delle causali da escludere, ecc.

Quindi inserire semplicemente un

If rigaDoc.Doc.DocType=5 Then

non è detto che riporti poi il risultato che realmente desiderate
U651920 26/01/2026 10:51 U651920

Cosi dovrebbe funzionare, non è spiegato molto bene nel manuale degli script

Cosa intendete per "considerate le fatture accompagnatorie di acquisto"?
Causali da escludere non ne abbiamo, ci servono tutte quelle della sezione ddt carico di magazzino

Se dovessi escluderne alcune basterebbe porre la riga diversa dall'id della causale?

U5210 26/01/2026 11:02 Campo libero: U5210

Citazione:
non è spiegato molto bene nel manuale degli script

É un manuale tecnico fatto per chi conosce VBScript e/o javascript, é piuttosto normale che non risulti chiaro a chi non conosce il linguaggio alla base


Citazione:
dovessi escluderne alcune basterebbe porre la riga diversa dall'id della causale?

Come ripeto, per un aiuto specifico devo rimandarvi necessariamente al nostro servizio di teleassistenza