Esecuzione di un report con formula di selezione e visualizzazione in anteprima

  ‘ Il seguente frammento di codice mostra come eseguire un report REPX e farne scaricare il risultato in formato PDF ‘ In questo esempio viene passata una formula di selezione anzichè utilizzare un parametro dim sel as string=”{m.MATRICOLA}='”+form.findcontrol(“ELENCO”).ReadField(“MATRICOLA”)+”‘” PrintReport2(form, “ETICHETTA COMPLETA.REPX”, null, sel, null, “Anteprima etichetta”,””,False,null)

WebService: invio di dati tramite un servizio WebApi REST

‘ In questo esempio viene effettuata la chiamata ad un servizio WebApi REST (webMethod) per inviare dati in formato Json Dim url As String = “http://192.168.0.244:8999/api/UDC/VersaDaProduzione” Dim webRequest__1 As Net.HttpWebRequest = DirectCast(Net.WebRequest.Create(url), Net.HttpWebRequest) webRequest__1.Method = “POST” webRequest__1.ContentType = “application/json” webRequest__1.Accept = “application/json” ‘ Creazione del JSON di invio dei dati dim json as string json…

WebService: lettura di dati da un servizio WebApi REST

‘ In questo esempio viene effettuata la chiamata ad un servizio WebApi REST (webMethod) che restituisce informazioni in formato Json Dim url As String = “http://192.168.0.244:8999/api/UDC/DecodificaBarcode?barcode=” + escape(form.findcontrol(“BARCODE”).Value) Dim webRequest__1 As Net.HttpWebRequest = DirectCast(Net.WebRequest.Create(url), Net.HttpWebRequest) webRequest__1.Method = “GET” webRequest__1.ContentType = “application/json” webRequest__1.Accept = “application/json” ‘ Recupero della risposta Dim ok as boolean = true try Using resp…

Definizione di una funzione o una procedura in uno script

‘ Il seguente frammento di codice mostra come sia possibile definire una nuova funzione o una nuova procedura che può essere riutilizzata nell’ambito di uno script all’interno di un evento, un plugin o un task dim f = Function(byval cod as string) ‘ qui si può inserire il corpo della funzione ‘ si possono inserire…

Incorporamento di un video da YouTube in un form

  ‘ Il seguente snippet può essere utilizzato per incorporare un video da YouTube in un form. ‘ Il funzionamento si basa sull’inserimento di un oggetto “Etichetta” di nome “VIDEO”. al cui testo viene assegnato il codice HTML necessario per visualizzare il video. ‘ Il codice può essere inserito nell’eventoCarica o nell’eventoRender ‘ Nell’esempio l’ID…

Lettura delle proprietà di un e-mail da file .MSG o .EML

  ‘ Il seguente snippet può essere utilizzato per leggere le proprietà di un e-mail salvata in formato .MSG o .EML tramite il componente MsgReader presente a partire dalla release 2015.17.2p ‘ L’esempio si riferisce alla generazione di un ticket a partire da una e-mail, determinando il codice del cliente utilizzando il dominio del mittente…

Audit Trail: registrazione automatica ad ogni salvataggio di un form

  ‘ Il seguente snippet può essere utilizzato per forzare la registrazione di una entry nell’Audit Trail ad ogni salvataggio di un form. Ciò può essere utile per creare automaticamente una copia di backup dei dati. ‘ NOTA: lo snippet è applicabile dalla release 2015.17.2e in poi, e dalla versione 2015.17.2p il pulsante “AUDIT TRAIL”…

Stampa di un file tramite i Cloud Components

‘ Il seguente snippet consente di inviare direttamente alla stampante predefinita, o ad una stampante specifica, un file presente sul server, tramite i Cloud Components ‘ Può essere utilizzato sulle versioni dalla 2015.17 in poi installando una version dei Cloud Components successiva al 25/10/2017 ‘ NOTA: sul PC deve essere installato il programma che consente…

Grafico: esempio di istrogramma a barre sovrapposte

‘ Il seguente snippet crea un grafico a barre sovrapposte definendo i “Settings” e assegnandoli all’omonima proprietà dell’oggetto “Grafico”. ‘ Per informazioni sul significato dei singoli parametri di configurazione vedere qui: https://www.jqwidgets.com/jquery-widgets-documentation/documentation/jqxchart/jquery-chart-api.htm Dim d As New DBArray() d.Add(New DBArray(“Day”, “Running”, “Swimming”, “Cycling”)) d.Add(New DBArray(“Monday”, 30, 0, 25)) d.Add(New DBArray(“Tuesday”, 25, 25, 0)) d.Add(New DBArray(“Wednesday”, 30,…