FUJITSU FS Logo
HomeMigrationsProductsServicesInformationNewsPartnerStudentsPricingAbout Us
Quick Search  
   
DowloadSupport
Home > Downloads
 
Downloads
Sample Programs
V9 Installation Guides
V9 Softcopy Manuals
NetCOBOL for Linux V7 Manuals

 

Fujitsu COBOL Versions 4, 5 & 6 and NetCOBOL for Windows Versions 6 thru 9 Sample Programs

These samples were tested with Version 4 & 5 of the Fujitsu COBOL product set.

Fujitsu COBOL and NetCOBOL for Windows

Attention PowerCOBOL users!
Many of the techniques and sample programs listed here
can be used in PowerCOBOL applications.

Sample
Description
Download the Sample 10 stock database.
(Please note: in order for the Stock.mdb database to work, the user MUST have Access 97 running).
Sample code of how one would modify an AS/400 application to run as a Fujitsu COBOL application.
A sample program to demonstrate how a COBOL program can store to and read records from a Microsoft Access table that has an AUTONUMBER field.
A sample program that will launch an EXE from within a COBOL97 application.
A sample program that demonstrates how Microsoft C++ can call a COBOL program, passing and receiving parameters.
A callable program that will change the current directory. The directory name can be up to 255 characters, contain spaces, and can be a network directory. These subroutines can be used by both COBOL97 and PowerCOBOL applications.
This sample program use a OLE class object to access a VB DLL from COBOL.
A sample program that shows one how to receive parameters from the command line.
A callable program that will create a directory. The directory name can be up to 255 characters, contain spaces, and can be a network directory. These subroutines can be used by both COBOL97 and PowerCOBOL applications.
A sample program that shows how tell what day of the week any MMDDYY date is/was in about 10 lines of code.
A sample program that shows how to access the CBL_DELETE_DIRECTORY
A subroutine that will delete a file from disk.
Sample program that will, given a drive and pathname, return the total size of the disk, the number of free bytes, and the number of free bytes available to the user (users on networks often have limits placed on them as to how much disk space they may use.
EBCDIC to ASCII file converter (or vice versa) using the CBL_byte stream file routines.
A collection of subroutines that can be called from your applications, to locate specific files and or directories, and with specific 'attributes' (e.g. Hidden files, System files, etc). These subroutines will work with COBOL97 and PowerCOBOL applications.
This sample program will search all the open windows on your desktop for a specific window that you specify. This is useful for application developers who want to prevent multiple instances of their application from running (a sample of this is enclosed).
A sample for calling the Windows95/NT WIN32 API to allocate global memory.
A callable program that will return the name of the current directory. These subroutines can be used by both COBOL97 and PowerCOBOL applications.
A callable program that will return the path name of the temporary directory (i.e. the path pointed to by the TEMP or TMP enviroment variables). These subroutines can be used by both COBOL97 and PowerCOBOL applications.
A sample program that captures which key (for example, function keys or the Enter key) was pressed. Two methods are demonstrated.
Test database for exercise in ODBC chapter of PowerCOBOL User's Guide (Access 95 and 97 versions).
A sample that shows how to print in different font sizes.
A callable program that will delete a directory. These subroutines can be used by both COBOL97 and PowerCOBOL applications.
A sample program that shows you how you can use DOS screens larger than 80X24.
This subroutine will get the name of the currently logged on user.
These subroutines will allow a COBOL program to fetch the settings of an environment variable as well as set an environment variable. Further, these subroutines allow you to create or delete environment variables.
A sample program demonstrating how to use different printer fonts.
LANDSCAPE Sample program that demonstrates how to print in landscape mode, as well as using different fonts.

PowerCOBOL

Sample
Description
An example of how to use the Crystal Reports OCX with PowerCOBOL.
A sample showing how to build PowerCOBOL projects that call (COBOL) .DLL files.
A PowerCOBOL sample showing how to transfer control from one form to another.
A PowerCOBOL sample showing how to call another application. Two methods are demonstrated (one using a Windows API call, and the other using DDE).
A sample showing how to use PowerCOBOL Modal and Modeless Dialog Boxes.
DISPLAYMSG This sample demonstrates how you can display multiline messages using the DISPLAYMESSAGE method.

EXCELCONTROL

A sample program that demonstrates how to use the ExcelConnection control
FILE_ATTRIBUTES These callable subroutines will allow your application to get and set attributes for a file.
A description and example of how to add icons to your LISTVIEW objects.
A PowerCOBOL example on how to create your own OCX's, and use them in your applications. Step by step instructions are included. This sample will create a digital clock that you can incorporate into your own applications.
Sample program that will, given a drive and pathname, return the total size of the disk, the number of free bytes, and the number of free bytes available to the user (users on networks often have limits placed on them as to how much disk space they may use.
This sample demonstrates how to use the KEYPRESS event, and uses it to force data entry to be all uppercase characters.

POWERFORM
AND
POWERCOBOL

A sample program that demonstrates and describes how to use PowerFORM with PowerCOBOL.
This sample demonstrates how to use numeric data with Textbox controls.
A sample program that demonstrates how to print barcodes using PowerFORM.

 

 
 © 2003 - 2006 Fujitsu Computer Systems Corporation. All Rights Reserved.