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]

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

Versuch es vielleicht mal so ...