在java中将字符串转换为压缩十进制

Question

我有一个用例，需要为大型机创建一个文件，其中包含文本和使用Java压缩的十进制数。

我在Stack Overflow上经历了很多线程，但似乎没有任何工作。我正在使用JTOpen库。

下面是我写的一个示例程序：

package com.amazonaws.samples.util;

import java.io.FileInputStream;
import java.io.FileOutputStream;
import java.io.IOException;
import java.math.BigDecimal;
import java.util.StringJoiner;

import com.ibm.as400.access.AS400PackedDecimal;

public class PackedDecimalTest {

    public static void main(String args[]) throws IOException {
        AS400PackedDecimal packedDecimal = new AS400PackedDecimal(8, 0);
        BigDecimal javaBigDecimal = new BigDecimal("20200521");
        byte[] convertedBytesArray = packedDecimal.toBytes(javaBigDecimal);

        try (FileOutputStream fos = new FileOutputStream("test.txt", false)) {

            //StringJoiner joiner = new StringJoiner(" ");
            //String firstName = new String("firstName1");
            //String lastName = new String("lastName1");
            //String empId = new String("1111");
            //String dept = new String("empDept1");
            //String n = new String("N");
            //joiner = joiner.add(firstName).add(lastName).add(empId).add(dept).add(n);
            //fos.write(joiner.toString().getBytes());
            fos.write(convertedBytesArray);

        }

        try (FileInputStream fis = new FileInputStream("test.txt")) {
            BigDecimal convertedBigDecimal = (BigDecimal) packedDecimal.toObject(fis.readAllBytes());
            System.out.println(convertedBigDecimal.toString());
        }
    }

}

当我编写文件并立即读取时，它在Java中似乎运行良好。我能够正确地看到输出。

然而，当在大型机中打开同一个文件时，我无法正确地看到压缩的十进制数据。

以下是我如何看待大型机中的数据：

我几乎被困在需要做什么来修复它的问题上。有人指出我做错了什么吗？如何在同一个文件中写入ASCII和压缩十进制数据？在为大型机编写文件以正确读取数据之前，是否需要定义任何字符集？我能把它写在纸上吗。txt文件，或者文件扩展名应该不同，或者扩展名没有意义？我对大型机、文件格式及其支持的字符集一无所知。

Answer 1

您看到的损坏来自将ASCII文件转换为EBCDIC。您需要以EBCDIC的形式编写文件，并向大型机进行二进制（直接无翻译）传输。

以下是@Hogstroms的答案，

改变

        fos.write(joiner.toString().getBytes());

到

        fos.write(joiner.toString().getBytes("cp037"));

这将把文件写为EBCDIC。您需要将主机传输更改为二进制。

你可能会发现JRecord很有用，尤其是如果你有一本cobol文案的话。

Answer 2

鉴于压缩十进制实际上是一个“二进制”值，您需要使用大型机的编码（CP-037或CP-1047或您首选的代码页）和压缩十进制“二进制”字段创建文件，然后将文件作为二进制传输。我不熟悉AS/400使用的代码页，但无论如何都是同一个问题。

如果使用scp文件将进行隐式翻译，这将损坏文件。

使用二进制模式的FTP/FTPS进行传输。

下面是一个链接，介绍如何从一个代码页转换到另一个代码页。

将字符串从一个字符集转换为另一个字符集