Rocket® COBOL

Prezados Amigos, Usei este programa como exemplo para gerar documentos no Microsoft Word: $set ooctrl( P) ooctrl( Q)*copy "word.if". *> Word vocavularies*copy "excel.if". *> Excel vocabularies program-id. WORDAPI. special-names. call-convention 2 is WinApi. Class-Control. *------------- WordApp is class "$OLE$word.application". *> Word 97 Working-Storage Section. *------------------------------ 77 j pic 9(003). 77 k pic 9(003). 77 wChar pic X(001). 01 WordServer object reference value null. 01 theDocuments object reference value null. 01 theDocument object reference value null. 01 theSelection object reference value null. 01 theReplacement object reference value null. 01 theParagraphs object reference value null. 01 theParagraph object reference value null. 01 theRange object reference value null. 01 theFind object reference value null. 01 wText pic X(255). 01 found pic x comp-5. 88 found-True value 45. 88 found-False value 48. 01 Program-Flags p

Hi all, I am a experienced COBOL developer having used MF products for many years in Windows PC environments - currently Visual COBOL / Visual studio.  However my knowledge of direct Windows functions/api calls is more limited e.g. I launch a few apps to run scripts to find printers, display browser windows and manipulate MF Dialog System objects.  I'd like to learn about Windows programming from an MF and general perspective i.e. how to process windows objects, how they are structured, how I can use built in Visual Studio/.Net functions and so on.  As background I also use MySQL and program in PHP and javascript and have developed a few windows scripts. Many thanks, Linden

Problem: I have shipped Selected Files from COBOL Server together with my application files. When I run the application from a remote PC the RT Error 245 occurs. Resolution: Note: Micro Focus recommends that you ship the whole of COBOL Server with your application. However to provide backward compatibility, you can still select and ship specific files. Follow instructions in the Knowledgebase Article: Network deployment of Visual COBOL 2.3 native applications For this type of installation/configuration the progname.exe.mfcfg should contain the following two lines:    SET BINPATH=\\\\ServerName\\COBOLsrv    SET CESDYNAMIC=ces.ini    

We are using acuxdbc with OEM-CHARACTER-SET  ON It is working with  Acuxdbc 10.0.0 32 bits It is not working with  Acuxdbc 10.0.0 64 bits Is there a raison or...  

I have two strange problems with the Output Window of NETEXPRESS 5.1 that appeared suddenly without having modified anything in the configuration.. Formerly when I selected some text in the output window and copy it to the clipboard, then pasting it in other application (Notepad or word) everything went quite well. But since some days nothing happens, nothing is copied. The second problem, I suppose it is related to the first is following: When some error messages appear in the output window, a double click positions the cursor on the error line of the source program. Now, just nothing happens after double click. Any Idea what is wrong with the configuration? Thanks in advance   Rolf

Prezados Senhores, When I insert an object into a screenset in Dialog System 3.1, the borders look like 3D. Is there any way to show these borders without this effect but with borders as in a textbox? Best regardsRogerio Barbosa  

Hi all,   Is there a data structure similar to Python's dictionary? In other words, an array like: my_dict('name') = 'Jack'   Thanks

Hi,   Got a new message here and it is displaying after compilation. Below is the message; "808-S Maximum number of data items exceeded." Any solution to this?#netexpress3.10#COBOL

First: Please excuse my lacking knowledge of the Micro Focus product structure and licensing. I have built a little Visual Cobol application in Eclipse and wish to run this on our customer sites. We will of course run this on the Java Virtual Machine BUT from my understanding the customer also does need a cobol runtime installed for licensing purposes? If so, is this runtime product the "Cobol Server"? Our customers are mostly on the "Micro Focus Server" product (running code built in NetExpress). Will we be able to run our java application on machines with "Micro Focus Server" or do we need to upgrade to "Cobol Server"? (Can NetExpress built code run on "Cobol Server"?)#license#Java

Hello, Does anyone have any experience converting a COMP-6 data field to a readable value? I'm trying to read a Vision Version 3 file in C#, and I can see the uncompressed data just fine, but not the COMP fields. What type of encoding should I use to get these out of the data?   Thanks Dave

In Extend version 10.1 (wrun32) there seems to be a memory leak. I have a program that calls many COBOL subroutines. This process is repeated very often. The COBOL subroutines should be removed from the memory after every run with "cancel all". After the program has run for several hours, it crashes without further error message. The only hint can be found in the error file via the runtime switch "-e errfile". There is "out of memory". During several debug attempts, I could see that the overhead memory is constantly and strongly growing. Does anyone have any advice on how the overhead memory can be freed?

Hello All, I was wondering if there was a way to read indexed vision files directly in a C# program, without the use of the XDBC program?   Thanks Dave

