Rocket® COBOL

If I have to make a certain field of a record larger I use to define the new PIC biger, example PIC x(20)  to PIC X(30).  But afterwards it is necesary to convert the old file to the new structure.  That is quite tedious, because I have to read the old file, move all the corresponding fields to the new, write the new record. If that is finished I must rename the new file so that it has the old name. This procedure Works good, but is sometimes a big job just for this conversión. Does someone know an easier method?   MOVE CORR helps a litle bit, but not at all. Thanks for any help Rolf

When downloading the VS Cobol PE; I receive a message that indicates I need to download Visual Studio 2012 Content Help Manager?

I have two solutions running on one server, one is a managed code windows based application, the second is old mainframe code that is running in naïve code.  My managed code application runs fine, but when I try to start one of the naïve code program .exe, I get an error message 245 no valid product license.  Do I have something setup incorrect?  Confused how one solution can find the license but not the other. Thanks

Hello out there ... I have the following JVM Cobol Programm "XUSERVG" (compiled with ILSMARTLINKAGE) ... stub below : LINKAGE SECTION. *---------------- 01 SL-EXT-UEBERGABE PIC 9(7). 01 S-EXT-UEBERGABE. 02 SHARK-LEN PIC X(2). 02 EXT-UEBERGABE PIC X(50). 01 SL-USERVG-IO PIC 9(7). 01 S-USERVG-IO. 02 SHARK-LEN PIC X(2). 02 USERVG-IO PIC X(4085). PROCEDURE DIVISION USING BY VALUE SL-EXT-UEBERGABE BY REFERENCE S-EXT-UEBERGABE BY VALUE SL-USERVG-IO BY REFERENCE S-USERVG-IO. The Call in Java looks like : int SExtUebergabeLen = 815; SExtUebergabe sExtUebergabe = new SExtUebergabe(); int SUservgIoLen = 4711; SUservgIo sUservgIo = new SUservgIo(); XUSERVG xuservg = new XUSERVG (); RunUnit runUnit = new RunUnit(); runUnit.Add((IObjectControl) xuservg); // retValue = xuservg.XUSERVG(SExtUebergabeLen, sExtUebergabe, SUservgIoLen, sUservgIo); Object params [] = {SExtUebergabeLen, sExtUebergabe, SUservgIoLen, sUservgIo}; retValue = runUnit.Call("de.lv1871.cobol.XUSERVG"

Deasr Larry, Enclosed the Result of Command Execution.....

I am fetching an excel file into an acu grid but some cells isnt transfered properly. An excel cell of text format that contains "1" its tranfered as "1,000000000000000E0" in the Acu Grid. Does anyone know why? 01 W-BX-CELL-DATA pic X(100) VALUE SPACES. INQUIRE olWrkSh Range(TARGET)::Value IN W-BX-CELL-DATA#excelgridformattextnumber

In Visual Studio 2010 Pro (on a virtual machine VirtualBox with Windows XP) when I try a new project with Visual Cobol PE I have the message you can see in attached file. Thank you for your help. #VisualCOBOL

Dear Sirs, When I try to to Debug a Project Build  with Visual Cobol for Visual Studio I get the Following  enclosed with POST.   Many Thanks in Advanced. PJM

Dear Sirs, Can I execute a Program.EXE generated in Visual Cobol for Eclipse Windows in a UNIX or Linux Environment ? Many Thanks, PJM

Dear All, I Make the LINK in Windows following the instruction given for Micro Focus : The LINK RUN Well Then I Tested the program : Not RUN well (Was generated as ojala.int) Then I Generated the program as Ojala.exe : The  program Generated the POP UP Windows that we were finding. Enclosed the Figures to see that.   Many thanks to all and we can CLOSE this Ocurrence.

