Interview Questions Answers in RPG400

vaibhav gupta

{ City } hyderabad
< Country > india
* Profession *
User No # 19453

Total Questions Posted # 0
Total Answers Posted # 2

Total Answers Posted for My Questions # 0
Total Views for My Questions # 0

Users Marked my Answers as Correct # 28
Users Marked my Answers as Wrong # 1

Questions / { vaibhav gupta }

Questions Answers Category Views Company eMail

Answers / { vaibhav gupta }

Question { 6450 }

Hi friends,
Can you give the solution for the below mention simple
code.and explain.what is output

D CHR1 S 4A INZ('PEN')
D CHR2 S 10A INZ('MYGET')
D CHR3 S 8A INZ('GOOD')
D CHR4 S 22A INZ
C MOVEL CHR1 CHR4
C MOVE CHR2 CHR4
C EVAL CHR4=CHR3
C MOVE CHR1 CHR4

Answer

C MOVEL CHR1 CHR4
CHR4='PEN '
C MOVE CHR2 CHR4
CHR4='PEN MYGET '
C EVAL CHR4=CHR3
CHR4='GOOD '
C MOVE CHR1 CHR4
CHR4='GOOD PEN '

Is This Answer Correct ?

13 Yes

0 No

Question { 12778 }

i)What is the command to lock a file in a program
ii)2. Can you get a level check error in a CL program

Answer

For 2) If a file is declared in Cl pgm we can get a level
check error in the CL pgm.

Is This Answer Correct ?

15 Yes

1 No