Nicht innerhalb der PRTF.
Definiere das Feld als Alpha und im Programm dann:

prtfld = %trim(%editc(numfld,'4')) + ' ' + wacd;