Rocket® COBOL

Right now we have Adobe X.10 and the print command works wonderful for printing a PDF through the network to network printers. Once we upgrade to Adobe XI that no longer works. I knew it would come someday. Has anyone gotten a free method to work. I have checked the internet and found one possible fix. Wondered if Visual Cobol users, found another solution.#Abobeandprinting

I'm using the ACUXDBC driver to update a single field in an UPDATE statement. My statement is thus: UPDATE Orders SET RECORD_DATE = '2015-02-27' WHERE TRANSACTION_NUMBER = 906944200 When I run the above statement I get the following error. ERROR [HY000] [TOD][ODBC][GENESIS]VISION: Cannot update 'Orders',Record not found The only problem is the record *does* exist because when I do a SELECT as in: SELECT RECORD_DATE FROM Orders WHERE TRANSACTION_NUMBER = 906944200 It finds and returns the correct value for the row in question. So I know the record exists, and I know it can be found, but for some reason the XDBC driver is telling me that it cannot be when I try to do an UPDATE. I have tried updating a different field in the same row and it works fine. This statement runs without any problems. UPDATE Orders SET mkting_unit = 1 WHERE TRANSACTION_NUMBER = 906944200 Any thoughts? Appreciate it!#AcuXDBC#update

Dear Chris, I am using MF Server Expres  5.x and my program is calling an Stored Procedure. When y put EXEC SQL                CALL TESTGENERICO (:L991C-MENSAJE) END-EXEC. The program Run... When I Put MOVE "TESTGENERICO" TO PROCNAME.            EXEC SQL                CALL "PROCNAME"  (:L991C-MENSAJE)           END-EXEC. The program DONTS RUN...... Any Tips abiut This ??? PJM

Hello, i have Version     of Server for COBOL 64-bit Edition I have licenses for AIX 6.1I bought 10 licenses.I always used 9 licenses. Installed Sys --------- --- ------ In Use/ opt / microfocus / Cobol 10 0 9 64-bit Server Express (Model 2)I will wish to free them but I can not.What command do?I tried the command# / opt / microfocus / sx51WP6 / lmf / k lmfgetpvThis changes nothing.Could you help me to release these licenses?thank you,#cobolnetexpress

tried using the download link in the email and it comes up with a "Server Error in '/' Application." error Runtime Error Description: An application error occurred on the server. The current custom error settings for this application prevent the details of the application error from being viewed remotely (for security reasons). It could, however, be viewed by browsers running on the local server machine. Details: To enable the details of this specific error message to be viewable on remote machines, please create a <customErrors> tag within a "web.config" configuration file located in the root directory of the current web application. This <customErrors> tag should then have its "mode" attribute set to "Off". <!-- Web.Config Configuration File --> <configuration> <system.web> <customErrors mode="Off"/> </system.web> </configuration> Notes: The current err

I'm trying to read and right from flat files in codebehind in a web app project. It works the first time through. Subsequent executions create the error message below until the default app pool is recycled in IIS. I've heard from other users that maybe flat files can't be used in codebehind. Is this true? Do I need to call a separate COBOL program to use a flat file? I would like to avoid making a call every time I want to access a file, because each call requires several lines of code to use a rununit to handle multiple users accessing the webpage simultaneously. Here's the code causing the issue:        class-id WebStressTest.LOGON is partial                 inherits type System.Web.UI.Page public.                  ENVIRONMENT DIVISION.        CO

There is a way to show the value a field pic 9(09)V99 in a MaskedTextBox? In my test the value is distorted. I would like to SHOW the following result in MaskedTextBox. R$  1.500.25 Visual Cobol 2.2  .NET Thanks,

Hello (again). I have a program that reads records in a .txt file. Depending on the content of that fileit will determine what program is to be CALLed next. The records are read into a structure in WORKING-STORAGE SECTION. The content of the txt file is written manually. http://puu.sh/hhyKO/3210509123.png If someone is very interested: http://pastebin.com/bjWsUUtN The CALLed program displays "hello"... The main issue is that TBN01002Tbe called. I have displayed f1-prg and it displayes TBN01002T, so I don't see howTBN01002T could be a problem. Any help would be very appreciated! - Thomas #COBOL#call#EVALUATE

