Rocket® COBOL

Problem UNIX Visual COBOL for Eclipse won’t start   Resolution After investigation see below, for Oracle Linux 6.2. Need to instal these packages using yum.   yum install gtk2-2.18.9-6.el6.i686 yum install PackageKit-gtk-module-0.5.8-19.0.1.el6.i686 yum install libcanberra-gtk2-0.22-1.el6.i686   Then eclipse will start okay. [support@nwb-ora62sup bin]$ pwd /home/products/vceclipse21/bin [support@nwb-ora62sup bin]$ . ./cobsetenv COBDIR set to /home/products/vceclipse21 [support@nwb-ora62sup bin]$ echo $JAVA_HOME /usr/java/jdk1.7.0_13 [support@nwb-ora62sup bin]$ java -XshowSettings 2>&1 | grep "sun.arch.data.model"     sun.arch.data.model = 32 Needs to be 32 bit [support@nwb-ora62sup bin]$ eclipse Starting Eclipse at Display localhost:10.0    Please Wait... Investigation Just failed to start no error at all using normal user Try as root user you should get some errors on the console. See this article http://www.eclipse.org/fo

Problem Error “COBCH1501S Insufficient memory” Need to adjust Xms and Xmx settings in eclipse.ini Solution If you are doing large projects it is a good idea to increase the java HEAP size for your eclipse installation. There is a file in the eclipse directory eclipse.ini that needs changing To find this file Look at properties of visual COBOL start menu Select properties And highlight the start in directory This should contain something like this.    C:\\Users\\Public\\Micro Focus\\vc21upd1pkg70439\\eclipse Open window explorer and navigate to that directory. In this directory edit the file using a editor I use notepad change –Xms and –Xmx settings There are many thoughts on values to use here maybe 512 fo Xms minimum size of memory And 1024m for Xmx maximum size of memory or 1g To look like this Now close down eclipse if open and start eclipse again so we can check the settings have been applied. Go to help>about eclipse Then installation Details Sele

Problem: Customer has an ASP.NET Web application written in Visual COBOL which does a call to an unmanaged COBOL .dll.The .dll is located in the web applications bin folder along with the calling program yet when a call is made a 173 error "Program Not Found" occurs.How can this be resolved? Resolution: When an ASP.NET application is run, the sources for the web pages are moved to a temporary location, compiled and run from that temporary location so the default folder is no longer the bin folder..The unmanaged .dlls are not moved to this temprary location so the web application needs to know where to look for these files.It is therefore necessary to place the location of these unmanaged .dlls within the PATH environment variable.This can be done directly within the web applications web.config file by right-clicking on web.config in Solution Explorer and selecting the Edit option.You can then add the PATH environment variable and set it to the value of the folder in which you

Problem Customer has created an ASP.NET Web Application in Visual COBOL which needs to do a P/Invoke call to an unmanaged COBOL program by using the following code:01 pp   procedure-pointer.01 next-prog   pic x(20)   value "myentry".     set pp to entry "DECHANGE"    call next-progThis works fine if the program is debugged using the Visual Studio interner Development Web Server but when the Web Server is changed to use Local IIS instead the following error message is displayed when executing the set pp to entry ... statement: Why? Resoulution: This error occurs because when running under IIS you must link the unmanaged COBOL .dll as dynamic instead of Shared on the COBOL Link option tab of the Project Properties page.This is because the search mechanism for the COBOL run-time system cblrtsm.dll is different when run under IIS. The error occurs because the run-time system cannot be found.When linking the pro

