This task is about arrays.

For hashes or associative arrays, please see Creating an Associative Array.

For a definition and in-depth discussion of what an array is, see Array.



Task

Show basic array syntax in your language.

Basically, create an array, assign a value to it, and retrieve an element   (if available, show both fixed-length arrays and
dynamic arrays, pushing a value into it).

Please discuss at Village Pump:   Arrays.

Please merge code in from these obsolete tasks:

   Creating an Array
   Assigning Values to an Array
   Retrieving an Element of an Array


Related tasks

   Collections
   Creating an Associative Array
   Two-dimensional array (runtime)


 
      //-Static array
      //--def of 10 el array of integers, initialised to zeros
     D array... 
     D                 s             10i 0 dim(10)
     D                                     inz
      //--def an el
     D el_1... 
     D                 s             10i 0 inz
 
      /free
 
       //-assign first el
       //--first element of RPG array is indexed with 1
       array(1) = 111;
 
       //-get first el of array
       el_1 = array(1);
 
       //--display it
       dsply ('First el of array='+%char(el_1));
       //--displays: First el of array=111
 
       //---or shorter, without "el_1"
       dsply ('First el of array='+%char(array(1)));
       //--displays: First el of array=111
 
      /end-free
 