Interested to Buy Any Domain ? << Click Here >> for more details...
Can we move X(9) to 9(9). If yes what are the ways for
doing this?
- 3 Answers
- 10248 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / varun v
yes you can..use REDEFINES for the same purpose.
Working storage section:-
01 WS-VARX PIC X(9) VALUE SPACES.
01 WS-VARN REDEFINES WS-VARX PIC 9(9).
Now you can move X(9) variable to WS-VARX.Eventually it is
moved to the 9(9) variable WS-VARN.
| Is This Answer Correct ? | 12 Yes | 5 No |
Answer / ashish
Alphanumeric to numeric movement is possible but not always,
say if it has numeric value then only it is possible o/w if
it contains alphabetic value then it wont b possible
| Is This Answer Correct ? | 10 Yes | 4 No |
Answer / nidhi
The NUMVAL function returns the numeric value represented by the
alphanumeric character string specified in an argument. The function
strips away any leading or trailing blanks in the string, producing a
numeric value that can be used in an arithmetic expression.
| Is This Answer Correct ? | 1 Yes | 0 No |
Write a cobol program making use of the redefine clause.
1.What is the default print format in cobol?
Name the divisions, which are available in a cobol program?
How do we get current date from system with century?
How to define variable 9(20) in COBOL, because compiler does not allow us to declare variables with Pic 9(18). Can anyone please let me know the answer... I know one answer to this question which is to use Compiler option Arith (Extend) during Compilation. It extends the maximum limit to 9(32)..Just wanted to know if there is any other way to extend this?
Can we move SPACES to numeric field and ZEROES to alphabetic field? If yes what are the way doing this?
How can we increase the size of an existing PDS to include more no. of modules. I tried the answer posted by Jagan(TSO PDS 'pds name') but did not find it working. The answer posted by kamal i know very well. Please suggest me a answer so that we don't need to delete the existing PDS and still we can change the size as well.
1.give the details about WHEN OTHER. 2. how many form are available in evaluate.
Re: 01 NAME1 PIC X(13) VALUE "COBOL PROGRAMMING". 01 NAME2 PIC X(13). now I want to display the value of NAME1 in reverse order i.e value should be displayed as "GNIMMARGORP LOBOC" HOW can I do that ??? please let me know if any one knows it.
How can you add a particular field/coloumn in copybook?
What happens in the background of spool when we submit a job for compilation and execution... This is a recent question in ibm...Kindly help me.....
Read a flat file and write last but one (I have n records in a file I have to write n-1th) record in another flat file. Could you please provide me the code in COBOL?
COBOL 
