本文来自（http://refer.it-manual.com/cobol.html）

　COBOL関数（JIS-COBOL規格標準）の一覧表を掲載しています。 COBOL関数一覧表は、各項目での並べ替えが可能です。 一般的なCOBOL関数（FUNCTION　関数名(引数)という書式）を掲載しています。

　使用例の引数「WK-VALUE」は単独値、「WK-TABLE」は値リストを意味します。
引数が値リストの場合は、「SUM(1 2 3 4 5 6)」の様に、値を半角スペースで区切って指定することも可能です。
使用例は便宜上1行で記載していますが、実際のソースコードには、対応する領域に記載する必要があります。

関数 戻り値 使用例 備考
LENGTH(引数) データ項目の大きさ COMPUTE WK-AFTER = FUNCTION LENGTH(WK-VALUE). 戻り値は整数
データ型により結果が異なる
MAX(引数) 値リストの最大値 COMPUTE WK-AFTER = FUNCTION MAX(WK-TABLE(ALL)). 戻り値の型は、引数により決定
MIN(引数) 値リストの最小値 COMPUTE WK-AFTER = FUNCTION MIN(WK-TABLE(ALL)). 戻り値の型は、引数により決定
ORD-MAX(引数) 値リストの最大値の要素番号（整数） COMPUTE WK-AFTER = FUNCTION ORD-MAX(WK-TABLE(ALL)). 対象が複数の場合は、最初の要素番号を返す
ORD-MIN(引数) 値リストの最小値の要素番号（整数） COMPUTE WK-AFTER = FUNCTION ORD-MIN(WK-TABLE(ALL)). 対象が複数の場合は、最初の要素番号を返す
SUM(引数) 値リストの合計値 COMPUTE WK-AFTER = FUNCTION SUM(WK-TABLE(ALL)). 引数は数値型
MEAN(引数) 値リストの平均値 COMPUTE WK-AFTER = FUNCTION MEAN(WK-TABLE(ALL)). 戻り値は小数を含む数値型
MEDIAN(引数) 値リストの中間値 COMPUTE WK-AFTER = FUNCTION MEDIAN(WK-TABLE(ALL)). 戻り値は小数を含む数値型
MIDRANGE（引数） 値リストの最大・最小の平均値 COMPUTE WK-AFTER = FUNCTION MIDRANGE(WK-TABLE(ALL)). 戻り値は小数を含む数値型
RANGE(引数) 値リストの最大から最小を減算した値 COMPUTE WK-AFTER = FUNCTION RANGE(WK-TABLE(ALL)). 戻り値は小数を含む数値型
SQRT(引数) 値の平方根 COMPUTE WK-AFTER = FUNCTION SQRT(WK-VALUE). 引数は0以上の数値
FACTORIAL(引数) 値の階乗（整数） COMPUTE WK-AFTER = FUNCTION FACTORIAL(WK-VALUE). 引数は0以上の整数
LOG(引数) 値の対数 COMPUTE WK-AFTER = FUNCTION LOG(WK-VALUE). 底をeとした場合の対数
LOG10(引数) 値の対数 COMPUTE WK-AFTER = FUNCTION LOG10(WK-VALUE). 底を10とした場合の対数
COS(引数) 値の余弦 COMPUTE WK-AFTER = FUNCTION COS(WK-VALUE). 引数の単位はラジアン
ACOS(引数) 値の逆余弦 COMPUTE WK-AFTER = FUNCTION ACOS(WK-VALUE). 戻り値の単位はラジアン
SIN(引数) 値の正弦 COMPUTE WK-AFTER = FUNCTION SIN(WK-VALUE). 引数の単位はラジアン
ASIN(引数) 値の逆正弦 COMPUTE WK-AFTER = FUNCTION ASIN(WK-VALUE). 戻り値の単位はラジアン
TAN(引数) 値の正接 COMPUTE WK-AFTER = FUNCTION TAN(WK-VALUE). 引数の単位はラジアン
ATAN(引数) 値の逆正接 COMPUTE WK-AFTER = FUNCTION ATAN(WK-VALUE). 戻り値の単位はラジアン
MOD(引数1 引数2) 値のモジュロー COMPUTE WK-AFTER = FUNCTION MOD(WK-VALUE-1 WK-VALUE-2). 引数1は被除数、引数2は除数
モジュローとは、被除数と除数で割り切れる被除数に最も近い値の差
REM(引数1 引数2) 値の除算の余り COMPUTE WK-AFTER = FUNCTION REM(WK-VALUE-1 WK-VALUE-2). 引数1は被除数、引数2は除数
戻り値は小数を含む数値型
VARIANCE(引数) 値リスト分散の近似値 COMPUTE WK-AFTER = FUNCTION VARIANCE(WK-TABLE(ALL)). 戻り値は小数を含む数値型
STANDARD-DEVIATION(引数) 値リスト標準偏差の近似値 COMPUTE WK-AFTER = FUNCTION STANDARD-DEVIATION(WK-TABLE(ALL)). 戻り値は小数を含む数値型
INTEGER(引数) 値を超えない整数 COMPUTE WK-AFTER = FUNCTION INTEGER(WK-VALUE). 戻り値は整数
INTEGER-PART(引数) 値の整数部 COMPUTE WK-AFTER = FUNCTION INTEGER-PART(WK-VALUE). 戻り値は整数
RANDOM（引数） 乱数 COMPUTE WK-AFTER = FUNCTION RANDOM(WK-VALUE). 戻り値は小数を含む数値型
引数は省略可
ANNUITY(引数1 引数2) 均等払い額 COMPUTE WK-AFTER = FUNCTION ANNUITY(WK-VALUE-1 WK-VALUE-2). 引数1は利率、引数2は支払回数
戻り値は小数を含む数値型
NUMVAL(引数) 変換された数値型 COMPUTE WK-AFTER = FUNCTION NUMVAL(WK-VALUE). 戻り値は小数を含む数値型
引数は英数字型の数値データを文字定数や英数字型でセット
NUMVAL-C(引数) 変換された数値型 COMPUTE WK-AFTER = FUNCTION NUMVAL-C(WK-VALUE). 戻り値は小数を含む数値型
引数は数値編集形式の数値データを文字定数や英数字型でセット
REVERSE（引数） 反転した文字列 MOVE FUNCTION REVERSE(WK-VALUE) TO WK-AFTER. 引数、戻り値は英数字型
CHAR(引数) 文字コードに対応する文字 MOVE FUNCTION CHAR(WK-VALUE) TO WK-AFTER. 引数に指定する文字コードは実際のコード+1を指定
ORD（引数） 文字の文字コード SUBSTRACT 1 FROM FUNCTION ORD(WK-VALUE) GIVING WK-AFTER. 戻り値の文字コードは実際のコード-1を返す
NATIONAL(引数) 変換された全角文字 MOVE FUNCTION NATIONAL(WK-VALUE) TO WK-AFTER. 引数は半角数値型、半角英数字型
CAST-ALPHANUMERIC(引数) 変換された英数字型データ項目 MOVE FUNCTION CAST-ALPHANUMERIC(WK-VALUE) TO WK-AFTER. 戻り値を受け取るデータ項目の長さは、引数に指定した文字列の2倍
UPPER-CASE(引数) 大文字に変換された文字列 MOVE FUNCTION UPPER-CASE(WK-VALUE) TO WK-AFTER. 戻り値は英数字型
LOWER-CASE(引数) 小文字に変換された文字列 MOVE FUNCTION LOWER-CASE(WK-VALUE) TO WK-AFTER. 戻り値は英数字型
CURRENT-DATE 現在日時 MOVE FUNCTION CURRENT-DATE TO WK-AFTER. 日時を21桁の情報として返す
DATE-OF-INTEGER(引数) 通日をYYYYMMDD形式に変換した値 COMPUTE WK-AFTER = FUNCTION DATE-OF-INTEGER(WK-VALUE). 戻り値は整数
基準日は1601/01/01
INTEGER-OF-DATE(引数) YYYYMMDD形式を通日に変換した値 COMPUTE WK-AFTER = FUNCTION INTEGER-OF-DATE(WK-VALUE). 戻り値は整数
基準日は1601/01/01
DAY-OF-INTEGER(引数) 通日を年日形式に変換した値 COMPUTE WK-AFTER = FUNCTION DAY-OF-INTEGER(WK-VALUE). 戻り値は整数
基準日は1601/01/01
INTEGER-OF-DAY(引数) 年日形式を通日に変換した値 COMPUTE WK-AFTER = FUNCTION INTEGER-OF-DAY(WK-VALUE). 戻り値は整数
基準日は1601/01/01
WHEN-COMPILED コンパイルされた日 MOVE FUNCTION WHEN-COMPILED TO WK-AFTER. 日時を21桁の情報として返す

