cobol - 字符串操作

STRING

用来分割字符串

UNSTRING

拆分字符串，和STRING相反。

DATA DIVISION.
WORKING-STORAGE SECTION.
01 FIRST-NAME PIC X(10).
01 LAST-NAME PIC X(10).
01 FULL-NAME PIC X(20)  VALUE 'ADAM SMITH'.
*
PROCEDURE DIVISION,UNSTRING FULL-NAMEDELIMITED BY ' '' ' DELIMITED BY SIZEINTO FIRST-NAME LAST-NAME.DISPLAY 'FIRST NAME:', FIRST-NAME.DISPLAY 'LAST NAME:', LAST-NAME.DISPLAY 'FULL NAME:', FULL-NAME.STOP RUN.

最终输出：

 FIRST NAME:ADAMLAST NAME:SMITHFULL NAME:ADAM SMITH

DELIMITED BY ’ ’ 指定分割的字符

INSPECT

INSPECT语句替换字符串

对全体字符进行替换 ALL

DATA DIVISION.
WORKING-STORAGE SECTION.
01 TEST-STRING PIC X(10).
*
PROCEDURE DIVISION.MOVE 'ADCDAA8B' TO TEST-STRING.DISPLAY 'BEFOER INSPECT:', TEST-STRING.INSPECT SOUTCE-STRINGREPLACING ALL 'A' BY 'B'INSPECT SOUTCE-STRINGREPLACING ALL 0 BY '-'DISPLAY 'AFTER INSPECT:', TEST-STRING.STOP RUN.

输出

BEFOER INSPECT: ADCD0A0A8B
AFTER INSPECT: BCDC-B-BBB

对前缀字符进行替换

添加 LEADING

INSPECT TEST-STRINGREPLACING LEADING '0' BY '*'.

对首字符进行替换

添加FIRST

INSPECT TEST-STRINGREPLACING FRIST '0' BY '*'.

字符串转换

大小写转化 FUNCTION ，在关键字 LOWER-CASE或者UPPER-CASE选项对字符实现转换

MOVE FUNCTION LOWER-CASE(TEST-STR) TO NEW-STR

数值转化字符串

FUNCTION加上NUMVAL和NUMVAL-C

字符切割

DATE (1:4) 截取从第一个字符开始，截取四个字符

截取字符的最大和最小

FUNCTION MAX(STR-1 STR-2)
FUNCTION MIN(STR-1 STR-2)

求取字符的长度

FUNCTION LENGTH(STR-1)

cobol - 字符串操作相关推荐

c语言和c++字符串操作对比
C语言字符串操作 #include <stdio.h> #include <string.h> int main() {//字符数组char str1[20] = " ...
js函数语法：ASCII 码的相互转换，字符串操作，数学计算
ASCII 码的相互转换 for (let i = 'a'.charCodeAt(); i <= 'z'.charCodeAt(); i++) {a.push(String.fromCharCo ...
C#优化字符串操作【月儿原创】
C#优化字符串操作作者:清清月儿主页:http://blog.csdn.net/21aspnet/ 时间:2007.6.17 开发中可以说几乎随时会涉及到字符串处理,本人觉得很 ...
2.2元组介绍+字符串操作
元组可以理解为"一旦创建就不能再修改的列表",所以也叫只读列表语法:names=("A","B","C"," ...
linux shell 字符串操作（长度，查找，替换）详解
引用参考 http://www.cnblogs.com/chengmo/archive/2010/10/02/1841355.html 在做shell批处理程序时候,经常会涉及到字符串相关操作.有 ...
《像计算机科学家一样思考Python（第2版）》——2.6 字符串操作
本节书摘来自异步社区<像计算机科学家一样思考Python(第2版)>一书中的第2章,第2.6节,作者[美] Allen B. Downey,赵普明译,更多章节内容可以访问云栖社区&quo ...
shell之字符串操作
在使用脚本的时候,字符串是我们经常用的对象,还经常会用到查找,替换,删减,比较等等操作.本人稍作整理,希望能对新人有所帮助,本人也是新人,(*^__^*) 嘻嘻-- 1.判断字符串的属性一般用到的也 ...
day2 字符编码、列表、元组、字符串操作、字典
文章目录 1.三元运算与字符串编码转换 2.列表.元组操作 3.字符串操作 4.字典操作 1.三元运算与字符串编码转换三元运算 a,b,c = 1,3,5 d = a if a > b els ...
JavaScript中的字符串操作(转）
http://www.cnblogs.com/xuebin/articles/1296837.html 最近编一个javascript的翻译程序,发现无法正确比较两个字符串的相等,上网查了查,发现这篇 ...