Parameter eines Programms ermitteln?

[FNeurieser]

Hallo allerseits,

gibt es eine Möglichkeit die an ein Programm übergebenen Parameter zu ermitteln? Das Problem ist, dass es zu dem ILE-RPG keine Source mehr gibt und daher die Parameter die an das Programm werden, nicht mehr bekannt sind.

Danke schon mal für eventuelle Infos.

[camouflage]

Kannst Du evtl. einen Debug auf das Programm machen?

Wäre mal eine Lösung...

[FNeurieser]

leider ist die Quelle nicht verfügbar

[BenderD]

... Jugend forscht:´
man könnte einene RPG Wrapper drumherumbauen, in etwa so:
- vorhandesnes PGM renamen
- wrapper mit dem ursprünglichen Namen mit reichlich Parametern, das dann das renamte PGM aufruft und alle Parameter durchreicht. Wenn man alle Parameter by reference durchreicht, merkt das aufgerufenen PGM nixx davon und überzählige Parameter sind RPG als Huddel Programmiersprache egal.

D*B

Hallo allerseits,

gibt es eine Möglichkeit die an ein Programm übergebenen Parameter zu ermitteln? Das Problem ist, dass es zu dem ILE-RPG keine Source mehr gibt und daher die Parameter die an das Programm werden, nicht mehr bekannt sind.

Danke schon mal für eventuelle Infos.

[FNeurieser]

@D*B

danke, werde das wohl so machen müssen.

[camouflage]

Schade, dachte ich hätte noch eine Version von TAATOOL.

Darin enthalten wäre der RTVRPGPARM Command. Das wäre vermutlich das was Du suchst...

[Fuerchau]

Das funktionierte aber nur auf OPM's, da die PLIST als MI-Code abfragbar ist.
Bei ILE kommt man da nicht mehr dran.

Aber selbst Dieters methode geht nur von Wahrscheinlichkeiten aus, da du die Parameter ja per Augenschein prüfen musst.
Bei längeren DS'n wird es da schon heftig.

[kitvb1]

Check the PR specs in the source of the program from which it is called. If it uses a /copy (INCLUDE) for the PR specs, is the copybook source still there?

[Fuerchau]

Wenn ich den Fragesteller richtig verstehe, gibt es auch keine Quellen der Aufrufer, sonst würde sich das Problem ja gar nicht stellen.

[TheDevil]

Hallo.
Ich bin mir nicht ganz sicher, aber was wäre denn mit dem Joblog des Jobs. Dort würde doch der Call mit Parametern vorhanden sein oder nicht. Wenn dies so ist könnte man evtl. anhand der darin enthaltenen Daten einen Rückschluss ziehen.

Bin ich richtig ? -> Community

Gruß,
Ralf

[RobertMack]

...untersuche mal einen Dump:

1) Programm ohne Parameter aufrufen = RNQ0222
2) Antwort D = Spool QPPGMDMP
3) Suche nach _QRNL_PRMCPY_ im Spool = _QRNL_PRMCPY_FELD1 POINTER SPP:*NULL
4) Suche nach FELD1 = FELD1 CHAR(10) NOT ADDRESSABLE

[Obv]

...untersuche mal einen Dump:

1) Programm ohne Parameter aufrufen = RNQ0222
2) Antwort D = Spool QPPGMDMP
3) Suche nach _QRNL_PRMCPY_ im Spool = _QRNL_PRMCPY_FELD1 POINTER SPP:*NULL
4) Suche nach FELD1 = FELD1 CHAR(10) NOT ADDRESSABLE

Suche nach NOT ADDRESSABLE im Dump sollte auch reichen