Rocket® COBOL

[Migrated content. Thread originally posted on 04 March 2012]Hi,i download and install Visual Cobol R4 to test and learn.how i convert cobol to java (jvm) in Visual Cobol ?

[Migrated content. Thread originally posted on 06 March 2012]While trying to upgrade Net Express 5.0: - download wrap pack 5 - tried to install wrap pack 5 - install goes on for hours, never completes (Aborted) - download wrap pack 3 - install wrap pack 3 with sucess but on the Control Panel - Add Remove Programs and on Help - About, shows wrap pack 5 installed - removed wrap pack 3 - Net Express does not start anymore - repair Net Express on "Add Remove Programs" - program opens and runs with sucess, but folder msalmf does not exist anymore, apptrack does not run because of folder absence - recreated folder, run apptrack shows no license installed - selected option 3 to install licensehowever apptrack asks me for two items:1 - Enter serial number part of license keythis one have for Net Express 5.02 - Enter license number part of license keythis one i have for Server 5.0Also have revoke and response keys but no license number for Net Express 5.0.What i'm missing here?

[Migrated content. Thread originally posted on 05 March 2012]Hello, i'd like to comprehend the m$free behaviour in runtime >= 9 and in previous runtime versions. In our company we use it intensively and i noticed that when a significant amount of memory is allocated, say 60Mb, (not necessary contiguous, i.e. not to the same pointer), then the m$free doesn't free it when called.Quoting the doc:This memory is returned to the pool of memory available for use by the runtime. On most operating systems, this memory is still associated with the runtime's process, so it cannot be used by any other processesOk, following the doc i would expect the following behaviour (i observed the memory usage with the Windows 7 task manager):1. Allocate a series of data structures --> wrun32 is 60Mb2. deallocate all structures with m$free --> wrun32 is still 60Mb as the memory is usable only from the current process3. Reallocate the same series of data structures --> wrun32 is still 6

[Migrated content. Thread originally posted on 02 March 2012]We would like to link a 'copy book' to all our linkage sections in our projects that can be dynamic in the fact that we can update the 'copy book' and it would update in all projects. We have tried to use the LINK option on the Linkage screen (right click and link)...it does add the 'copy book' to the project but it is a static copy. If the 'copy book' is updated an the project is pulled back up the changes are not shown. To make the changes appear we have to use the Reload option on the right click menu on the linked file. I did notice in the .lks files the 'copy book' is shown as COPY 'copy book' but the project in bench does not update???Is there anything in AcuBench that will do this function automatically so we do not have to go into each project and reload the file?Any other ideas would be appreciated also.

[Migrated content. Thread originally posted on 01 March 2012]Hi all :-)I would like a user to have the possibility to "break out" of a program execution by pressing the Escape key. I have the following code to determine if the user pressed the Escape key during the run:ACCEPT KBD-INPUT-STATUS FROM INPUT STATUS.IF KBD-INPUT-STATUS = ZERO EXIT PARAGRAPH.ACCEPT OMITTED BEFORE TIME 0 WITH NO ADVANCING ON EXCEPTION ACCEPT KBD-HIT-KEY FROM ESCAPE.Unfortunately the code halts if the user presses the space key.Anyone have a better idea hos to dertermine if the user pressed the Escape key without having to hold the execution until a key is pressed ?Thanks in advance.Steen

[Migrated content. Thread originally posted on 15 February 2012]Hello friends,I'm trying to setup a webservice to use a sample COBOL program.I've followed the steps in this pagesupportline.microfocus.com/.../dzdepl.htmCreated the web sharesbin-share /CGI-BIN/form-share /COBOL/image-share /COBOL/Copied the following files to bin-shareProg.exeCopied the following files to form-sharecadastro.htmTried running the programmyipadress/.../Prog.exeThis returns: HTTP Error 404 - File or directory not found.Internet Information Services (IIS)I'm able to open the cadastro.htm however it does nothing when i click in its "Save" button.I've successfully debugged this program on Solo also via the Prog.exeI'm doing this correctly? This is totally new territory for me, any help would be appreciated.

