Rocket® COBOL

We're trying to troubleshoot some sporadic crashes in an ACUCOBOL 9.2.4 program that interoperates with a C# DLL. Our configuration file has the following setting: ACU_DUMP 1 This does cause a dump file to be created for some crashes, but not all. What tools/techniques can be used to troubleshoot the sort of crash that prevents the dump file from being created? My first thought is to try using procmon, but I just wanted to see what else this community would recommend. Thank you!#ACUCOBOL9.2.4#Crash#AcuCobol

I have a program in cobol wow that is called to create a file. The main program only does the following: perform process-1 thru exit-process-1. The process involves reading a file to finish creating other new features. While running the process "read next" I want to allow the user to press a button to cancel.On the form I have a button that says "press here to cancel". During the process I need to know if the user presses the button to cancel. The question is, what code should I include in the process for detecting that was pressed the button "cancel" and proceed to go to the exit-process-1.

I have imported a Net Express project that uses Dialog System into Visual COBOL.  When I try to run in I get "DSRUN error 18,0,0". I have added the Addpack for Visual Studio 2012:  compataddpack2012_222.msi Is there some other step I am missing?

i need to implement datdiff function as following. How can i recieve the value of duration in a field like 01  duration  pic 9(05). SELECT DATEDIFF(SECOND ,PulsZeit,getutcdate()) AS 'Duration' FROM Clients where AnwendungsId='Thomas Grausgruber@IBOS.TG007'

Is there any guide for creating reports at the size of reciepts (80mm) for thermal printers?#reports#receipt#thermalprinter

I’m looking for some alternatives to printing documents with graphics/logos from Linux, and I’m interested in what other people out there are using?   Currently we are using thin client to windows clients with a Linux data server.   For printing we’ve always stayed internal to runtime, printing graphics and logos by using win$printer commands passed to the windows print spooler. As our output has become more complex we’ve run into speed issues with this approach. So we are now looking into alternatives. We do not have any issues getting the output  converted to PDF, or in front of the client’s eyes but with generating the graphical elements themselves outside of win$printer.   Initial thoughts are to generate a HTML report on the server side, or start exporting data in a flat format to be picked up and output by a report writer.   But I was wondering if anyone else has already crossed this bridge or has other insights as well? &nbs

Hello, We use to debug an application with cobanimsrv under ServerExpress 5. We start cobanimsrv and then start an application that calls a daemon to communicate with cobol. When cobanimsrv is started, it waits for our application to start. Once we have launched our app (via Adobe Air), we can debug the cobol code with anim. Is there an equivalent of the cobanimsrv command for VC2.1 for Eclipse in order to debug a program from inside Eclipse ? Thank you Alain

Hi, what about the SQL Option to set the application name - any restrictions with Microsoft SQL Server? I tried the following: exec sql set option APPLICATION "MyAppName" end-exec exec sql connect to :db-alias  user :user-passw end-exec The connect works as usual but APP_NAME() in SQL Server is not affected, it is empty. Windows 7 Professional, Net Express 5.1 (Version 5.104.0083), Application build as 32-Bit, SQL Server 2012, ODBC driver standard SQL Server Regards, Torsten  

Hello, I have been trying to send mail using cURL from Cobol. I took an example from this forum but I am stuck with the mail body: Here is the link to the example from cURL http://curl.haxx.se/libcurl/c/smtp-mail.html. The following code (partly taken from a previous discussion on the forum) seems to work partially :        *> Demo showing how to make an http request from a COBOL program       *>    using libcurl.       *> libcurl can be found at sourceforge.net/.../       *> libcurl documentation can be found at http://curl.haxx.se/libcurl/       *>       *> compile as follows:       *>    cob -x urltest.cbl -L/usr/lib -lcurl -L/usr/ssl/lib -lssl -lcrypto -ldl       *>    &nbs

Hi, guys!Living in a country that uses comma as a decimal point (1.000,00), I found a bug in the decimal-point is comma declaration.After using a mask to accept input:w-Number   PIC  9(02)V9(02)w-Number-e      PIC  Z9.99 It displays "0,00" but it ignores the Z, and after moving the mask to the proper variable, it continues to have the default value:move w-Number-e to w-Number.#decimalpoint#comma#COBOL

