|
|||||
|
|||||
Operations on mixed data types |
You can use any arithmetic or comparison operator on mixed data types (either BCD or floating point with integer).
Mixing data types is possible because the arithmetic and comparison operators are overloaded. This means that the operations are performed on a single data type and all other data types are cast to that type.
To add a BCD to an integer, you must specify a BCD variable.
Example:
; This program adds an integer to a BCD number. import "ombcd.xmd" unprefixed process local integer eggs initial {12} local bcd powdered-eggs initial {33.5} local bcd egg-total set egg-total to eggs + powdered-eggs output "Total egg equivalents: " || "d" % egg-total || "%n"
OmniMark automatically coerces the integer "eggs" to a BCD before adding it to "powdered-eggs".
You can use the following operators only with BCD or floating point numbers:
For operations with BCD numbers, import ombcd into your program using a statement like this:
import "ombcd.xmd" unprefixed
For operations with floating point numbers, import omfloat into your program using a statement like this:
import "omfloat.xmd" unprefixed
You can import both the BCD and floating point modules in the same program. The math operations are "overloaded" so that the right operation is selected for use. Where conflicts could occur, different names have been used in the two modules.
; This program adds mixed data types. import "ombcd.xmd" unprefixed process local integer red-ones initial {0} local integer blue-ones initial {0} local integer total initial {0} local bcd price local bcd tax local bcd total-price local integer foo initial {7} local bcd bar set red-ones to 43 + 967 set blue-ones to 4 + 7 set total to red-ones + blue-ones set price to bcd 29 + bcd 0.99 set tax to bcd 0.076 + bcd 2.873 set total-price to price + tax set bar to bcd foo + 12
There are boundary conditions limiting operations on mixed data types. For example, if you add two integers totalling more than the largest possible integer, and set their result to a BCD in hopes of accommodating the larger total, the operation will fail. The integers get added together as integers first. This operation fails before the total can be cast as a BCD.
Copyright © Stilo International plc, 1988-2010.