How to declare if emp-name = AAAAA""BBB in working-storage
section. After display emp-name should print like AAAAA""BB
Answer Posted / srivatsa
IDENTIFICATION DIVISION.
PROGRAM-ID. M3TUD.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-VARS PIC X(10) VALUE 'AAAAA""BBB'.
PROCEDURE DIVISION.
0000-MAIN.
DISPLAY WS-VARS(1:9).
stop run.
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
Why is it necessary that file needs to be opened in I-O mode for REWRITE?
There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.
Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?
Write a program to enter and display the names of students in a class using the occurs clause.
What are the pertinent COBOL commands?
Name the divisions, which are available in a cobol program?
Explain how will you differentiate between an internal and an external sort, the pros and cons, internal sort syntax etc
What are various search techniques in cobol? Explain.
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.
how to refer the data field?
Write a program that uses move corresponding.
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
What is the compute verb? How is it used?
What is inspect in cobol ?
Explain what you understand by passing by value.