STRING DELIMITED BY SIZE

最新推荐文章于 2024-07-19 15:34:31 发布
转载 最新推荐文章于 2024-07-19 15:34:31 发布 · 1k 阅读 · 0 ·
CC 4.0 BY-SA版权
原文链接：http://www.cnblogs.com/kakaisgood/p/10523389.html

本文介绍了一个使用COBOL编程语言进行字符串连接的示例。通过使用DELIMITED BY SIZE子句，该程序将多个字符串字段组合成一个完整的字符串。示例展示了如何将标题、名字和姓氏字段拼接成一个全名字段。

摘要生成于 C知道 ，由 DeepSeek-R1 满血版支持， 前往体验 >

The following COBOL program depicts the use of 
STRING DELIMITED BY SIZE     
 
 
       IDENTIFICATION DIVISION.
       PROGRAM-ID. PGM040.
       AUTHOR. MAINFRAMEWIZARD.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 WS-TITLE      PIC X(3)  VALUE SPACES.
       01 WS-FIRST-NAME PIC X(20) VALUE SPACES.
       01 WS-LAST-NAME  PIC X(20) VALUE SPACES.
       01 WS-FULL-NAME  PIC X(43) VALUE SPACES.
       PROCEDURE DIVISION.
       10000-MAIN-PARA.
             MOVE 'MR#'               TO WS-TITLE
             MOVE 'MAINFRAME#WIZARD#' TO WS-FIRST-NAME
             MOVE 'COM#'              TO WS-LAST-NAME
             STRING WS-TITLE      DELIMITED BY SIZE
                    WS-FIRST-NAME DELIMITED BY SIZE
                    WS-LAST-NAME  DELIMITED BY SIZE
                    INTO WS-FULL-NAME
             DISPLAY 'RESULTANT STRING IS  = '
               WS-FULL-NAME
             STOP RUN.
 
 
 
The output of the program is 
 
RESULTANT STRING IS  = MR#MAINFRAME#WIZARD#   COM#                                                                       

转载于:https://www.cnblogs.com/kakaisgood/p/10523389.html

COBOL字符串拼接
weixin_41849360的博客
04-21 6353
 字符串连接语句（STRING语句） （1）STRING是字符连接语句，可以将多个发送项字符发送到一个接收项中。         STRING A,B,C DELIMITED BY SIZE INTO D. （2）DELIMITED是界定短语，用来控制各个发送项的终止位置。         DELIMITED BY SIZE     表示把每个发送项的内容全部送到接收项；            D...
