IBM IBM Certified Application Developer C6030-042 Questions & Answers

• Question 11:

  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

  Correct Answer: D

• Question 12:

  Which of the following compile list sections would be used to find the location of a static variable in a dump?

  A. Attribute/Xref Table

  B. Source Listing

  C. Table of Offsets and Statement Numbers

  D. Storage Offset Listing

  Correct Answer: D

• Question 13:

  A module which is serially reusable has which of the following characteristics?

  A. Is intended for single use only and must be refreshed from disk before it can be invoked again

  B. Must contain the necessary logic to reset control variables and data areas at entry or exit and a second task may not enter the module until the first task has finished

  C. Is designed for concurrent execution by multiple tasks

  D. All or part of it may be replaced at any time by the operating system

  Correct Answer: B

• Question 14:

  Given the following code, which set of statements will insert the new element into the doublylinked list after

  the element pointed to by P?

  DCL1X BASED,

  2 FORWARD POINTER,

  2 BACKWARD POINTER,

  2 DATA FIXED BIN (31);

  ALLOC X SET(Q);

  A. Q->FORWARD = P;Q->BACKWARD = P->BACKWARD;P->FORWARD = QP->BACKWARD = Q;

  B. Q->FORWARD = P-> FORWARD;Q->BACKWARD = P;P->FORWARD->BACKWARD = P;P>FORWARD = Q;

  C. Q->FORWARD = P->FORWARD;Q->BACKWARD = P;P->FORWARD = Q;P->FORWARD>BACKWARD = Q;

  D. P->FORWARD->BACKWARD = Q;P->FORWARD = Q;Q->FORWARD = P->FORWARD;Q>BACKWARD = P;

  Correct Answer: B

• Question 15:

  ltthere is a direct read access to a data objectwith a unique key (e.g., DB2-SELECT, IMS-GU, ...),which otthe following return codes is possible?

  A. OK, not found, database not available

  B. OK, endfile, not found

  C. OK, duplicate key, database not available

  D. OK, endfile, database not available

  Correct Answer: A

• Question 16:

  It becomes apparent that the deadline to implement and test all the functions required for an application is at risk. Which of the following is the best course of action?

  A. Inform management that more people are required.

  B. Inform management that some functions will not have been tested when the system isimplemented.

  C. Inform management thatthe deadline has to be changed.

  D. Inform the team and the sponsor aboutthe problem and discuss possible solutions.

  Correct Answer: D

• Question 17:

  What characterizes the hierarchical data model with respect to data access?

  A. Data access supports parent-child relationships.

  B. Data access supports tables.

  C. Data access can only be sequential.

  D. Data access can only be via an index.

  Correct Answer: A

• Question 18:

  What will be printed, if anything, to SYSPRINT after executing the following code? DCL A FIXED

  CONTROLLED;

  DCL P PTR;

  DCL X FIXED BASED(P);

  ALLOC A;

  A = 1;

  ALLOC A;

  A = 2;

  P = ADDR(A);

  ALLOC A;

  A = 3;

  P = ADDR(A);

  ALLOC A;

  A = 4;

  FREE A;

  FREE A;

  PUT DATA(X);

  A. 2

  B. 3

  C. 4

  D. The results are undefined.

  Correct Answer: D

• Question 19:

  Given the following declaration, which code does NOT initialize C completely?

  DCL 1 A,

  2 B DIM (0:9),

  3 C DIM (5) FIXED BIN (31),

  3 D CHAR (100) VAR;

  A. 3 C DIM (5) FIXED BIN (31) INIT ((50)1),

  B. 3 C DIM (5) FIXED BIN (31) INIT ((5)1,(*)2),

  C. 3 C DIM (5) FIXED BIN (31) INIT ((HSOUND(C,1))( 0)),

  D. 3 C DIM (5) FIXED BIN (31) INIT ((*)1),

  Correct Answer: C

• Question 20:

  In the following example, what value will be written to SYSPRINT, if anything, by the PUT statement in

  PGM_A?

  PGM_A: PROC;

  DCL INPARM CHAR (12) INIT('FIRST CALL? `);

  DCL P_OUT PTR;

  DCL OUTPARM CHAR (10) BASED (P_OUT);

  DCL PGM_B ENTRY (CHAR(12),PTR) EXTEPNAL;

  CALL PGM_B (INPARM,P_OUT);

  IF OUTPARM = `YES' THEN

  DO;

  INPARM = `FOLLOW ON';

  CALL PGM_B (INPARM,P_OUT);

  END;

  ELSE

  DO;

  INPARM = `NORMAL CALL';

  CALL PGM_B (INPARM,P_OUT);

  END;

  PUT SKIP LIST(OUTPARM);

  END;

  PGM_B: PROC(INPARM,P_OUT);

  DCL INPARM CHAR (12);

  DCL P_OUT PTR;

  DCL OUTPARM CHAR (12) STATIC INIT(");

  P_OUT = ADDR(OUTPARM);

  IF INPARM = `FIRST CALL? ` THEN

  OUTPARM = `YES'; ELSE

  IF OUTPARM = " THEN

  OUTPARM = `FIRST CALL';

  END;

  A. `FIRST CALL'

  B. `YES'

  C. blanks

  D. The results are unpredictable.

  Correct Answer: B