Rocket® COBOL

I am running on Redhat and years ago when I had my data files with the index info split out I could do a "grep" of the data portion. Now when I try to quickly scan for something I get "Binary file X.LDF matches" Any suggestions?  I know I can use ODBC connectors and I do, but just looking for a quick utility like I used to have. Thanks for any suggestions.#grepidx8

Hi, I am migrating from Server Express 5.1 to Visual Cobol 2.3. I am getting error as connection name not found. I am using ESQL and Sub Program is calling Main Program. Connection is getting established in Sub Program but in Main Program its getting lost. Any Ideas? Thank You

Hi, I'm getting odd behaviour testing OpenESQL (VC2.3.2, VS2015, Windows10). I've previously only used native MF files but have used MySQL extensively with PHP online. My tests act as though MF DEBUG runs in it's own world. It doesn't actually update my MySQL database? I have a 3-col 'vatrates' table. Cols: id, startDate and vatRate. It has one row of data. My prog below inserts two more rows. No error is reported, Hence 3 rows. Next I run select/fetch - this gets the three rows, the old row and two new ones. Lastly the prog deletes a row - this seems to work and if I re-step through the select/fetch it returns two rows. HOWEVER, at any point during the above and after stop run... if i view the table in MySQL Workbench I only see the original row. If I re-run my prog it starts again as though only the original one row is there. Any ideas what is going on here? Program follows below.... Thanks, Linden ---------------------------- $SET sql(INIT DB=adbooker PASS=ad

My superclasse have a FD, like this: . . . End class-object. Object.Input-Output Section.File-Control.SELECT arqSYSCONF ... File Section.FD arqSYSCONF ... Object-Storage Section.01 InstanceData pic x(032). *///////////////////////////////////////////////////////////// The FD causes a problem in InstanceData. I move "ajSauro" to InstanceData and in the class that inherits superclasse, the value of InstanceData is an unexpected value. If I remove SELECT and FD, then it is OK. Anybody have a soluction to this? Hug Antonio João NextExpress Dialog System.#inheritswithdata

I have a main c# application that runs visual cobol programs. both project have different namespaces. In my c sharp project I have a logger class that I would like both projects to use. So far I've made a reference to the main project from the cobol project, used $set ilusing"namespace" added the namespace to the cobol project through the GUI. Nothing. I think I might be missing a bigger issue. Any ideas?

Hi all, How to simplify the user experience re. generating, viewing and printing reports in a Windows environment? Currently I display report output in an MF Dialog system window and have a [print] button to print using various MF COBOL routines, PC_PRINTER_SET_DEFAULT, PC_PRINTER_SET_FONT etc. The reports are basic using fixed-spaced characters to force column alignment. They look old-fashioned and text is small. HOW DO YOU PRINT from Visual COBOL? I'm wondering about launching a browser to handle the print so users can re-size, use browser's print / pdf-export etc. Any thoughts? I'm about to switch to MYSQL - perhaps you use a tool that reports from MYSQL directly? ANY THOUGHTS WELCOME. Regards, Linden

I have a Windows Form view a datagridview in my cobol program. During program execution I am editing the contents of a cell without leaving the cell, i.e. I am not hitting the Enter or Tab key.  Without leaving the cell, I am pushing a button (like a save button) outside of the datagridview on the same form. But because the CellEndEdit event did not take place, the contents of the cell in question has not changed. So I want to invoke the CellEndEdit programatically. The following code  invoke myGrid_CellEndEdit(). is giving me an error because of the missing parameters. Which parameters do I have to put here in the brackets? #dataGridViewCellEndEdit

This works in Oraedit, but now I'm trying to add it to cobol (as embedded) and can't even get it to compile...       EXEC SQL        SELECT case               when TO_CHAR(C.HOLLYDATE,'MM-DD-YYYY') =                   TO_CHAR(SYSDATE,'MM-DD-YYYY')              and C.STARTTIME <= to_char(sysdate,'HH24:MI')                      and C.STOPTIME  >= to_char(sysdate,'HH24:MI')               then  'TRUE'               ELSE 'FALSE'      END HOLIDAY &nbs

Problem: Many Visual COBOL projects may use the same EXTERNAL data files, this usually would require setting an environment variable for each file within an Application.config. How can these file mappings be achieved without the use of an Application.config? Resolution: Setting EXTERNAL file variables within a Visual COBOL project In the example below, an entry needs to be added to an Application.config file (Environment) in order for the physical file assignment for the SELECT clause to be resolved:   If EXTERNAL does not appear in the SELECT statement, the program must be compiled with the directive ASSIGN(EXTERNAL): To add an application configuration file, right-click your project in the Solution Explorer:     Click Add > New Item Select Application Configuration File Specify a filename in the Name field (or leave as is) Click OK Edit the Application.config; add the variable name and file name: Setting EXTERNAL file variables wit

Hello, (thank you very much for reply on my first question. It works.) I have this problem. I've been creating COM object in Visual COBOL that should create some visual object in window originally created in Dialog-System tool. I've been creating the COM object following way. I downloaded some COM object written in C# (including sources). Then I created code in managed COBOL that defines my COBOL COM object with some methods. I call these methods from my native COBOL code and these COM object methods call the C# COM object functions with parameters specified by my native COBOL code. Until this point everything works fine and the visual object is successfully created just as I want. But I'm not pretty sure how to join my COBOL COM object with the events of the C# COM object I need. I have class of COM object, interface for calling from native code and - and here I'm not sure if it's right - interface for events. But I don't know how to map the selected events or how to join method in my

Hello, I am trying to use Relativity with a JOIN command and getting the error "Literal not allowed in ON condition".  To build the key info on the join I have the following LEFT OUTER JOIN     INVXRF_RECORD ON     IXTYPE = 1   AND IXITEM = CREOITEM   AND IXCUST = CREOCNBR I know the value of IXTYPE for the records I am searching for will always be a value of 1 in this case. All of my assigned keys to the file INVXRF contain IXTYPE as PIC 9. This is normally a very quick query and I can kind of fool the system by saying IXTYPE = CBSTMT (which is another PIC 9 field in a different table that is part of the select), but it still takes way too long and then I have to be sure that for the records I am looking at that setting is always a 1. Any thoughts on how to get around this? It is really critical to our operation as we are switching from one ODBC connector to Relativity and this is kind of a show stopper.#RELATIVITYGROUPS

Problem: Error when starting a Fileshare Server: "FS077-S A Fileshare Server of the same name has already been defined" Resolution: The end-user was trying to start more than one Fileshare Server having the same name, though on different machines.  They were running ccitcp2 processes on each machine, and were not setting the CCITCP2 environment variable on any machine.  This conflicts with the design intention of Fileshare and CCITCP2.  The ccitcp2 process is a registration process, similar to a nameserver, and the intention is that just one machine in the network will run the registration process and act as the nameserver, while on all other machines, the environment variable CCITCP2 will be set to the name of the machine where the ccitcp2 process is running, so all machines will use one registration process. When the CCITCP2 environment variable is not set, the assumption is that the ccitcp2 process running on the local machine is the intended registration pr

Problem: While trying to run the Micro Focus License Administration utility /var/microfocuslicensing/bin/cesadmintool.sh, the following error appeared:  Micro Focus License Administration ================================== Java not present on PATH(or wrong version). A 32bit Java 1.5 runtime is required to run the license administration tool. Please add java to your PATH and retry. At the time of the error, the Java version was reported as follows: # java -version openjdk version "1.8.0_71" OpenJDK Runtime Environment (build 1.8.0_71-b15) OpenJDK 64-Bit Server VM (build 25.71-b15, mixed mode) Resolution: As explained in the Release Notes, the Visual COBOL product and the Micro Focus License Administration utility require Oracle's Java Platform, Enterprise Edition (Java EE) 7 or Java 8.  The Visual COBOL product was not tested or certified with OpenJDK. The solution is to download Oracle's Ja

Problem: Under Visual COBOL, the tool named FaultFinder appears to be absent. Resolution: The FaultFinder tool, which had been available in Server Express and Net Express, has been removed from Visual COBOL on both Windows and Linux/UNIX.  Here is a documentation link mentioning this (scroll down to "Diagnostic tools"): https://www.microfocus.com/documentation/visual-cobol/vc50/EclUNIX/GUID-8AD22EC0-B0B0-4D14-A16A-B4D6CEE5A9E3.html Net Express and Server Express, and also Visual COBOL, are sold in two forms of product that might be called the "development" product and the "runtime" product. The chart below shows product names: "Development" Product Name "Runtime" Product Name Net Express Server for COBOL for Net Express, or Application Server for Net Express Server Express Server for COBOL for Server Express, or Application Server for Server Express Visual COBOL COBOL Server   A "development" product

Problem: When compiling a program, the following error is reported by the compiler: Operand time-of-day is not declared Resolution: In both the Server Express documentation and the Visual COBOL documentation, the special register TIME-OF-DAY is documented as being applicable to the OSVS dialect. In addition, the documentation generally says:  TIME-OF-DAY    9(6) DISPLAY The TIME-OF-DAY special register contains the value of the current time of day (24-hour clock) (as supplied by the COBOL execution environment), in the form: hhmmss where hh =hour, mm=minutes, and ss= seconds.  TIME-OF-DAY is valid only as the sending area of a MOVE statement. Based on the above, here is a sample program I wrote to test this: 000001 IDENTIFICATION DIVISION.000002 PROGRAM-ID. TOD-TEST.000003 ENVIRONMENT DIVISION.000004 CONFIGURATION SECTION.000005 DATA DIVISION.000006 WORKING-STORAGE SECTION.000007 01 TIME-OF-DAY-WS PIC 9(6).000008 PROCEDURE DIVISION.000009   &nbsp

Problem: Using Visual COBOL, a program that opens an indexed file for OUTPUT creates just one file on disk, as opposed to the behavior in earlier versions of MF COBOL, where two disk files were created: a data file and an .idx file. Resolution: In Visual COBOL, the default IDXFORMAT is now IDX8, which creates just one disk file holding both the data and the index.  To override this default behavior and configure Visual COBOL to create IDX4 files instead, a person can specify idxformat=4 in the File Handler Configuration file, or use the IDXFORMAT"4" compiler directive, or specify $set idxformat"4" in source code.

Problem: When attempting to start AcuServer version 9.2 on a Linux server there is an error message "unable to add users" and it fails to start. Solution: The "unable to add users" message is actually coming from AcuShare (the license and shared memory manager).  This means Acushare is not running properly.  Do the following to get it back to normal; once AcuShare is running normally AcuServer will start. Execute "acushare" (no option).  If that responds with the usual acushare report then it is running so do "acushare -kill". Execute "ps -ef | grep acushare" to make sure the acushare process has terminated.  If it hasn't then do "kill -9" on the AcuShare PID. Execute "acushare -clean". Execute "acushare -start". Lastly, start AcuServer.

I post here this link with an example using pdfcreator 2.4.0 com interface this example print 2 reports in one PDF file  before run the example install pdfcreator 2.4.0 I suggest using command line pdfcreator-2_4_0-setup /Silent and restart your machine before run the example https://drive.google.com/file/d/0B6CfTLgUpUXgTXNGajRaY0FTNzA/view?usp=sharing Regards. #PDFCreator#ActiveX

Problem: When using an ADO.NET application to query a Relativity data source, all, returned decimal data is truncated. Resolution: Microsoft's ADO (ActiveX Data Objects), which is used to access ODBC from VB, C#, SQL Server, etc..., does not work with the standard Relativity driver. To avoid this issue, a Relativity ODBC driver has been introduced that is optimized for ADO. This new driver is automatically installed with the Relativity Data Manager, Relativity Data Client (32-bit), and Relativity Data Client (64-bit). The driver names are: Relativity for ADO (*.rcg) Relativity Client for ADO Relativity Client for ADO (64-bit) This new ADO-compliant driver is available in Relativity v12.13, and above.

Problem: If you are installing separately licensed RM/COBOL Development, and Runtime, System products on the same UNIX machine, and, into the same directory, then, you will need to combine those licenses into the same vault file (license.vlt). Resolution: In order to install separately licensed RM/COBOL Development, and Runtime, System products, you only have to install the Development system, as that includes a Runtime.  Once the Development System has been installed, then, you can add the higher Use Count Runtime license to the existing license vault using the Liant License Utility(licverifyall).The licverifyall program ships with the latest versions of our products, and may be found under the SupportTools directory of the product installation.You can use licverifyall to add the Runtime *.lic to the current license.vlt (that already has the Development System license in it) with the following procedure:  Make a backup copy of the existing license.vlt file.  Chan

Problem: After upgrading to version 10 some report programs are crashing.  Troubleshooting revealed that it is the SORT statement which is crashing the Runtime.  Solution: Version 10 introduced major changes in the SORT verb.  These changes eliminated the SORT_FILES Runtime configuration and added new ones.  Setting A_SORT_REGIONS to half the value of the previous setting of SORT_FILES will achieve the same effect with the new SORT.  We recommend testing with A_SORT_REGIONS=0 to see if this new mode of operation yields better performance in a given system. Following is the full description of the changes to SORT.  Please study this information carefully and test to determine the best settings for your system and application: The internals of the Runtime SORT verb have been updated to provide a new mode of operation for SORT that avoids a significant amount of file I/O and may provide better performance for large SORT operations.  A new method of manag

Hi We are upgrading an application from Visual Cobol 2.1 on Windows XP to Visual Cobol 2.3 on Windows 10.  The application consists of windows forms projects and native code programs compiled as managed code.  We have been using VS 2010 Shell on Windows XP.  A couple of queries: I installed VS 2015 Community on a new Windows 10 pc and registered for the 30 day trial of VC 2.3.  In the link sent back, Step 1 - Useful Download Details, states that there are two versions of Visual Cobol available to download, VC for VS 2012 and VC for VS 2013, yet under the Software/Licenses section at the bottom VC for VS 2015 is also available for download, so this is the one I chose.  Are the instructions on the link out of date?  I assume it was safe to download VC for VS 2015 if VS 2015 Community is installed? The target framework for the VC 2.1 version of the app is either .NET framework 4 Client Profile for the windows forms projects, or .NET framework 4 for the non wi

Hello, I need to call Windows API function from managed COBOL. In native COBOL I'd write something like environment division. special-names. call-convention 74 is WAPI. ... working-storage section. 01 VersionInfoEx.   03 dwEVersionInfoSize        DWORD.   03 dwEMajorVersion           DWORD.   03 dwEMinorVersion           DWORD.   03 dwEBuildNumberFull.      05 dwEBuildNumber         USHORT.      05 dwEMajorAndMinor       USHORT.   03 dwEPlatformId             DWORD.   03 szECSDVersion             pic x(128).   03 wEServicePackMajor        WORD.   03 wEServicePackMinor        WORD.   03 wESuiteMask               WORD.   03

I'm having trouble reading a xml, which contains the identification of tags at the root of which possesses 31 IDs (namespace). I can not change the file because it is a layout I get in a query.I did several tests, and identified that 29 leaving only the cobol can make reading, leaving with 30 or 31 -9 error occurs (that is not in XML format) read routine.Under a program I made an example and an example of XML.----------------------------------------------------example.cbl---------------------------------------------------- $set preprocess(prexml) warn endp IDENTIFICATION DIVISION. PROGRAM-ID. TESTE. ENVIRONMENT DIVISION. CONFIGURATION SECTION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT XML-FILE ASSIGN TO "file.xml" ORGANIZATION IS XML DOCUMENT-TYPE IS OMITTED FILE STATUS IS XML-FILE-STATUS. DATA DIVISION. FILE SECTION. XD XML-FILE. 01 ROOT IDENTIFIED BY "root" COUNT IN ROOT-COUNT. 03 TAG1 IDENTIFIED BY "tag1" COUNT IN TAG1-COUNT. 05 DET1 PIC X IDENTIFIED BY "det1" COUNT IN DET1-COUNT.