RPG-Code in Free

[Wavum]

Wie sieht dieser Code in Free aus:

D i5Mailconstructor...
D pr o extproc(*java: i5Mail:*constructor)
D class(*java: i5Mail)
D m_owner o class(*java: jStrConst) const
D m_system o class(*java: jStrConst) const
D m_jobnam o class(*java: jStrConst) const
D m_jobnum o class(*java: jStrConst) const

Wenn ich ihn zu Free formatiere sieht er so aus:

DCL-PR i5Mailconstructor
OBJECT extproc(*java: i5Mail:*constructor)
class(*java: i5Mail);
m_owner OBJECT(*java: jStrConst) const;
m_system OBJECT(*java: jStrConst) const;
m_jobnam OBJECT(*java: jStrConst) const;
m_jobnum OBJECT(*java: jStrConst) const;
END-PR;

Nur kennt Free kein "class" und somit lässt sich der Code nicht kompilieren. Ich bitte um Hilfe. Danke.

[Pikachu]

Vielleicht muß es so?


DCL-PR i5Mailconstructor
extproc(*java: i5Mail:*constructor)
OBJECT(*java: i5Mail);
...

[Wavum]

Fast, so muss es:

DCL-PR i5Mailconstructor
OBJECT(*java: i5Mail)
extproc(*java: i5Mail:*constructor);
...