Rocket® COBOL

  #COBOL60 – Shaping the Future of Core Business Applications, Live Webinar am 12. Mai 2020, 10 Uhr Gemeinsam mit dem Meinungsforschungsinstitut Vanson Bourne haben wir Unternehmen zu Markttrends & geschäftlichen Herausforderungen befragt, denen sie sich im Zeitalter der Digitalisierung mit COBOL stellen müssen. Die Ergebnisse in diesem Webinar! #Webinars#DigitalisierungmitCOBOL#COBOL#BusinessApplication

i have converted a netexpress 5.x Project to Visual Cobol to generate a lbr and dllafter converting, i become a error by compiling in dll -> "Can't open Input file oopss.libWhen i take away the oopss.lib in the field link with lib's, i become following error:unresolved external Symbol _oopsverifyobjectChris, what is to do?Thanks very much!

Any Documentation for color FAC assigned to a field somewhere?Currently if I Move this value of 10135429 to the FAC of a field it will change the color to RED.Wondering what other combinations are available.

Hello,Can someone help me and translate these C# instructions to Cobol? public Form1(){     InitializeComponent();     this.FormBorderStyle = FormBorderStyle.None;      this.DoubleBuffered = true;     this.SetStyle(ControlStyles.ResizeRedraw, true);}Rectangle Top1 {     get {          return new Rectangle(0, 0, this.ClientSize.Width, 10);     }}protected override void WndProc(ref Message messages){     base.WndProc(ref messages);     if (messages.Msg == 0x84) // WM_NCHITTEST     {          var cursor12 = this.PointToClient(Cursor.Position);          if (Top1.Contains(cursor12)) {               mess

Integrative Designansätze für die COBOL-Entwicklung : Application Workflow Modeller in der Praxis   An einem praktischen Beispiel wird das Konzept des Application Workflow Modellers (AWM) erläutert und die Entwicklungsumgebung von Visual COBOL / Enterprise Developer for Eclipse um zusätzliche Funktionalität erweitert.   #COBOL#applicationworkflowmodeller#AWM#Videos

Integration der COBOL Entwicklungsprozesse mit dem Application Workflow Modeller   Ausgehend von den gestiegenen Anforderungen an die Software-Entwicklung und einer kurzen Erläuterung des DevOps-Ansatzes wird das Konzept des Application Workflow Modellers (AWM) dargestellt, mit dem die Funktionalitäten der Eclipse IDE in den genannten Micro Focus-Produkten mit wenig Aufwand an die individuellen Bedürfnisse der jeweiligen Entwickler-Teams angepasst werden können. • Integrative Ansätze in der Software-Entwicklung • Kurze Einführung in DevOps-Konzepte • Idee der Modellierung benötigter Funktionalität mit AWM • Erläuterung an einem Kundenbeispiel   #COBOL#applicationworkflowmodeller#Videos

Problem: When compiling an application under Net Express, which uses a "Currency" symbol of "£" in the code it works OK, but when compiling it under Server Express 5.0 it displays the following compilation error messages;    130     currency sign is "ð". *1004-E****************************************************************(   0)* **    Continuation character expected. End of literal assumed. * 120-S********************                                            (   4)* **    Illegal currency symbol   1620 01  w-edit-ret       &nbsp

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 

After I've updated VS2019 to its latest updates and Help library contents, Micro focus Visual cobol documentation section disappeared even from intlisense I've tried the repair method on bot files (vsvc5*.exe and vsvc5_u*.exe) then chose repair.but nothing changed and documentation still not therehow can get the documentation back?I have found similar situation here:/cobol/visualcobol/f/forumid-18/116076/f1-leads-to-cannot-find-requested-topic-on-your-computerBUT the suggested file to be downloaded and extracted is no foundable by me vc50docsvs2019.zipI have tried both microfoucs.com search and google.com search and I could not find it

Currently, when declaring data items, it's sometimes a hassle to declare the correct data item size: I'd like to propose to add a Quick Action to warning COBCH1007 (and similar warnings/errors) that's updating the PICTURE clause according to the provided value. For textual values there may be a list of suggested Quick Actions provided by the proposed feature from which the user may choose. This list may provide options like:X(n)A(n)XXXXXXX...AAAAAAA...For numerical values the corresponding "S" or "9" values should be added ("9" either left or right to an optional "V" PICTURE clause spec).I'm not sure if there are a set of rules for edited numerical values that can be derived from a VALUE clause. If so, there may be a list of suggested Quick Actions provided by the proposed feature from which the user may choose, too.#FeatureRequests#QuickAction

