Is the output you are looking for -215 or is -2.15 acceptable? Is a delimited file acceptable?
If -2.15 is acceptable, you can define your work file type as CSV. When using type CSV, numeric fields will be written out correctly, regardless if N, P or I. This is probably the cleanest solution but a delimited file must be acceptable.
If you need the output to be -215, or CSV is not acceptable you can move the numeric field to a alpha field for writing out to the work file. You can suppress the decimal by either using a redefinition as shown below, or MOVE EDITED the N7.2 then deleting the decimal from the alpha variable using an EXAMINE DELETE (you may also need to do a MOVE RIGHT to get the desired output).
1 #N7_2 (N7.2) INIT <-2.15>
1 REDEFINE #N7_2
2 #N9 (N9)
1 #A (A10)
MOVE EDITED #N9 (EM=-ZZZZZZZZ9) TO #A
WRITE WORK FILE 1 #A