Browse all forums dedicated to the Rocket® COBOL product family.
Recently active
I have this code working in VB.NET and I am migrating to VC2010. NET. Unfortunately I'm having trouble with this function. How would this code? Sub Decrypt(ByVal Doc As XmlDocument, ByVal Alg As RSA, ByVal KeyName As String) ' Check the arguments. If KeyName Is Nothing Then Throw New ArgumentNullException("KeyName") End If ' Create a new EncryptedXml object. Dim exml As New EncryptedXml(Doc) ' Add a key-name mapping. ' This method can only decrypt documents ' that present the specified key name. &n
After showing the changed contents of a LISTBOX using REFRESH-OBJECT LB-MYLIST I need to show that a certain row is the default value (selected item) To make this I use SET-LIST-ITEM-STATE LB-MYLIST 1 1 After executing this statement the row appears in blue. This looks quite good and is what I need. But also the condition ITEM-SELECTED associated with the LB is activated. How can I avoid that, because ITEM-SELECTED (and ITEM-ACCEPTED) shall only be executed if the operator really selects an item with the mouse and not by the SET-LIST-ITEM Is using a different value than 1 in SET-LIST-ITEM-STATE a solution? Which value must I use in order to only highligh the row? Thanks for any help. Rolf#LISTBOXDIALOG-SYSTEM
Hello – we at Micro Focus are always interested in getting your feedback pertaining to new product enhancements.This is the first in a series of poll questions that we will be asking in order to gauge interest in certain proposed features to determine if you would find these features to be beneficial to your own application needs. Many thanks.[Poll]
Whether we can read/write excel from Netexpress?#cobolnetexpress#netexpress
I seem to be having an issue where controls and windows are not resizing when a user alters either the DPI scaling or the option that allows for making everything larger in Windows. Is there something that I can do/detect/set ahead of time that allows for windows and controls to adjust properly which are created with the thin client?
I'm looking at the "Sample Web Browser Program" from the ACUCOBOL 9.2.2 "Programmer's Guide to the Internet". It compiles and works, but now I'd like to extend it with some event-driven interactions between JavaScript, VBScript, and COBOL. Assume the following HTML5 document: <!DOCTYPE html> <html lang="en"> <head> <meta charset="utf-8"><title>HTML5 JavaScript VBScript Example</title><script type="text/vbscript"> Function vbFunction() document.write("vbFunction has been called") End Function </script> <script type="text/javascript"> function jsFunction() { document.write("jsFunction has been called") } </script> </head></body> </body></html> After the HTML5 page shown above has been loaded into the WEB-BROWSER control, is it possible for COBOL code to call the VBScript and JavaScript functions (vbFunction and jsFunction)? A C# example that shows how it might be
Another error: An exception of type 'MicroFocus.COBOL.COBOLRuntimeException' occurred in MicroFocus.COBOL.Runtime.dll but was not handled in user codeAdditional information: 198 Load failure [Program has an incompatible codepage dependency "ClassLibrary1.GET_ENVIRONMENT_VARIABLE" is using codepage Unicode (UTF-8) but the main program "ASP.logon_aspx" is using Western European (Windows) Please see documentation for more information.] I have opened LOGON.aspx in Visual Studio, selected Advanced Save Options in the File menu, and changed the character set to UTF-8. this was also done to all other cbl files in the solution. I also set the compiler directive SOURCE-ENCODING"UTF8" in the project. I am still getting the error on ASP.LOGON_aspx, which I am assuming is the generated aspx page. I am using the default asp.net server with Visual Studio 2010, if that helps.
I am creating a web application from files that I successfully created a web site with. I am creating new pages, and copying the bulk of the code to the web application. I am doing this because the pages are not successfully compiled because of the header information being different. I have gotten the code to compile in VS 2010 successfully, along with 3 assemblies. When I try to call one of the programs in the assemblies, I get an error: MicroFocus.COBOL.COBOLRuntimeException was unhandled by user code HResult=-2146232832 Message=198 Load failure [Program not verifiable][Program "ClassLibrary1.GET_ENVIRONMENT_VARIABLE" is not verifiable, Initial Program "logon_aspx" is verifiable] Source=MicroFocus.COBOL.Runtime ErrorNumber=198 ErrorString=198 Load failure [Program not verifiable][Program "ClassLibrary1.GET_ENVIRONMENT_VARIABLE" is not verifiable, Initial Program "logon_as
Can this be used for cobol commands? Example moving spaces to field. Is so, can you please provide the syntax. Here is what I have tried move spaces to w-policy-num and here is the error that I get.....Error: Invalid expression (at 'spaces to w-policy-num') #VisualCOBOL
Hello All, I need you, i would like to say if Net Express 3.1 is certified on Windows server 2008? Thank you in advance
Does Server Express and Visual Cobol support Ingres Database on RHEL? What is the Pre-compiler to be used?
I am getting a compile error staing Invalid Function Name for INTERGER-OF-DATE and UPPER-CASE. They are valid according to the documentation. What is wrong with the code below? MOVE FUNCTION INTEGER-OF-DATE(WK-DATE-INTEGER) TO WK-REPORT-ANIC-DATE-INTEGER. Move FUNCTION UPPER-CASE (PMLink-In-Payee-Name) To NPAY-NAMEThanks
I have a class that inherits from an abstract class. Inside of this class is an abstract method. In the inherited class I want the abstract method to be private. When I code override I get an error that says "COBCH0965: Overriding method must have visibility Public" and from my understanding of Visual Cobol is legitimate. The question comes into play when I use the cobol keyword override it seems to build just fine. Is this the intent? Below is an example of the redefines code. class-id Ufg.Life.Policy.PolicyAbstract abstract. method-id GetPlanCode abstract procedure division returning returningPlanCode as String. end method. *************** now for the class that inherits from the above class class-id Ufg.Life.Policy.InforcePolicy inherits type Ufg.Life.Policy.PolicyAbstract. method-id GetPlanCode redefine private procedure division returning returningPlanCode as String. end method.#VisualCOBOL
Attached is a simple class and a simple console application. if you look at the TPMixed property it is a type String and the private variable that it points to is a String (doesnt' have Type in front of it). What happens is when you try to set the property the value doesn't hold, in this case a null value is stored (default value for a string) instead of the value passed to the property. If you run the attached console application you should see what I mean. #VisualCOBOL
Hi guys, I made a sample project. NET using the datagridview object for to maintenance an isam file. I uploaded to my mailbox here in forum but I wanted put it in the area of files to download. How should I proceed? Link video: www.youtube.com/watch
Hello, I'm looking for some sample code about reading barcodes in format gs1-128 in a cobol program, but, at the moment i don't have anything. Anyone knows of some examples? Thanks afterwards#Barcode
See COBOL Development in a new light. Take the Visual COBOL Screen Test! www.microfocus.com/.../ - Enjoy.#ScreenTest#Innovation#Appdev#VisualCOBOL#development#Test#COBOL
Hi, we are currently using RM Cobol version 10 on win 2003 server and would like to upgrade the win server 2003 to 2008 or 2008R2. Just wanted to know that the Cobol version 10 will be supported on win 2008 server or not? or do i need to upgrade to RM Version 12?
Problem: Error on Linux when attempting to execute a unixODBC command against the AcuXDBC driver: "xvision.so: cannot restore segment prot after reloc: Permission denied" The security for all directories and files involved has been set to 777 but the error persists. Resolution: This is caused by the kernel security extensions from the Security-Enhanced Linux (SELinux) project, which are enabled by default in some newer Linux distributions. SELinux enables finer-grained control over system security and shared library loading. To resolve the error the xvision.so library must be registered in the security module using the chcon command: chcon -t texrel_shlib_t xvision.so
This can be caused by an index-out-of-bounds condition. If you use compiler option -Za and compile in debug mode then the runtime will notify you if this condition occurs. What happens is the procedure division allows you to exceed the table size specified in the working storage. This overwrites the working storage elements following the definition of the table. This can be tested by NOT using option Za and monitoring variables following your table as you initialize the last element 1. The monitor will detect the change. #acubench#runtimeerror#extend32-bitRuntimehasstoppedworking#AcuCobol#extend32-bitRuntime#extend#COBOL
Dear Sir, I get the error enclosed using Visual Cobol for Visual Studio. Many thanks in advanced. PJM
Hello, I've installed Acuserver for the first time, and I've a question: Currently my application is using mapped drives. All the client computers are executing wrun32.exe, which is located in the shared folder, such as objects, vision files and configuration file. What I've tested with acuserver is: - To install runtime in every local computer. - To create a path to that folder, so I can run wrun32 everywhere. - The client configuration file is still located in shared folder. - To Launch the application with the active folder located in the shared folder, but running the wrun32.exe local instance By this way, what I've tested seems that is working properly. But I'd like to know, if that's the best way to set up acuserver or if there are another properly method. Thanks and kind regards. #AcuServer#extend32-bitRuntime
A class had a method that used WORKING-STORAGE instead of LOCAL-STORAGE. I created in instance of the class and set a variable in WORKING-STORAGE to a value, then finalized the instance. I then created a new instance of the class and called the method. The value from the last instance carried over into the new instance. Is this expected behavior ? It behaves the same way in Visual COBOL and Net Express 5.1. I fixed this by using LOCAL-STORAGE instead of WORKING-STORAGE.
Hello, We just did a fresh installation of VC for Eclipse under Windows 7 64 bits and here is the error message : An internal error occurred during: "Initializing Java Tooling".com/microfocus/eclipse/project/content/FileTypeHelper This is the first start of the program. We tried after having suppressed the workspace. Sme thing. I saw that someone had the same problem under Linux. Any idea what it might be ? Kind regards, MR
we are installing a new porduct but the installer show this error: You cannot have standard & transaction licenses installed together which caan be the problem thanks below the process This is an invalid license key Application Server License Administration System - AppTrack ----------------------------------------------------------- 1. License List 2. License Summary 3. License Install 4. License Uninstall 5. Change/Set Password 6. Reinitialize Licensing 7. Current Users 9. Quit Enter the Menu Selection Ready to install license Enter the Serial Number part of the License Key: 600000560649TG Enter the License Number part of the License Key: 03060 1E03E 819AB EE405 5CE7 20140521 You cannot have standard & transaction licenses installed together
Already have an account? Login
No account yet? Create an account
Enter your E-mail address. We'll send you an e-mail with instructions to reset your password.