If I place the cursor on W900-CUR and press Shift F12 Visual COBOL won't find any references. However, if I search for W900-CUR I will clearly see that the variable is used throughout the programme. Is this by design?EXEC SQL BEGIN DECLARE SECTION END-EXEC.01 W900-CUR SQL-CURSOR.EXEC SQL END DECLARE SECTION END-EXEC.

Hi PeopleAn Acu4GL START, we populate the where clause unconditionally effectively the where clause built is :           INTEGLOG_STATUS = 'C'  AND INTEGLOG_SYSTEM = 'EDMS'      We are running a single thread and therefore have not felt the need to wrap LOCK THREAD and UNLOCK THREAD around the START as we have in many other cases.This process runs daily and has twice failed on the START with 9D156. Would wrapping LOCK THREAD, UNLOACK THREAD around the START provide any protection?  Full body of code is .....     INITIALIZE POSINTEGLOG-REC.    MOVE 0 TO WS-COUNT-1    MOVE "C" TO POSINTEGLOG-STATUS.    MOVE "EDMS" TO POSINTEGLOG-SYSTEM.* the following START has on 2 different occasions failed with 9D156    PERFORM START-POSINTEGLOG-STATUS-SYSTEM-KEY    IF WS-STATUS NOT = "00"

9d156 sql error on START in Acu4GLI have instances where a simple START with where constraint is failing with 9D156 complaining there is an error near "AND"The code is pasted below, but essentially we setup a where clause before executing the startINTEGLOG_STATUS = 'C' AND INTEGLOG_SYSTEM =  'EDMS'We are running in  a single thread so would not expect to need to LOCK THREAD and UNLOCK THREADeither side of setting the where clause and doing the start.  Would using the LOACK THREAD help prevent 9D156? ...here is actual code    INITIALIZE INTEGLOG-REC.    MOVE 0 TO WS-COUNT-1    MOVE "C" TO INTEGLOG-STATUS.    MOVE "EDMS" TO INTEGLOG-SYSTEM.* the following START has on 2 different occasions failed with 9D156    PERFORM START-INTEGLOG-STATUS-SYSTEM-KEY    IF WS-STATUS NOT = "00"     &nbs

Problem The K4 runtime switch is not documented in Visual COBOL for Visual Studio. Solution The K4 runtime switch (i.e. COBSW= K4) is a holdover from the old COBOL Workbench product. Although it is not documented in Net Express and Visual COBOL for Visual Studio, it is still a valid COBOL runtime switch. The purpose of this runtime switch is to cause runtime system error messages to stay on the screen until a key is pressed. This is useful in batch runs where you want to know if any program terminates with a run-time system error message, or in a system that displays menus, where run-time system error messages can sometimes be quickly overwritten. The description of this runtime switch has been added to the documentation of Visual COBOL 6.0 for Visual Studio. Note: This is already available in the documentation of Visual COBOL for Eclipse.

Problem: In Visual COBOL 4.0 and Visual COBOL 5.0, in an extremely small and limited set of cases, there is an issue running older .NET executables and dll, and older JVM .class files. Specifically, for the problem to occur, ALL of the following must be true. Your application must do an IS NUMERIC condition test on a variable declared with USAGE NATIONAL. The code being run must have been created with Visual COBOL 3.0 or earlier. The code must be run using Visual COBOL 4.0 or 5.0. The problem is that the IS NUMERIC test may give the wrong answer. Solution: The resolution is to recompile any program that uses this construct. In order to resolve this issue fully, in Visual COBOL 6.0 the .NET and JVM COBOL runtimes will reject any program using IS NUMERIC on a NATIONAL item that was compiled with an earlier (i.e. 5.0 or earlier) product, issuing a “missing method” exception. The resolution is to recompile. For the avoidance of doubt, if a program does not use NATIONAL data, it is compl

When the cursor is set to an empty line in the editor, the [HOME] key currently always sets the cursor to the leftmost character of the left margin.I'd like to suggest to have the [HOME] key toggle the current cursor position between the leftmost character of the left margin and the first column right to the left margin (the first coding position) on empty lines (see animated GIF image attached). This behaviour would/should mimic the existing behaviour of the [HOME] key on non-empty coding lines.The suggested behaviour would be helpful, increasing coding speed.

I noticed that with Visual COBOL for Visual Studio 2019 TABs are not retained even though the settings in Tools > Options > Text Editor > Micro Focus COBOL > Tabs are set to use the Horizontal Tabulator character for spacing (see images attached). Doing so, Visual COBOL always misaligns new lines to existing lines with above settings in place.Micro Focus Visual COBOL - Options.pngMicro Focus Visual COBOL - Not inserting TABs.gif

