Datenzugriff von PC auf AS/400 Daten

[Olli1]

Guten Morgen zusammen,

ich möchte Daten aus der AS/400 auf einem PC zur Anzeige bringen.
Sprich: Es soll ein Zugriff auf die Datenbank der AS/400 erfolgen, und auf dem PC sollen die Daten dann im Browser beispielsweise angezeigt werden können.
In der Hinsicht bin ich völlig unwissend.
Hat vielleicht jmd. nen Tip für mich, wie das zu lösen ist.
Stichwort ODBC ?
Gibt's vielleicht irgendwo ein "How to", wo so etwas nachzulesen ist ???

Danke schonmal für Eure Hilfe.

Olli

[BenderD]

Hallo Olli1,

der Möglichkeiten gibt es da viele, was da passt hängt entscheidend davon ab, was Du so bisher gemacht hast. Um nur ein paar zu skizzieren:
- Visual Basic über ODBC
- Java Swing oder AWT Client Anwendung über JDBC
- ASP, Zugriff über ODBC
- Visual RPG
- Java Web Anwendung mit JSP als reine Server Anwendung
- CGI Programme in RPG als Server Anwendung
plus die Möglichkeiten, die ich jetzt vergessen habe.

mfg

Dieter Bender

Guten Morgen zusammen,

ich möchte Daten aus der AS/400 auf einem PC zur Anzeige bringen.
Sprich: Es soll ein Zugriff auf die Datenbank der AS/400 erfolgen, und auf dem PC sollen die Daten dann im Browser beispielsweise angezeigt werden können.
In der Hinsicht bin ich völlig unwissend.
Hat vielleicht jmd. nen Tip für mich, wie das zu lösen ist.
Stichwort ODBC ?
Gibt's vielleicht irgendwo ein "How to", wo so etwas nachzulesen ist ???

Danke schonmal für Eure Hilfe.

Olli

[Olli1]

Sagen wir es mal so:
Ich bin bei uns im Hause u.a. für die AS/400 zuständig.

Unser PC-Spezi will / soll nun gewisse Daten aus der AS/400 auf dem PC zur Anzeige bringen. Diese sollen dann dort auch in gewisser Weise ausgewertet werden können. Beispielsweise in ein Open Office Dokument konvertiert und dann dort weiterverarbeitet werden können.
Die "PC-Lösung" soll in php programmiert werden.

Gibt es da eine Möglichkeit, auf AS/400 Daten zuzugreifen ?
Wenn ja, wo kann ich mich da schlau machen, wie das zu lösen wäre ?

[BenderD]

Hallo,

PHP hat zumindest ein ODBC Interface, ich kenne mich allerdings mit PHP nicht aus. Da sollte der Kollege von der Mausschieber-Fraktion am Besten selber mal den Herrn Google fragen.

mfg

Dieter Bender

Sagen wir es mal so:
Ich bin bei uns im Hause u.a. für die AS/400 zuständig.

Unser PC-Spezi will / soll nun gewisse Daten aus der AS/400 auf dem PC zur Anzeige bringen. Diese sollen dann dort auch in gewisser Weise ausgewertet werden können. Beispielsweise in ein Open Office Dokument konvertiert und dann dort weiterverarbeitet werden können.
Die "PC-Lösung" soll in php programmiert werden.

Gibt es da eine Möglichkeit, auf AS/400 Daten zuzugreifen ?
Wenn ja, wo kann ich mich da schlau machen, wie das zu lösen wäre ?

[Olli1]

Danke schonmal für die Auskunft.
Habe gerade nochmal Rücksprache mit unserem "Mausschieber" genommen und der sagte mir, dass das für ihn sicherlich kein Problem sei, mittels php auf eine ODBC Datenquelle zuzugreifen.
Meine Frage ist nun: Was muss ich AS/400-seitig für Voraussetzungen schaffen und wie muss ich dann eine ODBC Datenquelle anlegen/definieren ?

[BenderD]

Hallo,

auf der AS400 brauchst Du einen *local Eintrag für das remote database Directory (WRKRDBDIRE) falls noch keiner da ist und Du musst den Database Server starten (STRHOSTSRV), es könnte sein, dass der Signon Server auch gestartet sein muss, weiss ich nicht aus dem Kopf)
ODBC Treiber kriegt man mit Klein erschreckNet (Client Access), die Datenquelle wird auf Windoof Büchsen mit der Systemsteuerung angelegt.

