Rocket® COBOL

Problem: Since applying SP2 to Windows XP our CGI programs run fine but they cannot be debugged/animated within Net Express. Resolution: We suggest you try the following: 1)  Log on to Microsoft's Windows Update and ensure your installation of XP is fully updated. 2) Disable the XP's internal Firewall. 3) Execute CBLCORED -I from within a Net Express Command Prompt.  This CBLCORED option implements a number of security tweaks that Microsoft recommend.  It is only active for the duration of the user being logged on to the machine i.e. a reboot or logging of the XP box will require the command to be executed again. 4) Enable CGI debugging from within IIS 5.5. Please contact Micro Focus SupportLine if you still have problems. Old KB# 4260

Problem: If the following MOVE-OBJECT-HANDLE causes strange behaviour, e.g. for a ListBox: SCREENSET-INITIALIZED ...     MOVE-OBJECT-HANDLE WIN-01 SM-HANDLE(1) Resolution: The object WIN-01 is not available at SCREENSET-INITIALIZED. So its handle cannot be moved. Move this code fragment to the WINDOWS-INITIALIZED dialog of WIN-01 and the handle of WIN-01 can be received. Old KB# 4248

Problem: This demo shows how you can use the SetParent Windows API to dynamically change the parent of a Dialog System window. Resolution: INTRODUCTION ========== This demo shows how you can use the SetParent Windows API to dynamically change the parent of a Dialog System window. SOURCE FILES: ========== Program Files         Description -------------------     ----------------------------------------------------------- SetParent.app Mainprog.cbl Copy Files -------------------     ----------------------------------------------------------- screenset1.cpb Screenset Files -------------------     ----------------------------------------------------------- screenset1.gs ========================================================== Keywords: demonstration, sample, example, demo, Dialog System, setparent.zip demo.ex demo.ne

Problem: Linkage parameters are not passed in a project with other CICS programs Resolution: Please check if you have the following directive in your project properties: CICSECM(). This directive should only be used with CICS programs.  If the programs where you have this problem are not CICS programs, you should remove the CICSECM() directive when you compile them. CICS uses the linkage in a very particular way.  In a CICS program you access to linkage using special CICS calls... so in this case your linkage parameters are there but you would need to use a CICS sentence to access to them. Old KB# 4271

Problem: This demo demonstrate how to invoke some of the basics functions of Microsoft HTML Help via API calls. Resolution: INTRODUCTION ========== This demo demonstrate how to invoke some of the basics functions of Microsoft HTML Help via API calls. SOURCE FILES: ========== Program Files         Description -------------------     ----------------------------------------------------------- HTMLDemo.CBL      Dialog System/Cobol program DSHTML.CBL COBOL programs using HTMLHelp                                API calls Copy Files: -------------------     ----------------------------------------------------------- HTMLDemo.CPB     Dialog System screen

Problem: Bei Anwendungen mit Ausgabe in eine zeichenorientierte Umgebung erscheinen die Umlaute im Allgemeinen falsch dargestellt. Das passiert typischerweise in Befehlszeilen oder in einer DOS box. Die Ursache liegt in der Verwendung des OEM Zeichensatzes im DOS Subsystem. Resolution: Zur Verbesserung der Darstellung kann Net Express in den ANSI Input Mode umgeschaltet werden. Das erreicht man in der Application Environment der Project Properties. Dann erscheinen z.B. die Umlaute eines DISPLAY richtig im Application Output. Läuft die Anwendung in einem Befehlsfenster, dann muss man die Umstellung in den Runtime Tunables vornehmen. Dazu braucht man eine Runtime Configuration File. Diese muss mit Hilfe einer Umgebungsvariablen definiert werden:   SET COBCONFIG_=d:\\path\\rtsconfig.cfg Darin wird der Schalter für die Umlaute gesetzt:   SET ANSI_INPUT_MODE=TRUE Old KB# 4245

Problem: Release 4.0: When installing Net Express with .Net the COBOL.NET Project Package is not installed and the error 'Package Load Failure' appears. Error message: Package 'COBOL.NET Project Package' has failed to load properly ( GUID = {DC88F376-25DD-49C8-99D9-1FD8AE484362} ). Please contact package vendor for assistance. Would you like to diable loading this package in future? You may use 'devenv /resetskippings' to re-enable package loading. Application restart is recommended, due to possible environment corruption. Resolution: The problem was in this case that the virus scanner Zonealarm prevented the installation from succeeding. After disabling this the installation went through ok. Old KB# 4264

