Procedure in free

[malzusrex]

Hallo Gemeinde,

wie muss folgende Code im FREE aus sehen?


p Zeile b
d pi
d Inhalt * value options(*string)


hatte es mit


dcl-proc Zeile Export;
dcl-pi Inhalt Pointer value option(*string);
end-pi;

probiert.

Gruß
Ronald

[malzusrex]

Kaum macht mans rcihtig ---> schon geht's


dcl-proc Zeile;
dcl-pi *n;
inhalt pointer value options(*string);
end-pi;


Gruß Ronald

[camouflage]

<code><code>

dcl-proc Zeile export;
dcl-pi *n
Inhalt Pointer value options(*string);
end-pi;
...
</code></code>

Versuch es vielleicht mal so ...