WRITE DATA TO DATAARA

0001.00  #include                                                 
0002.00  #include                                                
0003.00  #include                                                
0004.00                                                                    
0005.00  #define STAR 1                                                    
0006.00  #define LENGTH 50                                                 
0007.00                                                                    
0008.00  void main()                                                       
0009.00   {                                                                
0010.00      char nd??(LENGTH??)="new datallllllllllllllllllllllllllllllll";
0011.00      _DTAA_NAME_T datnm ={"MYYDATA   ","MYYLIB    "};              
0012.00      QXXCHGDA(datnm,STAR,LENGTH,nd);                               
0013.00    }