Rocket® COBOL

Problem: What does compiler directive SOURCETABSTOP do? Resolution: SOURCETABSTOP sets how many spaces tabs are expanded to when the checker reads the source code. In the Visual Studio IDE, when you press tab you get one space whereas, in the Micro Focus IDE, pressing tab will insert a set number of spaces.  With SOURCETABSTOP"8" this would be 8. Old KB# 5302#netexpress#AcuCobol#ServerExpress#COBOL#RMCOBOL

Problem: Problem when running a sample downloaded from the Micro Focus web site. The sample is a Net Express 4.0 CGI application that sends email using CDO to access an SMTP server. When running the sample on a development server it can send email fine. When the application is moved to a test server that has Application Server 4.0 installed, the following error message is displayed in the browser: execution error : file '' error code: 200, pc=0, call=1, seg=0 Run-Time System internal logic error (in rtsarea.c 85. line 400). The Application Server is unprotected. see incident 2104379. The Application Server was updated with aps05a40.exe (4.0.005?) The CDO sample was on the Micro Focus website. see incident 2105768 Resolution: The sample was being linked using the static and multi-threaded options. After changing these options to dynamic shared and single threaded the problem was resolved. Old KB# 5257

Problem: Existing project - source has been moved, but there is a requirment to change the project location Resolution: First when building a Net Express project - the suggested way is to copy any source being used to the local directory. If this has not been done and the project now points to a particular directory other than the project directory,  and the source has now been moved to a different directory The only way to correct the project settings is to remove the source from the project and read it to the project from the new directory. Note:  Net Express is UNLIKE Mainframe Express project where the location can be changed without removing and reading. Old KB# 5288

Problem: Which versions of Net Express are supported on Windows XP? Resolution: Only Net Express 4.0 with WrapPack 4.0.004 (all04n40.exe) or higher has been tested and is supported on Windows XP with SP2. Net Express 4.0 and Net Express 3.1 with SP1 have been tested and are supported on Windows XP with/without SP1. None of the previous versions (3.1 without SP1, 3.0, 2.0, and 1.0) of Net Express has been tested, and therefore none of them is supported on Windows XP. Old KB# 5268

Problem: Customer was attempting to do a PInvoke function call from a C# ASP.NET code-behind program to an unmanaged COBOL .DLL created with Net Express 3.1 preSP1. Customer compiled the application using REENTRANT"2" but the application also uses embedded SQL Server ODBC statements and the SQL(Thread=Isolate) was not supported in 3.1 pre SP1. Customer could successfully run the ASP.NET application and call the unmanaged COBOL .DLL if only one user was running the application. When they added multiple users making simultaneous requests for the Web application the Platform Invoke call started to fail and one client's working-storage would end up in another client's program. Pgm1: 3rd party C# .NET? multithreaded exe calls/passes data Pgm2: COBOL dll calls/passes data Pgm3: COBOL dll Resolution: The following information is in regards to your attempts to create a C# based ASP.NET application which uses Platform Invoke to call an unmanaged

Problem: The system indicated 26 gig were available. Also, the install states 26 gigs were available The directory kept going to an Application Server directory with no browse button Resolution: Problem determination:  Application Server was installed on the same machine where Net Express also resides.  This is not permitted. Go to "Add/remove programs" and uninstall Application Server for Net Express 4.0 Restart the installation, and it should finish without errors. Old KB# 5293#ServerExpress#AcuCobol#COBOL#netexpress#RMCOBOL

Problem: Micro Focus has both Net Express and Mainframe Express. Is the Net Express Interface Mapping Tool just Mainframe Express's Component Generator renamed?   Resolution: The answer is no. Net Express has an Interface Mapping Tool which allows one to select fields for mapping to a new display format. In COBOL, one can describe a data item's data type precisely, using its picture-string. COM, Java and XML (used for sending data between a client and a Web service) each define their own sets of data types. The Interface Mapper maps the COBOL types in your program onto the types available in COM, Java or XML. CG (Component Generator) is an interface allowing creation of Java and web components to allow testing of a legacy application that has been web enabled. CG allows one to (1) analyze an application, (2) capture its output screens (BMS or MFS), (3) create an eBiz transaction for displaying the output or for allowing access to a VSAM dataset or

