Folgendes Problemchen:

2 Variablen

D FeldA s 5 0 inz(12345)
D FeldB s 3 0 inz(0)

Mit welcher Anweisung in Free RPG bekomme ich den Wert von FeldA (letzten 3 Stellen = 345 ) nach FeldB.

Bei EVAL gibts einen Programm-Abbruch.

Im festen Format könnte man z.B.: verwenden:
z-add FeldA FeldB
oder
move FeldA FeldB

mfg. Ludger