home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / cobol / library / egull / scrlib.doc < prev    next >
Encoding:
Text File  |  1990-11-18  |  4.6 KB  |  198 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  
  22.  
  23.  
  24.  
  25.  
  26.                     Egull PC COBOL Advanced Function Library
  27.  
  28.                                   Version 3.0
  29.  
  30.                              Screen Library Utility
  31.  
  32.  
  33.                  Copyright (C) Scott Richard McLeod 1989, 1990
  34.                               All Rights Reserved
  35.  
  36.  
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                     $50 Shareware Contribution Requested
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70.                   Egull PC-COBOL Advanced Function Library
  71.                         Screen Image Library Utility
  72.  
  73.  
  74.  
  75.     SCRLIB
  76.     ══════
  77.     The Screen Image Library utility is supplied with the Egull PC
  78.     COBOL Advanced Function Library.  This program is very simple.
  79.     It allows you to group from 1 to 99 screen images into a single
  80.     file.  Screen images include Screen Image Files, CGA Picture
  81.     Files, CGA Image Files, EGA Picture Files and EGA Image Files.
  82.  
  83.     The contents of this library can then be displayed using the
  84.     "SCR_DISPLAY_SIL_FILE", "CGA_DISPLAY_PIC_LIB",
  85.     "CGA_DISPLAY_IMG_LIB", "EGA_DISPLAY_PIC_LIB" and
  86.     "EGA_DISPLAY_IMG_LIB" functions (depending on the screen image
  87.     type.
  88.  
  89.     This utility is started at the DOS prompt by entering the
  90.     following command:
  91.  
  92.                         C:>SCRLIB {filename}
  93.  
  94.     where the {filename} is the name of a file that contains the
  95.     library specifications you want to execute.  You can specify a
  96.     drive and/or path as part of the filename if you like.
  97.     Otherwise the file must be located in the current drive and
  98.     directory.
  99.  
  100.     The filename you entered above contains the control statements
  101.     the define how the library should perform its tasks.  The file
  102.     is a standard 80 character file (line sequential in COBOL terms)
  103.     that you can create using EDLINE or any other editor.
  104.  
  105.     The format of the control file is very simple.  The first record
  106.     contains the name of the library file you want to create.  If
  107.     the file already exists it will be replaced.  You can specify a
  108.     drive and/or a path for the library name if you like but the
  109.     total length of the file name may not exceed 70 characters.  You
  110.     should name the file with a .SIL extension for ease of
  111.     documentation since that is how I will refer to them.  You can
  112.     name the extension anything you want however.  See the sample
  113.     below:
  114.  
  115.     ----+----1----+----2----+----3----+----4----+----5----+----6
  116.     C:\COBOL\MYLIB.SIL
  117.  
  118.     After the first record that defines the library name, you will
  119.     follow it with records that define the names of .SIF (Screen
  120.     Image Files) that you want to place into the library.  You must
  121.     be sure that each of the files exist.  Note that like the
  122.     library name you may specify a drive and path as part of the
  123.     name.  See the example below:
  124.  
  125.     ----+----1----+----2----+----3----+----4----+----5----+----6
  126.     C:\COBOL\MYLIB.SIL
  127.     C:\COBOL\SCREEN1.SIF
  128.     \COBOL\SCREEN2.SIF
  129.     SCREEN3.CGA
  130.  
  131.                                      1.
  132.  
  133.  
  134.  
  135.  
  136.                   Egull PC-COBOL Advanced Function Library
  137.                         Screen Image Library Utility
  138.  
  139.  
  140.  
  141.     In the example above, you can see that two .SIF files and a CGA
  142.     Picture will be placed into a Library called MYLIB.SIL.  Using
  143.     the "__SCR_DISPLAY_SIL_FILE" function, you can now display the
  144.     screens from that library file and the "CGA_DISPLAY_PIC_LIB"
  145.     function can display the graphic picture.
  146.  
  147.     All the functions that display data from a library file require
  148.     two linkage parameters.  The first is the screen image library
  149.     name.  In the case of my example, you would specify
  150.     "C:\COBOL\MYLIB.SIL".  The second parameter is a screen number.
  151.     As each file is added to the library it is assigned a screen
  152.     number that starts sequentially at 1 and increments by one.
  153.     Files are added to the library in the order you list them in the
  154.     control file.  In my example, there are three screens in the
  155.     library assigned the numbers 1,2 and 3 in the order they were
  156.     listed.  So to display the SCREEN3.CGA file that is stored in
  157.     the screen image library, you would use the following COBOL
  158.     code:
  159.  
  160.       01  WS-FILE-NAME     PIC X(70) VALUE 'C:\COBOL\MYLIB.SIL'.
  161.       01  WS-SCR-NBR  COMP PIC 9(02) VALUE 3.
  162.                                 .
  163.                                 .
  164.                                 .
  165.           CALL '__CGA_DISPLAY_PIC_LIB' USING WS-FILE-NAME
  166.                                              WS-SCR-NBR.
  167.  
  168.  
  169.  
  170.  
  171.  
  172.  
  173.  
  174.  
  175.  
  176.  
  177.  
  178.  
  179.  
  180.  
  181.  
  182.  
  183.  
  184.  
  185.  
  186.  
  187.  
  188.  
  189.  
  190.  
  191.  
  192.  
  193.  
  194.  
  195.  
  196.  
  197.                                      2.
  198.