Developing with IBM Enterprise PL/I: C6030-042

Given the following code, which DECLARE should NOT be used for a reentrant program? DCL B BIN FIXED(31,0) INIT (4);

A = B;

A. DCL A BIN FIXED (31,0) INIT(0);

B. DCL A BIN FIXED (31,0) INIT(0) STATIC;

C. DCL A BIN FIXED (31,0) INIT(0) AUTOMATIC;

D. DCL A BIN FIXED (31,0);

Given the following pseudocode inside a loop, where should the COMMIT action be placed assuming that there is always a one-to-many relationship between header and detail tables? 1 Find header row 2 IF found 3 Update header row 4 Find detail row 5 IF found THEN 6 Update detail rows 7 ELSE 8 ENDIF 9 ENDIF

A. Afterline 3

B. Afterline 6

C. Afterline 8

D. After lines 3, 8, and 9

Requirement Copy a dataset of record length 100 to another dataset.

If the following code does not fulfill the requirement above, which is the most likely reason? DCL DDIN

FILE RECORD INPUT;

DCL DDOUT FILE RECORD OUTPUT;

DCL INSTRUC CHAR(100);

DCL EOF_IN BIT(1) INIT('0'B);

ON ENDFILE(DDIN) EOF_IN = `1'B;

READ FILE(DDIN) INTO(INSTRUC);

DO WHlLE(^EOF_IN);

WRITE FILE(DDOUT) FROM(INSTRUC);

READ FILE(DDIN) INTO(INSTRUC);

WRITE FILE(DDOUT) FROM(INSTRUC);

END;

A. The code does not fulfill the requirement because too many records will be written to the output dataset, except when the input dataset is empty.

B. The code does notfulfill the requirement because the input structure is the same as the outputstructure.

C. The code does notfulfill the requirement because the OPEN statements are missing.

D. The code fulfills the requirement.