Rocket® COBOL

Hi ,  I have a Windows form from which i accept a number and on the button click event , i take that number and call cobol program to validate the input. I am getting error while running the application "114     Attempt to access item beyond bounds of memory". Windows event: method-id btnSearch_Click final private. local-storage section. 01 ws-error pic x. 01 ws-input pic x(08). linkage section. 01 ws-link-data. 05 ws-link-ctrb-no pic 9(08). 05 ws-link-ctrb-name pic x(50). procedure division using by value sender as object e as type System.EventArgs. initialize ws-error. move self::lblContributorXNo::Text to ws-input call "ValidateContributor" using by value ws-link-data move "Y" to ws-error if ws-error = "N" then *> insert condition code set lblCOVERNO::Visible to true set self::lblContributorXNo::Text to self::txtSearch::Text else *> insert code invoke type MessageBox::Show("Invalid Contributor No !!") end-if

HI, i'm using xdb command for create a new location if I use the form "Create Location"  after I have submitted name, creator, path and press the OK button , the procedure hangs with a message does the application not respond. if I use the sql command : CREATE LOCATION TEST IN "E:\\ED\\xdb_data\\TEST"   SORT SEQUENCE SENSITIVE   FORWARD LOG TEST; it ends well, but after on catalog browser - Location I received this message: X120: Cannot find location 'TEST' in SYSXDB.SYSLOCALS table. I have tried also on MFE 5.1 and I found  the same problem. why? thanks

All, I've recently installed a new server to replace an aging server that was running Microsoft Windows 2003 (32 bit) with only 4GB of RAM. We've replaced this environment with 2012 R2, more CPU, Memory and Disk in a Dell PowerEdge R series server.  The storage is very fast, the CPUs are generations newer, the operating system is 64bit and the Memory is faster and much larger than what we previously had. However, the vendor that the application was written buy states that there's no difference in the code and datafiles that they've installed to the new server.  However, anything that is not in the "blue screens" of the application that hits invoicing, POs, etc... has to extract files every single time there's a query transaction (IE: moving from one Inventory item to another) takes many seconds.  In a period of 4 seconds, there's 30k file operations performed on the back end.  Everything is done while maintaining sub 2 and 3 millisecond latency on the disk subsyst

Has anyone installed Cobol Server 2013 on 2008R2 with Xenapp 6.5 successfully?#terminalserver#XenApp#cobolserver2013

I am trying to learn to use the c$xml routines. Below is a sample xml file I am trying to process. I need to read the information in the CustomValuesXml. <?xml version="1.0" encoding="utf-8"?><Orders Version="3.80"> <Order> <OrderId>55154</OrderId> <CustomValuesXml><?xml version="1.0" encoding="utf-16"?><DictionarySerializer><item><key>po_number</key><value><charge-back member-number="00167647" role="401" unit-type="A" unit-type-name="Assembly" unit-number="00001185" jurisdiction="Wheeling" jurisdiction-cd="WV" /></value></item></DictionarySerializer></CustomValuesXml> </Order> <Order> <OrderId>55155</OrderId> <CustomValuesXml><?xml version="1.0" encoding="utf-16"?><DictionarySerializer><item><key>po_number<

Is there a way to highlight a part of a grid cell. I want to do a search and show the results in a grid and the text found I want to highlight or give a different color. Is this possible?

I have a COBOL program and I want to use it with table A or table B, as both have the same structure and similar data, but I don't want to repeat every SQL stmt for both..  Instead of the next two selects, for example, I would like to use one select stmt with the tablename a variable.: 2000-get-record section. EXEC SQL Select * from A where x = z END-EXEC. OR 2100-get-record section. EXEC SQL Select * from B where x = z END-EXEC.   .

Again I ask help here, and again on DataGrid, the documentation is not very clear on the use of this object. I have a DataGrid with 100 items and it shows the numbers 1 2 3 4 .... how do I update when you click the 2 for exampleTranslated by Google Mais uma vez venho pedir ajuda aqui, e novamente sobre DataGrid, a documentação não é muito clara sobre o uso deste objeto. Tenho um DataGrid com 100 itens e ele mostra os números 1 2 3 4 .... como faço para atualizar quando clicar no nº 2 por exemplo

We have Net Express version 3.1 and i have been trying to call a C# program from a COBOL program unsuccessfully.  Any help would be appreciated.