When opening the project is presenting the error attached. Would have to refer to any namespace?I'm using VC 2.2 Vs 2012.

Problem: A .NET managed code application such as Windows Forms or WCF is trying to call a program which resides in a native code .dll. The program being called has the same name as the .dll and it is available in the current folder of the managed code application. When the call is made an RTS 173 error occurs stating that the program cannot be found. What could cause this? Resolution: There are a couple things that could cause the 173 error. The most common are: 1. The case of the program name in the call statement does not match that of the entry point name. If you do not specify the $SET CASE directive within the native program then the default is to convert the program-id to upper-case. If this is true then the call statement needs to use upper-case as well. If you do specify the CASE directive then it will generate the entry point name exactly as it is specified in the program-id. 2. The native .dll is not linked as dynamic and the run-time system cblrtsm.dll is not available withi

Greetings. I am trying to get acucobol to work on an armv7 board running debian jesse. when I try to execute runcbl, I get "unable to execute binary" Has anyone managed to recompile acu-cobol and manage to get it to work on a raspberry pi? I am using a raspberry pi clone, cubox i4 pro Thanks in advance#recompile#raspberrypi

Dear Chris, I am Testing a Visual Cobol for Eclipse  program with MQ and I get the Enclosed Error : sc_script.txt

Hello, I'm creating a Word file and trying to insert a numbered list by using a cobol definition of Word. I've created a very simple Word macro but I can not translate to Cobol. Can anybody help me? This is the macro code:     ListGalleries(wdNumberGallery).ListTemplates(1).Name = ""    Selection.Range.ListFormat.ApplyListTemplateWithLevel ListTemplate:= _        ListGalleries(wdNumberGallery).ListTemplates(1), ContinuePreviousList:= _        False, ApplyTo:=wdListApplyToWholeList, DefaultListBehavior:= _        wdWord10ListBehavior    Selection.TypeText Text:="TEST" Thanks!!#AcuCobol#extend32-bitRuntime

Problem: In Net Express and Server for COBOL, the syntax to run the Data File Converter (DFCONV) command line is the following: run dfconv profile-fname [input-fname] [output-fname] In Visual COBOL or COBOL Server, running the above command line fails with the following error: Execution error : file 'dfconvdll'error code: 114, pc=0, call=1, seg=0114 Attempt to access item beyond bounds of memory (Signal 11) Resolution: In Net Express and Server for COBOL, the DFCONV is a .lbr, which requires the RUN trigger program to execute it while in Visual COBOL and COBOL Server, DFCONV is a .exe. In other words, DFCONV must be executed without the RUN command: dfconv profile-fname [input-fname] [output-fname] Note: Since there is DFCONV.DLL in Visual COBOL and COBOL Server, the RUN command actually tried to run it and resulted to the Error 114.

I have an application copied from a SCO UnixWare system (using a Liant COBOL runtime and compiler) to a SUSE Linux system (using Visual COBOL 2.2).  Copying was as simple as taring the application, copying over to the new system, and untar.  Paths are all the same, as are permissions.  The immediate goal is to simply get the application running on the new system.  This is the FILE-CONTROL: SELECT INQFL                   ASSIGN TO RANDOM "/mypath/INQFL"                   ORGANIZATION IS INDEXED                   ACCESS MODE IS DYNAMIC                   RECORD KEY IS I-KEY                   FILE STATUS IS IND-STATUS.  The application compiles but on execution of the line OPEN INPUT INQFL, IND-STATUS contains "98". &nb

I am trying to Create New Internet App in Netexpress, which usually work well.  This CBL has embedded SQL in it and the Create gives me error message  NO SQL DIRECTIVES have been set. The directives I have Set are DBMAN (ODBC), AUTOCOMMIT, ALLOWNULLCHAR.   Do I need others? Ellen S. 

I have a managed .NET class named Customer and  i need to write a method in order to create an XML file. How can i enable XML syntax in my Class? is there any sample code?

I'm getting sqlcode -102 opening a cursor to select from a SQL view. The message is "syntax error".  This code works on other SQL servers,  so I'm stumped as to what the error is.  see code below, the error occurs when I open cursor.  Any ideas???   Thanks, Ellen            exec sql connect to iDatabase user 'coboluser.Data500$'              end-exec.           if SQLCODE < -1               MOVE 2 TO WS-ERRORCODE               go to 100-END.           EXEC SQL           DECLARE CSR1 CURSOR FOR SELECT  &nbs