mfg

Dieter Bender

Danke schonmal für die Auskunft.
Habe gerade nochmal Rücksprache mit unserem "Mausschieber" genommen und der sagte mir, dass das für ihn sicherlich kein Problem sei, mittels php auf eine ODBC Datenquelle zuzugreifen.
Meine Frage ist nun: Was muss ich AS/400-seitig für Voraussetzungen schaffen und wie muss ich dann eine ODBC Datenquelle anlegen/definieren ?

[Fuerchau]

Und warum denn alles wieder so kompliziert ?

Sowohl OpenOffice, Staroffice, MS-Office haben ALLE eine ODBC-Integration !
Wenn z.B. also CA-Express bereits installiert ist, steht der ODBC-Treiber bereits zur Verfügung. Über Systemsteuerung->Verwaltung->Datenquellen wird ein DSN eingerichtet udn kann direkt aus den entsprechenden Office-Anwendung verwendet werden.

Programmiert werden muss da nix, man sollte es auch vermeiden, da
1. etwas neu programmiert wird, was schon da ist
2. eine zusätzliche Schnittstelle mit Haken und Ösen entsteht.

[BenderD]

Und warum denn alles wieder so kompliziert ?

weil's sonst nix zu fragen gäb'

))

Dieter

[Fuerchau]

@Dieter
Wer keine Arbeit hat macht sich welche !
Oder um es mit den Worten eines IBM-Beraters (so um ca. 1975) zu sagen:
Man muss den Kunden davon überzeugen, dass er etwas neues braucht auch wenn er es schon hat (oder gerade dann).
Dazu gibt es dann noch einige Individualanpassungen bis er auf dem Stand ist, den er eigentlich schon vorher hatte, nur schneller (?), besser (???) und schöner (!?!).
Wo käme denn sonst die Innovation her ?

[rst]

Sagen wir es mal so:
Ich bin bei uns im Hause u.a. für die AS/400 zuständig.

Unser PC-Spezi will / soll nun gewisse Daten aus der AS/400 auf dem PC zur Anzeige bringen. Diese sollen dann dort auch in gewisser Weise ausgewertet werden können. Beispielsweise in ein Open Office Dokument konvertiert und dann dort weiterverarbeitet werden können.
Die "PC-Lösung" soll in php programmiert werden.

Gibt es da eine Möglichkeit, auf AS/400 Daten zuzugreifen ?
Wenn ja, wo kann ich mich da schlau machen, wie das zu lösen wäre ?

Das solltest Du selber erledigen.

Die Office Produkte eignen sich sehr gut um im Unternehmen Daten zu präsentieren.
Versuche es im Excel.
Das Beispiel was ich unter dem Thema IBMDA400 eingestellt habe lauft auch sauber
in Excel 2000/2002.

Du mußt nur nachfolgenden Code einbauen.

'read records in Excel
Dim rowCount As Integer 'Zeile
Dim colCount As Integer 'Spalte
Worksheets("Tabelle1").Cells.Clear
rowCount = 1 'In Zeile 1 Feldnamen einlesen
For colCount = 0 To rst400.Fields.Count - 1
Worksheets("Tabelle1").Cells(rowCount, colCount + 1).Value = _
rst400.Fields(colCount).Name
Next colCount
While Not rst400.EOF 'Ab Zeile 2 Datensätze einlesen
rowCount = rowCount + 1
For colCount = 0 To rst400.Fields.Count - 1
Worksheets("Tabelle1").Cells(rowCount, colCount + 1).Value = _
rst400.Fields(colCount).Value
Next colCount
rst400.MoveNext
Wend

und natürlich den SQL (den Select) für deine Belange anpassen.
den Insert entferne..

1. Mit WRKDIRE ist der user im Verzeichnisseintrag zu ergänzen.
2. mit ALT F11 gelangst du im EXCEL in die Entwicklungsumgebung.
3.Unter Extras Verweise musst du 2 Verweise hinzufügen
AS/400 Express Toolkitt Table Index Type Library 1.2
Microsoft ActiveX Data Objects 2.7 Library

Das ganze kannst du noch mit entsprechenden Forms ausbauen.

Der Vorteil die DAten im Excel können die Benutzer weiter bearbeiten.

[Fuerchau]

Warum so kompliziert ?
Excel kann das alles OHNE eine Zeile Programmierung (Makro):
http://www.rlpforen.de/showthread.ph...ht=excel+query