The example on page 39 of Appendix A of the current PrOp that unconditionally puts a '$' before the first result digit can be modified trivially to put '-' before it iff the unedited packed value is negative. (Subtract 0 from the packed value and test the resulting condition code to determine whether it is negative.)
I am assuming here that you want to print only negative signs, instances of '-'., for a packed vsazlue p < 0.0. If you want a floating prefixed sign, either of '-' or '+', you can do that too; but the code following the EDMK is slightly more complex. If you want to deal with this more complex case, you need to decide what to do with zero values. The tradition is usually to make them positive, but you could instead elect to use a blank 'sign character' for zero values. John Gilmore, Ashland, MA 01721 - USA
