Rocket® COBOL

Created On:  02 January 2005 Problem: When a copybook, specified in conjunction with a COPY statement, cannot be found, the compiler will flag it with the following error: "COBCH0008 Unknown COPY file filename specified" Where filename is the name of the missing copybook. Resolution: 1. Make sure the file is available in one of the following locations:    in the same directory as the source code that has has the COPY statement    in one of the directories specified in the COBCPY environment variable, i.e. COBCPY=c:\\copyfiles;c:\\morefiles    in the same location as specified in the COPY statement IF it is fully qualified from the COPY statement, i.e. x:\\dir\\filename.cpy 2. Make sure to specify the extension in the COPYEXT directive if it is not either CPY or CBL, i.e. COPYEXT"src,txt" 3. Make sure to add the COPYEXT directive accordingly:    in a directive file, e.g. COBOL.DIR in the project folder, or &

Problem: Tips on how to use data type 'SQL TYPE is TIMESTAMP' vs. MSSQLSERVER also ORACLE database. Column in MSSQLSERVER is declared as 'DATETIME'. Column in ORACLE is declared as 'DATE'. Both databases reflect a date format 'dd.mm.yyyy hh:mm:ss' which is different to 'yyyy-mm-dd hh:mm:ss' by default. Resolution: A string should be redefined as follows, i.e.: 02  upd-date.     05  upd-dd           pic 99.     05  filler          pic x     value ".".     05  upd-mm          pic 99.     05  filler          pic x    &nbsp

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: 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: 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: 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: 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: 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: Set the focus on an item of a Selection-Box | set an item of a Selection-Box as Selected The Dialog System function SET-LIST-ITEM-STATE is not available for a SELECTION-BOX. To set the focus on an item of a SELECTION-BOX, the Net Express Class Library must be used, ........11) creating an instance of the class selectionbox [selectionbox is class "selnbox" ], using the ..............class method fromHandle herited from the class Guibase; ..............The class method fromHandle uses a parameter which is the OBJECT's handle, in this case ...............the SELECTION-BOX's handle, retrieved with the DS function MOVE-OBJECT-HANDLE . ........12) use the instance method SetSelected of the class selectionbox ............... This method uses one parameter which is the item number to be selected ............... ( method SetSelected: Set the listbox item determined by the index to be selected ) NOTE the Netx CLASS LIBRARY can be invoked i

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: 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

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: 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

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: 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

Problem: Exception 65538 not trapped by the class javaexceptionmanager. Description: "Java runtime exception" Unable to load class: (his calls name) Resolution: Check that CLASSPATH is set to the mfcobol.jar;. in the Net Express Application Server directory CLASSPATH=c:\\program Files\\Micro Focus\\Application server\\mfcobol.jar;. Old KB# 5008

Problem: Why do parent objects shine through clipped child windows? Resolution: This is a known issue with Windows -- it actually dates back to the days of 16 bit Windows! Unfortunately, Microsoft has never fixed the issue in any versions of Windows and there is nothing we can do to "work around" it. This is why the majority of GUI Windows applications do not have objects on the parent window when using clipped children.  Your options are: 1) Remove the objects from the parent window. 2) Do not use a clipped child window. Old KB# 5018

Problem: It is possible to use one single program for validation of multiple input fields. Resolution: The key is that each user defined validation must be an entry point within the same program. This program then must be loaded in memory to allow all these entry points to be available upon validation. The program can be called before calling Dialog System for the first time, and it is important that the main entry point (PROCEDURE DIVISION, a dummy entry point) should have nothing but GOBACK. Old KB# 5020

Problem: Is there a possibility to assign keyboard events, i.e. CURU (cursor up) and CURD (cursor down) if the focus is set on a push button? Resolution: Unfortunately, the answer is: no. According to the Keyboard Events documentation: "You cannot assign the left, up, right or down keys on buttons. Also, you can trap Tab or cursor key events only when focus is on entry fields and selection boxes. Note that the CURU/CURD, TAB/BTAB, and F4 keys can be trapped by dialog only on objects. This also applies to ANY-OTHER-EVENT if it is connected to any of the above keys." You can find this topic by opening the Net Express help and using the contents to navigate to: Programming-> User Interface Programming -> Dialog System -> Dialog Statements: Events -> Keyboard Events. Old KB# 5015

Problem: There is no option to print data validation rules from Dialog System. Resolution: Instead you can export the data block as a text file and print it from a text editor (Notepad). To export data block to a file: 1. load screenset into Dialog System 2. click on File > Export 3. uncheck all options under "Sections to export" except "Data Block" 4. rename the file extension to TXT, so it can be opened automatically with a text editor 5. click on the Export button Old KB# 5019

Problem: The message "Variable Syntax", and not the usual AppTrack options, may be returned when running apptrack in Application Server. Resolution: If you are running apptrack from csh try instead from sh and this should solve the problem. Old KB# 5006

Problem: How can I get the WOW 10.0p patched dlls? Resolution: The new dlls are in the attached zip file. Please see the included text file for more information. Attachments: WOW10.0p.zip Old KB# 4704

Problem: How can I run the RPCPlusServer as a service? Resolution: There are two ways: 1. There is a Windows Resource Kit program (srvany.exe) that will run any program as a service (see Microsoft KB ID 137890). 2. Use the RPCPlusService described in Chapter 9 of the RPC 1.4 User's Guide, which you can download from here: http://www.liant.us/docs.html      Attachments: RPCPlusService.zip Old KB# 4702