Rocket® COBOL

[Migrated content. Thread originally posted on 17 January 2012]Hi :-)Have anyone tried to change the priority of a running process from within AcuCobol program ? I've read that it can be done from VB with a call to SetPriorityClass, but I would like to do the same call from within AcuCobol.Any help would be appreciated.

[Migrated content. Thread originally posted on 20 January 2012] Hello All,I am trying to explore whether we can used memory mapped files on windows to implement shared memory (using c ) that will be used from within cobol.I have number of processes (running cobol code) that need to share a common memory area that could be implemented using memory mapped file.I want to know if it is possible that this file can be accessed from within a cobol program (could a pointer be returned from a C code to cobol code so that we can set the address of a cobol structure to the memory mapped file)I am using netexpress 5.1 and visual studio 2010 express.-PTeng

[Migrated content. Thread originally posted on 20 January 2012]Hi!I currently need a way to be able to see if a directory exists out on the server before a file is created.I cannot use the DIR command with "SYSTEM", DIR always returns a a exit code of 0.Any suggestions??Thanks!

[Migrated content. Thread originally posted on 20 January 2012]hi,im starting to get a windows error message saying "error creating window handle" and after some googlerling found the following:-stackoverflow.com/.../winforms-issue-error-creating-window-handlesocial.msdn.microsoft.com/.../it mentions this code:-dim index as integerfor index = ctlFLP.Controls.count -1 to 0 step -1 ctlFLP.Controls.Item(index).dispose()nextBut how do i cobolize it and where should i put it in my program.pls help!many thanksneil.

[Migrated content. Thread originally posted on 19 January 2012]Hi All,Does any one know how to COBOLIZE this?support.microsoft.com/.../301279Many thanksNeil.

[Migrated content. Thread originally posted on 16 January 2012]Hi,Is there "a clever" .NET way to read a Windows .TXT file thats been created using say "NOTEPAD.EXE"So my TXT file would contain 30 lines of varying bits of text?Thanks in advance for any help.Kind regardsNeil Willby.

[Migrated content. Thread originally posted on 04 January 2012]Hello,We are meaning to perform a demo using Visual COBOL for our executive team, but we also want this demo to be running in a computer that has Windows XP Embedded (it is a computer with a tactile screen). The machine is a Toshiba WILLPOS A-20. Our provider has told us that is 100% compatible with Windows XP, but it hasn't all the services activated, so I tried to activate all the services I could, but the license installation keeps crashing.Do you happen to know what kind of problem is all about?Thanks

[Migrated content. Thread originally posted on 11 January 2012]I am programming in Acubench and added the office12\\msword.olb from the ActiveX Definitions Generator. When I placed this Definitions file into my .cbl program and compiled, I received compile errors within the Def file.For example: line 8715: RETURNING expected, PROPERTY-GET foundI opened the file and this is the line of code the error refered to:*[Class: @_Document] Dummy1 PROPERTY-GET, 503, @Dummy1*[Class: @_Document] OMaths PROPERTY-GET, 504, @OMaths RETURNING "OMaths*", TYPE 9Has anyone had this problem before?

[Migrated content. Thread originally posted on 05 January 2012]Hi,my application crashes (the error is (FILE 'XMLCHK'): 119 name is not unique (binding symbol is 'MFCHK_XMLRESET'))when executes the xml generate statement. This is happen only with Server 5.1. With older version (Application Server 4) or when i'm running the program from NetX it runs correctly. We need to change our Cobol run-time system to a newer version but this error is fatal (we are using alot of XML files). Can you help me? Thanx Andrew

[Migrated content. Thread originally posted on 11 January 2012]I am using a grid with a grid data field declared as pic x(80). I set the column width to accomodate typing up to 80 upper case letters. If the operator uses lower case or numbers, more than 80 can be typed but of course only 80 are captured in the grid data field. Is there anything like max-text that can be used to stop the operator from typing after 80 charaters are reached regardless of font or character size?

[Migrated content. Thread originally posted on 11 January 2012]I am generating a report using the report writer. How can I stop a blank line from printing? For example if I have allocated space for 5 Comment fields(80 char a piece) to print, one on each line. For a particular record only the first 2 Comments field have data in them, how can I prevent the report from producing 3 blanks lines of data after the first 2 are printed?

[Migrated content. Thread originally posted on 11 January 2012]Recently, users are intermittently getting this error when working with Commercial Policies. It seems to happen when processing endorsements, applying payments, removing terrorism notices or approving policies (no clear pattern, in other words). It throws them out of the app, however when they reenter it again, they are able to process without the any issues.It is an 'Attempt to access item beyond bounds of memory', but I can't find the manual referenced in your knowledge base (Handling Protection Violation Errors in the 'Program Development Manual' Chapter 5) on this website to try and find out why, suddenly, this is occurring. I have gotten it to occur in animate and a mfdebug.log is produced, but I'm not sure how I can use this for debugging purposes.

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