There are two options for installing RM/COBOL in a networked environment: 1. Perform a "Standard" or "Custom" installation of RM/COBOL on all of the PCs that will execute the COBOL application. 2. Perform an "Administrative" installation on a network share, then, perform a "Network" install on all of the desktop PCs. Below is an excerpt from page 57 of the RM/COBOL User's Guide in regards to the "Network" installation of RM/COBOL on client machines. This excerpt contains a short summary of the network installation process: ----------------------------------- The RM/COBOL installation process for CodeWatch, Runtime, Recover1, and Compiler supports users who wish to install RM/COBOL on a network server machine and then install RM/COBOL on multiple client machines using the RM/COBOL installation on the server. First, install all of the RM/COBOL components that you need onto the server machine using the “Administrative Installa

Hi All, I'm using the system.drawing.font property and i want to print bold and underlined. Ive found how to do it in VB or C# see:- http://stackoverflow.com/questions/2186810/how-can-i-use-multiple-combinations-of-font-styles-in-vb-net So Ive got the following COBOL code:- invoke e::"Graphics"::"DrawString"(ws-string, type System.Drawing.Font::New("Arial", ls-FontSize, type System.Drawing.FontStyle::Bold) , type System.Drawing.SolidBrush::New(typeSystem.Drawing.Color::FromArgb(ls-Alpha, ls-Red, ls-Green,  ls-Blue)), ls-x, ls-y, ws-cStringFormat) Can you pls advise how to Cobol code BOLD UNDERLINED Thanks in advance Neil.

I'm in the slow process of migrating from RM w/Linux to Visual Cobol RM ... with DevHub to allow use of the Linux while coding in Windows/Eclipse. I've just encountered a problem with Relative Files. In "Standard" RM the relative file ... if you "read next" is in Sequence. 1,2,3,4,5,6,7,8,9 erc.Via Visual Cobol RM ... the Relative Key is a bit of a mess.1,6,7,8,9,10,11,12,19,23,24,25 ... I really discovered this problem when my transitioned code tried to access Record #2, which doesn't exist according to VC. Any ideas on what I will need to do to get the program to work as written? I don't, unfortunately, have the time to do a file migration on all the systems and files. I've attached the simple program, and the file that proves my point. RM when set of results Visual Cobol RM different set. Any help would be appreciated. #Relative#COBOL#files#Eclipse#migration#rm

I have 20 tables which have the same declaration for example: EXEC SQL DECLARE Produktion TABLE ( ContainerGuid uniqueidentifier(36) NOT NULL ,BelegId bigint(19) NOT NULL ,BelegJahr bigint(19) NOT NULL ,BelegNummer bigint(19) NOT NULL ,BelegPositionId bigint(19) NOT NULL ,BelegPositionsNummer int(10) NOT NULL ) END-EXEC. Is it possible do create the select statement where the table-name is variable like: move "Produktion" to sql-text EXEC SQL SELECT DISTINCT ContainerGuid INTO :guid-field FROM :sql-text * FROM Produktion WHERE (BelegNummer = :dat-sql-belegnr AND BelegPositionsNummer = :dat-sql-belegpos) END-EXEC move guid-field to dat-sql-cguid-Produktion.

Below is the link error we are getting in Visual Cobol that we did not get in our Net Express 3.1. What steps do I need to take to resolve this error ? Is this a missing parameter or  modules that has been replaced by other modules ?   Thank you for your help.   D:\\vcprod>CBLLINK gropvp.cbl   Micro Focus COBOL - CBLLINK utility Version 2.1.0.35 Copyright (C) Micro Focus 1984-2012. All rights reserved.   Micro Focus COBOL Version 2.1.00024 Copyright (C) Micro Focus 1984-2012. All rights reserved. * Ignored  - LINKCOUNT"200" * Rejected - MAP * Checking complete with no errors - starting code generation * Ignored  - () * Ignored  - TARGET "PENTIUM" * Generating gropvp * Data:        9944     Code:       35264     Literals:       12128 Microsoft (R) Incremental Linker Version 11.00.50727.1