Rocket® COBOL

Problem: Web CGI Application. Resolution: Make DLLs of conversion objects (NMCNVRTI.obj, NMCNVRTO.obj). Use call-convention 0. Use set procedure-pointer-item to entry "dllname" to load DLLs and gain access to the internal entry points. special-names.       call-convention 0 is llnk. working-storage section. 77  NMCNVRTI-pointer      procedure-pointer. 77  NMCNVRTO-pointer    procedure-pointer. procedure division.       set NMCNVRTI-pointer to entry "NMCNVRTI"       set NMCNVRTO-pointer to entry "NMCNVRTO" Old KB# 3897

Problem: Let's say you have such an error when you invoked a method of a COM component Exception 65537 not trapped by the class oleexceptionmanager. Description: "Server defined OLE exception" (80020009): Exception occurred. Hit T to terminate program. Hit any other key to continue. What does the number between () mean? Resolution: This error means  that, for any reasons, the COM server raised an exception: he number between () is the exception number (80020009) What does this number mean? follow this URL http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:80/support/kb/articles/q186/0/63.asp&NoWebContent=1 and you'll see that, regards to the EXCEPTION pasted above ( as an example ) , the error means (80000009)    General access denied error. ... Old KB# 3841

Problem: When compiling a .NET project, the following errors occur: Could not find method 'New' with this signature Could not find method 'xxxxxx' with this signature Resolution: Create a new .NET project using the same source code. Old KB# 3860

Problem: The national characters are not correct in my character based screens. Resolution: The reason for the characters not appearing correctly is that the application has the 'ANSI Input mode' option selected in Application build settings.  Unselect the 'ANSI Input mode' option  and retry your application. Old KB# 3844

Problem: Any directives or tips to help performance, not using cursors doing select into an array Resolution: Following made a significant improvement in performance: 1. move sql directives to sql program only (remove from project properties) 2. remove autocommit and thread=isolate add autofetch remaining directives were targetdb=mssqlserver ansi92entry esqlversion=3 Old KB# 3857

Problem: Product:  Application Server for Net Express / Server for COBOL An 'C' application calling COBOL returns the following error:          cannot fiind Cblrtss.dll   Resolution: Set the PATH and COBDIR environment variables to point to the Application Server or Server for COBOL product: Set Path=drive:\\path\\ApplicationServerFolder;%PATH% Set Cobdir=drive:\\path\\ApplicationServerFolder; Old KB# 3877

Problem: "File or assembly name MicroFocus.COBOL.Runtime, or one of its dependencies, was not found." The "all06n40.exe" WrapPack had been applied to the Net EXpress 4.0 development system used to create the application programs being executed. Resolution: The "aps08a40.exe" Service Pack for Net Express 4.0 Application Server and the "SRN89N40.EXE" Service Pack for Net Express with .NET Applicaition server had not been applied to the base installations of Net Express 4.0 Application Server and Net Express with .NET Application Server. Applying the Service Packs "aps08a40.exe" and "SRN89N40.EXE" to the Application Server installations on the server eliminated ther error. Old KB# 3905

Problem: The method to create a global temporary table under SQL Server. Resolution: With SQL Server, a global temporary table needs to be prefixed with ## . This statement will create a global temporary table ##tmptable            EXEC SQL Create table ##tmptable (col1 char(10) , col2 varchar(30))            END-EXEC Old KB# 3876

Problem: What are the methods ejbCreate  ejbRemove  ejbActivate  ejbPassivate and setSessionContext used for? Resolution: These are the defined methods for a session bean as described by the EJB specification, which you can get from http://java.sun.com. Old KB# 3851

Problem: If you have a project with for example 3 forms in it:- 1)       frmMain 2)       frmFirst 3)       frmSecond When you run the project it loads frmMain which have the property IsMdiContainer set to true. frmFirst is running as a child of frmMain. From a button on frmFirst how can I start off frmSecond and have that as a Child of frmMain in the MDIContainer. Resolution: You can use code such as:- set ls-frmSecond to cfrmSecond::"New"() set ls-frmSecond::"MdiParent" to self::"MdiParent" invoke ls-frmSecond::"Show"() to do this. You set the parent to the parent of the current form which in this case is frmFirst. Old KB# 3882

