Rocket® COBOL

Problem AcuXDBC error message - 'Vortex (simple) SQL Interface has stopped working' This occurred when running 'asql' for example with the following statement: - select * from table; Resolution The problem appeared after AcuXDBC V9.1.1 and was resolved in AcuXDBC v9.2.1. This was related to our AcuXDBC Trifox 3rd Party product. Please upgrade to our latest AcuCobol/AcuXDBC version.

PROBLEMS The AcuCobol source program appears to compile but there is no runtime object program created RESOLUTION The problem in this case was that the compiler license (ccbl32.alc) had the 'Restricted Compiler' license set on. Creating a new compiler license with the 'Restricted Compiler' setting 'set off' resolves the issue

Problem AcuCobol is not available for the Mac OS X operating system Resolution Micro Focus does not support AcuCobol on the Mac OS X operating system For a Mac which is setup to dual boot into Windows, then we expect AcuCobol to run normally. For a Mac which is setup to run Windows in a virtualized environment  (i.e. Parallels or VMWare Fusion) then we expect AcuCobol to run normally, however Micro Focus currently does not offer support for any errors in such an environment.

Hi, when I try to start debugging with Visual Cobol Personal Edition (VS2012) I get "Unable to start debugging" (critical error). Someone else got the same error? Some idea before trying to reinstalling the product?. Claudio      #debugging

We are having problem to compiling Visual Cobol 2.2 with SQL embedded (Oracle). We are not using neither Eclipse nor .NET environment development. We are compiling using a script, setting de compiler directives into the program using $SET USE statement. According with the documentation we separate de directives into two files. Within the program the SET statements appear so:       $SET USE"/MNG/DESA/VCFG/VCDirecSQL.dir"      $SET USE"/MNG/DESA/VCFG/VCDirectivesP1.dir" : first file includes: p(cobsql)  csqlt=oracle8 nomakesyn  end-c comp5=no sqlcheck=full mode=oracle dbms=V8 varchar=yes unsafe_null=yes close_on_commit=no end_of_fetch=1043 dynamic=oracle type_code=ansi USERID=CBL_OWNER/cobol2014@LBDCOB01 endp second file with the rest of the compiler directives. When we try to compile, we receive the next message:     2$SET USE"/MNG/DESA/VFUENTES/ATS/TST1F(·=.CBL*  53-S********

I have been using Net Express 4.0 for many years and it is an excellent product I want to be able to do the same with the new Personal Edition of Visual COBOL that I have on Win/8 I am at the stage where I can dbl-click a .cbl source code member and Vis CBL starts up and I can edit But I cannot see how to compile and then to run In Net Express 4.0 the red check mark compiles the current source code and creates a .int member if the compile is clean The I can set to run that program through 'Activate/Settings' and then click the running man in black and the program runs These are steps I cannot find how to do with Visual Cobol P/Edit Can someone please give me a starter on this Once I can run a simple batch style program under VC P/Edit I can then delve into the manuals and get it to talk to the screen, etc    

HI, I have many question to post because I returned to Cobol years later. The most important question regards the database pre-compiler. In particular: 1) With EXEC SQL Can I set isolation level and begin transaction ? 2) How Can I test if an insert or updated does not succeed because of constraints violations? 3) If I set autocommit disabled in SQl properties can I use commit and rollback ? 4) To set a null value it is sufficient move -1 to :name-fileld-null  ? Claudio  #EXECSQL

Problem: Installing Net Express 5.1 Update (or WrapPack) fails with the following error: Error 1305. Error reading from file C:\\Windows\\Installer\\xxxxx.msi. Verify that the file exists and that you can access it. Resolution: This problem occurs when the SYSTEM account does not have a full permission on the folder that the installation was launched from. By default, the SYSTEM account is granted full control to all files on local NTFS volumes. If Net Express 5.1 Update file is located on a network drive, you might want to copy it to your local drive, such as in C:\\Users\\YourID\\Downloads or C:\\Users\\YourID\\Documents where the SYSTEM account has full control.

