Interested to Buy Any Domain ? << Click Here >> for more details...
Sending data is aplhabetic size 7 (value 3000), I wantated
this value to be stored in database, which is defined as
s9(7)v9(2)comp-3.
- 2 Answers
- 5982 Views
- I also Faced
- E-Mail Answers
Answer Posted / guest1
In the above answer the group contains a PIC clause. It
wrong. Group item should not contain any PIC clause.
01 ws-in-alpha pic x(7).
01 ws-in-numeric redefines ws-in-alpha.
05 ws-data pic 9(7)v99.
01 ws-actual-data pic s9(7)v99 comp-3.
In procedure division,
move ws-in-numeric to ws-actual-data.
| Is This Answer Correct ? | 6 Yes | 0 No |
Post New Answer View All Answers
how do you reference the printer file formats from cobol programs
What is amode(24)?
What happens when we move a comp-3 field to an edited (say z (9). Zz-)?
Discuss about changing dataset name in proc.
Whats the difference between search & search ALL?
if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need
What is the difference between a binary search and a sequential search what are the pertinent cobol?
What is Pic 9v99 Indicates in COBOL?
How to print 10 to 1 if the input have only 10 digit number?
Which division and paragraphs are mandatory for a COBOL program?
What are 77 levels used for?
Why is it necessary that file needs to be opened in I-O mode for REWRITE?
What is difference between static and dynamic call in cobol?
What rules are to be followed while using the corresponding options?
What are the cobol coding sheets?
