project BLF > class Business Component > method DisplayDecimal

function returns character

Description

Converts a decimal into a displayable value
(taking into consideration the clients decimal point setting)


Parameters


idDecimalinputdecimalvalue to display
icFormatinputcharacterDisplay format (optional)


Internal usage


BLF
method database.GetXmlRepresentationDataset
method database.ReadTable
method database.ValidateCustomFields
method BReportRequest.DataLoadByInput
method breport.GetReportLabels


program code (program1/business.p)

if idDecimal = ?
then return vcFcNumericFormat.

if vcFcNumericFormat = ",":U
or vcFcNumericFormat = "european":U
then assign session:numeric-format = "EUROPEAN":U.
if icFormat = ""
then assign vcDisplay = string(idDecimal).
else assign vcDisplay = string(idDecimal,icFormat) no-error.
assign session:numeric-format = "American":U.

return vcDisplay.