La piattaforma mette a disposizione diverse procedure che consentono al programmatore di interagire con l’interfaccia di Qualiware e con il database.<\/p>\n
Le funzioni elencate sono utilizzabili in ogni script input all’interno di Qualiware – fatta eccezione per quelle che richiedono un parametro relativo al form di partenza<\/strong>, che si possono usare solamente all’interno degli eventi del Form Designer<\/a> o alle personalizzazioni delle pagine standard<\/a>.<\/p>\n <\/p>\n Le seguenti funzioni sono semplici metodi per la manipolazione di tipi di dato nativi di Visual Basic e della libreria di Qualiware.<\/p>\n Ritorna una stringa ottenuta concatenando gli elementi dell\u2019oggetto DBArray<\/span> specificato nel primo parametro, e utilizzando il Ritorna un oggetto di tipo DBArray<\/span> ottenuto dividendo la stringa Converte una stringa in una data, utilizzando il formato della lingua corrente.<\/p>\n Converte una data in una stringa, utilizzando il formato della lingua corrente o quello specificato nel secondo parametro, che \u00e8 opzionale.<\/p>\n Restituisce Ritorna il maggiore tra due valori.<\/p>\n Ritorna il minore tra due valori.<\/p>\n Ritorna una stringa ottenuta replicando la stringa Ritorna una stringa ottenuta trasformando Converte la stringa Converte la stringa Converte un valore in minuti in una stringa nel formato specificato dal parametro pict, che pu\u00f2 essere “HH:MM” oppure “MM:HH:SS”. Se non specificato, il formato \u00e8 “HH:MM”.<\/p>\n Converte in minuti un’orario indicato nella stringa “s” che ha il formato specificato dal parametro pict, che pu\u00f2 essere “HHMM”, “HH:MM” oppure “MM:HH:SS”. Se non specificato, il formato \u00e8 “HHMM”.<\/p>\n Restituisce i minuti trascorsi da Ora_Iniziale a Ora_Finale. Entrambe le ore sono espresse nella forma HHMM. Esporta un oggetto Griglia o VistaDati con NuovoLayout=True in un file Excel, attivandone immediatamente il download. Esempio:<\/p>\n Esporta un oggetto Griglia o VistaDati con NuovoLayout=False in un file Excel, attivandone immediatamente il download. Esempio:<\/p>\n Qualiware gestisce diverse tipologie di documenti e registrazioni, che hanno rappresentazioni molto differenti fra loro in termini di tabelle del database e di chiavi primarie. E’ pertanto necessario potere identificare ciascun documento o registrazione in modo assoluto, attraverso una coppia di campi, che verranno utilizzati per fare riferimento ad esse nelle tabelle che contengono informazioni comuni a tutte le tipologie, come ad esempio la tabella LINKDOC<\/strong> che contiene i collegamenti, o la tabella DESCDOC<\/strong> che contiene le descrizioni.<\/p>\n Della coppia di campi fanno parte il cosiddetto “IDDOC” che \u00e8 la tipologia del documento o registrazione, definita nella tabella TIDOCREG <\/strong>(es. “MN” sono i moduli non conformit\u00e0, “DW” i documenti gestiti nel modulo documentale) , e “CODDOC”, che rappresenta il vero e proprio codice che identifica univocamente il documento o la registrazione all’interno della sua tipologia, ed \u00e8 composto dalla concatenazione delle componenti della chiavi primaria separate dal carattere “|”.<\/p>\n Tramite le seguenti due funzioni \u00e8 possibile determinare il codice assoluto a partire dalla tipologia e dai valori delle chiavi primarie, ed effettuare l’operazione contraria, determinando i valori delle chiavi primarie a partire dal codice assoluto.<\/p>\n Questa funzione restituisce il codice assoluto a partire dalle chiavi primarie del documento o della registrazione.<\/p>\n Parametri:<\/em> Ritorna: il codice assoluto.<\/p>\n Esempi:<\/em> Questa funzione restituisce le componenti della chiave primaria del documento o della registrazione a partire dal codice assoluto.<\/p>\n Parametri:<\/em> Esempi:<\/em> <\/p>\n Questa funzione restituisce un oggetto di tipo QWTable<\/a><\/strong> per la lettura oppure la scrittura di dati da o nel database.<\/p>\n Parametri:<\/em> Queste routine provvedono alla chiusura ed alla distruzione di un oggetto recordset generato per mezzo della funzione “OpenTable<\/span>“. Parametri:<\/em> <\/p>\n Questa funzione attiva il Diagram Builder. Il suo funzionamento \u00e8 spiegato qui<\/a>.<\/p>\n Questa funzione attiva l’editor di immagini. Il suo funzionamento \u00e8 spiegato qui<\/a>.<\/p>\n <\/p>\n Questa funzione consente di archiviare un documento.<\/p>\nManipolazione dati nativi<\/h2>\n
Array2String<\/strong><\/span><\/h3>\n
Function Array2String(ByVal a As DBArray, Optional ByVal separator As String = \",\") As String<\/code><\/p>\nseparator<\/code> specificato.<\/p>\nString2Array<\/span><\/strong><\/h3>\n
Function String2Array(ByVal s As String, Optional ByVal separator As String = \",\", Optional ByVal noRemoveEmpty As Boolean = True) As DBArray<\/code><\/p>\ns<\/code> sulla base della stringa separator<\/code> specificata. Se il terzo parametro \u00e8 True<\/code>, lascia eventuali elementi vuoti.<\/p>\nctod<\/strong><\/span><\/h3>\n
Function ctod(ByVal dateValue As String As String) As Date<\/code><\/p>\ndtoc<\/strong><\/span><\/h3>\n
Function dtoc(ByVal dateValue As Date, Optional ByVal fmt As String = Nothing) As String<\/code><\/p>\nEmpty<\/span><\/strong><\/h3>\n
Function Empty(ByVal expression As Object) As Boolean<\/code><\/p>\nTrue<\/code> se l\u2019espressione specificata (che pu\u00f2 essere anche una variabile) \u00e8 \u201cvuota\u201d. Il concetto di \u201cvuoto\u201d \u00e8 diverso a seconda del tipo, come dal seguente schema:<\/p>\n\n
\"\"<\/code> o Nothing<\/code><\/li>\n0<\/code><\/li>\nFalse<\/code><\/li>\nNothing<\/code><\/li>\n<\/ul>\nmax<\/strong><\/span><\/h3>\n
Function max(ByVal a As Object, ByVal b As Object) As Object<\/code><\/p>\nmin<\/strong><\/span><\/h3>\n
Function min(ByVal a As Object, ByVal b As Object) As Object<\/code><\/p>\nreplicate<\/strong><\/span><\/h3>\n
Function replicate(ByVal str As String, ByVal n As Integer) As String<\/code><\/p>\nstr<\/code> per un totale di n<\/code> volte.<\/p>\nStr<\/strong><\/span><\/h3>\n
Function Str(ByVal num As Object, Optional ByVal nChars As Integer = 15, Optional ByVal ndec As Integer = 0) As String<\/code><\/p>\nnum<\/code> in una stringa di nChars<\/code> caratteri con un numero di decimali pari a ndec<\/code><\/p>\nVal<\/strong><\/span><\/h3>\n
Function Val(ByVal s As String) As Double<\/code><\/p>\ns<\/code> in un numero. N.B. il punto decimale deve sempre essere “.”<\/p>\nValDecimal<\/strong><\/span><\/h3>\n
Function ValDecimal(byval s As String, byval DecimalSeparator As string) As DoubleFunction Val(ByVal s As String) As Double<\/code><\/p>\ns<\/code> in un numero. Nel parametro DecimalSeparator<\/code> \u00e8 possibile specificare il separatore decimale da considerare.<\/p>\nGestione ore<\/h2>\n
Minuti2Stringa<\/h3>\n
<\/code>Function Minuti2Stringa(ByVal minuti As Double, Optional ByVal pict As String = \"\") As String<\/code><\/p>\nStringa2Minuti<\/h3>\n
<\/code>Function Stringa2Minuti(ByVal s As String, Optional ByVal pict As String = \"\") As Double<\/code><\/p>\nTrascorsi<\/strong><\/span><\/h3>\n
Function Trascorsi(ByVal Ora_finale As String, ByVal Ora_iniziale As String) As Double<\/code><\/p>\n
\nN.B. tenere presente che nelle griglie con NuovoLayout=True i valori dei campi con formato HH:MM vengono restituiti col separatore “:”, che va quindi tolto per passarli questa funzione.<\/p>\nEsportazione Griglie in Excel<\/h2>\n
GridEJ2ExcelExport<\/h3>\n
<\/code>Sub GridEJ2ExcelExport(ByVal form As qwWebControls.QWWebPage, ByVal obj As qwWebControls.QWWebGridEJ2)<\/code><\/p>\nGridEJ2ExcelExport(form,<oggetto griglia>)<\/code><\/p>\nGrid2ExcelExport<\/h3>\n
<\/code>Sub Grid2ExcelExport(ByVal form As qwWebControls.QWWebPage, ByVal obj As qwWebControls.QWWebGrid2)<\/code><\/p>\nGrid2ExcelExport(form,<oggetto griglia>)<\/code><\/p>\nGestione dei codici di documenti e registrazioni<\/h2>\n
PackCode<\/span><\/strong><\/h3>\n
Function PackCode(ByVal IdDoc as String, Byval Fld1 as object, Optional Byval Fld2 as object=nothing, Optional Byval Fld3 as object=nothing, Optional Byval Fld4 as object=nothing, Optional Byval Fld5 as object=nothing, Optional Byval Fld6 as object=nothing) As String<\/code><\/p>\n
\nIdDoc-> Codice della tipologia del documento o della registrazione
\nPar1-Par6 -> Componenti della chiave primaria<\/p>\n
\nPackCode(“MN”,”2021 3″) ritorna “20210003|”;
\nPackCode(“A”,”2021 20″,2) ritorna “202100020|2|”;
\nPackCode(“DW”,”P”,”2021″,”00004″,1) ritorna “P|2021|00004|1|”.<\/p>\nUnPackCode<\/strong><\/span><\/h3>\n
Sub UnPackCode(ByVal pTipoDoc As String, ByVal pCodDoc As String, ByRef fld1 As Object, Optional ByRef fld2 As Object = Nothing, Optional ByRef fld3 As Object = Nothing, Optional ByRef fld4 As Object = Nothing, Optional ByRef fld5 As Object = Nothing, Optional ByRef fld6 As Object = Nothing)<\/code><\/p>\n
\nIdDoc -> Codice della tipologia del documento o della registrazione
\nCodDoc -> Codice assoluto del documento
\nPar1-Par6 -> Variabili di output che conterranno le componenti della chiave primaria<\/p>\n
\nUnPackCode(“MN”,”20210003|”, fld1) ritorna fld1=”2021 3″;
\nUnPackCode(“A”,”202100020|2|”,fld1,fld2) ritorna fld1=”2021 20″ e fld2=2;
\nUnPackCode(“DW”,”P|2021|00004|1|”,fld1,fld2,fld3,fld4) ritorna fld1=”P”, fld2=”2021″, fld3=”00004″ e fld4=1.<\/p>\nGestione delle tabelle<\/h2>\n
OpenTable<\/strong><\/span><\/h3>\n
OpenTable(ByVal DB As QWDatabase, ByVal sql As String, ByVal parameters As AssocArray, ByVal all_records As Boolean, ByVal in_scrittura As Boolean, Optional ByRef errmsg As String = Nothing) As QWTable<\/code>
\n<\/span><\/p>\n
\nDB –> Riferimento all’oggetto QWDatabase che rappresenta la connessione al database
\nSQL -> \u00c8 necessario specificare l’esatta stringa SQL di lettura\/scrittura. Eventualmente comprensiva di parametri per la selezione dei record (essi dovranno essere preceduti dal carattere “:” ed il nome utilizzato per la loro identificazione sar\u00e0 case sensitive).
\nPARAMETERS -> \u00c8 un array associativo gestito per mezzo di un campo chiave il cui nome \u00e8 il nome del parametro di selezione record da utilizzare ed il cui valore \u00e8 appunto il valore da ricercare.
\nALL_RECORDS -> Questo parametro ha significato solo se<\/strong> la query SQL non ha clausola where<\/code>. In questo caso, normalmente l’oggetto QWTable \u00e8 utilizzato non per recuperare tutti i record, ma per effettuare ricerche mirate utilizzando i metodi FindKey e SetRange dell’oggetto rowset. Per evitare di recuperare tutti i record, il parametro \u00e8 impostato a False di default<\/strong>. Cos\u00ec facendo, nel momento in cui la tabella viene aperta, l’oggetto RowSet non conterr\u00e0 record, e verr\u00e0 alimentato dalle registrazioni rilevanti solo dopo l’uso di FindKey e SetRange. Se, invece, si desidera recuperare tutti i record della tabella fin dall’apertura, mettere il parametro a “True”.
\nIN_SCRITTURA -> Di default \u00e8 impostato a FALSE e cos\u00ec viene utilizzato nella maggior parte dei casi. Se viene impostato a TRUE l’oggetto recordset Qualiware restituito sar\u00e0 in grado di effettuare l’inserimento di nuovi record nella tabella, la modifica di record esistenti oppure la cancellazione di essi.
\nERRMSG -> Nel caso in cui si verificasse qualche errore, il testo di quest’ultimo sarebbe reperibile all’interno di questa variabile.<\/p>\nCloseTable<\/span><\/strong><\/h3>\n
Sub CloseTable(ByRef recordset As QWTable)<\/code>
\n<\/strong><\/span><\/p>\n
\nDeve sempre essere utilizzata al termine dell’utilizzo della funzione “OpenTable<\/span>“.
\nNon viene restituito alcun valore.<\/p>\n
\nRECORDSET -> Oggetto da distruggere generato da “OpenTable<\/span>“.<\/p>\nElaborazione grafica<\/h2>\n
DiagramBuilder<\/span><\/strong><\/h3>\n
Sub DiagramBuilder(ByVal PostbackProcedure As qwWebControls.QWWebProcedureCode, ByVal Diagram As String, Optional ByVal ExportPNG As Boolean = False, Optional ByVal ExportSVG As Boolean = False, Optional ByVal AlwaysUseNew As Boolean = False,<\/code>Optional ByVal NoSave As Boolean = False,<\/code>Optional ByVal FlowCharFile As String = Nothing<\/code>)<\/code><\/p>\nImageEditor<\/span><\/strong><\/h3>\n
Sub ImageEditor(Byval Image As QWWebImage, ByVal PostbackProcedure As qwWebControls.QWWebProcedureCode)<\/code><\/p>\nArchiviazione di documenti<\/h2>\n
DW_Archivia<\/span><\/strong><\/h3>\n
Function DW_Archivia(ByVal QWSess As QWSession, ByVal pTipo As String, ByVal pTipo_Cont As String, ByRef pNumero As String, ByVal pInd_Rev As Integer, ByVal pTitolo As String, ByVal Campi As AssocArray, ByVal pPubblica As Boolean, ByVal pNomeFile As String, optional ByVal pData as object=nothing,Optional Byval pSovrascrivi As Boolean=false, Optional ByVal pNoAuditTrail As Boolean=false, Optional ByVal pResetWorkFlow As Boolean = False) As String<\/span><\/code><\/p>\n