Rocket® COBOL

I posed a similar question a few months back but I did not get the responds that I was looking. Is there a way to implement a timeout feature in WinForm? What I am trying to accomplish is to display a form for about 5 seconds and then have the form close by itself without user intervention so that it may continue running the program. I read an articles at the following address: https://social.msdn.microsoft.com/Forums/vstudio/en-US/719cb7c9-afad-4d88-968d-2be7b4da0e39/how-to-implement-a-timeout-feature-in-windows-forms?forum=winformsBut it pertains to C#. Any ideas on how to achieve this in managed COBOL? I tried doing the following in the ‘Activate’ event of my form:        method-id TPS0021J_Activated final private.       procedure division using by value sender as object e as type System.EventArgs.            invoke type System.Threading.Thread::Sleep(3000) &n

I'm using COBOL via Visual COBOL 2013 4.0 to access a MySQL Community 8.0 database. MySQL for Visual Studio 1.2.8, using OpenESQL to connect, Managed COBOL.The core of my database is a 3-record hierarchy, joined by indexes, the bottom table of which holds variable-length line data, defined as TEXT. My maximum text line is 7060 bytes. I have an application that processes lines of any length perfectly happily through this structure, generating a converted output that clearly 'sees' and processes every byte in every row. However, a parallel process that dumps out the raw data for comparison is losing rows from the cursor where the TEXT length in the row is greater than 1024 bytes.select (...),left(prop_line,1024)    **********from program_node pnodeinner join element ele on ele.ele_id = pnode.ele_idinner join property prop on prop.ele_id = ele.ele_idinner join property_line pline on pline.ele_id = prop.ele_id and pline.prop_id = prop.prop_id   &nb

We are still using dialogue system screens for the most part.I have a screen with a list of reasons users can select, but they want to be able to insert variables into some of the reasons:  For example, on reason three, user would want to fill in the nnnnn to indicate the cost of painting the house.  Can this be done with a list box?------------------------------------------------------------------The house was greenThe house was redThe house was yellow and cost nnnnn to paint.The house was white--------------------------------------------------------------------#dialoguesystem#listbox#variable

Hello, can you help me with the following problem? We have an old client / server application using C / S Binding technology (client=Windows, server=linux or windows). We use Net Express and Server Express for development. Now we want to migrate to the Visual Cobol 5.0.What tools do you recommend? Is Visual Cobol Development Hub 5.0  a standalone product or I need to have a Visual Cobol 5.0 for Visual Studio 2017 or for Eclips? Is C/S Binding technology a part of mentioned products? If not,  is it available for free download or is it necessary to buy it?Thank you for your answers, Petr 

Question Is it possible to provide general information about running the various brave (*.bj) scripts that come with the product. Answer There are some general points to make about using the brave scripts. The full list of bj scripts that can be used are documented in the ‘Using Batch Scripts’ help topic. The scripts can be found in the <CA Install directory>\\Scripts\\BRP directory. Ensure that all parameters that are passed to the brave match the documentation as in upper, lower or mixed case as seen within the docs as all of the scripts are case sensitive. Ensure that you enclose all parameters with double quotes, as spaces will terminate a parameter. This becomes important when passing a spacey name as a parameter. You must pass at least three parameters to brave. The first parameter to brave is always the script to run. The second parameter is always the log file to be generated. The third parameter is always the workspace to use. The other parameters are specific to sc

Problem When running a Cobol Analyzer (CA), error 2753 (screenshot below) is reported during the running of the EA module rescan. This means that the Hot Fix is not installed on the machine. Resolution In the support line downloads section of the Micro Focus site, it states that the CA Hot Fixes are full installs. What this means is that they use the normal install method when the Hot Fix executable is run. It does not mean that they contain the full product plus the Hot Fix. The Hot Fix requires that the relevant CA product is already installed on the machine before the Hot Fix can be applied. The error reported is that the rescan.exe which is part of the CA product, but not included in the Hot Fix cannot be found on the machine. To resolve this, install the relevant base CA product, which can also be downloaded from the support line site and then reapply the Hot Fix. SI # 3193161

Problem After applying Windows security updates Cobol Analyzer (CA) Administrator GUI and the main Cobol Analyzer GUI will not start. Resolution It has been found that applying anyone of the following list of Windows updates, on the relevant of Windows environment stops applications written in Visual Basic v6 from running. As all of the CA GUI’s (main tool, admin tool, pre-request checker and Architecture Modeler) are all written in VB 6, they are affected by this.  To resolve this run the relevant optional update for the Windows environment being used.   List of Windows environments and fixes that cause the issue: Windows 7 and Windows Server 2008 R2: KB4512486and KB4512506 Windows 8.1 and Windows Server 2012 R2: KB4512488and KB4512489 Windows 10 version 1507: KB4512497 Windows 10 version 1607 and Windows Server 2016: KB4512517 Windows 10 version 1703: KB4512507 Windows 10 version 1709: KB4512516 Windows 10 version 1803: KB451

Problem : Is it possible to install Cobol Analyzer without installing the Administration Tool functionality ? Resolution : Installation of the Cobol Analyzer Administration tool is not optional. The Administrator tool is always installed. To remove the Administration Tool, delete "C:\\Program Files (x86)\\Micro Focus\\Enterprise Analyzer\\Bin\\RescueAdmin.exe" . This is located in the <installation>\\bin  folder.   Incident# 3139241 #AdministrationTool#Installation

