Rocket® COBOL

This example has been tested with Enterprise Developer 4.0 and with Visual COBOL 4.0 for Eclipse and Visual Studio. In situations where an application fails with an error condition that it cannot recover from, you might want the application to terminate the process in such a way that error processing occurs. For such scenarios, Micro Focus provides the CBL_RUNTIME_ERROR library routine that enables you to display a custom message.  You need to call the CBL_RUNTIME_ERROR library routine from your code and provide a message string to indicate the error. The API that uses this routine takes a flags parameter. Setting the flag to 0 forces the application to terminate and generate the specified user COBOL Run-Time System error displayed as an RTS 150 message. The message enables the user to determine which (of potentially several) error condition caused the termination. If the core_on_error tunable is also set, CBL_RUNTIME_ERROR makes it easier to debug application errors from a produc

I HAVE A LEGACY SYSTEM THAT I AM CONVERTING TO VISUAL STUDIO. HOW DO I GET THE PROGRAMS TO RECOGNISE FUNCTION KEYS ?

What is the easiest way to create and write a CSV file?  Is it necessary to use Excel?

In an older version of MF COBOL I used "current-date" as the Source for a field in the screen section.  That triggers a compiler error now.  What replaced "current-date"?#screensection#date

Hello, Our company would REALLY like the 64k limit of the extra segment enlarged.  We have recently hit it with one of our billing program and are very close to exceeding in in a couple of others.  I was wondering if any other users have hit this limit and/or would also like to see it increased? We have also found it very difficult to understand what actually makes up this extra segment because it is not very clear according to the documentation as to what it is.  We have been using the Acu stuff for 20 years and our product and our programs have gotten rather large and very complex.  We have tried to clean things up, but in doing that we have had some strange results.  In reviewing some copy books that we use we have found some fields that are no longer being used so we thought that removing some of these fields might help.  We removed some fields and the extra segment did not change, however, once we got to one field that we removed the extra segment fr

We have a customer that does not have an LPT1 port on their PC.  They have connected their receipt printer to the USB port on the PC, and our program will not print to the receipt printer because it is looking for the printer to be attached to LPT1. Is there a way in RM COBOL to tell the computer to look at the USB port (like PRINTER1 tells the computer to look at LPT1)   (I could use PRINTER? but the customer has instisted that they do not want to have to select the printer EVERY TIME they use the cash register).  #RMCOBOL#print

Has anyone else run into the compiler error "Compiled screen description too large"?  Apparently this error means a screen description has exceeded 32k.  I added a new page with roughly 50 controls on it to a tab control and now the program gets this error when I attempt to compile it. Is there anyway to get the 32k limit increased? This is the second program we've had this happen to.  We had this problem about seven years ago with another program and had to rework which controls we were using on the screen to get around the problem.  Unfortunately, the way we handled the problem in that program isn't really an option this time around. Thanks, Jim

I am trying to test Cobol Server in Docker, but all licenses we own are recected when building initial image:...Step 18/19 : RUN set MFLICFILE=${MFLICFILE} &&     "%RMT_DIR%\\\\MFLicenseAdmin.exe" -install %MFLICFILE% ---> Running in 60dec237fcc1Non-STANDALONE license ignored:10 SolarNativeRuntimeDeploy 1.0 LONG NORMAL NETWORK ADD INFINITE_KEYS INFINITE_KEYS 1 JAN 2009 NEVER NO_SHR SLM_CODE 2_LOG_ENCRYPTION_LEVEL NON_COMMUTER NO_GRACE DEMO NON_REDUNDANT NiL NiL Ni NO_HLD NiL 5_MINS xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxNon-STANDALONE license ignored:xxxxxxxThe command 'cmd /S /C set MFLICFILE=${MFLICFILE} &&     "%RMT_DIR%\\\\MFLicenseAdmin.exe" -install %MFLICFILE%' returned a non-zero code: 8030720...   What kind of license do i need. Where can i get at least a test license.#docker#VisualCOBOL#license

