Rocket® COBOL

Hi everyone, we recently tried upgrading one of our dev environments from VC 7 pu 04 to VC 7 pu 05. ("setup_visualcobol_devhub_7.0_patchupdate04_290113_suse_x64" -> "setup_visualcobol_devhub_7.0_patchupdate05_290480_suse_x64") We use the option  "4. Manual License Installation." as license activation mechanism from /var/microfocuslicensing/bin/cesadmintool.sh Unfortunately we ran into some licensing issues regarding the MFSafeNet.service, after installing the newest VC 7 pu 05 Version. We get a licensing error, when running cobol programs, eventhough the license still is registered. We had no similiar problems with VC 7 pu 04. Execution error : file ''error code: 247, pc=0, call=1, seg=0247     Licensing error (Error[5]: Cannot talk to the license server on host "127.0.0.1". Server may not be running.) Apparently the systemd service "MFSafeNet.service" only starts the "lserv" now, but not the "mfcesd" process anymore: VC 7 pu 04: systemctl status MFSafeN

I uninstalled and reinstalled Visual Studio 2019 to try to get rid of this error and it persists, and fails to create a new .  After reiinstalling Visual Studio, I started the vcvs2019_60 installer and chose the Repair option. After I create a new COBOL project in Visual Studio, the license message re-appears and the new project is abandoned and is never created. Any ideas?

I am using Extend 10.4.2.  The Programmer Guide describes various HTTP commands, including Get, Post, Put, Delete, etc.  But I cannot find one for Patch.  is that available?  The resource I need to update only allows Patch...#RMNet#extend

i am getting a runtime error "Load error : file '_EXTNAME'". I am using external Variables. Ubuntu cobol server 7.0 (Update 4). On V6.0 it works fine. Is there a path or a file missing?

In my program, I am using an Enter Key to work the same as a Tab key, from what I have read on the Internet, it tells me to use the MoveFocus In C#, the command is this:  new TraversalRequest(FocusNavigationDirection.Next)) SO I tried with the highlighted code below, but I can't get it to recognize the Next.  I know I have this written wrong -what is the correct way to write this? (I am using WPF for my screens)        entry "WPR_AP110000_F_DUE_DATE_KEYDOWN" using by value sender e_key.           PERFORM SET-LINKAGE.       AP110000-F-DUE-DATE-KEYDOWN.           move e_key::Key to WOW-KEY-VALUE.           MOVE WOW-KEY-VALUE TO WIN-KEY.           IF WIN-KEY = type Key::Return      &n

Hi I installed MF Visual cobol for eclipse but I didnt get BANKDEMO tutorial to practice. Can someone share BANKDEMO code? Thanks#MFVISUALCOBOL

Hello, There is a problem when opening a workspace from a previous version of Acubench, particularly Acubench 10.0.1. Although I can open the .evt and .cbl files without any problem in Acubench 10.4.1, when I click Form1 to open it, sometimes Acubench crashes, and sometimes it doesn't.  I enclose the project for additional help. I am working with ACUCOBOLGT 32-bit, ACUBENCH 32-bit and WINDOWS 10 PRO 64-bit. community.microfocus.com/.../Packing.zip #Windows10#ACUBENCH10.4.1#Crash

Hello all and have a nice new year, I would like to create a variable, so as to use it as an equation of PHYSICAL-COLUMNS instead of (1, 2, 3, 4, 5). I have created the below variable 01 WS-ARRAY-ST.   03 FILLER PIC X VALUE "(".   03 WS-ARRAY OCCURS 5 TIMES.      05 WS-VALUE PIC S9.      05 WS-COMMA PIC X(2).   03 FILLER PIC X VALUE ")". but when I applied it to the below command MODIFY Form1-Gd-1, PHYSICAL-COLUMNS = WS-ARRAY-ST it does not work at all. Is there any way to substitute the list of PHYSICAL_COLUMNS with a variable?#list#PHSICAL_COLUMNS#Grid