Why, when I set a variable to a new instance of List[string], do I get an IList[string]? They aren't interchangeable and by giving me an IList[string] I have no access to any properties or methods not part of the IList interface such as AddRange which is a method of the List class but not part of the IList interface.   This seems to be a bug in your .NET implementation. What do I need to do to get a fully functional List[string] object? Thanks.#IListList

OK, I have put together a scenario where I have a Native Console COBOL program code calling (invoking) a Managed Win-Forms COBOL program code (class/method).  This was based on the CCW tutorial plus lots of additional assistance with things like Interfaces (thanks all!).  I have attached what I have so far in 2 zip files (2 different solutions - one for the caller and one for the called). My question is:  How would I also "call / invoke" this very same code from another Managed program code (class/method) - (another Managed solution) ???

I am going to be downloading a copy of Visual Cobol on my labtop and am wondering do I need to install a Visual Studio copy to edit and work with the programs?

Hello, I am trying to display the value of a data item in a textbox in a managed COBOL program. The variable is defined   01 DecimalValue PIC S9(5)V99 and contains the value 99.00. When I put that value into a textbox   set textBox1::Text to DecimalValue::ToString() it displays as 9900. I tried   set textBox1::Text to DecimalValue::ToString("N2") to get two decimal places but that just turned it into 9900.00. Now I am a C# developer and know little about COBOL but I think I know why this is happening; the V is a virtual decimal point and not really there at all. I assume in a native COBOL language like AcuCOBOL the V gets replaced with a "." when the value is displayed but in .NET this doesn't take place and the value is always seen as 9900. Then the ToString("N2") method adds a ".00" to it. This is, of course, not what I want. So my question is how to get the value into the textbox formatted the way the pic clause is defined? If I assign the value to a .NET Double

We are trying to certify our app with the 9.2.4 web thin client plug-in and IE11. When our app starts we start an IE session with the <OBJECT> tag as described in the Internet Programming documentation. For earlier versions of IE, we then shutdown the IE and ActiveX/cobol session at the same time using a button in our application (with some VB6 code) but we are now reviewing the shutdown process with the new runtime and IE11 due to some issues unique to IE11. Microfocus advise that they have no sample code and that there is no easy way within ACUCOBOL-GT to exit IE and the COBOL program but suggested trying an exit procedure such as the CBL-EXIT-PROC library routine. Has anybody been able to successfully achieve a graceful shutdown of IE and Active X/cobol program (at the same time) using cobol and if so can you share what you have done? #ACUCOBOL9.2.4#ActiveX#IE

In the Samples supplied with Visual Cobol you find examples on how to call (native) Cobol code from C#. But, what about the other way 'round? Calling C# from Cobol? Enter this as a search and you find nothing. Maybe this will be of help to those of you, who are not aquainted to mixed language "calls". Looking into the Web you find thousands of examples of C# coding. Samples regarding XML, LINQ and whatsoever (see CodeProject i.e.). You can easily integrate these into your managed Cobol applications. All you need to do is set "using System.Runtime.InteropServices" in the C# code added to your solution. Of course the methods need to be public like: namespace myClass public class Class_myClass public string[] DoSomething() // the method. string arrays are an easy way to define return values // define the string array to return values string[] lst = new string[10]; // here 10 values // write the code and then return the values  lst[0] = value1.ToString; l

[Migrated content. Thread originally posted on 14 February 2011]Hi,i'm testing Visual Cobol with Eclipse and want to make an xml file.When i use organization is xml, eclipse gives me a compilation error.Documentation is here :community.microfocus.com/.../7252_XML_Syntax__SELECT_ClauseBest regards,Renzo

Problem: Is there an example of creating a simple web service that combines using Visual COBOL for Eclipse and Visual COBOL Development Hub? Resolution: Attached is a tutorial that will demonstrate how a simple COBOL program can be used to generate a web service running on a remote Linux or Unix system using Visual COBOL Eclipse 2.2 update 2 on Windows and Visual COBOL Development Hub 2.2 update 2 (DevHub) on RedHat. Visual COBOL Web Services Tutorial for Eclipse Remote.pdf

Problem: Is there a simple example of creating a web service using Visual COBOL for Windows Eclipse? Resolution: This tutorial will demonstrate how a simple COBOL program can be used to generate a web service using the Visual COBOL for Eclipse 2.2 Update 2 product for Windows. Visual COBOL Web Services Tutorial for Windows Eclipse.pdf

