Rocket® COBOL

[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 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 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 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 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 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 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 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 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 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 30 July 2008]I have registered to the forum but am not able to post anything yet. I am waiting for the administrator to give me this right. In the meantime could you post the following question?*I want to use an Acubench grid control to enter transactions. Basically there are 4 visible columns and 13 rows. Row 1 being a header row.Since the AcuBench help manuals indicate that each cell provides all function key feature of an entry field, I made the assumption that I would get all event procedure of an entry field as well. Apparently this is not so.I have 2 questions. *1. I would like to edit whatever the user types in the first column cells as s/he types it. In an entry field, I used the Ntf-Changed event. I am reformatting an account number to use ?-? between segments, e.g., the user type ?00? and now the entry field shows ?00-? with the cursor positioned after the ?-? ready to accept the next character. Thus the user enters digits ?00001

[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 05 June 2008]Hello all - (sorry for the book)I'm having an issue with lost threading within a multi-level threading environment. I have isolated where I am losing the thread, but I'll give some background information first.I have a process which is chosen from the main menu window which then calls the first program where the user makes a selection of over 100 people to run the process on, which then calls a parameter program, which then calls the processing program, which then calls the print program at which point the user closes/prints the displayed print and the process wraps back around to start again with the next selected person and so on. This process was working seamlessly when, about a month ago, this lost thread began to happen. I have tried numerous things, but I can't even find an available variable to help me force the path to continue. The thread(s) is getting lost after the 15th processing in the Acu-Proc of

[Migrated content. Thread originally posted on 11 June 2008]Buenas tardes.Estoy accediendo a traves del jdbc de acucobol-gt 8.0 a una base de datos GENESIS.Quisiera saber como manejar el bloqueo de registros desde una aplicacion java que accede via el jdbc, ya que desde dos funciones accedo a los mismos datos y no deseo que una funcion vea dicha informacion hasta tanto la otra funcion libere dicho registro.Intent? configurandolo a traves del archivo acuxdbc.cfg pero no logro los resultados esperados.Desde ya muchas gracias.

[Migrated content. Thread originally posted on 07 August 2008]We have designed all our graphical screen to run at 800x600. Customers are now asking to be able to run at either 800x600 or 1024x768. I read about the resize manger and have been trying to incorporate that into our software. I have one problem, the resize manger appears to only allow me to either move controls or resize controls. I want to do both, more it and resize it. I tried adding the resize and move values together but it only performs the move not the resize and move both. Has anyone gotten the resize manger to both move and resize controls using the resize mananger?

[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.

[Migrated content. Thread originally posted on 18 June 2008]Hi there,Does anybody know how it would be possible to replicate with Micro Focus cobol on Unix the ACU specific screen width switching display:DISPLAY SCREEN 132DISPLAY SCREEN 80 ?The closest from this I have found in Micro Focus Cobol (Server Express) is to do a call "cobtermmode" using with 0 meaning 80 Columns and 1 meaning 132.The problem is - so far - I got it only working with TERM=vt100 (with no color support) and also anything I try to display after column 80 when in 132 columns mode is simply ignored.As in ACU, I need to be able to seamlessly switch (with full color support)between screens with a 132 columns width and others with 80 columns width.Apparently cobtermmode relies on terminfo and can only switch between 132 and 80 columns if the terminfo file includes support for wide mode (ie: vt100-w with cols#132)Ideally I would probably need to get hold of a Terminfo file with the following capabilities:swit

[Migrated content. Thread originally posted on 18 June 2008]Does anybody know how I could convert Acucobol C$PARAMSIZE in MF Cobol as there is no equivalent routine?

[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 29 July 2008]Hi all,i want explain what i need to do.I have a grid with 1 column. I need to move in the cell of the grid a string not defined in size, but what i have to do is go ahead with the rest part of the string (in a new line maybe) when the size of the cell is full. But i need to go ahead not cutting the string but with the entire word, like a multiline entry field do.I have ofc idea how to do it... but if there is someone already done it should be great.Ty allcudonant

[Migrated content. Thread originally posted on 30 May 2008]Alguien me puede ayudar a decirme como puedo liberar Runtimes atrapados en Linux ya sea si la maquina cliente Windows tiene thin client y deja de usarla por determinado tiempo o se cae el sistema y el runtime del servidor Linux lo deja activo. Que puedo hacer para que no suceda esto ? Cada dia en la ma?ana me encuentro con usuarios atrapados y tienen que ser liberados manualmente con el acurcl -kill.Existe alguna Variable de Configuarcion que evite esto ?Ya prob? con las Variables TC_QUIT_MODE 0TC_SERVER_TIMEOUT 30TC_CHECK_ALIVE_INTERVAL 1200y no funcionan para esto.Gracias.