Hi, Was wondering if you can help me figure out if this is a limitation of the C$SYSTEM and C$RUN. I want our application to open a web browers and continue on (have it run on it's own).   If I put in the path (e.g. "C:\\Program Files (x86)\\Google\\Chrome\\Application\\chrome.exe" url) all is good when I call C$RUN or C$SYSTEM. The problem occurs when we replace 'C:\\Program.....' with  'START CHROME url'. When using C$RUN it comes back with a status -1 (error occurred). Using the same command in DOS (e.g. start chrome http://google.ca), it works fine.   Thanks in advance!! Dennis

Sorry to revive an old question, but I'd like to know if it's now possible with extend 9 or 10 to disable the initial comment in XML generated by C$XML (original filename and "generated by ACUCOBOL-GT", etc). This has been asked in the past, but there was never much of an answer.  Since C$XML does pretty much what I want, I'd rather not get into other solutions like XML Extensions. I've already tried deleting the comment with CXML-DELETE-COMMENT, but it doesn't seem to be handled like a normal comment in the XML. I can't even access it with CXML-GET-COMMENT, like I can with comments I've added myself. Is there some trick or configuration setting for getting rid of this comment?   Thanks, Claire   COMMENT

Hi,    May i know that how can i convert the hex value to ascii value using cobol.    Thanks You. 

Hi there, My Environment: Visual COBOL 3.0, Visual Studio Community 2015 How can I keep tabs when reading line sequential files i.e. not expand to spaces?  Ideally I want to set it so that my project always just writes and reads line sequential files without interfering with the content i.e. no null insertion and no tab expansion. Thanks, Linden      

Is anybody connecting to relativity using Linux client to Linux server? If so how are doing this?

Problem AcuXDBC does not support the SQL LIMIT function.  MySQL has a LIMIT function which does what it implies.  For example this returns only the first row:       SELECT * FROM MYTABLE LIMIT 1; When doing this with AcuXDBC there is a syntax error reported. Solution AcuXDBC supports use of the TOP function to accomplish the same thing.  This returns only the first row:      SELECT TOP 1 * FROM MYTABLE;

Downloaded product along with release notes then downloaded vcvs2017-30.exe and installed it having installed MS VC community onto a Win10 Pro X64 laptop. I have the following problems:   1.  The application name of Microfocus Cobol is not in the Start folder so have to start Visual Studio but MF Cobol is not shown.  I have run the install (repair mode) but this did not fix it then ran install to remove it then I re-installed. There are items in the MF folder but not VC start etc.   2.  When using the license manager directly, it says it cannot find any products when I try to activate license.  This is in all cases of 1.   3. Going to the website (ending with PE) it just goes into the generic location for VC trails etc so not helpful.    

Hi there, my name is Ruud and I'm new to this community. I've been a AcuCobol developer for over 25 years now and I trying to start using version 10 at the moment. Does anyone manage to print a bitmap with the new -P PDF option? It seems to me that the WIN$PRINTER-routine is ignored.

Does anyone know how can I detect when Windows enters tablet mode in my cobol program.   Regards, Georg#NetExpress5.1

Good morning, I need to change the hard drive of the computer where the NetExpress 3.0 is installed, please can someone tell me the procedure so I can get a new key respose. Thank you very much.Pedro Frongillo

Hello, We've been trying for a couple weeks to get a trial running with Acucobol 10.1.1. We dropped in the trial runtime binaries and when executing our application it immediately pops up an error about AcuSQL runtime not found.  Its there, in the PATH, just like our old version was. I even used activator to activate the trial license, which seems to work ok.  The runtime files are all in /opt/acu/bin which is symlinked to /opt/acucorp/901/bin.  I've updated that for 10.1.1, and I've put them in the same path, and even directly into /opt/acu/bin and still get this error.  /opt/acu/bin is in the system PATH too.  Anyone have any pointers on this?  We really need to get this testing so we can move to the newer versions of Linux. (old system is on Ubuntu 12.04)   Just to note, our old 9.0.1 runtime runs ok (sort of) and without the acusql error on Centos 7.4. One thing that confuses me. Our old Acucobol required me to setup a Makefile an

Hi all.   I have a function which saves text data to a log file.  I want process A to write a bunch of data (an XML transaction) and THEN have process B write some other data. Currently the function opens the log file with extend, writes the data, and closes the file.  (The write uses "WITH NO CONTROL").  Most of the time things are fine, but the red hat enterprise server it's running on will occasionally merge the output together - character by character so it looks encrypted!    I know I can fix this by simply adding an extra step - try to lock the file and keep trying until it becomes available.  I'm wondering if there some kind of setting that will 'chunk' the data together so the two processes do not overlap each other.   Note: I'm fairly sure I already tried "BLOCK CONTAINS" a while back, with a size large enough for the chunk of data - didn't help.  Runtime is version 9.2.1#ACUCOBOL9.2.1#unix

My working environment: a new install of Windows 10, extend 10.0.0, Visual Studio 2013, .NET Framework 4, 64-bit OS but coding for 32-bit, executing from AcuBench. I have been working with this particular project since September.  I have a Visual Studio project that is called from COBOL.  It was working fine, until a couple of weeks ago.  I had been running Windows 7 upgraded to Windows 10.  My hard drive had problems, and I had to wipe it and reinstall everything, so now I have a clean install of Windows 10.  My data files were saved, so I was able to copy them back into my working environment.  Since the rebuild, I have gotten the dreaded "Invalid Class String" error.  I had previously built the AmortControl sample project, because it has objects similar to what I was trying to do in my project.  It also had been working fine in my former environment.  So as a test, I rebuilt AmortControl, and it also has the error occur now.  This le