In DataMigrator functin to convert $10.00 to 10.00
or $(10.00) to -10.00

thanks

You could use function CTRAN to replace both '$' and ')' with a blank and '(' with a minus sign, and then use function ATODBL to turn the result into a double-precision number. This assumes the incoming data (FIELD0) is alphanumeric with a length of x (Ax).

FIELD1/Ax   = CTRAN(x,FIELD0,BYTVAL('$','I3'),BYTVAL(' ','I3'),'Ax');
FIELD2/Ax   = CTRAN(x,FIELD1,BYTVAL(')','I3'),BYTVAL(' ','I3'),'Ax');
FIELD3/Ax   = CTRAN(x,FIELD2,BYTVAL('(','I3'),BYTVAL('-','I3'),'Ax');
FIELD4/Dx.2 = ATODBL(FIELD3,'x','Dx.2');