INTOUCH® 4GL
A Guide to the INTOUCH Language


Previous Contents Index


Appendix E
Creating Libraries for Use with INTOUCH

To create libraries for use with INTOUCH, you will need to follow these steps:

  1. Write the source code using an editor. The source code can be in BASIC, FORTRAN or any other OpenVMS provided language that supports the common calling interface. Here is an example of a BASIC routine:


            10  SUB MULT(IN1%, IN2%, OUT%) 
                OUT% = IN1% * IN2% 
                END SUB 
    

    This file has only one subprogram. Your file can contain any number of subprograms.

  2. Compile the source code with the appropriate compiler. For instance, the above BASIC routine would have to be compiled with the BASIC compiler:


            $ BASIC MULT 
    

  3. Create an options file. Use an editor to create an options file. Give the options file a file extension of ".OPT".


                UNIVERSAL = module [, module...] 
    


                UNIVERSAL = MULT 
    


                SYMBOL_VECTOR = (module1=PROCEDURE) 
                SYMBOL_VECTOR = (module2=PROCEDURE) 
                  . . . 
    


                SYMBOL_VECTOR = (MULT=PROCEDURE) 
    

  4. Link the library.


                LINK/SHARE routine_name,options_file/OPTIONS 
    


                $ LINK/SHARE MULT,MULT/OPTIONS 
    

    You have now created the shareable image MULT.EXE, containing the routine MULT. You can now use this routine from within INTOUCH.

    To use the routine, first name the library with a LIBRARY statement, supplying the complete file specification INCLUDING DEVICE AND DIRECTORY. Then, execute the routine with the CALL statement.


            10  library "DUA1:[STEVE.MODULE]MULT.EXE" 
                call mult(8%, 9%, answer%) 
                print 'The answer is '; answer% 
    

    You can have any number of LIBRARY statements in a program. When you call a routine, each library specified is checked in turn for the routine.


    Appendix F
    INTOUCH Database Interfaces

    F.1 Supported Database Engines

    Multiple database engines (record management systems) can be used with INTOUCH. The following database engines are currently supported:

    • RMS
    • Rdb
    • DBMS
    • USERBASE
    • POISE
    • FASTFILE
    • S1032
    • INGRES
    • dBASE III
    • ADABAS
    • ORACLE

    The SETUP routine tells INTOUCH where data files are located and what record management systems are used. Once you have defined your structures using SETUP, you can use INTOUCH's structure statements to manipulate the data.

    For detailed information on INTOUCH interfaces to the various database engines, you can refer to:


    Index Contents