Rocket® COBOL

I am new to Windows forms.  Using the WinFormBook sample code provided by MicroFocus everything works fine.  I am attempting to determine how to pass back a code to the legacy program to indicate a write the data.  I have added a second button to add.  I have copied the button1 read section and changed to add: set my-book to type BookWrapper.Book::Add(input-string) When I build the file, I get the error in the subject line.  How do I resolve this issue? 

We have a Cobol 5.1 Menu system that calls one of 1,000’s of application gnt programs depending on option chosen. We want to create a graphical menu system in Visual Cobol that can call the existing Gnt applications.   I have created a simple test program that accepts a folder name and a program name then calls the requested program. The test program works fine until I call the test gnt program. The test program was compiled using visual Cobol command line compile to produce the GNT application.   The call results in the error: FAILMicroFocus.COBOL.COBOLRuntimeException: 174     Imported file not found (Could not load file or assembly 'file:///C:\\Silverlink\\v3.9\\wintne\\lib\\restest.gnt' or one of its dependencies. The module was expected to contain an assembly manifest.) ---> System.BadImageFormatException: Could not load file or assembly 'file:///C:\\Silverlink\\v3.9\\wintne\\lib\\restest.gnt' or one of its dependencies. The module was expected to

in acucobol Primary Key prhead-key 9(10)   move 0 to prhead-key  start file not < prhead-key  works when accessing vision file translates 0 to 0000000000 (I believe) and finds all records     Oracle Table   move 0 to prhead-key   returns a status = 23  because it interprets key as 0sssssssss where s = a space Also empty 'temporary' files return a '92' error when read   Is there a configuration variable to handle these little quirks?    Thank you

Does anyone know what the "Loc 513" error means?Medeo

I am using ZetPDF SDK number of time. It is too easy to develop PDF functionality using this SDK. You can download the SDK from here. (ZetPDF.com - PDF library for .NET, Windows Forms, ASP.NET, Mono, WPF, Silverlight)#generate#PDFCreator#pdf

The demo program delivered together with Netexpress 5.1 “Micro Focus\\Net Express 5.1\\Examples\\Dialog System\\CLASSLIBRARY\\Pictures\\Images.App”  works pretty well and shows immediately after  SCREENSET-INITIALIZED the previously defined .JPG .GIF or .BMP image.   After adding to the program             MOVE “next-image.jpg” TO IO-Text-Buffer             MOVE "SET-PICTURE" TO Call-Function             SET OBJECT-REFERENCE-x TO IMAGE-REF             CALL "IMAGECTL" USING  DS-Control-Block.   Data-Block            PERFORM Call-Dialog-System I can show one image after another. But due to the fact that at the beginning of the program I don&rsqu

 Hi, I installed new virtual PC for Visual Cobol testing - Windows 10 Professional, Visual Studio 2017 Professional, Visual Cobol 4.0 trial 30 day. I am not able to load any solutions from Sample Micro Focus directory (e.g. WinHello.sln). Visual Studio loading solution, but does not finish the operation and freezes. I have to use Task Manager for kill it. I am not even able to create a new project based on a cobol. (creating solutions ..... and nothing happens). What is wrong? Can you help me? Regards Petr MFSupportInfo_5F00_Log_5F00_DESKTOP_2D00_U1M9VSR_5F00_2018_2D00_06_2D00_25_5F00_02_2D00_23_2D00_15.xml

Hi! I just installed Visual COBOL for Personal Use, and I cannot create a new project or open an existing one.  It just says "preparing project" and doesn't do anything else. I have to ctrl alt delete and run task manager to get the program to stop.   I am currently using Visual Studio 2017 Community Edition version 15.7.4 & Visual COBOL 4.0 version Version 4.0.00243 I had a real bugger of a time trying to get this to install.  Once the Visual COBOL was installed, the only way I could get it to show up in visual studio is by following the directions on this web page: https://www.microfocus.com/documentation/visual-cobol/VC30/VS2017/GUID-391926CC-0991-4E0F-B0F3-9249B0FDB691.html   Anyone know what can be causing the Visual COBOL not to work?  I've already tried uninstalling and re-installing both the Visual Studio and the Visual COBOL, and I am still getting the same issue.#Installation#VisualCOBOL

 It seems to lock up the called screen when using "96" until I exit out of that called program. Tried using C$SYSTEM XXXXX FLAGS. (Flags has a value of 1) Tried using C$SYSTEM XXXXX 1. Tried using C$SYSTEM XXXXX CSYS-ASYNC. None of these work when trying to use C$SYSTEM (Seems to work like a ENTER key)What am I doing wrong?