Problem: Currently the field value is erased, is there a way to keep the old value and allow an overwrite using adis and the accept statement with screen sections? Resolution: Use the WITH UPDATE option in the Accept statement- From the on-line docs for Format 5 of the Accept statement- If the UPDATE option is not specified, a data item for data entry is displayed initially as spaces, if you set the MS Compiler directive when you submit your source code to your COBOL system. (If the MS directive is not set, the display of initial data is a configuration option.) If the UPDATE option is specified, initial data of the data item for data entry is displayed. Old KB# 3874

Problem: A COBOL app in Net Express 4.0 outputs to a file. How do you write to the file using different Font sizes? Resolution: There is no way to select/change the font (size) of the text being output to the file. You are simply outputting text. There are PC_PRINTER_ routines in Net Express that allow you to specify the font and size to be used by the printer to print the file. Please refer to the online documentation for these library routines. Old KB# 3861

Problem: When using the .Net Framework email classes in the System.Net.Mail namespace, the method to specify that the format of the mail is HTML. Resolution: Use  the  "IsBodyHTML" property on the System.Net.Mail.MailMessage class.       $set sourceformat"variable"        program-id. Program1 as "SMTP.Program1".        environment division.        configuration section.        repository.             class cMailMessage      as "System.Net.Mail.MailMessage"             class cMailAddress      as "System.Net.Mail.MailAddress"   &nbsp

Problem: Ensuring that programs are ANSI'85 compliant and setting this directive ANS85, but do not get error messages for syntax elements which are NOT represented in ANSI'85-COBOL. Resolution: The ANS85 directive adds the ANSI'85 COBOL features to a selected language level. Please use the directive DIALECT"ANS85" to restrict the COBOL features to ANSI'85. Old KB# 3855

Problem: What can you do if the toolbar under the pulldown menus of the IDE is missing or hidden? Resolution: Click on the 'View' pulldown menu and then click on 'Dockable windows'. Tick on the 'toolbar' option. This should bring back the toolbar that was hidden. Old KB# 3901

Problem: Application von SX4.0 SP2 für  Server Unixware 7.1 Problem: Aufruf eines prozeduralen Cobol-Programms von JAVA über das JNI, nachgestellt an Hand des Testbeispiels calc_pi aus dem DEMO Verzeichnis PI des Net Express 4.0: Das Programm funktioniert unter Windows 2000 sowohl von der Kommandozeile als auch im Fenster. Das Programm wurde auf ein Unixware System portiert und dort mit dem Programm cobjrun in einer Terminalsession ausgeführt. Es funktioniert. Nun wurde die Klasse calc_pi innerhalb von Tomcat ausgeführt. Tomcat selbst wurde mt cobjrun gestartet. Es kommt die folgende Fehlermeldung: Exception in thread "main" java.lang.UnsatisfiedLinkError: no libcobjvm_unx_142 in java.library.path         at java.lang.ClassLoader.loadLibrary(ClassLoader.java:1517)         at java.lang.Runtime.loadLibrary0(Runtime.java:788)   

Problem: How can you compile at a Windows command prompt. Resolution: The COBOL compiler can be run using the COBOL.exe command and any linking (to EXE/DLL) can be performed using CBLLINK.exe utility. The "Net Express Command Prompt" which is in the Net Express folder on the start menu has the environment already setup for compilation. If you want to perform compilation at normal Window Command prompt you need to run:- "c:\\Program Files\\Micro Focus\\Net Express n.n\\base\\bin\\CREATENV.BAT"   (substituting your own path) before the compilation is carried out. Old KB# 3880

