Rocket® COBOL

Problem: Isam files at client's site were getting corrupted.  Some of the files used are large, 1Gb Resolution: The resolution to the problem was to turn the opportunistic looking setting on the Novell server to OFF. Suggestions: 1) Ensure that the Novell Opportunistic Locking setting is turned OFF 2) Add READSEMA=OFF to your current EXTFH.CFG 3) No regular maintenance is done on the ISAM files.  Made the strong suggestion that they reorg the files on a regular basis. Old KB# 1221#RMCOBOL#ServerExpress#COBOL#AcuCobol#netexpress

Problem: Release 5.0: After installing a Net Express 5.0 Application Server, trying to start the application and getting back: > Runtime DLL 'CBLRTSS', version 5.0, entry point _mFgWinMain2 not recorded in registry, not found or incompatible with requirements of dynamically bound COBOL program. Dynamic binding of RTS requires: Runtime DLL 'CBLRTSS', Version 3.1 < Resolution: Step by step: (1) To check that COBDIR also PATH are set correctly. (2) To check vs. older versions of CBLRTSS if they are installed from Net Express versions earlier and to prevent that they are addressed via COBDIR also PATH. (3) To ensure that no portions of the Windows registry are imported from other machines including this 'Micro Focus' key under HKEY_LOCAL_MACHINE\\SOFTWARE. (4) To uncheck 'Dynamic' checkbox onto developer machine linking the application to an .exe file, Project Build Settings -> Link tab -> Category:General -> unc

Problem: OFN-ALLOWMULTISELECT flag can be set from the WinAPI GetOpenFileName function to specify that the File Name list box allows multiple selections in the open file dialog box. This however causes dialog box to use the old-style user interface. Resolution: It is documented from the Microsoft MSDN site (http://msdn.microsoft.com) that you need to set also the OFN-EXPLORER flag to have the dialog box to use the Explorer-style user interface. If this flag is not set, then it will use the old-style user interface. Old KB# 1246

Problem: Release 5.0: Can't create ASP .NET Web App after installing Visual Studio 2005 Service Pack 1. Resolution: Installed Net Express 5.0 with .NET support and have then installed Visual Studio Service Pack 1, and unable to create a new web site/service via the COBOL language. It seems that the Visual Studio 2005 Service Pack 1 installation appears to remove some registry entries which register COBOL with the web project system. Other than the uninstall/reinstall approach (via Windows Add/Remove Programs/Change/Modify option), there is a way to get these entries back by running the following command from the Micro Focus\\Net Express 5.0\\packages directory: regsvr32 cblprj.dll   Old KB# 1237

Problem: EXEC SQL    CALL UDBSP (:WS-INPUT1 IN,                                :WS-OUTPUT1  OUTPUT)                           :WS-ORDER-BY-STR-OLD OUTPUT)             END-EXEC. Error after compiling: COBDB0100S SQL0104N An unexpected token was found following CALL UDBSP. Resolution: The DB2 ECM support does not use the type parameters in the stored procedure call list.  Removing the IN and OUTPUT from the CALL resolves the compilation error. Also you may need to compile with directive DB2(CALL_RESOLUTION=DEFERRED) if you place the name of the stored procedure in a host variab

Problem: This error has been encountered when trying to compile a .LST program as a Class Library. The message is output when unexpected errors occur during the generation of .NET IL code.  Unfortunately, any occurrence of such a message indicates a compiler bug, even though sometimes the immediate reason for the error is a problem in the user program.  Even if the user program is in error, the error should be detected at an earlier stage of the compilation process and should then produce a cleaner and more understandable message. Resolution: A subscripted item used as a subscript can generate bad code and may cause the compiler to loop. The fix should be available in the next FixPack for Net Express .NET 5.0 However, attached to this knowledge base article is a hotfix for Net Express .NET 4.0 Attachments: RPI1059463.zip Old KB# 1206

Problem: Microsoft have released Windows Vista. Is Net Express supported on Windows Vista ? Resolution: Micro Focus will support the latest version (V5) of Net Express and Studio on Windows Vista. Older versions of Net Express  such as version 4 and below have not been tested for compatability on Windows Vista. If you are a Micro Focus customer, you can request updates to your current product version to the latest product version on CD by sending an email to Update@microfocus.com. You will need to provide your Name, Company, Phone, and Fax numbers, email address, shipping address, number of users, your current product serial number(s), and to which product or release you wish to Update. Old KB# 1205

