Não consigo ver o seu código, porém isso deve funcionar pra ti
MOVE "ONE;TWO;THREE;FOUR;" TO W-OUT, UNSTRING W-OUT DELIMITED BY ';' INTO W-NU1, W-NU2, W-NU3, W-NU4.
As variáveis W-NU1, W-NU2, W-NU3, W-NU4 vão receber o seguinte texto:
W-NU1 = ONE W-NU2 = TWO W-NU3 = THREE W-NU4 = FOUR