Rocket® COBOL

[Migrated content. Thread originally posted on 10 October 2011]Hello,I am trying to compile a cobol program and have noticed that all the comp variables are being converted to comp-5 . I dont know why is this happening ? This may be a reason when I get strange results when I make third party API calls. Please notice that I have even tried the MAKESYN "COMP-5" = "COMP" and even that does not help. I have also included part of the listing for one of the program with variable STARTLOG-DVS-STATUS-1. Many comp variables defined within copy books are redefined as comp-5 as well on compilation. My program is NOT an sql program and has no cobsql directives.Can any one tell me what causes the comp-5 generation and how can I stop it.The only directives I have set areMAKESYN "COMP-5" = "COMP"VERBOSESHOW-DIRSETTINGSCONFIRMOVERRIDE "USE

[Migrated content. Thread originally posted on 25 November 2008]Hi,Hopefully this is a simple question.How do you programmatically disable a menu choice? Using Modify doesn't seem to work: "modify MI-XX, enabled = 0" gives me the following error message-Undefined data item: MI-XXTHanks

[Migrated content. Thread originally posted on 28 September 2011]Hello everybody,We are trying to move our data files to an sql database environment, but we are having problem to create the connection with the sql server database.Someone can giveme an example to do it, please?Thanks

[Migrated content. Thread originally posted on 12 July 2011]In my programs I am unable to create more than 1 cursor to be used at a time. Is there a way to create a SQL View from within the program? Use the view in a SELECT statment then delete the view from the database when I am finished with it?The view is needed to speed up processing. It will include a SUM(invoice_amt) as SUM_AMT GROUP BY INVOICE_NO. Then I would query the view to get all WHERE SUM_AMT <> 0.Ideas anyone?

[Migrated content. Thread originally posted on 11 October 2011]Using Net Express 5.1/Windows XP Pro SP3.I have a program in which I'm dynamically allocating memory to contain a variable length table.Calling "CBL-ALLOC_MEM" works fine - I am able to populate the table and display its contents, as required.When I try to 'free' the memory I get a "252 Memory corruption detected (addr=xxxxxxx type 30/4)".The program stops - as shown in Animator - on the 'call "CBL_FREE_MEM"' line as shown: call "CBL_FREE_MEM" *> crashes on this line - memory corrupted using by value memory-pointer returning status-code if not status-code = 0 move "Failed to release memory" to message-line perform di

[Migrated content. Thread originally posted on 11 October 2011]Hi I have a CICS MAP taken from mainframe and compiled it on microfocus to genrate Copybook.The contents of Copybook genrated on mainframe and microfocus are same, however following came to my noticeon Mainframe : 03 FILLER .PIC X(04).ON Microfocus Net express : 03 FILLER .............PIC X(04). ( NOTE SPACE BETWEEN FILLER AND PIC) This copy book is used some where we compare the string , the sebsequent program fails as they are formatted differently. is there any way on netexpress i can have copybook formatted in same way as on microfocus.ThanksCheeta

[Migrated content. Thread originally posted on 06 May 2011]Will the posts/threads from the old Acucorp Cobol forum be moved here? While this new forum was getting started we still used the old forum to get answers.Thanks

[Migrated content. Thread originally posted on 29 September 2011]Net Express allows define in Working-storage section array with maximal size 256 Mbyte.What limitation has MF VC R4 in this case?Thanks.

[Migrated content. Thread originally posted on 31 January 2011]HiHas anyone experienced a problem with Forms with a Dialog border (Property "Border=Dialog") showing differently in Windows 7 to XP/Win2000/98 etc? The problem we are seeing is an additional 4-5 pixels appearing at the bottom and right hand side of the form - making the form appear unbalanced and poorly designed! The additional pixels do not show in the WOW designer, only at runtime. The following screenshots show a form (with a yellow background) and a Group control filling all the form in the designer. When run in Windows 7, the result is completely different to the Designer and other Windows versions. You will notice that the runtime appears to add a small border (1 pixel) around the form in XP too - but at least it is balanced!licensing.mardak.co.uk/.../wowdesigner.gif

[Migrated content. Thread originally posted on 23 September 2011]Running VC R4 for Eclipse under Windows XP.I have imported 270ish green-screen programs to a single project and compiled them successfully. However, on trying to run them, the first program enters and runs up till the point where it calls the second program, when it fails with an error 173. There is an .exe for the second program in the same directory as the first program's .exe. I have compiled with target type "All executable files" and in the run configuration I have set up COBPATH and COBIDY to point to the appropriate Configuration.bin directory. I have "Program is part of project build configuration" unchecked and nothing in the working directory, and the entry program in Main Program. I suspect that there's some environment variable I've overlooked. Could anyone point me in the right direction?

[Migrated content. Thread originally posted on 06 October 2011]Ok can some one pls advise if this scenario is possible?I am using Visual Cobol & Visual Studio 2010.Can I create a Winform Visual Cobol project that can call a Visual Studio VB 2010 project with a call parameter and then return a different value which I can capture in the Visual Cobol project?ThanksNeil.

[Migrated content. Thread originally posted on 12 August 2011]Hi All,Just checking with Micro Focus is there any support for creating a WPF Browser Application in Visual Cobol, which I can then create COBOL code behind the various events?I can create a WPF Browser Application in the Visual Basic Installed templates but doesnt seem to be available in the COBOL templates.Many thanksNeil.

[Migrated content. Thread originally posted on 04 October 2011]Can a screen designed in VB dot net be used by MicroFocus Cobol? If so, how?Thanks.