Problem: Missing service interface file message when running imtkmake -generate command. Resolution: Using the Net Express 5.0 Interface Mapping Toolkit GUI to create a mapping for a Web Service and then run the imtkmake.exe command line utility with the -generate option to create a .car file deployment package, the message "Missing service interface file" can be shown. This may happen running the command from a location where the interface file does not reside. This particular file goes by the name of the web service with a .xml extension. For instance, if the command is: imtkmake -generate service=MyWebService type=webservice    then the service interface file name would be MyWebService.xml. Having used the Interface Mapper GUI to map the interface from a project, this file can be found in the REPOS subdirectory. Old KB# 1227

Problem: Reading System Environment Variables in Net Express Resolution: This demo reads Microsoft Windows TEMP variable:         01 var pic x(256).        procedure division.            display "TEMP" upon environment-name            accept var from environment-value            stop run. Old KB# 1217

Problem: Is there a way to clear a record buffer for a file after every WRITE operation? Resolution: FDCLEAR specifies that a record buffer for a file should be cleared after every write operation. FDLCEAR Parameters 1 - Specifies that the record buffer for a file should be cleared after every write operation. The buffer is cleared to the value specified by the DEFAULTBYTE directive. 2 - As for 1, but the record buffer is also cleared after the initial OPEN statement. The FDCLEAR directive is effective while the SELECT clauses are being processed. Use $SET statements before and after each SELECT clause to apply this feature to selected files. Alternatively, use it once before processing any SELECT statements to apply it to all files in a program. The FDCLEAR directive is ignored for files subject to a SAME RECORD AREA clause in the I-O-Control paragraph. Specifying FDCLEAR with no parameter has the same effect as specifying FDCLEAR "1"

Problem: A web services client generated from a WSDL gives an error 1500, which indicates an internal server error.  How can this service be debugged to determine if it is a problem with the generated client or the server? Resolution: The attached document describes how to debug a web service client generated from a WSDL using the trace utility available as part of the Microsoft SOAP toolkit and can be used to debug a service on Windows or Unix. Attachments: Debugging a Web Service.doc Old KB# 1207

Problem: To set the Environment variable SORTSPACE. SORTSPACE environment variable can be used with Net Express and with Server Express. Resolution: ==================== SORTSPACE environment variable  in Net Express Documentation: The amount of memory to be allocated to internal workspace for SORT operations. This can be specified in different formats: for example, you could specify 64M, 2G, and 1000000 to give sort memory areas of 64 Megabytes, 2 Gigabytes and 1000000 bytes respectively. ==================== SORTSPACE environment variable  in Server Express Documentation: SORTSPACE Specifies the amount of memory to be allocated to internal workspace for SORT operations. Syntax: SORTSPACE=n[K|k|M|m|G|g] export SORTSPACE Parameters: n[K|k|M|m|G|g]  The amount of memory to be allocated to internal workspace for SORT operations. K or k indicates kilobytes, M or m indicates megabytes and G or g indicates gigabytes. N

Problem: Attempting to get the full path/file name of a program that is CALLING the current program by calling the CBL_GET_PROGRAM_INFO routine using call-function 2. However, it might only be returning the  program name and not the full path or the file extension. Using this routine to get the COBOL program name can be used for initialising the Consolidated Trace Facility  (CBL_CTF_TRACER_GET). Resolution: Below is an example of how to return the full path/filename of the calling program. The first thing to do is to establish the handle for the current program. working-storage section. * 01 call-function pic x(4) comp-5. 01 cblt-prog-info. 05 cblte-gpi-size pic x(4) comp-5. 05 cblte-gpi-flags pic x(4) comp-5. 05 cblte-gpi-handle usage pointer. 05 cblte-gpi-prog-id usage pointer. 05 cblte-gpi-attrs pic x(4) comp-5. 01 name-buf pic x(100). 01 na

Hi In Netexpress 3.1 I used to be able to search a source file for text and then compress the results using F9 and then place the cursor on a line and press F9 again to expand the text. In 5.1 the second F9 does not expand the text. The only recourse is to use the mouse and right click and select 'expand'. This costs me time and I don't like switching between mouse and keyboard. Does anybody know how to achieve using keyboard in 5.1? Regards Ian

Hello, I'm looking for a solution to get the specific user who has a file locked in windows. In a UNIX server environment we're using the C$LOCKPID to get the process Id, and finding the username that way, how do I go about this in a thin client windows environment? Thanks

