The tape contains multiple datasets. The first dataset is in z/VM tape dump format and contains the following files.
| Name | Type | Description |
|---|---|---|
| ADASQLA | TEXT | The executable Adabas Native SQL preprocessor (load module) for Adabas that runs with PREDICT Version 3.4 or later and generates Ada code. |
| ADASQLC | TEXT | The executable Adabas Native SQL preprocessor (load module) for Adabas that runs with PREDICT Version 3.4 or later and generates COBOL code. |
| ADASQLF | TEXT | The executable Adabas Native SQL preprocessor (load module) for Adabas that runs with PREDICT Version 3.4 or later and generates FORTRAN code. |
| ADASQLP | TEXT | The executable Adabas Native SQL preprocessor (load module) for Adabas that runs with PREDICT Version 3.4 or later and generates PL/I code. |
| FCID | TEXT | Module that dynamically generates command-IDs during execution of the application program. Used in FORTRAN programs. |
| FINDCID | TEXT | Module that dynamically generates command-IDs during execution of the application program. Used in COBOL and PL/I programs. |
| PRPABEND | TEXT | This module is used to abend an application program if an error occurred. |
| PRTFLOW | TEXT | Module that prints a flow-trace of all executed Adabas Native SQL statements during the execution of the application program if MODE FLOW is set (COBOL). |
| PRTRACE | TEXT | Module that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (COBOL). |
| RESPINT | TEXT | The response code interpretation routine (COBOL). |
| SQFRDATE | TEXT/COBOL | Routine which converts format D number to numeric date. |
| SQFRTIME | TEXT/COBOL | Routine which converts format T number to numeric date and numeric time. |
| SQTODATE | TEXT/COBOL | Routine which converts numeric date to format D number. |
| SQTOTIME | TEXT/COBOL | Routine which converts numeric date and numeric time to format T number. |
| DDCARD | ADASQL | The Adabas runtime parameters. |
| ADAGLOB | ADASQL | The Adabas Native SQL global runtime parameters. |
| AEX1...AEX3 | SOURCE | Ada examples using various Adabas Native SQL statements. |
| CEX1...CEX3 | SOURCE | COBOL examples using various Adabas Native SQL statements. |
| FEX1...FEX3 | SOURCE | FORTRAN examples using various Adabas Native SQL statements. |
| PEX1...PEX3 | SOURCE | PL/I examples using various Adabas Native SQL statements. |
| TYPESADA | SOURCE | Ada examples using various Adabas Native SQL statements. |
| PRTFLO | FORTRAN | The source code of the routine that prints a flow-trace of all executed Adabas Native SQL statements during the execution of the program if MODE FLOW is set (FORTRAN). |
| PRTFLOP | PL/I | The source code of the routine that prints a flow-trace of all executed Adabas Native SQL statements during the execution of the program if MODE FLOW is set (PL/I). |
| PRTFLOW | COBOL | The source code of the routine that prints a flow-trace of all executed Adabas Native SQL statements during the execution of the program if MODE FLOW is set (COBOL). |
| PRTRAC | FORTRAN | The source code of the routine that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (FORTRAN). |
| PRTRACP | PL/I | The source code of the routine that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (PL/I). |
| PRTRACE | COBOL | The source code of the routine that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (COBOL). |
| RESPF | FORTRAN | The source code of the response code interpretation routine (FORTRAN). |
| RESPINT | COBOL | The source code of the response code interpretation routine (COBOL). |
| RESPPL1 | PL/I | The source code of the response code interpretation routine (PL/I). |
| ADASQLC | EXEC | An EXEC to preprocess and compile a sample COBOL program. |
| ADASQLF | EXEC | An EXEC to preprocess and compile a sample FORTRAN program. |
| ADASQLP | EXEC | An EXEC to preprocess and compile a sample PL/I program. |
| ADAGO | EXEC | An EXEC to execute a sample program. |
If necessary, the source module RESPINT (COBOL) or RESPPLI (PL/I) may be edited to accommodate installation-specific requirements. The original source module should be retained for future reference. PRTRACE and PRTFLOW may be recompiled for COBOL/II environments.
The second dataset is in NATURAL INPL format and contains Adabas Native SQL error texts.
The Adabas Native SQL preprocessor modules were not linked with the Adabas callpass routine Adabas to make them independent of an Adabas SM. The sample ADASQLx EXECs provided now issue a LOAD of Adabas along with the preprocessor module. If you have your own preprocessor EXEC it must be updated to issue a load of Adabas. The Adabas text file can be found in the ADAVnnn TXTLIB.