Recent changes to support-requests

#4 Support for variable length records

Prash — Thu, 29 Aug 2013 18:42:25 -0000

To fix this problem, make potentialDepOn a global variable in RecordSet.java -
private HashMap potentialDepOn = new HashMap();

Support for variable length records

Prash — Wed, 21 Aug 2013 19:37:25 -0000

I am not able to convert a Variable length file using the cobol2j tool. xsd creation happens correctly but parsing the data file is failing. I am skipping the first 4 bytes for every rset.hasNext() in Dat2xml.java. The first 4 bytes of each record is the length of the record per the mainframe data specs. Not sure how to use the length to determine the end of record and start a new record.

Setting Codepage

Anonymous — Sun, 12 Dec 2010 00:08:51 -0000

cobol2j (the example Cb2xc2j) is using the translet cb2xml2cobol2j.jar in which the codepage (ConversionTable Cp037) is defined. So it's not possible to parameterize the codepage when using the example.
The source code for the translet is not availabe.
Is there an easy way to set the codepage?

Variable Length file

Narayanan Collimuttum — Wed, 28 Jul 2010 13:05:02 -0000

I am not able to convert a Variable length file using the cobol2j tool. The file also has binary and packed data. tried converting using the dat2xml, dat2xls and dat2dat files of cobol2j but nothing works. please let know if the tool supports conversion os variable lenth file and if it does what is the method or step to do it.

can't process binary field

Anonymous — Mon, 31 Jul 2006 23:00:06 -0000

Encountered the following error when tested on a file
with a single binary field (PIC S9(8) COMP.) Tried
different field sizes, namely 2,4 & 8 all had same
error. Please advise.

-------------------------------------------------------
Error
-------------------------------------------------------

Exception in thread "main" java.lang.NumberFormatException:
at java.lang.Throwable.fillInStackTrace(Native
Method)
at
java.lang.Throwable.fillInStackTrace(Compiled Code)
at java.lang.Throwable.<init>(Compiled Code)
at java.lang.Exception.<init>(Exception.java:42)
at
java.lang.RuntimeException.<init>(RuntimeException.java:47)
at
java.lang.IllegalArgumentException.<init>(IllegalArgumentException.java:43)
at
java.lang.NumberFormatException.<init>(NumberFormatException.java:43)
at java.lang.Long.parseLong(Compiled Code)
at java.math.BigInteger.<init>(Compiled Code)
at java.math.BigInteger.<init>(BigInteger.java:280)
at java.math.BigDecimal.<init>(BigDecimal.java:105)
at net.sf.cobol2j.RecordSet.readZoned(Unknown
Source)
at
net.sf.cobol2j.RecordSet.getFieldsValues(Compiled Code)
at net.sf.cobol2j.RecordSet.next(Unknown Source)
at
net.sf.cobol2j.RecordSet.getNextRecordAsPlainString(Compiled
Code)
at test.b4.main(Compiled Code)

------------------------------------------------------
Program listing
------------------------------------------------------
package test;

import java.io.File;
import java.io.FileInputStream;
import java.io.FileNotFoundException;
import java.io.FileWriter;
import java.io.IOException;

import net.sf.cobol2j.FileFormat;
import net.sf.cobol2j.FileFormatException;
import net.sf.cobol2j.RecordFormat;
import net.sf.cobol2j.RecordSet;
import net.sf.cobol2j.tables.EBCDIC_037_TO_ISO_8859_1;

public class b4 {

public static void main(String[] args) {

RecordSet ctest = new RecordSet();
FileFormat f = new FileFormat();
f.setConversionTable(new
EBCDIC_037_TO_ISO_8859_1());
// Only one record structure
f.setDistinguishFieldSize(0);
RecordFormat rF = f.addRecordDefinition("0");
// 4 byte long binary
rF.addFieldDefinition("Rating", '9', 4, 0, false);
ctest.setFileFormat(f);

try {
ctest.setInputStream(new
FileInputStream("b4.dat"));
File plik = new File("NICE_OUTPUT_FILE.TXT");
FileWriter out = new FileWriter(plik);
while (ctest.hasNext())

out.write(ctest.getNextRecordAsPlainString(", ") + "\n");
out.close();
} catch (FileNotFoundException ex) {
ex.printStackTrace();
} catch (IOException ex) {
ex.printStackTrace();
} catch (FileFormatException ex) {
ex.printStackTrace();
}
}
}