최신 IBM certifications II 000-972 무료샘플문제:

1. Given the following code sample:
d address s 30 inz('3207 North Henderson Parkway') d addressChars s 1 dim(30)
c movea address addressChars
c move *blanks address
Which of the following would produce identical results?

A) daddressarray ds
d address 30 inz('3207 North Henderson Parkway') d addressChars 1 dim(30) overlay(address)
/free addressChars = address;
address = *blanks;
B) d address s 30inz('3207 North Henderson Parkway') d addressChars s 1 dim(30)
/free addressChars = address;
address = *blanks;
C) d address s 30inz('3207 North Henderson Parkway')
d addressChars s 1 dim(30) overlay(address)
/free %SubArr(addressChars : 1 : 30) = address;
address = *blanks;
D) d address s 30inz('3207 North Henderson Parkway') d addressarray ds
d addressChars 1 dim(30)
/free addressarray = address;
address = *blanks;

2. Given the following code sample: fcustinq cf e workstn sfile(openord:sflrr1) d sflrr1 s 3 0 C*0N01Factor1+++++++Opcode(E)+Factor2+++++++Result+++++++Len++D+HiLoEq c *in99 doueq *on c add 1 sflrr1 c write openord 99 c enddo Which of the following /Free form code samples will perform the same task?

A) dou %eof(openord);
sflrr1 = sflrr1 + 1;
write openord;
enddo;
B) dow not %eof(openord);
sflrr1 += 1;
write openord;
enddo;
C) dow %found(custinq);
sflrr1 += 1;
write openord;
enddo;
D) dou %eof(custinq);
sflrr1 += 1;
write openord;
enddo;

3. Given the following code segment:
D Title1 C 'Mr.'
D Title2 C 'Mrs.'
D NAME S 20A INZ('Mrs. Jones')
Which of the following statements will change the content of the field NAME to 'Mr. Jones'?

A) Name = %SUBST(Title1 : 1 : Name);
B) Name = %REPLACE(Name : Title2 : Title1);
C) Name = %REPLACE(Title1 : Name : 1 : 4);
D) Name = Title1 + %SUBST(Name : Title2);

4. An RPG program calls procedures named ValidateCust and GetCustInf which reside in a Service Program called CustProcs. The same program also calls a procedure named CenterField which resides in a Service Program called Utility. When creating this program, which of the following Binding Directory entries could be used to allow creation of the program with the CRTBNDRPG command?

A) OBJECT TYPE ValidateCust *PROCEDURE GetCustNo *PROCEDURE CustProcs *PROCEDURE
B) OBJECT TYPE ProdProcs *SRVPGM CustProcs *SRVPGM Utility *SRVPGM DBIO *SRVPGM
C) OBJECT TYPE ValidateCust *MODULE GetCustInf *MODULE Centerfield *MODULE
D) OBJECT TYPE ValidateCust *SRVPGM GetCustInf *SRVPGM Centerfield *SRVPGM

5. Given the data structure below: DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords++++++++++++++++++++++ D Student DS Qualified D Name 35 D Address 35 D City 21 D RegistDate D Inz(*Sys) Which of the following defines a data structure named NewGrad and initializes its subfields to the same initial values as those in Student?

A) DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++
D NewGrad DS Likeds(Student)
D Inz(Student)
B) DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++
D NewGrad DS Likeds(Student)
C) DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++
D NewGrad DS Likeds(Student)
D Inz(*Likeds)
D) DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++
D NewGrad DS Likeds(Student) Inz

질문과 대답: