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?

Answer Posted / sreejith

01 a pic -9(5) value -12345
or
01 a pic x(6) value '-12345'

Is This Answer Correct ?    1 Yes 3 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How you can read the file from bottom?

652


What is the problem of ordered sequential files access?

690


System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..

1579


what is the difference between COBOL2 AND COBOL390?

2441


Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.

5049






what is amode(24), amode(31), rmode(24) and rmode(any)?

686


Why occurs cannot be used in 01 level in COBOL?

707


What are literals?

622


Are you comfortable in cobol or jcl?

633


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

1621


What is the difference between Global and External Variables?

654


What are the access modes of START statement?

706


Write a program that uses move corresponding.

664


What is the difference between Call and a Link?

692


I have one ps file in which there are 3 fileds emp_no,emp_name and leave_app.this ps file information give the detail of employee which is going to apply for leave.suppose emp_no=113430,emp_name=ajay,leave_app=1 that means he is going to apply for 1 day leave.and accordingling the table in db2 will be updated means if he has that no of leave in his account then he will get dat leave and updated acc. in table(leave_balance=previous leave present in table-leave_app).Now i want to check whther the updated result is correct or not by comparing the two ps file using IEBCOMPARE or icetool so what is going to be the two ps file and how its is going to be compare.

1998