Rocket® COBOL

The new WEB-BROWSER2 control works different from the old control. Before I could drag a file onto the control and I would get the MSG-WB-NAVIGATE-COMPLETE event and with that I had the filename. Is there a way this could work again or does anyone now a work around?#web-browser#extend

Good afternoon: I have an application in Microfocus Cobol - WPF that was working until a few hours ago. In the meantime, I've been updating some NuGet packages and, from that point on, when the application starts, it immediately gives an error that is as follows: " System.ArgumentException HResult=0x80070057 Message=An item with the same key has already been added. Source=mscorlib StackTrace: em System.ThrowHelper.ThrowArgumentException(ExceptionResource resource) em System.Collections.Generic.Dictionary`2.Insert(TKey key, TValue value, Boolean add) em MS.Internal.Resources.ContentFileHelper.GetContentFiles(Assembly asm) em MS.Internal.Resources.ContentFileHelper.IsContentFile(String partName) em MS.Internal.AppModel.ResourceContainer.GetResourceManagerWrapper(Uri uri, String& partName, Boolean& isContentFile) em MS.Internal.AppModel\\ResourceContainer.cs:linha 138 em MS.Internal.AppModel.ResourceContainer.GetPartCore(Uri uri) em MS.Internal.AppModel\\ResourceCon

I am required to check whether Webview2 runtime is installed on the system. Is any utility available with AcuCobol 10.5.1 to check this, Or am I required to create a DLL to accomplish the task? Please advise. Thanks, Aji Cherian

Hi  What is the next available patch update for Microfocus COBOL Server 8.0  that will update the security vulnerability of the openssl included. Current installed:cobol v8.0.0PRN=K1CRH/AAK:Ao.U4.13.04PTI=32/64 bitPTI=Micro Focus COBOL Server 8.0 - Patch Update 08PTI=Patch Update 08PTI=pkg_324515PTI=MFInstaller Scan vulnerability: Path : /opt/microfocus/VisualCOBOL/bin/openssl Reported version : 1.1.1t Fixed version : 1.1.1x Thanks,Aldous

Test

Using thin client runtime 10.51 for Linux.  If I create a WebView2 browser control in our application, then call another program which creates an activex control, I get a memory access violation.   Windows (not thin client) does not have this problem.

Created On:  01 June 2010 Problem: How do I avoid failure of installation of NetExpress 5.1 under 64-bit Windows 7? Resolution: The NetExpress 5.1 installation CD does not support Windows 7 in64bit mode. To successfully install NetExpress 5.1:Logon to the Supportline website, navigate to Product Updates -> Net Express 5.1 http://supportline.microfocus.com/websync/netx51.aspDownload and install Net Express 5.1 WrapPack 1 NXP3251010074.exeThis is a complete install of Net Express. Once this installation is complete, download and install WrapPack 04 NXP3251040083.mspThis will produce a Net Express 5.1 installation with the latest maintenance, which will run under 64bit windows 7. Incident #2456431 Old KB# 31136

Dear All, Presently we are using RMCOBOL 85 with 44 user license in SCO UNIX Server , so is it possible to move that license to Ubuntu linux Server ,  Any one please suggest the process  Thank you Saiteja N 8121676979 saiteja.edu@gmail.com #linuxcobol#license#COBOL#RM/COBOL#unix#SCO

Hello Team, I am Currently in RM COBOL With ISAM File. We don't want to Use the ISAM Files anymore , So with Visual COBOL Migration How we can upgrade the ISAM File to Store in Database any RDBMS. Do you have any Tools or capabilities in VS COBOL which will directly connect to the RDBMS.  Please share a training video if you have.. Thanks.. #COBOLVISUALCOBOLMIGRATION

