IBM ILE RPG Programmer - 000-972 FREE EXAM DUMPS QUESTIONS & ANSWERS]

Question 1

A trigger program has been designed to run whenever file CUSTMAST is modified. A decimal data error is encountered when trying to reference a numeric field in the old record image of CUSTMAST. The buffer contained hexadecimal '40404040'. Which of the following was found to have caused the error?

A. The trigger program was fired by an *INSERT event. B. The trigger program was added as a *BEFORE trigger. C. The trigger program was fired by a *DELETE event. D. The trigger program was compiled withoutALWNULL(*YES).

Discussion 0

Correct Answer: A Vote an answer

Question 2

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) B. DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++
D NewGrad DS Likeds(Student) Inz C. DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++
D NewGrad DS Likeds(Student)
D Inz(Student) D. DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++
D NewGrad DS Likeds(Student)
D Inz(*Likeds)

Discussion 0

Correct Answer: D Vote an answer

Question 3

Given the following File Specification: FFilename++IPEASFRlen+LKlen+AIDevice+.Keywords+++++++++++++++++++++++ facctgrpt o e printer Which of the following keywords should be added to the File Specification to enable the programmer to obtain the current page number?

A. PAGNBR B. PRTCTL C. CURPAG D. INFDS

Discussion 0

Correct Answer: D Vote an answer

Question 4

If the record format of the file MyFile changes, which of the following programs will display the message "There is a problem with MyFile" as opposed to the program failing with the run time message "Error message CPF4131 appeared during OPEN for file MYFILE"?

A. FMyFile IF E Disk InfSR(MyFileError)
F UsrOpn
/Free
Open MyFile;
Read MyFile;
Return;
BegSR MyFileError;
Dsply 'There is a problem with MyFile';
Return;
EndSr; B. FMyFile IF E Disk InfSR(MyFileError)
/Free
Read MyFile;
Return;
BegSR MyFileError;
Dsply 'There is a problem with MyFile';
Return;
EndSr; C. FMyFile IF E Disk InfSR(MyFileError)
/Free
Read(E) MyFile;
If %error;
ExSR MyFileError;
EndIf;
Return; D. FMyFile IF E Disk InfSR(MyFileError)
/Free
Monitor;
Read MyFile;
On-Error *File;
ExSR MyFileError;
EndMon;
Return;
BegSR MyFileError;
Dsply 'There is a problem with MyFile';
Return;
EndSr;

Discussion 0

Correct Answer: A Vote an answer

Question 5

Which of the following SQL statements, when used by itself in an RPG program, can take the place of a File Specification, a key and a CHAIN?

A. FETCH B. SELECT INTO C. PREPARE STATEMENT D. DECLARE CURSOR

Discussion 0

Correct Answer: B Vote an answer

Question 6

Given the following code sample:
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++ D
StudentDS E DS Extname(Students)
Which of the following keywords should be added to the D-spec to initialize subfields to the
defaults specified in the DDS?

A. inz(*File) B. inz(*Extdft) C. inz(*ExtDDS) D. inz(*Flddft)

Discussion 0

Correct Answer: B Vote an answer

Question 7

Given the following code sample:
d NotLate PR ExtPgm('LARRY')
d RqDta 32767a
d RqLen 10i 0
d RqTyp 10i 0
Which of the following is the correct code to call the program Larry?

A. callNotLate(RequestData : RequestLength : RequestType); B. callb NotLate(RequestData : RequestLength : RequestType); C. C CALL 'NOTLATE' C PARM RequestData C PARM RequestLength C PARM RequestType D. callp NotLate(RequestData : RequestLength : RequestType);

Discussion 0

Correct Answer: D Vote an answer