Rocket® Visual COBOL®

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

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

I would like to use Visual COBOL 2012 Personal Edition with Visual Studio 2013. So far, I haven't seen an installer for Visual Studio 2013. I was just wondering whether there is any harm in installing VCPE 2012.#VisualStudio2013#Installation#VisualCOBOL2012

Problem: When opening a solution in Visual COBOL for Visual Studio, the project may fail to load and the error message in Solution Explorer is "The project requires user input. Reload the project for more information". Resolution: When the solution project is located on a network drive, you may get this error. Right-click the project in Solution Explorer and select 'Reload Project', A dialog appears warning about an untrusted location. Click OK and the solution project is loaded successfully. SI2819793

Problem: Usually in a COBOL program we define the host variable as COMP to map directly onto the INT DB2 data type. When a variable is defined as COMP in the linkage section of a COBOL DB2 stored procedure for LUW, and you try to pass a numeric value to this variable from a COBOL program, you may get a value different from what you have passed. Resolution: DB2 is passing in the data to the stored procedure as little-endian on an Intel system. Defining the variable as COMP-5 in the linkage section of the COBOL DB2 stored procedure program solves the problem. See attachment for an example of a COBOL DB2 stored procedure and a COBOL program that calls it. SI2807407 db2sp.zip

Problem: In a COBOL Cobsql Oracle program, the following SELECT statement compiles OK but when run gets an ORA-01007: variable not in select list error.        WORKING-STORAGE SECTION.            10 VARCHAR-DATA. 49 VARCHAR-DATA-LEN  PIC S9(4) USAGE COMP. 49 VARCHAR-DATA-TEXT  PIC X(100).        PROCEDURE DIVISION.                  SELECT  VARCHAR                  INTO    :VARCHAR-DATA                                         FROM  XXX      

Problem: When using CALL "SYSTEM" USING command-line to execute a COBOL program and pass parameter to the program, the received parameter in ACCEPT passed-parms FROM COMMAND-LINE in the called program may contain extra values that are appended to the end of the string being passed. In the example below, you may get 'A B C ABC' in PASSED-PARMS, instead of 'A B C'. Calling program:        WORKING-STORAGE SECTION.        01  WS-COMMAND-LINE.            05  WS-CALLED-PROG                PIC X(08) VALUE 'PROGNAME' .            05  WS-SPACE-DELIMITER         PIC X(01) VALUE SPACE.            05  WS-P

[Migrated content. Thread originally posted on 04 January 2011]Considering that most COBOL apps store customer contact information one way or another, there should be nice opportunities for some CRM tooling, especially when we know how easy it is to interact with Microsoft Office using dot net in VISUAL COBOL.How about using Microsoft Word in conjunction with your customer database to mail a promo? All automatic of course :-)To use the following source example;* Make sure you have a C drive, and write access to the root of it. Otherwise change all filenames in the source to your preferred destination.* Make sure you have Microsoft Office installed.* Start up Visual COBOL.* Select File | New | Project.* Choose COBOL, Managed, Console Application.* Enter name, Location and Solution name as desired or use the suggested values.* Click Ok.* You should now have gotten the source file (Program1.cbl) editor.* To the right, you should have the Solution Explorer. If not, open it from the menu (V

In my very basic solution under Visual COBOL Personal Edition 2.2, I am getting the below error message when I try to view my form's design: To prevent possible data loss before loading the designer, the following errors must be resolved:The variable 'WCLRRTS' is either undeclared or was never assigned. I have did a find on my entire project and can find NO reference to this variable at all.  If I chose to ignore it, it always eventually shows back up.  My Visual Studio 2010 Professional is working fine as I use it almost daily as a programmer for my employer.  This is the strangest thing I've ever seen.  Prior to this, I got this error when I added another form and then deleted it from the project / solution.  I ended up deleting that project off of my hard drive and starting all over again.  Now I'm back to this error once more.  What is this in reference to?  I did not create it as far as I know.  Perhaps some process in the background c

[Migrated content. Thread originally posted on 19 April 2011]How I can move from one windows form to another with Visual Cobol?. And how I can create those on my project and I can Hide and Un-Hide?. Please let me know where I can find one example. My email is: jose61@pryma.ws

Chris, I was thinking that, within the same class, you could have multiple methods with the same name (ID), provided that each occurrence of the same-named method had a different and unique signature.  However, it appears from the attached demo that this is not true (?)... or. more likely, I have done something wrong.  See the attached demo which is an extension of your CCW Tutorial.  To test, go to the caller program and comment out the invoke of ManagedMethod2 and uncomment the invoke of ManagedMethod that is using custRecord and aNumber.  Also go to the called program and in Class1 change the method ID on the 2nd method from ManagedMethod2 to ManagedMethod.  Then debug.  You should get a parameter count mismatch error.  Not that when you put everything back the way it originally was, you don't get an error... it works (it's just not with using overloaded methods).  Maybe overloads don't work when you are doing OLE calling? Thanks,

Attached are the demo programs used in the OOP for COBOL Webinar Series: Webinar 4 - Collection Classes