class MONEY_FMT < $BINARY


Flattened version is here

Ancestors
$BINARY



Public


Readable Attributes
attr currency_symbol : CODE_STR ;
attr negative_sign : CHAR_CODE ;
attr num_fmt : NUMBER_FMT ;
attr positive_sign : CHAR_CODE ;

Features
create(


Private

const Carry : CARD := 1 ;
**** used when rounding!
const Money_Base : CARD := 10 ;
****
attr currency_symbol : CODE_STR ;
attr negative_sign : CHAR_CODE ;
attr negative_sign_position : SIGN_POSITIONS ;
attr negative_sign_position : SIGN_POSITIONS ;
attr negative_sign_separation : MON_SPACING ;
attr negative_sign_separation : MON_SPACING ;
attr negative_symbol_precedes : TRI_STATE ;
attr negative_symbol_precedes : TRI_STATE ;
attr num_fmt : NUMBER_FMT ;
attr places : CARD ;
**** a small number
attr places : CARD ;
**** a small number
attr positive_sign : CHAR_CODE ;
attr positive_sign_position : SIGN_POSITIONS ;
attr positive_sign_position : SIGN_POSITIONS ;
attr positive_sign_separation : MON_SPACING ;
attr positive_sign_separation : MON_SPACING ;
attr positive_symbol_precedes : TRI_STATE ;
attr positive_symbol_precedes : TRI_STATE ;
attr sections : ARRAY{CARD} ;
**** all small numbers
attr sections : ARRAY{CARD} ;
**** all small numbers

The Sather Home Page