Problem After Net Express 5.1 has been installed you might find that you are unable to generate a Request key. When you go to the MICRO FOCUS License Management System Configuration screen (i.e. Windows ‘Start’ > ‘All Programs’ > ‘Micro Focus Net Express 5.1’ > ‘Configuration’ > ‘License Management System’  you might find that although Net Express has been installed and there were no errors during installation that ‘Net Express’ does not appear under the heading ‘Product’.  If Net Express does not appear under the heading ‘Product’ it means the License Manager does not recognize that Net Express has been installed on that machine.  Resolution One of the most likely causes of this error is that the user who installed Net Express did not have sufficient user permissions. For example, if Net Express (and subsequently the License Manager) had previously been installed

Problem: The error “Micro Focus License Manager service is not running” almost always occurs when attempting to RUN a COBOL application – eg on a production machine with Application Server/Server for COBOL installed. However, there are circumstances when this error might also occur when building a Project in the Net Express IDE. The project can be opened and worked on without issue, but when building the Project this error can sometimes arise. Resolution: This error might occur if Net Express has been upgraded from an earlier version or if the machine was originally a runtime server with Application Server installed but is now being used as a development machine. The problem can be the result of the COBDIR environment variable setting. If COBDIR has been set at a System or User level in Windows (Control Panel > System > Advanced System Settings and then the ‘Environment Variables’ tab) for a previous version of Net Express or Application Server

PROBLEM : System.Drawing.Image is not recognised ------------------------------------------------ I want to read the contents of a jpg file and   *>1 - Create a thumbnail from a photo (quality 100 % , 320, 320) *>2 -   resize the photo to a maximum size (quality 100, 1680, 1050) *>3 -   Get exif info as one string *> One of the MAIN problems i encounter is that all references to  : type System.Drawing.Image is not recognised by the compiler as a valid class or method  ????????????? (the method : System.Drawing.Image.Fromfile(filename string) looks usefull here ) When i open  Namespaces in the property tab of the project, System.Drawing is not present. I am using Visual Cobol 2.2. , Visual Studio 2012 , .framework 4.5 and the program is defined as : managed console application. The program reads an input text-file containing the full path and file name of one foto ( one per line). REMARK: I can not use windows forms , because the

Dear Bruce, Enclosed the result after your suggestion.. TKS

Dear Mr. Larry Hines, Could You please be more especific about HOW we can do that?.  

Mr Larry Hines, were tested the projects submitted?   Since the solution sent by ustes of is not for Visual Cobol for Eclipce. Ver 2.2.00247 Please Run the projects submitted in visual studio platform and copy them to Visual Cobol for Eclipse and see what does not work. Please send us the solution for V. C. for Eclipse. thanks Atte. Luciano Ulloa.

Problem: After upgrading Visual COBOL to Version 2.2 Update 1 the following error may be encountered when using Managed Code Projects where code does not use specific properties of a method: COBCH1712 <object type> has no visible instance method '<value>' with 0 parameters. Resolution: The release notes of Visual COBOL 2.2 Update 1 state: In member reference in managed COBOL syntax, parentheses can only be used when referencing methods. Parentheses can no longer be used when referencing fields or properties, as this will produce a syntax error. For example:      set intLength to testString::Length() must change to:      set intLength to testString::Length

Dear Chris, Enclosed the projects in ZIP Fprmat to you test. TKS

Hi, I'm trying to disable opportunistic locking, and I've been reading documentation in this same foro about it. My question is the next: I'm using mapped drives to access to vision files (not acuserver). Would it be enough by turning off opportunistic locking from client pc, or should I turn off opportunistic locking in the 'server' machine too? The problem is that I never know if the opportunistic locking is disabled in the server machine, while I'm running the application from the client. Thanks and regards

Hi all I cannot get the runtime tunable command_line_linkage to work.  There is warning in the documentation that this works only for executables.  Does this mean this tunable will not work for program compiled to GNT or INT? I am using NetExpress 5.1 with MTO regardsRico

Is there some way of knowing what classes and or methods are being used in each of my programs?  We currently don't have very many classes, but as we build upon them I can see that we could lose track of things pretty quickly.  I don't want to have to go into each program and check what class has been added as a reference.  I also don't want to rely on human documentation. We are using Visual Cobol with visual studio 2010.   Thanks#VisualStudio#VisualCOBOL

We just recently went to visual cobol and we are having trouble with the call x'91' function 35.  It seems to work fine on each of the developers pc's - which have visual cobol installed on them, but not on our end user's pc's which don't have visual cobol installed. #VisualCOBOL

Created On:  20 October 2010 Problem: Windows has its own locking mechanism, called Opportunistic Locking, for files shared in a network environment. This mechanism is enabled by default and can contribute to file errors and performance issues in such an environment. Resolution: Disabling Opportunistic Locking on Windows Client PCs To disable opportunistic locking on a Windows client PC, change or add the following Registry value: HKEY_LOCAL_MACHINE\\System\\CurrentControlSet\\Services\\MRXSmb\\Parameters OplocksDisabled = 1 Disabling Opportunistic Locking on Windows Servers To disable opportunistic locking on a Windows server, change or add the following Registry value: HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Services\\LanmanServer\\Parameters EnableOplocks = 0 Disabling Opportunistic Locking on SMB2 Opportunistic Locking cannot be turned off for SMB2, but you can disable SMB2 itself. To disable SMB2 on a Windows Server 2008 or Windows Vista PC, change or add the fo

Error 1 COBCH0857 : System error - failure during ILASM method-id ReturnNBTransDTO private.        01  oNBTransPolicyRTSKeyDA type NBTransPolicyRTSKeyDA. procedure division returning oNBTransDTO as type NBTransDTO.     set oNBTransPolicyRTSKeyDA to self::ReturnNBTransPrimaryKeyDA()       set oNBTransDTO to oNBTransPolicyRTSKeyDA::GetData() end method.  I keep getting this error intermittently when I compile the above code .  When the error does appear it appears in white space prior to the following code.....set oNBTransDTO to oNBTransPolicyRTSKeyDA::GetData() The project where this code is included has an Interface class and as soon as I exclude the interface from the project and comment out the code that uses this interface the solution compiles successfully.     #VisualCOBOL

I was wondering if there were any side effects of setting the configuration variable CLOSE_ON_EXIT to a 1.  We have come upon some situations where developers have forgotten to close files opened in their programs.  I cannot find what issues could arise using this option only a place in the docs that indicate that it is not ANSI compliant and, therefore, not the default when using runcbl. I think that another option that I would prefer is to inquire of some way to log when a program exits with files that are open still so that the programs can be fixed.  Is that possible?