Rocket® COBOL

Hello. I'm starting to work with Visual Cobol but I'm an old programmer RM / COBOL and COBOL-WOW. If visual Cobol really Cobol, I know how to handle this new Cobol numeric fields and their masks.Working Storage Section. 01 Campos.      02 Sequence 02 pic 9 (9).       02 Amount pic S9 (9) V9 (2).       02 date.           03 year pic 9 (4).            03 months pic 9 (2).            03 day pic 9 (2).       02 Sequence-z pic zzzzzzzzz.     set amount TO TextBox17::Text(). Error 1 COBCH1624 : Cannot implicitly convert string to binary-long unsigned. Error 4 COBCH0829 : Could not find method 'Amount' with this signature. Please, let me know how visual Cobol, work it.

Hi, we are working with AcuSQL and to show a progress bar we need to know how many records a sql table contains. Any ideas ?

Error: Core was generated by `cobchecker32'. Program terminated with signal 10, Bus error. Environment: Server Express 5.1 running on HP-UX 11.31 ia64.   Description: When undertaking 32 bit compiles a core dump containing the detail following was produced - Core was generated by `cobchecker32'. Program terminated with signal 10, Bus error. BUS_ADRERR - Non-existant physical address #0  0x60000000f769ea50 in <unknown_procedure> () (gdb) bt #0  0x60000000f769ea50 in <unknown_procedure> () warning: Attempting to unwind past bad PC 0x60000000f769ea50 #1  0x60000000f769ea50 in <unknown_procedure> ()   But on the same machine, compiling the same program using the 64 bit compiler (cob64) worked fine.  The 32 bit compiler generated a core file immediately the ‘cob’ command was executed and this was happening on even the simplest COBOL programs. For example, the command: cob32 –iav helloworld.cbl immediately produced a core. E

This article addresses characters in the extended ASCII character range written from Net Express using XML syntax being output to an XML file. Data from an input document that contained characters in the ASCII extended character range (128 thru 255) and included characters such as the euro symbol (€ - 128 – hex80) and bullet (• - 149 – hex 95) was being used by a customer in Net Express to generate an XML document.  Initially the XML file was generated with encoding=”UTF-8”. After it had been created, if the file was opened in an XML editor it did not display correctly and appeared as if it was corrupt. But if it was opened using a text editor (eg Wordpad or Notepad) the XML code was displayed as expected (although as a text document, not as an XML document). This suggested the file had been written correctly as all characters, including the ASCII extended characters, showed. Further, when the file was opened in a hex editor it showed the ASCII extended characters written as hex”8

Hi All, I'm trying to access an ORACLE Database via OpenESQL (not Pro*COBOL). My COBOL apps are on a Linux Server.  All is OK, but i need to check the sql syntax at compilation time. Here are my compilation configuration file. SQL(TARGETDB=ORACLEOCI) If i add the SQL(CHECK) to the file, here is the problem: * 801-S***** ( 2)**** External Compiler Module message** ES0100 Connection name not found. So i think, 've to add my user/password and tns id, but how? Thanks in advance. Franck.

Dear sirs, I having problem with an screen that we have PF Keys. Enclosed the screen in question. Please say me what I have to do in Visual Cobol for Eclipse  for  configure ADISCF. TKS  

How can i  represent a number with decimal point the period and with no point for thousands. like this 1000.85

i am sending a variable with the value 10/05/2013 to an excel cell but it transforms it to 05/10/2013. why?

Dear Sirs, Now I have the aplication running with Visual cobol for Eclipse in Windows Ultimate but when the program send an screen we get an Error  with SHEL.DLL enclosed. At the beggining we believe that happened for cause of Windows Starter, we make Upgrade to windows Ultimate and the samehappen again. Regards, 

eclipse.buildId=M20120208-0800 java.version=1.7.0_21 java.vendor=Oracle Corporation BootLoader constants: OS=win32, ARCH=x86, WS=win32, NL=es_CL Framework arguments:  -product org.eclipse.epp.package.rcp.product -feature com.microfocus.eclipse.core.product Command-line arguments:  -os win32 -ws win32 -arch x86 -product org.eclipse.epp.package.rcp.product -feature com.microfocus.eclipse.core.product Error Fri May 31 22:12:03 CDT 2013 Problems occurred when invoking code from plug-in: "org.eclipse.jface". java.lang.NullPointerException  at com.microfocus.eclipse.debug.ui.internal.actions.InspectAction.selectionChanged(InspectAction.java:131)  at org.eclipse.ui.internal.PluginAction.refreshEnablement(PluginAction.java:206)  at org.eclipse.ui.internal.PluginAction.selectionChanged(PluginAction.java:277)  at org.eclipse.ui.internal.PluginAction.selectionChanged(PluginAction.java:289)  at org.eclipse.ui.internal.ViewerActionBuilder$ViewerContribut