We setup a new system which is running Extend v10.2 on Windows 2012 R2 and connect to SQL Server 2014 by Acu4GL. However, it returns "[DBNETLIB]: SSL Security error" when opening table in database server. After checking, it may relate to the SQL Server has enabled TLS 1.2. So I would like to know does Acu4GL v10.2 support TLS 1.2? If it is support, is there any configuration variable to make it work? Regards,   Bobby#TLS1.2#Acu4GL

Trouble with C$SYSTEM Here is a C$system failure screen along with the actual string I am using. (AX-QUE) Works fine in other programs. Any idea?  

Problem: Running a native COBOL application over the network with COBOL Server 4.0 or 5.0 works fine the first time. Any subsequent runs fail with the following: Execution error : file ''error code: 244, pc=0, call=1, seg=0244 Licensing initialization error Resolution: This issue is resolved in release 5.0 Patch Update 9 and higher. The workaround is to add the following entry in the run-time launch configuration (.mfcfg) file: SETENV MFCES_INIT_LOCATION=\\\\ServerName\\MicroFocusSrv\\Bin\\ces.ini where Servername is the name or IP address of the server and MicroFocusSrv is the network share name on the COBOL Server 4.0 or 5.0 installation folder.

I'm running into an issue with a combo box and the mouse scroll wheel. Even if another field on the screen is currently selected, the user moving the mouse scroll wheel while the cursor is over a combo box, its value will change and I haven't been able to keep it from happening. I thought that an Event/Exception "Other" procedure might catch the prev/next-wheel events documented for a paged list but those don't seem to be raised and I don't see a W$MOUSE option for it either.  Was wondering if anyone has run into this before or if there is a work around I'm not thinking of?   Thanks,#mouse#wheel

Trying to change from printing in Unix to printing in Windows.  Using BIS and XML so can not use dialog boxes as the XML suppresses them.  Does anyone know how to assign the windows printer through the cobol program?#wearetryingtoprintdirectlyfromtheBISserviceprogram.

Hi All, I need your help again guys i have a indexed file here Called "CalledProgs", this file stored Program names now i am required to write a program that will loop through all these program names and search for program names stored in each.  Don't be confused these program names also contained different program names stored, i have written a code here below which i used to retrieve these names from an input file called Mainmenu.cbl. now i am required to continue with this code by means of reading this indexed file with was an output file when i was calling for the program names.  now i am tasked to read from each program name the program names written on it and Add to the same output file "CalledProgs". i hope its clear, below is the program i used to retrieve these called program names that are in the output file.     PROCEDURE DIVISION. *===================* *---------------------------------------------------------------- DECLARATIVE

We currently have clients running an RM Cobol runtime (ver 12.05) and clients running BIS (ver 12.01).  Processing speeds vary greatly between the two when running reports and long processes.  Our end-of-day processing on larger clients can take up to 15 mins in the BIS environment but the same programs executed thru the RM Cobol runtime can take up to 2 hours.  Does anyone know why this happens and what, if anything, we can do to speed up processing in the runtime environment?#RMCobol#BIS

I am trying to create oracle database tables from acu4gl vision files using cobol and .xfd files How do I setup the naming conventions to differentiate the vision file from the database table name.  Do I need to create 'another' set of .xfd files?

Team,   We noticed, Batch region ESMAC console is not able to accessing some time and during that time workaround we have killed the SEP admin process id's after that its working fine. But we need to know the permanent solution for this issue.  This is for Enterprise Server. kindly help us.  

