IBM Programming with IBM Enterprise PL/I - 000-041 Exam Practice Test
CORRECT TEXT
Which is the impact, if any, of LIKE in the following code?
DCL
1 XY
2 A CHAR(4),
2 B BIN FIXED(31);
DCL 1 YZ LIKE XY;
Which is the impact, if any, of LIKE in the following code?
DCL
1 XY
2 A CHAR(4),
2 B BIN FIXED(31);
DCL 1 YZ LIKE XY;
Correct Answer: A
Vote an answer
CORRECT TEXT
Given the following piece of code, what will be the output of the preprocessor?
%F: PROC(S) RETURNS(CHAR);
DCL S CHAR;
RETURN(SUBSTR(S, 1, 1));
%END;
PUT (F(ABC));
%ACTIVATE F;
PUT (F(ABC));
Given the following piece of code, what will be the output of the preprocessor?
%F: PROC(S) RETURNS(CHAR);
DCL S CHAR;
RETURN(SUBSTR(S, 1, 1));
%END;
PUT (F(ABC));
%ACTIVATE F;
PUT (F(ABC));
Correct Answer: C
Vote an answer
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;
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;
Correct Answer: A
Vote an answer
CORRECT TEXT
Given the following DECLARE statement, how many bytes will be allocated to A?
DCL
1 A UNION,
2 C8 CHAR(8),
2 XB FIXED BIN(31),
2 BX BIT(16);
Given the following DECLARE statement, how many bytes will be allocated to A?
DCL
1 A UNION,
2 C8 CHAR(8),
2 XB FIXED BIN(31),
2 BX BIT(16);
Correct Answer: B
Vote an answer
CORRECT TEXT
If FUNC_CODE is a CHAR(4) variable, then for the following code, what is the best declaration
for GHU, GU, etc
SELECT( FUNC CODE);
WHEN( GHU) ...
WHEN( GU ) ...
etc
END;
If FUNC_CODE is a CHAR(4) variable, then for the following code, what is the best declaration
for GHU, GU, etc
SELECT( FUNC CODE);
WHEN( GHU) ...
WHEN( GU ) ...
etc
END;
Correct Answer: A
Vote an answer
CORRECT TEXT
What are the values of the elements of the array A, if any, after executing the following code?
DCLA(5) BIN FIXED(15) INIT((5)(0));
DCL I BIN FIXED(31);
DO I =-1 TO 1;
A(l) = 1;
END;
What are the values of the elements of the array A, if any, after executing the following code?
DCLA(5) BIN FIXED(15) INIT((5)(0));
DCL I BIN FIXED(31);
DO I =-1 TO 1;
A(l) = 1;
END;
Correct Answer: A
Vote an answer