- indexing
- copyright: "Object Tools, 1996-2001"
- version: "1.2"
- cluster: formats
class G_REAL_COMMERCIAL_FORMATTER
- inherit
-
G_ABSTRACT_COMMERCIAL_FORMATTER
-
- redefine
- set_currency,
- set_delimiters,
- set_point
- end
-
G_EXTENDED_MATH
- end
-
G_STRING_TOOLS
- end
- creation
- make
- feature
-
make (r: DOUBLE_REF)
-
set_point (c: CHARACTER)
-
- require
-
point_not_null:
c /= '%U'
-
set_delimiters (s: STRING)
-
set_currency (s: STRING)
-
- require
-
string_not_void:
s /= void
-
output: STRING
-
- require
-
non_void_picture:
picture /= void
end -- class G_REAL_COMMERCIAL_FORMATTER