Anfägerfrage: Prozeduren in ILE RPG

[GutmannHGW]

Hier ein RPG-Quelltext mit Prozedur nach deinem Beispiel:

 *---------------------------------------------------------------* 
 *  Main                                                         * 
 *---------------------------------------------------------------* 
 
d iZahl1          s              9s 0 inz(5)                       
 
d erhoehe         pr                                               
D iZahl2                         9s 0                              
 
 /free                                                             
   Erhoehe(iZahl1);                                                
   *inlr = *on;                                                    
 /end-free                                                         
 
 *---------------------------------------------------------------* 
 *  Prozedur                                                     * 
 *---------------------------------------------------------------* 
P Erhoehe         B                                                
D Erhoehe         PI                                                
D iZahl2                         9s 0                               
 
d prompt          s             51a   inz('')                       
d result          s              1a   inz('')                       
 
 /free                                                              
   prompt = 'iZahl1 + 5 = ' + %char(iZahl2+5);                      
   dsply prompt '' result;                                          
 /end-free                                                          
 
P Erhoehe         E

Wow.. zunächst mal Danke an euch beide!
eigentlich ist es jetzt fast so als ob mir jemand etwas auf Chinesisch erzählt.

Ich nehme mal dein Beispiel her Woki:
- das "d iZahl s 9s 0 inz" initialisiert eine Zahl in der Länge 9 mit dem Wert 5?
- was ist "d erhoehe pr" ? Ein Pointer?
- für was ist dieser /free Teil? was bewirkt *inlnr=*on
/free
Erhoehe(iZahl1); *inlr = *on;
/end-free

Dann hier im Prozedur-Teil

- Was macht "P Erhoehe B", "D Erhoehe PI"

Bewirkt dsply prompt '' result; Die Anzeige in einer einfachen Ausgabezeile, d.h. man könnte dieses PGM auch ohne DSPF anwenden?

und ganz am Ende steht noch "P Erhoehe E" - ist das dann der Dekonstruktor???

Bin völlig baff was ihr mir gepostet habt ...
Sry für die vielen Fragen, aber das war vor meiner Zeit