1.Are there any errors in the following statement?If so
then list them.DTAARA is a data area having a field EMP #
and EMPNO is a
field in the file EMPPF.Which has one record.
READ EMPPF
IF %FOUND(EMPPF)
IN DTAARA
EVAL EMP#=EMPNO
OUT DTAARA
ENDIF
Answer Posted / abhishek
I think before updating data area it should be Locked too
to make sure no other program is trying to update same data
area.
READ EMPPF
IF %FOUND(EMPPF)
*LOCK IN DTAARA
EVAL EMP#=EMPNO
OUT DTAARA
ENDIF
Is This Answer Correct ? | 3 Yes | 0 No |
Post New Answer View All Answers
what is an online rpg?
Interviewer asked me write down DDS for load all subfile .can anybody write dds
give an eg of ACQ-(ACQUIRE),BIT OFF,BIT ON,DEALLOC,DUMP,FEOD,FORCE,MHHZO,MHLZO,MHLLZO,MLHZO,REL,RESET,TESTZ,TESTB,TESTN----GIVE SMALL EXAMPLE TO THE OPCODES...TO UNDERSTAND FUNCTIONING...........
what is kids-rpg?
can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id :gvsp.as4@gmail.com
How many program bind in one module....
if there is a module object , how to find the program object for this module object.Assume the module object name and program object name is not same.
what is the procedure and explain about real time scenario.
How to write record if no field or the field are different in physical file in rpgle ?
Program to read marks of 10 students for 4 subjects and compute and display total marks and status of each student in rpg
Set on command is used for closed all opened files , initialize var and release resource , return cmd is used for return to calling program but my req. Is dnt close opened files and resource must released while doing transactions , how can i do this...?
what is data area and how it is used in rpg program ?
how do I play {insert rpg system here}?
How to handle duplicate error handling in RPG?
How to declare the pull button in AS/400..