home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / cpm / basic / basutil.lbr / SYSTEMS.DQC / SYSTEMS.DOC
Encoding:
Text File  |  1985-02-10  |  7.8 KB  |  273 lines
  1.  
  2.  
  3. 
  4.  
  5.  
  6.  
  7.                            Systems Routines
  8.                        Developed by J. Zingalis
  9.                        for Progam Developments
  10.                              May 21,1982
  11.  
  12.  
  13.  
  14.  
  15.  
  16.  
  17.                           Table of Contents
  18.                        -----------------------
  19.  
  20.  
  21.  
  22.  
  23.                System Definitions .............. Page 1
  24.  
  25.  
  26.                Isam Definitions ................ Page 2
  27.  
  28.  
  29.                Isam Routines ................... Page 2
  30.  
  31.  
  32.                Crt Layouts and Definitions ..... Page 3
  33.  
  34.  
  35.                File Layouts .................... Page 4
  36.  
  37.  
  38.                Systems Routines ................ Page 5
  39.  
  40.  
  41.                Error Definitions ............... Page 6
  42.  
  43.  
  44.                Program Structure ............... Page 7
  45.  
  46.  
  47.  
  48.  
  49.                           Copyright (c) 1982
  50.  
  51.                           All Rights Reserved
  52.  
  53.  
  54.  
  55. è
  56.  
  57.  
  58.  
  59.      Systems Doc                                              Page 1
  60.  
  61.  
  62.  
  63.  
  64.  
  65.                          Systems Definitions
  66.                         ---------------------
  67. 
  68.  
  69.  
  70.             Variable                       Description
  71.           --------------           ----------------------------------
  72.             Bell$                     Output Bell to terminal
  73.  
  74.             E$                        Test for END to terminate
  75.  
  76.             CLS$                      Clear CRT Screen
  77.  
  78.             HOME$                     Put Cursor to top of page
  79.  
  80.             LI.ER$                    Erase line on CRT
  81.  
  82.             NOR$                      Normal Display on CRT
  83.  
  84.             REV$                      Reverse Video on CRT
  85.  
  86.             X.ER                      Line value for error messages
  87.  
  88.             Y.ER                      Columb value for error Messages
  89.  
  90.             ESC$                      Control Character for CRT
  91.  
  92.             N#                        Value used in number crunching
  93.  
  94.             X()                       Line value for display data
  95.  
  96.             Y()                       Colubm value for display data
  97.  
  98.             X1()                      Line value for Input data
  99.  
  100.             Y1()                      Columb value for Input data
  101.  
  102.             L()                       Length of input data
  103.  
  104.             Z$()                      Display Data
  105.  
  106.             TIME()                    Time display variables
  107.  
  108.             MO()                      Date Values
  109. è
  110.  
  111.  
  112. 
  113.      Systems Doc                                              Page 2
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.                            Define Routines
  122.                           -----------------
  123.  
  124. 
  125.  
  126.          FNDI$(X#)           Used to convert a string to a double
  127.                              precision number. Uses 4 bytes string
  128.  
  129.          FNID#(X$)           Used to convert a Double Precision
  130.                              number a 4 byte String.
  131.  
  132.          FNPC$(X,Y,L,Z$)     Used to Print Display information on
  133.                              CRT. X is the line position and Y is
  134.                              the columb position, where L is the
  135.                              length of the input field and Z$ is
  136.                              the data to be displayed on CRT.
  137.                              (Ex. Print FNPC$(1,1,5,"Name"); )
  138.                              would print "Name" at the First line
  139.                              first columb of the CRT with 5 dots
  140.                              to show the input length. (Name .....)
  141.  
  142.          FNPCTR$(X,Z$)       This will print then string z$ on line
  143.                              X and position it in the center of the
  144.                              CRT screen.
  145.  
  146.          FNLG(X,X$)          This is used to determine the value used
  147.                              in printing data on the center of a line.
  148.                              ╪á determine≤á thσ Width¼ anΣ Xñ i≤ thσ
  149.                              string to be printed.
  150.  
  151.          FNLPCR$(X$)         This is used to print X$ on the center
  152.                              of a line on the printer.
  153.  
  154.          FNUB%(X$)           Reverse the string value to create an
  155.                              integer value used in Isam.
  156.  
  157.          FNBU$(X%)           Converts an Integer to a String and
  158.                              reverse character.
  159.  
  160.  
  161.  
  162.  
  163. è
  164.  
  165.  
  166. 
  167.      Systems Doc                                              Page 2
  168.  
  169.  
  170.  
  171.  
  172.                            Systems Routines
  173.                            ----------------
  174.  
  175.  
  176.  
  177.  
  178.  
  179.               Line #                        Description
  180.             -----------       ---------------------------------------
  181.                50225           Convert Date String to Integer
  182.                                     (Two Byte Interger)
  183.  
  184.                50250           Convert Integer to Date String
  185.                                     (8 Bytes String 'MM/DD/YR')
  186.  
  187.                51000           Input Routine For Alphanumeric Data
  188.                                     X  = Line Coordinates
  189.                                     Y  = Colubm Coordinates
  190.                                     Z  = Length of Entry Field
  191.                                     Z$ = Data Texted
  192.  
  193.                51200           Input Number Routine in Single
  194.                                Precsion. With Lower and Upper Limits.
  195.                                     LB! = Lower Limits Value
  196.                                     UB! = Upper Limits Value
  197.  
  198.                51300           Input Time Data Using the Following
  199.                                Format.  ('HH:MM:SS')
  200.  
  201.                51400           Input Date Data using the Following
  202.                                Format  ('DD/MM/YR')
  203.  
  204.                51500           Used to Indicate Date Used
  205.  
  206.                51600           Input Dollar amount routine
  207.                                Double Precision number returned.
  208.  
  209.                51800           Get yes or no value
  210.  
  211.                51900           Set top of form.
  212.  
  213.  
  214.  
  215.  
  216.  
  217. è
  218.  
  219.  
  220. 
  221.      Systems Doc                                              Page 2
  222.  
  223.  
  224.  
  225.  
  226.                            Systems Routines
  227.                            ----------------
  228.  
  229.  
  230.  
  231.  
  232.  
  233.               Line #                        Description
  234.             -----------       ---------------------------------------
  235.                52000           Convert Upper Case data to lower case
  236.                                with the first letter in the word being
  237.                                Upper case.
  238.                                  (Ex«á CLEVELAND¼á OHI╧á woulΣ bσ 
  239.                                        Cleveland,  Ohio)
  240.  
  241.                52900           Convert Time to Common Value
  242.  
  243.                52950           Convert Common Value to Time
  244.  
  245.                53000           Set form to top of page
  246.  
  247.                53300           Read Systems Clock
  248.  
  249.                53400           Routine to set Systems clock.
  250.  
  251.                54000           Error message Routines.
  252.  
  253.                Codes           Error message Values
  254.              ---------         --------------------------------------
  255.                 1              Invalid Entry
  256.                 2              Number out of range
  257.                 3              Invalid Date
  258.                 4              Invalid Time
  259.                 5              Basic error with error code and line
  260.                 6              Isam error
  261.                 7              Record Key not found
  262.                 8              Record Key already exsist
  263.                 9              Out of Record blocks on Disk
  264.                10              File not Found
  265.                11              Invalid Password
  266.                12              Wrong Password and sign off
  267.                13              Disk error
  268.                14              Record Deleted from data base
  269.  
  270.                             
  271. è
  272.  
  273.