home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / viscobv6.zip / vac22os2 / ibmcobol / samples / mtexe / mtdll / dyndll2.cbl < prev    next >
Text File  |  1996-05-13  |  1KB  |  25 lines
  1.  
  2.       *************************************************************
  3.       *                                                           *
  4.       *    Licensed Materials - Property of IBM                   *
  5.       *                                                           *
  6.       *    5622-793  (C) Copyright IBM Corp., 1996                *
  7.       *    All rights reserved                                    *
  8.       *                                                           *
  9.       *    US Government Users Restricted Rights - Use,           *
  10.       *    duplication, or disclosure restricted by GSA ADP       *
  11.       *    Schedule Contract with IBM Corp.                       *
  12.       *                                                           *
  13.       *************************************************************
  14.  
  15.        IDENTIFICATION DIVISION.
  16.        PROGRAM-ID. DYNDLL2.
  17.        DATA DIVISION.
  18.        LINKAGE SECTION.
  19.        01 COB-STRING-VAR-DLL    PIC x(36).
  20.        PROCEDURE DIVISION USING COB-STRING-VAR-DLL.
  21.            DISPLAY COB-STRING-VAR-DLL.
  22.            DISPLAY " ".
  23.            EXIT PROGRAM.
  24.        END PROGRAM DYNDLL2.
  25.