I compared side by side of 2 COBOL code styles and hopefully someone can tell me how to do it: Old style: ---Connect.sqb ==============================================       Working-Storage Section.           copy "sqlenv.cbl".           copy "sql.cbl".           copy "sqlca.cbl".           EXEC SQL BEGIN DECLARE SECTION END-EXEC.       01 dbalias.          49 dbalias-len    pic s9(4) comp-5 value 0.          49 dbalias-buf    pic x(9) value " ".       01 userid.          49 userid-len     pic s9(4) comp-5 value 0.&nbsp

Please clarify... The article "Calling Managed COBOL from un-managed code" (with the VCCOM.zip samples) discusses using the Regasm tool to register the appropriate "com server" assembly for a production environment.  (In this case, the production environment is a classical windows-based client-server environment using Win7 workstations and Windows server 2008 server.)  This article further provides a link to Microsoft doc related to Regasm.exe.  The article gives examples of the regasm command line which shows using the "/codebase" option.  When reading the linked-to Microsoft doc, it says that if you use the "/codebase" option, then the assembly must be a strong-named assembly.  Is this true?  Do we have to use the Microsoft Strong Name tool as well?  Also, there is some confusion related to having to use the Microsoft GAC (or not).  Please clarify. 

I copied MF sample DB2 SQL project: Connect project from Windows to RedHat,  try to recompile it under Linux. I got this error: [cobollink] cob64 -g -x -t -oConnect Connect.o /opt/ibm/db2/V11.1/lib64/libdb2.so [cobollink] Connect.o: In function `CONNECT_MFSQLECM-INIT':[cobollink] /home/cobol/sql/db2ecm/Connect/Connect.cbl:129: undefined reference to `cobdb264'[cobollink] collect2: error: ld returned 1 exit status[cobollink] Link complete with errors Could someone tell me which library should I link to find cobdb264? Thanks in advance, -Jack #DB2.Connect

[Migrated content. Thread originally posted on 05 April 2012]Hello,sorry for my bad English.I installed Micro Focus Cobol visual 2010 trial for eclipse (windows 32 bit), I added an application that I want to debug COBOL. But I EXEC SQL ... END EXEC, eclipse tells me that as an error: "COBCH0149S No sql Have Been Set". I want to link to a database compiled and run Oracle for the application to debug COBOL.How is your project connected to the database eclipse has oracle ?Where should retract the user and password for database oracle ?I saw that in the properties of the project "Micro Focus Cobol / property of language / Cobol / addtionnelles guidelines" that we could write "p(cobsql)" or "SQL(DBMan=ODBC). Eclipse tells me that I have 1 error but when I run the application it tells me: "the COBOL program to run could not be found" and the problem he said "connot open file: meprojet.obj"Thank you for your help.

When accessing this article (named "What is the meaning of exception error 65537?")... community.microfocus.com/.../2811.what-is-the-meaning-of-exception-error-65537.aspx ... I cannot access the links within this article. Thanks

Using Cobol 2.2 on Suse Linux 11 sometimes receive error 9/057 and i dont know the meaning of this error. I search the entire file status description and nothing, this forum and nothing. The source program includes $set(RM) in the first line because the original program where develop with RMCobol. My questions is, what is error 9/057 and what situation produce this message? Thank you in advance, Enrique Vera.

We have developed a multi-User system, and to access the system, do the reading configuration file. In this file I have the folders where are the database and other paths used by the system.   To make communication between the programs we use variables EXTERNAL   01 w-directory pic x (256) external.   To call a program starting from the main menu use the following syntax          method-id cloToolStripMenuItem_Click private final.        Local-storage section.        01 newForm1 type MMCliente.Form1.        procedure division by using the value sender object and the type System.EventArgs.        invoke type MMCliente.Form1 :: New () returning newForm1        invoke newForm1 :: Show ()        end method.   The problem is

I am trying to use GO TO statement to change the program flow of the main program which controls my winform screen execution. But VS 2013 throws below error even though i have declared the procedure name. Error 73 COBCH0301 : Unrecognized verb Error 74 COBCH0348 : Procedure name ASFFSAFGHAHSDHG undeclared, line 50 (first usage)  EX: procedure division. invoke type System.Windows.Forms.Application::EnableVisualStyles() set FormSTKR to new WI100.STICKERSCR() invoke type System.Windows.Forms.Application::Run(FormSTKR) set mainForm to new WI100.WI10000SCR(FormSTKR) invoke type System.Windows.Forms.Application::Run(mainForm) set Form10010 to new WI100.WI10010SCR(mainForm) invoke type System.Windows.Forms.Application::Run(Form10010) if Form10010::ScrXmit = "X" go to mainmenu-screen      ------> error 74 end-if mainmenu-screen.               -------> error 73 if true display "test" end-if goback. end meth

