Rocket® COBOL

[Migrated content. Thread originally posted on 05 January 2012]Hello,I have this piece of code in a Visual Cobol program.This works correctly; it display the first line from the result of execute the next command: “cd outEcl;ls -lo 2>/dev/null|awk '/^-r/{print $8}'”        ...            SELECT MANIOBRA       ASSIGN TO INPUT LOC-MANIOBRA       ORGANIZATION LINE SEQUENTIAL.       ...       FD  MANIOBRA           LABEL RECORD STANDARD.       01  ART-MANIOBRA            PIC X(25).       ...            INITIALIZE LOC-MANIOBRA.                STRING "                "outEcl"        &nbs

[Migrated content. Thread originally posted on 09 January 2012]A function is defined as prototype, called by a cobol program in a C library.      $set constant PS-rect "PS_rect"       entry PS-rect void-conv using               by value data-pointer               by value      float               by value      float               by value      float               by value      float           .PS_rect traces a rectangle according to this interface :PSLIB_API void PSLIB_CALLPS_rect(PSDoc *psdoc, float x, float y, float width, float height);Here is the problem : if the cobol programs calls                  call &qu

[Migrated content. Thread originally posted on 06 January 2012]Hello,I am trying to translate the following API structure so I can call it in my cobol program. LRESULT WINAPI SendMessageTimeout( __in HWND hWnd, __in UINT Msg, __in WPARAM wParam, __in LPARAM lParam, __in UINT fuFlags, __in UINT uTimeout, __out_opt PDWORD_PTR lpdwResult);Basically, I'm trying to broadcast a WM_SETTINGCHANGE message with lParam set to the string "Environment" in order to process a registry change involving an environment variable. See this link for more info: msdn.microsoft.com/.../ms682653(v=vs.85).aspx I've got the portion completed that sets the variables, but can't seem to broadcast a message to update windows.Any help here would be great.ThanksDave

[Migrated content. Thread originally posted on 05 January 2012]Hello,What is the equivalen in Visual COBOL to this fragment of code in C#?        [Category("Data")]        [Description("Alert Message")]        public string Message        {            get { return message; }            set { message = value; }        }Thanks!

[Migrated content. Thread originally posted on 03 January 2012]Hello,With ServerExpress 5 under Linux RHEL5 :How can you debug with animate a program who is calling C routines previously linked in a new runtime.Anim tells it cannot find the functions called - they are in the runtime but animate has no info about it.Is it possible to create a new anim like we can create a new run time ?I thank you,regards,Alain

[Migrated content. Thread originally posted on 03 January 2012]In my company we have been using Mainframe Express for several years to develop and test our COBOL mainframe portfolio on windows. We have also done some small scale testing using netExpress and Enterprise Server with positive result but have no customers in production yet on this platform.To be even more platform independent, I have started to investigate Visual COBOL R4. I want to focus on program with plain COBOL SQL and MQ. I was successfully making a COBOL project that connects to our DB2 server. But I did not find any documentation about MQ API. I got Run-time error:“ 173 Called program file not found in drive/directory: MQCONN”I have tried to link mqiccbb.Lib and/or mqiccb32.Lib but with same result.Is anybody aware of any examples how to set up a COBOL project with MQ API?I also got problem when trying making a COBOL JVM project that connects to our DB2 server. I got the following build error: [cobol] Ex

[Migrated content. Thread originally posted on 05 January 2012]Is the CVM() singleton? As in, you can only have a single instance of this object? I've attempted to create multiple objects, but when I 'think' I have 2 instances of the object it appears to really only be a single object.I'm able to work around it by just accessing a single COBOL program at a time, but I'm curious if this is a limitation.Also, I'm having a performance problem with using this on a server. On my development workstation, the response time is rather decent. When I deploy my solution to a test server, requests that were taking 10-14 seconds balloon up to several minutes. The requests complete if I turn off the timeout features, so I know I'm not having a security problem with file access. I also removed the network from the equation by moving the files all onto the same directory to be sure I wasn't seeing network lag as a problem.I've tried to use the following to att

[Migrated content. Thread originally posted on 04 January 2012]Hello,The following compiler directive has to be set in order to enable the C$Century call (or some other RM/COBOL subroutine like C$DevEnv,...) to return a value:RM "GIVING"But If I use this compiler directive, the Visual Cobol subroutines doesn't work. For exemple, the CBL_GET_PROGRAM_INFO subroutine doesn't work; when I use it in a program, it displais the next:wsfuncion = 0000000000 status-code = 0538976288                                wsfuncion = 0000000004 status-code = 0538976288                                 wsfuncion = 0000000006 status-code = 0538976288                                 wsfuncion = 0000000003 status-code = 0538976288    &n

[Migrated content. Thread originally posted on 03 January 2012]Hello,I have some RM/COBOL programs that uses XML Extensions and RMNet in order to consume a web service, and it's working on Unix Plataforms. I want to convert it to Visual Cobol.In a previous question, you told me that the XML Extensions are not currently supported in Visual COBOL on Unix platforms. What about RMNet?? is it supported in Visual COBOL on Unix platforms??What choices do I have for this type of program? In the Unix plataform I can not use the .NET WCF service components to consume web services...Thank you

