本文来自（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. ArcEngine :The XY domain on the spatial reference is not set or invalid错误

    在创建数据集的时候,提示The XY domain on the spatial reference is not set or invalid错误. 原因:未设置空间参考(ISpatialRefer ...

  2. 学习笔记之vector向量容器

    今天复习到vector向量容器,里面包括vector向量容器的一些优点以及具体的使用方法及代码,分享给大家. Vector向量容器不但能够像数组一样对元素进行随机访问,还可以在尾部插入元素,是一种简单 ...

  3. Play with docker 1.12

    Docker v1.12 brings in its integrated orchestration into docker engine. Starting with Docker 1.12, w ...

  4. Flexigrid从对象中加载数据

    (有问题,在找…………) Flexigrid是用来动态加载数据的一种比较好(老)的Jquery表插件,然后有些时候,我们需要其从本地或者jQuery对象中加载数据,比如有这么个需求,页面显示中有两个表 ...

  5. Ubuntu 16.04中安装Chromium浏览器

    引用:http://www.linuxidc.com/Linux/2016-05/131097.htm 通过ppa,安装最新版本的Chromium浏览器 sudo add-apt-repository ...

  6. Troubleshooting a node by using the netapp SP

    Troubleshooting a node by using the SP When you encounter a problem with a node, you can use the SP ...

  7. Linux Epoll相关知识

    其实在Linux下设计并发网络程序,向来不缺少方法,比如典型的Apache模型(Process Per Connection,简称PPC),TPC(Thread PerConnection)模型,以及 ...

  8. mysql 笔记

    mysql配置主从复制的时候,不能将server-id设置成非数字,这样会导致mysqld启动失败. mysql重启的时候,自动会释放锁(这个锁应该是位于内存的) 执行sql脚本:source /ho ...

  9. dubbo工作原理

    part -- 外挂1.dubbo借助spring的schema启动和初始化 1.1 spring扫描所有jar下META-INF的spring.handlers和spring.schemas. 1. ...

  10. 使用canvas编写环形图.

    原理使用canvas画图: 第一步:画一个大圆 第二部:画一个扇形 第三部:画一个小圆 相互叠加. 最终效果: 现在上代码: (function($){ $.fn.drawPic=function(o ...