1,076
社区成员
发帖
与我相关
我的任务
分享
//====================================================================
// 函数: f_exp_ret
//--------------------------------------------------------------------
// 描述: 返回计算表达式的值
//--------------------------------------------------------------------
// 参数:
// value string as_str 计算表达式,如 2 * (3+5) + 2^3
//--------------------------------------------------------------------
// 返回值: string 计算表达式的结果值,如果表达式不正确,返回'FALSE'
//====================================================================
String ls_Ret
DataStore lds_Evaluate
lds_Evaluate = CREATE DataStore
lds_Evaluate.Create('release 8;~r~ntable()')
ls_Ret = lds_Evaluate.Describe("Evaluate('" + as_str + "', 1)")
DESTROY lds_Evaluate
IF ls_Ret = '' OR ls_Ret = '!' THEN ls_Ret = 'FALSE'
RETURN ls_Ret