Given the following code, what are the default attributes of DSET1 after the READ statement?

DCL DATA CHAR (80);

DCL DSET1 FILE;

READ FILE(DSET1) INTO(DATA);

A. SEQUENTIAL RECORD INPUT

B. STREAM INPUT

C. DIRECT INPUT

D. KEYED RECORD INPUT

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;

A. A table of the months of theyearwill be printed.

B. The compiler will issue no messages but the program will tail trying to execute the statement.

C. The compiler will issue a message for the statement and results are unpredictable.

D. Twelve zeroes will be printed.

WIDECHAR can be converted to CHAR. Which rule has to be observed?

A. Each WIDECHAR value has to be less than `0080'WX, otherwise CONVERSION is raised.

B. All WIDECHAR values can be converted to CHAP using the appropriate builtin function.

C. Each WIDECHAR value has to be less than or equal to `00FF'WX, otherwise CONVERSIONis raised.

D. By conversion of WIDECHAR to CHAR the left byte is omitted.

In the following example how many lines, if any, will be printed?

GRAPH: PROC OPTIONS(MAIN);

DCL I FIXED BIN (31);

DCL POINTS FIXED BIN (31);

CALL INIT_POINTS;

DO I = 1 TO 100;

GET LIST(POINTS);

CALL PLOT_NEXT(POINTS);

END;

INIT_POINTS: PROC;

DCL I FIXED BIN (31);

DCL POINTS(1000) FIXED BIN (31);

DCL BAR CHAR (100) INIT((100)'*') STATIC;

DO I 1 TO 10;

POINTS(I) = I;

PUT SKIP LIST (POINTS(I),SUBSTR(BAR,1,I));

END;

RETURN;

PLOT_NEXT: ENTRY(I);

POINTS(I) = I;

PUT SKIP LIST(POINTS(I),SUBSTR(BAR,1 I));

END;

END GRAPH;

A. 10

B. 100

C. 110

D. It is unpredictable as the program will fail.

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