Rocket® COBOL

Problem: Is it possible to have the Tabs on the left or right of the screen? Resolution: You can make the tabs left /right by clicking the right hand mouse button on the tab and going into properties you can select left/right. Old KB# 3946

Problem: The Micro Focus Studio 5.0 setup always comes back to the feature dialog on Windows 2000. Resolution: Make sure Windows 2000 has Service Pack 4 applied. It is a requirement to install Micro Focus Studio 5.0 on Windows 2000. Old KB# 3973

Problem: CLU08ALL.EXE and ALL06N40.EXE are available at the Micro Focus SupportLine site for Net Express 4.0. Resolution: CLU08ALL.EXE is the License Protection System FixPack, and it is already part of the All WebSync WrapPack ALL06N40.EXE. It is then not necessary (and it does not hurt) to apply clu08all.exe after all06n40.exe. Old KB# 3942

Problem: mfextmap not working in an Net Express application. Resolution: The application needed to be linked with the Shared Runtime system (-f swtich to CBLLINK) and also the COBCONFIG_ environment variable needed to point to the location of the runtime tunable file with:- SET environment_mapper=TRUE Old KB# 3980

Problem: An ASP file is displayed okay from a Cobol DISPLAY statement except nothing is shown for simple ASP functions, such as current date and time. However, the same ASP file gets displayed properly by IIS server. [cobol] working-storage section. 1  OutASPForm is external-form identified by                                     ASPFileName. 77 ASPFileName                pic x(256) value          "TestASP.asp". procedure division.      display OutASPForm     stop run. [TestASP.asp] <HTML> <HR width=80% size=4 color="green"> This is a test of ASP showing the date = <%=

Problem: Release 4.0: How to implement this? Resolution: To Publish to Unix from Net Express you need to run SCP as a daemon on the Unix machine. To run SCP as a Daemon, take a look at the following: Net Express Help -> Content -> Using Net Express -> Unix Option -> Unix Option Guide -> Installing Samba and SCP -> Alternative Security Mechanism -> SCP Daemon method Old KB# 3979

Problem: How to invoke the defualt web browser from a COBOL program Resolution: you can use ShellExecute to open a webpage EX: call "cob32api"                                                               call winapi "ShellExecuteA" using           by value 0 size 4                      by reference z"open"                  by reference         

Problem: I get an RTE 114 on a GOBACK / EXIT PROGRAM / STOP RUN in EXE mode. The program runs fine in INT. Resolution: When you call a function that should have the CALL-CONVENTION for WinApi set (i.e. 66 or 74) without the CALL-CONVENTION, the stack will be corrupted. A GOBACK / EXIT PROGRAM / STOP RUN pops an invalid return address from the stack, tries to return to this address and a RTE 114 occurs. E.g. if you code     call GetShortPathName instead of     call WinApi GetShortPathName the stack will be corrupted after the call. This program may run for another million steps but will crash when leaving the program (compile unit), which contains the false WinApi-call. Reason: If you call a WinApi-function and do not set the call-convention, both, the calling and called programs, will remove the parameter from the stack. Old KB# 3962

Problem: Does Micro Focus support the MS SCCI standard for version control systems? Resolution: In both Net Express 4.0 and Mainframe Express 3.0 we provide support for what is called Microsoft Source Control Common Interface (MSSCCI). Old KB# 3915

Problem: Release 4.0: Zielsystem BS2000: Der Net Express Compiler akzeptiert auch syntaktisch sehr rudimentäre Programme. Wesentliche Bestandteile eines Cobol Programmes können fehlen, ohne dass ein Fehler gemeldet wird. In diesem Fall fehlte die  'DATA DIVISION'. Auf dem Zielsystem BS2000 ist jedoch eine vollständige Programmstruktur gefragt. Mit welcher Directive kann man das in NE erzwingen ? BS2000 und ANS85 helfen nicht. Resolution: Nehmen Sie bitte die folgende Direktivenzeile mit auf: $set DIALECT"BS2000" FLAG"BS2000" Während der Umwandlung des Quelltextes wird das Fehlen der 'DATA DIVISION' vom Compiler bemerkt und als Fehler dargestellt. Old KB# 3930

