Rocket® COBOL

Problem: Open i/o on a file getting status 9/57, when animating or running under debug build type. When running under release build type, Do not get the 9/57 error. Resolution: Error was resovled by adding the following to the Select Statement on the file that recieved the 9/57 error.   LOCK MODE IS AUTOMATIC          SHARING WITH ALL Old KB# 1468#COBOL#ServerExpress#RMCOBOL#netexpress#AcuCobol

Problem: The aim of this demonstration is to show "How can a Cobol program consume an EJB deployed on a Java Application Server". First question: Is it possible? ( OO Cobol EJB Client <-> EJB home Interface <-> EJB remote Interface <-> EJB [Bean] ) The answer is NO, Not directly it is not possible to invoke a instance of an EJB from Object COBOL, due to the Object COBOL Java domain not support "proxy classes". How to Proceed then? Use a Java Wrapper which will communicate with the EJB. This will be possible: ( OO Cobol Client <->  Java EJB Client STUB <-> EJB home Interface <-> EJB remote Interface <-> EJB [Bean] ) Resolution: Environment used in the context of this demonstration Weblogic 8.1 Net Express 5.0 Websync3 ==> Demonstration is  in the .ZIP attached to KB more comments in the ..DOC file in the .Zip file which d

Problem: The following error is occurring in Net Express 5.0, Wrappack 4(WS4 :) ----- Form Designer requires Microsoft Internet Explorer 4.01 or greater to be installed on this system. See Installation Notes for more details. Form Designer cannot continue. ----- Resolution: WrapPack 3 (WS3) of Net Express 5.0 contains the fix for the issue with Internet Explorer 7 (IE7). However, the same fix is NOT unfortunately included in WrapPack 4 (WS4). WrapPack 3 (WS3) --> NX3250030082.MSP WrapPack 4 (WS4) --> NX3250040064.MSP It is likely that those who have applied WS4 on Net Express 5.0 that did not previously have WS3 will not be able to start Form Designer and will see the error message above. If WS3 was applied before WS4, then this problem will not occur. Please follow the steps below to resolve this problem: 1. Uninstall WS4 (see below the uninstall steps)    a. go to Start | Control Panel | Add or Remove Programs   &nbs

Problem: Compile fails with RTS114 in prexml.gnt when building .NET console application with a web reference Resolution: Compile fails with RTS114 especially when a web service is included and "p(prexml) endp" is set in the COBOL settings. The Preprocessor should only be called to parse XML source file only. Remove "p(prexml) endp" from the global setting and set it instead at the beginning of the COBOL file that contains XML syntax:       $set p(prexml) endp The XML pre-processor and .NET web services can exist in the same project as long as the preprocessor is not being used to parse source file that has non-supported syntax. The pre-processor does not support classes and .NET codes. Old KB# 1414

Problem: The COBOL code attached just does what's pasted below  which is a VB code OL2000: How to Programmatically Change the Displayed Calendar Date http://support.microsoft.com/kb/259767 some more glue regards to Outlook Object Model Overview http://msdn2.microsoft.com/en-us/library/ms268893(VS.80).aspx http://msdn2.microsoft.com/en-us/library/aa221870(office.11).aspx VB sample: Dim ol As Object Dim olns As Object Dim oCalendar As Object Dim oAppt As Object Dim oViewCmdBar As Object Dim oItem As Object Dim nItem As Integer Sub ChangeCalendarView()    ' Create Outlook Application object.    Set ol = CreateObject("Outlook.Application")    Set olns = ol.GetNameSpace("MAPI")    ' Retrieve the Calendar folder.    Set oCalendar = olns.GetDefaultFolder(olFolderCalendar)    ' You can retrieve your specific a

Problem: The demonstration attached uses the Microsoft APIs to ' I-O'  on named pipes Microsoft URL / named pipes:       http://msdn2.microsoft.com/en-us/library/Aa365590.aspx Microsoft URL / named pipes->PipeReference->Pipe Functions :      http://msdn2.microsoft.com/en-us/library/aa365781.aspx Resolution: A .ZIP is attached. For the simplest, 1) Unzip the attachment on a working directory 2) Open a Net Express command prompt 3) Compile the sources files, just launch DOcl.bat 4) Open another  Net Express command prompt session, just type start in the 1st DOS session 5) Launch the PIPE server in DOS session 1 ( run STARTpipeserver ) this 'PIPE' server will create a named pipe and wait for incoming requests from 'PIPE clients' 6) Launch a "PIPE client   in DOS session 2.  ( run MSG2pipeserver ) Th

Problem: External file mapper (mfextmap) seems not to work in a managed (.NET) application). Resolution: 1. MFEXTMAP is not supported in .NET 2. Use app.config (i.e. set environment variables) instead to avoid having multiple configuration files as in using external file mapping 3. It may be overwhelming to think of setting each one of the dd names as an environment variable in the project settings, but this can be done outside of Visual Studio. You may want to build your own program or script to import your MFEXTMAP.DAT file into the app.config file Here is a content of an app.config file: ----- <?xml version="1.0" encoding="utf-8"?> <configuration>   <configSections>     <!--The following code declares a section group for application configuration -->     <sectionGroup name="MicroFocus.COBOL.Application">      &nbs

