Rocket® COBOL

In Visual COBOL 2.1 for Eclipse, I'm trying to build a JVM application that I would want to deploy on z/Linux, so created a  COBOL JVM Class, coded the statement  $set ilusing"com.ibm.mq", add a JAR to the JVM Build Path in which package com.ibm.mq exists, then wrote the line of code   set mqmanager to new MQQueueManager(qMgrName)  in a method within the class. I cannot get the compiler/builder to recognize MQQueueManager as a class that I can access. I get the error message "COBCH0845S Unknown class 'MQQueueManager' " I added some ilusing statements for java.lang, and can quite happily access classes like Integer. I'm very new to this environment including object COBOL, but I think I've set up everything I should to have my class invoke a java class. So, what am I doing wrong.    

Hi I am using visual COBOL for Eclipse, I want to know exactly ho to connect to mysql or oracle database and start using EXEC SQL statement using native cobol best regards#COBOL

Hi all, i want to write with C$XML the following string to an xml: "1.223,36 €". The problem comes obviously with the euro symbol. I initialize the parser setting encoding to "UTF-8"   call "C$XML" using CXML-SET-ENCODING export-parser "UTF-8". I observed that on the runtime side the euro symbol is correctly encoded with the ascii code 128 (i saw it using function ord(), 129 - 1). When i create the xml and open it with notepad in utf-8 encoding i see no symbol where the € should be. Looking at it with an hexadecimal editor i see that there are 2 bytes allocated where the € should be and their content is c2 80 or, in decimal, 194 128. I found on wikipedia that the encoding of € in unicode is 3 bytes E2 82 AC. I also tried to set the "us-ascii" encoding with CXML-SET-ENCODING but it doesn't work; with this encoding i would expect an header like <?xml version="1.0" encoding="us-ascii" standalone="no"?> while what i obtain is <?xml versio

I created a multi-line entry control, but not sure how I can retrieve each line separately. If each line of entry is one email address, how can retrieve each of these line?  Does any one know?  Can you help?  Thank you for your help! Thi#acubench

