Rocket® COBOL

Hi, is there any documentation on how to convert below C# into VC class? using System;using System.Collections.Generic;using System.Linq;using System.Text;using System.Threading.Tasks;using Aladdin.HASP;namespace HaspLogin{ public class login { public static Boolean check() { HaspFeature feature = HaspFeature.ProgNumDefault; feature.SetOptions(FeatureOptions.IgnoreTS, FeatureOptions.Default); string vendorCode = "iOa2Wamd86sr/OMWsaak5l8iRdqFvHGr6pLCIKVMo8TreGxm4PQiUAsLcUgXNbdNzexvu6ZouLUorzGq" "LysvIDsplUEdF9iB1B7eFEAVkonVJeLlS9SPWeeMOSx9GSrIC7EyqIcyQJ77uVdrNAvVp0UGitNJZuKH" "OcpPqfXn6o1c2VZmkG/mSxyIEISent8QyrO6jNxB0W9AYc yrTTJRZ1e7rZmVI6b1HSEPiJQiHwLhLJF" "wiu7fetR6AWI6A4a72ugZjZCDP154c8cNhopUfeYemH4088CFT56x4YpBWFI7G9OKBDAqdV1NxDLBjxL" "/h/hKnbEbOt6yGbzadWY0d2VsjPzktybk7bQKA/XRyxKS2k4xNgeE1zK2yZjsBqXamqCp5uEXnF21uC6" "7zAIzBWiyuWSYPykiFgNJvUas10ynFdSFLMkZolWswFyHNRNkmqI2 4EnDx4cJ5kB5CpFwC3rhu0YjRF" "5g0KDUSp

Hi, I'm running some programs in exec sql autocommit mode which I have as a compiler option (Windows VC 2.3.2 on VS 15) with MySQl. For a short section I want to run in a transaction and commit at the end. What is the right combination of exec sql statements to achieve this i.e. (1) running in autocommit, quite a few updates done, interacting with users via dialog system etc. (2) now want to run a few updates as a transaction and only commit at the end (3) then return to autocommit In my testing, it seems to work if I exec sql begin tran immediately after the connect but if quite a lot has happened in the interim it just seems to commit and ignore my begin tran. Any thoughts? Thanks a lot, Linden      

I am building a calculator and have four buttons they used to work , so I must have accidentally changed something. Can some tell me how these aremade active? Is it in the properties?   

Hi, Does anyone know how to open Outlook with an attachment from Visual Cobol. This would have to work with all the "different" versions of Outlook 2007, 2010 etc etc without any program changes. Thanks Neil.

Good day, I come to your collaboration and knowledge. How can I give attributes when saving to excel?   This is the code, Chris I collaborated with the separation of the text in columns, thanks to the I could generate direct reports to excel 78 xlDelimited value 1. 01 ExcelObject object reference. 01 WorkBooksCollection object reference. 01 WorkBook object reference. 01 CellRange object reference. 01 theRange object reference. 01 ExcelFileFormat pic x(4) value "true". 01 SaveName pic x(256) value spaces. 01 NOMBRE PIC X(15) VALUE "TECNOLOGIA". 01 pausa pic x. 01 GUARDADO OBJECT REFERENCE. LINKAGE SECTION. 01 AREA-LINK. 03 ARCHIVO-WS PIC X(90). Procedure Division USING AREA-LINK. *> Creo a Excel como un objeto y lo llamo invoke MSExcel "new" returning ExcelObject *> El objeto excel se hace visible en memoria invoke ExcelObject "setVisible" using by value 1 *> Obtengo el numero de libros y pongo por def el numero uno invoke ExcelObject "getWorkBooks" returning Wor

We are using Server Express 5.1 Wrappack 10 on a Solaris UX box.  We have separate locations for the .gnt and .idy files and we have the COBPATH and COBIDY variables set correctly.  Animating works for most modules, but a few are reporting errors where the .idy cannot be found.  The .gnt and .idy were created at the same time for all modules via a mass compile.  The error is indicating that it cannot find the .idy file, but it appears to be searching the COBPATH not the COBIDY path.   Any hints?#ServerExpress#animation

Hi, We are facing issues while animating the COBOL programs using Net Express. Please see the below details and please refer the attached document for more information. While executing the jobs in our application using the executable files (.DLL& .EXE etc.), the jobs ran without any errors.  During the jobs execution process, we have data base calls where Cobol will fetch the information from data base (SQLSERVER/DB2). There were no issues while fetching the information using exe files.  However when we tried to Debug the Cobol programs by using Micro Focus Net Express Animation process, we found issues while retrieving the data from the data base. There was no data base errors (SQL code is zero after executing the SQL statement) after the data base calls, however the numeric data fields after the data base calls having the illegal data. Please see the below detailed information about the problem.  Detailed information about the issue:  We have an issue with the

i am running cobol server. I have COBDATA set as an environment variable system wide (this is a development box). my project is managed code multiple output. If I open a Visual Cobol command prompt and execute the program, the files that the programs references are found. If I double click the program to run it cannot find the files even though it can see COBDATA.  Is this normal behavior?

Hi, I want to create the .def file but when I click the ok button its show error "Can't create file: <path>.def".  I'm using windows10 and AcuCOBOL-GT 10.1.0. Below is the screenshot picture of the error that I encounter:

i apologize for posting this problem again but I am at a loss as to where to look for a solution. I have scoured the internet asking every question I could think of to get some pertinent information but have not had any luck . The only answer I found was to set the causes validation property to false, which I tried but it did not work.Is there any solution to this problem or is it just an unfixed bug? I would appreciate any feedback at all. Thanks - John P.S. I have moved this button's logic to another click event and the logic works so it can't be getting lost there.

