Rocket® COBOL

I am getting an error when trying to compile COBOL source code in Net Express version 4.0.38.   Below are the messages I receive: Rebuilding C:\\Work\\Net Express Projects\\rgc-info.pco * Micro Focus COBSQL Integrated Preprocessor* Net Express V4.0 Copyright (C)1984-2006 Micro Focus (IP) Limited.* URN AAAPA/ZZ0/00065* CSQL-I-006: Rejected CSQLT=ORA10* CSQL-I-004: Accepted VERBOSE* CSQL-I-004: Accepted makesyn* CSQL-I-003: COBSQLTYPE is incorrect defaulting to ORACLE8* CSQL-I-008: Invoking cp Preprocessor* CSQL-I-018: Invoking ORACLE8 Precompiler/Translator'procob' is not recognized as an internal or external command,operable program or batch file.* CSQL-F-021: Precompiler did not complete -- TerminatingRebuild complete with errors Here is what is in my my cobol.dir file: copyext(cob,cpy) p(COBSQL) CSQLT=ORA10 CSTART CSTOP VERBOSE makesyn p(cp) ENDP Could anyone point me in the direction of what may be the problem? Thank you!

I am trying to write a Visual Cobol 2.0 program that calls the fsmgr utility.   I want to be able to call a program that will bring a fileshare server down and then back up (this will ensure no end users are still online).    According to Micro Focus documentation (http://documentation.microfocus.com:8080/help/index.jsp) I need to do the following if I want to run it on Windows: Linking Fileshare Manager Applications On Windows, if your program calls the Fileshare Manager, you need to link in the Fileshare manager object file (fsmgr.obj) when you create an executable file. I can not find the fsmgr.obj in any of the Microfocus Visual Cobol 2.0 directories.   I can find it under my old Net Express 3.1 directory c:\\NetExpress\\Base\\LIB\\.    Shouldn't there be a newer version under c:\\Program Files\\Micro Focus\\Visual COBOL 2010\\lib? Can I link with the version from Net Express 3.1?   Or is the fsmgr.obj missing from the VC 2.0 files?

RM/COBOL version 12 is much slow than version 8

I've tried a few times to google the following: "microfocus setup linux cobsetenv parameter". One of the links returned is: Download and Installation Procedure - Micro Focus Community community.microfocus.com/.../22705_Downloa... Before installing on Oracle Linux, you must create a number of symbolic links. ... To install in a different location use the -installlocation="Location" parameter to specify an alternative directory ... /opt/microfocus/VisualCOBOL/bin/cobsetenv ... which looks as though it's going to help. Whenever I click on the link though I get: Micro Focus Borland Group Not Found The requested Group cannot be found. Could you please help me to get to this link. Alternatively you could send me the docu about the symbolic links I need thanks.

I have 2 questions that I have not been able to find the answers to in any documentation: 1)  Our Net Express 3.1 application used a run time switch of K4.   What does that run time option do?  We are migrating to Visual Cobol and was wondering if we should keep that switch in our new environment. 2)  One of our consultants used a -N option when linking a program (cbllink.exe) from a command line in Visual Cobol 2.0.   What does the -N option do? Thanks in advance! -Brian#visualcobolruntimeswitchlinking

I'm trying to call my current classes (written in OO Cobol with NetX 4) from a new .net class which i have develop with NetX 5.1 but without changes in the old code. Now, in order to use COBOL Classes, i have create a COM Wrapper (build with Net4) which i call from the UI  (it's C#). Now i want to stop using that COM object and replace it with a .net proxy server. Is it possible? Could you help me with the coding? Thank you Andy

Hi   In our economic product we have a very good integration to office, but know our salesteam has promised that we can also integrate to open office, hmmmm.   Has anybody tried that before, and can it be done. The most importent is Math, but also word can be relevant. The platform is windows 7 and acucobol GT   Regards Steen, denmark  #openofficemath

We just switched to Windows 7 and are using NetExpress 5.1.  Under XP when I would compile a program I would see error messages in the Build window along with the red X's on the lines where the error is encountered.  I know I can point to the red x to see the error but really miss the list of errors in the build box.  Do we have a setting that is incorrect?

1. Several existing N/E programs use an existing Network ODBC connection with Library 'X' specified for the sqlpkg library (connecting from the Network to an AS400). 2. We changed the Network ODBC connection sqlpkg library value from Library 'X' to Library 'Y'.  We deleted all sqlpkgs from the AS400 Library 'X'. 3. The existing N/E executables were executed from the Network.  AS400 sqlpkgs are still being created in Library 'X' (instead of Library 'Y').  However, Library 'Y' is specified in the Network ODBC configuration. 4.  New N/E executables (brand new source names) are being created in the correct AS400 package Library 'Y'. Does anyone know why the old SQLPKG library name 'X' is being retained on the existing code - even when the .EXE file is re-created using the new ODBC definition specifying SQLPKG Library 'Y'?   Any assistance would be GREATLY appreciated!

When I copy my solution to another development machine with a different screen resolution, the form size and controls are not the same (lined up etc.).  Is this the form's AutoScaleMode property that controls this?  I'm using  a resolution of 1980 x 1080 and the second machine is 1680 x 1050.  Will this also be an issue when deployed on end user machines?#VisualCOBOLautoscalemodescreenresolution