I searched and searched for how to invoke something like ToString or Trim on a form object in Visual COBOL and did not find anything.  In my testing I found that the "::" works for "dereferencing" in Visual COBOL much the same way that "." works in Visual Basic.  To create a string the has a button in it, I can use this statement:  MOVE "Button name = [" & btnMenu::Name::Trim & "]" TO WorkString.This will result in "Button name = [My Button]"A numeric property value can be converted to a string using ToString.MOVE "Button name = [" & btnMenu::TabIndex::ToString("0#")::Trim & "]" TO WorkString. However, currently with version 4, while this works for the MOVE statement, this cannot be used inside a STRING statement.#method#VisualCOBOL#Reference#.net#dereference

Hello guys! I have a newbie question... I want to create a OK/Cancel message Box in visual cobol and I am stuck... All I want is to return a condition value (when I press OK return true and when I press Cancel false). The main cbl will recognize the value and do the other things. I have to create the messagebox from scratch?

When you try to install a license for Server Express or Server for COBOL and you get the error 'Product/version not found in PRODFILE' it means that the PRODFILE has become corrupt or is an old version and does not include the full product list.  You need to cd to $COBDIR/aslmf - cp PRODFILE PRODFILE.old- vi PRODFILE and delete all the contents of the file- Copy and paste the below in to the empty PRODFILE ans save it. =============PRODFILE================ Server for COBOL 040 001Server for .Net 040 002Server for SOA 041 001Server for Enterprise Edition 041 002Server for EE (CICS) 041 004Server for EE (JCL) 041 008Server for EE (CICS,JCL) 041 012Server for COBOL 003 001Server for COBOL 64-bit Edition 003 010Server for COBOL 003**011Server for COBOL 006 001Server for COBOL 64-bit Edition 006 010Server for COBOL 006**011Server for SOA 005 001Server for Enterprise Edition 005 002Server for EE (CICS) 005 004Server for EE (JCL) 005 008Server for EE (CICS,JCL) 005 012Object

Hi, We have installed the 64-bit relativity (ver 12.10.2015.304) driver on our Windows 2012 R2 machine running SQL Server 2012. In SQL Server, we have linked to the DB using the MSASQL provider and while working we are having problems where numeric fields are being truncated. As an example, the following query returns 14.00 where the result should be 14.45 select *FROM OPENQUERY(test, ' select orderno, LineNo, str(UnitCost ) from oslines where orderno = ''H21234'' and LineNo = 1 ') The same driver works great in SSIS so I know the ODBC is ok, it's just the SQL Server. I'm hoping its simply a configuration issue but I've fiddled with the available settings I could find to no advantage. I'd be grateful if anyone had any tips! Thanks, Scott#relativityodbcsqlserver

We've got Micro Focus to transform our COBOL code to the managed code and leverage it. For deployment, I was wondering that is it anyway to prevent us to install the whole Micro Focus on the Host machine and just using the dlls. This question is also for setting ADO connection instead of using GUI to set it up,

Problem: On Linux/Unix, a COBOL program can call a C function within a library using INITCALL, but on Windows, it gives error: 173 Called program file not found in drive/directory. Resolution: INITCALL loads the dll/so, but it needs to know what entry is being called within it.  One way to achieve this is by having the same entry name as the binary module itself.  However, there might be several entries in the dll/so that would need to be called separately. In this scenario, INITCALL behaves differently in Linux/Unix compared to Windows. When the entry and the shared object name are different, on Linux/Unix, the entry can be called by using the "-e name" flag at compilation time. On Windows, if the Cobol program cannot find an entry with the same name as the dll/so, the first entry in ordinal position is called. To change this behaviour, any entry within the dll that is to be called by COBOL must be exported. For this, a .def file must be created for the dll containing the

Using Netexpress 5.1 with a Dialog System proyect I use a List View Box. When I compile my main program with 78  dialog-system                   VALUE "DS".     *> = debug everythink works as expected. The Event  "USER-EVENT" works properly and detects perfectly the conditions SELECTED, ACCEPTES. Of course I must always clic on the Debugg Box "CONTINUE" If I make the only Change in the main program 78  dialog-system                   VALUE "dsgrun". *>NO debug and everything else exactly the same, the USER-EVENT is no longer detected and all the involved instructions are not executed. Any idea what else must be changed? Thanks for any help.