der code der function ist wie folgt:

Code:
 
H NOMAIN  
 
FT3TABPK   IF   E           K DISK
 
 DSQL_FUNC         PR            21A      
 D MANDANT                        3       
 D KST                            4  0    
 D ART                            1       
 
PSQL_FUNC         B                   EXPORT 
DSQL_FUNC         PI            21A     
D MANDANT                        3      
D KST                            4  0   
D ART                            1      
 
 C* //Initialisierung Work-Felder                   
 D TEXT3           S              3    INZ(*BLANKS) 
 D TABELLE         S             10    INZ('N0210') 
 D VERSION         S              1    INZ('1')     
 D KST15           S             15                 
 D STRING          S             21    INZ(*BLANKS) 
 C* 
 
 // Datei lesen..... usw.
 
 C                   RETURN    STRING                                
 C* -----------------------------------------------------------------
 C* ENDE der Prozedur                                                
 C* -----------------------------------------------------------------
 C                   CLOSE     T3TABPK                               
 PSQL_FUNC         E
Es gibt dazu ein Modul und ein Serviceprogramm.

Die Function an sich ist ja kein SQL, sondern normal RPG, ich verstehe nur nicht, warum man die nicht anders aufrufen kann ?

MfG
Mäxxchen