Problem: The license file created by Activator needs to be in the AcuGT\\bin directory because that directory is shared out  to run on other PCs via a mapped drive.  The Activator puts the license somewhere else, then it must be located and moved to that bin directory. Is there a way to create the license directly in the bin directory? Resolution: Beginning in version 9.0 the Activator creates the license in this directory: C:\\ProgramData\\Micro Focus\\extend\\9.0.0\\x86 (or x64 for 64-bit installations) For Windows XP it uses: C:\\Documents and Settings\\All Users\\Application Data\\Micro Focus\\extend\\9.0.0\\x86 To select a different destination simply use the Activator command line options: activator /DESTINATION=C:\\Program Files (x86)\\Micro Focus\\Acucbl900\\AcuGT\\bin /PCODE= <code here> /PKEY= <key here> /DIALOG=NO#license#activator

Problem: When running a program via Thin Client a push-button on a non-active window must be clicked twice before the button activates. The first click activates the window and the second click activates the push-button. When running “normally” (not with Thin Client) the push-button activates on the first click. Resolution: In a Thin Client environment the CMD-ACTIVATE events are delayed until after the Windows notification routine receiving the event has completed. To allow the user access to activate push-buttons on non-active windows a configuration variable must be set. In the Runtime configuration file add TC_DELAY_ACTIVATE 0 to turn off the delay.

Problem In .Net how can COBOL find out the regional settings that are currently in use for a class.   Solution The .Net Framework provides the class System.Globalization.CultureInfo that allows you to obtain regional characteristics. Some sample code that uses this class is:-   $set ilusing"System.Globalization" program-id. Program1 as "CurrentCulture.Program1". data division. working-storage section. 01 Cult type CultureInfo. procedure division. ***** Obtan the Culture Information from the Current Thread set Cult to type CultureInfo::CurrentCulture ***** Display some Values from the Culture Class display "Current Locale= " Cult::EnglishName display "Current Date and Time Format = " Cult::DateTimeFormat::FullDateTimePattern display "Currency Symbol = " Cult::NumberFormat::CurrencySymbol display "Decimal Indicator = " Cult::Number

I accidentally stopped the Relativity Data Manager, and now I can't figure out how to re-start it.   I tried rebooting my PC thinking that it would automatically re-start when my PC rebooted, but that is not the case.   When ever I try to run Relativity via the Designer, or via Excel I get the following message: Error -4151 communicating with Data Manager Monitor (Error 0002). I tried running the Data Manager Monitor that is in the Relativity Folder, and the message I get is: Error communicating with Monitor Service Pipe not found \\\\.\\pipe\\Liant_Relativity_Monitor_Pipe Anyone know what I need to do??? 

Hi,   How can I do this in COBOL ? List  testList = new List(){"jack","henry","lisa","sandy"};   Best Regards#COBOL

Hi, Is there a way I can add prefix to a record and it's correspondent items when I copy the copybook into the working storage section ? Best Regards

Hi, i remember this error from a year ago, during test of MF cobol for Eclipse. I tried to find solution today, no luck with google, our forum or KB. So there it is, Use case; ****cobol code: FILE-CONTROL. SELECT DDEING ASSIGN TO AEING. *was UT-S-DDEING SELECT DDBERKA ASSIGN TO ABERKA. *was UT-S-DDBERKA ***** ***** DATA DIVISION. FILE SECTION. * FD DDEING RECORDING MODE F LABEL RECORD STANDARD BLOCK 0 RECORDS. 01 DDEING-REC. 05 DDEING-ELEM PIC X(2). 05 DDEING-REST PIC X(498). FD DDBERKA RECORDING MODE F BLOCK 0 RECORDS. ... OPEN INPUT DDEING                   <-- error 13 file not found OPEN OUTPUT DDBERKA I have following additional directives(error occures also without additional directives) ; DIALECT(ENTCOBOL) INITCALL"ORASQL8" ASSIGN "EXTERNAL" copyext"cpy" hostarithmetic PERFORM-TYPE"OSVS" signfixup IDXFORMAT(8) nolist and following env. var.; AEING ->  "G:\\Entwicklung\\mfes\\TPO\\Data\\LEM\\TS64004.QUACON.DDZMV.DAT"

