Rocket® COBOL

[Migrated content. Thread originally posted on 23 April 2009]Hello,We recently converted to IE7 and now the print previews in our programs are virtually unusable. At 100% size the words are too small to read and at 200% size half the print line is off the page. Has anyone else had trouble with IE7?Thanks

[Migrated content. Thread originally posted on 02 April 2009]:confused:Hello,I am trying to translate the following:To add the table is no problem but I want to disable the vertical lines.Can someone help me please. ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, NumColumns:= _ 5, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _ wdAutoFitFixed With Selection.Tables(1) If .Style <> "Tabelraster" Then .Style = "Tabelraster" End If .ApplyStyleHeadingRows = True .ApplyStyleLastRow = False .ApplyStyleFirstColumn = True .ApplyStyleLastColumn = False .ApplyStyleRowBands = True .ApplyStyleColumnBands = False End With Selection.WholeStory Selection.Borders(wdBorderVertical).LineStyle = wdLineStyleNone

[Migrated content. Thread originally posted on 08 June 2009]Hello Has anyone called a SQL Server Stored Procedure that runs a DTS Package from Acucobol? The code in the Stored Proc is as follows: EXEC master..xp_cmdshell 'dtsrun /S SQLFMMA /N DTS_BOHActionsMK /U PDI /P /L \\\\mplsfp01\\cobol\\data-lib\\logfile.txt',no_outputIt runs fine from Query Analyzer, but from the program I get a status code of "-1 General Error"Thanks

[Migrated content. Thread originally posted on 30 June 2009]Ever wanted to get a time from a NTP server?This example provided by my colleague Claudio shows how to accomplish this using C$SOCKET. Cudos Claudio!       identification division.       program-id.  getNTP-via-socket.       Environment Division.       Configuration Section.       Special-Names.               Decimal-Point Is Comma.       Input-Output Section.       File-Control.       Data Division.       File Section.       Working-Storage Section.      *           Copy "socket.Def".      *      *these are the values used by the socket routine to establish a      *connection with the lo

[Migrated content. Thread originally posted on 24 June 2009]Hello,I hope that someone can help me with this issue.I've a field(text) which gets it's data from within a program, then later this field will be printed out.Problem: the field will be printed truncated (preformatted) and printed normal (collapse) . I need to print this field preformatted.Note: when the input to this text field happens interactive(from the user), there's no problem at all with the preformatted.Any tips?Thanks

[Migrated content. Thread originally posted on 01 April 2009]I was wondering if anyone has every used a treeview to display a list of files and has the windows file-type icons pulled for each file type (using api calls) and have them display as the bitmap in the treeview? I think I can get a windows handle to the imagelist for each of the filetypes, but how to 'convert' that to a bitmap-handle is beyond my scope... I was wondering if someone ever attempted something like this or did they just use MS paint and build a strip of icons and use that?

[Migrated content. Thread originally posted on 01 February 2009]We have users who want to use the Windows Key D to get to their desktop. Pressing the key works fine and all applications are pushed to the task bar (minimized). The issue comes when the user selects the application they want to open next. It does not matter what app they start next the cobol GUI window will reappear behind the selected app. We have a login screen (set to Initial) and multiple other screens (set to floating). We would like to show the minimize button only (no max or exit) and have it minimize all screens (according to what the user has done they could have multiple floating screens up).Any help would be appreciated.

[Migrated content. Thread originally posted on 05 March 2009]Hi,Our reports are being generated from querys made to SQL. Is there a way to cancel Print Preview once Acu-Report1-Preview has been executed? Using ver 6.2. Thank you

[Migrated content. Thread originally posted on 24 February 2009]Hi,I am using MAPI.DLL to send an email with no atttachments. This works well on MS Outlook and Outlook express. However, we get a memory access violation when using Groupwise. Groupwise does open, but at that point we get the error and the email does not go through. Can anybody assist, please ?Thanks in advanceMedasha

