01 A pic s9(5) value -12345 01 B pic +9(5) PROCEDURE DIVISION MOVE A TO

01 a pic s9(5) value -12345,
if we disply a , the sign will overpunched with last digit
but i need to get the miuns sign in the result?

Question Posted / mr.perfect

Answer Posted / mr.perfect

01 A pic s9(5) value -12345
01 B pic +9(5)
PROCEDURE DIVISION
MOVE A TO B
DISPLAY B
STOP RUN

o/P:
-12345

Will this work?

Is This Answer Correct ?

1 Yes

0 No

Please Help Members By Posting Answers For Below Questions

how to refer the data field?

2324

What is the default value(s) for an initialize and what keyword allows for an override of the default?

1267

How do you code cobol to access a parameter that has been defined in jcl? And do you code the parm parameter on the exec line in jcl?

1252

What is a report item?

1196

What is the Purpose of POINTER Phrase in STRING command in COBOL?

1302

what happens if parmparameter passes zero bytes to the program

2185

Can you please let me know the centre name of INS certification in Kolkata.

2286

How many bytes S(8) comp field occupy and its maximum value?

2192

Describe the cobol database components?

1219

Define static linking and dynamic linking.

1272

How to get the last record in vsam file in cluster? And how can you get the ksds file records into your cobol program?

1209

In which area will you utilize 88 level items in cobol?

1211

Write a program to enter and display the names of students in a class using the occurs clause.

1260

For rewrite, why is it mandatory that file needs to be opened?

1152

Why is it necessary that file needs to be opened in I-O mode for REWRITE?

1386