Skip to main content

Demo-Shows how to create your own Functions in COBOL

  • February 15, 2013
  • 0 replies
  • 0 views

Problem:

This demo program will show you how to create your own functions using the COBOL language.

Resolution:

    ===========================================================

                                            Micro Focus

                                       N E T E X P R E S S   

   ===========================================================                                       PROJECT FunctionTest

                                    ===============

   DATE CREATED:              10-08-07

   =============

   BUILD W/RELEASE:         Built with Rease 5.0 webync 3

   ================

   TABLE OF CONTENTS

   =================

       INTRODUCTION

       SOURCE FILES

       REQUIREMENTS

       OPERATION

       REFERENCES

   INTRODUCTION

   ============

      This sample demonstrate how to extend the Intrinsic functions  within COBOL so that you can      write your own functions

   

  SOURCE FILES:

   =============

Program Files

Description

=============

         

           TestFunctions:                            This is the program that uses the functions.

           Times2.cbl:                                  This is defined as a function that takes an integer            argument, multiplies it by 2 and returns the resul/

           Times4.cbl:                                  This is defined as a function that takes an integer            argument, multiplies it by 4 and returns the result.

=============================================

   REQUIREMENTS:

   =============

Net Express 4.0 or 5.x.

   OPERATION:

   ==========

Rebuild the project TestFunction.app and then run it under the animator.

         You will get a great idea of how useful functions can be.

Attachments:

FunctionDemo.zip

Old KB# 1491