Interested to Buy Any Domain ? << Click Here >> for more details...
01 var1 pic s9(9)v99.
01 var2 pic x(30).
procedure division.
move 12345.99 to var1.
move12345.99 to var2.
display var1.
display var2.
what is the output?
- 2 Answers
- 9706 Views
- IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / kingshuk
var1:0000123459I
If we move 12345.99 to var2 it will give a compilation error.
It should be move '12345.99' to var2.Then
var2:12345.99
| Is This Answer Correct ? | 16 Yes | 4 No |
Answer / john benito
Will abend.
Pic clause is not allowed in 01 level.
| Is This Answer Correct ? | 3 Yes | 28 No |
how to crack cts interview apps? NOVEMBER 21 2010
can I copy book which contain db2 statment in procedure divion?
where did you see the information regarding abend codes in jcl?
01 ws-p pic 9(2). 01 ws-q pic 9(2) value 01. 01 ws-r pic 9(2) value 99. p.d. compute p = q + r what will be result of p ans(00) but my question is that how i got 10 on the place of 00. (truncation will ocuure on right side not left). please tell me ?
can internal sort be applied to sort ksds files?
IDENTIFICATION DIVISION. PROGRAM-ID. MOVEPGM. DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-I PIC 9(2). PROCEDURE DIVISION. A1000-MAIN-PARA. PERFORM PARA-X WITH TEST BEFORE UNTIL WS-I= 5 STOP RUN. PARA-X. DISPLAY "BEST2". I m getting error s722,while executing the program, seems getting in loop, can anybody tell me why
01 a pic 9(6) value is 123456 01 b pic 9(3) move a to b wht will be the value ?
Which division and paragraphs are mandatory for a COBOL program?
Hi Guys, I have faced one interview question if I have requirement to add 5 new columns to existing table what are prerequisite do i need to take.
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.
In a program, variables are used but no DB2 involved in it. Can you call it as host variables??
I have the file which is having the extension no as records. sample file will look like below. 2310 3410 3256 4350 3781 5408 I need to replace the record which is starting with 3 to 5 (i.e) 3410 to 5410. How can we do it through cobol and cobol-db2 program? I need the possible logic?
COBOL 