Problem: Multiple Line Text in Dialog System Push Buttons using Windows Styles. Resolution: INTRODUCTION ========== Multiple Line Text in Dialog System Push Buttions using Windows Styles. By default Dialog System truncated text on a Button when it is larger than the button size. This demo shows how to use Windows API calls in order to make the text go over multiple lines. SOURCE FILES: ========== Program Files            Description ---------------------     ----------------------------------------------------------- demo.cbl           setbuttonstyles.cbl Copy Files: ---------------------     ----------------------------------------------------------- thescreenset.cpb minwin.cpy winbase.cpy winclass.cpy winerror.cpy wingdi.cpy winnls.cpy wintypes.cpy winuser.cpy DS Scree

Problem: Client was running an executable that was creating a file. Each time it ran it should have created a new filename - but it kept creating the same filename. Resolution: At one time they had an environment variable for the file name in the project properties under the application button. The solution was to delete the rtecfg_....obj (most likely in working directory) and it take out of link properties in advanced "include objs" Then the EXE was rebuilt It's important that while testing environment variables that may change are only included in the IDE button and NOT the Application button. If they are included in the Application, the variable will be built into the executable. Old KB# 4242

Problem: Release 4.0: How can I get more  information about run time error codes used in Net Express? Resolution: Take a look at th following: Open the Net Express IDE -> Help -> Help Topics -> Index -> enter: 'RTS' and you should see this entry:  'error messages' After clicking you get back a sorted list by numbers ascending of all rts error codes used in this run time system. Old KB# 4266

Problem: Demonstrating the usage of the Dialog System Error Message File Handler, DSERRHAN. Resolution: INTRODUCTION ============ This project demonstrates using dialog system error handler "dserrhan". SOURCE FILES: ========== Program Files     Description ----------------     ----------------------------------------------------------- dseh.cbl             Program that loads the dserrh.gs screenset and the Dialog System error handler                           dserrhan.    dserrh.gs           screenset that demonstrates the dialog system error handler.   Copy Files: ----------------     ----------------

Problem: Supplying an argument or parameter to MFNETX /DEBUGPROJ (e.g. MFNETX /DEBUGPROJ:projectname arg) fails with an error that it cannot find the project. Resolution: Since spacey project names are allowed in Net Express, the MFNETX /DEBUGPROJ command treats the characters following the project name and space as part of the project name. To avoid this to happen, you simply need to quote the project name signifying that the following the closing quote is an argument, i.e. MFNETX /DEBUGPROJ:"projectname" arg Old KB# 4255

Problem: The sample is used to demonstrate how create transparent dialog boxes in Dialog System Resolution: INTRODUCTION ========== The project file Layered.APP is used to demonstrate how create transparent Dialog Boxes in Dialog System. To do this the demo uses the Layered Window API that was introduced in Windows 2000. RESTRICTIONS ========= Support for Layered Windows was added in introduced in Windows 2000. Transparent windows using this technique will therefore work only on 2000/ME/XP/2003. It will not work on Win9x systems. ========================================================== Keywords: demonstration, sample, example, demo, Dialog System, layered.zip demo.ex demo.ne Attachments: Layered.zip Old KB# 4231

Problem: This demo shows how to create icons in a Dialog System Pulldown-Menu Resolution: INTRODUCTION ========== This Demo shows you how to create Icon's in a Dialog System Pulldown-Menu. In Dialog System we have no functionality for this. In this Demo we can show how you can do this via WinApi system calls. kind Regards Andre Beuth & Dieter Petz SOURCE FILES =========   Program Files        Description ------------------     ----------------------------------------------------------- Menueitem.cbl      Main Program Menueitem.gs       Dialog System Screenset *.bmp                   Bitmaps used in the Pull-down-Menue Copy Files ------------------     -------------------------------

Problem: This demo shows how to make a Dialog System entry field blink by alternating the background color of the field. Resolution: INTRODUCTION ========== This demo shows how to make a Dialog System entry field blink by alternating the background color of the field. It uses the Dialog System TIMEOUT function to intermittently execute a procedure in the window dialog that alternates the background color (using the SET-COLOR function) of the entry field between yellow and the default color. SOURCE FILES: ========== Program Files     Description ----------------     ----------------------------------------------------------- dsblink.app        Net Express project dsblink.cbl          Main COBOL source code dsblink.cpb         Dialog System datablock copyfile dsblink.g

Problem: This demo shows how to parse XML Resolution: INTRODUCTION ========== This example demonstrates the use of the Microsoft XML classes for manipulating Extensible Markup Language (XML) files. This example will show how to use the methods within these OLE classes to parse an XML document into its various components. The file sample.xml contains the document used in this example. The document describes a list of musical compact discs divided into title, artist, tracks, price and track information. This program will extract tag information from the XML object and will display the parsed data. It will also call the subprogram GetCDData using the XML object as a parameter and this program will further parse the document based on the values of certain tags. This example also demonstrates the use of recursion within COBOL as the XML object is in a tree structure and the subprogram to extract data calls itself until the tree data is exhausted. SOURCE F