I have a tab control called EmployeeMaint. Contained within are several individual tab pages. I wish to be able to manipulate the pages so that depending on some data item (WS-COMP-ID) various 'pages' are either visible or not when the tab control displays for the first time. eg. if ws-comp-id = 'fred'       make tabpage 'fred1' invisible      else      if ws-comp-id = 'joe'     make tabpage 'joe1' invisible     end-if. Whats the code to do this?  

I'm moving through a file of employees. Each employee carries with it information used to populate list boxes within my application. I seem to be accumulating data, in the list boxes, as I move through my employees. How do I ensure that I'm populating a 'clean' listbox / combo box for each new employee? How do I clear down the existing listbox / combo box content prior to loading new data into them or is it easier to it another way?

I have a pre-populated Combo box (Dropdown Style = Dro[pdown list) with around 20 values in the list. (Name = Employ-Type) I have incoming data from a field in a record called EMP-TYPE holding the value "Full Time". I know for a fact that this value exists in my Combo box list somewhere... Whats the code to seach for this value in my Combo Box so that I can set the ::SelectedIndex value to show the correct value in my list of possibles when it comes to displaying the screen?

how I can translate this definition of variables in a VB6 ActiveX dllPublic Response Type     Rcode As Integer     Response As String     Additional As String     As Long RespLengthEnd Type    #activexdatamapping

Job opening here Good luck!

There is a suspicion that an ex employee has stolen source code, modified it and is now selling it. We have access to the .acu objects, but need to get access to the .cbl source, anyone aware of any software which will re engineer object back to source. Obviously wont be exact but good enough for analysis. 

[Migrated content. Thread originally posted on 26 March 2012] HelloWhen using the cobolbean.dispose() function the application server crashes. I have the following code:@Stateful@LocalBeanpublic class DataTypeTestBeanImpl extends CobolBean {...@PreDestroypublic void destroy() throws CobolException, Exception {    super.dispose();    // CobolBean}@Removepublic void remove() {}were remove() is called from the client to signal the application server that the stateful bean is not needed anymore. The AS will call destroy() afterwards and should dispose() the CobolBean.I didn't check yet when it happens, after the dispose itself or for the next or a parallel session. I also did't check when catching the exceptions in destroy() itself saves the AS. I thought dispose should only cleanup the used working storage. What other things does dispose() do ? Any ideas why the AS is crashing ?I can invest further checks earliest wednesday, hoping to get some answers

Greetings, I have a PIC 9(12)v99 COMP-3 variable and want to convert it to a decimal PIC 9(12)V99. I read that the true value of this comp-3 would be (12 2 1)/2 = 7,5 (8 rounded up), tried that but to no avail. Also tried a simple move from one to another but when i write my converted file (a text file), and when i display on screen it shows me gibberish. How do i convert this guy? Thanks in advance.

I've got a solution that looks like so... http://imageshack.us/photo/my-images/7/solutionfolder.jpg/ The highlighten item (Payslip.cbl) is a user control which sits on top of the main form and is called at the outset with the command... invoke panel1::Controls::Add(Payslip) I pass some linkage across into Payslip.cbl and populate the fields contained therein but I don't seem to be able to then refresh the control contents so that they appear on screen. How do I do this?  

Is there no alternative to upgrading from 4.0? We are moving to Windows 7 but time constraints mean we will struggle if we have to upgrade to 5.1.  Will it work on 32 bit?

Hi, in Oracle 11 g there is no Oracle lib kpudfo.o installed. Is this lib not required for Oracle 11g?  

I've created a solution as a CLASS LIBRARY (no forms) and dumped in some legacy code which compiled without incident. The legacy code used to work with a DIALOG screen in order to ask the user to enter an employee number. I've added a WINDOWS FORM to the solution and added Systems.Windows.Forms and System.Drawing as references to the solution in order to incorporate the form. In my legacy code I've added the line: invoke my-empChange::ShowDialog(self) in order to fire up the form however I'm getting the message: COBCH089: Could not find method 'ShowDialog' with this signature Which other 'references' & namespaces do I need to incorporate into the solution so that the program will compile & run?    

Hello, while researching a MAV that our application was having, I used a screen trace while running the program in hope that it might point me in the right direction. I've since fixed the MAV, but was wondering how to reconcile the screen trace with the screen designed in acubench. For example one line that was output into the screen trace was "!!!modify control 1070, property 4097 failed". How do I identify control 1070 in my screen section? Thanks

I have a textbox defined called PER-CODE. PER-CODE has properties of TabIndex = 0, indicating that the field SHOULD be the first field I enter on the screen. Despite this I must press the TAB key once before my field is highlighted and I'm able to enter data. Have tried INVOKE PER-Code::Focus() prior to screen launch but this makes no difference. How do I make it so that the field PER-CODE takes input straight away once the form loads?

Hi, I want to use the NovaPDF creator in a Net Express 5.1 project but dont know to add the reference to the "com" so I can access its features. Pls see link below showing how to do this in either C or Visual Basic C code link - http://www.novapdf.com/kb/hello-world-c-sdk-sample-313.html Visual Basic link - http://www.novapdf.com/kb/hello-world-visual-basic-sdk-sample-325.html Can any one convert this to Net Express Cobol code. Thanks Neil