How is ti possible to add chart elements as axes, axis title, chart title, data lable, data table, legend with macro recorder i had become following commands in vba ActiveChart.Legend.LegendEntries(1).Select ActiveChart.FullSeriesCollection(1).Name = "=""2021""" ActiveChart.FullSeriesCollection(1).Values = "=Tabelle1!$A$1:$A$5" ActiveChart.FullSeriesCollection(2).Name = "=""2022""" ActiveChart.FullSeriesCollection(2).Values = "=Tabelle1!$B$2:$B$5" ActiveChart.FullSeriesCollection(3).Name = "=""2023""" ActiveChart.FullSeriesCollection(2).Values = "=Tabelle1!$C$1:$C$5" in msexcel.cpy i found the following commands Method: "getLegend". 01 Legend Legend. invoke returning Legend. Method: "getChartTitle". 01 ChartTitle ChartTitle. invoke returning ChartTitle. Method: "ApplyDataLabels". 01 Type-CBL XlDataLabelsType. 01 LegendKey VARIANT.

We are in the process to migrate 30 millons LOC written in Cobol Micro Focus using embedded SQL for Oracle, to use PostgreSQL database. We know that there are some open source pre compilers like gixsql, but we are interested in the official support from Micro Focus, is there a supported pre compiler for PostgreSQL?#PostGRESQL#precompliler

It is not easy to find the correct commands to control excel interface. With the Macro Recorder it is very easy to find the VBA-Commands! Now i search a converter from VBA to Cobol? Thanks for help!

Hullo all. I hope the collective intelligence of the community can help guide us here. We have a large-ish program written & running under AcuGT (Extend) for Windows. It has a Windows UI. It is a real-time transaction processing engine with a UI to monitor and control the activity. So it runs in 2+ threads but its a single program. We want to split this into two programs: A transaction processing engine that runs as a Windows Service, so it launches on boot and is always running. No UI at all. A UI that interacts with the above program. Ideally we would just take the existing code - the current UI thread - and make minimal changes to it, so it will still be an AcuGT/Extend program. But users could launch/run it using AcuToWeb. We want to put minimal effort into this, as it does not extend the functionality of our product, it just solves some security + remote-access issues. It should not be too hard to simply split this one program (currently implemented as two threads) into

Hi, II have configured two systems; the first system has run time folder as swrun.16 and the second system has swrun.17. I want to install/register some components into the run time folder programatically.Could you please suggest a way how to dynamically determine the Runtime directory? Thanks, Aji Cherian

Hi all. We will be interacting with electronic labels, and the API is a bunch of restful web services, so we'll be using the RMNET routines.  I know the C$SOCKET functions are not "thread safe" because if you wait for a response, all threads will block (my manual tells me so!) but I was wondering about the RMNET routines.  Do they have the same limitation or can I launch a thread to do the API transaction, while the main function continues on?  The manual doesn't mention either way.

Hello, I was not able to figure out the issue , when im trying to integrate microfocus dlls and COBOL files to webapi c#  endpoint call. The below exception is throwing when executing cobol business logic.It's not working in webapi/wcf calls.It's executed only in winforms application.Could you please do help on this issue.Are these cobol dll integration work in web development?  

I do not work with this program, but am trying to assist in a server migration that involved upgrading Syspro which utilizes Micro Focus components. Upon trying to run an install, I receive this error message: 0x81f40001 - Micro Focus COBOL Server 3.0 must be uninstalled before continuing.  I feel as if I have tried everything and removed everything I could find to no avail- I keep getting this error. Where does this live and how does one remove it?