Problem: Receiving sqlcode -19514 on DELETE statements, when re-submitted it then works. Using Net Express 4.0 and Oracle ODBC Resolution: This was an issue that was corrected in all08n40 all websync wrappack    o  The OpenESQL run time was updated to resolve an issue with        searched DELETE statements that were incorrectly returning a        "19514 Cursor is not prepared" error. Old KB# 1410

Problem: It seems that animating a CGI with IIS version that comes with Windows XP does not work. It just runs through. Resolution: It seems there is a difference between IIS 5.0 that comes with Windows 2000 and IIS 5.1 that comes with Windows XP. The security in 5.1 is much tighter than in v5.0. There is no problem to animate a CGI in any versions of Net Express with IIS 5.0 of Windows 2000, and nothing additional has to be set. Please bear in mind that IIS is running as a service, and Net Express is a desktop application! Anonymous access or any other user id that were used to run the CGI must then have the proper permission to run a desktop application. This was not the case with IIS 5.0, but this is now enforced in IIS 5.1. Here are the steps to animate a CGI in Net Express with IIS 5.1 (it would be likely the same for any later versions): 1. Create a virtual directory (e.g. cgi-bin) for the Net Express project's DEBUG subfolder 2. Set Read an

Problem: A Net Express project was set to to perform remote animation between Net Express and a COBOL  program running on AIX with Server Express 4 SP3. When selecting to Start/Animating in the Net Express IDE the follow error message appears:- Execution error: file 'opt/microfocus/cobol/dynload/animsrvr.libr/dispatch.gnt' error code: 115, pc=0, call=1, seg=0 115 Unexepected signal (Signal 4) Resolution: This error was resolved by installing IBM APAR Number IY80008 to the AIX installation. Old KB# 1479

Problem: Can the selected tree view item be displayed in light blue? Can the tree view items be colorized individually? Resolution: To do this you have to derive your own tree view class from the standard tree view and use this class in the class control paragraph of your tree view control program. You find a sample "owndrawtreeview" as attachment. ------------------------------------ The "owndrawtreeview" defines a method "wmGadgetNotify" which handles a redraw of the tree view items in the desired style. "owndrawtreeview" sample shows any level (up to 6) of the tree view items in a different color and shows the selected item in light blue and underscored style. The background of the selected item is white or yellow depending on the line, which is commented in. ------------------------------------ To use the "owmdrawtreeview" in your application, he class declaration in the control program has t

Problem: Passing Data to a property defined as a double in an Active X control. Within a charting ActiveX control it exposes a property thats is documented to be of type double. What parameter type should be passed across from COBOL ? Resolution: The equivalent COBOL type to a double is a COMP-2 floating point variable. Old KB# 1438

Problem: Is it possible to terminate an ACCEPT using the TAB and F8 keys?  If so, how are these keys detected within a COBOL program? Resolution: Yes it is possible to terminate an ACCEPT with the TAB and F8 keys.  This is done by calling ADIS and enabling a function key (F8) and an ADIS key (TAB).  The following program demonstrates how this is done and also how to detect the use of these keys. There are many other options and these can be found in the online documentation for ADIS.        special-names.            crt status is key-status.        working-storage section.        01  key-status.            03  key-type            &n

Problem: Cannot find the runtime. Unable to find cblrtss, when running program on the server where Application Server for Net Express (runtime) is installed. The runtime license database has been activated with runtime licenses. Resolution: When building exes or dlls, must make sure of the following before deploying. In the Project, for Type of Build Highlight the programname.exe Next, at the top of the IDE select Project ->  Build Settings Click on the Link tab Under Run time library when you select  Shared, make sure  Dynamic is also checked. The default is that  Dynamic is not checked. For all exes and dlls make sure the above is done, then do a Rebuild all of the Project. Now , deploy exes and dlls to the machine where the Application Server for Net Express (runtime) is installed. Old KB# 1494

Problem: How to uninstall XDB services and remove the XDB Server from the control panel. The resolution below is example of removing XDB Server for Net Express 4.0 Resolution: First, goto control panel -> Administrative Tools- Services Double-click on Services In this window click on Name at the top  to sort Look for Micro Focus XDB Server product & version double click on the Micro Focus XDB Server In this properties window for XDB Server, look for Path to executable for example, Path to executable D:\\Program Files\\Micro Focus\\Net Express 4.0\\mfsql\\bin\\xsrvnx.exe" Next, goto command prompt and goto this location where xsrvnx.exe is located To uninstall type the following: xsrvnx.exe -u This will uninstall the XDB server. ------------------------------------------------------------------------------- There will also be a  icon for Micro Focus XDB server product and version in the control panel. In ord

