class MONEY_FMT < $BINARY
****

________This_class_implements_the_specialised_money_value_format_description
___for_use_when_preparing_textual_representations_of_a_money_value_as_well_as
___when_obtaining_a_monetary_value_from_a_string.


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
binstr : BINSTR
build(index : BIN_CURSOR) : SAME
build(index : BIN_CURSOR,lib : LIBCHARS) : SAME
create(str : BINSTR) : SAME .. Included as create
create(dec,sep,plus_mark,minus_mark,symbol : CODE_STR,sects : FLIST{CARD},precision : CARD,plus_before : TRI_STATE,plus_sep : MON_SPACING,plus_posn : SIGN_POSITIONS,neg_before : TRI_STATE,neg_sep : MON_SPACING,neg_pos : SIGN_POSITIONS) : SAME
fmt(cash : MONEY,lib : LIBCHARS) : STR
inspect
read(index : BIN_CURSOR) : SAME .. Included as read
write(fyle : BIN_FILE) .. Included as write


Private

const Carry : CARD := 1 ;
**** used when rounding!
const Money_Base : CARD := 10 ;
****
attr currency_symbol : CODE_STR ;
do_layout(num : CODE_STR,symbol_precedes : TRI_STATE,sign : CODE_STR,position : SIGN_POSITIONS,separation : MON_SPACING,lib : LIBCHARS) : 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