随笔分类 - MVS

cobol数组操作
摘要:下面是数组的例子: 01 RECORD-X. 03 MONTH OCCURS 12 TIMES. 05 NAME PIC X(12). 05 DAYS OCCURS 31 TIEMS. 07 COMMENT PIC X(20). 07 TEMP-HI PIC S999. 07 TEMP-LO PIC S999. 77 CURRENT-DAY PIC 99. 调用表示如下: MONTH(5) : 包... 阅读全文
posted @ 2006-03-29 17:11 秒针 阅读(1371) 评论(0) 推荐(0) 编辑
COBOL程序格式
摘要:cobol源程序的格式如下:每行开头有6个字符的序号区。可以输入000010,000020等表示行,也可以不输。序号区后面是一个字符(第7位)的指示符区,如第一行所示。可以用*和/表示注释,_表示续行,D表示调试。 指示符区后面是4个字符(8~11位)的A区。可以放入部,节,段标题,段名,层指示符和层号01与77, 关键字DECLARATIVES和END DECLARATIVES,程序结束标题。A... 阅读全文
posted @ 2006-03-29 15:06 秒针 阅读(721) 评论(0) 推荐(0) 编辑
COBOL语言数据类型转换方法
摘要:计息是银行的一项重要业务,包括日常代理客户收、付计算客户利息和年度计息等。目前,这些工作大多数是在IBM ES9000主机的SAFE应用系统平台上进行,该系统联机程序和联机计息程序是用IBM 370汇编语言实现的。为方便汇编语言读写,在VSAM文件存储的数据中,数据存放格式进行了特殊的定义。如日期存放采用X(3)型,01年03月15日,存入EBCD码为X‘010315’。在进行年度计息时,为了实现... 阅读全文
posted @ 2006-03-29 14:29 秒针 阅读(2517) 评论(1) 推荐(0) 编辑
cobol语法
摘要:REDEFINES 可以用不同的变量描述同一内存。 01 PART_RECODE USAGE DISPLAY 03 PART-TYPE PICTURE... 03 PART_TYPE_A. 05 PART_NUMBER PICTURE... 05 PART_COST PICTURE... 03 PART_TYPE_... 阅读全文
posted @ 2006-03-29 11:26 秒针 阅读(2177) 评论(0) 推荐(0) 编辑