Rocket® COBOL

Problem The reason this error occurs is that the object was compiled with a flag that designates it to be executed by a specific processor type Intel, sparc, etc. Resolution When an object is compiled the instructions that are placed in the object are generic, intended to be run by any processor. This gives AcuCobol-GT its portability. When a program is compiled with one of our processor specific flags then the instruction set will be specific for a specific processor type. For example if you compile a program for "Intel" and then move it over to a machine with a "SPARC" processor then you would get this error. The runtime does check for native code objects immediately when they are loaded into memory. Please review the V9.2 online documentation: - http://documentation.microfocus.com/help/topic/com.microfocus.eclipse.infocenter.extendACUSuite/BKUSUSCOMPUS2.2.2.html

Can i see the SQLCode status of commands ? I work SQLite with VC 2012.#SQLiteSQLCode

InfoExpress using version 7 over sco unix sco working properly we do update to version 12 to get more users and have problems. rmservertcp when start  the cpu usage reaches 100% leaves resources not available. which may be the problem?#COBOL

Hi Please can you tell me where to find a programmer or where I can  post a freelance job offering ? Many thanks All

I have coding to automate Microsoft Word documents.  We set up Word documents and bookmark specific fields and then my program opens the document and fills in the appropriate bookmarked information. This works in older versions of Word, Word 2007, and Word 2010.  In Word 2013, it pulls up the document, but does not fill in the fields.  Debugging shows that the C$EXCEPINFO is giving 06124 in the ERROR-INFO-CODE and I have no idea what this means. Coding: MODIFY wrdBookmarks @Exists (BY NAME @Name "CompanyName")    RETURNING bkExist. IF bkExist = 1    MODIFY wrdDoc @GoTo(BY NAME @What wdGoToBookmark BY NAME @Name "CompanyName")    RETURNING wrdRange    IF wrdRange NOT = 0       MODIFY wrdRange @InsertAfter(BY NAME @Text my-text-field)       DESTROY wrdRange    END-IF. It generates the error on the MODIFY wrdRange @InsertAfter... line. It successfully comp

We have a NAT'ed firewall between two networks on our campus - the license manager sits on a server that is in the untrusted side along with most the clients that use the software. We have a few clients that need to use the software on the trust side though - this is normally achieved via port mapping. The problem we have is that the clients are trying to contact the server on high ports, usually 50,000 , so the connections get blocked at the firewall. Example of what we see: Source: 164.58.xxx.xxx Port: 53891 UDP Destination: 192.168.xxx.xxx Port: 5093 UDP Is there a way to remedy this? Opening up all high level ports is not an option. Most license managers we use listen on the same port that the clients are trying to contact them on, so this has never been a problem.

Problem The customer’s application runtime produced the following error 9D,54. When trying to verify this by selecting all the available messages from 'sysmessages' and checking SQLCodes and SQLstate this message code and description was not found. Resolution When using Acu4GL for MSSQL V9.2.1 on SQL Server 2012 it is imperative that you create a new version of the batch file 'MS_INST.sql' and run this on SQL Server 2012 to create a new 'Locks' database as it contains the latest version of the required stored procedures. Please review the V9.2 online documentation: - http://documentation.microfocus.com/help/topic/com.microfocus.eclipse.infocenter.extendACUSuite/BKGLGLSQLIGLA21.html

Hi, I'm connecting to our SQL Server database from multiple programs. I would like to check at the beginning of each program, if a connection to the SQL Server is already established (by a previously executed program in the same chain). If it is not, I would then like to connect to the database. Now, I could basically execute some basic SELECT statement and if the return code isn't zero, then it means the connection isn't established. But is there a specific statement in SQL or COBOL, with which I could check the status of the connection? Cheers, Raffi

