' Il seguente frammento di codice mostra come eseguire un report REPX e farne scaricare il risultato in formato PDF
' L'esempio è riferito ad un report che estrae la stampa di un questionario
dim numdoc as string
UnPackCode("SC",form.findcontrol("COD_QUEST").value,numdoc)
Dim selection, f as string
selection = "{d.NUMDOC} = """ + numdoc + """"
f = PrintReportWeb(form.Session, "STAMPA QUESTIONARIO.repx", New DBArray, selection, New DBArray, New AssocArray, "PDF") ' !!! ATTENZIONE: la chiamata a PrintReportWeb non va MAI inserita all'interno di una transazione
If File(Q95_PATH_TEMP + "\" + f) Then
BrowserOpen(Form, CreateDownloadRequest(form, Q95_PATH_TEMP + "\" + f, False, "QUESTIONARIO.PDF"))
End If