Rocket® COBOL

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.

When Converting a application that generates a .DLL  I am getting a very vauge error:[cobollink] Micro Focus COBOL - CBLLINK utility[cobollink] Version 4.0.0.65 Copyright (C) Micro Focus 1984-2018. All rights reserved.[cobollink][cobollink] Link complete with errors[cobollink]cobol.cfg.Generic_Debug_Build:nature.specific.build.cfg.Generic_Debug_Build:post.build.cfg.Generic_Debug_Build:cobolbuild.cfg.Generic_Debug_Build:BUILD FAILEDBuild finished with 1 errors, 0 warnings, 0 notices and a maximum exit code of 0Maximum exit code exceeded: 0Total time: 4 seconds-------------------------------BUILD FINISHED------------------------------ Is there any way to get an expanded detail on the issue with the link? 

Our POS system is written in RM/COBOL.  We are using old Ithaca receipt printers.  Ithaca is no longer making receipt printers.  I need to modify our system so that it will handle both Ithaca and Epson printers.  I am having issues translating the old Ithaca control codes to the Epson ESC/POS proprietary command system codes.  Does anyone have any examples of COBOL using the Epson receipt printers?  Any assistance would be greatly appreciated.  Thanks.

I have an odd problem. I have 2 windows 10 machines running Windows 10 version 1803. One has Pro 1803 and went through the 1709 fiasco, and the second one has home 1803. On the home 1803 rm-cobol 7.0 runs like a champ, whereas on the Pro version 1803, RM 7.0  will not run. When I execute the batch to run the software the command line window appears, but the runtime does not appear as a process unless I 'X" the window.  The machine will run any program that does no screen i-o. Also the compiler will compile but will not open a window.   I know this is odd, but any ideas?  I have been bashing my brains out on this for quite some time. Thanks in advance for any clues. Let me add this: On the pro machine, the runtime will run (for a example a print-only program) if there is no screen i-o. As if it will not create a window. I should point out that this is a standard windows 10 machine with no special display options. The RM runtime ran perfectly until the i

I looked for Chris Glazer's post but couldn't match his location to what the page was showing.  The powers that be here at my employer have decided to pony up the dollars for Micro Focus COBOL.  I am charge of the upgrade.  Our current application, with batch and online portions, is running under NetExpress.  The application uses CICS and has a SQL Server backend.  Will it still run under Net Express?

Can anyone tell me what "system error value = 0" means. The affected user is running wrun32 v10.1 and on one Windows 10 workstation sees that message displayed on the terminal before the session crashes. I have found in the v10 doc references to other values, but not to 0.

Hi GuysI have a question regarding the C compiler.The customer has removed the original C compiler and replaced it with a ‘gcc’ compiler, but when I compile it is looking for the original ‘CC’.Where in COBOL Is the definition of the C compiler to use.Many ThanksRichard

We have a simple application (in Windows) which works fine in thick client and thin-client.  It uses several different fonts and sizes to get the look we wanted.When displaying in AcuToWeb, the use of these different fonts result in undesireable appearances - buttons overlap grids and entry fields, and many other visual oddities.  I understand it is because of the fonts; when I looked at the AcuToWeb documentation, under "Limitations and Known Issues" it says:If your application uses a non-default font, and you have inconsistencies between the font sizing in the AcuToWeb application and the application when run through AcuThin, then you must use the AcuToWeb Desktop with your AcuToWeb application, to allow the font rendering to be handled within extend.My question is what constitutes a "default font"?  Is it an accept statement from "DEFAULT-FONT", or something else?  I'd rather not have to do trial and error to figure out which fon

Good morning Is it possible at runtime startup that it does not load printers only if it needs them?

We have following problem:- we are using the testversion of VC4.0- we try to call a cobol program from java- so we created a JVM-Project with two cobol files -> program1.cbl and copy1.cpy - and a Java-Project with-> CobolCallDemoDefaultPackage.java within a java-Project.- now we tried to call Program1 with Copy1 as parameter, but we get the following compiler-error:"The type com.microfocus.cobol.program.Reference cannot be resolved. It is indirectly referenced from required .class files" public static void main(String[] args) {PROGRAM1 program1 = new PROGRAM1();Copy1 copy1 = new Copy1();copy1.setEDatum("20180101");program1.PROGRAM1(copy1);  <- doesn't work: The type com.microfocus.cobol.program.Reference cannot be resolved. It is indirectly referenced from required .class filesSystem.out.println(copy1.getADatum());}Where is our mistake ?Thanks for any hint !