[Migrated content. Thread originally posted on 20 March 2009]Hello,I work for a company which uses AcuCobol to call a number of .NET 1.1 DLLs via Interfaces made accessible from the COM. The interfaces work great, but due to the growing age of .NET 1.1 I have started to look at moving these interfaces to .NET 2.0Before I even started rewriting the interfaces, I decided to do some tests to verify that I could make calls to a .NET 2.0 DLL whose interface is exposed to the COM. I wrote a simple interface with one method which simply displays a MessageBox with a greeting. I compiled the DLL, registered it with the COM (using .NET 2.0's regasm), and then used AxDefGen to generate a .def file. I then wrote a simple Cobol program to create the interface and call the method. When I do this, I receive the following error message. "Class is not licensed for use (error 80131107)" Nothing I have done has fixed the problem. Wondering what the issue might be, I wrote the exact same int

[Migrated content. Thread originally posted on 27 February 2009]I have an invoice report that I want to include a very large multi line print field that exceeds 1024 bytes. It would be the fine print typically seen in contracts. Looking at the generated code I can increase the size of the print fields in the ACUREPORT.DEF file but is there a way to change the size of the PRINTF record size without having to change the generated CBL source file. I would prefer not to change the CBL as a subsequent generate would overlay my changes.

[Migrated content. Thread originally posted on 12 November 2008]Testing 1234567890

[Migrated content. Thread originally posted on 16 September 2008]We're using Landmark Software's Mapiland v2 product. Their support staff appear to have fallen off the face of the earth.We'd like to put a website address in the body text of the email and have it show up as a hyperlink on the recipient's end (provided their email client allows it.) Does anyone know how to do this, either with Mapiland or without?Thanks!

[Migrated content. Thread originally posted on 20 November 2008]I have been working on this for a day or so now and have a question. We are trying to use the AcuXDBC to build a web app that can return pages of records (i.e. Page 2 of 50) with each page limited to a set number of records. According to the docs, the XDBC does not support any of the standard methods of paging records (TOP, ROWNUM, LIMIT, etc). Each recordset will be dynamic, so we cannot simply assign an index for the first column of the recordset. Returning the full recordset and then sorting on the client side is impossible over the internet. At best we are looking at 2.8 minutes of transfer time of the completed recordset before being able to filter. The web server will time out long before that, plus it is impractical seeing as there are 160,000 records with around 25 columns to return for a filtered recordset.Is there something similar to the MySQL 'LIMIT' statement or possibly the standard 'TOP' stat

[Migrated content. Thread originally posted on 16 December 2008]Has anyone ever tried to grab the file type icons (or any icons that are embedded in exe's and dll's) using the windows API so that they can used for displaying in a treeview or other things?Thanks

[Migrated content. Thread originally posted on 24 October 2008]Using AcuBecnh 7.2I DISPLAY an AcuBench screen (screen a). It is a Floating window, MODELESS = TRUE. From there I call another Floating window (screen B). It is MODELESS = FALSE. Screen B lies on top on screen A. On screen B I have 2 entry fields (account number and amount). They both have bef-procedure, the first one (account no) has an Event procedure for Msg-validate and the second one (amount) has an aft-procedure. I also have a bef-procedure and aft-procedure on screen B. On screen B, I type a value in account number field and press Enter, the following sequence of events occurs:Acct-no-ef-ev-msg-validateScreen-B-aft-procedureAmount-ef-bef-procedureThe cursor is then found on the Amount entry field.Problem: When I add a message box display in the Acct-no-ef-ev-msg-validate DISPLAY MESSAGE BOX "GOOD ACCOUNT" TYPE IS Mb-OK ICON IS Mb-Warning-Icon DE

[Migrated content. Thread originally posted on 31 October 2008]Hello,We are an ISV with a couple hundred installations of our products using the 7.0 version of the runtime and AcuODBC. We are looking to possibly move our applications to the latest 8.1 versions including AcuXDBC. Many of our customers have numerous reports created through many different ODBC compliant applications, however, most of them use Crystal Reports or Word/Excel. Through our in-house testing, we have found that it is impossible to update crystal reports that have been created in AcuODBC to the new AcuXDBC. It appears the reason for this is they use the same dll?s which causes conflicts when we try and change the data source location in crystal reports from an ODBC table to an XDBC table. I was wondering if you had any suggestions/experience with the transfer from AcuODBC to AcuXDBC? Some of our customers numerous complex crystal reports that will have to be completely redone if there is no other way.:(Tha

[Migrated content. Thread originally posted on 24 September 2008]I have an Acucobol application that sends emails with attachments using MAPI.DLL. This works well with Microsoft Outlook and Outlook Express. However I get a memory allocation error when I use Windows Mail. I have debugged the application and have found that error occurs when I call "MapiSendMail". Does anybody have any ideas ?Thanks in advanceMed

[Migrated content. Thread originally posted on 20 November 2008]We have programs that we would like to "Chain" to instead of "Call". Can someone please explain how I get Bench to not overwrite or remove the Chaining variable? At the current time we are hand coding in the .cbl of the project "PROCEDURE DIVISION CHAINING *****" but at times bench will either change the to "PROCEDURE DIVISION" or "PROCEDURE DIVISION USING ****" (we do understand that if we put something in the Linkage section it will make that a USING item).Thanks for any help.

[Migrated content. Thread originally posted on 08 October 2008]HelloAre there any known issues/problems between Acucobol runtimes and Windows XP Service Pack 3?Thanks

[Migrated content. Thread originally posted on 28 August 2008]Can anyone provide an example of how to use CJAVA-EXCEPTIONOCCURRED and CJAVA-GETEXCEPTIONOBJECT (from C$JAVA facility) in simple cobol app? These are new in V8.0 I understand.Thanks

[Migrated content. Thread originally posted on 12 August 2008]Hello,I'm new to AcuSQL and I have a question about cursors. I'm trying to write a program that takes a query string from the user, declares a cursor for a select statement, and fetches the results returned by the query. I've managed to do this successfully.The problem occurs when I try run a second query, using a different user-supplied string. The results returned by the second query are identical to the first set of results. The third time I try it, I get the error message "Duplicate cursor name".I declare, open, and then close the cursor every time, in addition to preparing the statement, but it seems that the cursor (or the prepared statement) doesn't get completely closed. My question is this: Is it possible to free the cursor in order to reuse it for a different query? Or am I just going about it the wrong way?Here's the code I'm using:          * run que

[Migrated content. Thread originally posted on 05 June 2008]Hello,I need to send information to an Active-x calender and also receive data from it.Does anyone has a sample program?Thanks

[Migrated content. Thread originally posted on 17 June 2008]I am passing a String (PIC X) to a Java method and Java heap memory is increasing until it eventually hits the limit(default 64Mb). I can up the limits but it will occur again so I need to know how to avoid this.I have used a debugger to find that the Strings passed to my method are not being garbage collected and are remaining on the heap. I am not storing them in anyway on the java side.Below is the COBOL call. I am talking about a PIC X(1000) or more and calling it over 100,000 times.Is anyone else having this problem or know a work-around, thanks.000000 CALL "C$JAVA" USING CJAVA-CALL, IPGLBAL-HANDLE,000000 "com/company/cobol/IpglbalProcessor",000000 "execute",000000 "(X)I",000000 IPGLBAL-DATA,000000 IPGLBAL-CALL-SUCCESS000000 GIVING IPGLBAL-CALL-STATUS.000000*

[Migrated content. Thread originally posted on 18 June 2008]By any chance has anyone ever seen this error message before and have a clue as to what to look for.Error message attached: This is generated from the following COBOL statement in an attempt to access a web service. MODIFY QUALCOMM-HANDLE "sendTextMessage"(WD-SENDER WD-ADDRESSEES WD-REPLY-TO WD-RETURN-RCT WD-PRIORITY WD-MACRO XMT-DATA) giving wb-get-result.