Problem: This KB and demonstration joined was tested with Net Express Websync3 and Server Express 5.0 Websync 3 on AIX  ( Server Express 5.0 WS3 PRN: RXCAM/AAI:9l.N6.50.03) ................................... How to set Environment Variables in COBOL and retrieve them to a shell ( .bat | .sh ) ? This is quite a common question asked more times to MF Supportline ................................... When you use the syntax        working-storage section.        01  ENV-value    pic x(200).        01  ENV-name     pic x(200) .        Procedure division *>        SetEnvtVar.       *--> set the value of environment name          &nb

Problem: Is it possible to access the mainframe using Mainframe Access (MFA) with Net Express and Server Express, i.e. to access data files on the mainframe? Resolution: In migration projects we recommend that customers buy and use Mainframe Express Enterprise Edition (MFE EE) that includes MFA to download everything from the mainframe and test the application the first time. Once the application works on MFE, there is a tool part of the Migration Toolkit that will create the Net Express project from the MFE project. The migration toolkit can also be used to pass the project to Server Express. Once the application is on Enterprise Server there are different ways to access the mainframe... - you can run a remote CICS transaction on the mainframe. This doesn't require MFA. - if you are using UDB (remember that XDB used by MFE is not a production system) you can have remote databases on the mainframe, but this is all done using IBM's tools. - if

Problem: For line sequential file processing, how can spaces be alternately permitted or suppressed? Resolution: set "STRIPSPACE" variable to either "ON" or "OFF" in extfh.cfg file. Example of extfh.cfg file as follows: [XFH-DEFAULT]        STRIPSPACE=OFF  (for all files) BASENAME=ON     (enables file handler -                                  anything following                                  pertains to particular files                       &nbsp

Problem: Is it possible to colorize the ListViewItems with alternating colors? Resolution: To do this you have to derive your own list view class from the standard list view and use this class in the class control paragraph of your list view control program. You find a sample "owndrawlistview" as attachment. The "owndrawlistview" defines a method "wmGadgetNotify" which handles a redraw of the list  view items in the desired style. ------------------------------------ To use the "owmdrawlistview" in your application, the class declaration in the control program has to be changed from            ListView is class "listview" to            ListView is class "owndrawlistview" and owndrawlistview class has to be added to the application -----------------------------------

Problem: An RTS 173 Error was reported when an application was started up. The application directory contained an apiguis.dll. Resolution: This was caused by a corrupt apiguis.dll. Replacing the file from a valid install resolved the problem. Old KB# 1445

Problem: Can you share a Database Connection between .Net Languages (VB and C#) and COBOL. In the scenario C# would create a connection and pass that to COBOL. COBOL would then use the connection and issue its Embedded SQL on the same connection. Is this possible ? Resolution: Yes using ADO.Net you can pass a connection object from C# to the COBOL. The COBOL then can use EXEC ADO BIND to  specify that the C# connection is to be used when executing embedded SQL. Attached to this article is some example code showing how to do this. Attachments: DNSharedConnection.zip Old KB# 1505

Problem: This is a demo program that shows how to share files between different instances of the same class. Many people are confused as to where file definitions should reside in an OO COBOL program. Resolution:    ===========================================================                                               Micro Focus                                          N E T E X P R E S S       ===========================================================    &nb

Problem: How can I enter a username greater than 8 characters with IBM UDB? Resolution: IBM DB2 UDB limits you to 8 character logon id's - see: http://publib.boulder.ibm.com/infocenter/db2luw/v9/index.jsp?topic=/com.ibm.db2.udb.uprun.doc/doc/r0006867.htm USER authorization-name/host-variable Identifies the user ID trying to connect to the application server. If a host-variable is specified, it must be a character string variable with a length attribute that is not greater than 8, and it must not include an indicator variable. The user ID that is contained within the host-variable must be left justified and must not be delimited by quotation marks. USING password/host-variable Identifies the password of the user ID trying to connect to the application server. The password or host-variable can be up to 14 bytes long. If a host variable is specified, it must be a character string variable with a length attribute not greater than 14, and it must not

Problem: What mechanisms are there to convert strings to numbers in a COBOL Program. Resolution: COBOL has the NUMVAL intrinsic function avalable on all platforms. .Net also has available some methods for converting. On the numeric data classes such as System.Int32 and System.Decimal there is the "Parse" and "TryParse" methods. Parse will attempt to convert but will throw an exception is the format of the string is not valid. TryParse will attempt to convert and will return a boolean if the conversion fails. If you expect that a numeric parse will fail then use tryparse as an exception from Parse is expensive in terms of performance in an application. Attachments: Program1.cbl Old KB# 1422

Problem: Customer upgraded to the V8 C compiler in Net Express and now gets the error R6034 an application has made an attempt to load the C runtime library incorrectly. Resolution: When using Micro Focus NET EXPRESS with  .NET  products with Microsoft Visual Studio products: NET EXPRESS 4.0 with .NET is ONLY supported with VISUAL STUDIO 2003 and VISUAL STUDIO 2005 is NOT supported with NET EXPRESS 4.0 with .NET NET EXPRESS 5.0 with .NET is ONLY supported with VISUAL STUDIO 2005 and VISUAL STUDIO 2005 is NOT supported with NET EXPRESS 4.0 with .NET Old KB# 1454