Rocket® COBOL

Problem: Using "inspect ... converting" to convert signed, EBCDIC numeric data to signed, ASCII numeric data. Resolution: The example program, "CONVERTING.cbl" (see attachement). illustrates how to use an "inspect ... converting" statement to translate EBCDIC numeric display values to equivalent ASCII numeric display values. The following syntax is used.       INSPECT identifier-1 CONVERTING identifier-6 TO identifier-7 "identifier-1" is a pic x(9) item initialized to a hexadecimal value 'F1F2F3F4F5F6F7F8D9' that is equivalent to "123456789-", a signed, numeric display value on an EBCDIC computer system. "identifier-6" is a table of the numeric EBCDIC characters that might appear in a signed, numeric display item. There are three groups of possibilities. The first group, (C0C1...), are positive, unsigned digits. The second group, (D0D1...), are negative, si

Problem: A program has been developed and compiled on Net Express and then copied over to a UNIX machine. When running the program on the UNIX system, an RTS0165 error is encountered.   Resolution: The problem here is that there is likely a library file or COBOL module which isn't looking in the correct pathname caused by a missing or wrong $COBDIR, or a newer version of Object Cobol Developer Suite, Server Express, or Application Server has been installed while parts of a previous product installation have not been removed correctly. Therefore a check should be done of the opt/lib or cob/lib  (or shlib) and also where the $COBDIR is pointing to.  If it is unknown which versions of product modules and libraries that are installed on the system on which the error is encountered, it is advisable to remove the products completely and reinstall the product to insure that the modules available are not from mixed product releases.

Problem: How to convert a sequential file to an indexed file using a cmd file. When deploying a Net Express project to a client machine that doesn't have Net Express installed and it is necessary to convert a sequential file into an indexed file before the file can be used in a COBOL program how can this be done using a cmd file? Resolution: Run rebuild from a command prompt. ....\\RebuildProject\\rebuild<Enter> Rebuild will display it's usage on the screen grouped into four categories: Rebuilding; Validation; Recovery; and Converting. Refer to Related tab above for a text copy of the following information. Rebuild command line options, Net Express 4.0, All04n40.exe, 1/26/2004 1) Usage for rebuilding: rebuild in-file[,out-file] [ /option ...] /i[:command]    - rebuild and display information /v[:n]                - display running count ever

Problem: Is there a way to call a .NET DLL (VB.NET) from a DLL developed in NX 4.0?, and if there a way to call a VB 6.0 DLL from a NX 4.0 DLL?. Resolution: When calling a VB.NET dll from a Net Express 4.0 .dll,you need to expose the VB.NET dll as a COM object. You can use the regasm command on the vb.net dll to expose it. Once you have done this, then you will need to call it by using INVOKE's from COBOL, using OO COBOL syntax in the same way as you would when calling a COM object from COBOL. Old KB# 5194

