Rocket® COBOL

When trying to use the MAPDEMO, (EJB-Example in the demos), with Jboss to run as Application Server, the following error may appear: java.rmi.ServerException: EJBException:; nested exception is: javax.ejb.EJBException: setSessionContext threw NamingException: ; CausedByException is: CCIMFCobol_v1.0 not bound All mfcobol*.rar files from the base/bin are copied in the Deploy-Directory and a MFCobol_v1.0-ds.xml file with the following contents : <?xml version="1.0" encoding="UTF-8"?> <connection-factories> <tx-connection-factory> <jndi-name>eis/MFCobol_v1.0</jndi-name> <adapter-display-name>CCIMFCobol_v1.0</adapter-display-name> </tx-connection-factory> </connection-factories> Problem: When trying to use the MAPDEMO, (EJB-Example in the demos), with Jboss to run as Application Server, the following error may appear: java.rmi.ServerException: EJBException:; nes

Hello, I've downloaded Visual Cobol for Eclipse from your website but I didn't receive the authorization code...  Kind regards,

Good day, I managed to launch my program in ACUTHIN and Chinese character can be enter and saved in database. But when I view it on AcuToWeb, it appears that it cannot recognize the Unicode characters. How to solve it?

Hi all, I have tried to add a group of users which allow them to access by password and it works well. However, when I want to remove group of users and reset back to default privilege which doesn't required username and password, I able to remove password but it doesn't allow the owner name to be set back to blank. Button OK is disabled if the owner name field is blank. Please help on this. Thank you all. #Relativity#RELATIVITYGROUPS

Hello, After I downloaded Visual COBOL Personal Edittion, I do have some problems with activating the free product. After I launch Visual COBOL in Visual Studios I must activate it by entering my e-mail address. Everytime I get an error saying: "Unable to acquire product license". How do I fix this? - Thomas#help#COBOL

Hallo I would like to ask about the documentation of visual Cobol, I need the explan for some properties of some controls but I couldn't find it.    

Our company has converted an application that utilized old Workbench and Dialog online screens into a Winforms application.   We have successfully tested the Winforms screens.  But we ran into issues when we piloted these new screens with some of our business users.   They utilize a product called Cicero Automation that allows our call centers to automatically maneuver and input data into many different administration applications.  For some reason our pilot users will have their laptops lock up and freeze when using the new screens.    Has anyone in the community had a similar situation occur to their application and if so what you did to resolve the situation?I do not believe this is an issue with our underlying Cobol code.  We are using Visual Cobol 2.1 Update 1 with Visual Studio 2015.

Boa tardeEstou com problemas na compilação de programa no Visual Cobol for Visual Studiovou tentar te explicar.Antes no NetExpress 3.1 alguns programas era compilado da seguinte forma:CBLLINK -S -D -G SIS-CONB.CBL ODBCRW32.LIBcom isso ele gerava a rotina SIS-CONB.DLL já com a biblioteca ODBCRW32.LIB já incorporada no programa e rodava sem problemas em nosso sistemas, hoje eu compilo da mesma forma no VCVS 3.0 não me da erro nenhum na compilação, porém da o erro Error code: 174 - "ERROR CODE: 174 - IMPORTED FILE NOT FOUND durante a execução, tentei compilar sem a biblioteca, ai ele muda o erro para "Load erro: file 'mssqlm2' error code: 173, pc=0, call=1, seg=0 173 Called program file not found in drive/directory".Eu preciso de compilar com essa biblioteca porque executo comando SQL nesse programa e se não coloco ele da erro bem na linha de comando abaixo:EXEC SQL CONNECT USING :TEXTO-VAR

 

Micro Focus Developer > Micro Focus Visual COBOL 3.0 for Visual Studio 2013 > General Reference > Library Routines > File and Filename Routines In the doc, under the sub-heading "Interpreting the return code as a file status code", ... it has an pseudo-example, thus:   01 file-status pic xx comp-x. 01 redefines file-status. 03 fs-byte-1 pic x. 03 fs-byte-2 cblt-x1-compx . . . call "CBL_xxx_xxx" using parameters if return-code not = 0 move return-code to file-status . . . What does the cblt-x1-compx mean?  If it is shown incorrectly or incompletely, how should it be shown? Thanks

