Rocket® COBOL

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

Hi All, Back on the Visual COBOL SQL with pro*cobol tests.. Our project is a migration project from UNISYS (DPS screen, RDMS database, DMS indexed files, ECL JCL and so on...) to Linux Visual Cobol Development Hub and Oracle Database. For various raisons, the project use actually COBOL fixed source format and pro*COBOL. Now we need to wotk with Eclipse Visual COBOL...First of all, ware working on compilations with Eclipse on the Linux server via Development Hub.our tests are ok with simples COBOL programmes (without EXEC SQL statement)but they failed with EXEC SQL statements : [cobol] * Cobsql Integrated Preprocessor [cobol] * CSQL-I-018: Invoking Oracle Precompiler/Translator [cobol] sh: procob: command not found [cobol] * CSQL-F-016: UNIX error Return Code is 0127 Do we need do update PATH and LD_LIBRARY_PATH variables cibling $ORACLE_HOME/bin and $ORACLE_HOME.lib binaries and libraries directories before launching rdodaemon?I saw in the RSE documentation of Visual COBOL that we can

Hi, I whant to know, how I can make the currency format to textbox, like of Cobol 77 Invoice-Amount Pic $$,$$9.99. I tryed other why, but is so strange and not so functional..., it's possible Automated teller machine ??? for example: the user will be type this number 5124.25 the user types 5: 0,05 the user types 1: 0,51 the user types 2: 5,12 the user types 4: 51,24 the user types 2: 512,42 the user types 5: 5124,25

Hi I have created a test project to test the "--netdll" compiler switch. I have the .dll and the _CVM.dll files created, and can reference them correctly into my VC project. I can also build the VC project without errors. But when calling one of the entry points, or the main, I only get an exception (I put the call in a try - catch - setting) saying "Index was outside the bounds of the array." I have now tested one COBOL program that i have made on my own, and I have tried copy / paste of the COBOL program the C# code in the sample from the documentation. Both are returning the same exception. I dont think the excecution is even getting to the code inside the COBOL .dll I think the exception is triggered in the call before it gets so far. Have anyone got this working? Regards Dagl#--netdll

Is this running? #VisualCobolwithEclpiseunderSUSE13.1

Hi All, Is there any solution to use COBSQL directives with oracle pro*cobol with FREE or VARIABLE source format? I've tried with variable sourceformat. The precompiled source (.cs9) is ok but the second phase of the compilation hang.... I'm sad to keep fixed format in Visual COBOL Platform:Visual COBOL for eclipse with hub on linux. Thanks.Franck.