I noticed that IntelliSense support in the ENVIRONMENT DIVISION is quite sparse (see image attached).As far as I can see, there are no suggestions for filling in INPUT-OUTPUT SECTION, FILE-CONTROL or any other sections or content therein.I suggest to fill in the blanks and provide full IntelliSense support for the Environment Division (and other divisions, where applicable), i.e. ...suggesting all COBOL keywords (incl. appropriate division (e.g. ENVIRONMENT DIVISION), section (e.g. INPUT-OUTPUT SECTION) and paragraph (e.g. FILE-CONTROL) names), applicable at the current cursor position, andproviding code snippets for common sections and paragraphs, appropriate at the current cursor position. (I.e. provide FILE-CONTROL code snippets only within an INPUT-OUTPUT SECTION.)

Good morning,as i wrote in my previous post we upgrade our servers from Windows server 2008 to 2016 running in terminal server.We have changed the users Windows name too.We have a version thin client of extend acucobol 9.1.1. and we i copied  the parameter from  the old acuconnect control  panel in the new with the most permissive version:client machine name: *client username : blanklocal username : <same as client>unmask : 002The new users names contains surname.name but for two users (one it's me)the Runtime failed to connect . i noticed that these two users are those with more characters than Others (mine is maurizio.bussalino)Is it possible ther is a limit of characters for the acucobol user name ? in affermative case i read in the documentations that is possible to create an acuaccess file but i don't found any sample to understand what i have to do.I have a second problem too.. I have to schedule a job with a task scheduler but it wants the

I need to write a batch file that goes through all my Indexed files and runs RECOVER on them to clean them up.Anyone have any suggestions on how I would go about doing this? 

Good Morning,i am a developer from Italy that works with acucorp extend 9.1. In these days we have uptated our old o.s. Windows server 2008 r2 to 2016 version without reinstalling extend.Now we have any problem with Runtime (we use acuconnect) but using the editor acubench i noted that is impossible to modify the screen section or working storage or in the files, all the commands are in low density.this problem may have been caused by a parameter that i have modified or it's better to install acubench from the cd ?.Thanks and bye. Maurizio

I regularly hit the Format Document keyboard combination (Menu Item: Edit > Advanced > Format Document <CTRL> <K>, <CTRL> <D>) while I'm programming. It usually fixes a lot of code formatting issues and cleanses the code.Visual COBOL doesn't come with this option yet.Can we please have this option? It should run the following options from Tools > Options > Text Editor > Micro Focus COBOL ...Advanced ("Place 'System' $set ilusing statements first")Formatting > IndentationText Casingjkö#FeatureRequests

When browsing COBOL code quickly with the mouse scroll wheel, it's frequently hard to find divisions, or sections, or paragraphs.The current folding indicators are not much of a help when scrolling because they are set aside the code and they are tiny.I believe the following feature suggestion would be very savvy and useful to have available in Micro Focus Visual COBOL:The user should be able to have border lines displayed above any of these three partitioning syntax elements.This is similar to the VisualBASIC option Tools > Options > Text Editor > Basic > Advanced > Show procedure line separators.I suggest to have a similar feature (and corresponding settings at Tools > Options > Text Editor > Micro Focus COBOL > Advanced) for Micro Focus Visual COBOL.Please refer to the images I attached for visualization of the idea:Code with lines.pngCode Line Options 1.pngCode Line Options 2.png

Problem Evaluating a condition ("A-DATA-ITEM NOT = ZERO" or "? 1 = 2") in the Immediate Window works in managed, but it fails with the following in native: Unable to evaluate the expression. Not implemented The expression cannot be evaluated while in run mode. Solution The Immediate Window is not supported in native code, and there are other ways of querying values, i.e. the Watch List, QuickBrowse, etc. The expressions such as "A-DATA-ITEM NOT = ZERO" or "? 1 = 2" work in managed code and return TRUE or FALSE. As for native code, the Watch List or Quick Browse should be used instead, so the value will be displayed when entering the name of a data item, but not anything beyond that. For anything else, an error message will be displayed, but the debugger will continue to run normally. However, an enhancement to the compiler has been made in Visual COBOL 6.0, which enables some additional functionality when debugging. For example: 1 a pic 999 valu

i have take the mf demo program ftpprogram.cbl from 2006 (from Fano "Raz" / Product Group / Micro Focus) and actualize with the actual "wininet.h"i had no Problem to program "FtpFindFirstFile", but for find the next files with "InternetFindNextFile" i will have Problem/no Results.Who has find a solution and have interest to work on the new Features to code this in Cobol?Thanks for help!