I hope I'm in a good sub for this... I'm trying to find a static code analyzer for visual cobol that can scan against PCI security regulations. Has anyone run into this? The best option I've found so far would be Yasca, but I would have to define my own rule-set and I just don't know enough about cobol or PCI to do that. https://nox.tips/

As often happens with Cobol systems, we have developers with only a few years of experience working on a codebase almost as old as they are. They are developing with Microfocus NetExpress and there's little desire to switch IDEs, although Eclipse might be an option. I'm keen to introduce automated unit testing to grow and expand the legacy code coverage, reduce risks after changes and shorten the feedback loop after commits. I know the options are limited, and some are simpler to adopt than others. Is anyone using Microfocus NetExpress to develop Cobol doing any automated unit testing? If so, what tools are you using? Ideally, I'm after recommendations from your own personal experience.#cobolanalyzer#MicroFocusCOBOL#CobolAnalyzer

Just starting into HTTP POST calls (I am at 10.4.0) and was hoping to find a sample program, preferably including JSON Generation.  It's a two step process, get a token first (with userid, password, etc) via a POST and then generate the JSON data and do a second POST with data.  There is a sample program called TempConv but it uses XML which generates the request payload with pointer, but the JSON generate doesn't seem to have that.  trying to connect the dots.  thanks!#HttpPost

I’m a retired IT professional and am interesting is experiencing some of the fun I had in the late 70’s and early 80’ writing and maintaining COBOL applications. Back then my programming was done on a mainframe but since I don’t have access to one of those, I’d like to use my Windows desktop. I’ve used Visual Basic, Borland Pascal, and recently Delphi to write event-driven Windows applications so I am somewhat familiar with writing Windows applications. I have done virtually nothing Object Oriented and I am disinclined to learn it.  I recently purchased Micro Focus’ Visual COBOL Developers Guide to Modern COBOL and installed the personal/community versions of Visual Studio and Visual COBOL and was immediately taken aback. It appears that in the last 40 years COBOL and transformed into a fully OO language. Can you use Visual Studio and Visual COBOL to write non-OO, structured, event driven, Windows applications? I am open to using an older

I have trouble computing two numbers where one can be a negative number. All numbers are kept as text.What is happening... All the values are kept as text in the field of type PIC X(...) VALUES SPACES. I have a procedure that will find the start of the value. For example: _ _ _ _ _ 2 3 4 . 32_ _ _ _ _  - 19. 32  (can be also negative number)  ( underscores are representing spaces) Adding, subtracting, multiplying, dividing everything works fine with a positive number. IF I got a negative number the program will break.MOVE "_ _ _ _ 2 3 4 . 3 2" TO NAZIVPERFORM SEC-LENSEC-LEN will give me two informations 1) whare are the first number position from left - PCP                                                                2) what is the length of the number - DUZFor the above example, PCP is 5 and DUZ is 6

Hello, I am integrating our application with an existing online application and I have the following problem: Communication is done correctly and the response comes in JSON format. When I make the request and the response has only one record, I've already been able to access the data for that record. The problem occurs with the execution of the instruction and the answer is several registers. The example is importing existing reservations in the online application and the answer is four records. I cannot convert this data to four records that can be "worked".In this case I'm using the RestSharp interface Once again, I ask for your help in solving this problem. If you want, I can send the example I'm using. Best regards Alberto Ferraz

Hi, we use multiline entry fields like this: 01  t01-table. 02  t01-record occurs 99 indexed by t01. 03 t01-text pic x(80). 02 entry-field using multiple t01-record use-return ... Every line of the entry-field is a record in the table. But is there a way to tell if the "line break" results from a word-wrap or if the user has hit enter ?

New atw-script control for use with AcuToWebECN-4662 New atw-script control for use with AcuToWeb (microfocus.com) EVALUATE EVENT-TYPE WHEN NTF-ATW-EVENT EVALUATE event-data-1 WHEN 1 modify js1 CALL("googleMaps")NTF-ATW-EVENT is obviously a level 88 variable. What is its value?#NTF-ATW-EVENT

