EBCDIC Sign Digit problem on Micro Focus COBOL

[Acadian]

I'm converting COBOL programs from Open VMS to Micro Focus Cobol for Unix. On Unix, the program do not recognize the "EBCDIC Sign Digit" like on th Open VMS !

Then value 00000000131266K suppose to give 000000001312662-

Can somebody give me a clue to resolve my problem ?

Part of my program :

SELECT INFILE1 ASSIGN TO "$INFILE1"
ORGANIZATION IS LINE SEQUENTIAL.

SELECT OUTFILE1 ASSIGN TO "$OUTFILE1".


01 WS-TYPE-C-REC.
05 SOLDE-COURANT PIC S9(013)V99.

01 OUTFILE1-REC.
05 SOLDE-COURANT PIC S9(013)V99.


MOVE SOLDE-COURANT OF WS-TYPE-C-REC TO
SOLDE-COURANT OF OUTFILE1-REC

error code: 163 Illegal character in numeric field

Then value 00000000131266K suppose to give 000000001312662-

 

[Crox]

Very easy. Make a definition like PIC S9(013)V99 SIGN LEADING (or trailing) SEPARATE on both platforms. No sweat.