Hello,I have a small project in netexpress 5.1 free that will run only 3 months.I developed an exe project in netexpress and wanted to know which dll I need to put together to run on Windows XP.Which files tell the client to run without needing NetEpxress.

Hello, I am using AcuBench on Window to write my code and supposedly I want to compile the file program (.cbl) on the HP-UX server, do I need to have ACUCOBOL-GT Dev Sys product key and license for both the Window pc and HP-UX server or it is enough just to have the product key and license for HP-UX? Since I am getting this error: License file 'C:\\Program Files (x86)\\Micro Focus\\extend 10.1.0\\AcuGT\\bin\\ccbl32.alc' inaccessible

I've got Micro Focus Visual COBOL for Visual Studio 2010.   While working on a program, I accidentally compiled it while it had a stand-alone (incomplete) PERFORM command.  I was surprised to see that it didn't generate a compile error. Is that an oversight in the compile logic, or does a stand-alone PERFORM actually do something? Here's the code I accidentally compiled: * Here's where we select our sample IF NOT (M-SEX-CODE = 'F' OR 'M') GO TO 2000-ENTRY. **************************************************************** * Go create your user-selected numeric variable INM-NUMVAR **************************************************************** PERFORM **************************************************************** * Define the user-selected numeric variable INM-NUMVAR * It may be a straight numeric variable from T-M (e.g., LOS DAYS) * or a modified numeric variable (sent-length, 45-yrs life/death) * or it may be a binary 0-1 (no-yes) var (pct burglars? no-yes)

Hi, I have some texts defined as System.String or String inside Visual COBOL for Visual Studio 2012 and some defined as pic x. I can not find how to display a variable defined as string using line and column without receiving a compilation error COBCH030. And the display of the pic x is shown in a different color (green) than the display of the string (white) 01 text1 type System.String.01 thetext pic x(50).       procedure division.           set text1 thetext to "Hello World".           display text1::Trim.                                 display thetext line 20 position 20. Regards,

We want to improve the speed at which one of our programs can INSERT rows into a table. Host Arrays sounds like the way to go, but the documentation (.NET Host Variables in Managed Code) specifies that .NET Host Variables must be declared at the Record (01) level? Can we do "01 EMP-EMPNO OCCURS 25 TIMES STRING." in a EXEC SQL BEGIN DECLARE SECTION?

no file reqd

Sometimes bitmap are loading correctly sometimes not His there timeout to load bitmap i think when the server his loaded bitmap are not loaded

Is there a way in RM/COBOL to check a size of a file before opening it?  Having an issue with a rather large log file - want to change the program to delete it and create a new one if the file size is larger that 1GB.

I have the fields 01  prefix-error-status      pic 9.  and the statement move ls-status-ok to ls-error-status. This code gives me a NullReference exception unhandled.          78  prefix-status-OK     value 0.What is going on here? It happens in the run of the code; program compiles fine with no errors!                                                

We have found this strange behaviour: We have a program called “main menu” and can call the various programs over the menubar or a treeview. If we use the keyboard the called programs display a dotted line around active combo-boxes. If we use the mouse the called programs don't display the dotted line and the user does not know which field has the focus. This happens under windows and thinclient, version 9.5.

I keep getting the following error:   error COBCH0008 : Unknown copybook library-data.cpy specifiedC:\\Users\\John\\Desktop\\MFcourseware\\COBOLClass_Studio\\COBOLClass\\Projects\\18_02_Patron_Menu\\PatronEntry\\Form1.cbl (64,20-21) : error COBCH0014 : Invalid operand I have put the copybook everywhere I can think of and pointed to it in Project, properties COPYBOOKS. what is the default path?   

Dates not showing in COBOL executed entry screen since latest Windows Update installed overnight.  Date showing is blank.   Anyone else having this issue today.

Hi there, Hoping someone can help. I'm calling winapi "ShellExecuteA" from a Visual Cobol program to open a document (pdf/webpage etc) which works fine. It returns a handle instance, 'hinstance' which I need to check for errors How can I move it to a field I can examine? Windows documentation (https://msdn.microsoft.com/en-us/library/windows/desktop/bb762153(v=vs.85).aspx) says... "Return value - Type: HINSTANCE - If the function succeeds, it returns a value greater than 32. If the function fails, it returns an error value that indicates the cause of the failure. The return value is cast as an HINSTANCE for backward compatibility with 16-bit Windows applications. It is not a true HINSTANCE, however. It can be cast only to an int and compared to either 32 or the following error codes below." MY PROGRAM $set ooctrl( P) copy "windows.cpy". IDENTIFICATION DIVISION. special-names. call-convention 74 is winapi. *> Litlinked apis WOR

This week I changed a customer installation with 150 users to acuthin / acurcl / wrun32 version 10.1 patch ATW (Apr 3) 4474. There are new unexpected problems compared to version 10.0.1. The first problem:The error "Accept recursion limit reached" occurs very quickly in programs with grasping possibilities in the grid. I suspect that it is because the event procedure is incorrectly terminated in the Thinclient environment and the runtime reverts to the Accept. There the program runs into the "on exception" routine. To suppress the warning message about the configuration variable warning_on_recursive_accepts is not really a solution. Second Problem: Our program consists of a main program, which calls the subprograms via "call thread". If the subprogram falls back on the accept after the "finish-entry routine", the runtime automatically sets the focus on the main program and The subprogram must be brought back to the foreground by mouseclick.

Hi,   I am trying to open a website and send it to second monitor from my visual cobol winforms application. So i have tried "System.Diagnostics.Process::Start" to launch a website, but i am not able to send it to second monitor. By default website gets triggered in primary monitor. I have read an article that using WinApi.SetWindowPos , i can switch the monitor positions but in visual cobol i do not see this WinApi class. If this is not supported, is there any other way to fulfill my requirement ?   Thank you.