0001.00 Fbsamplepf o a e disk
0002.00 Dcusdata ds qualified
0003.00 Din likerec(rcdfmt:*input)
0004.00 Dout likerec(rcdfmt:*output) 0005.00 D overlay(in)
0007.00 read rcdfmt cusdata.in;
0008.00 dow not%eof;
0009.00 dsply cusdata.in.sno;
0010.00 dsply cusdata.in.sname;
0011.00 read rcdfmt cusdata.in;
0013.00 cusdata.in.sno = 30;
0014.00 cusdata.in.sname = 'sud';
0015.00 write rcdfmt cusdata.out;
0016.00 *inlr = *on;
The error I am getting for the above code is:
*RNF5276 30 2 The specified Factor 2 entry is not allowed for READ operation; specification is ignored.
For the same code when I commented the lines of dow loop and allowed the program to write the two field values it worked perfectly. I understood that the problem is with the read opcode. What is the solution for this error?
Free Guide: Managing storage for virtual environments
Complete a brief survey to get a complimentary 70-page whitepaper featuring the best methods and solutions for your virtual environment, as well as hypervisor-specific management advice from TechTarget experts. Don’t miss out on this exclusive content!