Rocket® COBOL

Hi, I'm trying to understand about SQL cursors. Are cursor names used at run-time i.e. passed to ODBC/SQL engine or just used internally at compile time to associate various EXEC SQL statements. What I'm wondering is... If a COBOL program, 'A' calls two other programs, 'B' and 'C', alternately, to fetch rows from tables T1 and T2, can programs B and C use the same cursor name i.e. such that both programs have the same-named open cursor? I'm asking because I'm switching a system from MF native files to MySQL and I'd like to use copybooks of standard procedures.  Thanks, Linden.    

I am trying to use HttpGet(extend version 9.2) on the google directions api. I have the pointer and a field in the linkage area for the response. The problem is when i use https in the url I get a memory access violation on the field in the linkage area. If use http google tells me i need to use https. I am not sure why i am getting to MAV. Thanks in advance for any help. #HTTP#ACUCOBOL9.2.4

I am a long time Cobol programmer but new to MicoFocus.  I am trying to get a report to print 176 characters on letter paper (16 cpi) without bypassing the windows print driver.  I have looked through the documentation but I just can not get it to work.#ACUCOBOL10.0.1printing

Getting Started with COBOL Analyzer - Demo Files These COBOL Analyzer demo files are to be used in conjunction with the Getting Started guide posted to this forum.  These files will allow you to practice and tune your COBOL Analyzer skills.  A great way to jump start your analysis skills and begin using the COBOL Analyzer toolset.CADEMO.zip#CodeDemo#ServerExpress#COBOL#VisualCOBOL#ApplicationAnalysis#netexpress#analysis#codeanalysis

A great tutorial and getting started guide for COBOL Analyzer. If you've recently downloaded a free trial of COBOL Analyzer or if you're looking for easy-to-read docs for this new application analysis solution, look no further. This free ‘getting started’ guide is a great way to familiarize yourself with this toolset and come up to speed quickly. Use the step-by-step examples and technical guidance within to understand the technology, set-up your environment and tune your skills. It’s everything you need to get started quickly using the COBOL Analyzer solution.GettingStartedWithCOBOLAnalyzer.pdfGettingStartedWithCOBOLAnalyzer.pdfGettingStartedWithCOBOLAnalyzer.pdf#BusinessIntelligence#analysis#reporting#VisualCOBOLNetExpress#CodeChange#COBOL#staticanalysis#ServerExpress

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.