小编Sid*_*rth的帖子

PROCEDURE DIVISION
MAINPARA
    DISPLAY "HELLO MAIN".
    GO TO PARA1.
    DISPLAY " SECOND DISPLAY".
    STOP RUN.

PARA1.
    DISPLAY " I AM IN PARA1".

PARA2.
    DISPLAY "I AM IN PARA2"
....
PARA200

我对流程了解不多.但是,我很困惑.当控制跳转到时GO TO PARA1,它将执行PARA1.

现在我的问题是:

1. 它会执行PARA2并返回MAINPARA吗？
2. 或者它会从PARA2程序结束时执行？

我不是一个COBOL程序员,我需要从一个迁移工具/程序,AMXW COBOL理解的代码.目标系统是IBM AS/400.

我在我的Java项目中使用Threading.当我在我的机器上运行我的项目时,与其他机器相比需要更多时间(大约30分钟).两台机器都具有相同的64位配置,并使用32位JDK 1.5.16.那是因为Java线程吗？有任何想法吗？？请建议

谢谢!

*新增资料*

First Machine: OS - WIN 7 (64 bit), RAM - 8 GB
Second Machine: OS - WIN 8 (64 bit) , RAM - 16 GB

即使第二台机器的配置高于第一台机器,也比第一台机器多30到50分钟.

我在Java程序中运行这些代码行

        FileInputStream in = new FileInputStream(file);
        InputStreamReader reader = new InputStreamReader(in);
        int fileLength = (int)file.length();

        pstmt1.setCharacterStream(6, reader, fileLength);

但我在一些文件中得到以下异常,但在所有文件中都没有

异常:遇到读取InputStream的IOException,参数#6.剩余数据填充为0x0.有关详细信息,请参阅附件Throwable.ERRORCODE = -4225,SQLSTATE = null

我在哪里使用DB2数据库,我的表的结构是 -

CREATE TABLE SOURCE (
                LIB VARCHAR(10) NOT NULL,
                FILE VARCHAR(10) NOT NULL,
                MBR VARCHAR(10) NOT NULL,
                ATTR VARCHAR(10) NOT NULL,
                SEQ DOUBLE NOT NULL,
                DTA CLOB(5M),
                DAT INTEGER,
                RECN INTEGER,
                UNIQUE (LIB, FILE, MBR, ATTR, SEQ) 
            );

请帮我恢复这个例外.

提前致谢!

我希望得到有序形式的键,所以我使用了Sorted Map,但我得到了"ClassCastException",因为我想知道我的程序中存在的这个问题的原因,或者我做错了什么.请建议我.谢谢!我的示例代码如下:

  public class TreeTest
{
  public static void main(String[] args)
  {
      SortedMap<SectorInfo, List<String>> map2 =
              new TreeMap<TreeTest.SectorInfo, List<String>>();
      ArrayList<String> list = new ArrayList<String>();
      ArrayList<String> list1 = new ArrayList<String>();
      ArrayList<String> list2 = new ArrayList<String>();

      list.add("Test1");
      list.add("Test2");
      list1.add("Test3");
      list1.add("Test4");
      list2.add("Test5");
      list2.add("Test6");
      map2.put(new SectorInfo("S1", "P1"), list);
      map2.put(new SectorInfo("S2", "P2"), list1);
      map2.put(new SectorInfo("S3", "P3"), list2);
  for (SectorInfo sectorInfo : map2.keySet())
      {
          System.out.println(SectorInfo.pName +" In " + SectorInfo.sName);
      }
  }

  protected static class SectorInfo
  {

      public String sName;
      public String pName;

      SectorInfo(String sName, String …

Run Code Online (Sandbox Code Playgroud)

例如,什么是输出？

  PROCEDURE DIVISION
    MAINPARA
        DISPLAY "MAIN".
        GO TO PARA1.
        DISPLAY "DISPLAY".
        STOP RUN.

    PARA1.
        EXIT.

    PARA2.
        DISPLAY "I AM IN PARA2"
    ...

它会执行PARA2吗？

我不是一个COBOL程序员,我需要从一个迁移工具/程序,AMXW COBOL理解的代码.目标系统是IBM AS/400.