Warning: file_get_contents(/data/phpspider/zhask/data//catemap/2/sharepoint/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Cobol jcl排序键中的舍入函数_Cobol_Mainframe_Zos_Jcl - Fatal编程技术网

Cobol jcl排序键中的舍入函数

Cobol jcl排序键中的舍入函数,cobol,mainframe,zos,jcl,Cobol,Mainframe,Zos,Jcl,我有输入记录 part - pic x(10), country - pic x(03), department - pic x(07), year - pic x(04), count1 - PIC S9(9) COMP-3, count2 - PIC S9(9) COMP-3, count3 - PIC S9(9) COMP-3, count4 - PIC S9(9) COMP-3, count5 - PIC S9(9) COMP-3, USAGE - PIC S9(5)V9(4) C

我有输入记录

part - pic x(10), 
country - pic x(03),
department - pic x(07),
year  - pic x(04),
count1 - PIC S9(9) COMP-3,
count2 - PIC S9(9) COMP-3,
count3 - PIC S9(9) COMP-3,
count4 - PIC S9(9) COMP-3,
count5 - PIC S9(9) COMP-3,
USAGE  - PIC S9(5)V9(4) COMP-3,
在输出记录中,我必须将所有计数相加,然后除以使用量, 如果除法后的值是十进制的,则需要四舍五入到近似值

四舍五入后,在零件和车型年级别添加每个记录的所有计数。 所有部门的方法如果部分和年份相同,我需要通过汇总计数将它们制成一个记录

请给我建议解决办法


我只需要在JCL中使用排序键来执行此操作。

首先,您必须了解JCL是什么。请查看您的系统的JCL语言参考。然后意识到你不能用JCL来做。SORT没有舍入函数,所以您必须自己编写它。你试过什么?你的问题毫无意义。您不能仅在JCL中执行任何操作,并且您的问题上有一个COBOL标记。前面的注释都是有效的。但是,输出记录应该是什么样的呢?在制定任何编码解决方案之前,您必须知道预期的结果。