随笔分类 - JCL/COBOL/CICS/VSAM
摘要:MOVE截断 X类型是左对齐,9类型是右对齐 不同类型的数据之间进行MOVE的时候,先进行数据类型转换。 例如,MOVE 9(5) TO X(6), 先把9(5)转换成X(5),再赋值给X(6)。 例: 结果:'12345' 01 A pic X(5) VALUE "12345"; 01 B pic
阅读全文
摘要:IS NUMERIC, if has space will false W-CARD-NMB= IS NOT NUMERIC. .W-CARD-NMB=1111111111111.1111 IS NOT NUMERIC. .W-CARD-NMB=111111111111111111 IS NUMER
阅读全文
摘要:概述 dfsort是IBM的产品,syncsort是SYNCSORT公司的产品,但两者相似度极高。基本上会用其中一个就会用另外一个,下文将以sort代表两者。本文介绍sort中数据类型的注意点及一些常用并且十分有用的数据类型。 https://www.ibm.com/support/knowledg
阅读全文
摘要://SORT1 EXEC PGM=SORT //SORTIN DD * 02CAR 2370000000000000 SMPL1 2370000000000000 SMPL2 2370000000000000 SMPL3 9201007160000000 02BIKE 237000000000000
阅读全文
摘要:下面是数组的例子: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 S
阅读全文
摘要:INITIALIZE 变量INITIALIZE语句就是把所有在INITIALIZE后面的变量初始化,COBOL环境通常按照以下规则对各个变量进行初始化
阅读全文
摘要:2010-10-26 22:23 SDLC 1.BRD(business req doc) 2.DS(design script) 3.FN (function note) 4.PS (program script) 5.CODING 6.UTS (U T script) >RND research
阅读全文
摘要:2010-10-31 22:53 作业控制语句:JOB: 指定作业参数EXEC: 指定作业步参数SYSOUT DD: 定义输出信息的顺序数据集SORTIN DD: 定义输入数据集WORTWKdd DD: 定义一系列的排序工作数据集SORTOUT DD: 定义排序完的数据的输出数据集SYSIN DD:
阅读全文
摘要:SORT COPY 2010-10-31 23:02 第一种方式: 006300 //SYSIN DD * 006400 SORT FIELDS=COPY 006500 /* 第二种方式: 006300 //SYSIN DD * 006400 OPTION COPY006500 /*
阅读全文
摘要:COMP-3 再次探讨 2010-10-31 21:33 今天在hex中对9型和comp-3深入研究了下。 9型: 在普通情况下:F0 --> F9 表示 1 --> 9 在S9最后一位:正数:C1 --> C9 表示 1 --> 9 负数 D1 --> D9 表示 1 --> 9 comp-3型:
阅读全文
摘要:[KeyRemap]keyVersion=2B33554467=[eraseeof]S36=[bof]B33554466=[pagedn]S35=[eof]B33554465=[pageup]B10=[newline]B192=[reset]C16777233=[enter]B27=[attn]XM
阅读全文
摘要:1.1 Outline 2.1 What is DFSORT? 2.2 Usage of DFSORT 2.3 Invoke DFSORT with JCL 3.1 Sorting Datasets 3.2 Merging Datasets 3.3 Copying Datasets 3.4 INCL
阅读全文
摘要:EBCDIC to ASCII https://www.ibm.com/support/knowledgecenter/SSZJPZ_11.7.0/com.ibm.swg.im.iis.ds.parjob.adref.doc/topics/r_deeadvrf_EBCDIC_to_ASCII.htm
阅读全文
摘要:https://en.wikipedia.org/wiki/EBCDIC_1025
阅读全文
摘要:CEMT I CECD V FILE() GROUP() CEDA check error log in JESYSMSG FILE OPEN/CLOSE STATUS CICS ACTION result
阅读全文
摘要:PD TO ZD simple one without . with v99
阅读全文