[Migrated content. Thread originally posted on 01 March 2012]Hello!We need to use a webservice. There is written a wrapper for us, that holds all the PROXY information for us. But the Webservice needs a config file. In a C# project, this is called "app.config". We have the same file, with a different name.The problem is how do I refer to it in the create-verb?Or can it be referred in another way?I have written a small C# test program that tries to to the same as my COBOL code should do. If I does not use app.config, it blows up. If I incorporate the app.config to my C# project and build, it works.In COBOL code, the runtime crashes when we try to create the class that holds the webservice. At the exact same point where my C# code blew up when I did not use the app.config.So my question is (as above...); how can I refer to the config-file during, or somehow before, the create-verb?Regards Dagl

[Migrated content. Thread originally posted on 29 February 2012]Hi :-)Does anyone have an idea to how I can "read" on which line the cursor is placed in a multiline entry field ?Thanks in advance :-)Steen

[Migrated content. Thread originally posted on 27 February 2012] Program:000010 IDENTIFICATION DIVISION.000020 PROGRAM-ID. TESTE1.000030000040 ENVIRONMENT DIVISION.000050000060 DATA DIVISION.000070000080 PROCEDURE DIVISION.000090 PARA-1.000100 DISPLAY "Content-Type: text/html ".000110 DISPLAY "".000120 DISPLAY "".000130 DISPLAY "<html><body><h3>Teste Cobol-CGI</h3></body></html>".000140 STOP RUN.This program when called via CGI generates the following error:Erro interno do Servidor!O servidor encontrou um erro interno e não pode completar sua requisição.Mensagem de Erro:couldn't create child process: 720005: TESTE1.EXESe você acredita ter encontrado um problema no servidor, por favor entre em contato com o webmaster.Error 500localhost02/27/12 17:28:48Apache/2.2.21 (Win32) PHP/5.3.9 The same program compiled with openCobol does not generate the error.Can anyone help me?

[Migrated content. Thread originally posted on 27 February 2012]Hello, we use acu cobol environment and are interested in switch to visual cobol in next future. Does visual cobol supports the use of entry points?

[Migrated content. Thread originally posted on 22 February 2012]I have several Net Express programs that read Excel spreadsheets and they do it quite well. The only issue that I have is when it reads an invalid cell. The program crashes.I receive the following error:Execution of the program EXPTNMGR has been interupted. This program is not animatable, but you can view the call/perform stack. The cause of the interupt was: 114 Attempt to access item beyond bounds of memory.Are there any error handling routines for this?The actual statements are as follows:invoke ExcelObject "getCells" using by value I-Row *> This statement works fine by value I-Col returning Cell.invoke Cell "getValue" returning Cell-Value. *> This is where I get the above messageinvoke Cell "finalize" returning Cell. *> Does not get to this statementThe actual value in the cell is "-

[Migrated content. Thread originally posted on 29 June 2011]Hello guys,I am new here, and I come here loaded with a "problem" that needs solved somehow.This is the brief:I am myself a consultant/programmer/sysadmin, and I have been trying to help a friend of mine with an application he has running in an old Xenix 3.2.4 system, in an old 386, since 1990 !!!!!!!!!! (original disk!!!!)We have managed to put the hard disk into another old system, and with knoppix we did a "dd" of the disk through NFS into my linux laptop, and also burned a few copies to CDrom. I then managed to extract the files (the Xenix file system spec is actually wrong in one spot and it took us a while to figure that out), and I have the tarball and also the full file system (complete) with all the files available, and properly untarred, without corruption. Took me and some other genius buddy of mine 3 months to figure that out !Now, I have the following problem. The application runs using the &q

[Migrated content. Thread originally posted on 06 February 2012]Hi, I have generated a web site and I want access rmcobol program, this program is native dll, but I´dont know, set environment rm variable in order to works with rm files. This program native rm works ok with windows-forms.Please give me step by step what i can do in order to solve my problem.Thank youCAMILO CRUZ

