Program A calls program B with PC as a parameter defined BIN FIXED (31 .0). Program B sets PC as follows:
0 OK 4 WARNING 8 ERROR
Which of the following is the most appropriate statement for testing the PC variable?
A. IF (RC ^= 0) and (RC ^= 4) THEN PUT SKIP LIST(`ERROR IN B');ELSE IF RC> 8 THEN PUT SKIP LIST ('UNKNOWN VALUE FROM B);
B. SELECT (RC);WHEN (0, 4);OTHERWISEPUT SKIP LIST('UNKNOWN VALUE FROM B');END;
C. IF (RC >4) THEN PUT SKIP LIST('ERROR IN B');ELSE PUT SKIP LIST('UNKNOWN VALUE FROM B');
D. SELECT (RC); WHEN (0,4); WHEN (8) PUT SKIP LIST (`ERROR IN B');OTHERWISE PUT SKIP LIST ('UNKNOWN VALUE FROM B');END;
What could be used when a structure is passed to a subroutine to verify that the area the structure occupies in storage has not been overwritten?
A. Structure is passed as a pointer.
B. Structure has eyecatchers at start and at end.
C. Structure has a length field at start.
D. Structure is passed as an aggregate.
In the following example what value will be printed to SYSPRINT, if any, from the PUT LIST in PGM_A?
PGM_A PROC;
DCL INPARM CHAR (10) INIT('FIRST CALL);
DCL P_OUT PTR;
DCL OUTPARM CHAR(10) BASED (P_OUT);
DCL PGM_B ENTRY(CHAR(10),PTR) EXTERNAL:
CALL P0MB (INPARM,P OUT);
IF OUTPARM = `RESULT `THEN
DO;
INPARM = ";
CALL PGM_B (INPARM,P_OUT);
END;
PUT LIST(OUTPARM);
END;
PGM_B: PROC(INPARMP_OUT);
DCL INPARM CHAR (10);
DCL P_OUT PTR;
DCL OUTPARM CHAR (10) INIT(");
P_OUT = ADDR(OUTPARM);
IF INPARM =`FIRST CALL THEN
OUTPARM = `RESULT `;
ELSE
OUTPARM = `NO RESULT';
END;
A. Blanks
B. `NO RESULT'
C. Unpredictable
D. `RESULT'
The lead developer is presenting sample code. One of the team members identifies an error in the code. Which of the following is the most appropriate response for the lead developer to make?
A. Apologize for the error and continue the presentation.
B. Thank the person for pointing out the error.
C. Suggest that this error be discussed in the next meeting.
D. Declare the point irrelevant because this is sample code.
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?
A. Check the SQLCODE after each EXEC SQL FETCH statement.
B. Check the SQLCODE after each EXEC SQL OPEN / CLOSE statement.
C. Set the EOF bit to `1'B, if SQLCODE = 100 (not found).
D. Check the CURRENT SQLID.
Given the following declarations, which code is likely to perform best and correctly initialize structure 3?
DCL 1 S UNALIGNED, 2 A CHAR(3), 2 B BIN FIXED(31), 2 C DEC FIXED(5); DCL 1 T UNALIGNED LIKE S; T = ";
A. S = ";
B. S = T,BY NAME;
C. CALL PLIFILL(ADDR(S),'`,STG(S));
D. CALL PLIMOVE(ADDR(S),ADDR(T),STG(S));
Given the following declarations, a list of 100 elements must be created so that the element created last
can be accessed as the first element of the list. A new element is always inserted in front of the element
created before. The variable NEXT in the last element should contain the value NULL. Which of the
following pieces of code implements this?
DCL 1 NODE BASED (ANCHOR).
2 NEXT POINTER,
2 DATA FIXED BIN (31);
DCL ANCHOR POINTER;
DCL P POINTER INIT (NULL());
DCL I FIXED BIN(31);
A. DO I = 1 TO 100;ALLOCATE NODE;NODE.DATA = I;NODE.NEXT = P;P = ANCHOR;END;
B. DO I = 1 TO 100;P = ANCHOR;ALLOCATE NODE;NOTE.DATA = I;NODE.NEXT = P;END;
C. I = 1 TO 100;ALLOCATE NODE;NODE.DATA = I;NODE.NEXT = P;ANCHOR = P;END;
D. DO I = 1 TO 100;NODE.DATA = I;NODE.NEXT = P;ALLOCATE NODE;P = ANCHOR;END;
In which of the following examples will a dummy argument be passed?
A. DCLA EXT ENTRY;DCL (X,Y) FIXED BIN;CALL A(X,Y);
B. DCL A EXT ENTRY (FIXED, BINARY);DCL (X,Y) FIXED BIN;CALL A(X,Y);
C. DCL A EXT ENTRY (FIXED BINARY);DCL (X,Y) FIXED BIN;CALL A(X,Y);
D. PGM: PROC OPTIONS(MAIN);DCL (X,Y) FIXED BIN;CALL C (X,Y);
E. PROC (A,B);DCL (A,B) BIN FIXED;END C;END PGM;
Which of the following will definitely NOT cause an unresolved external entry?
A. Missing library at link time
B. The main procedure name matching the binder or load module `name'
C. A mismatch in names between the CALL and the actual procedure
D. An incorrect DECLARE for the external entry
Which of the following best describes an atomic transaction?
A. The database modifications must follow an `all or nothing' rule
B. Only valid data will be written to database
C. If one part of the transaction fails, the remainder may still be processed
D. Referential Integrity is maintained in the database
Nowadays, the certification exams become more and more important and required by more and more enterprises when applying for a job. But how to prepare for the exam effectively? How to prepare for the exam in a short time with less efforts? How to get a ideal result and how to find the most reliable resources? Here on Vcedump.com, you will find all the answers. Vcedump.com provide not only IBM exam questions, answers and explanations but also complete assistance on your exam preparation and certification application. If you are confused on your C6030-042 exam preparations and IBM certification application, do not hesitate to visit our Vcedump.com to find your solutions here.