Hi, currently I am playing aroung with the pinvoke ( demonstrating to call a native program from a managed application) sample as follows: I created a Native DLL Project (SUBS.DLL, containing 3 Programs based on SUB.CBL I added the generated DLL into the references of PINVOKE. I get an Error whe calling the DLL , unless I activate the 'Copy Local' Flag in the references properties.This took me a while to figure out but ok, its  solved. Now I can run pinvoke from the IDE, but when i start it from the Command Line in the ...\\bin\\Debug directory, I see nothing but a litany of errors about BadImageFileFormat and Missing Assemblymanifest in SUBS.DLL. I have attached the project, for anyone who is willing to take a look at it. - Thanks in advance I'm shure this is a pretty basic 'newbie' topic, but still I hope someone can point me the right direction. Also I would like to know whether it is possible to - say compile the 3 programs mentioned above, each one into its own dll

I am using Visual Studio 2010 Professional and Visual Cobol version 2.0.    For some reason when I compile a native Cobol program that has errors in it, I do not receive the actual error messages in the 'build' output box.     It simply tells me: ERROR: (1) Cannot open file : obj\\x86\\Debug\\SEARCHFH.objERROR: (6) No public symbols found. No object file generatedDone building project "reports.cblproj" -- FAILED. If I compile the same program from the command line using the same Cobol directives it will actually tell me:   ..\\int\\searchfh.CBL,..\\int\\searchfh.CBL(188,15,8) : error 301 : Unrecognized verb..\\int\\searchfh.CBL,..\\int\\searchfh.CBL(127,60,53) : error 348 : Procedure name 100-EXIT undeclared, line 879 (first usage)ERROR: (1) Cannot open file : c:\\compile\\dll\\searchfh.objERROR: (6) No public symbols found. No object file generated Does anyone know what is suppressing the error messages in Visual Studio?   Kinda hard to debug in the

Does anyone know a simple way to get the ip address of the server in myprog.acu when it's run via acuthin.exe. I know it's on the command line (acuthin.exe SERVER-IP myprog) so there must be some environment variable or some internal function call I can use to get it.  I want to use it make another C$RUN acuthin.exe call to another thin client alias.

Can an If statement in Dialog system recognize a blank field?  I have tried to code for it, but it doesn't seem to recognize the value. For example, I've tried these variations, and DO-SOMETHING is not done, it just goes to the next line.  IF= EFTOPTOUT ' ' DO-SOMETHING IF= EFTOPTOUT " " DO-SOMETHING IF= EFTOPTOUT '  ' DO-SOMETHING IF= EFTOPTOUT "  " DO-SOMETHING IF= EFTOPTOUT '              ' DO-SOMETHING  (actual length of EFTOPTOUT) IF= EFTOPTOUT "             " DO-SOMETHING (actual length of EFTOPTOUT)

How can I see the animating of call programs in Visual Cobol like  I can see in Mainframe Express ???

Problem: Customer is using Visual COBOL for Visual Studio 2010 2.1 and is using the Find option to search for the string "CUST". He has the following data items defined in his program: 01 CUST                     PIC X(30).01 CUST-CONTACT  PIC X(30).01 CUST-COMPANY PIC X(30). He is using the match whole word option and was expecting it to return only the references to CUST and not to the other data items with CUST as part of the name.Is there a way of returning only references to the actual CUST data item? Resolution: This is a problem because the word search in Visual Studio knows nothing about COBOL identifiers and that the hyphen is treated as a word separator and not as part of the identifier for the search. You can get the desired result by checking the Use box at the bottom of the dialog and selecting Regular Expressions and then using the search: CUST~(-)

Problem: Customer has a Visual COBOL 2.1 solution that contains many different projects. The programs within these projects make calls to subprograms that reside in different projects so references are added to the calling programs projects that point to the .dlls output from other projects by doing a direct link to the .dll file itself. When Visual COBOL is started the solution will be successfully on the first attempt. Subsequent attempts will fail with a Visual Studio error that the .dll to be built cannot be copied because it is locked by another process. What is causing this error? Resolution: This error occurs because direct references to the .dlls of other projects are being used.When you add references directly to the .dll instead of to the project itself the build process does not know in what order it should build these files so the .dlls end up getting locked in some cases. This problem can be resolved by using project references instead of adding references using the B

Problem: Customer has an application developed in Visual COBOL 2.1 for Visual Studio 2010. This application has a native program which calls a .NET managed .dll using COM Interop. The project for the .NET managed .dll has the option Register for COM Interop checked so that the .dll will automatically be registered for use as a COM server when the project is built. When the customer deploys this application to a computer on which COBOL Server 2.1 is installed the call from native program to managed fails. Why? Resolution: As this program is created as a COM Server it needs to be registered on the production computer. When you use Visual Studio in development the IDE will automatically register the .dll with COM when you check the COM Interop property but this is only on the development computer. In production you need to run the regasm.exe utility which is part of the .NET Framework. You need to run the correct version for the .NET Framework your application is targeting. regasm also as

Problem: Customer has a .NET managed code application running under Visual COBOL 2.1 for Visual Studio 2010. At some points When debugging the application and an EXIT PROGRAM statement is encountered it appears to be ignored and the program just continues to run without exiting. Why is this occurring? Resolution: It has been determined that this is a bug in the compiler. In some cases when an EXIT PROGRAM statement is in a paragraph by itself the compiler would generate incorrect code which caused the statement to be ignored. This has been fixed in Visual COBOL 2.1 Update 1 hotfix 3. As a workaround you could also add a CONTINUE statement to the paragraph prior to the EXIT PROGRAM and then the problem does not occur.  

Problem: Customer has a Windows Presentation Foundation (WPF) application written in Visual COBOL that displays a main form and then depending on options selected will display various other forms. When a new form is displayed they would like to make the main form invisible so that the user cannot click on it and it is not covering up the other icons on the desktop. When the sub forms exit they would like control to return to the main form and make it visible once again. How can this be accomplished? Resolution: This can be accomplished by using the Visibility property of the main form. Please download the example .zip file and unzip it to your C:\\ drive. Here is the source code for the main form program and the sub form program:        class-id invisibleformWPF.Window1 is partial                  inherits type System.Windows.Window.       working-stora

Problem: Customer has a Dialog System application that he is converting from Net Express 5.1 to Visual COBOL 2.1. In order to provide support for Dialog System in development the Compatibility Addpack was downloaded from the supportline Product Updates site and installed on the development computer. What needs to be done to get this same Dialog System support in production when using the COBOL Server 2.1 product? Resolution: The same Compatibility Addpack module that you installed on your development computer also needs to be installed against the COBOL Server 2.1 product on your production computer. It will install into either environment.

Problem: Customer has an ASP.NET Web Application developed in Visual COBOL 2.1 for Visual Studio 2010. This is running on a Windows 7 64-bit computer. It runs fine when the debugging tab is set to ues the Visual Studio Development Web Server. Customer changed the debugging tab to Use Local IIS Web Server instead and now it reports the following error: Could not load file or assembly 'progname' or one of its dependencies. An attempt was made to load a program with an incorrect format. Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code. Exception Details: System.BadImageFormatException: Could not load file or assembly 'progname' or one of its dependencies. What is causing this? Resolution: The problem can occur because you have built your web application as x86 (32-bit) and you are running this on a 64-bit operating system. The

Problem: Does Visual COBOL support CICS and JCL?   Resolution: The Visual COBOL product line is used for developing distributed applications for Windows/Unix that do NOT use CICS or JCL. The product that does support CICS and is used for migrating from mainframe platforms is the Enterprise Developer product which is available for both Visual Studio and Eclipse IDEs. Enterprise Developer is actually a superset of the Visual COBOL product as it includes Visual COBOL as a base as well as additional project templates and tools to support mainframe compatibility. If you are looking to move a CICS application you should be looking at the Enterprise Developer product.

Problem: Avira Antivirus Premium 2013 software reports two instances of a virus in Visual COBOL 2.1 Update 1 download. message reported is:       "detected a tr/crypt.xpkct.tn virus and dll is prexml.dll, mfhcolib.dll and htmlpp.pol" Resolution: This virus detection software is picking up these files as a false positive. We have scanned the files using Symantec Endpoint Protection and nothing is detected.   The files have also been uploaded to www.virustotal.com which scans against multiple virus scanning engines. Two scanning engines picked up a possible issue: Looking at the description issue for the threat it looks like this is a generic threat that just looks for certain characteristics:   http://www.avira.com/en/support-threats-summary/tid/3488/tlang/en There is no actual virus in these files and the detection should be ignored.  

Problem: Customer is using Visual COBOL 2.1 and has installed the Visual Studio 2010 Shell IDE that is provided with Visual COBOL. When his program calls "CBL_DEBUGBREAK" it should launch the Visual Studio IDE for debugging but it is failing to launch. What is the problem? Resolution: This is a known issue that occurs when using the Visual Studio 2010 Shell on a 64-bit Windows system.Microsoft did not package the required JIT Debugging executables in the Shell version of Visual Studio 2010 when installed on a 64-bit system. This problem does not occur on a 32-bit Windows system or if a Visual Studio 2010 Professional or higher product is being used. It also does not occur with the Visual Studio 2012 Shell. So customer has options of installing Visual COBOL for Visual Studio 2012 or to upgrade their Visual Studio 2010 product to Professional or higher.