Problem: Processing text files containing "tab" delimited data. Resolution: Create an "extfh.cfg" File Handler Configuration file with these settings. (TABXMPL.TXT is a text file name that contains "tab" characters.     [XFH-DEFAULT]     BASENAME=ON     [TABXMPL.TXT]     EXPANDTAB=OFF The default setting turns BASENAME ON. The TABXMPL.TXT setting turns EXPANDTAB OFF for a file named "tabxmpl.txt". This will preserve the "tab" characters as each record is read making it possible for a program to detect these characters in a text file record. The following is an example program that will isolate each element of data delimited by a "tab" character.       $ set Ans85 Mf"10" NoOsvs NoVsc2 NoAlter NoQual DefaultByte"00"            select textFile assign 'tabxmpl.txt'    &nbsp

Problem: How to get data mapping of working storage maps in relation to Net Express. Resolution: By creating a listing file using the directive LIST() and the DATAMAP directive to add the working storage mappings to the listing. Old KB# 5190

Problem: Having trouble with installation on a Windows 2003 server. Getting an error when trying to run a web service: "File or assembly name MicroFocus.COBOL.Runtime, or one of its dependencies, was not found." Resolution: Check the update version of the Application Server - one of the websyncs changed the key where the runtime is being searched for. If the Net Express development product is at a higher websync level than the Application Server then this will occur. Updating the Application Server corrects the problem. Old KB# 5239

Problem: File systems on different operating systems can use different size addressing. Most current file systems use 32-bit or 64-bit addressing. The operating systems/file systems using these two sizes are listed below. Resolution: The File Handler is configured to work with either 32-bit or 64-bit addressing. It is vital that all applications sharing a file use a File Handler configured the same. Otherwise, data corruption can occur. You can configure the File Handler to use 32-bit addressing in a file system that uses 64-bit addressing. In this case, all files will be safely limited in size (to 32-bit addressing) by the File Handler. 32-bit file systems: - Windows 95 - Windows 98 - Windows Millennium - Windows NT (FAT) - Windows 2000 (FAT) - Windows XP (FAT) - UNIX without large file system enabled 64-bit file systems: - Windows NT (NTFS) - Windows 2000 (NTFS) - Windows XP (NTFS) - UNIX large file system - Linux File syste

Problem: The word "INSTANCE" was not a reserved word in Net Express 3.1 but it's now a reserved word in Net Express 4.0. Resolution: As a workaround, use the REMOVE compiler directive and re-compile. ie:      REMOVE"INSTANCE" Old KB# 5200

Problem: It is possible for Net Express Windows applications to issue HTTP requests and interact with Web applications. There are a number of ways that an application can make use of this technology. For example, POST could be used to send data to a remote Web Server for processing locally at that site. An application could also "screen scrape" HTML pages and parse the information for use within the application. As long as the server supports http then an application should be able to interact with it. Resolution: There are a number of ways you can do this. In order of difficulty the available options are:- - TCP Sockets APIs. Windows has a Sockets API that could be called. This however would have a very high learning curve to learn both the Sockets API and also the HTTP protocol in order to interact with a Web Server. - Windows Internet API (WinInet). This is a higher level API and hides the lower level network protocol. It allows an application to

Problem: What is the definition of the XML-CODE's that can be returned from XML-PARSE?            XML PARSE WS-XML-DOCUMENT               PROCESSING PROCEDURE 20000-PROCESS-XML               ON EXCEPTION                  DISPLAY 'XML DOCUMENT ERROR ' XML-CODE                  STOP RUN               NOT ON EXCEPTION                  DISPLAY 'XML DOCUMENT PARSED SUCCESSFULLY'           

Problem: How to code Border select attribute LVS_EX_BORDERSELECT constant in COBOL ? Resolution: In the Microsoft Windows C/C Header files the LVS_EX_BORDERSELECT constant is defined as:- #define LVS_EX_BORDERSELECT     0x00008000 // border selection style instead of highlight 0x denotes hex in C so you could have something like:- 78    LVS-EX-BORDERSELECT      value h"00008000". in a COBOL program. Old KB# 5180

Problem: Net Express Release 4.0: Fileshare is being used with a direct port connection, e.g. according to the doc files: set CCITCPS_server_name=MFPORT:3000 set CCITCPT_server_name=MFNODE:server_hostname,MFPORT:3000 The CCITCP2 environment variable has not been set. The CCI and MFDS services have not been set on the computer. This works fast and starts in one second up to Net Express 3.1 If I use Net Express 4.0, Fileshare starts with a 120 seconds delay. Resolution: Do not set CCITCPT_server_name on the Fileshare server, only on  Fileshare clients. Be aware: server_hostname is the network name of the computer server_name is the name of the fileshare server specified by the /s parameter of FS.EXE or in fs.cfg Old KB# 5183#RMCOBOL#netexpress#COBOL#AcuCobol#ServerExpress

Problem: When I apply a wrappack against my Net Express product where I have already installed Micro Focus Net Express with .NET, it reinstalls the .NET piece.  Is this suppose to happen and if so why? Resolution: Yes, this is done by design. The All WrapPack installs the .NET piece if it finds it installed on a users machine.  It will always install the .NET piece, even if the same version is found.  This helps to fix broken installs of .NET. Old KB# 5179

Problem: Error Installing Net Express Service Pack on file MFNXCL31.chm When installing SVP00N31.exe onto a Net Express 3.1 install it is possible for it to fail on the file  MFNXCL31.chm. Resolution: To resolve this issue rename the  MFNXCL31.chm file in the original Net Express install directory and try to install the Service Pack again. If this does not resolve the issue then contact you local SupportLine contact. Old KB# 5178

Problem: The data compression module cbldc001.obj has been linked into the .dll program. When the program is run a file status 9/173 is returned on the write. Resolution: Linking the module cbldc001.obj into the .exe instead of the .dll resolved the problem. Old KB# 5186#RMCOBOL#netexpress#COBOL#AcuCobol#ServerExpress

Problem: Received a Net Express 4.0 CD but but did not get the .NET piece after installation. Resolution: If the basic Net Express 4.0 version is installed then you can download the .NET addpack, the netx50n40.exe from the patches and fixes download site on the support page. Also download the latest ALLnnN40.exe and run this update after installing the .NET addpack. Old KB# 5181

Problem: Is it possible to <show copyfile> in the editor? It works fine for the copy member but not for the include files. Is the environment variable COBCPY not correct here? Resolution: The IDE uses these environment variables to look for copyfiles and called subprograms if they are not in the project directory. However, they cannot be set in the IDE. They should be set outside of Net Express, for example in the autoexec.bat file. Old KB# 5184

Problem: Is there a script or utility to do this. Resolution: For information on installation and use of Application Server, open Net Express Help and these folders and books: Contents   Using Net Express     Shipping Applications       How to...         various scripts, etc. Script to install silently rem This script installs Enterprise Server or Application Server silently rem Where d:\\mfserver is the installation directory rem Where d:\\mfserver\\licensdb is the location of the license database rem Where NXDEVAS5 01280 ... is the license key rem Before running this script: rem      modify the file MicroFocusAppServ??.ini or MicroFocusEServ??.ini as appropriate, rem      so that setup does not prompt for a license key. rem      Set the entry A

Problem: When using Data Connect I aways get two logon prompts. Does Mainframe Access (MFA) not remember what I typed in previously? Resolution: There have always been two logon prompts for Data Connect.  The first one is issued for the default MFA server. The second is issued when the OPEN for the first dataset is encountered.   Old KB# 5079

Error Executing AcuXUI 8.1 with Java 1.5 This article describes what to do when you receive an error while attempting to execute AcuXUI Version 8.1 with Java Version 1.5. Problem: When executing AcuXUI Version 8.1 with Java Version 1.5, you will encounter the following errors:C:\\test>"c:\\Program Files\\Acucorp\\Acucbl810"\\acugt\\bin\\acuxuiPlease enter the runtime command-line options that you want to use (e.g., -d -c cblconfig -l -e errorfile):Please enter the object file and path (e.g., V:\\Dev\\Source\\program1.acu):test.acu java com.acucorp.acuxui.AcuXUI --acucobolgt "C:\\Program Files\\Acucorp\\Acucbl810\\AcuGT\\wrun32.exe" test.acujava.io.IOException: CreateProcess: wrun32.exe --java-host:52742 test.acu error=2 at java.lang.ProcessImpl.create(Native Method) at java.lang.ProcessImpl.(Unknown Source) at java.lang.ProcessImpl.start(Unknown Source) at java.lang.ProcessBuilder.start(Unknown Source)

Problem: Calling sub programs, total size limitation. Queston is about the "1020 limit" noted in the documentation. "The total size of all the parameters passed must not exceed 1020 bytes, where each BY REFERENCE and BY CONTENT parameter occupies 4 bytes." This limit would permit the passing of 255 "by reference" parameters in a single call statement. This limitation is documented in Net Express Help under: Programming ......Calling Programs ..........Passing parameters to a called program Resolution: The complete article from Net Express Help Passing Parameters to a Called Program Parameters are passed to a program by specifying them in the USING phrase of the CALL statement. For example: CALL "program-name" USING parameter-1, ..., parameter-n Similarly the called program specifies the parameters in the USING phrase of its Procedure Division header or its ENTRY statement. The parameters need not have the

Problem: How do I create a Static Constructor for a COBOL class under .NET? You should NOT use the "new" method in the static paragraph as a static constructor. The "new" method would act as a type of instance constructor and is better used in the object paragraph. Instead, you can code a procedure division directly in the STATIC area (following the declaration of any static data), and you should find the code will get excecuted as a class constructor. Very simple example:        class-id. MyClass as "MyClass".        environment division.        configuration section.        repository.        static.        working-storage section.        procedure division.     &nb

Problem: How do I resolve "Error invoking unauthorized copy..." on Windows 2003? (Loc 508) Resolution: If the administrator account can run, the most likely cause of this error is insufficient privileges to create the needed key in the registry entry: [HKLM\\SOFTWARE\\Liant Software Corporation\\Common The runtime requires a user ID with appropriate permissions to access HKLM, or at the very least, that allow the user access to that registry entry.  A Power User normally has sufficient permissions to write to HKLM, so an Administrator user ID is not required. The HKLM\\SOFTWARE\\Liant Software Corporation\\Common portion of the registry is used to make the runtime start faster, so it is advantageous to allow this access. Another possible cause that affects Citrix and Terminal Services users of RM/COBOL is the "Create Global Object" privilege implemented in Service Pack 4 for Windows 2000. This privilege also affects all subsequent Win

Problem: Net Express Release 4.0: A runtime error 114 occurs when running a program compiled with the directive DIALECT"BS2000" after the all04n40 WrapPack has been installed. Resolution: There is a bug in utils.lbr which will be fixed in the next official WrapPack and this error should not occur after applying all05n40 or later versions. Meanwhile, the all04n40 Wrappack can be uninstalled and the all03n40 WrapPack can be used. Old KB# 5185