Problem How to change the default ICON provided by AcuCobol in your application program Resolution Use the configuration variable ICON. This variable has meaning only on graphical systems such as Windows. Set ICON to the name of the file that contains the icon. This file should be an ".ICO" file that contains a 16-color icon. (Although the file may contain icons in other formats, the runtime accesses only the 16-color icon.) The icon should be created using an icon editor like the one in the Windows Software Development Kit. For example, if your custom icon were contained in the file "PAYROLL.ICO" in the directory \\ACCT\\ICONS, you would add the following line to your COBOL configuration file: ICON \\ACCT\\ICONS\\PAYROLL.ICO The maximum icon size that can be used with the ICON variable is 32 x 32 bits. The runtime uses the first icon it finds in the icon file that fits its maximum. If that icon is larger than the maximum, a memory access violation may occur.

Problem We are trying to rebuild a newly created Vision 5 file into version 2 and getting the following error: - "Unsupported operation" Resolution In this case the reason you can't rebuild the Vision 5 file is because the second key has more than one key segment. Vision 2 only allows a single segment per key. If the runtime still actually supports Vision 2 files you can set V-VERSION to 2, and write a COBOL program to read the Vision 5 file and write to a newly created vision file. Because V-VERSION is 2, the newly created file will be vision 2, while the runtime will just open the vision 5 file as a vision 5 file. Vision 2 is the original version of our file system, distributed with ACU versions 1.x. Vision 2 is not compatible between machines, so if for example you FTP a vision 2 file from a Solaris machine to a Windows machine, the Windows runtime would consider it corrupt. In fact, vision 2 is not compatible between 32-bit and 64-bit versions of the same operating sy

Problem calling stored procedures.        When executing a stored procedure I get a SQL error “A server cursor cannot be opened on the given statement or statements.” SQLCODE = -16937. I have a couple of stored procedures that are getting the same error.  Below is my Cobol code and the create statement of the stored procedure I am using. What am I doing wrong?            MOVE "UN" TO HV-DBIO            EXEC SQL                DECLARE spcursor CURSOR for                    CALL sp_SysGenIO (:HV-DBIO)            END-EXEC.       &nbs

Hi, again. I do "set  btn to sender as type Button" and i can get button properts. Now i need to get which mouse button has brought me here. I suspect that the answer is in "e as type System.EventArgs", but, how? I asked to google... hugs.

where can I find user guide for User Interfaces supported within Visual Cobol?#userguides

Running Visual Studio 12 with VC 2.2.  If I make a change to a designer, save it and then run debug and the changes are not there.  I must have something setup incorrectly, although this was ok in visual studio 10.  Suggestions?  Note: I did not make any solution changes between visual studio 10 & 12.  Just starting working in the solution.

are hierarchical databases (e,g IDMSX or DMS100 ) supported by Visual Cobol

Hi. In Advance, sorry for my poor english. I have this, in NetExpress: THE CALLER [CODE FLAGMENT - BEGIN] *------------------------------WORKING-STORAGE SECTION.*------------------------------ 78       NumItens VALUE 10.78       NumMinas VALUE 12. *01       wParametros.  05     wJogando PIC 9(001).  05     wTiros PIC 9(002).  05     wMinasAchadas PIC 9(002).01       wCampoMinado.  05     wNumitens PIC 9(002) VALUE NumItens.  05     wNumMinas PIC 9(002) VALUE NumMinas.  05     wArea.    10   wFiller Occurs NumItens.      15 wTerreno PIC X(002) Occurs NumItens. [CODE FLAGMENT - END] THE CALLED CLASS [CODE FLAGMENT - BEGIN] Method-id. "Inicializacoes". *------------------------------ linkage                Section.*-