In an older version of MF COBOL I used "current-date" as the Source for a field in the screen section.  That triggers a compiler error now.  What replaced "current-date"?#date#screensection

I'm unable to download the Patch Update 1 for 4.0 for Visual Studio 2017. I get an error message indicating either "INET_E_DOWNLOAD_FAILURE" in Microsoft Edge or "ERR_CONNECTION_RESET" in Chrome.  In Firefox I get a message saying the connection was reset. I do not use a proxy. I tried both on my Windows 10 VM and on macOS

I get the above error when building my Visual COBOL solution using Visual Studio 2015.  Is there something simple I'm missing?  The code worked fine using the old MS-DOS Micro Focus compile and link.  Do I need to check one or more namespaces in the solution properties, for instance?  Or something simpler? Thanks in advance, Wes#errorCOBCH0854#VISUALSTUDIO2015#VisualCOBOL

I have a problem with ACUBENCH 9.1.1 , i use this editor from many years but this morning when i push the button to show the WORKSPACE ,this window doesn't appear.   Do you know a solutions?   thank you.   Maurizio from Italy.

I get an error accessing the data grid that the index is out of range. I have done this many times so the error is unusual. The only factor different in my many uses of data grid is that I have two data grids on a single form. I'll provide some detail. Here is the code invoke self::dataGridView2::Rows::Clear set dataGridView2::ColumnCount = 3 set dataGridView2::Columns[0]::Width = 100 *> Hole set dataGridView2::Columns[1]::Width = 150 *> player set dataGridView2::Columns[2]::Width = 100 *> results perform varying sub1 from 1 by 1 until sub1 > 9   subtract 1 from sub1 giving line-number (this gives zero)   move 0 to column-index   set dataGridView2::CurrentCell = dataGridView2::Rows[line-number]::Cells[column-index];The above set datagridview2 fails with  An unhandled exception of type 'System.ArgumentOutOfRangeException' occurred in mscorlib.dllAdditional information: Index was out of range. Must be non-negative and less than the size of t

Hi there I'm sorry when how to solve this issue is known the most, and the work-around might be obvious to just as many  Even though, I've not been able to figure out what - as I've installed MF visual COBOL and is about to migrate older programs Doing so, I'm compiling from Visual COBOL command promt (64-bit) using COBOL.exeIt goes well, but next when using the linker (LINK.exe), it comes up with "LINK : fatal error LNK1561: entry point must be defined" And, the compiler doesn't take any of the compiler options in account - no matter whether I use CBL or PROCESS statement Any help will be greatly appreciated, kind regards

It appears I have successfully installed Visual Studio 17 and Visual Cobol for Visual Studio 17.  When I go through the process to create a project: File,new,project,intalled,cobol,native or managed(same with any option), console application (or any option), complete the file name and hit 'OK' key, a Microsoft visual studio window appears stating it's creating the project (name I entered).  It never completes and will not cancel.  I have to end visual studio from the task manager, endtask option ( three times ). I do not have this problem with any other language, only visual cobol.  Same thing happens if I load a cobol program and attempt to create a project.  I can successfully compile the program and run from the debug choices, but that is where my capabilities appear to end. Of course the question is:  How do I resolve the problem?

It appears I have successfully installed Visual Studio 17 and Visual Cobol for Visual Studio 17.  When I go through the process to create a project: File,new,project,intalled,cobol,native(same with any option), console application (or any option), complete the file name and hit 'OK' key, a Microsoft visual studio window appears stating it creating the project (name I entered).  It never completes and will not cancel.  I have to end visual studio from the task manager, endtask option ( three times ). I do not have this problem with any other language, only visual cobol.  Same thing happens if I load a cobol program and attempt to create a project.  I can successfully compile the program and run from the debug choices, but that is where my capabilities appear to end. Of course the question is:  How do I resolve the problem?

