Domino 9 und frühere Versionen > ND7: Entwicklung

Artikelbilder anzeigen mittels ID, ID-Datensätze liegen auf i5

(1/2) > >>

Klaas:
Hallo,

kaum ist mal weniger los, da haben die Vorgesetzten ganz Komische Ideen.

Wir haben im Unternehmen Bilder von Artikeln.
Diese sind in unserem CRM mit Kundendaten verknüpft.
Parallel arbeitet eine IBM i5 mit einer Eignenentwicklung von Warenwirtschaftssystem.
Auf der i5 liegen wiederum andere Daten.

Es soll nun so sein, dass der User, der sonst gar nicht mit einem PC oder ähnlichen arbeitet, einen Scanner nimmt und den Barcode des Artikels einscannt.
Damit bekomme ich die ID. (Nur auf i5 vorhanden)

Diese ID lese ich auf der i5 aus und bekomme zurück:
ID des Artikels = Lieferauftragsnr. + Artikelnummer

Diesen neuen Datensatz suche Ich in Notes und bekomme das Bild zurück.
Lieferauftragsnr. + Artikelnummer = Bild

So der Plan.
Geht so was überhaupt?
Hat jemand schon mal so etwas ähnliches gemacht?
Wie tief müsste man gehen? Ich bin ja nur ein armer kleiner Fachinformatiker.
Ich hatte auch überlegt, die ID’s im NotesDokument vor zu halten. Das Problem ist nur, wie halte ich diese ID’s aktuell.

Viele Grüße ausm Schnee

Klaas

m3:
Na da würde ich mich mal schlau machen, wie Du mit der i5 bzw. dem WWS sprechen kannst - file, webservice, datenbank, ...

Klaas:
als ersten geh-versuch habe ich mal eine SQL-Abfrage gemacht. Damit würde ich eine Tabelle mit allen aktuellen ID's bekommen.

Aber momentan leider noch die komplette liste. und das dauert schon einen moment wenn der Client 500.000 Datensätze ausliest.

m3:
??? Du hast Doch die ID, da kannst Du doch eh eine wunderschöne Abfrage machen, dass Du die Lieferauftragsnr. + Artikelnummer zurück bekommst.

Klaas:
Hallo m3,

du hast vollkommen recht. Ich hatte zunächst garkeinen überblick über das Thema.

Die ODBC-Verbinung steht jetzt.

Das Problem ist nur das Result bleibt leer.
(UserName und PW der Verbindung habe ich entfernt)

--- Code: ---Dim con As ODBCConnection
Dim qry As ODBCQuery
Dim result As ODBCResultSet

--- Ende Code ---

--- Code: --- Set con = New ODBCConnection
Set qry = New ODBCQuery
Set result = New ODBCResultSet
Set qry.Connection = con
Set result.Query = qry
Call con.ConnectTo( "Test" , "xxx" , "xxx" )
qry.SQL = "SELECT IDIDNR , IDKUND , IDARTN FROM ANWDTA.IDSTAP WHERE IDIDNR = 1111302"

--- Ende Code ---
Wenn ich die selbe Abfrage im SQL-Explorer laufen lasse, dann bekomme ich eine Tabelle mit Idnummer, Kundennummer und Artikelnummer

Viele Grüße

Klaas

Navigation

[0] Themen-Index

[#] Nächste Seite