The following example is part of the change script for the save button in a window used to define currency formats. It uses this function to define the position of a leading negative symbol for the multiformat value 3000, based upon whether a user checked the neg_first check box. The result of this function is set to the lead_neg_position field, which is saved in the currency_format table.
lead_neg_position of table currency_format = Currency_SetNegativeBeforeSymbol(3000, neg_first); save table currency_format;