01 a pic 9(3) value is 123
01 b pic 9(6)
move a to b
wht will be the value ? and
01 a pic x(6) value is abc
01 b pic x(3)
move a to b
wht will be the value ?
Answer Posted / chowdary
after executing this program output will be
b value is 000123
and
b value is abc
there is no blanks after abc in b, because we have taken
its length as 3 in pic clause.
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
Define static linking and dynamic linking.
What are 77 levels used for?
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps
Why occurs cannot be used in 01 level in COBOL?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
Name the divisions, which are available in a cobol program?
Have you used the sort in your project?for this type of questions any working on real time project give the eg. with real time scenario.
Define cobol?
What are declaratives and what are their uses in cobol?
What is length is cobol?
Can a Search can be done on a table with or without Index?
What is the difference between external and global variables in COBOL?
What is the difference between goback, stop run and exit program in cobol?
if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need
Our issue is there seems to be a disconnect, or no link, between our SELECT statement and our SD. We had SELECT SORT-FILE and SELECT SORT-FILE ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1 SORTWRK2 SORTWRK3 SORTWRK4. with SD SORT_FILE RECORD CONTAINS 7833 CHARACTERS. In either case, at run time, the system ignored our SORTWRK# DD statements and allocated 16 sort works with the SORTWK## naming convention. Any ideas why the system does not recognize the connection? We do not even need the SORTWRK DD statements. Thanks