When trying to process a LCS claim with a wire transfer via Horizon, we are receiving the following error:     The WOW Runtime could not create one of the ActiveX controls required by this form.  Detected in WOW function CreateWindow Last known Form/Control name - <Unknown>/LineErrorList. There are no problems if we are processing them locally. Does anyone have any ideas? Thank you - Linda Praed

[Migrated content. Thread originally posted on 07 February 2011]Has anyone accomplished creating a program that will generate an email with an attachement using GMAIL from a cobol progarm? If so, are you willing to share your code. I presently have a program that uses windows email. We pass the email address and attachment path and the program creates an email with the attachment and calls microsoft email and sends the message. We want to do the same with GMAIL.

Hi all, when multiple users trying to access same Catalog, it will prompt the following message. Please advice. Thanks a lot.   #Relativity

Hi I have written a visual cobol program. I am able to read the datas from the table but i am unable to insert, delete or update the table. Below is the visual cobol program. Please let me know if i need to change anything.   $SET SQL(DBMAN = ODBC) IDENTIFICATION DIVISION. PROGRAM-ID. TEST1CBL AS "test1.TEST1CBL". ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT OUTPUT-FILE ASSIGN TO "D:\\POC\\OUTPUT1.TXT" ORGANIZATION IS LINE SEQUENTIAL. DATA DIVISION. FILE SECTION. FD OUTPUT-FILE RECORD CONTAINS 80 CHARACTERS BLOCK CONTAINS 00 RECORDS DATA RECORD IS OUTREC LABEL RECORDS ARE STANDARD RECORDING MODE IS F. 01 OUTREC. 02 O-ACCNO PIC 9(10). 02 FILLER PIC X. 02 O-NAME PIC X(20). 02 FILLER PIC X. 02 O-AMOUNT PIC X(10). 02 FILLER PIC X. 02 O-ACCOUNT_TYPE PIC X(20). 02 FILLER PIC X. 02 O-GENDER PIC X(1). 02 FILLER PIC X(16). WORKING-STORAGE SECTION. EXEC SQL INCLUDE SQLCA END-EXEC. EXEC SQL INCLUDE RRD.CLIENT1 END-EXEC. EXEC SQL BEGIN DECLARE SECTI

Hi,    May i know that anyway we use the command line to run the acu thin client instead of create the alias and use the alias to run the acu thin client? I am facing a case that half way running the system, the alias had been remove and had been found out that this is the issue for 10.0.0. So need to wait for next patch to fix this issue, but before the next patch launch.  Is there anyway that we can run the acu thin client without point to the alias? Can we use command line instead of alias?    Thanks You. 

We have created about 30 tables in Relativity which using MF Relativity Data Client driver then realized that some of data encounter decimal rounding issue. After do research in community we found out that the MF Relativity Data Client ADO driver solved the decimal rounding issue. Is there any way to copy or migrate or point all the created tables under Data Client driver to Data Client ADO driver. Please help. Have a good day.#Relativity#Relativitytables

Hi,we have the following environment:Windows SBS 2011 with 64bitThe cmd-command calls c:\\windows\\system32\\cmd.exe and shows Microsoft Windows [Version 6.1.7601]The command c:\\windows\\system32\\openfiles.exe in this mode works perfectly.We tried to call this program via C$SYSTEM with flags 192 with 32bit-runtime 9.2.5 and get the errorThe target system must be running a 32 bit OSWe have triedopenfiles.exec:\\windows\\system32\\openfiles.execmd /c c:\\windows\\system32\\openfiles.execmd /c openfiles.exebut get always the same error. Thanks in advance for all suggestions.

I am going through the above book in VCPE 3.0 for VS 2017 trying to compile the simpledate.cbl program and it throws error " COBCH0858 No static method found - cannot be a main program In checking there are in fact no static methods. How can I fix this? Do I have some settings that are off? Thanks 