I have downloaded Visual Cobol for Visual Studio 2019 to today. The activation failed with error message "Error installing licenses. Unable to autorice a licence using supplied authorization code " Authotization code is 2021xxxxxxxxxxxx. I understand very little English. Thank you!!! 

Hi all, How can the following VBA code be written in COBOL? Dim OutApp As Outlook.Application Dim OutMail As Outlook.MailItemSet OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail   .To = "address@dot.com"   .Subject = "test "   .SendUsingAccount = OutApp.Session.Accounts.Item(2)   '.HTMLBody = "test"   .SendEnd WithSet OutMail = Nothing Set OutApp = Nothing In other words, I want to send an email using NOT the default account. In the example above, I want to use the second of the collection of accounts. This has been asked three times in tha past but with no answer... Thank you.

Hi folks. I hope somebody can help me with this problem. I am working on maintaining a large program. The problem which I have is related to printing documents. On the computer are installed two printers:1) Bullzip PDF Printer2) HP LaserJet (default printer) I had successfully called printer dialog, chose Bullzip PDF Printer for printing. The only first document was printed with Bullzip printer, all other documents are printed with HP LaserJet without showing printing dialog. Here is my code: PRNW-OPEN.*-------- move 1 to Prn-Flags. move 0 to Prn-WinHand. move "Greska kod OPEN Printera !!! " to Prn-Errtxt. MOVE 128 TO Prnw-len. MOVE PrnDoc-naz TO Prnw-InCHR. PERFORM PRNW-Title-Len. IF Prn-IndOPEN equal zero THEN; CALL "PC_PRINTER_OPEN" using Prn-Handle, Prn-DOC, by value Prn-Flags by value Prn-WinHand returning Prn-RetCode. if Prn-RetCode not equal zero PERFORM PRNW-ERR. MOVE 1 TO Prn-IndOPEN. move zero to Num-Lin. What I want to achieve is:1) to choose in the

Environment AcuToWeb Gateway running in any browser on Apple CPU machines  Problem When running a program in a browser using AcuToWeb, the program can show strange behaviour. Screens can close randomly, and the active entry field can switch randomly to another entry field. This doesn’t happen in the same browsers on machines with an Intel CPU.  Resolution There seems to be some incompatibility with web technologies and browsers running on Apple CPU machines. The issue can be avoided by disabling hardware acceleration in the browser.For instance, to disable hardware acceleration in the Chrome browser, follow these steps:  1. Open Google Chrome. 2. Click the  icon in the upper-right corner. 3. Select Settings from the drop-down menu.  4. In the menu on the left side of the window, expand the  menu. 5. Click System.  6. In the middle of the window, under System, click the toggle switch next to Use hardware acceleration

Problem: IBM TXSeries starts one or more Application Server processes when a region starts.  An Application Server process runs in the background and listens for requests, then invokes COBOL programs to fulfil requests.  Other applications such as NTT DATA’s Unikix, FIS (formerly Sungard) Ellucian Banner, and Systems & Software's enQuesta are also designed using Application Server processes that invoke COBOL programs.  It is difficult to use the Visual COBOL for Eclipse debugger to debug COBOL programs invoked by these Application Server processes. Solution: This article includes a COBOL module and instructions to make this type of debugging more practical.The Eclipse debugger can be started in different ways, controlled by the debug configuration.  The Attach to Process debug configuration is not practical in these cases because the debugger would need to attach to one of the Application Server processes responsible for invoking COBOL programs, but more than on

Ineed a copy of socket.def   solartoys@yahoo.com   thanks   bob

Why is this new version (only since any months available) not to download? Yesterday, a new try give vcvs2019-60.exe! Is here a reason or forget from MF to actualize? Thanks for answer!

I am trying to send an email from acucobol with no luck. All help will be appreciated. Thanks...bob

I am trying to create a Visual Cobol WinForm .NetCore project using VS 2019.  When I click on the form to view the designer, I am getting the following error. "The language for this file does not support the necessary code parsing and generation services.  Please ensure the file you are opening is a member of a project and then try to open the file again." Any help on this would be greatly appreciated. #VisualCobolWinForm.NetCore