Hallo Peter,

es gibt keine "einfache" Built-in-Funktion in RPG.
Allerdings über Feldgruppen braucht man auch nicht mehr zu gehen.

Hier ein Beispiel, wie Texte zentriert werden können:
Code:
D Text            S             75A      
D NewText         S             75A      
D Start           S              3U 0   
 /Free
    // Text zentrieren
   Start = (%Size(Text) - %Len(%Trim(Text)))/2 + 1;  
                                                     
   %Subst(NewText: Start: %Len(%Trim(Text))) = %Trim(Text);     
 /End-Free
Birgitta