Rocket® COBOL

hello I'm using visual cobol for eclipse. Following the help book, I have set environment variable(both in win7 and eclipse) TESTCOVER=C:\\default.tcf default.tcf  [TESTCOVER] RESULT C:\\tcresult.tcz ACCUMULATE ECHOLOG NO and have writen [$SET TESTCOVER] in my program's first line from 7th character and then compile，run. and no where I can found .tcz file please point me the mistake or what i missed thanks newest： When I use run command to launch my program,I was succeed to got a .tcz file. but why it does not work in eclipse?

I have acuv8.1.1, I ever use it to successfully compile code which contain statement such as "CXML-ADD-CHILD"/"CXML-MODIFY-CDATA". But today I want to compile it again, it keeps showing me "No SELECT for file: CXML-ADD-CHILD" compiling error. It looks like acuv8.1.1 not supporting "CXML-ADD-CHILD". Does anyone ever have similar experience? FYI: both acu6.1.0 and acu8.1.1 are installed on my developing environment. #cxml

Please find below the question and answer transcript from the final webinar in the Visual COBOL webinar series. To catch up with all the webinars in the series, including this final one, please visit the Visual COBOL webinar download page.  Q: How does the old Accept/Display Line Position work in this environment?A: existing applications continue to behave just as they would in Net Express or Server Express.If you want to modernize an accept/display application and provide an enhanced UI, you could use .NET or JVM technology. The main challenge is to separate your existing UI from the business logic so that it can be accessed by the new UI framework.The Visual COBOL development product includes some samples that show what the end result might look like in thick and thin client scenarios. Q: Can Visual COBOL work on Android devices? How about IOS? What is the mobile/tablet solution? A: Visual COBOL applications are not supported on Android or IOS today. Please let us

My solution has a C# project and a COBOL project.  Several text boxes are entered on a C# form which then calls a COBOL program to do the validation.  The C# project has a reference to the COBOL project so that it can create an instance of the COBOL program before calling it.  There are several ways I can pass the text box values to the COBOL program. 1. Pass them in linkage, including use of smart linkage (can use smart linkage if the COBOL program is not a class). 2. Declaring properties in the COBOL program and setting them from the C# program before calling it. 3. Passing the Windows form object to the COBOL program and using its Controls collection to get the Text properties of each text box I need to   validate.  The code for the last method looks like this:  method-id ValidateMethod.       local-storage section.            01 ctrls type System.Windows.Forms.Control

Hello everyone, I wonder if there is a way to know which file a Specific Punta XFD. thank you very much :)

Using the <RET> key to traverse through a form with a number of fields what question can I ask to determine WHICH field I've just pressed the <RET> key on? Have tried using the TabIndex property like: if self::TabIndex = 0     invoke self::processEmployeeNumber()    exit methodend-if for asking if  I'm on the first field on the form but it doesn't seem to work as it appears that this code is processed even WHEN I'm on the 10th field (tabindex property = 9). So I know I've pressed the <RET> key so how do I now know on WHICH field I've pressed it on?  

I am trying to check EXCEL language setting by following statement: Application.LanguageSettings.LanguageID(msoLanguageIDUI)   But I am not sure how to accomplish this in ACUCOBOL grammar. Anyone can help? Thanks in advance.    #Excel

Hi all,my enterprise software platform runs on AcuCobol. I would like to access the data produced by it in C #. I installed AcuODBC and through WinSql can query the database, but I can not do the same via an ASP.NET page that uses the same ODBC connection. You know you help me? thanks a lot

Hi all, I'm using Net Express 5.1 on Windows Server 2008. My job is to convert databases to get them ready for production. What do is when I have Gendercode, Firstname and Lastname in seperate fields, I convert them into full names and salutations. For example: "M;Brian;Jones" becomes "Mr. Brian Jones" and "Dear mr Jones,". It all goes well as long as the databases are 8 bit ANSI.   The problem i sumbled upon is this: A customer delivers Eastern European names including there high characters in an Excel database. As soon as i export the database into CSV-ANSI those characters are lost, because they need 16 bits in stead of the standard 8 bits. I managed to export then as UTF-16 LE. I already understand that it is LE (Little Endian), because the BOM (Byte Order Mark) says x"FF FE". I've read that Net Express can handel 16-bit LE databases quite well. Problem is that i'm a total newbe on this. So my question is:

Is it possible to set the background colour of any given cell to one other than the default. This is in respect to being able to set the cells to READONLY or not ok. In the event the cell is READONLY I'd also like to set the background colour of the cell to a meaningful colour to indicate to the user that the cell IS a READONLY cell and that the data inside that cell cannot be edited. Thanks. 

What do I need to set up so that I can determine if a function key has been pressed whilst the user is on a Form? Thanks.

In setting up a datagrid I have a grid containing 5 rows and 4 colums. I've set my first cell to be 0,0 (no problem) Tabbing will move in an orderly function from left to right. (no problem) I wish the <return> key to behave like the <tab> key but the <return> key currently moves DOWN the grid rather than across. I've added code for the 'keydown' event on the grid which states.... if NOT e::KeyCode = type "System.Windows.Forms.Keys"::Return     exit method end-if. set indexOfRow to mydata::CurrentCell::RowIndex. set indexOfColumn to mydata::CurrentCell::ColumnIndex. set mydata::CurrentCell To mydata[indexOfColumn 1 indexOfRow] Despite this code the cursor now moves ONE cell across and ONE LINE down. What am I missing?  

