Free IBM 000-268 Exam Dumps Questions & Answers

Given the following code segment:
d CusInfo ds dim(10) qualified
d CusNum 5 0
d AmtDue 7 2
d OrdYTD 7 2
d OrdPrv 7 2
How would the AmtDue subfield for the 5th element of the CusInfo array be referenced?

• A.  AmtDue(5)
• B.  CusInfo.AmtDue(5)
• C.  CusInfo(5).AmtDue
• D.  CusInfo(5).AmtDue(5)

Which of the following RPG constructs can be used to return the user ID of the user running the program?

• A.  INFDS (File Information Data Structure)
• B.  PSDS (Program Status Data Structure)
• C.  %USER (Retrieve User ID Built-in Function)
• D.  %JOBINF (Retrieve Job Information Built-in Function)

Given the following code segment:
D TaxCalc PR EXTPGM('MYPGM')
D Parm1 5p 0 CONST
D Parm2 10A OPTIONS(*NOPASS)
What is the purpose of the keyword OPTIONS(*NOPASS)?

• A.  The parameter is optional
• B.  The parameter cannot be modified by the called program
• C.  If the parameter's value is changed by MYPGM, the caller will not see the new value.
• D.  The parameter will accept the special value *OMIT

A Service Program needs to be created without using Binder Language
. Module A contains a procedure named A
. Module B contains a procedure named B
.Module C contains procedures named C1 and C2.
All four of the procedures are to have their names exported. Which of the following commands will accomplish this?

• A.  CRTSRVPGM SRVPGM(MYSRVPGM) MODULE(A B C) EXPORT(*NOSRCFILE)
• B.  CRTSRVPGM SRVPGM(MYSRVPGM) MODULE(A B C) EXPORT(*ALL)
• C.  CRTSRVPGM SRVPGM(MYSRVPGM) MODULE(A B C) EXPORT(A B C1 C2)
• D.  CRTSRVPGM SRVPGM(MYSRVPGM) MODULE(A B C) EXPORT(*SRCFILE)

In the following code sample, file CUSSALES contains a record format CUSSALESR, with unique key fields CSCONO, CSCSNO and CSYEAR.

Assuming the READE operation is successful, which record is retrieved?

• A.  The first record for company 3, customer 100 with a year greater than 2003
• B.  The first record with a company greater than 3
• C.  The first record for company 3, with a customer greater than 100
• D.  The first record for company 3, customer 100