Interested to Buy Any Domain ? << Click Here >> for more details...
In a file if a column account number conatain value 0001234.. how can we move the value to another variable without zero. value may contain any type such as 00123405. we need the value 1234 or 12305. how can we do that in cobol. Please help.
- 1 Answers
- 3288 Views
- CSC, I also Faced
- E-Mail Answers
Answer Posted / mahesh satya
variable pic 9(08).
perform varying I from 1 by 1 until I < 8 or found
IF VARIABLE(I:1) not = 0 then
compute actual = 8 - I
move VARIABLE(I: actual) to NEW_VARIABLE
set found to true
end-if
end-perform
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?
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 the difference between PIC 9.99 and PIC9v99?
How do get the result of your program directly on your pc?
What is the difference between external and global variables in COBOL?
What is cobol?
What is the use of intialize verb?
What are declaratives and what are their uses in cobol?
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
Differentiate cobol and cobol-ii. (Most of our programs are written in cobolii, so, it is good to know, how, this is different from cobol)?
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
What is difference between static and dynamic call in cobol?
How many sections are there in data division in COBOL?
Which Search verb is equivalent to PERFORM…VARYING?
INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?