[Migrated content. Thread originally posted on 23 February 2012] HiI have a poblem calling a .NET DLL from within AcuCobol at a customer. I have the exacpt same .DLL and extend programs running on my laptop - works fine.At the customer I've installed the extend 8.1.2.1 version in the directory C:\\Program Files\\AcuCorp\\Acucbl812. In the same directory I have the netevents.ini file. It contains one line:D:\\Lessor4\\System\\LifLevelMy .acu programs is located i d:\\lessor4\\system\\liflevel where my .dll also is located.In the same directory as my programs, I have the portal.xml file. It contains:<?xml version="1.0" encoding="utf-8" ?><FILESPEC><Assembly>Portal</Assembly> <Module>Portal.dll</Module> <StrongName/><Version>1.0.0.0</Version> <Culture>neutral</Culture> <FilePath>Portal.dll</FilePath> </FILESPEC> The create statement in my program looks like this:CREATE "@Portal

[Migrated content. Thread originally posted on 22 February 2012]Hi!I am using NetExpress 5.1 with VS2005Suddenly, I have started getting error (Message box with "Visual Studio" as header) 'count' cannot be non-negative. Parameter name: countwhen I press to go to new line while typing code.I click on OK, and cursor goes to 1st char of next line, and not below 1st character of previous line.I have tried un-installing and re-installing NetExpress 5.1 but no luck.Any help with this will be most welcome, since I have a project to complete, and typing code has become near-impossible with this error.Thanks in advance

[Migrated content. Thread originally posted on 22 February 2012]I have to do a conversion from NE4 naar NE5.1 and have to compile all programs.Now I have a problem with all programs, that have the command " EXEC HTML "The HTML-code made in the programs gives errors when I compile them with NE5.1The error : - Error at line 898, column 7 in file RC101P.sks- PCB-S-00401, Character string not properly terminatedI copied the code to a 'online html compiler '.The code has no errors and the screen is ok.How can I solve this problem ?

[Migrated content. Thread originally posted on 19 August 2011]I'm looking into migrating a system to Visual COBOL (at which I am a complete newbie) from Server Express 5.1. I threw the 268 programs that I have into the evaluation copy of VC for Eclipse and 265 of them compiled. The remaining three are quite important, as they are routines to handle pop-up windows, which we use a fair bit. They use the ACUCOBOL windowing syntax, which is implemented on Server Express by using the "window1" preprocessor directive. However, VC isn't happy with this. My understanding is that VC was partly introduced as a way of bringing ACUCOBOL, RM/COBOL and MF COBOL together, so I imagine that there is a way of using this syntax. I've tried omitting the preprocess directive completely, but that throws up compilation errors. Could anyone tell me what I need to do?

[Migrated content. Thread originally posted on 20 February 2012]Hi,i am having trouble on running a simple cobol procedure to be accessed from solaris thread simultaneously.for simplicity i took demo program c-cobol for this task here is the source code for cobol: copy "cmain1.cpy". IDENTIFICATION DIVISION. PROGRAM-ID. cobsub1. ENVIRONMENT DIVISION. CONFIGURATION SECTION. WORKING-STORAGE SECTION. 01 yyy pic x. 01 zzz char redefines yyy. LINKAGE SECTION. 01 param param1. PROCEDURE DIVISION using by reference param. * display "In cobsub1.cbl" move 10.5 to a move 10 to b move 10 to c move "a" to yyy move zzz to dhere is c program accessing cobol:#include #include #include "cobmain.h"#include "cobcall.h"#include "cmain1.h"void* main_function(void* a ){ struct param1 param; struct param2 paramb; char t

[Migrated content. Thread originally posted on 12 February 2012] Hello, I have a web site and the aspx.cbl calls RMCobol dll, I had several problems with perform instructions, I had that change the program with goto instruction for the solution works well because the perform instruction in the RMCobol dll did not work, I can demostrate it, It is possible that I need some directive, please help, in the example from the community site about the use windows form with RMcobol progrma uses goto.Thank you

