INTOUCH^® 4GL
A Guide to the INTOUCH Language

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 VMS 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". Enter the option UNIVERSAL to specify the modules (subprograms and functions) contained in your routine.

               UNIVERSAL = module [, module...] 
   

   • If your routine contains more than one module, separate multiple module names with commas. The routine described above has only one module:

               UNIVERSAL = MULT 
   

4. Link the library.

               LINK/SHARE routine_name,options_file/OPTIONS 
   

   • For the routine above, if your options file is called MULT.OPT, the link command is:

               $ 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:

   • the INTOUCH 4GL - Interfaces to Database Engines manual.
   • Chapter 16, Creating Structures, Field Definitions with SETUP, in this manual.

   ---

   Index

   ---

   Next page... | Table of Contents