Problem: If you're html code contains a colon, the HTML preprocessor will treat the charaters that follow as a variable.  When you go to build, you will get an error message saying operand not declared Resolution: For Example, if you are using an html tag like the following: <html xmlns="http://www.w3.org/19999/xhtml" xmlns:v="urn:schemas-microsoft-com:vml"> you will get the following build errors: Operand V not declared Operand SCHEMAS-MICROSOFT-COM not declared Operand VML not declared To get around this, you would need to add code like the following to your COBOL program: ..... Working-Storage. ..... 01 temp1 pic x(2). 01 temp2 pic x(22) 01 temp3 pic x(4) ..... PROCEDURE DIVISION. ..... move ":v" to temp1. move ":schemas-microsoft-com" to temp2. move ":vml" to temp3. ..... You would then right click on your html file and select edit as text and instead o

Problem: If you are processing a Timer event and it takes a while processing then when the event is finished the next timer event is immediately fired. How can you stop event while processing another? Resolution: In the event you can switch off a time and then start it at the end of the  event. Some example code for this is:-        method-id.  "timer1_Tick" final private.        linkage section.        01 sender System-Object.        01 e System-EventArgs.        procedure division using by value  sender e.                       invoke timer1::"Stop"()              &n

Problem: CALL "CBL_READ_FILE" using .... returns a RETURN-CODE = 12592 What does it mean? Resolution: It is a 2 bytes file status code in decimal representation. 12592 decimal = x"3130" in hex. x"3130" are the ASCII-Codes of "1" and "0". 12592 means FS: 1/0 = no next logical record exists. ------------------------------------------- Also extended file status codes might be returned from CBL_-routines. If you recieve e.g. 14657 = x"3941",  it means ASCII "9" followed by a binary "41" = decimal 65. 14657 means FS: 9/65 = file locked Old KB# 3956#ServerExpress#COBOL#AcuCobol#netexpress#RMCOBOL

Problem: In a DataGridView object from the .Net Framework V2 and above. How can you change the background colour of "row" programatically? Resolution: You can use the "DefaultCellStyle" on the row to acheive this:- set datagridview1::"Rows"::"Item"(ls-count)::"DefaultCellStyle"::"BackColor" to cColor::"LimeGreen" This sets the background colour to Lime Green. Old KB# 3922

Problem: Release 4.0: The problem is caused when a COBOL program encounters a problem and a STOP RUN is made then consequently the Java runtime is terminated. How can you prevent STOP RUN from doing this? Resolution: The use of SRV_CTL_NOSTOPRUN does prevent the JVM from terminating when using RuntimeSystem.cobcall. Old KB# 3929

Problem: If I have a .Net class and I was to pass a null reference to it from Unmanaged COBOL. How can I do it ? This is going via .Net COM Interop. Resolution: To get this worked as expected you need to pass a COM Variant object with the type set to DISP-E-PARAMNOTFOUND. This denotes to COM that it is a missing parameters and the .Net Class is given a null object. The COBOL code to do this is:-            invoke oleVariant "new" returning mynull            invoke mynull "getVariantAddress" returning ws-ptr            set address of lnk-var to ws-ptr            move DISP-E-PARAMNOTFOUND                      t

Problem: When I exit Net Express I get a prompt asking if I want to stop the XDB local server. It seems that this server automatically starts up, but I don't need to use it - is it possible to stop this happening? Resolution: You need to stop the XDB service from starting up when you boot up.  If you go to Windows Control Panel, and select Administrative Tools, you will see an option entitled Services.  Open this and scroll down the list of services - you will see "Micro Focus XDB Server for NX n.n" and/or "Micro Focus XDB Server for MFE n.n" if you have MFE installed.  If you right click on that name, and select Stop, the service will be stopped - however, this will only apply to your current session.   If you do not want this service to run every time you start up up the system, right click on the XBD entry again, and select Properties.  In the window that appears, you will see a pull