[Migrated content. Thread originally posted on 02 January 2012]Hello,I have written a new user control in C# that has a public property:        [Category("Behaviour")]        [Description("Will show this message")]        public string Message        {            get { return textBox1.Text; }            set { textBox1.Text = value; }        }I can see this property in the designer, and I am able to change it too.But, when I try to do that inside the code, Visual COBOL never finds my property. I want to to do something like this:           set cntlAction1::Message to "Opening Cash, please Wait...".

[Migrated content. Thread originally posted on 22 December 2011]I received the following error: Description: "OLE DB provider "MSDASQL" for linked server "PAMS006" returned message "[TOD][ODBC][GENESIS]VISION: Read timeout".By default, the AcuXDBC setup program does not set Connection Pooling. I do not know if this means that the "extend9 AcuXDBC (64-bit)" driver does or does NOT support "Connection Pooling"? If it does, then perhaps setting this and a "Pooling Timeout" would reduce the likelihood of the error above?

[Migrated content. Thread originally posted on 22 December 2011]I have an utility program, say A, with various entry points. To make these entry points available from any program without requiring to do an explicit call to A, i call A in a program that is surely run before all other programs and then never cancel A.When a program, say B, is called in thread and tries to call an entry point of A it gives error, as the new thread doesn't have access to the main instance of A. So, in B i explicitly call A but i can't cancel it because B could also be called not in thread.The question is, when a thread is stopped and its memory released, do all subprograms called in it are automatically cancelled or not?Thank you in advanceLuca

[Migrated content. Thread originally posted on 13 October 2011]NetExpress 3.1/5.1 developer. I need to know which Win32APIs to call to:Open a TCP/IP port on a target serverSend data to that server to request a responseReceive the response form the serverSend the next request ......Close the link when finishedBeing unfamiliar with what's required here I've taken a stab by browsing through the MSDN site, and have come up with a possible sequence of APIs to call, based on WinSock functionsWSASTARTUP to initialise the Winsock DLLSOCKET to create a socket on IP (not sure how to connect to a particular port)SEND to send data RECV to receive the response, then round again to send moreCLOSESOCKET WSAGETLASTERR to check errorsAm I oversimplifying here? Of course this needs to be completed yesterday; any help gratefully received ...

[Migrated content. Thread originally posted on 20 December 2011]Is there a way to change the default color (white) of tab controls with native controls enabled in runtime 9, say for example to gray?ThanksLuca

[Migrated content. Thread originally posted on 21 December 2011]Hello,I have more problems with the migrating to VisualCobol of RMCOBOL programs... I wanted to know if there is some kind of solution for these problems, or if it will be corrected in future VisualCobol versions1)In some programs RM / COBOL, we use the word PROGRAM-ID to know the name of the current program ..       IDENTIFICATION DIVISION.       PROGRAM-ID.   BASE0006.       ...       PROCEDURE DIVISION.       PROGRAMA SECTION.       PROGRAMA-INI.                        ...       DISPLAY "PROGRAM NAME: ", PROGRAM-ID.But in Visual Cobol it gives the error "invalid operand"... 2) In Visual Cobol this line of code doesn't work ... (WENTRADA(1:1) IS LIKE CASE-INSENSITIVE “S”)..

[Migrated content. Thread originally posted on 02 December 2011]Dear Sir,In the documentation for Visual Cobol Visual Studio there is an article about importing Net Express projects into Visual Studio(visual cobol).I am using the Visual Cobol R4(september 2011) in Visual Studio shell with a evalution key received from Bart Abeel. In the article you mentioned the net express project import wizard to convert net express projects into visual studio solutions, but I do not find such a wizard for importing such projects into Visual Cobol R4?The net express software is installed on another machine. What kind of solutions those it makes if you are using Net Express wizard(if there is one) to generate html-code?

[Migrated content. Thread originally posted on 13 December 2011]I have a remote project “Program3” in a AIX system created with Visual Cobol Eclipse (Windows). This project contains a unique program that makes a CALL to “Program4.so”; and “Program4” only displays “Hello World! I’m Program4!!!”.When I execute “Program3” from AIX system, I receive the error:Load error : file 'Program4'                                                    error code: 173, pc=0, call=1, seg=0                                            173    Called program file not found in drive/directoryTo solve this problem I had to initialize COBPATH with the “Program4.so” path.But the problem is that it seems that the initialization of COBPATH does not work in c

[Migrated content. Thread originally posted on 19 December 2011]Is it possible to execute mysql commands within a cobol program? Ex, insert, update delete.We are currently using net express 5.1 and executing cobol programs in a linux environment.Thanks,Paul

