COMTI NewRecordset Method Fails With Error -2147417851 (307822)

SYMPTOMS

The following error may occur when you call the NewRecordset method of a COM Transaction Integrator (COMTI) component that was created through the COBOL Import Wizard feature of the COMTI Component Builder:

-2147417851 (0x80010105) The server threw an exception.

CAUSE

When you are importing COBOL code that contains an OCCURS statement, the COBOL Import Wizard incorrectly allows the creation of a recordset that contains an array. COMTI does not support recordsets containing arrays, so an error is generated at runtime when the NewRecordset method is called.

RESOLUTION

To resolve this problem, obtain the latest service pack for Host Integration Server 2000. For additional information, click the following article number to view the article in the Microsoft Knowledge Base:

328152 How to Obtain the Latest Host Integration Server 2000 Service Pack

STATUS

Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article. This problem was first corrected in Host Integration Server 2000 Service Pack 1.

MORE INFORMATION

The following is an example of COBOL code that can cause the problem:

       01  DFHCOMMAREA.
      *  ACCTINFO IS (INPUT, OUTPUT)
           05  ACCTINFO OCCURS 6 TIMES.
               10 ACCOUNTNUMBER                 OCCURS 8 TIMES 
				          	PIC X(6).
               10 ACCOUNTTYPE                   PIC X(20).
               10 CURRENTBALANCE                PIC S9(13)V9(2) COMP-3.
               10 INTERESTBEARING               PIC S9(4) COMP.
               10 INTERESTRATE                  COMP-1.
               10 MONTHLYSVCCHG                 PIC S9(13)V9(2) COMP-3.
      *  NAME IS (INPUT, OUTPUT)
           05  NAME                             PIC X(30).
      *  PIN  IS (INPUT, OUTPUT)
           05  PIN                              PIC X(10).

The COBOL Import Wizard will allow the creation of a recordset by selecting the ACCTINFO structure in this code even though it contains a data value with an OCCURS statement. An application that tries to use the NewRecordset method on this component will receive an error.