how can i  handle RMCOBOL files over 2 GB in open server 6.0. I managed to set the variable to the system ulimit.RMCOBOL use version 11 and indexed level 4.report 4194303 ulimit variable and we could not change it.measuring 1.8 GB file when running processes and displays Error 24.02. teh ulimit command report 4194303  if I do ulimit-f unlimited then ulimit shows 4194303. if I do then ulimit-f 5242880 ulimit report  5242880 this only with root in other users with this value appperas bad limit erro how can do  change the parameter in the kernel? which is the recommended value for the 1.8 GB file server has 4GB of ram#Relativity#RMCOBOL

Hi We are trying to used web services but i do not now from where to start what i sould used to implement could you help me? His there a tutorial somewhere!   Thank !

I have a user request to reassign the Windows CTRL-Del (Erase to end of line = kL) keystroke to an Fkey (editing only - no termination no exception or exception value.). Using AcuGT runtime for Windows I have had some limited success with text mode (not ENTRY-FIELD) with  KEYSTROKE Edit=Erase-Field k9  With it, F9 erases the entire text field but has no effect in ENTRY-FIELDS. Ideally I would like KEYSTROKE Edit=Erase-to-End k9 to mimic CTRL-Del for both text fields and ENTRY-FIELDs, but I can't make it work for either.  (No effect for ENTRY-FIELD and works like Erase-Field for text.) The user would be happy with Erase-Field. Thanks for any suggestions. Sal UBCC Development#AcuCobol

does anyone have any suggestions on: 1. how to re-organize rmcobol index files? 2. how often should this be done? 3. someone told me that rmcobol index files self-reorg or have some kind of self maintenance? please advise. and thanks for all your help. bill

Can I get an example of embeded ESQL CONNECT command that specifies a password for an password/encrypted XLS?  This would be in native COBOL. Thanks, Ellen S.

 I've been using the message box (Windows) for long time, and once in a while a message box will hold up a process from finishing.  Is there any way to code a timeout on a message box and force the default response after say X number of seconds?   The message box variables I'm familiar with are TEXT, TITLE, TYPE, ICON, DEFAULT (response), VALUE  Thanks,

Hi all,   we created a project form scratch, in a new workspace, on acubench 10.1.1 (Windows 10) and we are facing the following problem: Project has a single program with one form. When we add a new empty report "Report1", option "Generate Source" completes with no errors. When we add a single report entry field, even with no value, option "Generate Source" hangs at 39% and after few seconds acubench crashes. Same project opened from acubench 10.0.1 works fine. We noticed that at the /Report folder, Report1.rpt file exists but is empty. Are we missing something in acubench configuration? Thanks in advance

Our existing NET EXPRESS system has a MAIN program in in called REPORTS.CBL. Within the program there are calls made to upward of 100 potential bespoke report 'sub-programs'. In Visual COBOL I've found that these 'sub-programs' must be mentioned in the REFERENCES of the main program otherwise the sub program will fail to load when called. The problem is is that it takes an increasing amount of time to complie the VC COBOL version of the MAIN program as all the sub-program references are added. Thirty references takes 3 minutes. Sixty takes 6 minutes and 100 references takes almost 10 minutes just to compile the program then another several minutes while it 'thinks' about doing a debug (if requested to do so!!) Is there a way of calling out to other programs (.dll built) WITHOUT referencing them within the MAIN program as this would be a big help if there is!  

Hello, I am calling a cobol program, from a Java servlet. I can successfully run the cobol program, but if I display a JSP, and then try to invoke the program again, I get the following exception: com.microfocus.cobol.program.COBOLRuntimeException: 119     Name is not unique  This is how I am invoking the program… private Boolean STAGE_1 (StateLinkage sl, IRunUnit runUnit, HttpServletRequest req, HttpServletResponse res) { boolean successFlag = false; AMSC535A pgm = new AMSC535A(); Amsc535aParms AMSC535Aparms = new Amsc535aParms(); runUnit.Add(pgm); int GCSrc = pgm.AMSC535A(AMSC535Aparms); if ( GCSrc < GCS_WARNING )  { successFlag = true; } return successFlag; }       Could someone advise me on how to fix this please.  #JVMCOBOL