Rocket® COBOL

Hi,I have created a JNDI Datasource within a Java Class and want to pass the object to Managed COBOL as my understanding is that you can connect using 'EXEC SQL CONNECT TO Datasource object' according to the documentation. However when the EXEC SQL CONNECT statement is run I get  'Connection datasource not found' within MFSQLMESSAGETEXT.If I get the connection object from the datasource within my Java class I can pass the connection object to my COBOL JVM wrapper and connect using 'EXEC SQL BIND'.  I have been told that using BIND as in the example within the docs can be slow so wanted to try the JNDI option. Has anyone used this approach? I have tried using the SQL(JNDI) setting but no joy.Would be much appreciated if anyone could provide me with some pointers.

Problem: Is there a way of removing the "Application Completed" dialog box. Resolution: There are three ways to "remove" the application completed message box: 1) You can run/LINK your programs as a character application rather than graphical. 2) You can clear the screen prior to the STOP RUN i.e.    display spaces at 0101. 3) On the "Settings" option of the application window you can check "Disable    Termination Prompt". The message box is created so that a user could read any information on the screen prior to the application completing and the window disappearing. Old KB# 7062

Symptoms In Server Express I could use the fork() call. Now, with Visual Cobol, I encounter ‘rts64 : Error 96 encountered in child process’ failure.   Diagnosis Error 96 was introduced in Visual Cobol in response to error situations which customers reported regarding thread synchronisation and deadlocks. There are, and always have been, good reasons for the limitation with fork(), and the principle has always applied – in all versions of Net Express, Server Express, and now Visual COBOL and Enterprise Developer. In practice, earlier versions such as Server Express did not trap improper uses of fork() and that appeared to work in a limited fashion, but this has become increasingly problematic over time as OS vendors tighten up over successive releases. With the latest products, it was realised that continuing the effort was not sustainable. Therefore raising the RTS 96 error early avoids a potentially long investigation on later runtime errors. Solution The general advice, not

Using Visual Studio 2017 and Visual COBOL 4.I'm experimenting with the windowing syntax based on AcuCOBOL-GT which is supposedly supported in Visual COBOL. I placed the $SET preprocess"window1" directive as in the MF documentation and added a simple DISPLAY WINDOW statement to the Procedure Division..Visual COBOL gives me an error 'COBCH0053 Directive PREPROCESS invalid or not allowed here'.So how do I get to use windowing syntax?Thanks.

Problem An error appears after installing Visual COBOL development Hub 4.0 when trying to run the cesadmintool.sh to install the licenses: OpenJDK version of Java found. This release of Java is not supported by cesadmintool. Resolution OpenJDK is supported from Patch Update 7 onwards which is available for download from our SupportLine website with your weblogin credentials: https://supportline.microfocus.com/websync/productupdatessearch.aspx

 I'm tyring to connect to AS/400 db2 and compile COBOL DB2 programs, but  I cannot find any anwser by google or your community(the link in the related quesitons' anwser all displayed "The current document displayed does not exist in the table of contents" after clicking it), can you please help? 

When I using Visual Cobol IDE to run Cobol program in Windows, program 'll run same as in Mainframe or not ?If not, please show me how to Cobol program run same as in Mainframe  ?

Can I connect to a dump file on a remote server and use .IDY files on that server (or another server) to remotely debug a core dump file using VC 4.0 Eclipse running on Windows?

We're working with a large native procedural COBOL code base and have automated the build with Bamboo and ant.  On our build server, we only want to compile programs that have been changed since the last buld (all source is pulled from Git for the build).  Are incremental builds possible in this scenario?  Can someone provide more detail be provided  about how VC Eclipse tracks changes and copybook dependencies when building incrementally.

I using Visual Cobol IDE to generate Cobol Unit Test case for each cobol program in my project, base on guide : https://www.microfocus.com/documentation/visual-cobol/VC40/EclUNIX/GUID-D5F12D24-BB4D-4CC4-920B-0A4DE99E1F29.htmlBut, I see that it only generate one case for each programEx : with 'XXX.cbl' file which has 2 procedures are PROCEDURE1, PROCEDURE2,..., it only generate in XXXTest.cbl (test case file) such as :call "XXX" using by reference LINK-AREA-IO-01,Instead of, call "PROCEDURE1" using by reference LINK-AREA-IO-01,.....call "PROCEDURE2" using by reference LINK-AREA-IO-02, Visual Cobol IDE can support to generate same that or I have to self write by hand ? 

