microfocus cobol format

Database
vfa
N/A

microfocus cobol format

hi!
I am trying to select a "microfocus cobol format " dataset from teradata 13.0 ,so that cobol can read them .
I use fastexport to output the dataset.

example:
select * from test;
xxx
--------
-123.456
123.450
-123.450
123.456
-123.000

I want to select data like :

old_xxx new_xxx
-------- --------
-123.456 12345v --negative number will convert to 'v' like in oracle " select chr(ascii('6')+64) from dual"
123.450 123450
-123.450 12345p
123.456 123456
-123.000 12300p

and I can use "select cast(123.450 as format '9(3)V9(3)S') " give : 123450
but If i use "select cast(-123.450 as format '9(3)V9(3)S') " give : 12345}

how can i deal with this problem?

thanks a million!
very sorry for my poor english!
vfa