Problem: This demo shows how you can use a HTML Link (A HREF) to call a COBOL CGI passing parameters Resolution: ========================================================== Keywords: demonstration, sample, example, demo, web programming, links.zip demo.ex demo.ne demo.se Attachments: links.zip Old KB# 4205

Problem: You might be using dsrunner with more than one ScreenSet. When you minimize the second one, and try to reactivate it by the dsrunner function "SWCH", the minimized ScreenSet does not get reactivated and remains in the task bar. Resolution: It is possible to get back a minimized window by a USER-EVENT posted from one ScreenSet to the other. Before you can do so, you have to transfer the WINDOW-HANDLE via a DSRUNNER shared memory area. The ScreenSet receiving the USER-EVENT, can do a RESTORE-WINDOW and a SET-FOCUS. The attached sample is a modified version of the DDESAMPL provied with Net Express The followng modifications were made: --------------------------- In every ScreenSet: - Add to the data blocks, immediately after the last DSRUNNER variable "DSRUNNER-PARAM-STRING"   HWND-SAMPL                    &nbsp

Problem: What do you do if you cannot do exact placement of objects on a graphical Dialog System screenset window? Resolution: If you add new objects to a graphical screenset window and they seem to have a snap-to-grid behavior where you cannot place them exactly, then select the Dialog System Edit menu, Alignment menu, and notice the values for X axis and Y axis under the Grid increments group. You may need to change these values to 1 if you want exact placement of objects on a window. Old KB# 4258

Problem: In the Net EXpress IDE you may have accidently made the toolbar disappear - how can you make it reappear? Resolution: Select View >  Dockable Windows and then check the toolbar option. It will reappear as 'floating' - but then you can dock it if required. Old KB# 4211

Problem: This demo shows how to use the paint method for a window created by Dialog System Resolution: INTRODUCTION ========== Example of creating a window and trapping the paint method.    SOURCE FILES: ========== Program Files           Description ---------------------     ----------------------------------------------------------- PaintMe.cbl               PaintMe is just the trigger program that creates aPaintWindow.   MakePaintWin.cbl     Program makes a paint window. Although no local-storage is used, this                                  section is needed to allow EntryCallback

Problem: Version 4.0 If you have installed the Net Express 4.0 All Websync WrapPack 4.0.007 (all07n40.exe) and try to view an EBCDIC data file in the Data File Editor, you may not be able to switch from ANSI to EBCDIC to view EBCDIC data. This will occur if you have the "Find Text" toolbar open. This toolbar is visible if you choose the "Search" and "Find Text" menus when a source file is open in the editor. Resolution: Changes to the Text Find and Replace have caused the problem in all07n40. The workaround is to right-click on the Text Find toolbar and choose Hide from the popup menu before you open an EBCDIC file in the Data File Editor. The problem should be fixed in all fixpack releases and versions of Net Express after this fixpack. Old KB# 4257

Problem: This demo is a simple application which shows Net Express working with XML Resolution: INTRODUCTION ========== This example demonstrates the use of the Extensible Markup Language (XML) within a Net Express Web application. XML code can be output via EXEC HTML language extensions provided by Net Express. Extensible Style Language (XSL) documents can also be used to translate the XML into HTML for output. In this example a simple HTML input form will be displayed allowing the user to select one of three methods in which the XML page should be output. It can be displayed without a style sheet (only the bare XML code will be displayed) or with one of the two style sheets provided. It uses embedded SQL to access the Net Express sample database "NetExpress Sample1" which will be stored in the NetExpress\\base\\ demo\\smpldata\\access directory as Demo.mdb. It accesses the table "Staff" within this data source. It uses the data wit

Problem: This is a sample of how to use UPPER CASE FUNCTION two different ways Resolution: INTRODUCTION ========== This HTML form illustrates the use of JavaScript to convert the string in input fields to uppercase. SOURCE FILES: ========= Program Files              Description ----------------------     ----------------------------------------------------------- ToUpperCase.APP      NetExpress project file Form Files: ----------------------     ----------------------------------------------------------- HTMLPage.htm           HTML form with embedded JavaScript OPERATION: ======== This project does not contain a CGI since the process is done by an embedded JavaScript within the HTML form. This sample shows how to convert string to uppercase by us

Problem: This demo contains a number of Dialog System screensets togther with COBOL programs to illustrate how to apply DATA VALIDATION Resolution: How do I validate fields as soon as they lose focus? The most common problem with field-by-field validation is that an application can end up in an infinite loop of validation errors. For example, if an entry field loses focus and is validated, and the validation fails, then focus is returned to the enrty field. However, this causes another control to lose focus, and if that control is also validated, then an infinite loop can result. Another problem is that you may sometimes not want to validate a field, for example if a user clicks the Cancel or Help buttons on a dialog box, or switches to a different application. This screenset illustrates one way to implement field-by-field validation which avoids the infinite looping problems, and allows the implementation of Cancel and Help buttons: Define the followi