Problem: Method to create line sequential files without stripping off spaces at the end of each line Resolution: Releases: 4.0 - 5.0 -   In order to keep trailing spaces in each record of a line sequential file, use the STRIPSPACE=OFF file handler configuration option to leave the trailing spaces in the record. Please see the Net Express bookshelf programmer's guide "File Handling", chapter 6: File Handler Configuration. How To: create text file using notepad - call it extfh.cfg put this in it: [XFH-DEFAULT] [TEST.DAT]         STRIPSPACE=OFF         WHEN TYPING THIS FILE - MAKE SURE YOU HIT ENTER AFTER EACH LINE TO PLACE AN END OF LINE MARKER **ESPECIALLY THE LAST LINE [TEST.DAT]         **THIS IS OPTIONAL IF YOU WANT TO USE THIS FOR ONE PARTICULAR FILE       

Problem: FileShare is running as a service using sample FS.CFG located in the Windows\\system32 directory Using CCI.INI to set the PORT number. FS.CFG sample /s FSNAME /cm ccitcp /d ?:\\databse-reference-file /pf ?:\\password-file /wd ?:\\filehare-working-directory-path /sc CCI.INI file contains [ccitcp-servers] FSNAME=MFPORT:12003 [ccitcp-targets] FSNAME=MFNODE:machine-name-or-IPAdress,MFPORT=12003 Resolution: Problem existed was the CCI.INI file contained an error in the ccitcp-targets in that it had an "=" character and not a ":" character after MFPORT. Old KB# 5313

Problem: RETURN-CODE always 255 when program starts to execute Initcall"mfextmap" has been used to load the External File Mapper Resolution: Do not use the initcall"mfextmap" compiler directive to load Mfextmap. Initcall is causing RETURN-CODE to be initialized improperly. There are two alternatives to using the compiler directive to get the External File Mapper loaded into memory. 1) Add the following call statement: call "mfextmap" at the beginning of the initial program of your run unit (process). This will get the External File Mapper loaded and available to the application programs. 2)  Use a "tunable", a configuration file and an environment variable to set up the External File Mapper without making changes to your application programs. Open Net Express 4.0 Help, and click Contents (tab),   Programming,     File Handling,   &nbsp

Problem: To use the GUI Class Library ListView object within a Dialog System screen, and to set focus on a specific ListView Item and give it the focus, users should first put the focus on the ListView itself by calling "SetInputFocus". Then they can set focus on the ListViewItem. The following code assumes that aListView is an object reference representing the ListView itself and aListViewItem is an object reference representing the particular item for users to select and set focus on. This code would be placed in the appropriate area of the control program for the ListView: INVOKE aListView "SetInputFocus" INVOKE aListViewItem "setSelectedWithFocus" If you do not invoke "SetInputFocus" on the listview first, then the  listview item may appeard gray because it was selected, but does not have focus. Resolution: In order to use the GUI Class Library ListView object within a Dialog System screen, and to set focus

Problem: How to write all the console output (including errors) from a batch program to a text file? Resolution: 1) You will need to compile your programs with the CHARACTER option rather    than GRAPHICAL.  This ensures that any errors are display as plain text    rather than in a Windows message box. 2) You will need to set the following runtime switches:    set cobsw=-I2 S5 3) You then run your program with redirection:    paddy01.exe > x.txt For example, the following program:        procedure division.            display "Before CALL...".            call "fred".            display "After CALL...".       

Problem: ProgramA is compiled with the directive $set CallFH "MyProgram".  When any file access occurs (e.g. Open i-o File) this correctly calls the "New file Handler" MyProgram.  However, the means to access the FCB of the relevant file is not at all clear.  For example, including the Directive FCDREG in the calling and called programs has no effect. Resolution: The following is a workable example of accessing the FCD below. The program turns on key compression in a file by setting the appropriate bits in the file's Key Definition Block. $set fcdreg select masterfile assign to ... organization is indexed record key is rec-key alternate key is m-alt-key-1 with duplicates alternate key is m-alt-key-2 alternate key is m-alt-key-3 with duplicates. select indexfile assign to ... organization is indexed record key is rec-key alternate key is t-alt-key-1