We have an issue with the Excel.exe not clearing from the list of processes, but only on 64bit systems (Windows 7 and Server 2008).    32bit is fine CREATE @Application of @Excel handle in EX-APP  MODIFY EX-APP @Workbooks::Open ( ws-ltout-file ,0,0)       giving EX-WORKBOOK. MODIFY EX-WORKBOOK @PrintOut()        call "c$sleep" using "2" # next line added, but no change in behavior MODIFY EX-APP @DisplayAlerts = 0 MODIFY EX-WORKBOOK @Close() DESTROY EX-WORKBOOK MODIFY EX-APP @Quit() DESTROY EX-APP I've seen the following online, but I'm not sure how to code this in Acu. System.Runtime.InteropServices.Marshal.ReleaseComObject(obj) obj = Nothing Thank you for any assistance!       #ExcelOLE#Excel

Hi, I have created a few bookmarks in multiple word docs. I am trying to locate and insert text after the bookmarks, I have that part working. My problem is that I want to look thru the document first to see if the bookmark actually exists. Any help would be greatly appreciated.

hello I'm using visual cobol for eclipse. Following the help book, I have set environment variable(both in win7 and eclipse) TESTCOVER=C:\\default.tcf default.tcf  [TESTCOVER] RESULT C:\\tcresult.tcz ACCUMULATE ECHOLOG NO and have writen [$SET TESTCOVER] in my program's first line from 7th character and then compile，run. and no where I can found .tcz file please point me the mistake or what i missed thanks newest： When I use run command to launch my program,I was succeed to got a .tcz file. but why it does not work in eclipse?

I have acuv8.1.1, I ever use it to successfully compile code which contain statement such as "CXML-ADD-CHILD"/"CXML-MODIFY-CDATA". But today I want to compile it again, it keeps showing me "No SELECT for file: CXML-ADD-CHILD" compiling error. It looks like acuv8.1.1 not supporting "CXML-ADD-CHILD". Does anyone ever have similar experience? FYI: both acu6.1.0 and acu8.1.1 are installed on my developing environment. #cxml

Please find below the question and answer transcript from the final webinar in the Visual COBOL webinar series. To catch up with all the webinars in the series, including this final one, please visit the Visual COBOL webinar download page.  Q: How does the old Accept/Display Line Position work in this environment?A: existing applications continue to behave just as they would in Net Express or Server Express.If you want to modernize an accept/display application and provide an enhanced UI, you could use .NET or JVM technology. The main challenge is to separate your existing UI from the business logic so that it can be accessed by the new UI framework.The Visual COBOL development product includes some samples that show what the end result might look like in thick and thin client scenarios. Q: Can Visual COBOL work on Android devices? How about IOS? What is the mobile/tablet solution? A: Visual COBOL applications are not supported on Android or IOS today. Please let us

My solution has a C# project and a COBOL project.  Several text boxes are entered on a C# form which then calls a COBOL program to do the validation.  The C# project has a reference to the COBOL project so that it can create an instance of the COBOL program before calling it.  There are several ways I can pass the text box values to the COBOL program. 1. Pass them in linkage, including use of smart linkage (can use smart linkage if the COBOL program is not a class). 2. Declaring properties in the COBOL program and setting them from the C# program before calling it. 3. Passing the Windows form object to the COBOL program and using its Controls collection to get the Text properties of each text box I need to   validate.  The code for the last method looks like this:  method-id ValidateMethod.       local-storage section.            01 ctrls type System.Windows.Forms.Control

Hello everyone, I wonder if there is a way to know which file a Specific Punta XFD. thank you very much :)

Using the <RET> key to traverse through a form with a number of fields what question can I ask to determine WHICH field I've just pressed the <RET> key on? Have tried using the TabIndex property like: if self::TabIndex = 0     invoke self::processEmployeeNumber()    exit methodend-if for asking if  I'm on the first field on the form but it doesn't seem to work as it appears that this code is processed even WHEN I'm on the 10th field (tabindex property = 9). So I know I've pressed the <RET> key so how do I now know on WHICH field I've pressed it on?  

I am trying to check EXCEL language setting by following statement: Application.LanguageSettings.LanguageID(msoLanguageIDUI)   But I am not sure how to accomplish this in ACUCOBOL grammar. Anyone can help? Thanks in advance.    #Excel

Hi all,my enterprise software platform runs on AcuCobol. I would like to access the data produced by it in C #. I installed AcuODBC and through WinSql can query the database, but I can not do the same via an ASP.NET page that uses the same ODBC connection. You know you help me? thanks a lot