RTVDTAARA in as 400

The Retrieve Data Area (RTVDTAARA) command is used in a CL program or REXX procedure to retrieve all or part of a specified data area and copy it into a variable. RTVDTAARA does not retrieve any other attributes of the data area. Existence of the data area is not required at the time the CL program is compiled.
http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=%2Fcl%2Frtvdtaara.htm

example
-----------------------------
 FMT **  ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ..
        *************** Beginning of data *****************************
0001.00 PGM                                                           
0002.00              DCL        VAR(&NAME) TYPE(*CHAR) LEN(30)        
0003.00              RTVDTAARA  DTAARA(DTA002 (50 30)) RTNVAR(&NAME)  
0004.00              SNDUSRMSG &NAME                                  
0005.00 ENDPGM                                                        
        ****************** End of data ********************************
                                                                      

Output
Job 429823/CHVRAMESH/QPADEV001L changed by JOBMANAGER. 
Job 429823/CHVRAMESH/QPADEV001L changed by JOBMANAGER. 
praveen kumar gubbala