Webservice über PHP aus einer COBOL Anwendung

[nico1964]

Hallo,

vergangenen Freitag wurde folgende Aufgabenstellung an mich herangetragen:
Aus einer COBOL-Anwendung soll ein PHP mit n Parametern aufgerufen werden, das sich dann mit diesen Parametern mit einem WEB-Service verbindet und von diesem eine Antwort erhält, welche wieder in das COBOL-PGM muss.

Habe keine Erfahrung mit PHP und soll das asap lösen können. Für jeden Denkanstoss bzw. Links zu Literatur oder einfaches Beispiel wäre ich dankbar.
LG

[Fuerchau]

Der Aufgabensteller gehört erschlagen .

PHP ist eine Scriptsprache, die auf einem Web-Server läuft.
Du müsstest also per Socket-API (und das ist schon nicht einfach) einen Web-Service aufrufen der das PHP-Script startet, das wiederum einen Web-Service aufruft und dir anschließend das Ergebnis zurückliefert.
Da wäre es gleich besser, per Socket den Web-Service direkt abzufragen.

Alternativ könnte ein vorgestartetes PHP-Script (und da weiß ich nicht, ob das überhaupt geht) auf deinem WEB-Server (auf der AS/400) auf einer DTAQ lauern, von deinem COBOL per QSNDDTAQ den Auftrag erhalten und über eine 2. DTAQ (per QRCVDTAQ) das Ergebnis zurückliefern.

Hierbei ist zu beachten, dass ggf. ja mehrere parallele Abfragen laufen könnten und somit ein Keyed-DTAQ mit z.B. JobNr. als Key zu verwenden wäre.

Ein Direktaufruf von PHP ohne eine Serverinstanz (z.B. Zend) wird wohl nicht möglich sein.

[nico1964]

Hallo,
danke für die Antwort. Zend Server wurde bei uns auf Anordnung meiner Chefs bereits installiert und daher würde ich gerne einen Weg finden, wie ich das direkt über die AS400 handeln kann.

[RobertMack]

Weitere Alternative: das Cobol-Programm ruft ein RPGLE-Programm auf welches den Web-Service-Request ausführt - nativ, ohne PHP, ohne Zend-Server...

HTTP API
http://www.scottklement.com/presenta...%20HTTPAPI.pdf

[nico1964]

Weitere Alternative: das Cobol-Programm ruft ein RPGLE-Programm auf welches den Web-Service-Request ausführt - nativ, ohne PHP, ohne Zend-Server...

HTTP API
http://www.scottklement.com/presenta...%20HTTPAPI.pdf

Hallo,
das ist für mich leider der letzte Ausweg, da ich der Dinosaurierer auf der AS400 bei uns bin und meine Chefs aus der sogenannten neuen Welt stammen. Daher bevorzugen Sie bei uns die PHP Geschichte, auch wenn keiner von uns Erfahrung damit hat

[andreaspr@aon.at]

Ein PHP-Script kannst du ganz einfach über die QSH aufrufen.

/usr/local/Zend/Core/bin/php -f /home/mein_script.php

Wenn du Parameter an das Script übergeben möchtest schaut das dann so aus:

/usr/local/Zend/Core/bin/php -f /home/mein_script.php "erster Wert" "das ist jetzt der zweite Wert"

In PHP sind dann diese Parameter in der globalen Variable (Array) $argv.

Einen "Returnvalue" gibt es jedoch nicht. Da musst du dann schaun, wie weiter arbeitest. Du könntest z.B. in PHP ein Cobol-Programm mit Parameter aufrufen, dass die Verarbeitung weiter führt.

[nico1964]

Ein PHP-Script kannst du ganz einfach über die QSH aufrufen.

/usr/local/Zend/Core/bin/php -f /home/mein_script.php

Wenn du Parameter an das Script übergeben möchtest schaut das dann so aus:

/usr/local/Zend/Core/bin/php -f /home/mein_script.php "erster Wert" "das ist jetzt der zweite Wert"

In PHP sind dann diese Parameter in der globalen Variable (Array) $argv.

Einen "Returnvalue" gibt es jedoch nicht. Da musst du dann schaun, wie weiter arbeitest. Du könntest z.B. in PHP ein Cobol-Programm mit Parameter aufrufen, dass die Verarbeitung weiter führt.

Das ist dann mein größeres Problem, da ich das ganze aus einer Onlineanwendung aufrufen muss(Vertragsanlage) und ich brauche den Returnvalue für die weiter Vorgehensweise im Online-PGM für Abbruch oder weitermachen

[Pikachu]

Das ist dann mein größeres Problem, da ich das ganze aus einer Onlineanwendung aufrufen muss(Vertragsanlage) und ich brauche den Returnvalue für die weiter Vorgehensweise im Online-PGM für Abbruch oder weitermachen

Das geht ja um viele Ecken. Wie sollen denn die genauen Aufrufwege sein?

[nico1964]

Das geht ja um viele Ecken. Wie sollen denn die genauen Aufrufwege sein?

1. COBOL -PGM Vertragsanlage online
2. im CHECK des DSPF Aufruf des PHP mit n Parametern
3. PHP verbindet sich mit WebService und erhält eine Antwort
4. Antwort zurück in COBOL anwendung
5. Cobol weitermachen oder nicht....

[Fuerchau]

Dann hast du ja jetzt alles was du brauchst, allerdings so ganz ohne CLP wird es wohl nicht gehen (weil das einfacher ist).
Du kannst natürlich alles per
77 MyCmd pic x(1000).
77 MyCmdLen pic s9(10)V9(5) comp-3 value 1000.
CALL "QCMDEXC" using MyCmd MyCmdLen

In MyCmd musst du dann die Kommandos per "String ... " zusammenschustern.

string "OVRDBF ..." into MyCmd
call "QCMDEXC" ...
string "/usr/... """ delimited by size
Parm1 delimitd by space
""" """ delimited by size
Parm2 delimitd by space
"""" delimited by size
into MyCmd
call "QCMDEXC" ...

open Input MyStdout
...
close MyStdout

[nico1964]

@fuerchau
Danke, dass habe ich mir auch ungefähr so vorgestellt. jetzt brauch ich dann nur das php-basteln und dann sind wieder alle glücklich bei uns

[MR-BN]

3. PHP verbindet sich mit WebService und erhält eine Antwort

PHP im WEB ist doch eine aktive Anwendung, wie soll die denn antworten. oder ist es nur eine Abfrage? wenn -JA- dann solltest Du PHP vergessen. Das geht einfacher mit einem COBOL oder RPG-Programm.