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
USER0 05/03/2013 10:29 USER0

Script unione di più campi con condizione

Salve,
ho creato uno script, copiandone e modificandone alcuni di esempio presenti sul vostro sito e ho creato il seguente:
descrizione = RowItem.CustomField(20) & " (CODICE " & RowItem.CustomField(15) & ")" & vbCrLf
descrizione = descrizione & RowItem.CustomField(21) & vbcrlf
descrizione = descrizione & "Prezzo " & RowItem.CustomField(49) &" Euro IVA esclusa " & RowItem.CustomField(120) & vbcrlf
descrizione = descrizione & vbcrlf
Rdy.ResponseWrite(descrizione)

In pratica si tratta di inserire, nel corpo del documento, una prima riga con la descrizione del documento e il codice racchiuso tra parentesi, una seconda riga con la descrizione estesa e l'ultima racchiude una descrizione fissa, il prezzo un'altra descrizione fissa e l'unità di misura;
Il tutto funziona benissimo tranne quando ho esigenza di inserire, invece del prezzo la descrizione "OMAGGIO" in parte ho risolto inserendo una nuova unità di misura "OMAGGIO" ma (giustamente) la descrizione del prezzo, il prezzo "0" e la descrizione posta davanti all'unità di misura, rimangono.

Come posso aggiungere una condizione che controlla se il prezzo è "0" e in questo caso deve stampare solo l'unità di misura ignorando le descrizioni e il prezzo?
Vi ringrazio molto per la disponibilità
Saluti
USER0 05/03/2013 11:49 USER0

Purtroppo non ci e' possibile fornire supporto gratuito sul forum relativamente a contenuti HTML, script JScript / VBScript e/o a personalizzazioni del foglio di stile (CSS).
Per questo tipo di supporto e' necessario utilizzare il servizio di teleassistenza.

SERVIZIO DI TELEASSISTENZA
Se disponi di una connessione a banda larga (ADSL, Fastweb, ..), CODICE SRL puo' offrirti un servizio di formazione in teleassistenza.
Da questa pagina web: http://www.readypro.it/Teleassistenza-Ready-Pro-2-ore.10.68.55.gp.88.-1.uw.aspx esiste la possibilità di acquistare dei pacchetti ore per ricevere della formazione su Ready Pro direttamente da parte di un nostro tecnico/consulente.
Se disponi già di un pacchetto ore prepagato puoi utilizzare il seguente modulo online per richiedere un appuntamento http://www.readypro.it/teleassistenza
Per maggiori informazioni e' possibile contattare commerciale@codice.it oppure consultare la seguente pagina web http://www.readypro.it/teleassistenza-software-gestionale.aspx
USER0 05/03/2013 12:08 Campo libero: USER0

Puo' provare cosi'

descrizione = RowItem.CustomField(20) & " (CODICE " & RowItem.CustomField(15) & ")" & vbCrLf
descrizione = descrizione & RowItem.CustomField(21) & vbcrlf
If Rdy.toDouble(RowItem.CustomField(49))=0 Then
   descrizione=descrizione & "OMAGGIO"
Else
   descrizione = descrizione & "Prezzo " & RowItem.CustomField(49) &" Euro IVA esclusa " & RowItem.CustomField(120) & vbcrlf
End If
descrizione = descrizione & vbcrlf
Rdy.ResponseWrite(descrizione)

Per il futuro le ricordo comunque che il supporto su script e formule viene fornito esclusivamente in teleassistenza. Non e' possibile ricevere supporto sul linguaggio di scripting sul forum
USER0 05/03/2013 12:19 USER0

Funziona perfettamente, grazie 1000 Ok good!
Non farò più domande relative agli script se non in teleassistenza.
Grazie per la disponibilità