Problem: How can I call DSNTIAR from an Oracle (Pro*COBOL) application to retrieve the error message from a SQL operation? Resolution: To aid migration from Mainframe DB2, Oracle provide support for DSNTIAR, to retrieve error message text. With parameters defined thus :        01  ERROR-MESSAGE.                02  ERROR-LEN   PIC S9(4)  COMP VALUE 240.                02  ERROR-TEXT  PIC X(240).        77  ERROR-TEXT-LEN      PIC S9(9)  COMP VALUE 240. call DSNTIAR with :        CALL 'DSNTIAR' USING SQLCA ERROR-MESSAGE ERROR-TEXT-LEN and ERROR-TEXT will be populated with the

Problem: In the .Net DataGridView control how can you clear all elements in the Grid ? The datagrid view allows you to display a grid show many items of Information. In COBOL how can you clear out all items from the grid. Resolution: The "Items" property of the Grid Control contains a collection of the rows in the grid. You can use:-            invoke dataGridView1::"Rows"::"Clear" to empty out the grid control. Old KB# 3893

Problem: Trouble sorting a very large file sequential. For example, In the xfh-default: [XFH-DEFAULT] FILEMAXSIZE=8 This file is non-fileshare and is defined as a line sequential.  The sort always abends at the same record number no matter how much free space is available. Is it necessary to specify any sortwrk parms or does sortwrk take the xfh-default? Are there any limits to the number of input records or sizes when it comes to sort?    Resolution: 1)  gigs free doesn't mean its good free space - First  check a defrag analysis and defrag if needed; 2)  check where temp and tmp are pointing to and make sure this area is not Restricted to a  certain size (e.g. its pointing to c:  and all the free space is on d:); 3)  Rule of thumb has always been that the temporary space required to sort a file is 2.5 times the size of the file.  So if the file is 25 GB

Problem: The easiest is to use a BITMAP as a background, having previously used the MS Api SetBkMode with the TRANSPARENT option... see MF KB 21852 http://supportline.microfocus.com/mf_kb_display.asp?kbnumber=21852... Another way is to use the Microsoft API Rectangle as done in the demo attached to this KB Resolution: The easiest is to use a BITMAP as a background, having previously use the MS Api SetBkMode with the TRANSPARENT option... see MF KB 21852 http://supportline.microfocus.com/mf_kb_display.asp?kbnumber=21852... Another way is to use the Microsoft API Rectangle as done in the demo attached to this KB http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdi/fillshap_6kth.asp Rectangle The Rectangle function draws a rectangle. The rectangle is outlined by using the current pen and filled by using the current brush. BOOL Rectangle(   HDC hdc,         // handle to DC

Problem: Running a Cobol application on a Windows 2000 machine fails with an error that says it was not able to find SHELL.DLL Resolution: Make sure to apply Service Pack 4 (SP4) on Windows 2000. Prior to SP4, SHELL.DLL was placed in c:\\winnt\\system32\\dllcache, and it is not in the PATH environment variable. This DLL on the other hand is in c:\\winnt\\system32 with SP4, which is also in the system path. Old KB# 3840

Problem: This oocurs when trying to do a call 'cbl_alloc_mem' The error returns - 173 module not found 'cbl_allo' The message on the 173 error displayed a  truncated name such as  cbl_allo Resolution: This error was encountered in a program that had a mixture of mainframe and pc coding and a  mainframe dialect was being used. If this occurs use the NOMAPNAME directive and this will stop the truncation of called program Old KB# 3906

Problem: Load error : file 'EXTSM'                                                        error code: 173, pc=0, call=1, seg=0 173     Called program file not found in drive/directory This error is due to the EXTSM object file not being linked to the executable. Resolution: To overcome this problem you need to link EXTSM.OBJ to the EXE.  This can be done  through the BUILD SETTINGS of the IDE in NetExpress or include it in CBLLINK on the command line. Specifying EXTSM.OBJ in this way, the executable should work correctly within and outside of the IDE. Attached is a small demo which might help the customer. Old KB# 390

Problem: When running a COBOL application under a local installation of Net Express Application Server you might get a Semaphore error and the application fails. Resolution: When running a COBOL application under a local installation of Application Server and the Application Server license database is also local, make sure that the ASLMFNET environment variable isn't set. This environment variable isn't required when running against a local database, only when running against a remote license database. Old KB# 3890