Rocket® COBOL

Using Cobol 2.2 on Suse Linux 11 sometimes receive error 9/057 and i dont know the meaning of this error. I search the entire file status description and nothing, this forum and nothing. The source program includes $set(RM) in the first line because the original program where develop with RMCobol. My questions is, what is error 9/057 and what situation produce this message? Thank you in advance, Enrique Vera.

We have developed a multi-User system, and to access the system, do the reading configuration file. In this file I have the folders where are the database and other paths used by the system.   To make communication between the programs we use variables EXTERNAL   01 w-directory pic x (256) external.   To call a program starting from the main menu use the following syntax          method-id cloToolStripMenuItem_Click private final.        Local-storage section.        01 newForm1 type MMCliente.Form1.        procedure division by using the value sender object and the type System.EventArgs.        invoke type MMCliente.Form1 :: New () returning newForm1        invoke newForm1 :: Show ()        end method.   The problem is

I am trying to use GO TO statement to change the program flow of the main program which controls my winform screen execution. But VS 2013 throws below error even though i have declared the procedure name. Error 73 COBCH0301 : Unrecognized verb Error 74 COBCH0348 : Procedure name ASFFSAFGHAHSDHG undeclared, line 50 (first usage)  EX: procedure division. invoke type System.Windows.Forms.Application::EnableVisualStyles() set FormSTKR to new WI100.STICKERSCR() invoke type System.Windows.Forms.Application::Run(FormSTKR) set mainForm to new WI100.WI10000SCR(FormSTKR) invoke type System.Windows.Forms.Application::Run(mainForm) set Form10010 to new WI100.WI10010SCR(mainForm) invoke type System.Windows.Forms.Application::Run(Form10010) if Form10010::ScrXmit = "X" go to mainmenu-screen      ------> error 74 end-if mainmenu-screen.               -------> error 73 if true display "test" end-if goback. end meth

moved to enterprise server#cannotstatcobrun32

Does anyone have an example of GridView (Web aspx) without using the database?I'm using Cobol native files, is to populate a GridView that way?Thank you Alguém tem um exemplo de GridView (Web aspx) sem usar banco de dados ?Só estou utilizando arquivos nativos Cobol, tem como popular um GridView dessa forma? Obrigado

I cannot get Visual COBOL for Visual Studion 2015 to install. No errors, just a hang which does not resolve. Has anyone had a similar experience? I cannot get anything out of Microfocus whatsoever on this problem. They haven't even bothered approving my supportline registration. Many thanks

I am trying to query relativity via the 64-bit relclient64.so that is included with the dataserver_2.1 installation. Whenever I try to query a decimal value, the program segfaults. the very simple test program runs the query  (I am using convert here to force the decimal value -- but when I query an actual decimal value out it has the same result). I have installed and tested this on both redhat 5 and redhat 7, getting the same results.  Changing the query to CONVERT(10.0, SQL_DOUBLE) ends up working with no issues, as well as CONVERT(10.0, SQL_INTEGER) The Query...SELECT CONVERT(10.0, SQL_DECIMAL) test_val FROM <test_database> The connection string....Driver=relativity;ServerDSN=staging;ServerName=<servername>.1583;UID=<username>;PWD=<password> odbcinst.ini [relativity]Description=Relativity Data ClientDriver=/opt/relativity/lib/relclient64.soSetup=/opt/relativity/lib/relclnsu64.so the GDB backtrace... (gdb) bt#0 0x00007fffec2ded9d in _pfnXtcGetCvtP

We're converting some REALLY old mainframe code to VC 2.3 for VS 2013 and we are getting a COBCH1710 when a Level 66 data item is referenced in the Procedure Division, specifically as an operand in an IF statement. I've dug around in the product documentation and can't find anything that says Level 66 shouldn't be used in managed code, but I've missed stuff in the past. Does anyone know of a restriction of Level 66 data items in managed code?

Hi, I am new to the tool AcuBench 9.1.2, I'm doing a simple program that connects to a database in SQL server but I could not make the connection with the database I have reviewed on internet ' supportline.microfocus.com/.../wwhelp.htm&; , where they mention you should change a dll but I really can not find where in the settings I find this, I've already configured to recognize me SQL statements, by PROJECT SETTINGS option , -COMPILER , -Pre COMPILER OPTIONS, CHECK THE BOX ENABLED  ( -pk (MSSQL ) ), (- Ps) , and I guess it is leaving the option ( -PC ) CONNECT TO DATABASE but when I give the -Pd option appears only me 'MS Access database' and not my database......................... thank you can help me

