How to declare if emp-name = AAAAA""BBB in working-storage
section. After display emp-name should print like AAAAA""BB
Answer Posted / reena
IDENTIFICATION DIVISION.
PROGRAM-ID.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 VAR1 PIC X(10) VALUE 'AAAAA""BBB'.
01 VAR2 REDEFINES VAR1 PIC X(9).
PROCEDURE DIVISION.
0000-MAIN.
DISPLAY VAR2.
STOP RUN.
| Is This Answer Correct ? | 5 Yes | 2 No |
Post New Answer View All Answers
Can a Search can be done on a table with or without Index?
I have program P1 which calls file F1 which has 100 records and following structure 001 .................. 002 .................. 003 .................. 098 .................... 099 ................... 100 .................... Now I want to read these files and write these records in file F2 in following manner. 001 ...... 051 ..... 002 ...... 052 ..... 003 ...... 053 ..... .......... ....... .......... ....... .......... ....... 048 ........ 098 ...... 049 .......... 099 ....... 050 .... 100 ......
I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.
What is the LINKAGE SECTION used in COBOL?
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?
What is cobol?
How you can characterize tables in cobol?
What are the rules of the move verb?
what happens if parmparameter passes zero bytes to the program
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
Hi pls anybody tell me about " ANALYSIS DOCUMENT PREPARATION AND ESTIMATION OF TASK " (in real time project)."I want to update a sequential file in my project" for that purpose i need both structures i mean analysis document and estimation of task.
what is the use of outrecord?
how to move the records from file to array table. give with code example
Can we change the password using ALTER? anyone tried and changed?
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps