cobol function numval

COBOL中的NUMVAL函数用于将字符串转换为数字。它的语法如下：

NUMVAL (source-string, [commas], [decimal-point])

其中，source-string是要转换的字符串，commas和decimal-point是可选参数，用于指定千位分隔符和小数点符号。如果不指定这些参数，则默认使用系统设置的符号。

例如，以下代码将字符串"123.45"转换为数字，并将其存储在变量num中：

MOVE "123.45" TO source-string
COMPUTE num = NUMVAL(source-string)

注意，如果source-string中包含非数字字符，则NUMVAL函数会返回一个运行时错误。

相关问题

cobol function函数的用法

COBOL中的函数是一种可重复使用的代码块，用于执行特定任务并返回一个值。COBOL提供了许多内置函数，包括字符串操作、数学运算、日期和时间操作等等。以下是COBOL函数的一般用法：

1. 函数名称必须以关键字`FUNCTION`开始。

2. 函数可以有一个或多个参数，这些参数必须由逗号分隔，并放在括号中。

3. 函数可以返回一个值，该值由函数名定义的数据类型指定。

4. 函数必须以`END FUNCTION`结束。

例如，以下是一个将两个数字相加的函数：

FUNCTION ADD-TWO-NUMBERS
   USING NUM1, NUM2
   COMPUTE RESULT = NUM1 + NUM2
   RETURN RESULT
END FUNCTION

在上面的示例中，`ADD-TWO-NUMBERS`是函数的名称，`NUM1`和`NUM2`是函数的参数，`RESULT`是函数返回的结果。该函数将两个数字相加，并将结果存储在`RESULT`变量中，然后将该结果返回。

在COBOL程序中，可以通过以下语句调用该函数：

MOVE 10 TO NUM1
MOVE 20 TO NUM2
COMPUTE TOTAL = ADD-TWO-NUMBERS(NUM1, NUM2)

在上面的示例中，`ADD-TWO-NUMBERS`函数使用`NUM1`和`NUM2`作为参数进行调用，并将结果存储在`TOTAL`变量中。