I have a file definition that has group elements and redefines. That has a section that looks like this. 10 IXKEY1           in positions 1 to 51   15 IXTYPE PIC 9(01)  in position 1       88 IS-CUSTOMER VALUE 1,6       88 IS-BLANK VALEU 3 THRU 5,7       88 IS-VENDOR VALUE 2   15 IXITEM PIC X(20) in position 2 thru 21   15 IXCOVN PIC X(10)                                                      in positions from 22 to 31  15 IXCNBR REDEFINES IXCOVN     20 IXCUST PIC X(07)     20 IXCSEQ PIC 9(03)   15 IXSUBN PIC X(20)  &nbs

New to Relativity and not finding documentation on all the various dll files and drivers. Can anyone give me a listing of the various dll files and drivers and how they are using them?  From what I have obtained so far the Data Manager driver would be used by Designer for DSN access to the catalog, but you are also able to select the Data Client, Data Client for ADO, Relativity DBA, and Data Server in the Designer product. If I understand correctly the Data Client for ADO is used in SQL linked servers and also for other Visual Studio projects that need to access the Cobol data. Is that correct and what about the other drivers? Also I am working with another developer to have connection strings into the catalog - since I set up the DSN using the Data Client for ADO does that mean they need to use one of the dll files under Relativity Data Client folder?  All replies appreciated. This is what I see and I just need direction is what to share with my developer that is relavant.

Anyone having success with Relativity and being able to treat numerics like SQL where you can encase with single quote?  In SQL for an int field select * from table where add_date = '20160701' works the same as select * from table where add_date = 20160701. However with Relativity this field is a PIC 9()8) and running without the single quote works but using the single quote I get message INCOMPATIBLE TYPES IN PREDICATE. Trying to save a boat load of code changes as we are migrating to Relativity from an ODBC connector that worked like SQL.#Reativitynumerichandling

Hello,please I am debugging Cobol on SunSystems 5.2.1 via MF Net Express 3.1.11 SP1. So I am on virtual machine with Windows XP.But on debug when I am not quick enough I got this message: "The sunsystems server is unavailable. Since there are no remaining functions open SunSystems will now close down."If I am debugging quick everything is going fine.Please can anyone help? Is there any setting for that?I found only in SUN root directory file SUN5.INI and there this option:CCI-Time-Out=3000I try to set this to 9000 but no change.Thanks for any help.#netexpress3.10#COBOL

Working with a developer to access Cobol data via Relativity from Visual Basic applications and I am being asked for the connection string or dll that needs to be used. I know I need to use the ODBC connection for Data Client ADO, but I am being asked for an example of others that have this step already working. Can anyone give me a small piece of sample code with a connection string?  Thanks.

Hello, How I can detect which is the default printer in windows? I've done various experiments and should not walk away.If you use PC_PRINTER_INFO PC_PRINTER_OPEN after the printer is set by default prints a blank page.If you use PC_PRINTER_SET_DEFAULT opens a window to select a printer.In both cases I can know the default printer but is not very good print a blank page or be closing a window. Thanks Alberto Ferraz

Hi Apologies if this has been answered bfore, couldn't find it on the forum.  Is Visual Cobol 2.1 for Visual Studio 2010 compatible with Windows 10?  Just installed the trial on a new Windows 10 computer and it seems to be working ok but I want  to be sure.  We will soon be upgrading all our PC's to Windows 10 (currently on XP) but still want to use VC 2.1 for the moment.  Also, is Cobol Server 2.2 and 2.3 compatible with Windows Server 2012? Thank you Brendan

I'm using version 8.1.00 rmcobol in windows 10. The subprogram C$GetLastFileName  returns only the filename without the full path . On Windows7 working properly! Any suggestions?

Many years ago AcuCobol provided a sample program using an Active-X control for a multi-select List Box. Since then, has this functionality been built in to the Extend product line? I am using Extend 10 and need to create a multi-select List Box. Is Active-X still the only way?#ActiveX#acubench#multi-select#listbox

