IBM Developing with IBM Enterprise PL/I - C9050-042무료 덤프문제 풀어보기
If the PROC name is less than 8 characters, what ENTRY point should be specified for a PL/I routine
which will be FETCHed?
which will be FETCHed?
정답: A
What happens after executing the following code, assuming the input file has more than 1 record?
DCL INPFILE FILE RECORD INPUT ENV(VB RECSIZE(100)); DCL P PTR;
DCL B CHAR(100) VARYING BASED(P);
DCLC CHAR(110) VARYING BASED(P);
READ FILE(INPFILE) SET(P);
C=B!! 'EXTENDED
READ FILE(INPFILE) SET(P);
DCL INPFILE FILE RECORD INPUT ENV(VB RECSIZE(100)); DCL P PTR;
DCL B CHAR(100) VARYING BASED(P);
DCLC CHAR(110) VARYING BASED(P);
READ FILE(INPFILE) SET(P);
C=B!! 'EXTENDED
READ FILE(INPFILE) SET(P);
정답: C
Given the following code:
DCL INDATA FILE RECORD INPUT;
DCL INSTRUC CHAR(100);
DCL EOF BIT(1) INIT('0'B);
ON ENDFILE(INDATA) EOF = '1'B;
OPEN FILE(INDATA);
READ FILE(INDATA) INTO(INSTRUC);
DO WHILE (^EOF);
CALL SR_PROCESS;
READ FILE(INDATA) INTO(INSTRUC);
END;
CLOSE FILE(INDATA);
If the database (input file) changes from OS-PS to DB2 view and the necessary syntax has been changed
accordingly, which of the following DB2-related steps is NOT additionally required to guarantee the same
level of stability and functionality?
DCL INDATA FILE RECORD INPUT;
DCL INSTRUC CHAR(100);
DCL EOF BIT(1) INIT('0'B);
ON ENDFILE(INDATA) EOF = '1'B;
OPEN FILE(INDATA);
READ FILE(INDATA) INTO(INSTRUC);
DO WHILE (^EOF);
CALL SR_PROCESS;
READ FILE(INDATA) INTO(INSTRUC);
END;
CLOSE FILE(INDATA);
If the database (input file) changes from OS-PS to DB2 view and the necessary syntax has been changed
accordingly, which of the following DB2-related steps is NOT additionally required to guarantee the same
level of stability and functionality?
정답: A
Given the following example, what will happen with the PUT SKIP DATA statement after the DO-loop?
PGM_A PROC OPTIONS(MAIN); DCL I FIXED SIN(31);
DCL MON CHAR (10);
DCL DAY(12) CHAP (2) INIT ('31','28','31', '30','31','30' 31','31','30' '31','30','31');
DO I = 1 TO 12;
MON = MON_FUNC(I);
PUT DATA (MON,DAY(I));
END;
PUT SKIP DATA (MON_ARR);
MON_FUNC: PROC(INP) RETURNS(CHAP(10));
DCL INP FIXED BIN (31);
DCL MON_APP(12) CHAR (10) INIT ('JANUARY ','FEBRUARY ','MARCH ', 'APRIL ','MAY
"JUNE 'JULY ''AUGUST ''SEPTEMBER','OCTOBER ','NOVEMBER ','DECEMBER ');
RETURN(MON_ARR(INP));
END;
END;
PGM_A PROC OPTIONS(MAIN); DCL I FIXED SIN(31);
DCL MON CHAR (10);
DCL DAY(12) CHAP (2) INIT ('31','28','31', '30','31','30' 31','31','30' '31','30','31');
DO I = 1 TO 12;
MON = MON_FUNC(I);
PUT DATA (MON,DAY(I));
END;
PUT SKIP DATA (MON_ARR);
MON_FUNC: PROC(INP) RETURNS(CHAP(10));
DCL INP FIXED BIN (31);
DCL MON_APP(12) CHAR (10) INIT ('JANUARY ','FEBRUARY ','MARCH ', 'APRIL ','MAY
"JUNE 'JULY ''AUGUST ''SEPTEMBER','OCTOBER ','NOVEMBER ','DECEMBER ');
RETURN(MON_ARR(INP));
END;
END;
정답: D
Given the lollowing declarations, what statement will raise STRINGSIZE condition if enabled?
DCLA_STR CHAR (100) VARYING;
DCLB_STR CHAR(10) STATIC;
DCL C_STR CHAR (100);
DCLA_STR CHAR (100) VARYING;
DCLB_STR CHAR(10) STATIC;
DCL C_STR CHAR (100);
정답: A
What happens after executing the following code?
DCL OUTFILE FILE RECORD OUTPUT;
DCLP PTR;
DCL I BIN FIXED(31);
DCL A BIN FIXED(31) BASED(P);
DO I = 1 TO 10;
LOCATE A FILE(OUTFILE) SET(P);
A = I;
END;
CLOSE FILE(OUTFILE);
DCL OUTFILE FILE RECORD OUTPUT;
DCLP PTR;
DCL I BIN FIXED(31);
DCL A BIN FIXED(31) BASED(P);
DO I = 1 TO 10;
LOCATE A FILE(OUTFILE) SET(P);
A = I;
END;
CLOSE FILE(OUTFILE);
정답: D
A programmer has submitted the following declaration for review. What feedback should be provided to
the programmer?
DCL 1 A,
2 B DIM (1000) FIXED BIN (31) INIT (0),
2 C DIM (1000) FIXED BIN(15) INIT (0);
the programmer?
DCL 1 A,
2 B DIM (1000) FIXED BIN (31) INIT (0),
2 C DIM (1000) FIXED BIN(15) INIT (0);
정답: B
What would the attribute table in a compile list be used for when looking at the variable in a dump?
정답: C