We used to get this issue but now it came back. I have users that get an Upgrade to IE 5 or higher when they try to print from our Thin Client app. I copied the latest AcuBenchPrint.dll ot the correct directory on their pc but that still doesn't work. Anyone have a fix for this?

In the CICS API for Visual COBOL, the ROUTE call isn't supported. Does Micro Focus have a recommended work around?

Problem: Paged grids may not work correctly anymore with Thin Client 9.1.2.1.Usually, these grids are loaded using the following syntax: MODIFY grid-handle, ACTION = ACTION-FIRST-PAGE Starting with release 9.1.2.1, runtime does not enter automatically in the Event section and the grid is shown as empty. Resolution: Add the following environment variable in the runtime configuration file (cblconfi): ECN_2425 FALSE By default, ECN-2425 is enabled. This ECN refers to an enhancement developed to give a performance improvement to the Paged Grid control.  When you disable this ECN you no longer get the performance improvements (although slightly noticeable with the latest releases of ACU runtime) and the ACTION-FIRST-PAGE event is managed correctly.#9.1.2.1#Pagedgrid#Acuthin

Problem: Invalid or missing parameter to "M$ALLOC" COBOL error at 000021 in XZ_MOP Resolution: XZ_MOP is a module of XZOOM, a third-party tool once provided to ACU customers to open and review Vision files. Since this is a very old tool it is no longer supported. A possible workaround to fix the reported COBOL error is to recompile the whole tool using one of the latest versions of the compiler: 8.1.3.1 or 9.1.2.1. This of course requires the possibility to have the COBOL source code of the tool itself. Since this tool is quite old, it may be that it was originally compiled with old versions and/or with even older retro-compatibility options. I.e.: release 6.2 and "-z52 -Dv=32". The solution usually is to recompile XZOOM with recent compilers, removing the -zNN -cNN compiler options. Another reason that may cause COBOL errors at run time is the bit version of the compiled objects. In the previous example, the compiled objects were compliant with 32-bit servers, but not with 64-bit

PROBLEM Using CBL_COPY_FILE returning status-code. 0 = successful non-0 = not successful Is there a way to interpret the value of status-code to determine the reason for the failure similar to the file status and extended file status? RESOLUTION Actually, the value returned for status-code if used or in the RETURN-CODE special register is a file status code. You can check the success of the call by examining RETURN-CODE. Interpreting the return code as a file status code If any of the routines CBL_CHECK_FILE_EXIST CBL_COPY_FILE CBL_CREATE_FILE CBL_DELETE_FILE CBL_OPEN_FILE CBL_READ_FILE CBL_RENAME_FILE CBL_WRITE_FILE CBL_CHANGE_DIR CBL_CREATE_DIR CBL_DELETE_DIR CBL_READ_DIR fails, the RETURN-CODE register contains a file status value indicating the failure. This file status is always the standard ANSI'74 file status value. If no ANSI'74 file status is defined for the error, an extended file status is returned (9/nnn where nnn is the run-time system error number). You should, th

I set up to use Team Foundation Service, which is Microsoft's cloud based version of Team Foundation Server.  I've set up a build definition that does a build when I check in program changes but it always gives this error: The imported project "C:\\Program Files (x86)\\MSBuild\\Micro Focus\\Visual COBOL\\v1.0\\MicroFocus.COBOL.targets" was not found.  Confirm that the path in the <Import> declaration is correct, and that the file exists on disk. All Visual COBOL project files have this line:  <Import Project="$(MSBuildExtensionsPath)\\Micro Focus\\Visual COBOL\\v1.0\\MicroFocus.COBOL.targets" /> Team Foundation Service Build is still in preview which means Microsoft is still making improvements to it.  Has anyone successfully used it?  How would we go about getting Microsoft to add support for Visual COBOL ? Is Team Foundation Server a better choice at this time ?#VisualCOBOL