i was able to find the correct syntax for many functions giving in msexcel.cpy But not to set the topmargin, bottommargin, leftmargin, right margin in VB the syntax found is Worksheets("Sheet1").PageSetup.LeftMargin = _ Application.CentimetersToPoints(2)The function for this in msexcel.cpy are: *> Method: "getMarginBottom". *> 01 MarginBottom comp-1. *> invoke returning MarginBottom. *> ---------------- *> Method: "setMarginBottom". *> 01 MarginBottom comp-1. *> invoke using *> by value MarginBottom *> [IN]. *> ---------------- *> Method: "getMarginLeft". *> 01 MarginLeft comp-1. *> invoke returning MarginLeft. *> ---------------- *> Method: "setMarginLeft". *> 01 MarginLeft comp-1. *> invoke using *> by value MarginLeft *> [IN]. *> ---------------- *> Method: "getMarginRight". *> 01 MarginRight comp-1. *> invoke returning MarginRight. *> ---------------

Hi - I have a question regarding RM/Cobol compatibility with Dockers.  If compatible, steps need to be followed. Can you please help to gather info?  I raised support Ticket and emailed to our contact.#docker#RM/COBOL

Hi I'm in process of upgrade applications from RM version 11 to RM ver 12 and for testing I'm using version 12.17 with WOW Extensions same version. The thing is that in version 11 I've used the form property WSDefinition in order to develop more complicated and large programs and also faster compilig. But when I use the test version 12.17, I got an error compiling when WSDefinition is enabled.  Is there something am I missing?. Thanks for any help. Humberto Betancur. 101 +1+ 02 SOCKETTOOLSENCODE-CONTROL-HANDLES-ARRAY OCCURS 3 TIMES 102 +1+ REDEFINES SOCKETTOOLSENCODE-CTL-HS. 103 +1+ 03 FILLER. 104 +1+ 04 STANDARD-CONTROL-H PIC 9(10) BINARY(8). 105 +1+ 04 STANDARD-CONTROL PIC 9(10) BINARY(8) 106 +1+ REDEFINES STANDARD-CONTROL-H. 107 +1+ 04 ACTIVEX-CONTROL-H PIC X(8) 108 +1+ REDEFINES STANDARD-CONTROL-H. 109 +1+ 04 ACTIVEX-CONTROL PIC X(8) 110 +1+ REDEFINES ACTIVEX-CONTROL-H. 111 +1+ 04 CONTROL-TYPE PIC XX. 112 +1+ 88 CONTROL-TYPE-MAIN-MENU VALUE "MM"

Dear sirs, when I run the command: call cc74 'FindFirstFileA' using by reference findFileName *> lpFileName by reference WIN32-FIND-DATA *> lpFindFileData returning fileSearchHandle I'm getting an error 173 Called program file not found in directory/drive FindFirstFileA How do I solve this Att Rogerio Barbosa

I search a way to define in a excel-cell a formel and had problem to do this or to recognize this field/cell as formel Send data, text, date, values is not a problem. The given example "excel.cbl" is not very exhaustive, in msexcel.cpy are many information, but i don't have found the correct solution. Who is interessed to exchange information on the excel/office integration? who can help me for formel? (not managed cobol)

Hi, I wanted to check it's okay to have Net Express 5.1 and Visual COBOL 9.0 installed on the same laptop? Will initially be using VC native code and still supporting out Net Express application so I wasn't sure there will not be an issue with the rts. Thanks

I originally created this post a while ago : How to set Paper Size being passed from Printer Selection , and I never got it to work. Here is my code: PREPARE-PRINTER-WITH-STANDARD-PRINTER-DIALOG. CALL "P$SETDIALOG" USING PrintDialog. CALL "P$DisplayDialog". IF DIALOG-RETURN = 0    move SET-DEFAULT-PRINTER to default-option    move dpb-len of MyDefaultPrinterBrowser to dp-len    move dpb-body of MyDefaultPrinterBrowser(1:dp-len) o dp-body    call "PC_PRINTER_SET_DEFAULT" using by value default-option                                                                 by reference MyDefaultPrinter     PERFORM OPEN-PRINTER-PARA END-IF. What I would like to do is grab what was changed in the Windows Printer selection box, and have it prin

Problem: How do I get the day of the week for any date? Resolution: See attached source code example. Attachments: dateconv.zip Old KB# 4678