Editing ADABAS (section)

===Language features===

Natural works not only with Adabas files, but also supports [[Oracle Corporation|Oracle]],
[[IBM Db2|DB2]], and others.
<!-- Db2 Discombobulated by 2manyCooks -->

Sample code:
<syntaxhighlight lang="cobolfree">
DEFINE DATA LOCAL                                     
01 EMPLOYEES VIEW OF EMPLOYEES                        
  02 SALARY (1)                                       
END-DEFINE                                            
READ EMPLOYEES BY NAME                                
  AT END OF DATA                                      
    DISPLAY                                           
      MIN (EMPLOYEES.SALARY(1)) (EM=ZZZ,ZZZ,ZZ9)        
      AVER(EMPLOYEES.SALARY(1)) (EM=ZZZ,ZZZ,ZZ9)        
      MAX (EMPLOYEES.SALARY(1)) (EM=ZZZ,ZZZ,ZZ9)        
  END-ENDDATA                                         
END-READ                                              
END                                                   
</syntaxhighlight>
Output:
<pre>
Page      1                                                  18-08-22  16:42:22
                                                                               
  ANNUAL      ANNUAL      ANNUAL                                               
  SALARY      SALARY      SALARY                                               
----------- ----------- -----------                                            
                                                                               
          0     240,976   6,380,000                                            
</pre>
The language is [[Strong and weak typing|strongly-typed]], using explicit typing of variables, which may be one of:
* Alphanumeric 
* Numeric [[Zoned decimal]] up to 27 total digits, of which a total of 7 may be to the right of decimal point
* Packed Decimal,<ref>{{cite web|url=https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_73/rzasd/padecfo.htm|title = Packed-Decimal Format|website = [[IBM]]|date = June 2012}}</ref> same limits as "Numeric")
* Integer (1, 2 or 4 bytes, ranging from -128 to 127 / -32,768 to 32,767 and -2,147,483,648 to 2,147,483,647)
* Date
* Time (which includes the date)
* Logical (True or False)
* Binary
* Control variable paralleling CICS map attribute
* Floating Point (4 or 8 bytes)