Rocket® COBOL

Hello All,    Intel chip is little endianess (LE) wheres IBM and Solaris is big-endianess(BE) and this is causing me lot of trouble when I am trying to run my application on Linux platform (running on Intel chip set). Traditionally our application run on Sun Solaris based server, code gets compiled with Server Express ver 5.1 and executed in Dell Clerity Unikix TPE/BPE environment.    Now I want to run my same 32 bit COBOL-CICS application on Linux. My application is using COBOL pointers, Oracle database, MQ, C programs, assembler routines and I suspect that this LE and BE switch causes some problems. This could be either in different compiler settings  required for LE (as compare to BE), usage of comp/comp-4 vs comp-5. Errors I am getting are like 'Memory out of bound, program is trying to access memory not assigned to him', error pointing to insufficient access to Oracle database, while executing CICS commands error is "203   &nbsp

I'm passing this ISAM file record from native to managed, using com-interop:           03  RHS-REF-TRANS-HIST.           05  RHS-REF-TRANS-HIST-KEY.             10  RHS-TYPE-REC-ID       PIC X.               88  RHS-TYPE-REC        VALUE "R".             10  RHS-ENTY-CODE         PIC XX.             10  RHS-FSCL-YR           PIC XX.             10  RHS-REF-INFO.      &nbsp

Problem When attempting to Install Visual COBOL Development Hub, Visual COBOL for Eclipse, Enterprise Developer, or Enterprise Server for Unix or Linux, the following message is received. Problem backing up /VisualCOBOL to /VisualCOBOL.BKP..   ("VisualCOBOL" being the intended installation location of the Visual COBOL product.) Unable to continue with update of product.    Resolution It is possible that you are attempting to install in the root directory of a mount point.   The installer attempts to backup the existing directory to a name.BKP directory at  the same level, if the installation directory value chosen is an existing directory. For example, if the installation chosed, is /opt/microfocus/cobol, the installer will attempt to back up the directory as /opt/microfocus/cobol.BKP. However,  this is not feasible in Unix or Linux if the installation directory is the root directory of a mount point. You will need to specify a directo

Is it normal to have multiple acuserve.exe tasks opened, when I look into Task Manager? http://oi58.tinypic.com/2db5w28.jpg #AcuCobol#AcuServer#acuserve

Can you download both eclipse and visual web developer to the same machine and use either one for coding cobol programs?

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