Versuch mal ob Du mit der SQL-Funktion HEX das gewünschte Ergebnis bekommst:

Code:
Values(Cast(Hex(Integer(256)) as Char(50)));
Oder im RPG
Code:
  DCL-S  Value    Int(10);               
  DCL-S  Text     Char(50);              
                                         
   Value = 256;                          
   Exec SQL Set :Text = Hex(:Value);     
   Dsply Text;