Hello. I`m using Acucobol-Gt Thin client 80, and it`s saying: "conection failed"-"Connection to server refused"When I try to log on from some of my clientpc`s. The odd thing is that 1. W7 ok. 1 XP, ok. 1 w8.1 ok. 1 W7 refused. 1 w8.1 refused.The only differense is the brand of Pc. HP seems to be the best.I have a HP server running W server 2012R2. Is this a known issue? Regards Guffen#ThinClient

Problem: When obtaining the AcuShare report the meanings of the various items is not clear. Here's an example of such a report:  Server Statistics: ================== server PID: 19134 IPC key: 0x01010101 shmid: 40370176 listening port: 44659 start date: Tue Apr 19 03:04:34 2014 clients: 2 client deaths: 0   message type        sent       received --------------   ----------   ---------- HANDSHAKE                 8            8 ACK                       2            0 INFO                    &nbs

Problem: By default, the COBOL Text Window comes with the system menu that allows to minimize, restore down, and close the application window. Clicking on these buttons does not unfortunately trigger an event for the application to act upon, so it abruptly terminates the COBOL application without giving any chance to stop graciously. This often results to data file corruptions and other unexpected results. The proposed solution in the past (see CloseButton.zip at the Examples and Utilities page) was to remove the system menu by using a Windows API functions GetWindowLong and SetWindowLong, and this does avoid the users to click on the Close button. What if you simply want to disable the Close button and keep the minimize and restore down buttons enabled? Resolution: There are actually other Windows API functions that can be used to disable the Close button from the system menu, and the following codes show how to use GetSystemMenu and EnableMenuItem:       &nbsp

Problem: A DB2 application runs fine on a machine that has Net Express 5.1 and DB2 client installed, but it fails with the following error when it is executed on a machine that has Server 5.1 and DB2 client installed: Load error : file 'sqlgstrt' error code: 173, pc=0, call=1, seg=0 173 Called program file not found in drive/directory Resolution: This problem usually occurs when the DB2 runtime files are not found in the PATH. However, the Server 5.1's installation inserts quotes around the location of the COBOL runtime files (i.e. "C:\\Program Files (x86)\\Micro Focus\\Server 5.1\\Bin") causing a problem with the search through PATH and/or COBDIR. The purpose behind the quoted path was for backward compatibility with older versions of Windows. Until an Update (formerly known as WrapPack) is released to remove these quotes, the workaround is to update PATH and COBDIR manually in the Micro Focus registry entries by following the steps below: Open t

High Everbody, How can I trap the Windows Shutdown with NE5.1?

We use the browser component in lots of places in our system but there are times that certain websites throw errors.  Below is a sample of an error that is thrown up to the user.  Does anyone have any clue on how we can stop errors like this from being thrown up to our users?

With Dialog System I have the possibility to continue the program if the operator used the event  WINDOW-CLOSED in order to execute some closing procedures before the program stops. What can I do when I use a Text Window (Character based) to do the same?    If the operator clicks on the  X   the program stops immediately what I do not want.   And when I remove the  Sys-Menu with the WINAPI  WS-SYSMENU  the operator has not the possibility to change the window, minimize it, etc., I am looking for a simple possibility just to activate a flag if he uses X   and  with   IF WINDOWCLOSED GO TO CLOSING-PROCEDURE.    Continue my program. Thanks for any help Rolf #WINDOWCLOSED

set ExcelApp to new Application() set ExcelWorkBook to ExcelApp::Workbooks::Add(1) set ExcelWorkSheet to ExcelWorkBook::Sheets[1] as type Worksheet set ExcelWorkSheet::Cells[1,1] to "test" invoke ExcelWorkBook::SaveAs("C:\\temp\\test1.xlsx") invoke ExcelWorkBook::Close() invoke ExcelApp::Quit()   The above code works in C#, not sure what is going on with Visual Cobol.  I get #VisualCOBOLautoscalemodescreenresolution

Problem: Starting with ACUCOBOL-GT Version 9.2.3, a new Documentation Set is deployed. This may be read online using the following link: http://documentation.microfocus.com/help/index.jsp The news is that now it may also be consulted off-line locally, using the new help file "extend_923.chm".This is available directly in the 9.2.3 installation directory.i.e.: C:\\Program Files (x86)\\Micro Focus\\Acucbl923\\Docs\\extend_923.chm A shortcut to this file may be useful in order to easily open the Documentation Set from the desktop. Problem is that in some cases, on certain Windows operating sytems, this help file may open but be displayed as empty. Resolution: If this HTML Help (.chm) file does not open correctly, use one of the following methods: Method 1 Double-click the .chm file.If an "Open File - Security Warning" dialog box appears, click to clear the "Always ask before opening this file" check box.Click Open. Method 2 Right-click the .chm file and then click Properties.Click Unblock

Hi, I have the following code that encrypts and then i can un-encrypt this file, which works file with text files i.e. readable characters. However if i try to do this with a stored printed data file that contains unreadable characters it produces garbage. Is there any way to do this using this .NET class? method-id "EncryptFile" public static. 01 ls-fsInput type "System.IO.FileStream". 01 ls-fsEncrypted type "System.IO.FileStream". 01 ls-des type "System.Security.Cryptography.DESCryptoServiceProvider". 01 ls-desencrypt type "System.Security.Cryptography.ICryptoTransform". 01 ls-cryptostream type "System.Security.Cryptography.CryptoStream". 01 ls-bytearrayinput type "System.Byte" occurs any. 01 ls-len binary-long. 01 ls-ToBase64Transform type "System.Security.Cryptography.ToBase64Transform". procedure division using by value lnk-inputfile as string lnk-Outputfile as string lnk-key as string. set ls-fsInput

Problem: Working on a Microsoft SQL Server database using Acu4GL or AcuSQL, the runtime may encounter an error like this: "Connection is busy with results for another hstmt" Resolution: In AcuSQL, when executing a SELECT using dynamic SQL (i.e. with EXEC SQL PREPARE), the interface didn't know to treat the SQL like a cursor and so other statements on the same connection would fail with the mentioned error. The same error may occur using Acu4GL for MSSQL. This issue is now fixed starting with release 9.1.2.1 of extend software. The fix is developed in ECN-SQL138. SI: 2546868, 2793950  #AcuSQL#Acu4GL#9.1.2.1#mssql

Problem: ACUCOBOL-GT runtime can connect a COBOL application to a MySQL database using the AcuSQL pre-compiler/runtime via ODBC libraries and a local Data Source (DSN). Starting from release 9.2 the following statement returns the SQL error: SQLCODE=-1 EXEC SQL CONNECT TO :DataSourceName as C1  USER :UserName USING :Password END-EXEC. Resolution: This is a problem identified within AcuSQL. Newer versions of the ODBC Driver manager will cause AcuSQL to receive an error when attempting to execute a SQLAllocHandle prior to connecting to an ODBC driver on windows. This issue is now fixed with ECN-SQL147. The new ECN will be deployed in upcoming release 9.2.4, available starting next November, 20th, 2014. SI: 2790903#9.2.4#AcuSQL#MySQL

Hi all, i have a PIC S9(2) variable holding positive and negative values. I would like to display the values in a grid cell, with the plus or minus symbol: If value = 3 then display 3, if value = -3 then display -3, if value = 0 then display nothing. Is there a PIC supporting this? Apologies if my question is trivial. Th.P. 

Hi all, I have a program running through AcuConnect. There are AcuThin clients running from PCs with different regional settings. Regarding reporting, how can automatically adjust the displayed Date control with the appropriate format? (dd/mm/yyyy for Europe clients, mm/dd/yyyy for America clients). Bonus question: when running "ACCEPT my-var FROM DATE" from AcuThin client, my-var has the clent's date or the server's date? Is there a way to have a UTC/GMT date/time information through a function?  Thank you Th.  

I'm converting this C# statement to COBOL:  if (view.FocusedColumn.FieldName == "CityCode" && view.ActiveEditor is DevExpress.XtraEditors.LookUpEdit) For the COBOL statement, I'm using: if view::FocusedColumn::FieldName = "CityCode" and view::ActiveFilter = type Devexpress.XtraEditors.LookupEdit I get an error on "view::ActiveFilter = type Devexpress.XtraEditors.LookupEdit".  LookuEdit is a class.  How do I check for the ActiveFilter's type ?#VisualCOBOLautoscalemodescreenresolution

Hi All, Just checking if any one from MF has read my previous post concerning this matter? If so : is it possible / not possible? Would really appreciate an answer. Thanks Neil.

Dear Sir, We are using File Share with Visual Cobol 2.2.1 for Eclipse and we get Always  the same error 9/124 don´t matter that we put on the Server and Client definition. Our Server is en AIX 7.1 and our Client is in Windows 7 Any Help ? Thanks, PJM