PROBLEM A call to C$SYSTEM fails when the command contains special characters like ‘&’: CALL "C$SYSTEM" USING "START C:\\TEMP\\MF&2019.XLSX" 225                 GIVING RETURN-VAL The following error is recieved. Only part of the command is recognized so the file cannot be found.   RESOLUTION Windows command shell will recognise the ampersand as a special character. An escape character is needed in the command line to enable it to work. For example using the previous command with the escape character will look like this: CALL "C$SYSTEM" USING "START C:\\TEMP\\MF^&2019.XLSX" 96                 GIVING RETURN-VAL Adding the escape character before a command symbol allows it to be treated as ordinary text. This applies to the following characters also: ^ & < > | ‘ ` , ; = ( ) Other characters may req

PROBLEM C$JAVA, using the op-codes CJAVA-DBCONNECT and CJAVA-DBQUERY, can be used to connect to and query a database. What driver string and connection string should be used?   RESOLUTION The hardest part is finding the correct connection and driver string to use. This information can commonly be found from the database vendors website. For this sample the connection will be made to SQL Server - http://bit.ly/SQLConnString MOVE "com.microsoft.sqlserver.jdbc.SQLServerDriver" to DB-DRIVERSTR MOVE "jdbc:sqlserver://server-hostname:1433;DatabaseName=support;user=******;password=******;" to DB-CONNECTSTR MOVE "SELECT * FROM CUSTOMER" to DB-QUERY. The connection should now be successful and a query on the database can be made. If the connection is not successful and errors are still received there are some logging options to turn on to investigate the issue further. A_JAVA_TRACE_VALUE -1 A_JAVA_TRACE_FILENAME javatrace.txt Additional values for A_JAVA_TRACE_VALUE can be found in the

I was hoping for a way to provide configuration information without having to write my own subroutine to read a CONFIG or INI file.  I did find something close, the Run-time Launch Configuration File.  (while searching, I did find something called "Run-time Configuration" but it could only be set at compile-time, go figure!).The mfdefault.exe.mfcfg (thanks for the correction, Chris Glazier) file can contain commands to set environment variables during the time the programs run.  These environment varables can be easily read in the program using a DISPLAY/ACCEPT pair of commands.  Individual files, <program name>.exe.mfcfg files, can be created and customized for an individual program.  The syntax for the command in to the mfconfig file is "SETENV <variable name>=<variable value>"  The quotes and "<>" marks are not part of the command.#setting#config#native#app.config#mfconfig#ini#settings

I was hoping for a way to provide configuration information without having to write my own subroutine to read a CONFIG or INI file.  I did find something close, the Run-time Launch Configuration File.  (while searching, I did find something called "Run-time Configuration" but it could only be set at compile-time, go figure!).The mfdefault.exe.mfcfg (thanks for the correction, Chris Glazier) file can contain commands to set environment variables during the time the programs run.  These environment varables can be easily read in the program using a DISPLAY/ACCEPT pair of commands.  Individual files, <program name>.exe.mfcfg files, can be created and customized for an individual program.  The syntax for the command in to the mfconfig file is "SETENV <variable name>=<variable value>"  The quotes and "<>" marks are not part of the command.

I am using VC40 and try to call a cobol programm named PROGRAM1 within a Soap-Webservice using Wildfly 10:@WebServicepublic class SoapDemo {@WebMethodpublic Integer doLvdcWith1(boolean print) {PROGRAM1 program1 = new PROGRAM1();Copy1 copy1 = new Copy1();copy1.setEDatum("20190101");program1.PROGRAM1(copy1);System.err.println(copy1.getADatum());return 1;}}Calling the webservice the first time, everything is perfect.But calling it another time, the call doesn't work:com.microfocus.cobol.program.COBOLRuntimeException: 119 Name is not unique [de.herbert.PROGRAM1]I think I found a reason for the crash, but unfortunately no solution:/cobol/netexservex/w/wikiid-121/9225/rts-119-name-is-not-unique

I get the following message when the second form is calledSession state can only be used when enableSessionState is set to true, either in a configuration file or in the Page directive. Please also make sure that System.Web.SessionStateModule or a custom session state module is included in the <configuration>\\<system.web>\\<httpModules> section in the application configuration.enableSessionState is set to true in both form1 and form2I have the following code in my Web.config<system.webServer><modules runAllManagedModulesForAllRequests="true" ><remove name="Session" /><add name="Session" type="System.Web.SessionState.SessionStateModule" />And the following code in the second formclass-id SalarySurveyWebApplication.WebFormCSE110 is partialinherits type System.Web.UI.Page public implements typeSystem.Web.SessionState.IRequiresSessionState.* $ilusing "System.Web"* $ilusing "System"working

Hi,we are using VC2.3 and have the problem, that the copies, which are in a Copybook-project are compiled in the default package.The cobol programs within a Cobol-JVM-Project which are using the copies are compiled in the package which is defined as PROGRAM-ID.The problem is, that classes of a java project can not use classes of default package, e.g. we can instanciate the programs but not the copies .Is there a possibility to compile all copies a package mycopies, maybe with an directive ?Thanks a lot !

PROBLEM: When executing the statement ACCEPT OMITTED BEFORE TIME 0 runtime 10.2.1 could crash when it is executed in Thin Client mode. A Memory Access Violation (MAV) can be experienced on the client, as a result of this crash. RESOLUTION: There are various workarounds available: - set ECN-4576 OFF in the runtime configuration file; - modify the COBOL code to have a different TIME value. For example: ACCEPT OMITTED BEFORE TIME 1 (or any other value different from zero). A final fix is developed and will be deployed in AcuConnect Thin Client 10.3.0. #TipfromSupport

Hi GuysI need to connect to a websocket, I am using NetExpress 5.1, is there any embedded code withing the COBOL 5.1 for this, or do I have to call an external API (of some kind) from my COBOL program to support this function.I think thi smay be available in Visual COBOL, just want to know if there is anything in 5.1.Many ThanksRichard

Hi MichaelMicro Focus 5.1 ServerSUN Solaris 2.11I found the answer to this problem, in the Micro Focus install directory etc, there is a file called cob.cfg, in here you can define the C compiler to use in line.# C compiler and optioncccmd=${CC:-cc}  change to -gccRegardsRichard  

PROBLEM: An ACUCOBOL-GT application can be executed as-it-is in multiple modes, such as a standalone runtime installation, an AcuConnect Thin Client environment, the newest AcuToWeb mode. The developer can anyway decide that some piece of code can be optimized for each of these environments. Is there a way to identify the mode the program is executed in, so that a different branch of code can be run? RESOLUTION: Starting with AcuToWeb 10.2.0, the runtime can return more information when executing ACCEPT TERMINAL-ABILITIES FROM TERMINAL-INFO. The known TERMINAL-NAME field has now been improved to contain "AcuToWeb" when the program is executed in this environment. This, used together with the IS-REMOTE field, can help to develop an optimized code. For example: IF IS-REMOTE AND TERMINAL-NAME = "AcuToWeb" ... Moreover, the TERMINAL-ABILITIES group now contains these new fields (immediatelyfollowing CLIENT-USER-ID): 03 ATW-BROWSER-NAME PIC X(30). 03 ATW-BROWSER-VERSION PI

[Migrated content. Thread originally posted on 05 November 2010]Does anyone have a copy of the winbmail.cbl source code that is listed in lots of threads in the forums about emailing out of Acucorp products? I would like to change it just a bit for our use and can only find a compiled version of it.Thanks

Hello,I need to convert a base64 string to a jpg file. I'm using wpf in Visual Cobol.ThanksAlberto Ferraz

Good day.Here's the piece of code that has being going through my head.*******************************************************************************file-control.*select my-fileassign to '../../../files/myfile.dat'organization is line sequential.*******************************************************************************I keep getting below error:MicroFocus.COBOL.Program.COBOLFileHandlingException: ''../../../files/myfile.dat' : 9/009 (ANS74)9 Directory not found'I wanted to retain '../../../' as part of the directory. Can anyone help me please?Thanks a million!

Hi, Has anyone ever had a problem using ODBC with XFD's?  In Excel, getting the error message, no visible columns.  However, I can look at the file in Alfred without any issues.