Skip to main content

Rocket® COBOL

Browse all forums dedicated to the Rocket® COBOL product family.

10000+ Discussions
Dominique Sacre
Dominique SacreRocketeer
 Rocket® ACUCOBOL®
Calling JavaScript from COBOL

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

239
Dominique Sacre
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
codepage Unicode (UTF-8) error after saving codebehind page

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.

206
Chris Glazier
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Program is unverifiable error in web application

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

226
Dominique Sacre
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
abstract method

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

51
Chris Glazier
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® ACUCOBOL®
Anonymous
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® RM/COBOL
Dominique Sacre
Dominique SacreRocketeer
 Rocket® ACUCOBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® ACUCOBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Anonymous
 Rocket® ACUCOBOL®
Doubts about Acuserver and mapped drives

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

242
Anonymous
 Rocket® Visual COBOL®
Anonymous
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Net Express/Server Express
You cannot have standard & transaction licenses installed together

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  

91
Chris Glazier
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Write XML File

Dear Sir, When I executed this Code in Visual Cobol for Visual Studio, Thge Output File is Empty :          $set p(prexml) endp   program-id grabaxml as "XMLDemo.grabaxml".  Environment Division.  Input-Output Section.  File-Control.  Select xml-stream assign TO not line advancing "C:\\MByB\\out.xml"  organization  is XML  document-type is "group"  file status is xml-status.  data division.  xd xml-stream.    01  xmls-group.      05  xmls-Number pic 9(18) identified by "group".        05  xmls-Alpha  pic x(80) identified by "elementAlpha".  Working-Storage section.  01  xml-status         pic xx value 99.  procedure division.  open output xml-stream.  move 1235   &nbsp

131
Dominique Sacre
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
VC for VS Error

Dear Sir, I am Getting the Error enclosed when I Build an Application in Visual Cobol fot Visual Studio. When I Debuggins with animation I see  That all is fine  but not Find de File "C:\\FILE1C.DAT"that I defined in App.config following the Tutorial  Instructions.(Error 7 COBCH0829 : Could not find method 'text' with this signature C:\\Users\\Pedro\\Documents\\Visual Studio 2012\\Projects\\VCDemo\\CobolWinForm\\Form1.cbl 27 48 CobolWinForm) The Informatives erros in the following Syntaxi  : move NEUTRALNAME    to    TextboxFname::text SURNAME        to    TextBoxSname::text Many Thanks in Advanced PJM    

61
Chris Glazier
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Visual COBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® ACUCOBOL®
Dominique Sacre
Dominique SacreRocketeer
 Rocket® Net Express/Server Express
Process B can write/rewrite records even though wholock shows Process A has write lock

Hello,I've got a question regarding file locking and the 'wholock' utility.  I'm running on Solaris 10 with version cat $COBDIR/etc/cobvercobol v5.0.00-ePRN=R9CTH/AAH:9l.a5.50.03PTI=WrapPack 4 (7276.7659)PTI=ESPTI=Fixpack50.03_13 Process A is reading a file with fcd.LockModeFlags,FCD_LM_MANUAL. wholock shows that process A holds 0 read and 1 write lock. Process 26709 (user1) on tty ? holds 0 read and 1 write locks What confuses me is that while Process A holds a write lock, Process B is able to WRITE and REWRITE records on that same file with no problems.  Should this be possible and can I rely on 'wholock'? Thanks in advance for any insight or advice. - Rich

94
Chris Glazier
Show more activity

Recent badge winners: Your name could be next!

Explore all badges
Terms & ConditionsAccessibility statement