Hi, I'm currently working on an exisiting code base of a customer. They have placed their copybooks in a specific directory structure and rather than setting the Copybook Path they use a syntax like copy 'path/to/copybook'. The copybooks do not have an extension like '.cpy'. With update 3.0 Visual Studio (we're using version 2015) has gained the ability to display the contents of copybooks. This works fine when a copybook is referenced as copy copybook. ,the relevant paths are added to the copybook paths and the file has an extension that has been configured but does not work with the syntax shown above. How can I get the contents of the copybook to be displayed for such lines as well? I've tried the second suggestion of To specify that a file extension is a copybook and adding one of those copybooks as "existing item" but even if I remove the path from the copy statement the copybook is not found. Thanks in advance#VisualCOBOL#VisualStudio

[Migrated content. Thread originally posted on 02 March 2011]helo l am using the eclipse visual cobol.i try to build this program :============================================================== $set db2(db=sample) **************************************************************** * Copyright (C) 1998-2002 Micro Focus International Ltd. * All Rights Reserved *--------------------------------------------------------------- working-storage section. * Include the SQL Communications Area. This includes the * definitions of SQLCODE, etc EXEC SQL INCLUDE SQLCA END-EXEC *> DB2 UDB limits database alias names to 8 characters *> other DB2 servers such DB2/MVS can have database names up to *> 18 characters which you can still access via DB2 CONNECT *> by creating an ALIAS name for the database with a max of 8 *> characters 01 ws-db pic x(08). *> DB2 UDB has a limit of

What other language besides COBOL is running in Visual COBOL?

Hello All, I have added the ctRadio control to a new form (v12.13).  How do I change the font and font size? I've tried using CALL WOWSETPROP USING WIN-RETURN RAD1-H 'FONT' 'btn_Text.Font'. CALL WOWSETPROP USING WIN-RETURN RAD2-H 'FONTNAME' 'System' 'FONTSIZE' 10. Neither worked and there isn't a property setting either.   Any help would be appreciated.#RMCOBOL

I have tried to call a dll using different methods in COBOL. I am able to create a com object of the dll and call it. The problem here is that the dll needs to be registered by either regasm, gacutil or put somewhere locally. The best scenario is to place the dll somewhere, which does not require administrative permissions to manage.  Is it possible to call a dll from a network drive? The reason for this is to make the support of that dll and future dll's as minimal as possible, which would mean an easy way to distribute and update the dll.   I have tried: Calling directly, when the dll is stored somewhere in the code-prefix Call “GetHTML.DLL” *this seems to be working according to the log-file”* Call “GetList” using by reference param1, param2….  *This is not working* GetList is a method within the dll. Creating a com object and using the create/modify statement, this works, but it requires registering the dll somewhere, which is not a viable solution.   I &nb

Hi,    I am currently facing some problem with acuconnect 10.0.0, would like to see anyone have this experience to share the solution with me.    I  am facing that sometimes when using the application(runtime) and log out.  Then try to login again, it show the error 'Connection Refused'.  When check the acuconnect on server side, it show running.  Because when issue command acushare, it show the data and acurcl -info is work also.  Then when try to restart the acuconnect it show the acuconnect is running and socket error.  But the weird thing is some user that currently login using the system, they still able to use as long as no logout.  But when someone logout and try to login again, it will show the error 'Connection Refused'.    Hope that someone can share with me the solution.    Thanks You. 

I created a XML file for a third party with C$XML. This XML file is not accepted because:   1. my elements may contain &, ', < or >. In my XML file this is converted to &amp, &apos or &gt. This is not accepted by this third party. When I put the data between  <![CDATA[              ]]>  and use those signs, the XML file is accepted. Is there an OP-CODE to automatically put the data between <![CDATA[              ]]> and not convert those signs in C$XML? 2. Empty elements are in my XML file like <Val/>. This is not accepted by this third party. They want the empty elements represented like <Val></Val>. Is there a way to do this automatically with C$XML?   Emmie