doing it like this:

CASE LXPOS.XTYPE = 'D' && DATE
rpl = ALLTRIM(LXPOS.ACTION)+ALLTRIM(LXPOS.START)+ALLTRIM(LXPOS.XDATA)+ALLTRIM(LXPOS.ENDING)
drpl = ALLTRIM(LXPOS.XFIELD)
REPLACE &drpl WITH DTOC+rpl

I get DTOC is not found.

doing it like this:

CASE LXPOS.XTYPE = 'D' && DATE
            rpl = ALLTRIM(LXPOS.ACTION)+ALLTRIM(LXPOS.START)+ALLTRIM(LXPOS.XDATA)+ALLTRIM(LXPOS.ENDING)
            drpl = ALLTRIM(LXPOS.XFIELD)
            REPLACE &drpl WITH DTOC(rpl)

I get function value...is invalid.