C9050-042試験無料問題集「IBM Developing with IBM Enterprise PL/I 認定」
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
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
正解:B
解答を投票する
Given the following code, which call will pass a dummy argument?
PROG: PROC OPTIONS(MAIN);
DCL SUM01 DEC FIXED(5,0) INIT (7);
DCL SUM02 DEC FIXED(9,0) INIT (999);
CALL SUBA(SUM01,
SUM02);
CALL SUSB(SUM01,
SUM02);
CALL SUBC(SUM01,
SUM02);
CALL SUBD(SUM01,
SUM02);
SUBA PROC( PRM1,
PRM2);
DCL PRM1 DEC FIXED (5,0) BYVALUE,
PRM2 DEC FIXED (9,0);
END SUBA;
SUBB:PROC( PRM1,
PRM2);
DCL PRM1 DEC FIXED (5,0),
PRM2 DEC FIXED (9,0);
END SUBD;
SUBC: PROC( PRM 1,
PRM2);
DCL PRM1 BIN FIXED (15,0),
PRM2 DEC FIXED (9,0);
END SUBC;
SUBD:PROC( PRM 1,
PRM2);
DCL PRM1 DEC FIXED(5,0) BYADDR,
PRM2 DEC FIXED (9,0) SYADDP;
END SUBD;
END PROG;
PROG: PROC OPTIONS(MAIN);
DCL SUM01 DEC FIXED(5,0) INIT (7);
DCL SUM02 DEC FIXED(9,0) INIT (999);
CALL SUBA(SUM01,
SUM02);
CALL SUSB(SUM01,
SUM02);
CALL SUBC(SUM01,
SUM02);
CALL SUBD(SUM01,
SUM02);
SUBA PROC( PRM1,
PRM2);
DCL PRM1 DEC FIXED (5,0) BYVALUE,
PRM2 DEC FIXED (9,0);
END SUBA;
SUBB:PROC( PRM1,
PRM2);
DCL PRM1 DEC FIXED (5,0),
PRM2 DEC FIXED (9,0);
END SUBD;
SUBC: PROC( PRM 1,
PRM2);
DCL PRM1 BIN FIXED (15,0),
PRM2 DEC FIXED (9,0);
END SUBC;
SUBD:PROC( PRM 1,
PRM2);
DCL PRM1 DEC FIXED(5,0) BYADDR,
PRM2 DEC FIXED (9,0) SYADDP;
END SUBD;
END PROG;
正解:A
解答を投票する