My Cobol server is running in Linux and I am using Relativity to populate some data to a website. I have a linked server setup using the 64bit driver. First off looking to see if anyone else has experience using Relativity in this manner as currently the only way I can see data is to use OpenQuery with my linked server. In this manner my alphanumeric data is showing properly, and regular integers are okay, but decimal numbers are being stripped off such that 1.987654 shows up a 1.0 and is causing countless issues. In my case the field has a picture clause of 9(06)v9(06) and was pulled as an import from my file definition and using a tool like ODBC test shows proper data. So my problem appears to lie with OpenQuery and possibly the way Relativity is defining my data for sharing with Open Query. Any help would be greatly appreciated.#RELATITY#decimalpoint#linkedserver

Hi Up to now, In Net Express, and Visual Cobol indeed, we have been able to print directly to Adobe PDF by setting the default printer to Adobe PDF and using the PC_PRINTER... routines.  We would typically call PC_PRINTER_OPEN with flags set to 4 or 8 to define orientation.  A dialog box "Save PDF File As..." is displayed and we press the Save button and the PDF file is created and Adobe is opened and that is all fine. Now, in Visual Cobol we are looking at using the System.Drawing.Printing.PrintDocument class and the Print() method to make use of better pormatting.  This works fine when the default printer is an actual physical printer.  With the default printer set to Adobe PDF the process just hangs when the Print() method is called, a message box appears saying it is printing page 1 of the document but the PrintPage event handler is never executed.  Changing PrinterSettings::PrinterName in code has the same results. It what I am trying not possibl

We do see some compatibility issues between MF Cobol (Unix) and Visual Cobol (Windows) on Visual Studio. Can you please let us know how to mitigate 1) Comp-3,Comp-5 or packed decimal fields does not get compiled. However when changing to Comp it gets compiled 2) Reserved Keywords compatibility issues like "OPERATOR " Do we need to add any specific compiler options or any libraries .Kindly advise #Comp-5#COMPILER

We're running some legacy executables developed on NetExpress 5.1. They run under Windows 7. We are in the process of converting to another platform but need to keep these running until... I'm testing on a Windows 10 machine and am getting a Load error from cblvios.dll that says error code: 174, pc=0, call=1, ser=0  174 Imported file not found(N:cblvios.dll) Does anyone know what it's looking for? Any suggestions appreciated.

How can I retrieve the path of the currently executing RM/COBOL program? I am making command-line calls via CALL "SYSTEM" and need a way to route the output depending on where the program is running.#rm#COBOL

I try to learn COBOL  a little bit more deeply with VISUAL COBOL,  But I feel hard to understand someone's code like this: ******************************************************        identification division.       program-id. gip2trbl.       environment division.       configuration section.       data division.       working-storage section.       01 TRBLINP-TYPE          PIC  X(01).         01 TRBLINP-SEARCH-DATA   PIC  X(40).              LINKAGE SECTION.                          

Hi, in Server 5.1I have dfconv.lbr in Cobol Server 2.3.1 have dfconv.exe the same command line that work on server 5.1 "run.exe dfconv d:\\tmp\\flsetl\\mnt\\gluster\\pocs3\\prod\\sw\\prod\\xx\\conb\\scripts\\utilities\\conf\\flsetl.PRO d:\\tmp\\flsetl\\prod\\dati\\work\\utilities\\tmp\\txt2dat\\2016-06-27-17.10.32.473816485-14728\\flsetl.SRT d:\\tmp\\flsetl\\prod\\dati\\work\\utilities\\tmp\\txt2dat\\2016-06-27-17.10.32.473816485-14728\\flsetl-CRE.dat" write the output file : d:\\tmp\\flsetl\\prod\\dati\\work\\utilities\\tmp\\txt2dat\\2016-06-27-17.10.32.473816485-14728\\flsetl-CRE.dat d:\\tmp\\flsetl\\prod\\dati\\work\\utilities\\tmp\\txt2dat\\2016-06-27-17.10.32.473816485-14728\\flsetl-CRE.idx don't work in Cobol Server 2.3.1 "dfconv.exe d:\\tmp\\flsetl\\mnt\\gluster\\pocs3\\prod\\sw\\prod\\xx\\conb\\scripts\\utilities\\conf\\flsetl.PRO d:\\tmp\\flsetl\\prod\\dati\\work\\utilities\\tmp\\txt2dat\\2016-06-27-17.10.32.473816485-14728\\flsetl.SRT d:\\tmp\\flsetl\\prod