from what I know there is no function for that. you can make

if yourvariable > 0 then
    yourvariable := -yourvariable;