sto iniziando a sviluppare un' app per la gestione di magazzino
Aggiungere un nuovo prodotto da activity differente
Primo "errore": dato che stai iniziando un nuovo progetto e non modificandone uno vecchio B4A,
molto meglio farlo con le B4XPages!
Secondo e terzo "errore":
B4X:
If sql1.ExecQuerySingleResult2("SELECT count(EAN) FROM products WHERE EAN = ?", Array As String(Label1.Text)) = 0 Then
Log($"Codice non trovato: ${Label1.Text}."$)
Label2.Text = $"Codice non trovato: ${Label1.Text}."$
Else
usare le proprietà della View (Label1.Text) anziché nomi di variabili e dare nomi senza significato alle View (spero non anche alle variabili).
con il codice attuale, alla scansione, non riesco ad estrarre il nome relativo al EAN, ma quello dell' ultimo record
perché con questo sorgente:
B4X:
Private ResultSet1 As ResultSet
ResultSet1 = sql1.ExecQuery("SELECT * FROM products")
'We read only the rowid column and put them in the IDList
RowIDList.Initialize 'initialize the ID list
Do While ResultSet1.NextRow
'RowIDList.Add(ResultSet1.GetInt2(0)) 'add the rowid's to the RowID list
RowIDList.Add(ResultSet1.GetString2(0))
Loop
leggi tutta la tabella, non hai messo nella query che deve prelevare solo il record in cui ci sia l'EAN voluto, ovvero non hai aggiunto la clausola WHERE di SQL:
B4X:
ResultSet1 = sql1.ExecQuery2("SELECT * FROM products WHERE EAN = ?", Array As String(EANCercato))
In questo modo ottieni già l'elenco dei soli record che ti interessano (dovrebbe essere uno solo, no?), senza riempire una List di rowid (da non usare mai - o tranne in rari casi particolari).
Non ho scaricato il progetto, almeno per il momento.
Ripeto i suggerimenti principali:
- crea un progetto B4XPages
- dai alle View dei nomi che abbiano significato, non generici come Label1, EditText1, etc. In questo modo capirai molto meglio il sorgente al primo sguardo.
- non usare le View come dati [ SELECT count(EAN) FROM products WHERE EAN = ?", Array As String(Label1.Text)) ], usa sempre delle variabili (al posto di Label1.Text una variabile EANCercato, ad esempio).
--------------------------------------------------------------------------
P.S. NOTE SUCCESSIVE ALLO SCARICAMENTO DEL TUO PROGETTO.
Per provarlo dovrei trovare quella libreria dal nome un po' ridicolo ?, zbarbarcodescanner, che non so dove sia; perché non usare il
barcode reader di Erel che "è un B4X" e quindi funzionerebbe anche con B4i-iOS (motivo
in più per creare il progetto come B4XPages,
ma non il solo e principale)? Ok, probabilmente non farai anche la versione per iOS ma, a parte il fatto che non si sa mai, in futuro, i vantaggi delle B4XPages sono anche tanti altri.
Vedo che il nome che hai dato al database SQLite è mySQL; è del tutto lecito ma essendo anche il nome di un DBMS, MySql appunto, gliene darei uno diverso.
Tornando a rowid ed al fatto che vuoi...
- Convertire il db in json e caricarlo in un db mysql
nota che in MySql non esiste quel campo speciale rowid, che è specifico di SQLite.
("Convertire... e caricarlo..." - sarebbe meglio aggiornare direttamente online i dati del server remoto MySql e, se non possibile, aggiornare i soli record modificati/aggiunti, non tutto il DB).
Ti suggerirei di fare la tabella "products" in questo modo:
B4X:
CREATE TABLE [Product](
[EAN] TEXT PRIMARY KEY NOT NULL UNIQUE,
[Name] TEXT,
[Qta] INTEGER DEFAULT 0);
ovvero:
- dargli nome al singolare, "Product" e non "products" - mia mania ma soprattutto pratica consigliata.
- usare il campo EAN come chiave primaria della tabella (eliminando, quindi, il campo "id")
- dare zero come valore di default del campo Qta (in questo modo eviti i problemi di valori Null e conseguenti errori)
B4X:
GetSafeDirDefaultExternal
Molto meglio usare la File.DirInternal (se intendi creare solo il progetto B4A, altrimenti
e meglio ancora, B4XPages e xui.DefaultFolder)