Hopefully I got this in the correct forum.   I've done some extensive searching and could not find exactly what I was looking for.     Here are my questions: 1. We are implementing the ability to Copy/Cut/Paste using the Windows functions (Ctrl C, X, V, etc).   This all works great, except for grid entry fields.  I've seen that there was some issues with this before, but I don't believe there was an actual resolution to the issue.   I've tried debugging through the grid entry handling and when running the Paste function (Ctrl V), the grid acts like I am leaving the field (event 16393).   I can use Shift Insert and right-click, Paste with success, but I wanted to have consistent functionality going forward.    Is there a way yet to implement these functions in a grid?    2.  I've also done some work trying to get a calendar button added to our date entry fields.   We've fooled around with the &quo

Dear All, I'a facing a problem in using move corresponding syntax, I have identical group members and the syntax does nothing!! any one can help please ?? best regards#COBOL

Hello, I was wondering if there was a way to find the line of code in a program that generated a runtime error. For example, the following error Exception Raised, ERR-CODE = H'800a017d'COBOL error at 018DF0 in ../ar/HMEINVPST.ACUCalled from 00DBE7 in POSMENU.ACU Is is possible to open the source code for HMEINVPST.ACU, and find 018DF0, and if so how do I go about it? Thanks

I want to code so that the <Enter> key behaves like the <Tab Key> whilst on a Windows form in that pressing the <Enter> key will... a) Validate the field I've just pressed the <Enter> key on... b) If no error then move onto next field as designated by the TabIndex order... c) If ERROR then remain on field for corrective action. I've noticed on the Knowlege database the following suggestion of code to do this... http://kb.microfocus.com/display/4/kb/article.aspx?aid=36145 however when I cut & paste the relevent lines of code into my own solution I get may errors relating to the words 'Keyboard', 'RoutedEvent' & 'InputManager'! Can someone provide code to help me out here please?  

I've been asked to investigate the transfer of a screen containing many similar values into a Datagrid object as provided for in Visual COBOL. Can anyone point me in the direction of some basic 'how to' instruction on how to: a) create datagrids b) populate them with data coming in from a table c) movement between cells in a datagrid d) validate cell data (as entered by the user) e) retrieve datagrid content and put back in table Thanks very much. P.S a Wiki on this topic would be welciome!

just started to use the following example code (so not so experienced with it) * Create the OLE interface    create @Application of @Excel handle in excel-app.                          * Don't show it yet!    modify  excel-app @Visible = 0. * Use this to create a new excel doc    modify excel-app           @Workbooks::Add()           giving excel-doc.             * Get the worksheets collection    inquire excel-doc sheets() in excel-sheets. I would like to create more than the standard 3 worksheets in this document,  this can somebody inform me how I can do that, tried the next code but it does not work ....    

How can I access the call stack information to identify the program cal hierarchy like you get at abend.

Hi  Could anyone draw the bench marks between server express with Ext3/4 File systems versus Btrfs ? Any help or pointer is much appreciated  Thanks

Good morning, I'm trying to register with NetExpress 3.0       $set ooctrl( P)            ........            wordapp             is class "$OLE$wordXX.application"           ......            invoke EntryCallback "new"     using z"myHandler"                                      returning aHandler            invoke ExceptionManager "register" using OLEExceptionManager       &nbs

In the applications we have mounted on HP-UX to write the XML using the command "write" are always written with pretty print format, ie with tabs. Is there any way that these XML are written without this pretty print format? Regards.

In the archived forums there is a great example of controlling excel through ole automation. I have used the sample program from time to time with out a problem, however I am trying to duplicate a VBA macro that formats a header row nicely. I have most of it working except "AutoFit" and "FreezePanes". AutoFit is more important to me than FreezePanes. Here is the VB code:  Rows("1:1").Select With Selection.Interior         .ColorIndex = 37         .Pattern = xlSolid End With Selection.Font.Bold = True Selection.AutoFilter Rows("2:2").Select ActiveWindow.FreezePanes = True Cells.Select Cells.EntireColumn.AutoFit Range("A1").Select Here is the reevant parts of the COBOL code: INQUIRE EX-WORKBOOK @Worksheets::Item(1) IN EX-WORKSHEET. INQUIRE EX-WORKSHEET @Range("A3:O3") IN EX-RANGE. MODIFY EX-RANGE @Font::Bold = 1. MODIFY EX-RANGE @Interior::ColorIndex = 37. MODIFY EX-RANGE @Interior::P

 Hello,  we are migrating our Cobol-Programs from Solaris to Linux.  Our Linux-Environment:  - SUSE Linux Enterprise Server 11 SP1  (x86_64) - Server Express V5.1 - My workstation: Windows XP SP3 - 2 GB RAM A few programs throw the following error-messages: Part of the compilation-protokoll:  " cob64 -cgx r00157.cbl Execution error : file 'token'error code: 114, pc=0, call=1, seg=0114     Attempt to access item beyond bounds of memory (Signal 11) cob64: error(s) in compilation: r00157.cbl" On Solaris the compilation of these programs is working without any problems. Does anyone has a idea what's going wrong and how to solve the problem? Thanks and best regards Michel#Executionerror114filetoken

why AcuParam are not recognized?  <OBJECT ID="AcuGTAX1" WIDTH=640 HEIGHT=480     CLASSID="CLSID:077C768D-64C1-4AC1-845D-4589B4B2C24E"     CODEBASE="www.acucorp.com/.../acugtax  acugtax8121.cab#Version=8,1,2,2949">     <PARAM NAME="SRC" VALUE="localhost/.../Cogeweb.acu">     <PARAM NAME="AcuEmbedded" VALUE="TRUE">     <PARAM NAME="AcuParam1"   VALUE "_PARAZZA">     <PARAM NAME="AcuParam2"   VALUE "PARAZZAPARAZZA">     <PARAM NAME="AcuParam3"   VALUE "CogeWeb_Call_Sime">     <PARAM NAME="AcuParam4"   VALUE "10"> In cobol program "c$getvariant" return blanks.