C# String扩展类 常用方法
毫无遗憾的帅哥
05-30 550
中的扩展方法是一种能够向现有的类添加新方法的机制，而不需要修改原始类的代码。这使得您可以在不更改类定义的情况下，为已有的数据类型添加新功能或行为。避免子类化：有时，为了添加一些额外的功能，您可能会考虑创建一个子类。但是，使用扩展方法可以避免创建子类，从而保持代码的简洁性和可维护性。为现有类型添加新功能：您可以通过扩展方法为标准库或第三方库中的类添加新的方法，以满足特定的需求。提高代码的可读性：通过在相关的上下文中定义扩展方法，可以使代码更具可读性和语义性。
COBOL语言总结(一)
杀神lwz的博客
07-15 2万+
一、COBOL简介 COBOL(Common Business Oriented Language)语言、即公用面向商业语言，是一种面向过程的高级程序设计语言，主要用于数据处理，是目前国际上应用最广泛的一种高级语言。 COBOL作为大型机上最主要的程序设计语言，迄今50多年历史。 大型机也叫主机、大机或MainFrame等，属于一种商用高端服务器。主要由IBM公司生产。 1.COBOL语法格式 COBOL程序的每行代码通常分为80列。有非标准80列的可以超过80列，写多少列都可以。 80列中列与
COBOL语言基础总结
linmeng022的博客
05-21 5473
如果自行车的某个零件坏了，可以在五金商店买到相同规格的零件更换，恢复自行车的功能。程序中没有用到外部文件，文件节是可以省略的，但是工作存储节都是会存在的。作用：程序中涉及到的全部数据(输入，输出，中间)都要在此定义，对它们的属性进行说明。子程序概述：PERFORM语句只能在同一程序中多次调用某一语句序列，如果被调用部分较复杂或需要被其他程序使用时，可以将其编写为单独的一个程序，即子程序，调用子程序的为主程序。至于VSAM文件的创建，复制，删除等操作是通过JCL中的IDCAMS实用程序实现的。
cobol字符串处理
CStringError在路上
11-28 4064
1.字符串的合并 STRING         01  X                       PIC 9(5) VALUE '12345'.         01  Y                       PIC X(5) VALUE 'ABCDE'.         01  Z                       PIC X(10) VALUE SPACE.
String字符串操作之截取
热门推荐
weixin_40617489的博客
05-13 3万+
1、截取字符串substring 1.1、java中截取 public static void main(String[] args) { //uuid获取,import java.util.UUID; String uuid36=UUID.randomUUID().toString(); System.out.println(uuid36);// // 565a58bc-d87a-411d-8a09-e7c3ef28dc4b St
hive 中create table if not exists arr1( name string, scores array<String> ) row format delimited fields terminated by '\t' ; select name,scores[1] from arr2 where size(scores) > 3;
最新发布
08-08
`FIELDS TERMINATED BY`用于列分隔符（如逗号），`COLLECTION ITEMS TERMINATED BY`用于数组内元素分隔符（如竖线`|`）。这确保从文件加载数据时，Hive能正确解析数组列[^1]。 - 数据文件示例：如果数组列存储`[...
create table student (id int , name string , sex string ,age int , deparment string) row format delimited fields terminated by ','; 我创建了student 表create table course (num int,course string) row format delimited fields terminated by ','; 创建了course表create table studentcourse (id int,num int,score int) row format delimited fields terminated by ','; 创建了studentcourse表 我想要查询选修了课程的学生姓名create table id_course as select sc.id id,c.course course from course c join studentcourse sc on c.num=sc.num ; select ic.course, s.name from id_course ic join student s on ic.id=s.id;这个命令有错吗
06-11
) ROW FORMAT DELIMITED FIELDS TERMINATED BY ','; -- 课程表 CREATE TABLE course ( num INT, course STRING ) ROW FORMAT DELIMITED FIELDS TERMINATED BY ','; -- 学生选课表 CREATE TABLE studentcourse ...
Hive的基本用法
Nieson2012的专栏
05-24 1645
一、创建表hive建表的时候默认的分割符是'\001'，若在建表的时候没有指明分隔符，load文件的时候文件的分隔符需要是'\001'；若文件分隔符不是'001'，程序不会报错，但表查询的结果会全部为'null'；1、建表的时候指定分隔符：create table pokes(foo int,bar string) row format delimited fields terminated by...
ETCD DB SIZE不一致问题
喝醉酒的小白
07-19 1226
在 Kubernetes 集群中，etcd 是一个关键的组件，它用于存储集群的所有数据。为了维护 etcd 数据库的性能和健康状态，定期进行数据压缩是一个重要的操作。是一个与 etcd 压缩相关的参数。
cobol 字符串处理
01-17
cobol关于字符串 常见处理 function length max min，inspect，length of
cobol拼接字符串--STRING 语句的基本用法
ANNA
10-17 5257
一、 STRING 语句的基本用法 DATA DIVISION WORKING-STORAGE SECTION. 01 FIRST-NAME PIC X(10). 01 LAST-NAME PIC X(10). 01 FULL-NAME PIC X(20). PROCEDURE DIVISION. MOVE 'ADAM' TO FIRST-NAME....
C9-COBOL 字符串处理
adozoo
09-22 2997
COBOL 字符串处理 COBOL中的字符串处理语句用于对字符串执行多个功能操作。以下是字符串处理语句： Inspect String Unstring Inspect Inspect动词是用来计数或替换字符串中的字符。可以对字母数字，数字或字母值执行字符串操作。inspect操作从左到右执行。用于字符串操作的选项如下： Tallying Tallying选项用于计数字符串的字符。 语法 以下是Tallying选项的语法： INSPECT input-string TAL
COBOL 知识点集锦（下）
cuiyadll的博客
07-14 1006
COBOL 知识点集锦（下） cobol子程序调用 内部子程序 IDENTIFICATION DIVISION. PROGRAM-ID. PROC-A. ENVIRONMENT DIVISION. ... DATA DIVISION. ... PROCEDURE DIVISION. ... IDEN...
一步步Cobol 400上手自学入门教程04 - 过程部
昕友软件博客
08-15 964
  过程部的作用：编写程序要执行的语句，是程序的核心。 结构：   基本语句 INITIALIZE 设置数据项的初始值   ACCEPT 接收从键盘或指定设备上获得输入数据。 例子： 当批处理文件读到调用ACCPT1X, ACCEPT语句将读取数据到TRANS-DATA 读取系统日期 DATE 2 digits for year of century2...
COBOL语法和文法(2)
张铖@南通
12-15 4502
ACCEPT    从键盘或其他输入设备读取数据。    ACCEPT A FROM DEV.    从DEV读取数据到A，也可以省略FROM DEV，表示从键盘读取。    ACCEPT A FROM DATE/DAY/DAY-OF-WEEK/TIME.读取日期，表示为6个字符，如990909（1999年9月9日）。    读取当前日期在年度（前2位）中为第几天（后3位），表示为6个字符，如19
cobol - 字符串操作
大道至简
05-02 2612
STRING 用来分割字符串 UNSTRING
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值