Hi, I am using Managed COBOL on .NET and I fetch a list of customers from the Oracle Database and then add them to a list of type List[Customer] the problem is at the debug everything is okay and the list is 100% filled with the right objects with the right values and when it's returned to be set to another list on the other also managed project - I've separated the business logic from the desktop view in two projects- the result is having the list filled with the object of the last entry of the list that was originally fetched for example if the list has the values  1 2 3 4 the result of returning the list is  4 4 4 4 and I repeat at debug time every thing is okay at the business logic project!! could anyone please tell me what's going on ?? Best Regards#COBOL

This article describes Java constructor throwing exception issue when calling Java from OO COBOL. Problem: Before the delivery of Net Express 5.1 Websync2, it was not possible for an OO COBOL program to consume a Java class's constructor that throws an exception. This has been fixed in Net Express 5.1 Websync2. The COBOL Code which creates an instance of JAVA class SimpleClass appears below. It is also attached to this article. ExceptionCatcher.cbl $set ooctrl ( p-f) program-id. ExceptionCatcher. class-control. SimpleClass is class "$JAVA$SimpleClass" EntryCallback is class "entrycll" JavaExceptionManager is class "javaexpt" ExceptionManager is class "exptnmgr" javasup is class "javasup" . working-storage section.& procedure division. *>---Set up Exception handler invoke EntryCallback "new

Hi, Is there a way that I can upgrade my current Visual COBOL PE for VS2010 to PE for VS2012 ? Best Regards#VisualCOBOL

Hi, Using the example below is it possible to check the file / path exists and/or is available. 1) In order to produce an invoice I "import" a company logo to produce a pdf that gets printed. 2) the company logo is stored in the following location //192.168.123.456/Shared/Data/CompanyLogo.jpg However if the path or filename doesn't exist then the program seems to hang for 1 minute or 2 before carrying on. So my question is - is there a Cobol way to check the file or path exists first, which is hopefully quicker, before I try and attach it? Many thanks Neil.

I am new to Visual COBOL and I want to create a simple winform (managed COBOL) that will read an AcuCOBOL vision file located on a windows machine. Are there any small examples out there where I can see how to set up a program that will do this?   Thanks in advance#AcuCobol#VisualCOBOL

Hi, I would like to create a core dump, but it doesn't work. I set the core_on_error to 1 and in a second try to 2, but there is no cora dump after a divide by 0 in a cobol-program.What is to do to create a core dump?We are using Server Express. Regards, Michael      

Hello all, I'm using a MS Rich Textbox Control 6.0 and trying to handle the exiting from a subwindow with keypress event. All is ok (i detect the esc key and that) but when the subwindow is closed, the parent window turn crazy constantly detecting a event termination (96) and window get freezed.  I try two things: * Ef-Rtf-Ev-KeyPress.   call "C$GETEVENTDATA" using EVENT-CONTROL-HANDLE, 5aux   end-call   cancel "C$GETEVENTDATA"   if 5aux = Tec-Exit      destroy Screen1-Handle       perform Acu-Exit-Rtn    end-if    . In this case, the runtime ends beacuse the program reachs stop run line in the acubench generated prodecure acu-exit-rtn that normally don't get executed, but in this case yes: Acu-Exit-Rtn.   PERFORM Acu-Close-Files   PERFORM After-Program   EXIT PROGRAM   STOP RUN . When i do this:  *Ef-Rtf-Ev-KeyPres

PROBLEM: Customer has a native Dialog System application that displays a window on which an ActiveX control resides. This native application displays this Dialog System window and then calls a managed code .Net WinForm application that displays a Windows Form which also has an ActiveX control on it. When the program does this it gets the following exception:     Application Exception  A device attached to the system is not functioning. What is causing this to occur? RESOLUTION: Try setting the following environment variable in your computers environment MFOLECL_NO_THREAD_INIT=ON This is a problem that is caused by the Micro Focus native OLE support calling CoInitialize on a thread that it did not own, mainly the managed code thread.If this environment variable is set the OLE support will not try to initialize a thread that it does not own.