Return ILE RPG

[BenderD]

du musst den Programmnamen im Prototyp deklarieren EXTPGM(Name) im Schlüsselwortbereich.

Hab noch ein kleines Problem. Und zwar bekomme ich die Fehlermeldung:

*RNF3751 30 a 002200 Externe Prozedur im Prototyp für Hauptprozedur nicht mit aktuellem externem Namen identisch.

Code:
...

DAUFNEHM          PR                                    
D PARM1                          8A                     
D PARM2                         20A                     
D PARM3                         20A   OPTIONS(*VARSIZE) 
D PARM4                          3A                     
D PARM5                        255A                     
D PARM6                        255A                     
D PARM7                        255A                     
D PARM8                        255A                     
D PARM9                        255A                     
D PARM10                       255A                 
D PARM11                 3A    

DAUFNEHM          PI      
-> FEHLER                              
D FILD1                          8A                     
D FILD2                         20A                     
D FILD3                         20A   OPTIONS(*VARSIZE) 
D FILD4                          3A                     
D FILD5                        255A                     
D FILD6                        255A                     
D FILD7                        255A                     
D FILD8                        255A                     
D FILD9                        255A                     
D FILD10                       255A                 
D FILD11                 3A 

Was mache ich falsch?