Hi all, its me again....

I have a report that I formatted as XML to read into a javascript routine (EXTJS). The problem is my data has an ampersand in the name fields (J & R) which I would like to display as is. But XML treats an & as a special value. I need to replace that with & amp; . But STRREP isn't available in 5.2.3.


anyone have a routine that can do a string replacement?
P

This message has been edited. Last edited by: Lloyd,

I would use Maintain, which has functions for unequal-length string substitutions even in 5.x.

GETTOK using 1 and GETTOK using -1

DEFINE FILE CAR
AC/A30=IF COUNTRY EQ 'ENGLAND' THEN EDIT(COUNTRY,'999 & 9999999999') ELSE COUNTRY;
NEWAC/A66=IF AC CONTAINS '&' THEN
GETTOK(AC, 30, 1, '&', 30, 'A30') || ' &|amp;' || GETTOK(AC, 30, -1, '&', 30, 'A30')
ELSE AC;

END
TABLE FILE CAR
PRINT AC NEWAC
END

Thanks JG, that worked remarkably well!!!