[SQL] problea con il converititore cint di access

[darksoullight]

salve a tutti.ho un grande problemma con il convertitore cint di access.
spiego meglio postando la mia query:

SELECT CCLI, DCLI, Mid([Articolo],1,6) AS ARTS, DESC, Sum(PrezzoFas1) AS QTAS
FROM Ordini
WHERE (((Date()-[DataSped])>=Cint([Forms]![MAlfSellout]![toll])))
GROUP BY CCLI,DCLI, Mid([Articolo],1,6),DESC
HAVING (((CCLI)=[Forms]![MAlfSellout]![clistampa]) AND ((Sum(PrezzoFas1))>0))
ORDER BY Mid([Articolo],1,6),DESC;

i dati così ottenuti vanno a finire in un report.
i valori richiesti sono dentro una form fatta con visual basic.
se lancio il report dalla form ottengo un errore che dice che i dati sono troppo complessi mentre se lancio il report manualmente esso viene eseguito correttamente.
togliendo la cint il problema viene aggirato ma non esegue la query in maniera corretta in quanto prende solamente la prima differenza utile e scarta tutte le altre.
il problema non sta nella differenza delle date in quanto ho usato sia la datediff che la normale sottrazione.
potete aiutarmi?
grazie

[LoryOne]

Prova a vedere se così cambia qualcosa:

SELECT CCLI, DCLI, Left$(Articolo,6) AS ARTS, DESC, Sum(PrezzoFas1) AS QTAS FROM Ordini WHERE Date()-[DataSped]>=Cint([Forms]![MAlfSellout]![toll]) GROUP BY CCLI,DCLI, ARTS ,DESC HAVING CCLI=[Forms]![MAlfSellout]![clistampa]) AND QTAS> 0 ORDER BY ARTS DESC;

[darksoullight]

grazie mille per il tuo aiuto ma il problema c'è ancora!
penso davvero dipenda dalla cint

[miciomao]

A me a prima vista sembra che tu stia usando delle parole riservate proprio in sql, vedi il campo DESC
prova a rinominare quel campo

poi sembra che tu stia cercando un numero in un campo data con Cint

il campo [toll] che proprietà ha?

[darksoullight]

desc è tra [], il campo non è data ma è numerico (ad esempio 50,20,100..) ed è un campo di una form.

[miciomao]

scusa ma secondo me c'è qualcosa che non va
tu scrivi

(Date()-[DataSped])>=Cint([Forms]![MAlfSellout]![toll])

Date()-[DataSped] fa una data (00/00/0000)
e poi li dentro cerchi un numero maggiore o uguale a [toll]

questo vuoi fare ?

[LoryOne]

Inviato da darksoullight

se lancio il report dalla form ottengo un errore che dice che i dati sono troppo complessi mentre se lancio il report manualmente esso viene eseguito correttamente.

Lanciare il report dalla form significa che hai scritto codice VBA ed associato tale codice alla pressione di un tasto ?
Potresti cortesemtne mostrare il codice ?

[darksoullight]

Inviato da miciomao

scusa ma secondo me c'è qualcosa che non va
tu scrivi

Date()-[DataSped] fa una data (00/00/0000)
e poi li dentro cerchi un numero maggiore o uguale a [toll]

questo vuoi fare ?

Date()-[DataSped] dovrebbe restituire un int se non sbaglio che dovrebbe essere confrontato con un altro int contenuto in [toll].
sono entrambi dei valori interi.

Inviato da LoryOne

Lanciare il report dalla form significa che hai scritto codice VBA ed associato tale codice alla pressione di un tasto ?

esattamente.cioè io ho una form e quando premo stampa dovrebbe partirtre la stampa.
ecco il codice:

Option Compare Database
Option Explicit

Private Sub PulsAnnulla_Click()

    DoCmd.Close

Exit_PulsAnnulla_Click:
    Exit Sub

Err_PulsAnnulla_Click:
    MsgBox Err.Description
    Resume Exit_PulsAnnulla_Click
End Sub

Private Sub PulsAnteprima_Click()

    Dim clistampa As Long
    Dim k As Integer
    Dim toll As Integer
    Dim StrSql As String
    Dim qry As QueryDef
    toll = 0

            If Not IsNull(cli01) Then clistampa = cli01
            If Not IsNull(tolleranza) Then toll = tolleranza
            
            On Error GoTo Err_PulsStampa_Click

            DoCmd.OpenReport "Sellout_PDF", acViewNormal
            On Error GoTo 0
            DoCmd.Close acForm, "MSellout"
        
Exit_PulsStampa_Click:
    Exit Sub

Err_PulsStampa_Click:
    MsgBox Err.Description
    Resume Exit_PulsStampa_Click
End Sub