Rocket® COBOL

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 !    

Extend 10.2 - when executed from a command prompt on server - all is well the following code is executed and file is created and pdf viewer displays output.This program is reading oracle tables        306-PDF-CALL.           MOVE SPACES TO WS-PDF-TEXT-FILENAME, WS-PDF-FILENAME,                          WS-PDF-CALL, WS-START-PDF-FILENAME.           MOVE WS-CALL-FILE TO WS-PDF-TEXT-FILENAME, WS-PDF-FILENAME.           INSPECT WS-PDF-TEXT-FILENAME             REPLACING TRAILING SPACES BY "!".                     

I am writing a web application.I have a standard login form to enter user number and password. I then need to pass this to a cobol program to validate before returning and continuing.The login form is called from the Site.Master

I call an .aspx page which has a Gridview with data from SQL tables. I select one record and then want to return to my original page which will be populated with the record selected.I can do a Response::Redirect to the original page but this does not pass the information back.How do I link the two pages or how do I tell the first page which record has been selected.Many thanksShirley 

Hi,We are trying to insert a file in a BLOB in the database. Is it possible to do it with Acucobol? Do someone have a sample for that?The support team said that BLOB type is not supported but maybe someone found a way to deal with this restriction.We have a variable defined in this way:01 documento-BLOB SQL TYPE IS BLOB(1048576).We can do a select but when we want to do an insert we receive a memory access violation error.Regards,

Problem User is trying to run 64bit version of Xcentrisity Business Information Server (XBiS) and was getting the following error when XBiS was started. What does the error mean? Syntax error on line 547 of /opt/freeware/etc/httpd/conf/httpd.conf: Syntax error on line 2 of /opt/freeware/etc/httpd/conf/mod_xbis.conf: Cannot load /usr/local/liant/bis/mod_xbis/mod_xbis24.so into server: \\t0509-022 Cannot load module /usr/local/liant/bis/mod_xbis/mod_xbis24.so.\\n\\t0509-026 System error: Cannot run a file that does not have a valid format. Resolution The important part of the error message was:             Cannot run a file that does not have a valid format. The above error was caused by a byte architecture mismatch between XBiS and Apache. The XBiS product was a 64bit version and the Apache product was a 32bit version. The resolution of the issue was to install and use the 64bit Apache product. Another way to resolve this issue is t