home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / cobol / library / assist / readme.1st < prev    next >
Text File  |  1993-12-08  |  6KB  |  156 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  
  13.  
  14.  
  15. FILE STATUS CODES are valuable tools in checking the results of various file
  16. operations within COBOL code.  There use with VSAM and Indexed files is 
  17. especially effective in debugging, but they may be used for other files as well.
  18.  
  19. The files you have downloaded in ASSIST.ZIP are source code files which will    
  20. allow you to build a program to identify the meaning of FILE STATUS CODES.
  21.  
  22. These files may be distributed to anyone under four conditions:
  23.  
  24.         (1) No changes are to be made to any source code being distributed,             
  25.             including designation of AUTHOR, Description or Copyright;
  26.         (2) Files must be distributed together;
  27.         (3) This README.1ST file must accompany files;
  28.         (4) No charge is to be made for distribution.
  29.  
  30.  
  31. The source code has been written in COBOL and is designed to be compiled on
  32. Micro Focus Cobol.  If you are using another COBOL compiler you can amend
  33. the code for your use.  The basic COBOL code will work with any compiler,
  34. however the screen display code will have to be modified, and the apporpriate
  35. changes in the Directives will have to be made.
  36.  
  37. Also, for those of you using Micro Focus COBOL, you should note that the 
  38. ADISCF is set for Terminate Accept (disabled) and the ENTER key has been 
  39. redefined as a RIGHT CURSOR.
  40.  
  41.  
  42. Included in ASSIST.ZIP are the following files:
  43.  
  44.         ASSIST.CBL      - The lead program used to Chain the main programs      
  45.         ABEND2.CBL      -The main program which allows you to enter the         
  46.                             File Status Code and get explaination as to the                
  47.                             meaning of the code.
  48.         DETAIL1A.CBL    - The program which calls the detail information
  49.                              about the File Status Code.
  50.         SOC7.CBL        - A help screen outlining the purpose of the program        
  51.         LOADER.CBL      - A program which loads detailed explaination of the
  52.                              various FILE STATUS CODES into an indexed file        
  53.                              called FSTAT2.DAT.
  54.         FSTAT2.CBL      - A line sequential file containing the detail of the
  55.                              various FILE STATUS CODES.
  56.  
  57.                 
  58.                 
  59.                 
  60.                 ************** WHAT YOU DON'T GET **************
  61.  
  62.  
  63. The source code contained in ASSIST.ZIP gives you examples of screen handling
  64. in Micro Focus COBOL and examples of handling of Indexed files.  With it you
  65. can build a working program.
  66.  
  67. However, the FSTAT2.DAT file which accompanies ASSIST.ZIP does not include
  68. the detail of the FILE STATUS CODE.  That is, you can get a brief explaination 
  69. of the FILE STATUS CODE in question, but not a detailed one.
  70.  
  71. If you want to write your own detail, you can do this by adding detail to
  72. FSTAT2.CBL.  Here's how it works;
  73.  
  74. Each FILE STATUS CODE is given twenty (20) lines in FSTAT2.CBL.  The first
  75. line is the brief explaination which appears on the ABEND2 screen.  The next
  76. 19 lines appear when you ask for detail by pressing F1.  You can add detail
  77. by inserting information on those 19 lines and then using LOADER.CBL to
  78. create a new FSTAT2.DAT file.  
  79.  
  80. BUT BE CAREFUL!  At the end of each line is a number which becomes the INDEX
  81. for the FSTAT2.DAT file.  Don't remove, reposition or change these numbers
  82. or FSTAT2.DAT won't work.
  83.  
  84.             
  85.             
  86.             ************ AN EASIER WAY *************  
  87.  
  88. There is an easier way to load this information.  Fill out the enclosed
  89. order blank along with a check for $5.00 and I will send you a FSTAT2.CBL       
  90. file which contains detail for FILE STATUS CODES, including information for
  91. IBM SYSTEM 370/390 and VAX.                                                                 
  92.                                                                              
  93. Or, send $15.00 and I will include a reference text describing the various
  94. uses and options of FILE STATUS CODES including BINARY and IBM VSAM's
  95. RETURN/FUNCTION/FEEDBACK codes.
  96.           
  97.           
  98.           ************ HOW TO USE THE PROGRAM ************
  99.  
  100. After compiling the various programs listed above run LOADER.CBL.  This will
  101. create FSTAT2.DAT and FSTAT2.IDX, giving you the detail information for each
  102. FILE STATUS CODE.  
  103.  
  104. To begin the program, run ASSIST.EXE.   This program chains to the main
  105. program ABEND2.EXE.  The purpose of ASSIST.EXE is to keep as little as possible
  106. in memory, since in Chaining the first program is kept in memory until the
  107. program is terminated.
  108.  
  109. At the screen type the two digit FILE STATUS RETURN CODE.  Press F2 and you
  110. will see a brief explaination on the screen.  (This is the first line of the
  111. twenty lines of FSTAT2.DAT discussed above).  For further information about
  112. the FILE STATUS CODE press F1 and you will get a Detail Screen.
  113.  
  114. If you press F1 without first indicating a FILE STATUS CODE, you will get a
  115. generic HELP screen (SOC7.EXE).
  116.  
  117. To return to the Main Screen from either the Generic Help Screen or the 
  118. Detail Screen, press F1 again.
  119.  
  120. To exit the program from any screen, press F10.
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.  
  130. ************************** ORDER FORM ***************************************
  131.  
  132. ENCLOSED IS A CHECK FOR  TO COVER THE COST OF MAILING AND MATERIALS.
  133.  
  134. PLEASE SEND ME:                  
  135.  
  136.                 _____  FSTAT2.CBL (to be used with LOADER.CBL)            $5.00       
  137.  
  138.                                      or
  139.  
  140.                 _____ FSTAT2.CBL AND FILE STATUS REFERENCE MATERIAL      $15.00      
  141.                                                                       
  142.  
  143.  
  144. SEND TO:       
  145.                 NAME:________________________________________
  146.  
  147.                 STREET:______________________________________
  148.  
  149.                 CITY:________________________  STATE:_____ ZIP:_____________
  150.  
  151.  
  152. MAIL ORDER FORM TO: 
  153.                         GEORGE F. HARRIS
  154.                         120 COOLIDGE AVE.
  155.                         BARRINGTON, ILL 60010
  156.