IBM C6030-042 Online Practice Questions and Exam Preparation

IBM C6030-042 Online Questions & Answers

• Question 71:

  Which of the following actions will NOT help increase the maintainability of a program?

  A. Proper commenting for each piece of functionality
  B. Consolidating redundant code
  C. Deleting dead code
  D. Replacing subroutines with functions
  D. Replacing subroutines with functions

• Question 72:

  Which of the following is the most appropriate reason to explicitly use COMMIT or ROLLBACK?

  A. A batch program performs mass deletions where all deleted rows are independent from each other.
  B. An online program updates DB2 and IMS objects.
  C. The program abends.
  D. The program calls unknown subroutines.
  A. A batch program performs mass deletions where all deleted rows are independent from each other.

• Question 73:

  Given the following code, which is the only valid way to convert Q to P?

  DCL Q OFFSET;

  DCL P POINTER;

  DCLX CHAR(100)BASED;

  DCL A AREA(6000);

  ALLOC X SET(Q) IN(A);

  A. P = Q;
  B. P = POINTER(Q,A);
  C. P = POINTERVALUE(Q);
  D. P = ADDR(A) + Q;
  B. P = POINTER(Q,A);

• Question 74:

  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;
  D. SELECT (RC); WHEN (0,4); WHEN (8) PUT SKIP LIST (`ERROR IN B');OTHERWISE PUT SKIP LIST ('UNKNOWN VALUE FROM B');END;

• Question 75:

  Given the following statements, where will the variables A, B and C be allocated?

  DCL A FIXED;

  DCL B CHAR(80) BASED(P);

  DCL C CHAR(1000) CONTROLLED;

  DCL D AREA(1000);

  DCL P PTR STATIC;

  ALLOC C;

  ALLOC B IN(D);

  A. A in STACK, B and C are in HEAP
  B. A in HEAP, Band C are in STACK
  C. A and B are in STACK, C in HEAP
  D. A in STACK, B in STATIC, C in HEAP
  C. A and B are in STACK, C in HEAP

• Question 76:

  Which of the following would a non-technical manager be LEAST interested in regarding migration to Enterprise PL/I?

  A. Amount of computer resources needed for the conversion
  B. How many programs would be affected and the effort required
  C. Whether training programs would be needed
  D. Which Enterprise compiler options should be specified
  D. Which Enterprise compiler options should be specified

• Question 77:

  Which code should NOT be split out into separate subroutines?

  A. Redundant code in a program.
  B. Redundant code in a group otprograms.
  C. Dead code in a program.
  D. Code which must be available on different platforms.
  C. Dead code in a program.

• Question 78:

  Which of the following is the most appropriate way of avoiding a recursive deadlock?

  A. Aborting the Transaction
  B. Setting a time limit on the runtime of the Transaction
  C. Partitioning the relevant Database
  D. Changing the program
  D. Changing the program

• Question 79:

  What will be printed, if anything, to SYSPRINT after the following statements are executed?

  CALL REVERSEIT('PL/I');

  (SUBSCRIPTRANGE,SIZE,STRINGSIZE):

  REVERSEIT: PROC(31);

  DCL(I,J) BIN FIXED(31);

  DCL (S,T) CHAR(100) VARYING;

  T = S;

  J = 0;

  I = 0;

  DO I = LENGTH(S) TO 1;

  J = J + 1;

  SUBSTR(T,J,1) = SUBSTR(S,I,1);

  END;

  PUT(T);

  END;

  A. `PL'I'
  B. `I/LP'
  C. SUBSCRIPTRANGE error will be raised.
  D. STRINGSIZE error will be raised.
  A. `PL'I'

• Question 80:

  What will be printed to SYSPRINT after the following statements?

  DCLZZ9 PlC `ZZ9' INIT(-1);

  DCL A CHAR(10) INIT(LOW(10));

  DCL B CHAR(10) INIT('PL/l');

  SELECT;

  WHEN(A = LOW(12))PUT('CASE 1');

  WHEN(SUBSTR(B11.3) = `PL/I') PUT('CASE 2');

  WHEN(ZZ9 < 0)PUT('CASE 3');

  OTHERPUT('CASE 4');

  END;

  A. CASE 1
  B. CASE 2
  C. CASE 3
  D. CASE 4
  D. CASE 4