[Migrated content. Thread originally posted on 05 October 2011]Currently we (Centric IT Solutions, division HR & Payroll Solutions in Amsterdam) use NetExpress 4.0. NetExpress 4.0 will not run on a Windows 7 machine (64 bits) as I heard. And shortly all our machines will be Win7-64 bits. So now we want to use NetExpress 5.1, as this version of NetExpress will run on Win7.Is NetExpress 5.1 backwards fully compatible with projects and files made in NetExpress 4.0?How do we get NetExpress 5.1? Who do we have to contact at MicroFocus to get NetExpress 5.1?What are the costs of this upgrade?We have five licences.

[Migrated content. Thread originally posted on 29 August 2011]Hi All,I know that using IBM DB2 we can create bind file during compiling program. I want to know that whether we can do same for oracle. If yes, Can you point me to documentation.I am accessing Oracle via ODBC connection.Thanks Cheeta

[Migrated content. Thread originally posted on 16 September 2011]Hi,I've created a website using Visual Cobol and it works very well.However I need more control over the web browser page itself.Can any one point me to any code that will show me how to :-a) "Close" a browser page automatically, after performing some COBOL code.b) how to disable the browser "back/forward" buttons.I'm happy to try and convert VB or C# code into COBOL code, just need pointing in the right direction.Many thanksNeil.

[Migrated content. Thread originally posted on 27 September 2011]How can i read all the contents of e tree view? I have build a tree view control with parent and child items and i want to read all items till i found the one i am searching in my loop procedure.can anyone help?

[Migrated content. Thread originally posted on 27 September 2011]We have made a COM wrapper around an existing COBOL program using the Interface Mapping Toolkit. In the existing COBOL program we have used several entrypoints with parameters that are defined in the linkage section. Registering and using it by making an instance of that object in VB6 is possible. Even intellisense works fine. Much of it does work, but when we we call one function a 100000 times (for that function has 100000 records) we get an Out of memory error followed by a MFCLBINP Error 601. We have tried the several COM options in the deploy option: Apartment, Both, Free and Neutral.Does someone have any idea what possibly might causes this problem?Here is an extraction of the cobol program that we use:Linkage section.01 asPar0 pic x(4096).01 filler redefines asPar0. 03 asPar0-data pic x(4095). 03 asPar0-ind pic 9(01).01 asPar1

[Migrated content. Thread originally posted on 08 September 2011]Just curious, is anyone else using Acu Cobol with MS Sql? ThanksWoody

[Migrated content. Thread originally posted on 23 September 2011] Hello alli am using server express 5.1.4.0 on HP-UX 11.31.a cobol program contain this declaration:file-control. select fdate assign to disk organization indexed access mode dynamic record key is fdate-key lock mode automatic with lock on record file status is fs2.procedure division. open output fdate.two users user1 and user2 in the same group users.when user1 launch the program FDATE is owned by user1$ ll FDATE*-rw-r--r-- 1 user1 users 0 Sep 23 17:26 FDATE-rw-r--r-- 1 user1 users 3072 Sep 23 17:26 FDATE.idx when user2 launch the program it still owned by user1$ ll FDATE*-rw-r--r-- 1 user1 users 0 Sep 23 17:26 FDATE-rw-r--r-- 1 user1 users 3072 Sep 23 17:26 FDATE.idxthe file is not removed and will have always the owner user1 why?

[Migrated content. Thread originally posted on 16 September 2011]I have a Net Express program that writes values to a spreadsheet and then reads a particular cell in the spreadsheet that contains the results of a formula. Occasionally the formula will have a divide by zero error because of some value or some other issue where the data may be bad. When this happens the program locks up or crashes, in either event it is a problem. Is there a way to identify this type of issue and not have the program crash? The code for reading the cell is as follows.invoke ExcelObject "getCells" using by value 23by value 1 returning Cell.invoke Cell "getValue" returning Cell-value.invoke Cell "finalize" returning Cell.inspect Cell-value replacing all x"00" by " ".move Cell-value to d-Ret-Value.NormanG

[Migrated content. Thread originally posted on 12 September 2011]Hi,I have installed the trial version R4 to test the upgrade from NetExpress to Visual Cobol.When the program is startet via .bat-job, produces each open-command a file status 9/181 (open input and open output).Has anyone an idea?Georg

[Migrated content. Thread originally posted on 23 September 2011]I have fields defined in a listbox as zzz,zzz,zz9.99-, but they show up as blank when their value is zero. Users would prefer seeing the zeroes. Is there any way to do this? There are also pic x fields in the listbox.

[Migrated content. Thread originally posted on 23 September 2011]Can I create a DLL with NetExpress 4.0 that can be registered, that can be added as a reference in a Visual Basic 6.0 project file? And if so, how can I do this?

[Migrated content. Thread originally posted on 19 September 2011]COBOL has one of the most extensive type systems of any programming language. Other languages only support a subset of the types COBOL has to offer, which has made it difficult to access data in existing COBOL applications, without code changes or writing wrapper classes.SmartLinkage is a feature that was added in Visual COBOL R4 as a “Technology Preview”, to offer an instant solution.This makes COBOL linkage data access easy from other managed languages, such as C#, Java, VB, COBOL. We’d like your feedback to help us define the way forward. What would you like to see in terms of usability and functionality?SmartLinkage - what does it do? Prior to R4, if you wanted to call a COBOL program from another language, you had to create wrapper functions to convert the COBOL data items to ma