moved to enterprise server#cannotstatcobrun32

Does anyone have an example of GridView (Web aspx) without using the database?I'm using Cobol native files, is to populate a GridView that way?Thank you Alguém tem um exemplo de GridView (Web aspx) sem usar banco de dados ?Só estou utilizando arquivos nativos Cobol, tem como popular um GridView dessa forma? Obrigado

I cannot get Visual COBOL for Visual Studion 2015 to install. No errors, just a hang which does not resolve. Has anyone had a similar experience? I cannot get anything out of Microfocus whatsoever on this problem. They haven't even bothered approving my supportline registration. Many thanks

I am trying to query relativity via the 64-bit relclient64.so that is included with the dataserver_2.1 installation. Whenever I try to query a decimal value, the program segfaults. the very simple test program runs the query  (I am using convert here to force the decimal value -- but when I query an actual decimal value out it has the same result). I have installed and tested this on both redhat 5 and redhat 7, getting the same results.  Changing the query to CONVERT(10.0, SQL_DOUBLE) ends up working with no issues, as well as CONVERT(10.0, SQL_INTEGER) The Query...SELECT CONVERT(10.0, SQL_DECIMAL) test_val FROM <test_database> The connection string....Driver=relativity;ServerDSN=staging;ServerName=<servername>.1583;UID=<username>;PWD=<password> odbcinst.ini [relativity]Description=Relativity Data ClientDriver=/opt/relativity/lib/relclient64.soSetup=/opt/relativity/lib/relclnsu64.so the GDB backtrace... (gdb) bt#0 0x00007fffec2ded9d in _pfnXtcGetCvtP

We're converting some REALLY old mainframe code to VC 2.3 for VS 2013 and we are getting a COBCH1710 when a Level 66 data item is referenced in the Procedure Division, specifically as an operand in an IF statement. I've dug around in the product documentation and can't find anything that says Level 66 shouldn't be used in managed code, but I've missed stuff in the past. Does anyone know of a restriction of Level 66 data items in managed code?

Hi, I am new to the tool AcuBench 9.1.2, I'm doing a simple program that connects to a database in SQL server but I could not make the connection with the database I have reviewed on internet ' supportline.microfocus.com/.../wwhelp.htm&; , where they mention you should change a dll but I really can not find where in the settings I find this, I've already configured to recognize me SQL statements, by PROJECT SETTINGS option , -COMPILER , -Pre COMPILER OPTIONS, CHECK THE BOX ENABLED  ( -pk (MSSQL ) ), (- Ps) , and I guess it is leaving the option ( -PC ) CONNECT TO DATABASE but when I give the -Pd option appears only me 'MS Access database' and not my database......................... thank you can help me

I have a file definition that has group elements and redefines. That has a section that looks like this. 10 IXKEY1           in positions 1 to 51   15 IXTYPE PIC 9(01)  in position 1       88 IS-CUSTOMER VALUE 1,6       88 IS-BLANK VALEU 3 THRU 5,7       88 IS-VENDOR VALUE 2   15 IXITEM PIC X(20) in position 2 thru 21   15 IXCOVN PIC X(10)                                                      in positions from 22 to 31  15 IXCNBR REDEFINES IXCOVN     20 IXCUST PIC X(07)     20 IXCSEQ PIC 9(03)   15 IXSUBN PIC X(20)  &nbs

New to Relativity and not finding documentation on all the various dll files and drivers. Can anyone give me a listing of the various dll files and drivers and how they are using them?  From what I have obtained so far the Data Manager driver would be used by Designer for DSN access to the catalog, but you are also able to select the Data Client, Data Client for ADO, Relativity DBA, and Data Server in the Designer product. If I understand correctly the Data Client for ADO is used in SQL linked servers and also for other Visual Studio projects that need to access the Cobol data. Is that correct and what about the other drivers? Also I am working with another developer to have connection strings into the catalog - since I set up the DSN using the Data Client for ADO does that mean they need to use one of the dll files under Relativity Data Client folder?  All replies appreciated. This is what I see and I just need direction is what to share with my developer that is relavant.