Info su script

Direi che prendendo la causale

Causale = rigaDoc.ParentDoc.CustomField(40)

si puo' controllare se nella descrizione della causale c'e' la parola "VENDITA"


If Instr(Causale, "VENDITA")>0 then
    ' somma i movimenti
else
    ' non e' una vendita quindi non sommo i movimenti
end if

Errore nell'esecuzione dello script
Riga : 1   Colonna : 0
Source : Errore di run-time di Microsoft VBScript
Dettaglio errore : Necessario oggetto: 'rigaDoc'

dove sbaglio ?

Causale = rigaDoc.ParentDoc.CustomField(40)
TotMovimenti = 0
DataInizioStatistica = "01/03/2008"
DataFineStatistica = "31/03/2008"
Set RigheMovimenti = RowItem.SearchDocRows(Rdy.toDate(DataInizioStatistica), Rdy.toDate(DataFineStatistica))
For Each rigaDoc In RigheMovimenti
Select Case rigaDoc.ParentDoc.DocType
Case 1, 2, 3 ' DDT, fatture accompagnatorie e documenti non fiscali
If Instr(Causale, "VENDITA")>0 then
TotMovimenti = TotMovimenti + Rdy.toDouble(rigaDoc.CustomField(30)) ' Somma la quantita'
else
end if
End Select
Next
Rdy.ResponseWrite("" & TotMovimenti)

Causale = ... devi metterlo subito prima di If instr...
perche' rigaDoc ad inizio script non e' inizializzato.
Viene inizializzato solo dopo le operazioni "For each ..."

Nel tuo caso dovrebbe quindi essere


TotMovimenti = 0
DataInizioStatistica = "01/03/2008"
DataFineStatistica = "31/03/2008"
Set RigheMovimenti = RowItem.SearchDocRows(Rdy.toDate(DataInizioStatistica), Rdy.toDate(DataFineStatistica))
For Each rigaDoc In RigheMovimenti
Select Case rigaDoc.ParentDoc.DocType
Case 1, 2, 3 ' DDT, fatture accompagnatorie e documenti non fiscali
Causale = rigaDoc.ParentDoc.CustomField(40)
If Instr(Causale, "VENDITA")>0 then
TotMovimenti = TotMovimenti + Rdy.toDouble(rigaDoc.CustomField(30)) ' Somma la quantita'
else
end if
End Select
Next
Rdy.ResponseWrite("" & TotMovimenti)


Ti ricordo che per gli script, data l'eterogeneita' e la complessita' delle richieste non abbiamo possibilita' di fornire un supporto sul forum per lo sviluppo. Se si hanno le dovute conoscenze di programmazione si puo' utilizzare la reference, altrimenti e' necessario acquistare un paio d'ore di teleassistenza e farsi aiutare nella creazione degli script da un nostro tecnico   

Hai perfettamente ragione. Scusami.
Intanto grazie per avermi "corretto" lo script.