how do you move only numeric data from A to B
01 A pic x(10) value 'a1b2c34d5e'.
01 B pic x(5).
Answers were Sorted based on User's Feedback
Answer / ravi krian j
using reference modification move & isnumeric
PERFORM VARYING I FROM 1 BY 1 UNTIL I>10
IF A(I:1) IS NUMERIC
MOVE A(I:1) TO B(I:1)
END-IF
END-PERFORM.
| Is This Answer Correct ? | 20 Yes | 1 No |
level number 77 is used to define a)group data b)elementary data c)redefine d)none
in cobol perform stmt whether it first checks the condition or not
if a>b continue display x. dispaly y. end-if display 1 display 2. display 3. what should be my output ?
tell me about examine inspect and evaluate ?
diffrence between z(2) and z9(2)
Scenario: I have 3 Input Files.Read the first i/p file and depending on certain business logic, I want to read wither i/p file-2 or i/p file-3.Now, depending on certain business logic applied to the record read from either file-2 or file-3, I decide to write them to either output file-2 or output file-2. Question: How many job steps are necessary to implement a solution for the above.
Write a program to explain size error.
How do you define a variable of COMP-1? COMP-2?
what is the coding difference between COBOL and CICS.
What are the differences between COBOL and COBOL II?
i want to use only first 100 records from a file.plz tell me how to write JCL for this(for read,copy,write operations).plz give me details of all posible JCL utilities?
Can anybody give me example of subscript and index