DOCUMENT:Q182678 07-APR-2000 [sna] TITLE :COBOL FILLER Generated Incorrectly After Recordset Array PRODUCT :Microsoft SNA Server PROD/VER:WINDOWS:1.0,4.0 OPER/SYS: KEYWORDS: ====================================================================== ------------------------------------------------------------------------------- The information in this article applies to: - Microsoft COM Transaction Integrator for CICS and IMS, version 1.0, used with: - Microsoft SNA Server, version 4.0 ------------------------------------------------------------------------------- SYMPTOMS ======== You can use the Component Builder (CB) to export COBOL statements from a component library. However, under certain circumstances, the exported COBOL statements will not be correct. The situation involves method parameters that are recordsets, and the recordset parameter is declared as an array and also as having trailing FILLER. Under these conditions, when the component library is saved and COBOL is exported, the trailing FILLER item in the exported COBOL statements is generated as part of each element of the array of recordsets. This is incorrect; there should be one occurrence of the trailing FILLER following the array as a whole. For an example of this situation, see the sample COBOL code in the MORE INFORMATION section of this article. WORKAROUND ========== To work around this problem, use a text editor to manually correct the exported COBOL. STATUS ====== Microsoft has confirmed this to be a problem in Microsoft COM Transaction Integrator for CICS and IMS version 1.0. This problem was corrected in the latest SNA Server version 4.0 U.S. Service Pack. For information on obtaining this Service Pack, query on the following word in the Microsoft Knowledge Base (without the spaces): " S E R V P A C K " (without the quotation marks) MORE INFORMATION ================ For example, the COBOL below was generated from a simple typelib. All contents of the typelib were declared manually within CB, without using the Import COBOL Wizard. In this code, a recordset with two elements, COLUMN1 and COLUMN2, is declared. A method is declared that has one parameter, PARAMETER1. PARAMETER1 is declared as an array of 12 elements with 25 bytes of trailing FILLER. In this COBOL code that was generated from the typelib, the trailing FILLER was generated as part of the array instead of following the entire array: 01 DFHCOMMAREA. 05 FILLER OCCURS 12 TIMES. 10 PARAMETER1 OCCURS 1 TIMES. 15 COLUMN1 PIC S9(4) COMP. 15 COLUMN2 PIC S9(4) COMP. 10 FILLER PIC X(25). In this example, the preceding COBOL code should be modified so that the FILLER is not part of the array, as shown in the following code: 01 DFHCOMMAREA. 05 FILLER OCCURS 12 TIMES. 10 PARAMETER1 OCCURS 1 TIMES. 15 COLUMN1 PIC S9(4) COMP. 15 COLUMN2 PIC S9(4) COMP. 05 FILLER PIC X(25). Additional query words: comti record set type lib typelib ====================================================================== Keywords : Technology : kbAudDeveloper kbCOMTISearch Version : WINDOWS:1.0,4.0 Issue type : kbbug Solution Type : kbfix ============================================================================= THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY. Copyright Microsoft Corporation 2000.