<BLOCKQUOTE><font size="1" face="Verdana, Arial">Zitat:</font><HR>Original erstellt von hs:
Ich kenne mich leider in RPG nicht aus und habe deshalb eine Frage an euch RPG - Programmierer:

Ich habe untenstehendes kleinen RPG, was mir ein UPDATE macht.

Ich möchte das Prog jetzt so abändern, dass KTRMGR = '99' und KTRISM = 4711 variabel sind, indem diese durch Übergabeparameter ersetzt werden.

D.h. ich starte das Programm wie folgt:

call MEINPROG '99' 4711

Bestimmt nicht schwer für einen RPG-Profi, oder?

Danke
HS


FUEBMAS90UF E K DISK
C *LOVAL SETLLUEBFMT01
C READ UEBFMT01 49
C *IN49 DOWEQ*OFF
C KTRMGR IFEQ '99'
C MOVE 4711 KTRISM
C UPDATUEBFMT01
C ENDIF
C READ UEBFMT01 49
C ENDDO
C MOVE *ON *INLR [/quote]

Hallo,
wir haben einen Programmgenerator SpeedGen/400 Plus, von Werner Consulting & Software. OHNE Programmiererkenntnisse kann man damit richtig Programme fix und fertig in wenigen Minuten erstellen. Wenn Du mit Query arbeiten kannst, kannst Du auch mit dem Tool arbeiten.
www.werner-cs.de

Viel Glück!