[Migrated content. Thread originally posted on 14 February 2012]I'm attempting to create web services that call unmanaged COBOL code. I thought everything was all well and fine until I started load testing and receiving accessViolationException exceptions. I did find the following article which was a great help www.philadelphia.edu.jo/.../PInvoke_tcm21-6374.pdf, and as an alternative to aspcompat="true" devlicio.us/.../calling-an-sta-com-object-from-a-wcf-operation.aspx, but I'm still having some issues.So I compiled my unmanaged dll using the REENTRANT(2) directive and that seemed to work okay, but memory is never released. Then I tried creating the COM server interface using the toolkit, but when I get multiple threads running against the COM component the accessViolationException is being thrown again. I tried setting the REENTRANT directive in the project directives, Build directives, and I tried specifying them during the Service Interface wizard, but when I depl

[Migrated content. Thread originally posted on 04 February 2012]I found in the old Extend forum artikles about CutePDF and want to used it. I did less with the system registry so is there somebody how will help me with an example for how to set the documentname.Best regards,Jaap

[Migrated content. Thread originally posted on 10 February 2012] Hello I have a web site ASP.Net with cobol program, this program calls RMCobol dll and it works but it gives me file status 9A, this file status is not documented in the help and I couldnt work with files in the RMCobol program.Thank you

[Migrated content. Thread originally posted on 09 February 2012] Hello,I am trying to use COBSQL to compile code against Oracle 11g as the database.I have usedCONFIRM CONSTANT DATABASE"ORACLE" p(cobsql) CSQLT=ORACLE11 CST CSP DIS MAKESYN SQLDEBUG VERBOSE KEEPCBL END-C p(cp) CONFIRM LIMITED-SEARCH ENDP ENDP as the COBSQL directives. I have put CSQLT=ORACLE11 not sure if this is ok (documentation seems to allow for ORACLE8)When I compile the code, it happily invokes the precompilerPro*COBOL: Release 11.2.0.1.0 - Production on Thu Feb 9 15:32:35 2012Copyright (c) 1982, 2009, Oracle and/or its affiliates.  All rights reserved.the compilation is sucessful and and .obj is produced.when I further try to link this object into an executable I get.OBJ : error LNK2001: unresolved external symbol _csqlsuppD.OBJ : error LNK2001: unresolved external symbol _ora8libD.OBJ : error LNK2001: unresolved external symbol _ora8protI have included orasql11.lib and even CSQLSUPP.lib in the link

[Migrated content. Thread originally posted on 08 February 2012]I have a web page with gridview. I want to be able to click on any line in the grid, and do some processing on the selected line. How do I do it? I've created a method (shown below), and "onmouseover" etc work, but how do I call a method, or do anything, when a line is clicked on.Any advice gratefully recieved. Many thanks in advance. method-id grdSearch_RowCreated public.*************************************** local-storage section. procedure division. invoke grdSearch::Attributes::Add("title", "Click to select"). *> WORKS invoke grdSearch::Attributes::Add"onmouseover", "this.style.cursor='pointer';this.style.color='white';"). *>WORKS invoke grdSearch::Attributes::Add("onmouseout", "this.style.color='blue';this.style.background='white';"). *>WORKS invoke grdSearch::Attributes::Add(&qu

[Migrated content. Thread originally posted on 08 February 2012] Hello All,I am trying to precompile a Pro*cobol program.I have included an INCLUDE for SQLCA, but I am not sure where is the definition being picked up from.I have checked COBCPY, procompiler INCLUDE ... etc but it does not seem to pick up any of my copybooks but has this version in the compiler listing which I am not sure is picked up from.Is there a way so that the path of the copybook (both COPY and INCLUDE) is listed in the compiler listings ?--- UpdateI would like to further mention that If I issue an COPY SQLCA then it does pick up my version, how ever INCLUDE does not.-PTeng