IDENTIFICATION DIVISION.
PROGRAM-ID. COBOL-PRO.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 A-NUM1 PIC S9(4)V9(2).
01 A-NUM2 PIC S9(2)V9(2) VALUE -3.14.
PROCEDURE DIVISION.
DISPLAY "A-NUM1 : "A-NUM1.
DISPLAY "A-NUM2 : "A-NUM2.
STOP RUN.
# run:
#
# A-NUM1 : +0000.00
# A-NUM2 : -03.14