Problem: In COBOL, how can I monitor a directory for the existance of a file. Resolution: There are a number of ways you could do this:- - "X"91" function 69" - .Net directory class if your using the .Net COBOL Compiler - FileSystemWatcher control if your using Studio which has WinForms Support. X"91" demo is at http://downloads.microfocus.com/examplesandutilities/general/dirlist.zip Old KB# 3926

Problem: The following error message occurs in Net Express 4.0 when the Internet Application Wizard attempts to generate a CGI program: ---------------- Object Code error : file 'splithtm' error code :153, pc=0, call=1, seg=0 153  Subscript out of range (in E:\\BUILD\\EHTM\\splithtm.cbl, line 225) ---------------- This problem occurs when All WebSync WrapPack v4.0.006 (all06n40.exe) was applied. The previous version did not have this problem. Resolution: This has been fixed since All WebSync WrapPack v4.0.007 (all07n40.exe). Old KB# 3970

Problem: When starting Net Express for the first time you are prompted by a welcome box.  In this case the customer's welcome box did not have a check box that will allow you to discontinue showing the welcome box at the next startup. Resolution: Open the registry editor.  Go to: HKEY_CURRENT_USER      Software           Micro Focus                Net Express                     4.0                          IDE                            &

Problem: Customer had spent a long time developing a screenset, and one day received an error which indicated that the screenset was corrupt in some way. Resolution: If a screenset gets unexpected corruption of any sort, then it is always worth trying to salvage it by exporting the entire screenset as a .imp file (which is really just a text file). Check the file for any obvious funnies (half-lines, mistyping, or if you know that a particular object is the one causing the trouble, delete all references to it). Then create a new screenset, and delete the only window (select it and press <Delete>). Import the .imp file into the screenset, and say 'OK' when informed that some duplicate global dialog will be renamed. You should then have a more or less working screenset. If you have removed any objects from the .imp file, try adding them to the screenset again. Old KB# 3928

Problem: File routines, such as CBL_DELETE_FILE, CBL_RENAME_FILE, and CBL_COPY_FILE,  in Net Express 4.0 fails to find filenames that are prefixed with a dash "-", e.g. -TEST.TXT These CBL_ routines fail with a non-zero return code, which can be interpreted as the routines were unable to find -TEST.TXT. Resolution: This problem has been fixed since All WebSync WrapPack v4.0.007 (all07n40.exe). Old KB# 3969

Problem: The demo attached contains 3 programs One Java program which does SQL I-Os thru JDBC One OO COBOL program which invokes the Java program above               ( this OO COBOL program is a 'stub' between procedural COBOL and JAVA ) One procedural COBOL program which invokes the OO COBOL program above. Resolution: ======================= INTRODUCTION_1: since the JAVA program does SQL I-Os using JDBC using an ODBC layer, you need a DSN (Data Source Name ) called 'NetExpress Sample2' pointing to an ACCESS DataBase named SAMPLE.MDB ( delivered with .ZIP attached with this demo ) --> Config Panel->Administration tools->ODBC data sources IF the DSN 'NetExpress Sample2' does'nt exist, create it using an ACCESS Driver pointing to ACCESS DataBase named SAMPLE.MDB ======================= INTRODUCTION_2: As described above, the

Problem: Net Express 4.0 Client  found that when compiling a COBOL program in Vistual Studio they got the  the following error(s): Failed to find the system program EXTSM Failed to find the system program EXTFH Resolution: Net Express was installed first.  Then the latest wrappack for Net Express was installed.  Then Net Express with .NET was installed from the installation CD.   Applying the latest wrappack for Net Express with .NET fixed the problem. Old KB# 3924

Problem: In a PictureBix object in WinForms how can you set up the image at runtime from COBOL Code ? Resolution: You can do this by passing in a Bitmap object to the Picture Box. Some example code that does this is:-       $set sourceformat(variable)       $set preservecase        class-id. frmPBox as "MDICOBOL.frmPBox" is partial                  inherits class-form.        environment division.        configuration section.        repository.            class interface-icontainer as "System.ComponentModel.IContainer"            class class-f