Problem: Method to uninstall Net Express 4.0 and any applied fixpacks silently from a command line Resolution: End-users can silently uninstall any Micro Focus products (which use Micro Focus' proprietary wrapper install technology), without the need to go to Add/Remove Programs in Control Panel. First, users need to establish the values of %UNINSTALLER% and %UNINSTALLTAG% as referenced below in the [Setup] section of the wrapper.ini file, which can be found in the root of the Micro Focus product Installation CD. Users should be logged on as the same user which originally installed the product.  Use the following command template as a guide to uninstalling products silently: START/WAIT %UNINSTALLER% /FILE=%UNINSTALLTAG%UNINST.DAT /SMS As an example for Net Express 4.0 this would equate to: %UNINSTALLER%=NETEXPRESS40UNINST.EXE and %UNINSTALLTAG%=NETX40 The version of the file related to %UNINSTALLER% resides in the C:\\WINDO

Problem: A program uses more than one copybook, but only one or some of the copybooks show up in the project tree window of the Net Express IDE. The program can be compiled successfully despite of that. Resolution: Try executing the Update All Dependencies option from the Project menu. If that does not resolve it, the project file  has possibly become corrupt. Just create a new project, and this should display the dependencies correctly. Make sure also to apply all latest fixes for Net Express. Old KB# 5253

Problem: When compiling from a command line the linker is requiring that the file external.obj be linked in but when running a .int from within the project it is not required. Resolution: .int format programs within a project will load and use the util.lbr file which contains the externl inside it. When linking OBJs the util.lbr is not used so the externl.obj module is required when there is an EXTERNAL phrase specified within an FD. Old KB# 5233

Problem: File status 9/004 returned on a file that has an environment variable set to the file name when creating a new project. Resolution: This requires the directive ASSIGN(EXTERNAL). The other projects were using a COBOL.DIR file within the application directory. If the COBOL.DIR should be used for all projects then move the COBOL.DIR to the Net Express\\Base\\Bin directory and all projects will use that one. This can be overridden in any program or project by using the directive NOCOBOLDIR. Old KB# 5234#AcuCobol#RMCOBOL#COBOL#netexpress#ServerExpress

Problem: FSVIEW enters a FSVIEW command line environment. Resolution: The XFH05N40 fixpack which is part of the ALL04N40 wrappack adds the file FSVIEW.EXE to Net Express but the add pack FSV01N40 must be installed before it can be used. To exit the FSVIEW command prompt enter the word EXIT. Old KB# 5210#RMCOBOL#netexpress#ServerExpress#AcuCobol#COBOL

Problem: how to use files bigger than 4 gig Resolution: 1. use compiler directive IDXFORMAT"8" allows the creation of large indexed files up to 128 Tb **this step only has to be used for a program creating new files 2. Need to set FILEMAXSIZE=8 in extfh.cfg file under [XFH-DEFAULT] ex.  this file is just a text file. [XFH-DEFAULT] FILEMAXSIZE=8 3. Next  set environment variable EXTFH to point to path and file name of the cfg file (if using a project can set environment variable under Project Properties> Environment>IDE) Old KB# 5197#ServerExpress#netexpress#AcuCobol#RMCOBOL#COBOL

Problem: CBL cards are embedded in the source, before the identification division. CBL begins in column 9, followed by options. For example:         CBL nodynam,lib,cbject,apost Resolution: Compiler directive COBOL370 disregards the CBL card. Old KB# 5215

Problem: Return code 194 received with CBL_OPEN_FILE for file over 4GB in size. Resolution: CBL_OPEN_FILE does not use the EXTFH.CFG so the setting of FILEMAXSIZE=8 will not work. If you add 64 to the access mode parameter then this will create the same results as the FILEMAXSIZE=8. 65 Read only 66 Write only (deny-mode must be 0) 67 Read/write Old KB# 5211#netexpress#ServerExpress#RMCOBOL#COBOL#AcuCobol

Problem: Used the anim directive to compile but then moved the .exe program. A message pops up prompting for animation but then the .idy file cannot be found. After entering the location of the .idy file then the COBOL source cannot be found.l Resolution: The resolution is to move the .idy and COBOL source files to the same location as the .exe file. Old KB# 5217

Problem: Net Express 4.0 on 32 bit Windows. When running an application an error stating that the runtime DLL OOPS entry point is not recorded in the Windows registry occurs. Resolution: This error is normally caused by previous versions (e.g. Net Express 3.1) of runtime files being picked up via the PATH.  Carefully check the PATH setting via Net Express command prompt and ensure no rogue entries are present. Old KB# 5222

Problem: The following error is received during the install. Failed to set up Integrated Development Environment. At least one Net Express option failed to install. Please exit setup and start install again. Resolution: Check the share path to the server for spaces. If there are spcaes in the path, remove the spaces and attempt the install again. Old KB# 5245

Problem: Can Screens.GS be in another directory and be found at runtime or animate time? Resolution: Yes, by adding the directory that contains the GS files to the COBDIR they will be found at animation time. For deployment a safer method would be to follow the instructions in the packaging knowledge base article 4150. Old KB# 5244