We're so confident of our products that we provide no hassle product exchange.
IBM Programming with IBM Enterprise PL/I Sample Questions:
1. CORRECT TEXT
Which of the following is the best way to force end of file of file DDIN before the actual end of file is reached?
DCL DDIN FILE RECORD INPUT;
A) SIGNAL ENDPAGE(DDIN);
B) End of file cannot be forced.
C) SIGNAL ENDFILE(DDIN);
D) CLOSE ENDFILE(DDIN);
2. CORRECT TEXT
Given the following code, what construct is equivalent?
SELECT;
WHEN(A< 1) B += 1;
WHEN (A < 2) B += 2;
WHEN (A< 3) B+= 3;
OTHERWISE B = 0;
END;
A) IFA< 1 THEN
B += 1;
ELSE
IF A < 2 THEN
B += 2;
ELSE
IF A < 3 THEN
B += 3;
ELSE
B = 0;
B) SELECT;
WHEN(A< 1) B += 1;
WHEN (A < 2) B += 2;
WHEN(A< 3) B +=3;
END;
C) SELECT;
WHEN (A < 3) B += 3;
WHEN (A < 2) B += 2;
WHEN(A< 1) B += 1;
OTHERWISE B = 0;
END;
D) IF A <1THEN B += 1;
IF A < 2 THEN B += 2;
IF A < 3 THEN B += 3;
ELSE B = 0;
3. CORRECT TEXT
Given the following code, what will be output?
MP: PROC OPTIONS(MAIN);
DCL A CHAR(1) INIT('A');
DCL B CHAR(1) INIT('B');
DCL C CHAR(1) STATIC INIT('C');
CALL SR1(A);
PUT SKIP LIST(A!!B!!C);
SR1: PROC(A);
DCL A CHAR(1);
DCL B CHAR(1);
DCL C CHAR(1);
A = '1'
B = '2'
C = '3';
END SR1;
END;
A) 1BC
B) 123
C) 1B3
D) 12C
4. CORRECT TEXT
Under default condition enablement, what is the result of executing the following code?
DCLX CHAR(5) INIT('A1234');
DCL Y PlC '9999' INIT(0);
Y = X;
A) STRINGSIZE would be raised.
B) The value of Y is A 123.
C) The value of Y is 1234.
D) CONVERSION would be raised.
5. CORRECT TEXT
Given the following program, what will be output?
TEST: PROC OPTIONS(MAIN);
DCL
1 B,
2 B1 FIXED BIN(31) INIT(1),
2 B2 FIXED BIN(31) INIT(2),
2 B3 FIXED BIN(31) INIT(4),
2 B4( 4 ) FIXED BIN(31),
2 B5 FIXED BIN(31) INIT(5),
2 B6( 5 ) FIXED BIN(31);
CALL SUB( ADDR(B) );
SUB: PROC( P);
DCL
P POINTER,
N1 FIXED BIN(31),
N2 FIXED BIN(31),
1 A BASED(P),
2 A1 FIXEDBIN(31),
2 A2 FIXEDBIN(31),
2 A3 FIXED BIN(31),
2 A4( N1 REFER(A3) ) CHAR(4),
2 A5 FIXED BIN(31),
2 A6( N2 REFER(A5) ) CHAR(4);
PUT SKIP LIST ( STG(A));
END; END;
A) 24
B) 40
C) 52
D) 36
Solutions:
| Question # 1 Answer: C | Question # 2 Answer: A | Question # 3 Answer: A | Question # 4 Answer: D | Question # 5 Answer: C |
By Kim