Problem: Is there a simple example of creating web services using Visual COBOL for Visual Studio? Resolution: Attached is a tutorial that will demonstrate how a simple COBOL program can be used to generate a web service using the Visual COBOL for Visual Studio 2.2 Update 2 product.   Visual COBOL Web Services Tutorial for Visual Studio.pdf.

Let me start by saying that I'm very, very new to Visual COBOL.  I have been programming primarily in Visual Basic since version 3 (now VB 2013).  I have written many applications through the years for work, friends, and for myself. I have downloaded the Visual COBOL v.2.2 Personal Edition from Micro Focus in attempts to learn from and to possibly help my coworker who is having a lot of trouble trying to learn Visual COBOL (purchased version).  I would like to know how to take the following code (Visual Basic) from one of my classes in one of my projects and write it in Visual COBOL (again, personal edition): Imports System.Data.SqlClientImports SystemImports System.IOImports System.CollectionsPublic Class LocalSQLDB    Public Shared Function GetConnection() As SqlConnection        Dim myConnStr As String = ""        myConnStr = "Data Source=localhost\\SQLEXPRESS;Initial Catalog=MyDatab

Hi, I would like to know whether it is possible to write a COBOL function that returns a true or false value so that one can write:     if myfunc() then <true-branch> else <false-branch> end-if. I can write functions that return values "t" or "f" (or 1/0, or "TRUE"/"FALSE", or whatever) and then write:     if myfunc() = "t" then <true-branch> else <false-branch> end-if. That "= ""t""" seems like something I should not have to do. I read somewhere abouit using PIC 1, where B"1" is true and B"0" is false. I wrote a function using that but the callers do not compile. To expand that:     function-id. myfunc prototype.     linkage section.     01  l-result pic 1.     procedure division returning l-result.     end function myfunc.     ...     if myfunc() then     ... I see a compiler error on the ')' of the function

When our customer migrate our application Acu 32 bit from W2008 to W2012, they note extreme slowness.  They  report us: "if we try to use a single processor instead of one multiple performance improves". This occurs with all 32-bit runtime (8.1.2, 9.0.1, 9.1.0, 9.2.1, 9.2.4) Has anyone had these problems? #runtime#windows2012#ACU

Has anyone ever used W$PROGRESSDIALOG to track C$COPY or are there any examples of how this is used?  In my test program, regardless of how long the C$COPY takes, the progress bar does not open until the copy finishes. At that point it opens, progress goes from 0 to 100% and then it closes.  From reading the documentation it seemed that setting WPROGRESSDIALOG-C-COPY before I begin the copy would mean there is no need to use WPROGRESSDIALOG-SET-PROGRESS. I've also tested with a call to WPROGRESSDIALOG-RESET-TIMER before the copy but there is no change.  Below is the code I am currently using. * Load-To-Server. perform Progress-Setup. call "C$COPY" using src-file-name(1:src-fn-sz)     temp-import-name     giving fileops-status end-call. perform Progress-Destroy. . * Progress-Setup. | create progressdialog call "w$progressdialog" using WPROGRESSDIALOG-CREATE, "title" "message during cancel&quot

Hola a todos! uso Acucobol. pero ultimamente con las plataformas de windows 8.1 y Server 2012 he notado que la lectura secuencia de archivos VISIO es muy lenta tanto que el usuario se desespera en la operación. ALGUIEN TIENE UNA SOLUCIÓN PARA ESTO? #slowacucobolserver2012windows8.1

We develop with AcuBench and run our applications from a UNIX platform using Thin-Client.  We have tried everything we can find in attempt to get a new Icon to appear for our application (putting ICON variable in Config, Setting ICON in Properties of screen, etc)...the default Acu icon is all that will ever appear?!? Does anyone have ideas of how to make this work? Attached is the icon file we are attempting to use.

Hello, I'm developing in an application installed in a Windows 2003 server. The users connect to the application with mapped drives from their Windows pc's. The trouble occurs when two or more users access simultaneously to the same vision file. The first one, can runs the whole file in about 2 seconds, but the second one runs the file in about 1 minute. I'm using 8.1.3.1 version and executing cobol programs with wrun32.exe The mapped drive seems to work fine, i can open the folder, copy files and open them with no retard. How can I solve this? #extend#Windows#COBOL