Rocket® COBOL

Created On:  15 November 2012 Problem: Converting an RM fixed length indexed file using RM to MF Data Conversion sample produces an MF variable length IDXFORMAT(8). Resolution: The RM to MF Data Conversion sample is a "sample" program, and it should not be considered as an official Micro Focus conversion utility. The purpose of this sample program is to convert an RM indexed file into an MF variable length IDXFORMAT(8) file. If you wish to modify the sample to convert into an MF fixed length IDXFORMAT(8) file, you will need to change lines 541 and 542 of MigrationForm.xaml.cbl:set tmpStr to String::Concat(IntermedFile, ", """, outFile, """ /o:seq,ind /r:v",    MinSizeStr, "-", MaxSizeStr, " /t:mf8 /k:", KeyStr::Trim()) to the following:set tmpStr to String::Concat(IntermedFile, ", """, outFile, """ /o:seq,ind /r:f",&

Created On:  30 April 2012 Problem: Failed to authorize the Authorization Code over the web.  Even when using the Manual Authorization option, it says the license is installed but nothing was displayed on the 'Licenses' tab of the 'Micro Focus Licensing System Administration' window. Resolution: The license files, lservrc.stn and lservrc.net, are located in:C:\\ProgramData\\Micro Focus - for Windows Vista or Windows Server 2008 or Windows 7 C:\\Documents and Settings\\All Users\\Application Data\\Micro Focus - for Windows XP Follow these instructions:1.   Create a copy of the lservrc.net and lservrc.stn files.2.   If you see the word "STANDALONE" in the license strings, then open the lservrc.stn file using       notepad or wordpad.              If you see the word "NETWORK" in the license strings, then open the lservrc.net file.3.   If the license fil

Created On:  16 November 2012 Problem: Customer is using Net Express 5.1 and has the following question.Net Express has the instrinsic functions upper-case and lower-case. Is there a Function or Module that converts string fields into upper AND lowercase? For example: I would like to convert "JOHN DAVID SMITH" into "John David Smith". Resolution: There is no COBOL intrinsic function to do this mixed case conversion but here is a simple demo to show you how you can write one in COBOL. This example is also attached to this article as a zip file.The mixedcase function will capitalize all words in a string passed to it.Calling program:      *----------------------------------------------------------------*      *                         Test Case         * &nbsp

Created On:  12 December 2012 Problem: Having Internet Explorer 8 installed, the Web Browser control returns a value related to IE 7. This may cause some issue to customer's application which will run a test on the browser installed on end-users' machines. Resolution: This problem is caused by some changes that MS introduced during the IE 8 Beta1. The following link explains the problem and the solution. http://blogs.msdn.com/b/ie/archive/2009/03/10/more-ie8-extensibility-improvements.aspx In short, you need to add a registry key naming the executable (wrun32.exe or acuthin.exe, or if you have renamed the runtime, whatever name you gave it). Incident #2599414 Old KB# 36675

Created On:  14 December 2012 Problem: Customer has an application that uses many indexed files that are opened for input so that the application can read records in each of the files.This processes OK when only a single instance of the application is running but when multiple instances of the application are running, the performance gets quite a bit worse and file locks begin to be returned to the applications.No application is updating the files.  How can we improve the performance and get rid of the locking issues that are occurring when multiple instances of the application are running? Resolution: Try opening the files using the following statement:   OPEN INPUT SHARING WITH READ ONLY filenameThis tells the file handler to only allow other applications to open the file for read-only so that it does not have to include all of the overhead checking to see if the files have been updated by another application since the last read took place.This can dra

Created On:  03 December 2012 Problem: When trying to install an AcuCobol product on Linux the error message appears - libc.so.6.1: version `GLIBC_2.3.4' not found. Resolution: To install an AcuCobol product on a Linux machine the minimum Operating System requirement is GLIBC_2.3.4.  The customer should be advised to upgrade the Linux platform to at least this level. Old KB# 36653#COBOL

Created On:  10 December 2012 Problem: Program that uses an ActiveX control works Ok with Windows runtime version 9.1.2.1 when it runs standalone; but with thin client it crashes, the program works Ok with previous Thin Client versions. Resolution: The problem is due to the ECN-4159 introduced in version 9.1.2.1, while development still is investigating this problem, the solution is to turn off the runtime configuration variable ECN-4159, like this:   ECN-4159 OFF Incident #2603362 Old KB# 36669

Created On:  12 December 2012 Problem: When a .Net control is local on the same computer where the Runtime is executing there is no error.  But when the .Net control is on another computer and accessed remotely via either UNC notation or a mapped drive the version 9.1.1 Runtime crashes with a memory access violation.  With 8.1.x runtime there is no crash - everything works as expected. Resolution: Version 9.1.1 implemented the .Net 4.0 framework, which has different security than previous versions of the .net framework. In particular, it won't default load an assembly on a remote machine (and in some cases, won't even load one that came from a remote machine, but is now local). Previous .Net versions did not have such a security restriction which is why earlier Runtime versions do not have a problem. To allow loading of remote assemblies requires the creation of a .Net configuration filenamed wrun32.exe.config in the same directory as wrun32.exe,

Created On:  04 December 2012 Problem: Is it possible through AcuCobol to change the fonts or enlarge the pop-up menu? Resolution: This is not possible from COBOL. You would need to choose the size of menus by using the Windows Control Panel. And there is only minimal control there. Old KB# 36660#COBOL

Created On:  30 November 2012 Problem: In the Net Express/Server Express documentation in the section under COBOL/Java Interoperability section for compatible data types here: it shows that the compatible COBOL data type for the Pointer class is PIC X(99).Does this mean that the maximum size of a string that can be passed to COBOL is 99 bytes? Resolution: The documentation example is not correct.PIC X(99) is shown as an example of what the data type could look like and not what it must look like.The documentation should really show the data type for the Pointer class as:       PIC X(n) where n = 1 -> maximum length of string passed. Old KB# 36645#ServerExpress#netexpress#EnterpriseDeveloper#VisualCOBOL#COBOL#StudioEnterpriseEdition#Enterprise

Created On:  16 November 2012 Problem: With Visual COBOL for Visual Studio there is a sample solution called RMMFMigration.  This solution assists in the conversion of RM/COBOL data files to the Micro Focus Visual COBOL data file format.   Converting RM/COBOL data files to Micro Focus Visual COBOL Format is a two step process.  The data file is first converted to an intermediate variable length sequential file by a conversion routine (ixconvert.cob) and is then passed to a Visual COBOL application (rebuild.exe) to convert the intermediate file into a Micro Focus Visual COBOL index file. However this isn't an Eclipse version of this solution. Resolution: The RMMFMigration project is really just a front end that then calls ixconvert that does the real work. Ixconvert is an RM/COBOL object and can be run using ‘runcobol’. It will produce a Micro Focus binary sequential file and will return several pieces of information to the caller including the key expres

Created On:  12 December 2012   Problem:   It may be necessary to gather use count information for your RM/COBOL Runtime or Compiler. However, this information is not reported by the Runtime or Compiler products.   Resolution:   The RM/COBOL Use Count Utility(rmucutil) is used to check how many use count licenses are in use on the network.  The RM/COBOL Use Count Utility(rmucutil) can be found in the RM/COBOL installation directory. Below is the usage information for the RM/COBOL Use Count Utility(rmucutil): rmucutil RegistrationNumber [COMPILER|RUNTIME] DETAILS *The Registration Number for your product can be found by running either of the following commands: "runcobol" or "rmcobol" In addition, the environment variable RM_UC_LOG_PATH can be set to a directory, so RM/COBOL will create a RMUSECNT.LOG file, which will contain similar diagnostic messages. For example, for Windows systems, setting RM_UC_LOG_PATH=C:\\TMP will cause RM/COBOL to create a

Created On:  21 November 2012 Problem: Opening an HTML file in Net Express fails with the following error after applying Net Express 5.1 WrapPack 7: Object Code error: file 'proplist'error code: 153, pc=0, call=1, seg=0153   Subscript out of range (in .\\PROPLIST.cbl, line 2366)The exact same error appears when creating ActiveX controls in a Dialog System screenset. Resolution: The problem has been addressed in RPI 1085782, and the fix will be included in Net Express 5.1 WrapPack 8, which will be released sometime in February 2013.The workaround is then to remove WrapPack 7 and remain with WrapPack 6. Incident #2602584 Old KB# 36623

Created On:  12 December 2012 Problem: It is possible to have multiple physical files that are, logically, the same file? In this scenario, it is useful to be able to combine the records from the different physical files into one Relativity table. Resolution: *The Relativity Designer Help file discusses this topic in detail. However, the following is a simple guide to setting it up. This guide assumes that you have created a new catalog and have imported the FDs of all the files you wish to use. **All files MUST have the same structure and data definition. If you wish to 'merge' data from files that have dissimilar structures, then create a table per file and merge the data in your ODBC enabled application using SQL JOIN. 1. Open each FD, right click, and select Add File Label. Ensure the name is unique for each FD. It helps to give the File Label the same name as the FD. 2. Create a table and drag all the fields (including the File Label field) from the first FD. 3. Clic

Created On:  20 November 2012 Problem: Using the compiler directive XMLGEN(WS) instructs the compiler to create the XML model files.   However the IDE creates the XML model file(s) in the project root directory, but the runtime is expecting to find them in the output folder so an error 39  is generated, for example:Error: 39[01] model (symbol table) file that defines model data-name not found[39]ModdelFileDataName parameter: "Address-Struct" Resolution: The XMLGEN directive can specify a path for the directory/folder of where to put the model template file.  This path can be relative or absolute.  If the ws option is desired, specify it in a separate XMLGEN(ws) directive that follows the XMLGEN(path) directive, where path indicates your desired directory/folder, because setting the path nullifies the XMLGEN(ws) option.  For example,      cobol testxmlgen01 XMLGEN(c:\\windows\\temp) XMLGEN(ws);  will

Created On:  15 November 2012 Problem: To run the RM/COBOL library routines provided in Visual COBOL, you set the DIALECT(RM) Compiler directive, which sets the required calling convention. To run the Visual COBOL library routines, you use the standard COBOL calling convention. If you have RM/COBOL compatible library routines and Visual COBOL library routines in the same program this can be a problem because of the different calling conventions. Resolution: If you have RM/COBOL compatible library routines and Visual COBOL library routines in the same program, do one of the following: • Set the DIALECT(RM) Compiler directive to enable the RM/COBOL library routines, then explicitly use the standard COBOL calling convention for the Visual COBOL library routines. For example : $SET DIALECT(RM) IDENTIFICATION DIVISION. PROGRAM-ID. CTEST2. ENVIRONMENT DIVISION. CONFIGURATION SECTION. SPECIAL-NAMES. CALL-CONVENTION 0 IS Microsoft

Created On:  20 November 2012 Problem: The Visual COBOL v2.1 documentation states that the return parameter for the C$SetEnv RM library call within is optional. Syntax: CALL "C$SetEnv" USING name, value [, return] Parameters: name  PIC X(n) value  PIC X(n) return PIC 9(n) BINARY, where n can be a digit from 1 to 9 However if the "return" parameter is not used an ArrayIndexOutOfBounds Exception occurs. Resolution: The return parameter must be used. Incident #2602271 Old KB# 36621#ArrayIndexOutOfBounds#CSetEnv#COBOL

Created On:  04 December 2012 Problem: Customer has developed a .NET Windows Forms application using Visual COBOL and now they wish to deploy it on a network server so that all workstations that are mapped to the server can run the application without installing the COBOL Server product locally on each workstation.Can this be done? Resolution: Yes, a .NET managed code application can be setup to run from a network server as long as the workstations that are accessing the server have the required permissions.If you also are using native code components in your application then you will need to setup the licensing as shown in KB article here:Here are the instructions for extracting the managed code assemblies from the COBOLServer21.exe installer so that they can be deployed on a network and shared by workstations. The following are instructions for installing the COBOL Server 2.1 managed code assemblies to use on a network. This assumes that you already have the COBOL Server

Created On:  10 December 2012 Problem: When compiling a COBOL program, AcuBench 9.1.2.1 crashes. Resolution: This is due to a correction made in 9.1.2 that removed memory leaks. There is a new ECN-WB915 that will be included in version 9.2.0, but there is already a patch available for AcuBench 9.1.2.1, which is patch 1357, that could be requested to SupportLine. Incident #2603766 Old KB# 36670

Created On:  27 November 2012 Problem: There are Stored Procedures that are causing the MicroFocus.COBOL.FileHandler warning that is preventing the ability to publish to the SQL Server 2012 database. Resolution: Use NOOUTDD directive Incident #2602526 Old KB# 36638#COBOL

Created On:  16 November 2012 Problem: Do I need an authorisation code when installing Visual COBOl Development Hub Product? Resolution: No, when installing the Visual COBOL Development Hub product it will install a 30 day Evaluation license automatically, then you have 30 days to aquire a Full License and install this via the APPTRACK utility. NA Old KB# 36612#COBOL

Created On:  27 November 2012 Problem: If you have enabled a trace in Fileshare what will you see in the trace if an application has issued a rollback of a transaction? Resolution: The Fileshare trace will log the file operations that are performed on a file. The file handler op code for a rollback is DD and it is a standard file operation you the full code you see is FA DD.An example log showing a rollback would look like:-07385680 FS163-I Input- FSADMIN FA8E C:\\MYFILES\\AFILE.DAT07385680 FS173-I Output- FSADMIN 2/307385680 FS163-I Input- FSADMIN FAF3 C:\\MYFILES\\AFILE.DAT07385682 FS173-I Output- FSADMIN 0/007391544 FS163-I Input- FSADMIN FADD07391546 FS173-I Output- FSADMIN 0/007391719 FS171-I Input- Logoff FSADMIN07391723 FS173-I Output- 00001 0/0You can see in the trace above that the FADD (Rollback) has been issued. Incident #2600954 Old KB# 36636#COBOL

Created On:  29th November 2012 Problem: In Visual COBOL for Eclipse, when compiling a remote project which includes DB2 directives it fails with an error:    [cobol]     [cobol] Compiling (64-bit) Program1.cob...    [cobol]     [cobol] Load error : file 'cobsqlecm64.so'    [cobol] error code: 198, pc=0, call=1, seg=0    [cobol] 198     Load failure (No such file or directory)    [cobol]     [cobol] cob64: error(s) in compilation: Resolution: Before starting the RSE server process via the script $COBDIR/remotedev/startrdodaemon the environment must be correctly configured so that the DB2 libraries can be found.  The environment can be configured using the db2profile script provided with DB2 in the sqllib directory located in the home directory of the DB2 instance user.  For example, you could create a script to

Created On:  28 November 2012 Problem: Customer was converting a Net Express native application to a Visual COBOL managed code application and noticed that there was an extreme performance hit when executing a COMPUTE statement that included fractional exponentiation.Program looked like: 01 ws.   05 WS-TEST-VALUE PIC S9(9)V9(4) COMP-3.   05 WS-TEST-INTEREST PIC S9V9(6) COMP-3.   05 WS-NO-DAYS PIC S9(05) COMP-3.   05 WS-DAYS-BET-ANIV PIC S9(05) COMP-3.    MOVE 44406.25 TO WS-TEST-VALUE.   MOVE 0.015 TO WS-TEST-INTEREST.   MOVE 365 TO WS-NO-DAYS.   MOVE 365 TO WS-DAYS-BET-ANIV.   COMPUTE WS-TEST-VALUE ROUNDED = WS-TEST-VALUE * ((1 WS-TEST-INTEREST) ** (WS-NO-DAYS / WS-DAYS-BET-ANIV)). The Compute statement above was taking about 20 seconds to execute.How can this performance be increased? Resolution: The problem is that in managed code COMP-3 data types do not map directly to a manage

Created On:  19 November 2012 Problem: When installing Visual Cobol 2.1 Products it will install the License manager using lmsetup64.msi , this will automatically create Firewall rules to allow for communication to licening servers. Is there a parameter to prevent firewall rules from being set during license manager installation? Resolution: You can use the following parameter when installing the license manager: > lmsetupx64.msi ENABLEFIREWALL.B770BEF9_6C75_468D_A6D3_B6B7856579C8=”FALSE”This will not create any Firewall rules when installing the license manager. NA Old KB# 36619#COBOL