We have a native DLL called WN99.DLL, which has a number of programs named WN99???.  Our application is mostly native but we are starting to add managed functions to it.  When we start up our application, we load WN99.DLL  in our native driver program with: SET PROC-POINTER TO ENTRY "WN99.DLL" All of our object, both native and managed, is output to the same directory.  I was able to call a native WN99 program from a managed project without doing any further handling.  When another programmer ran the same managed code, he got an error 173 on the call to the WN99 program.  We fixed this in one of two ways, either by adding a reference in the managed project to WN99.DLL or by doing  the above SET PROC-POINTER statement in the first managed program that got run (we have a little managed program which is run when we start our application and its purpose is to do any necessary preloads of DLL'S).  Is it true that native DLL's that are called from both

I'd like to animate a cobol program and stop animation on a field value change - i think the documentation says to do a breakpoint until - but I don't see how to set this up while animating... the field value into the program is "2000089" - it would change to some other value like "200089.0000" if it's thru the 'B'reak - that sub menu shows me set, unset, cancel-all, examine, if, do, on-count, zoom not sure where/how to find until anyone know how to do  

Does any one have experience with printing from CGI in IIS7? We are attempting to print using -Q \\\\user\\printer;DIRECT=ON but the print job ignores this and goes to a printer of it's choosing. (Not necessarily the Windows default printer on the iis machine.) WIN$PRINT will not show the installed printers. WINPRINT-SUPPORTED returns a 1. Ant help would be greatly appreciated. Thanks,Steve#CGIIIS7WINPRINTER

Hi, Can anyone tell me the appropriate cobol picture clause to use on a host variable to access a VARCHAR(MAX) column please ? Currently we have this defined as PIC X(32000) but when interrogating the esql statement generated in Sql profiler this appears to get converted into a TEXT data type which leads to an SQL error as we wish to use RTRIM. We need to be moving away from using TEXT data types as Microsoft are indicating they intend to withdraw support. Any advice would be much, appreciated. Thanks

Hi, I have some trouble when i try to "debug" an application in Visual COBOL.  I looked in the documentation but I havn't found a solution. When I run my application, I give it a buffer of several thousand character, i run it on java like this : Reference ref = new Reference(); ref.bytes = "000A003 [....] 030303030".getBytes(); MyProgram program = new MyProgram(); program.MyProgram(ref); But now, i want to debug my Cobol using Visual Cobol, but i don't know how to pass this buffer to my program. How can i do it ? Thanks, Regards#buffer#VisualCOBOL#debug

The build of project ACU2MFDataMigration gives me an Unkown build error; Object reference not set to an instance of an object, line 269 in file Microsoft.WinFX.targets. I use VS 2012 en VC 2.1 on windows 7 and VS is very new for me. Who will and/or can explain to me what is wrong.

Hello, Can someone help me translating this VB code? Private Sub Form1_Load(ByVal sender As System.Object, _                         ByVal e As System.EventArgs) Handles MyBase.Load     ' Create the list to use as the custom source.     Dim MySource As New AutoCompleteStringCollection()     MySource.AddRange(New String() _                         { _                             "January", _                             "February

We have been succesfully porting our legacy app to the Thin Client but now need to replicate a lot of our reports. AcyBench is horrible when it comes to report writing. Is there an alternative for this? A large amount of our reports are written in troff but I am looking to have more reports that are written through the app and would be made availabel to the thin client user instead of having it done through the server.

I need write a program can use tapi32.dll. I use acucobol compiler. my problem is understand how transform code in cobol. I call Tapi32.dll. :          SET ENVIRONMENT "DLL_CONVENTION" TO "1" :          CALL "TapI32.dll" :                ON EXCEPTION :                   DISPLAY MESSAGE BOX :                   "Message: Tapi32.dll not found" :                   SET ENVIRONMENT "DLL_CONVENTION" TO "0" :          END-CALL. and now i had to call for example "lineInitialize" function ex. LONG lineInitialize(  LPHLINEAPP lphLineApp,  HINSTANCE hInstance,  LINECALLBACK lpfnCallback,  LPCWSTR lpszAppName,  LPDWORD lpdwNumDevs ); Anyone can help me?

Hi, I have code that reads 1000 sql records and outputs the data to a datagrid. Normally the program looks like its "hung" until the sql code has finished. However I found the "DoEvents" function which I added, after each record has been returned, as follows:- invoke type "System.Windows.Forms.Application"::"DoEvents"() This works and looks a lot better but it has really slowed down the program. So I then found the following VB code but have no idea how to convert to Cobol code, can any one pls advise. Private Declare Function GetInputState Lib "user32" () As Integer Private Sub btnGetInputState_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGetInputState.Click ' 'This loop uses the GetInputState() Api call to check if any 'messages needs to be processed and decides whether or not to 'execute the DoEvents() method. Your application will NOT appear to 'be frozen while the code is runnin

Having build several Visual COBOL executables I want to deploy them onto peoples desktops. Rather than have a bog standard 'window' icon on my desktop I'd like to have them as small icons we've got artwork & images for. How do I build the executable so that these 'images' can be seen as the desktop icon rather than the 'window' icon?  

We are using 8.1.3 with no plans to upgrade anytime soon. We are needing to access some web services (using soap/XML).  A solution that works for both UNIX and windows environments would be best, but a windows only solution could work ok too. Does anyone have any suggestions for an easy, cheap solution to access web services from ACU 8.1.3? Where to start looking, or some sample code to share would be great. Thanks

We are getting ready to upgrade to Extend 9.1.2.1 from 9.0.1.Does anyone know of a way to get around the initial administrator requirement for installing the thin client on Windows 7 machines?  We have a custom installer that asks for and gets that permission, but if all the user gets is "auto update failed" because of the missing permissions, my phone is going to be ringing off the hook.  Currently the only way "around" it is to run acuthin as administrator.I am going to change the failed auto update message to hopefully head some of them off, but allowing the install to happen would be the best.

Hi, I use Net Express 5.1 under Windows Server 2008. I know Net Express has the functions upper-case and lower-case. My question is: Is there a Function or Module that converts String Fields into upper AND lowercase? For example: I would like to convert "JAN HENRIËT" into "Jan Henriët" or "RICK VAN DER BERG" into "Rick van der Berg" Thanx  

Hello. I'm trying to write variable length records to a SEQUENTIAL file. I don't want the trailing spaces to be removed. I add on two chars at the end of each record type and populate them with CRLF. My results are not what I expected. The output file appears to have binary characters and the rows are not the length of the value in WS-RECORD-LENGTH. My FD statement is:   FD MY-FILE          RECORDING MODE IS V          RECORD IS VARYING IN SIZE FROM 191 TO 370 CHARACTERS DEPENDING ON WS-RECORD-SIZE.    01 MY-RECORD.          05  MY-DATA     PIC X(370) In Working Storage 01 WS-TYPE1.                         (record length191)      05      05 WS-CRLF1   PIC X(2). 01 WS-TYPE2.                        (record length 3

Hello everyone, I am facing a problem executing a COBOL program as java on a remote unix machine. I think I am missing a piece of information to properly set/execute my Hello World program. I am using VisualCOBOL 2.1 with eclipse. I have created 2 projects, one local and the other one remote (HP-UX). On the local project (New->Cobol  JVM project), I have been able to New->Cobol Program, add a display call in the procedure division and executing the program. On the remote project (New->Cobol Remote Project) I have added New->Cobol Program and added my display call in the procedure division. Meanwhile, attempting to execute my program generated the following error: An internal error occurred during: "Launching HWJVM". java.lang.NullPointerException When I look at the Run Configuration, I can see that my local project will execute as a "COBOL Application" while my remote one as a "Java Application". There might be someting missing in my settings. Any idea? Is there a way

Hi, I debugg a COBOL-Prog. with the animator. When the execution arrives a DISPLAY-Command, the program run stopped. I work with LINUX and ServerExpress. What's wrong?   Michael  

I posted a while ago about passing information between programs so that a 'Status Strip' could be updated on a form showing the file data processing in real time. You kindly solved my problem. A new problem has arisen when I want to use a 2nd program utilising the 'same' code as as what was in the 1st program by way of the idisplayStatus interface method. When 2 programs with similar 'interface' methods are part of my main form references I get an error at runtime which says 'Method not Found 'Int32 ProgramX(idisplayStatus)' where ProgramX is the first of my programs utilizing the interface. Removing the 2nd program from my references solves the problem of running ProgramX and it runs through fine but I need to process two programs processing data in order for my job to work properly. Can you assist in a resolution to this please?

Hi, I have a unmanaged cobol dll compiled in Fujitsu Net Cobol. I have written a proxy wrapper OO cobol class in Microfocus Net Express 5.1 to call that unmanaged dll. There is no compilation error. But during runtime it is throwing an error that unable to load the specific dll. My question is that is it possible to call a Fujitsu Net Cobol unmanaged dll from Net Express OO cobol wrapper class. Will be highly obliged for quick reply as I am doing a POC on a trail version. Thanks in advance.#.netdllcobol#VisualCOBOL#netexpress#vb.net#.net

I need a little program example for use of C$JAVA call. Is anyone here in this forum?#CJAVA

We have a VB .net GUI front end and a back end in NetExpress COBOL. I am trying to call the NetExpress COBOL executables from the VB, which  worked in the past.  However, the setddldirectory is pointing to C:\\MPIUADEV\\MPIUA\\DEV\\visualcobol\\bin and it should be using the path where the NetExpress code is.  I don't know how it got changed and/or how to change it back to point to the correct directory,  SetDllDirectory()        If NativeMethods.SetDllDirectory(CobolDirectory) Then            NativeMethods.RMVBEBTCH(batchLinkage)        Else            Throw New EbixException("Unable to set COBOL Directory.")        End If        Return batchLinkage    End Function  Public Shared Sub SetDllDirectory