Rocket® COBOL

Created On:  7th March 2012 Problem: How to use Visual Studio 2008 to debug a core dump produced by core_on_error. Resolution: Start Visual Studio 2008Click on 'create project' and select "Native" under Cobol Projects.Select the "Empty Project" template in the right-hand window and click 'ok'Open the project properties and click on the 'debug' tabSelect "Start External Program" and browse to the core dump file. (Note: next to the 'filename' window at the bottom, select to view 'All files' in order to be able to select a corefile (i.e. a non-executable file))click on 'Open'Select 'Debug' -> Start Debugging If there is a popup error window regarding build errors, select 'yes' (to continue with the last successful build) The debugger positions itself on the line of code that caused the coredump Old KB# 35616

Created On:  11th July 2012 Problem: Application uses cobol application on linux platform and database db2 for z/os on mainfarme. Cobol application communicates to database server with db2 connect. Application uses compile directive CHARSET=ASCII. There is a problem calling db2 if we use host-variables that contain the HIGH-VALUE character (X'FF'). This character is converted into EBCDIC character X('9F'). For examplesql BETWEEN from LOW-VALUE (x'00') and HIGH-VALUE (X'FF'),db2 z/os executes the BETWEEN from LOW-VALUE(X'00) and X'9F'.In EBCDIC the character X'9F' isn't the largest, and the BETWEEN result isn't correct. We have tried to set the same CODEPAGE from db2 client and db2 server, but we haven't tried to use the CHARSET=EBCDIC because we are using Server Express 5.1 WP 6 and need to use MFHCO - is MFHCO available Server Express 5.1 WP6 (since it doesn't support MTO)?The following error is seen:cob64: error(s) in compilation: sigt504.cobThis is on a 64 bit system Res

Created On:  11/7/2011 Problem: (NOTE: NX versions prior to 5.1 are not supported on Windows 7)Unable to revoke a license installed on Windows 7 using an unsupported License Management Utility.  License was previously installed on an OS that the non-Windows 7 compatible License Management Utility was installed on. Resolution: From the License Management utility, go to Start Menu > All Programs > Micro Focus Net Express X.X > Configuration > Right-click "License Management System" > Choose "Properties".  Under the Compatibility tab, check the box for "Run this Program in Compatibility Mode for:" and select the previous version of OS that you were running.  2513701 Old KB# 35180

Problem: Customer is using Visual COBOL for Visual Studio and needs to increase the stack size that is linked into a native .EXE. Is there a way to set this option other than by setting the LINK environment variable with the "/STACK:8000000" value? Resolution: Setting the LINK environment variable should also work under Visual COBOL for linking native .exes but you can additionally set the link directives in the project properties. Open the properties and look at the COBOL Link tab. Near the bottom there is a field called Additional Directives. You can pass directives to the linker by specifying the -wl option along with the directive. -wl"/STACK:8000000" For managed code we have a directive called -ILSTACKSIZE that allows you to do this.

Problem: Customer has a program that uses embedded SQL statements using the OpenESQL precompiler.This program compiles without errors under Net Express but when compiling under Visual COBOL as a native program it gets the following error:COBCH0801: Statement Incompatible with BEHAVIOR settingon the following statement:       EXEC SQL SET CONCURRENCY READ-ONLY END-EXECWhy is this occurring? Resolution: This error message occurs because the default settings of the SQL BEHAVIOR directive have changed in Visual COBOL.By default it is now set to BEHAVIOR=MAINFRAME if it is not specified.You can change this behavior back to the Net Express defaults as follows: Close Visual Studio and then in the C:\\Program Files\\Micro Focus\\Visual COBOL\\bin folder run the program esqlconfigw.exe. Click on the third option down which is for no change in behavior and then click the save button. Open up Visual Studio and try compiling again.The error message should now be

I have the below in a project: 77 SW-SHOW   USAGE IS UNSIGNED-INT  VALUE IS 5.01 OPEN-COMMAND.     05 FILLER           PIC  X(04)   VALUE IS "OPEN".     05 FILLER           PIC  X(01)   VALUE IS X"00". 01 WS-ADDRESS    PIC X(250) VALUE "http:\\\\www.google.com". -----------------------------------------------------------------------------            CALL "@[DISPLAY]:shell32.dll".           CALL "@[DISPLAY]:ShellExecuteA" USING                BY VALUE 0,                BY REFERENCE OPEN-COMMAND,&

Problem: Customer is using ACCEPT/DISPLAY statements in a Visual COBOL native program to perform screen I-O. The screen that they have defined is 80 characters by 30 lines.They are displaying data on line 25 and the character that should be displayed in column 79 is being dropped.   Why and how can this be fixed? Resolution: There are several positions on the screen to which error messages and indicators are displayed by the ACCEPT/DISPLAY screen handling module and by default these are set on row 25. You can configure these to display on a different line or column by using the ADISCF utility. Open up a Visual COBOL command prompt and do a cd to your project folder and enter the command: adiscf to start the accept/display configuration utility. Press F2-Alter Press F7 positions Change the locations to the desired ones and then press Enter to return to menu. Press Esc key to return to main menu and then press F4 to save. Press F3 to overwrite current configuration then press Enter

Problem: Customer has a native Visual COBOL application that is using an OPEN to a printer which is a USB printer under Windows.They are setting the configuration option set printer_redirection=TRUE in a cobconfig.cfg file and are setting the environment variable COBCONFIG_ to point to this file.The printer redirection is working correctly and the output from the WRITE statements is successfully be printed. The problem is that the report is supposed to be aligned in columns and these columns are not be aligned properly so they do not match up from row to row. It prints correctly when printing to a printer attached to the LPT1 port. Resolution: Notes: Printer alignment issues on a USB printer most likely have nothing to do with COBOL and have everything to do with what is set as the default font for the printer. If the default font is a proportional font then all characters are not the same width so depending on what characters you are printiing the columns will not line up correc

Problem: A problem was encountered opening indexed files after an application was upgraded from Net Express to Visual COBOL running native code. The SELECT statement was as follows: SELECT ‘filename’ (i.e. no extension specified). Also, INDEXNAMETYPE=2 was set in the file handler configuration file. As a result when opening a new version of a file in Net Express the file handler created an indexed file with the naming convention filename.dat and filename.idx. When testing Visual COBOL it seemed the Visual COBOL Native Runtime was ignoring this directive and was creating just the one file - filename.dat. Some files were temporary transaction files and these were to be removed using the DELETE FILE statement each time the program was run. But in Visual COBOL the .idx file was not deleted when the DELETE FILE statement was executed, and this caused a problem when opening the file later on.   Resolution: The reason this happened was because in Net Ex

Problem: acurcl 7.2 or 8.1 might not start anymore after extend® suite 9.1.2.1 has been installed on the same Windows server. The acurcl (or acuserver) service is created but it does not start.The Windows Event  Viewer reports the following error: Faulting application name: acurcl.exe, version: 7.2.2.0, time stamp: 0x462fed5bFaulting module name: MSVCR71.dll, version: 7.10.3052.4, time stamp: 0x3e561eacException code: 0xc0000005Fault offset: 0x00011da1Faulting process id: 0x14c8Faulting application start time: 0x01cdb77f8a7acc30Faulting application path: C:\\Acucorp\\Acucbl722\\AcuGT\\bin\\acurcl.exeFaulting module path: C:\\Acucorp\\Acucbl722\\AcuGT\\bin\\MSVCR71.dllReport Id: c90bdb71-2372-11e2-8f5d-005056c00008 Resolution: Starting acurcl 9.1 adds this registry entry: HKLM\\System\\CurrentControlSet\\Services\\Eventlog\\Application\\acurcl\\EventMessageFile which points to the 9.1 acme.dll file. Then acurcl of any previous version does not start because it tries

Hi All, I am working on Cobol Ver 5.1.4.0 , Linux  ( 2.6.18-194.el5 x86_64 x86_64 x86_64 GNU/Linux ). Program with following code was compiled successfully, but when execute command  'open output xml-stream',  the file-status value is set as "000000001- " .   Please if anyone can help me with the settings required, for this code to work. ********************** Code *********************        $set p(prexml)  o(dth1.cp) endp  noibmcomp       id division.       program-id. DTH1.       environment division.       input-output section.       file-control.        select xml-stream    assign to "$HOME/myxml.xml"             

I am trying to fill the variable W-SW-VAR1 but i get 0 (zero). Does anyone know why? MODIFY Sr10-MSC-1 DataGrid::RowLabelCount = 1 DataGrid::ColumnCount = 10 DataGrid::RowCount = 1 ChartType = VtChChartType2dPie MODIFY Sr10-MSC-1 Plot::SeriesCollection::Count() GIVING W-SW-VAR1.

Hello  I found there is “Find References” can be selected when I right clilck on a variable. But,the result is only the references in current program When I want to know the references in the project even in the workspace, how do i do Although,i can use Search.but it doesn't have good exactness i want the feature lilke reference in java ， once search，multi-results in multi-programs Please tell me, thank you

Problem: Is Windows Server 2012 supported by ACUCOBOL-GT runtime? Resolution: Version 9.1.2.1 can be run with no issue on Windows Server 2012.Anyway, the first certified release will be 9.2.0, available in next spring 2013.  It is very important to use 9.1.2.1 on this new platform since earlier releases of runtime may have some issues with calls to system functionalities (CALL SYSTEM, CALL C$SYSTEM).#9.1.2.1#AcuRuntime#WinServer2012#Acuthin

Problem: Acubench 9.1.2.1 crashes opening existing projects or trying to build new ones. Resolution: A correction made to Acubench caused a collateral damage in release 9.1.2.1.This bug is now fixed in ECN-WB915.The fix will be available for the first time in release 9.2.0.  Please contact your local SupportLine engineer for further information. #acubench#compile#9.1.2.1#Crash

does anyone know how can i inquire an title from a menu?

The various COBOL and JAVA files used in this article.JVMCOBOLWebServices.zip

Using Extend 8.0 on Windows OS; most of our apps are thin-client, but we have one which writes to server files across the network.  We use a DECLARATIVES section to handle file errors, and part of the DECLARATIVES writes all file errors to a file on the server. If intermittent network errors result in a file error 35 when opening the ERRORLOG file, then we open the file for output. We have a particular desire to open the file for EXTEND instead; however, because this OPEN EXTEND is done INSIDE the DECLARATIVES paragraph, if the file still cannot be opened (it is not declared as OPTIONAL), then it results in a file error, and that causes the program to exit (presumably because DECLARATIVES cannot be performed iteratively). Is there any way around this? Thanks Tony

Recently I was asked by one of our Visual COBOL users how to retrieve a Database connection string for use in an ASP.NET WebForm application. I thought it would be good to put together a small sample and share it on the community site. In many presentations I have done, I have emphasized that Visual COBOL is a .NET language. That means that techniques to do things in .NET can be used in Visual COBOL as well. This is what makes any .NET language powerful. .NET comes with many categories of classes built in that you can use to speed up development. Take advantage of .NET classes with Visual COBOL just like any other .NET language! The sample I have put together really is very straightforward and makes use of some recommended classes and code on Microsoft’s MSDN site. The sample depends on an example connectionString element entry in a Web.Config file. This connectionString element consists of the name of the connectionString, the connectionString itself, and the providerName for th

I tried using that app configuration file that chris glazer sent  (i think that's his name) for another program and it gave me a wrong mode error what modes it suppose to be in the only thing I can think that is different is this line in my code organization is line sequential. im not sure that's any mode or not

Hello, I need to display the copyright symbol ( © ) in a splash screen. The symbol correctly displays when the Cobol program runs in a Linux environment.However, when run in a Windows environment, the symbol displayed looks like an "L" rotated 90 degrees to the right. The splash screen data is held within a .DAT file and I used CTRL ALT C to create the symbol.I tried replacing the symbol with the Hex value (X"A9") but in Windows it just displayed X"A9". What can I do to get the copyright symbol to display correctly in a Windows environment? Thanks,Rita#DisplayCopyrightSymbol

Hi, I am facing a technical problem in calling a native code from a managed code. I have created a native COBOL project and another managed COBOL project, I followed the documentation and no progress!! I would like some help. after I add the native code DLL reference to the managed project I try to call it using CALL "NativeCOBOL" using data-record. and the IDE(Visual Studio) doesn't recognize it despite that I have added the MicroFocus.COBOL.Runtime so anyone guide me please  Best Regards#COBOL#VisualStudio#VisualCOBOLautoscalemodescreenresolution

Ocassionally while generating a program in Acubench we receive a file sharing violation for the .scr. This occurs after making a change on the screen multiple times. It doesn't happen consistently. Some times if you wait a few minutes the lock is removed, other times getting out and back in to Acubench releases it, sometimes not. GHas anyone else experience this? We didn't have this until we upgraded to 8.1.3.   Thanks#acubench

Error 1 Unable to copy file "obj\\Debug\\WindowsFormsApplication3.exe" to ".\\bin\\Debug\\WindowsFormsApplication3.exe". The process cannot access the file '.\\bin\\Debug\\WindowsFormsApplication3.exe' because it is being used by another process. C:\\Windows\\Microsoft.NET\\Framework\\v4.0.30319\\Microsoft.Common.targets 2869

Having an issue when running multiple cobol licenses on the same server.  Occasionally one rmdaemonR drops and further cobol process receive error invoking unauthorized cobol.  At first we simply rebooted the server, but have since found we can clear a file in /tmp to restore the daemon.  Is there any issue with sharing /tmp files between cobol licenses on the same server?  Can the /tmp path be changed per cobol?  Is there anything else that might be causing the daemon to die off? Thank you#linuxcobol