I am using excel in my program and after i finish it remains in memory in the task manager. How can i get rid of this? 77 olExcel HANDLE OF APPLICATION. 77 olWrkBk HANDLE OF WORKBOOK. 77 olWrkSh HANDLE OF WORKSHEET. 77 olRange HANDLE OF RANGE. 77 olSheets HANDLE OF SHEETS. 77 olFormat HANDLE OF VARIANT. CREATE-AND-OPEN-EXCEL-FILE.    CREATE @Application of @Excel handle in olExcel.    MODIFY olExcel Workbooks::@_Open      (BY NAME FILENAME OPNSAV-FILENAME,    BY NAME Format xlCSV,    BY NAME Delimiter ";",)    GIVING olWrkBk.     INQUIRE olWrkBk sheets() in olSheets.    INQUIRE olSheets item(1) in olWrkSh. . *QUIT-AND-DESTROY-EXCEL.   MODIFY olWrkBk @Close()    MODIFY olExcel Quit()     DESTROY olSheets    DESTROY olRange    DESTROY olExcel    DESTROY olWrkBk     DESTROY olExcel . #Excelstackintaskmanager

I maded one post about currency formating, and the question was answered, but I am now trying to put the system formatting within a field in a datagridview, so, I C# for me is more easy to make that, and I maded, but, When I tryed to make the same in Visual Cobol, I just got errors :(My C# code is that, remambar, is based in that code: community.microfocus.com/.../10425.aspx private void dataGridView1_EditingControlShowing(object sender, DataGridViewEditingControlShowingEventArgs e) { e.Control.PreviewKeyDown -= Control_PreviewKeyDown; e.Control.PreviewKeyDown = new PreviewKeyDownEventHandler(Control_PreviewKeyDown); } private void Control_PreviewKeyDown(object sender, PreviewKeyDownEventArgs e) { var txtB = (TextBox)sender; var myValue = txtB.Text.Replace(",", "").Replace("R$", "").Replace(".", "").TrimStart('0'); decimal ul; if (Decimal.TryParse(myValue, out ul)) { ul = ul / 100; txtB.PreviewKeyDown -= new

what databases are supported by visual cobol?#databases

Does anyone have a systems flowchart for visual cobol environment?

Created an online solution for an appliance retail business using NetExpress v3.10. You can view this online solution in my personal website www.retailplus1.com The question I would like to ask is the usual .DAT/.IDX data limitation since I tried encoding several records to check the limitation of an ISAM file. It seems to me that the limitation is1GB or about 1.3GB (indexed), it is getting a boundary violation error. Is this really the limit? Or is there any configuration that is needed to just even add a few Gigabyte to a file?? I only used $set indxformat"4" as my compiler directive.#COBOLserver#DataLimitation#netexpress#Windows

Hello, We would like to integrate the iText pdf java library in a legacy application developed under VC2.1. We know - thanks to the forum - how to call iText in a cobol jvm project. But it is me unclear how to call - if possible - a java library from legacy cobol (or oo cobol) gnt executables without developing the entire application for the jvm. The idea would be : program-id. myLegacyCode. *> declare the java iText library *> or an object referring to the library *> or something calling a cobol program written using the cobol jvm syntax procedure division. *> open my data file perform until eof      read mydatafile-record next      not at end           call or invoke the java iText routines directly or via some glue      at end          set eof to true       end-read end-perform *> close mydatafile *> exit prog

Is there a way to get the IP Address from the HTTP header in a web screen written with Net Express?  We'd like to capture the IP Address of people using our system for logging purposes. Thanks!

we want to make a help file and every program to link in specific part o the help file. I read that windows help processor can me useful in conjuction with the W$HELP command and Help ID but i dont know where i can find the Help Processor and how to create this help file(.hlp file) Giorgos#helphlpwinhelp

Hi everyone! Today I encountered the following problem: We have an SQL-table with a column named "day-number". I'm trying to add a row to this table using dynamic SQL: INSERT INTO DEV_YR_51.dbo.testtable (day-number, maximum) VALUES  (?,?) After execution I get the following error: Error: Insert to testtable unsuccessful (-) - Incorrect syntax near the keyword 'day'. What causes this error? I tried using an underscore instead of a dash, but then the error is "Invalid column name 'day_number'" Thanks for the help! Regards, Raffi#underscoresql