Free IBM 000-972 Exam Dumps Questions & Answers

For which of the following i5/OS object types does RPG provide direct I/O support?

• A.Data Area (*DTAARA)
• B.User Index (*USRIDX)
• C.User Space (*USRSPC)
• D.Data Queue (*DTAQ)

Given the following code sample:
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++
D ElementsAllocateDS...
D S 10i 0
Which of the following best describes ElementsAllocateDS?

• A.A syntax error
• B.A long field name
• C.A data structure
• D.A qualified field name

Given the following D-spec:
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords++++++++++++++++++++++
d EndOfMonth s d
Which of the following expressions will set EndOfMonth to the last day of the previous month?

• A.EndOfMonth = %subdt(%date() : %day(%date())) - %days(1);
• B.EndOfMonth = %date - %days(%subdt(%date() : *d)) - %days(1);
• C.EndOfMonth = %subdt(%date() : %day(%date()));
• D.EndOfMonth = %date() - %days(%subdt(%date() : *d));

The programs below were compiled with DFTACTGRP(*YES). When the first program was called,
a decimal data error caused the programs to fail. After recompiling both programs with
DFTACTGRP(*NO) this failure no longer occurs.
d TestPGM PR extpgm('CALLME')
/free
CallP(E) TestPgm();
*inlr = *on;
// Program CALLME
d TestDS DS
d Number 5p 0
/free
Number += 1;
*inlr = *on;
Which of the following explains this situation?

• A.In ILE programs decimal data errors are handled automatically.
• B.In an ILE program the default initialization for field Number is zero.
• C.The (E) on the CallP causes the error to be marked as handled.
• D.Decimal data errors have a lower priority in ILE programs.

Orders are accepted under the following conditions:
Orders from Government (government) organizations are always accepted.
The order amount (orderAmt) does not exceed the individual order limit (limit)
The order does not cause the customer's balance (custBalance) to exceed their credit limit
(custCrLimit).
Which of the following expressions correctly enforces these conditions?

• A.If (orderAmt <= limit) and
  (custBalance + orderAmt <= custCrLimit or custType = government);
• B.If (orderAmt <= limit or
  custBalance + orderAmt <= custCrLimit) and custType = government;
• C.If (orderAmt <= limit and (custBalance + orderAmt) <= custCrLimit) or custType = government;
• D.If (orderAmt <= limit ) or
  (custBalance + orderAmt <= custCrLimit or custType = government );