[Migrated content. Thread originally posted on 14 December 2011]We are currently working with RM / COBOL, and we set up a folder system that we like to keep when we come to work with Visual Cobol.We have the following folders:/ CPY/ FUENTES/ LST/ OBJAll Programs .CBL are in the /FUENTES folder. When you compile a program, the copies are obtained from /CPY folder, the .LST file generated goes to /LST folder, and the .COB goes to /OBJ.I've been doing some testing with Visual Cobol Native and I have some doubts. My idea is to generate .SO files so that programs can be executed with the command cobrun, and to be called by other programs with CALL.1)Compiling and linking from command line. With de command (DES): aixlab0102: / FUENTES> cob -z -P Program1.cblI get the next files Program1.idyProgram1.intProgram1.lstProgram1.oProgram1.soThen I move "Program1.so" to /OBJ folder and "Program1.lst" to /LST folder; and I remove the rest of files. I do all of this manually

[Migrated content. Thread originally posted on 15 December 2011]Hello,our Intranet is coded in AcuCobol (CGI).I will give the Users the Option to Create a Event in Outlook from the Intranet-Calendar i coded.I think the easiest option is to create a vcs-file. But to realsize this i have to change the - Content-Type- Content-DispositionIn the CGI-Manual from Acu i found in "4.6 Creating a Runtime Configuration" that i can Change the Content-Type-> Problem 1 solvedBut what is with the Content-Disposition?With PHP i will write:header("Content-Type: text/Calendar");header("Content-Disposition: inline; filename=calendar.ics");

[Migrated content. Thread originally posted on 15 December 2011]Hello,Does it exist any manual which explains how to install the runtime for production uses?I have this information:Whilst there is a minimum spec for the development side of things, the runtime doesn’t have a clear minimum spec as it all depends on what the application is doing. Also a lot of it depends of the requirement of the Microsoft components (see below), which we cannot really comment on. The runtime has a pretty small footprint but obviously more I/O and database access for an example would require more CPU and RAM but it’s hard to say without knowing what the application is doing. One way to try would be to use an evaluation runtime and build some test application based upon what the existing application does. The requirements that I can state are : OS:Windows XP 64 bit SP2, Windows XP 32-bit SP3, Windows Vista SP1 32/64-bit, Windows 7 32/64-bit, Windows Server 2003 SP2 32/64-bit, Windows Server 2003 R2

[Migrated content. Thread originally posted on 20 October 2011] I am fairly new to COBOL, I am a JAVA developer but I have been tasked with calling a java program from an existing cobol program. So I thought I'd start with a basic proof of concept to see how it works and I can't even get it to load basic java libraries. here is my program:$set ooctrl" p-f" IDENTIFICATION DIVISION. PROGRAM-ID. TEST-FD. ENVIRONMENT DIVISION. CONFIGURATION SECTION. class-control.    Sys is class "$java$java.lang.System"    .    DATA DIVISION. FILE SECTION. WORKING-STORAGE SECTION. 77  pic-x-item  pic x(50). thread-local-storage section. 01 anInt  pic x(5) comp-5./ PROCEDURE DIVISION.                                       invoke Sys "getProperty" using "os.name" giving pic-x-item.    display "Operat

[Migrated content. Thread originally posted on 14 December 2011]Hello,I am moving the demo I have been writting with Visual COBOL for .NET to another computer, and just executing the release version. Everything goes fine, except one of the modules. The error in the subject appears every time we execute it.The project is managed, and uses a native COBOL program to access the file.Another project that uses the same last module (the native one), but it is written in C#, using a managed COBOL bridge, never crashes.And also there is another project similar to the first that works with that file too, and also works fine (notice that the program that reads the COBOL file is always the same).The curious thing is that, after executing the second or the third project, the first one never comes to fail again.Any ideas, by chance?

[Migrated content. Thread originally posted on 13 December 2011]I have application which is developed in VS 2003 with Net express 4.0 ( cobol) and which is working very fine. Now I want to upgrade this to VS2008 and net express 5.0. This project has main solution, within main solution we have 5 project/library, 3 class library written in .NET and 2 written in cobol. .NET Library is getting upgraded and compiled. .Cobol library is getting upgraded however it not getting compiled its showing error "System error - failure during ILASM phase" I have already tried to add "ilasm" references for project of verion 1.1 and 2.0 folder even though its showing the same error. I have already done R & D on above error also searched on Google about it, however we did not found any solution for the same.Operating system i'm using is Windows server 2003 R2I have admin right's of current OSIt would be really helpful if you can suggest some solution. Thanks & regards,

[Migrated content. Thread originally posted on 05 December 2011]We are converting a working process that displays images using Microsoft Reporting Services images inside of an imbedded browser component to display the same images using PDF format. The process is working correctly until the user closes the application....once they close the application they receive the following error (sorry for typing as I could not figure out how to add a screen print to the post!):*********************sw: acuthin.exe - Application ErrorThe instruction at "0x0477609c" referenced memory at "0x0000000014". The memory could not be "read".Click on OK to terminate the program*********************Has anyone seen this issue before and did you find a solution?Thanks for any help.