常用COBOL函数的更多相关文章

  1. oracle（sql）基础篇系列（一）——基础select语句、常用sql函数、组函数、分组函数

        花点时间整理下sql基础,温故而知新.文章的demo来自oracle自带的dept,emp,salgrade三张表.解锁scott用户,使用scott用户登录就可以看到自带的表. #使用ora ...

  2. php常用字符串函数小结

    php内置了98个字符串函数(除了基于正则表达式的函数,正则表达式在此不在讨论范围),能够处理字符串中能遇到的每一个方面内容,本文对常用字符串函数进行简单的小结,主要包含以下8部分:1.确定字符串长度 ...

  3. php常用数组函数回顾一

    数组对于程序开发来说是一个必不可少的工具,我根据网上的常用数组函数,结合个人的使用情况,进行数组系列的总结复习.里面当然不只是数组的基本用法,还有相似函数的不同用法的简单实例,力求用最简单的实例,记住 ...

  4. byte数据的常用操作函数[转发]

    /// <summary> /// 本类提供了对byte数据的常用操作函数 /// </summary> public class ByteUtil { ','A','B',' ...

  5. WordPress主题模板层次和常用模板函数

    首页: home.php index.php 文章页: single-{post_type}.php – 如果文章类型是videos(即视频),WordPress就会去查找single-videos. ...

  6. Python 常用string函数

    Python 常用string函数 字符串中字符大小写的变换 1. str.lower()   //小写>>> 'SkatE'.lower()'skate' 2. str.upper ...

  7. MySQL之MySQL常用的函数方法

    MySQL常用函数 本篇主要总结了一些在使用MySQL数据库中常用的函数,本篇大部分都是以实例作为讲解,如果有什么建议或者意见欢迎前来打扰. limit Select * from table ord ...

  8. Delphi常用系统函数总结

    Delphi常用系统函数总结 字符串处理函数 Unit System 函数原型 function Concat(s1 [, s2,..., sn]: string): string; 说明 与 S : ...

  9. iOS开发数据库篇—SQLite常用的函数

    iOS开发数据库篇—SQLite常用的函数 一.简单说明 1.打开数据库 int sqlite3_open( const char *filename,   // 数据库的文件路径 sqlite3 * ...

随机推荐

  1. Visual Studio+TFS--强大的项目管理工具

    一.前言 微软的Visual Studio非常强大,可以无缝结合Git或自家的TFS(Team Foundation Server),进行项目管理非常方便,从需求分析.开发.测试.维护,几乎可以贯穿软 ...

  2. 分析案例：界面提示“基础链接已经关闭：接收时发生错误”----本质为StackOverflow

    问题描述: 一个业务复杂.执行时间很长的功能,经常报出“基础链接已经关闭:接收时发生错误”,很是蹊跷... 问题分析: 首先,查阅应用服务器的系统日志,发现问题发生时总是会伴随着w3wp进程崩溃的错误 ...

  3. [PHP] - Laravel 5 的 Hello Wold

    吐槽一段 整了半天,Laravel下载麻烦得可以去死.先要安装composer,而composer又被共墙了,之后又要安装git,安装完git还要注册git,等等.... 最终放弃这种玩法,太恶心了. ...

  4. NET中的Memcached.ClientLibrary使用详解

    memcached在windows下的下载与安装 下载地址:http://pan.baidu.com/s/1yVILw       提取密码:5gx9 官方网站:http://memcached.or ...

  5. maven 项目无法发布，无法编译的解决办法

    1 Web Deployment Assembly信息都合理2 重新clear项目,让JAVA代码重新生成.class文件在target目录中

  6. vc++>>Connection using old (pre-4.1.1) authentication protocol refused (client option 'secure_auth' enable

    用VC来连接远程MYSQL时,出现如标题一样的错误,网上搜索了此错误产生的原因,最后自己找到了解决办法. 此错误产生的原因: 异常原因在于服务器端的密码管理协议陈旧,使用的是旧有的用户密码格式存储:但 ...

  7. 最小安装模式下Centos7.*网卡启动配置

    最小安装模式下的Centos7.*系统默认情况下,网卡是不启动的.为了解决联网问题,自己搜集了点资料,成功连接了网络.并梳理了下处理过程. 1.首先运行ip addr命令,查看配置文件的名称.有的文章 ...

  8. Flask 的 Context 机制

    转自https://blog.tonyseek.com/post/the-context-mechanism-of-flask/ Flask 的 Context 机制 2014 年 07 月 21 日 ...

  9. X-Cart 学习笔记（二）X-Cart框架1

    目录 X-Cart 学习笔记(一)了解和安装X-Cart X-Cart 学习笔记(二)X-Cart框架1 X-Cart 学习笔记(三)X-Cart框架2 X-Cart 学习笔记(四)常见操作 四.X- ...

  10. ADVDAV驱动

    // ADV7179 register configuration array for PAL mode ADI_DEV_ACCESS_REGISTER ADV7179_Cfg[]={ {ADV717 ...