Problem : Does Enterprise Analyzer/COBOL Analyzer support Oracle 12 as its repository ? Resolution : Enterprise Analyzer does support Oracle 12g as its repository COBOL Analyzer only supports MS SQL as its repository Incident# 3158958#MSSQL#Oracle#Repository

Is there a way to exit a form and continue with the program without closing the form? It seems that the only way to continue with my program is to close the form. My program calls the form as follows:INVOKE TestForm::ShowDialog.Continue Program In my form, I have the following code in order to exit the form and continue with the program:           if e::KeyCode = type Keys::End              invoke self::Close           end-if. But I wish for the form to remain visible(not closed) and continue with my program. I tried :           if e::KeyCode = type Keys::End              invoke self::goback           end-if. But this command just goes back to the

 read more at webcasts COBOL – Here’s to the Next 60 Years   The application development language, COBOL, turns 60 this year. September 1959 saw the first mention of the technical acronym “COBOL”, which was then adopted as the name for the language being specified and developed....   #Other#applicationdevelopment#COBOL

I get twice a day an utf-8 fileI try to convert it with: move function display-of (function national-of (input), 1252) to outputBut the output looks like the intput.Does somebody know a solution.  

Installed Visual COBOL for Visual Studio 2019 on Windows Server 2012. I have created a project and loaded my COBOL program which has PROCEDURE DIVISION USING parameters. These parameters were declared in Linkage Section. I have set the Configuration as "Release" and Platform as "x64". I want to generate a 64-bit dll which will be accessed by Smalltalk application in 64-bit environment. We had a 32-bit dll from same COBOL program which is working fine with 32-bit Smalltalk application. Could someone help?Regards,Rahul KK

This is obviously not a significant issue, but simply to advise you that certain links in the Visual COBOL 5.0 Release Notes are not currently working.  In the passage(s) (may be more than one passage):"See this information on the Product Documentation pages on Micro Focus SupportLine, in the product help for Visual COBOL for Visual Studio 2017 (click here) or Visual COBOL for Visual Studio 2019 (click here)."... the "click here" links are not currently working.This is not to say that I have tested all the links and all the others are working, but simply to let you know about these two.Thanks,Austin   

Hi Is there anybody who have run Thin client on a Mac computer?I believe not while I have asked around!!!But have you invented something smart. Of course there is Terminal Server, but it makes the solution much more expensive?Best RegardsSteen 

Using the 2019 versions of the above, I have a problem. I have a project (MAIN program calling several SUB progs (.dlls)). Last week it was working as designed.Today 2 things are happening. If I Start without Debugging the program completely ignores MAIN prog and the required SUB.dll and runs another .dll (which is just a stub since not yet completely programmed.)If I set a breakpoint in MAIN prog at the initial PERFORM (i.e. to select which function is required) the program stops correctly. When I hit F11 to step through the program freezes and I have to use Task Manager to exit VC/VS.I have made no changes to the application so I cannot understand why this is happening. Expert help required Thanks.

Problem:From within a Windows Forms  application, when a button is clicked the program would disable the button and then perform the task associated with the button from within the button  Click event handler. If this is a long-running task then the UI thread can become unresponsive and start queuing events, even for those such as a mouse click on the disabled button. When the button is enabled again the queued events would be run and the event handler code would be invoked again in error. Solution: This demo shows one possible method of avoiding this scenario by executing a long-running task by creating a BackgroundWorker thread and running the task separately from the main UI thread. In this manner the UI thread is free to keep processing events and the BackgroundWorker thread can report its progress and also be canceled if need be.                      The zipped up Vi

What is the command to detect if the key that was pressed was numeric (e.g. 0 – 9) on a Windows Form? Or conversely, if the key that was pressed was NOT numeric? In C# the command is something like:if (!char.IsControl(e.KeyChar) && !char.IsDigit(e.KeyChar)

I uninstalled my PE 4.0 via the Control panel.When I execute VCE_50.exe it immediately gives me an error:0x81f40001 Visual Cobol 2.3 must be uninstalled before V5 can be installed. I haven't had 2.3 in years. Please provide assistance. Thank you,Warren Mundy

Micro Focus@MicroFocus     What's the first rule of #COBOL Club? What COBOL Club?Exactly.https://bddy.me/33p8TZW  #FightClub #COBOLrocks   RT to your followers to invite them to join our COBOL FB group   #Announcement#COBOL

I am trying to display a label control with the date field 07/23/19 but I instead get 72319 (I do not want the use to pick a date just simply to display a date to the user).  I believe there is a way to mask controls in windows form in order to get date fields and phone numbers but I am unsure as to the specific syntax for achieving this. I have attempted the following: set lbl-DATE::Text type MaskedTextBox:: This line of code, however, is either incorrect or incomplete.

The links eventually guide me to download vcvs2019_50.exe but it demains VS 2019 which I do not have. 

If I compile cobol programs in gnt format on windows server 2012 can I deploy this gnt in Cobol Server on Windows 2016?thanksbye

Are there a directive allowing this?

I'm trying to develop a project where a main program (say MAINCBL) accepts options and then CALLs sub programs. I created a MAINCBL solution and then added SUBPROG to the solution.MAINCBL works fine but when I call SUBPROG I get an error message: 'Called program file not found in drive/directory: SUBPROG'.  Both MAINCBL.EXE and SUBPROG.EXE are in my \\bin\\x86\\Debug directory so I'm at a loss to know what's wrong.I changed the Application properties to Output to: Multiple Executables (not sure if this correct so please correct me if not.)Thanks