Skip to Main Content
Due to the recent acquisition by IBM, the Adabas & Natural Ideas Portal does not contain ideas from products ApplinX and EntireX any longer. Please refer to the IBM Ideas Portal for these products from now on (IBMid required). Existing content will be migrated during the next few weeks.
ADD A NEW IDEA

Programing Syntax (Cross platforms)

Showing 6

Allow spacer element (“1X”) in COMPRESS statement

With a COMPRESS statement the contents of one or more operands (Vari or Const) can be concatenated into a single target field. Beside some other options, two different clauses are available to determine the value separation behavior. (1) With LEAV...
Thomas Frischmann 5 months ago in Natural for z/OS / Natural (NAT) / Programing Syntax (Cross platforms) 0 Planned

Allow for I8 datatype

OpenSystems hardware has it for a long time, z/Series has it for quite a while now, so by now there is no platform NOT natively supporting 64-bit arithmetic. So please introduce an I8 datatype into Natural - on all supported platforms (and NOC as ...
Wolfgang Winter over 3 years ago in Natural for z/OS / Natural (NAT) / Programing Syntax (Cross platforms) 1 Future consideration

Allow wildcard notation “?” inside input edit mask for MOVE EDITED

With the MOVE EDITED statement you can apply an edit mask for Operand1 to output a field of any format (except H/C) into an alpha string (A/U/B) with a specific layout described by the edit mask. The edit mask can be considered as an output edit m...
Thomas Frischmann 6 months ago in Natural for z/OS / Natural (NAT) / Programing Syntax (Cross platforms) 0 Under Review

Allow (CV=) after a literal string

Natural allows the use of dynamic control variables during INPUT and WRITE. BUT: the use of those (CV=<control_variable>) is restricted to a variable, not to a literal text. If you want to have a different visual behavior for a string, you m...
Philippe Van Coppenolle 6 months ago in Natural for z/OS / Programing Syntax (Cross platforms) 0 Future consideration

Function "ODD()"

If you want to know if a number is odd or even, you can do the following now: IF #I <> #I / 2 * 2 THEN ... END-IF This takes however quite a bit of CPU, but it can already by simplified by following declarations: 1 #I (I4)1 REDEFINE #I 2 FIL...
Philippe Van Coppenolle over 1 year ago in Natural for z/OS / Programing Syntax (Cross platforms) 0 Future consideration

AND, OR, XOR for binary fields

It is currently not possible to do any "binary" operation on binary fields, like AND, OR, XOR or NOT. This makes declarations of particular bit-constants quasi useless, e.g. ... 3 #TB_VDT_FLAG (B01) /* various property flags...1 #TB_VDT_FLAG_VALUE...
Philippe Van Coppenolle over 1 year ago in Natural for z/OS / Natural (NAT) / Programing Syntax (Cross platforms) 0 Future consideration